home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 1 / Tiger_Disk_001_1994-04_Tiger-Crew-Disk_de_Side_B.d64 / tiger-basic (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  691b  |  22 lines
  1. 40000 fort=1to1000:nextt
  2. 40010 print"[147]":poke53281,7:poke53280,7
  3. 40020 poke2040,11:poke2041,13:poke53269,3:poke53277,3:poke53271,3
  4. 40030 poke53287,0:poke53288,10
  5. 40035 fora=0to5
  6. 40040 forn=0to62:readq:poke704+n,q:next
  7. 40050 fort=0to62:readp:poke832+t,p:next
  8. 40060 forx=0to255
  9. 40070 poke53248,x:poke53249,x
  10. 40080 poke53250,x:poke53251,255-x
  11. 40090 nextx
  12. 40100 restore:nexta
  13. 40200 data250,247,190,34,132,34,34,132,34,34,183,190
  14. 40210 data34,148,40,34,148,36,34,247,162,0,0,0,0,0,0
  15. 40220 data0,252,0,0,252,0,0,0,0,0,0,0,251,239,65
  16. 40230 data130,40,65,130,40,65,131,239,34,130,136,42
  17. 40240 data130,72,42,250,47,54,0,0,0
  18. 40250 data251,219,223,10,26,4,18,26,4,35,219,196,66,26,68
  19. 40260 data130,26,68,251,219,196,0,0,0,0,0,0,0,48,0,0,0,0
  20. 40270 data0,48,0,0,0,0,249,207,111,138,40,104,146,40,104
  21. 40280 data227,239,104,146,33,104,138,33,104,250,47,111,0,0,0
  22.