home *** CD-ROM | disk | FTP | other *** search
/ Fun Online 1997 March / FOL0397.ISO / bindata / part2.dxr / Internal_12.ls < prev    next >
Encoding:
Text File  |  1997-04-28  |  272 b   |  15 lines
  1. on mouseUp
  2.   set a to the mouseH
  3.   put a
  4.   if a < 50 then
  5.     set the castNum of sprite 1 to 4
  6.     puppetTransition(12, 2, 40)
  7.     updateStage()
  8.   end if
  9.   if a > 500 then
  10.     set the castNum of sprite 1 to 5
  11.     puppetTransition(11, 2, 40)
  12.     updateStage()
  13.   end if
  14. end
  15.