home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 86xx / 8602.d64 / garbage64demo (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  393b  |  20 lines
  1. 1 IFA=1THEN3
  2. 2 A=1:LOAD"GARBAGE64",8,1
  3. 3 POKE53280,0:POKE53281,0
  4. 4 SYS51400
  5. 5 POKE50956,1:POKE50961,7
  6. 10 DIMK(30)
  7. 12 DIML%(100)
  8. 14 DIME$(200,1):E$(200,1)="OK"
  9. 16 DIMN$(20):N$(20)="TEST"
  10. 30 F%=56
  11. 32 A$="12345"
  12. 34 X=3
  13. 36 B$="ABCDEF"+"G"
  14. 38 C$="TES"+"T"
  15. 40 B$=""
  16. 62 FORX=1TO200:E$(X,0)="ABCDEFGH"+"9":NEXT
  17. 63 FORX=1TO200:E$(X,0)="12345678"+"9":NEXT
  18. 85 PRINTA$:PRINTB$:PRINTC$:PRINTE$(1,0):PRINTE$(200,0):PRINTN$(20);E$(200,1)
  19. 90 GOTO30
  20.