home *** CD-ROM | disk | FTP | other *** search
/ PC Home 49 / PC_Home_Issue_49.iso / winprogs / childenc / oecdemo / shared.dir / 00509.ls < prev    next >
Encoding:
Text File  |  1996-07-24  |  618 b   |  25 lines
  1. on mouseDown
  2.   global castData
  3.   if item 1 of castData = "bookmark" then
  4.     set me to the clickOn
  5.     set x to the castNum of sprite me
  6.     set the castNum of sprite me to x + 1
  7.     set the visible of sprite me to 0
  8.     repeat while the mouseDown
  9.       set the visible of sprite me to 1
  10.       updateStage()
  11.     end repeat
  12.     set the visible of sprite me to 0
  13.     set the castNum of sprite me to x
  14.     set the visible of sprite me to 1
  15.     updateStage()
  16.     if rollOver(me) then
  17.       notify(37, 605)
  18.     end if
  19.   else
  20.     if item 1 of castData = "search" then
  21.       managePopMenu(157, 51, 2)
  22.     end if
  23.   end if
  24. end
  25.