10 INIT
20 OBJ 7,11
30 FORI=0TO7:READX,Y,Z:PSETI,X,Y,Z:NEXT
40 FORI=0TO11:READA,B:LSETI,A,B:NEXT
50 DATA -90,-90,-90, 90,-90,-90
60 DATA 90,90,-90,   -90,90,-90
70 DATA -90,-90,90,  90,-90,90
80 DATA 90,90,90,    -90,90,90
90 DATA 0,1,1,2,2,3,3,0
100 DATA 0,4,1,5,2,6,3,7
110 DATA 4,5,5,6,6,7,7,4
120 MODSET 0,0,1
130 DWSET-12,-12
140 PERSPSET-500,-170
150 PRINT"[147]BITTE STEUERN SIE MIT JOYSTICK UND":PRINT"TASTATUR"
160 PRINT"ENDE=(RESTORE) ODER BUTTON"
170 PRINT" (TASTE DRUECKEN)
180 [161]A$:[139]A$[178]""[167]180
190 DREH