home *** CD-ROM | disk | FTP | other *** search
/ Sverigejakten / sverigejakten.iso / SUCCESS.DIR / 00018_Script_18 < prev    next >
Text File  |  2003-08-12  |  309b  |  13 lines
  1. on exitFrame
  2.   set exit=0
  3.   set temp_mousedown=the mousedown
  4.   set temp_ticks=the ticks
  5.   repeat while temp_ticks>the ticks-30
  6.   end repeat
  7.   
  8.   repeat while exit=0
  9.     if the mousedown=1 then set temp_mousedown=1
  10.     if temp_mousedown>the mousedown then set exit=1
  11.   end repeat
  12.   go to "list"
  13. end