home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1988 February / 64er_Magazin_88-02_1988_Markt__Technik_de_Side_A.d64 / super-clear.demo (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1988-01-01  |  183 b   |  8 lines
  1. 10 ifa=0thena=1:load"super-clear",8,1
  2. 20 poke53281,0:input"[152]verzoegerung";ve
  3. 30 print"[147]";:poke53280,rnd(1)*15+1
  4. 40 su=int(rnd(1)*256):s=int(rnd(1)*1000)
  5. 50 sys49152,su,ve,s
  6. 60 gett$:ift$=""then60
  7. 70 ift$<>"e"then30
  8.