VCD Film, Television & An…on Creation Encyclopedia/mycd.iso/Direct5/DATA.Z/NEWSCORE.DIR/00004.ls

Text File | 1996-03-15 | 764 b | 31 lines

on mouseDown
  puppetSprite(2, 1)
  set the member of sprite 2 to member 3
  updateStage()
end

on mouseUp
  set the member of sprite 2 to member 2
  puppetSprite(2, 0)
  go(10)
  beginRecording()
  set the frameLabel to "Start"
  set the frameScript to member 8
  repeat with counter = 13 to 20
    set the member of sprite 6 to member counter
    set the member of sprite 1 to member 1
    set the member of sprite 3 to member 10
    set the member of sprite 4 to member 11
    set the member of sprite 5 to member 12
    repeat with i = 3 to 6
      set the locV of sprite i to 200
      set the locH of sprite i to 200
    end repeat
    if counter = 20 then
      set the frameScript to member 7
    end if
    updateFrame()
  end repeat
  endRecording()
end