0 REM BANANENBAHNHOF
10 S=54272:S2=S+7:S3=S+14:FORT=0TO23:POKES+T,0:NEXT
20 POKE5+S,240:POKE6+S,240:POKE5+S2,96 :POKE6+S2,96 :POKE5+S3,240:POKE6+S3,240
30 POKE4+S,35:POKE4+S2,131:POKE4+S3,67
40 POKE23+S,251:POKE24+S,31:POKES3+3,8
50 POKE1+S,9:POKE1+S2,9:POKE1+S3,9
100 B=155*RND(1)
111 FORT=ATOBSTEPSGN(B-A):POKE22+S,T:POKE15+S,T:NEXT
115 A=155*RND(1)
120 FORT=BTOASTEPSGN(A-B):POKE22+S,T:POKE15+S,T:NEXT
199 GOTO100