home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C128Software / STICK-FIGURES (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  1.5 KB  |  39 lines
  1. 0 REM  FROM JGPD DISK # 74
  2. 8 POKE53280,6:POKE53281,6
  3. 10 PRINT"[147][159]       [211]TICK [198]IGURES  BY [218]APPER7
  4. 15 [153]"     (null)HE LEN-64 IS FULL OF SURPRISES.
  5. 20 PRINT"[212]HIS [194][193][211][201][195] PROGRAM DISPLAYS 40 STICK
  6. 22 [153]"FIGURES IN A ROW IN THE MIDDLE OF THE
  7. 24 PRINT"SCREEN. [212]HEY LOOK LIKE PAPER DOLLS. [206]O
  8. 26 [153]"SPRITES, CHARACTER REDIFINITIONS, OR
  9. 28 PRINT"OTHER CONVENTIONAL METHOD IS USED TO
  10. 30 [153]"DISPLAY THEM. RIGHT$NSTEAD, MANIPULATION OF
  11. 32 PRINT"RASTER INTERRUPT AND REDEFINING
  12. 34 [153]"LOCATION 16383 CAUSES THEM TO APPEAR.
  13. 36 PRINT"[215]HEN FINISHED.. [208]RESS [210][213][206]/[211][212][207][208]-[210][197][211][212][207][210][197].
  14. 38 [153]"RIGHT$ WON'T WORK WITH (null)UPER (null)NAPSHOT.
  15. 40 PRINT"    [208]RESS <[211][208][193][195][197]> TO SEE 40 FIGURES.":WAIT197,7
  16. 50 POKE53280,12:POKE53281,12:PRINT"[147]
  17. 80 [129] L[178]49170 [164] 49315:[135] V:[151] L,V:[130]
  18. 90 [158] 49170
  19. 100 [131] 120, 169, 127, 141, 13, 220, 169, 1
  20. 101 [131] 141, 26, 208, 169, 19, 133, 2, 169
  21. 102 [131] 27, 141, 17, 208, 173, 106, 192, 141
  22. 103 [131] 18, 208, 169, 56, 141, 20, 3, 169
  23. 104 [131] 192, 141, 21, 3, 88, 96, 173, 25
  24. 105 [131] 208, 141, 25, 208, 41, 1, 240, 25
  25. 106 [131] 198, 2, 16, 4, 169, 18, 133, 2
  26. 107 [131] 166, 2, 189, 125, 192, 141, 17, 208
  27. 108 [131] 189, 144, 192, 141, 255, 63, 189, 106
  28. 109 [131] 192, 141, 18, 208, 138, 240, 6, 104
  29. 110 [131] 168, 104, 170, 104, 64, 76,     
  30. 13106 4
  31. 111 [131] 247, 177, 175, 173, 171, 169, 167, 165
  32. 112 [131] 163, 161, 159, 157, 155, 153, 151, 149
  33. 113 [131] 147, 145, 1, 11, 11, 11, 11, 11
  34. 114 [131] 11, 11, 11, 11, 11, 11, 11, 11
  35. 115 [131] 11, 11, 11, 11, 11, 3, 0, 66
  36. 116 [131] 36, 24, 24, 24, 153, 90, 60, 60
  37. 117 [131] 66, 153, 165, 129, 165, 66, 60, 0
  38. 118 [131] 0, 255, 0, 255, 0, 255, 0, 255
  39.