10 ' Space tunnel 20 ' David Hall 30 ' Amstrad Action 40 MODE 0:INK 0,0:BORDER 0:PEN 1 50 FOR t=1 TO 50:PLOT 320,200:c=1 60 FOR h=1 TO 40:DRAWR 8*COS(t),8*SIN(t),c 70 c=c+1:IF c=16 THEN c=1:NEXT:NEXT 80 NEXT:NEXT 90 WHILE INKEY$="":FOR y=1 TO 15:INK y,20 100 CALL &BD19:INK y,0:NEXT:WEND:INK 1,26