Source Code
10 CLS
20 PRINT "()***********()"
30 PRINT "** **"
40 PRINT "** (O) (O) **"
50 PRINT "** **"
60 PRINT "** V **"
70 PRINT "** **"
80 PRINT "** --- **"
90 FOR X=1 TO 10
95 NEXT X
100 CLS
110 PRINT "()***********()"
120 PRINT "** **"
130 PRINT "** (O) (-) **"
140 PRINT "** **"
150 PRINT "** V **"
160 PRINT "** **"
170 PRINT "** O **"
180 FOR X=1 TO 10
185 NEXT X
190 CLS
200 PRINT "()***********()"
210 PRINT "** **"
220 PRINT "** (O) (O) **"
230 PRINT "** **"
240 PRINT "** V **"
250 PRINT "** **"
260 PRINT "** O **"
270 FOR X=1 TO 10
275 NEXT X
280 GOTO 10
290 SAVE "1018%0"
300 RUN
