home *** CD-ROM | disk | FTP | other *** search
/ Sverigejakten / sverigejakten.iso / SUCCESS.DIR / 00005_Script_5 < prev    next >
Text File  |  2003-08-12  |  296b  |  12 lines

  1. on exitFrame
  2.   set temp_time=the ticks
  3.   set temp_time2=temp_time
  4.   puppetsound 1, member "brus" of castlib "sound"
  5.   repeat while temp_time>the ticks-40
  6.     repeat while temp_time2>the ticks-4
  7.     end repeat
  8.     updatestage
  9.     set temp_time2=the ticks
  10.   end repeat
  11.   sound stop 1
  12. end