Wink

Date: 198x
Type: Program
Platform(s): TS 1000

Appears on

Assembled by Tim Ward from many sources. Contains programs 10176 – 10210.

Gallery

Wink

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 

People

No people associated with this content.

Scroll to Top