home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / sigm / vol163 / pokehi.bas < prev    next >
Encoding:
BASIC Source File  |  1984-04-29  |  148 b   |  9 lines

  1. 10 REM POKEHI.BAS
  2. 20 DIM D(6)
  3. 30 FOR X=1 TO 6
  4. 40 READ D(X):POKE -20481+X,D(X)
  5. 50 NEXT X
  6. 60 STOP
  7. 70 DATA 33,15,12,175,119,201
  8. 80 REM A=&HB000:CALL A
  9.