10 REM          DEMO
20 REM           BY
30 REM    STEFAN LANDFRIED
40 REM    KELHEIMERSTR. 9
50 REM    8421 PAINTEN
70 REM
72 IFA=1THEN90
74 PRINT"[147] ANDERE FARBEN (Y/N) ?"
75 GETA$:IFA$=""THEN75
76 IFA$="Y"THEN190
80 IFA=0THENA=1:LOAD"ALLEY. SIM.",8,1
90 SYS49152,130,2,8,0:
100 REM IN ZEILE 10 ((8*10)+50)
110 REM ZIEMLICH SCHNELL UND ALLE BALKEN
120 PRINT"[144][147]"
130 PRINT"      THIS IS ONLY A LITTLE DEMO           "
140 GETA$:IFA$=""THEN140
150 GOTO150
160 REM       FARBENTAUSCH
170 REM
180 REM
190 FORI=49278TO49308:READA:POKEI,A:NEXT:GOTO90
200 DATA11,12,15,15,15,1,12,11,4,6,6,14,,1,14,14,6: REM 16 FARBEN
210 DATA4,2,2,10,1,10,10,2,5,13,3,3,3,1,13,5: REM INSGESAMT 32 FARBEN
220 REM IN DEN DATAZEILEN KOENNEN DIE GEWUENSCHTEN FARBEN EINGETRAGEN WERDEN
230 REM END