home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today (BR) Volume 2 #9 / CDRTV2N9.iso / progs / vearth / shared.dir / 00581_Script_581 < prev   
Text File  |  1996-04-15  |  411b  |  17 lines
  1. on mouseUp
  2.   -- bookM
  3.   put (the clickOn) into myclick
  4.   puppetsprite myclick, true
  5.  
  6.   if the mouseH < the locH of sprite (the clickOn) then
  7.     set the castnum of sprite myclick to 580
  8.     updatestage
  9.     findBookmark2
  10.   else
  11.     set the castnum of sprite myclick to 555
  12.     updatestage
  13.     setBookmark2
  14.   end if
  15.   set the blend of sprite (the clickOn) to 100
  16.   puppetsprite myclick, false
  17. end