home *** CD-ROM | disk | FTP | other *** search
/ C64'er / C64'er.iso / sh6x / sh69b.d64 / zeilenkiller (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  265b  |  20 lines
  1. 10 SYS 58692
  2. 20 FORI=1TO22
  3. 30 GOSUB1000
  4. 40 NEXT
  5. 45 GOSUB1100
  6. 50 FOR ZL=7 TO 15
  7. 60 POKE 781,ZL: SYS 59903
  8. 70 NEXT
  9. 75 GOSUB1100
  10. 80 FOR ZL=7 TO 15
  11. 85 POKE783,PEEK(783)AND254
  12. 90 POKE 781,ZL:POKE782,0:SYS65520
  13. 100 GOSUB1000
  14. 110 NEXT:GOSUB1100
  15. 120 SYS58726
  16. 130 GOTO20
  17. 1000 PRINTTAB(11)"DAS IST EIN TEXT."
  18. 1010 RETURN
  19. 1100 FORT=1TO1000:NEXT:RETURN
  20.