100 REM RAMFREE 180 PRINTCHR$(147) 190 FORI=1TO10:PRINT:NEXTI:PRINTSPC(15)"EINEN MOMENT ..." 210 REM DATA-ZEILEN LESEN 220 S=0:FORI=49152TO49255 230 READX:S=S+X:POKEI,X:NEXTI 240 IFS=11235THENGOTO290 250 PRINTCHR$(147) 260 FORI=1TO5:PRINT:NEXTI 270 PRINT"FEHLER IN DATAZEILEN !!!" 280 PRINT:PRINT"DIFFERENZ = "11235-S:END 290 PRINTCHR$(147) 300 FORI=1TO5:PRINT:NEXTI 310 PRINT"BEDIENUNG VON RAMFREE:" 320 PRINT"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]" 340 PRINT:PRINT"EINSCHALTEN: SYS 49152,1 350 [153]"AUSSCHALTEN: SYS 49152,0 355 SYS49152,1:NEW 360 REM ASSEMBLER-PROGRAMM 370 DATA32,253,174,32,158,183,138,208,11,169,131,141,2,3,169,164,141,3,3 380 DATA96,169,31,141,2,3,169,192,141,3,3,96,56,165,55,229,45,170,165,56 390 DATA229,46,133,98,134,99,162,144,56,32,73,188,32,221,189,162,0,160,35 400 DATA189,1,1,240,16,9,128,153,0,4,173,134,2,153,0,216,200,232,76,58,192 410 DATA224,5,208,3,76,131,164,169,32,9,128,153,0,4,173,134,2,153,0,216,200 420 DATA232,76,79,192