'
'  © JM. :: Hecho en Ronda
'
'
'  Procedente de...        es.geocities.com/jm00092
'
'______________________________________________________________________
'                                                                 TUNEL
SCREEN 12
DO
   FOR nn = 0 TO 99
      FOR n = 2 TO 352 STEP 100
         CIRCLE (320, 240), n + nn, 15
         CIRCLE (320, 240), n + nn - 1, 0
      NEXT
   NEXT
LOOP WHILE INKEY$ = ""