home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disk User Volume 2 #2 / Commodore_Disk_User_Vol.2_2_1989_-_Side_B.d64 / scroll1 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1989-01-01  |  236 b   |  10 lines
  1. 5 rem you must have loaded your own es-data before using this
  2. 10 print"[147]":goto 80
  3. 20 get d$:if d$="" then 20
  4. 30 if d$="[145]" then m=1:goto 80
  5. 40 if d$="" then m=2:goto 80
  6. 50 if d$="[157]" then m=3:goto 80
  7. 60 if d$="" then m=4:goto 80
  8. 70 goto 20
  9. 80 poke 49623,m:sys 49168:goto 20
  10.