home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today - The Disc! 8 / cdrt08.iso / mac / PaperPlanes / Demo / 00037_Script_37 < prev    next >
Text File  |  1994-12-12  |  186b  |  8 lines
  1. -- init u.i.
  2. on exitFrame
  3.   global theGauge
  4.   
  5.   set theSlider = the number of cast "SliderDrag"
  6.   set theGauge = birth(script "FuelGauge", 20, 21, theSlider, "CurrentLevel")
  7. end
  8.