home *** CD-ROM | disk | FTP | other *** search
/ Sverigejakten / sverigejakten.iso / SUCCESS.DIR / 00009_Script_9 < prev    next >
Text File  |  2003-08-12  |  583b  |  27 lines
  1. on exitFrame
  2.   global animation_script
  3.   global movie_time
  4.   global crimeno
  5.   global level
  6.   set crimes=crimeno
  7.   
  8.   puppetsprite 10,1
  9.   
  10.   set temp_time=(movie_time)
  11.   
  12.   set hours = (temp_time/60)
  13.   set minutes=abs(temp_time-(hours*60))
  14.   
  15.   set temp_value=(crimes*2)+hours+(6*(3-level))
  16.   set points=((10-crimes)*350) + (4000-movie_time)
  17.   set title=4
  18.   if temp_value<38 then set title=3
  19.   if temp_value<20 then set title=2
  20.   if temp_value<11 then set title=1
  21.   
  22.   
  23.   set animation_script="10,,police01,sucess3" &title
  24.   lipsync
  25.   puppetsprite 10,0
  26. end 
  27.