1 REM PRINT-DEMO
2 REM DIE BASIC-BEFEHLE IM INTERPRETER
3 REM --------------------------------
9 Z=0:X=0:TB=2:PRINT"[147]"
10 FORI=41118TO41372:A$=CHR$(PEEK(I))
11 IFA$="[163]"THENA$="#"
12 IFA$="[164]"THENA$="$"
13 IFA$="[168]"THENA$="("
14 IFA$="[171]"THENA$="+"
15 IFA$="[173]"THENA$="-"
16 IFA$="[170]"THENA$="*"
17 IFA$="[175]"THENA$="/"
18 IFA$=CHR$(222)THENA$="^"
19 IFA$="[190]"THENA$="<"
20 IFA$="[189]"THENA$="="
21 IFA$="[188]"THENA$=">"
28 IFZ=23THENZ=0:X=X+1:TB=10*X:POKE214,1:POKE211,TB:SYS58640
29 IFPEEK(I)>127THENA$=A$+CHR$(13):Z=Z+1
39 PRINTTAB(TB)A$;
40 NEXT
50 PRINT""TAB(TB)"TASTE!":POKE198,0:WAIT198,1:END