10 PRINT"[147][205]ASCHINENPROGRAMME DYNAMISCH GESPEICHERT";
20 DATA160,255,169,116,162,228,133,176,134,177,200,177,176,240,5,32,210
21 DATA255,208,246,96
30 A$="":FORI=1TO21:READA:A$=A$+CHR$(A):NEXT
40 N1=65:S1=0:N2=0:S2=128:GOSUB2000
50 SYS(PEEK(AD+1)+256*PEEK(AD+2))
60 PRINT"DYNAMISCH AUFGERUFEN"
999 END
2000 POKE180,N1ORS1:POKE181,N2ORS2
2010 POKE69,PEEK(180):POKE70,PEEK(181):SYS45287
2020 AD=PEEK(780)+256*PEEK(782)
2030 RETURN