home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today - The Disc! 22 / cdrt22.iso / pc / bugbook / map.dir / 00254_Script_254 < prev    next >
Text File  |  1995-06-26  |  567b  |  25 lines
  1. on exitFrame
  2.   global lastMapRandom,bugEscape
  3. --  if bugEscape = 1 then checkTimeEscape()
  4.   repeat with x=1 to 5
  5.     if rollOver(x+23) then
  6.       set the timeOutScript to EMPTY
  7.       put x into lastMapRandom
  8.       go (lastMapRandom&".Roll")
  9.       abort
  10.     end if
  11.   end repeat
  12.   
  13.   
  14.   if the timer >1*60 then 
  15.     put random(5) into tempRandom
  16.     repeat while tempRandom=lastMapRandom
  17.       put random(5) into tempRandom
  18.     end repeat
  19.     put tempRandom into lastMapRandom
  20.     go (tempRandom&".Scene")
  21.   else
  22.     go marker(0)
  23.   end if
  24.   
  25. end