home *** CD-ROM | disk | FTP | other *** search
/ Car Screensaver - Toyota / TOYOTA.iso / mjparty / vivi_ex.exe / vivi_ex.DXR / 00047.ls < prev    next >
Encoding:
Text File  |  1996-05-13  |  883 b   |  45 lines
  1. on mouseUp
  2.   global gmode
  3.   set num to the clickOn
  4.   puppetSound(3, 100)
  5.   cursor(200)
  6.   set the cursor of sprite 41 to 0
  7.   set the cursor of sprite 42 to 0
  8.   if num = 42 then
  9.     set the castNum of sprite num to 236
  10.     closew(num)
  11.     go("m")
  12.   else
  13.     if gmode < 22 then
  14.       sound stop 1
  15.       set the castNum of sprite num to 233
  16.       closew(num)
  17.       go("pl")
  18.     else
  19.       set the castNum of sprite num to gmode + 212
  20.       closew(num)
  21.       if gmode = 22 then
  22.         go("22")
  23.       else
  24.         sound stop 1
  25.         puppetSprite(48, 0)
  26.         go("qu")
  27.       end if
  28.     end if
  29.   end if
  30. end
  31.  
  32. on closew num
  33.   global gmode
  34.   updateStage()
  35.   set the castNum of sprite num to 231
  36.   repeat while soundBusy(3)
  37.     nothing()
  38.   end repeat
  39.   puppetSound(3, 94)
  40.   set the castNum of sprite gmode to 191
  41.   puppetSprite(gmode, 0)
  42.   puppetTransition(15, 1, 4, 1)
  43.   updateStage()
  44. end
  45.