home *** CD-ROM | disk | FTP | other *** search
/ Creative Review 34 / Creative-Review-CD-ROM-34.iso / pc / jkd / folio / scripts.cst / 00014_Script_CreateMenu < prev    next >
Text File  |  1998-01-26  |  1KB  |  35 lines
  1. on mouseEnter
  2.   global toolBar
  3.   set the member of sprite (the buttonSprite of the mainButton of toolBar) to member (the OverMember of the mainButton of toolBar) of castLib "Buttons"
  4.   updateStage
  5. end
  6.  
  7. on mouseDown
  8.   global toolBar
  9.   global mainButton
  10.   set the member of sprite (the buttonSprite of the mainButton of toolBar) to member (the downMember of the mainButton of toolBar) of castLib "Buttons"
  11.   set menu1 = new(script"ToolBar DropDown Parent Script",["folio","profile","ib","help"],50,the toolLoc of toolBar,["folio","profile","ib","help"])
  12.   updateStage
  13.   repeat while the mouseDown
  14.     rollOverOption menu1
  15.     updateStage
  16.   end repeat
  17.   closeMenu menu1
  18.   updateStage
  19.   if (the chosenOption of menu1 <> 0) then
  20.     actionMenu menu1
  21.   end if
  22.   updateStage
  23.   if rollOver(the buttonSprite of the mainButton of toolBar) then
  24.     set the member of sprite (the buttonSprite of the mainButton of toolBar) to member (the overMember of the mainButton of toolBar) of castLib "Buttons"
  25.   else
  26.     set the member of sprite (the buttonSprite of the mainButton of toolBar) to member (the normalMember of the mainButton of toolBar) of castLib "Buttons"
  27.   end if
  28.   updateStage
  29. end
  30.  
  31. on mouseLeave
  32.   global toolBar
  33.   set the member of sprite (the buttonSprite of the mainButton of toolBar) to member (the normalMember of the mainButton of toolBar) of castLib "Buttons"
  34.   updateStage
  35. end