home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 1997 September / Personal_Computer_World_Sep_97.iso / Democd1 / videointro.dxr / 00009.ls < prev    next >
Encoding:
Text File  |  1997-06-04  |  388 b   |  24 lines
  1. global Hdrive, gMovie
  2.  
  3. on mouseUp
  4.   if the frame <> 18 then
  5.     go(the frame + 1)
  6.   else
  7.     set the exitLock to 0
  8.     cursor(-1)
  9.     set gMovie to Hdrive & "mainmen"
  10.     go("select", gMovie)
  11.   end if
  12. end
  13.  
  14. on keyDown
  15.   if the frame <> 18 then
  16.     go(the frame + 1)
  17.   else
  18.     set the exitLock to 0
  19.     cursor(-1)
  20.     set gMovie to Hdrive & "mainmen"
  21.     go("select", gMovie)
  22.   end if
  23. end
  24.