home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today (UK) 9 / cdromtoday9-coverdisc.bin / pplanes / p17_20 / 00045_Script_45 < prev    next >
Text File  |  1994-08-25  |  333b  |  17 lines
  1. on mouseDown
  2.   global theVCRButtons
  3.   mCancelPlay(theVCRButtons)
  4.   mCancelFastFwd(theVCRButtons)
  5.   
  6.   global ToMain
  7.   buttonDown(ToMain, the number of cast "ToMainNorm", the number of cast "ToMainHiLite")
  8. end
  9.  
  10. on mouseUp
  11.   global ToMain
  12.   set test = buttonUp(ToMain)
  13.   if test then
  14.     go to "ExitPlane"
  15.   end if
  16. end
  17.