home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today (BR) Volume 2 #9 / CDRTV2N9.iso / progs / vearth / shared.dir / 00581.ls < prev    next >
Encoding:
Text File  |  1996-04-15  |  378 b   |  16 lines
  1. on mouseUp
  2.   set myclick to the clickOn
  3.   puppetSprite(myclick, 1)
  4.   if the mouseH < the locH of sprite the clickOn then
  5.     set the castNum of sprite myclick to 580
  6.     updateStage()
  7.     findBookmark2()
  8.   else
  9.     set the castNum of sprite myclick to 555
  10.     updateStage()
  11.     setBookmark2()
  12.   end if
  13.   set the blend of sprite the clickOn to 100
  14.   puppetSprite(myclick, 0)
  15. end
  16.