Seeker/Seeker.iso/files_w/5balls.dir/00041.ls

Text File | 1994-12-05 | 570 b | 22 lines

on exitFrame
  global moveend, check, d, x, y, lh, lv, ballrect, holeout, h12, v12
  puppetSound(0)
  set the floatPrecision to 4
  set moveend to 0
  set check to [[0, 0, 0, 0, 0], [0, 0, 0, 0, 0], [0, 0, 0, 0, 0], [0, 0, 0, 0, 0], [0, 0, 0, 0, 0]]
  set d to [0, 0, 0, 0, 0]
  set x to [0, 0, 0, 0, 0]
  set y to [0, 0, 0, 0, 0]
  set lh to []
  set lv to []
  set ballrect to [[], [], [], [], []]
  set holeout to []
  set h12 to 0
  set v12 to 0
  repeat with i = 8 to 12
    puppetSprite(i, 1)
    set the constraint of sprite i to 1
    getPos(i)
  end repeat
end