home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today (UK) 9 / cdromtoday9-coverdisc.bin / pplanes / p17_20 / 00270_Script_270 < prev    next >
Text File  |  1994-08-25  |  295b  |  15 lines
  1. --init plane 18
  2. on exitFrame
  3.   global Plane, NumSteps, Step
  4.   global ReturnMovie
  5.   set ReturnMovie = "P17-20"
  6.   
  7.   set Plane = 18
  8.   set NumSteps = 21
  9.   set Step = 1
  10.   
  11.   set the text of field "NumLevels" = string(NumSteps)
  12.   global theGauge
  13.   mSetNumLevels(theGauge, NumSteps)
  14. end
  15.