Chip 1997 July/CHIP_CD_1997_07_PL.iso/knowhow/internet/media/files/key.dir/00005.ls

Text File | 1997-03-24 | 648 b | 30 lines

on mouseDown
  puppetSound("k3")
  set variable to the castNum of sprite the clickOn
  set variable to variable + 1
  set the castNum of sprite the clickOn to variable
  updateStage()
  repeat while the stillDown
    set the castNum of sprite the clickOn to variable
    updateStage()
  end repeat
  set variable to variable - 1
  set the castNum of sprite the clickOn to variable
  updateStage()
  if the frame < 41 then
    go("2")
  else
    if the frame < 51 then
      go("4")
    else
      if the frame < 61 then
        go("6")
      else
        if the frame < 66 then
          go("7")
        end if
      end if
    end if
  end if
end