home *** CD-ROM | disk | FTP | other *** search
/ Boot Disc 1 / boot-disc-1996-08.iso / bootcd.dir / 00427_Script_427 < prev    next >
Text File  |  1996-07-02  |  936b  |  27 lines
  1. on exitFrame
  2.   --ò Initialize Workbench & Nav Bar Menu
  3.   global gHiliteableButtons,gThisButton,gLastButton
  4.   
  5.   cursor 4
  6.   --Initialize a list which stores names of buttons
  7.   set gThisButton = 0
  8.   set gLastButton = 0
  9.   set gHiliteableButtons = [the number of cast "Workbench Nav Btn",¼
  10.   the number of cast "Workbench Nav Btn Hilited",¼
  11.   the number of cast "Demos Nav Btn",¼
  12.   the number of cast "Demos Nav Btn Hilited",¼
  13.   the number of cast "Bootnet Nav Btn",¼
  14.   the number of cast "Bootnet Nav Btn Hilited",¼
  15.   the number of cast "Features Nav Btn",¼
  16.   the number of cast "Features Nav Btn Hilited",¼
  17.   the number of cast "The Room Nav Btn",¼
  18.   the number of cast "The Room Nav Btn Hilited",¼
  19.   the number of cast "Subscribe Nav Btn",¼
  20.   the number of cast "Subscribe Nav Btn Hilited"]
  21.   
  22.   TurnOnPuppets(30,36)
  23.   puppetSprite 8,TRUE  --Text Frame
  24.   puppetSprite 12,TRUE --Install Button
  25.   
  26.   cursor -1
  27. end