home *** CD-ROM | disk | FTP | other *** search
/ C64'er / C64'er.iso / sh6x / sh69b.d64 / basic-befehle (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  505b  |  22 lines
  1. 1 REM PRINT-DEMO
  2. 2 REM DIE BASIC-BEFEHLE IM INTERPRETER
  3. 3 REM --------------------------------
  4. 9 Z=0:X=0:TB=2:PRINT"[147]"
  5. 10 FORI=41118TO41372:A$=CHR$(PEEK(I))
  6. 11 IFA$="[163]"THENA$="#"
  7. 12 IFA$="[164]"THENA$="$"
  8. 13 IFA$="[168]"THENA$="("
  9. 14 IFA$="[171]"THENA$="+"
  10. 15 IFA$="[173]"THENA$="-"
  11. 16 IFA$="[170]"THENA$="*"
  12. 17 IFA$="[175]"THENA$="/"
  13. 18 IFA$=CHR$(222)THENA$="^"
  14. 19 IFA$="[190]"THENA$="<"
  15. 20 IFA$="[189]"THENA$="="
  16. 21 IFA$="[188]"THENA$=">"
  17. 28 IFZ=23THENZ=0:X=X+1:TB=10*X:POKE214,1:POKE211,TB:SYS58640
  18. 29 IFPEEK(I)>127THENA$=A$+CHR$(13):Z=Z+1
  19. 39 PRINTTAB(TB)A$;
  20. 40 NEXT
  21. 50 PRINT""TAB(TB)"TASTE!":POKE198,0:WAIT198,1:END
  22.