home *** CD-ROM | disk | FTP | other *** search
/ Creative Review 28 / Creative-Review-CD-ROM-28.iso / pc / kungfu / style.dir / 00024_Script_24 < prev    next >
Text File  |  1997-08-08  |  534b  |  34 lines
  1. global gexitpause
  2.  
  3.  
  4. on exitFrame
  5.   
  6.   if the timer < gexitpause then 
  7.     go the frame
  8.   else
  9.     
  10.     sound stop 1
  11.     set the volume of sound 1 to 255
  12.     
  13.     puppetsound 1,random(7) + 101
  14.     
  15.     if the machinetype = 256 then 
  16.       repeat with a = 1 to 47
  17.         puppetsprite a,true
  18.         set the loch of sprite a to -2000
  19.         
  20.       end repeat
  21.       
  22.       updatestage
  23.       
  24.       go marker (2)
  25.       
  26.       
  27.     else
  28.       hstop
  29.       go marker (1)
  30.     end if
  31.   end if
  32.   
  33.   hupdate
  34. end