5 PRINT"[147]ENDE MIT (RESTORE)"
10 INIT
20 OBJ 4,3
40 PSET 0,0,-60,0
50 PSET 1,0,0,0
60 PSET 2,0,60,0
70 PSET 3,0,0,60
80 PSET 4,60,60,0
90 LSET 0,0,1
100 LSET 1,1,2
110 LSET 2,2,4
120 LSET 3,1,3
130 MODSET 1,0,0
140 DELSET .3,0,0
150 DWSET -19,-35
160 VIDEO 1,0,0
164 PRINT"            (TASTE = ANFANG)"
165 GETA$:IFA$=""THEN165
170 DREH