'
'  © JM. :: Hecho en Ronda
'
'
'  Procedente de...        es.geocities.com/jm00092
'
'______________________________________________________________________
'                 >>>ESPERAR A QUE TERMINE<<<
SCREEN 12
PALETTE 12, 63
y = 16
FOR x = 0 TO 5
   y = y / 2
   FOR n = 0 TO 640 / y
      LINE (n, 0)-(n * y, 479), 12
      LINE (640 - n, 0)-(640 - (n * y), 479), 10
      LINE (n, 479)-(n * y, 0), 14
      LINE (640 - n, 479)-(640 - (n * y), 0), 9
   NEXT
NEXT