home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1989 July / 1989-07.d64 / demo (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  519b  |  21 lines
  1. 1000 ifa=0thena=1:print"[147]please wait":load"chr graphics",8,1
  2. 1010 sys31744
  3. 1020 poke198,0:poke53281,0
  4. 1030 print"[147]"
  5. 1050 print"graphics borrowed from"
  6. 1080 print"gazette's"
  7. 1110 print"crossroads and q-bird"
  8. 1120 (NULL)"demo.file1
  9. 1130 [129]x[178][171]2[164]63
  10. 1140 [129]m[178]0[164]1:[129]c[178]0[164]20[169]10
  11. 1150 [129]f[178]0[164]8[169]2:[209]f[170]m,x[171]c[171]f,c[170]f
  12. 1160 [130]:[130]:[130]:[130]
  13. 1170 [204]"demo.file2":[151]53281,15
  14. 1180 [153]"load"
  15. 1200 [153]">>> press any key <<<"
  16. 1210 [129]q[178]0[164]6[169]2:[129]x[178][171]1[164]34[169]7
  17. 1220 [209](x[175]1)[170]q,x,3[172]q:[130]:[130]
  18. 1230 [129]q[178]0[164]6[169]2:[129]x[178][171]1[164]34[169]7
  19. 1240 [209]([168]x[175]1)[170]q,x,3[172]q:[130]:[130]
  20. 1250 [161]k$:[139]k$[178]""[167]1210
  21.