1 PRINT" [147] ":POKE53280,0:POKE53281,0
2 FORA=1TO100
3 FORX=1TO24:POKE54272+X,0:NEXT
4 S=54272
5 POKES+24,15:POKES+6,240:POKES+4,17
6 FORA=1TO30
7 FORX=1TO255STEP25
8 POKES+1,X:NEXTX:NEXTA:POKES+4,32
10 V=53248 :REM BASISADRESSE DES VIC
11 POKE V+21,28
12 POKE 2042,13: POKE 2043,13: POKE 2044,13
20 FORN=0TO62:READQ:POKE832+N,Q:NEXT
25 POKE V+23,12: POKE V+29,12
26 FORY=1TO5
30 FORX=1TO255STEP.5
40 POKEV+4,X:REM NEUE X-KOORDINATE
45 POKE V+6,X
48 POKE V+8,X
50 POKEV+5,X:REM NEUE Y-KOORDINATE
55 POKE V+7,255-X
58 POKE V+9,100
60 NEXTX
70 RESTORE:NEXTY:POKE53269,0
75 PRINT"  UND NUN :  T I G E R - B A S I C !"
76 PRINT""
80 PRINT"LOAD";CHR$(34);"TIGER-BASIC";CHR$(34);",8[145][145][145]"
90 POKE631,13:POKE632,82:POKE633,85
100 POKE634,78:POKE635,13:POKE198,5:END
200 DATA0,127,0,1,247,192,3,235,224,3,235,224
210 DATA7,221,240,7,221,240,7,128,240,3,190,224
220 DATA3,127,96,3,255,224,2,255,160,1,127,64
230 DATA1,62,64,0,156,128,0,156,128,0,73,0,0,73,0,0
240 DATA62,0,0,62,0,0,62,0,0,28,0