home *** CD-ROM | disk | FTP | other *** search
/ PC Welt 2001 December (Bonus) / HAWKING.ISO / 06.DIR / 00172.ls < prev    next >
Encoding:
Text File  |  1995-04-03  |  576 b   |  21 lines
  1. on mouseDown
  2.   global gDestNumber
  3.   set lCastName to the name of cast the castNum of sprite the clickOn
  4.   if lCastName contains gDestNumber then
  5.     exit
  6.   end if
  7.   puppetSprite(28, 0)
  8.   set the movieTime of sprite 2 to 0
  9.   set the movieRate of sprite 2 to 0
  10.   set lCastNum to the castNum of sprite 2
  11.   set the castNum of sprite 2 to the number of cast "BlankS.MOV"
  12.   updateStage()
  13.   puppetSprite(2, 0)
  14.   set gDestNumber to string(the clickOn - 6)
  15.   puppetSprite(15, 0)
  16.   TurnOffRollovers()
  17.   TurnOffMovies()
  18.   set lFrame to "Dest" && string(the clickOn - 6)
  19.   go(lFrame)
  20. end
  21.