home *** CD-ROM | disk | FTP | other *** search
/ Flight + Action / FlightAction.img / mrmore / tonline / 53inter.dir / 00022_Script_22 < prev    next >
Text File  |  1996-04-11  |  526b  |  29 lines

  1. -- Detail-Klick-Script
  2.  
  3. on exitFrame
  4.   global gbAnimFinished
  5.   
  6.   if the mouseDown then
  7.     global gbTeleAuto
  8.     
  9.     if gbTeleAuto then
  10.       EndAutoSequence()
  11.       go to the frame
  12.       exit
  13.     end if
  14.     
  15.     global glThisLevel, gnThisFrame
  16.    
  17.     if gnThisFrame = count(glThisLevel) then 
  18.       GoFrame(GetAt(glThisLevel, 1))
  19.     else
  20.       GoFrame(GetAt(glThisLevel, gnThisFrame + 1))
  21.     end if
  22.   end if
  23.   
  24.   set gbAnimFinished = true
  25.   CheckTeleTime()
  26.   
  27.   cursor 0
  28.   go to the frame
  29. end