'
'  © JM. :: Hecho en Ronda
'
'
'  Procedente de...        es.geocities.com/jm00092
'
'______________________________________________________________________
'                                  
RANDOMIZE TIMER
SCREEN 12

FOR xx = 1 TO 300
   h = INT(RND * 32) * 20
   v = INT(RND * 24) * 20
   IF RND > .5 THEN
      ch = 20
      cv = 0
   ELSE
      ch = 0
      cv = 20
   END IF
   FOR n = 2 TO INT(RND * 10) + 1
      h = h + ch
      v = v + cv
      LINE (h, v)-STEP(18, 18), 15, BF
   NEXT
NEXT
SLEEP