dance = sequence
  b1 = bitmap("squid1.xbm")
  b2 = bitmap("squid2.xbm")
  while (1)
    show b1
    tick
    show b2
    tick
  end
end


moveit = sequence (dx, dy, howfar)
  while (howfar > 0)
    move (dx, dy)
    howfar = howfar - 1
    tick
  end
end



weave = sequence
  while (1)
    call moveit(10, 0, 3)
    call moveit(7, -7, 3)
    call moveit(10, 0, 3)
    call moveit(7, 7, 3)
  end
end

multiweave = sequence
  moveto (-20, screen_height - 80)
  start dance
  start weave
  while (on_screen())
    tick
  end
end




  
manysquids = sequence
  while (1)
    create()
    start multiweave
    ticks (29)
  end
end

start manysquids
while (1)
  tick
end