home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 69 / 64er_Magazin_Sonderheft_69_19xx_Markt__Technik_de_Side_B.d64 / fehlermeldungen (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1990-01-01  |  292 b   |  11 lines
  1. 1 rem print-demo3
  2. 2 rem fehlermeldungen des interpreters
  3. 3 rem --------------------------------
  4. 9 z=0:x=0:tb=1:print"[147]"
  5. 10 fori=41374to41757:a$=chr$(peek(i))
  6. 28 ifz=23thenz=0:x=x+1:tb=20*x:poke214,1:poke211,10:sys58640
  7. 29 ifpeek(i)>127thena$=a$+chr$(13):z=z+1
  8. 39 printtab(tb)a$;
  9. 40 next
  10. 50 print""tab(tb)"taste!":poke198,0:wait198,1:end
  11.