100 IFA=0THENA=1:LOAD"SPRITES",8,1
110 IFA=1THENA=2:LOAD"SPRITE-MOOVER",8,1
120 PRINT"[147]"CHR$(142);CHR$(8)
130 PO=49190:SYS49152+3
140 POKE PO,255   :REM ZEIT BEWEGUNG
150 POKE PO+01,255:REM ZEIT ANIMATION
160 POKE PO+02,0  :REM ANZAHL PIXEL
170 POKE PO+03,255:REM ZEIT SCROLL
180 POKE PO+04,1  :REM MANUELL
190 POKE PO+05,200:REM ZEIT AUTO
200 POKE PO+08,6  :REM BSCH OBEN
210 POKE PO+09,15 :REM BSCH MITTE
220 POKE PO+10,7  :REM BSCH UNTEN
230 POKE PO+11,6  :REM RAHMEN OBEN
240 POKE PO+12,11 :REM RAHMEN MITTE
250 POKE PO+13,0  :REM RAHMEN UNTEN
260 GOSUB330
270 FORI=255TO0STEP-1:FORJ=1TO20:NEXT:POKEPO+1,I:NEXT
280 POKEPO+4,0:REM AUTO
290 IF PEEK(49207)<=32THEN290
300 POKEPO+4,1:REM MANUELL
310 END
320 :
330 PRINT"[144] [175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175]"
340 PRINT"-  -  -  -  -  -  -  -  -  -  -  -  -  "
350 PRINT"[144][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183]"
360 PRINT"[154]     [209]    [209]  "
370 PRINT"        [209]   "
380 PRINT"[144]":FORB=0TO200STEP7:GOSUB400:NEXT:PRINT""
390 RETURN
400 PRINT"[197][196][198][196][197]";:PRINTSPC(B/10);
410 RETURN