home *** CD-ROM | disk | FTP | other *** search
/ Mobiclic 1 / MOBICLIC.ISO / mac / SKEET / TAB.dir / 00015_Script_15 < prev    next >
Text File  |  1997-02-20  |  2KB  |  71 lines
  1. on exitFrame
  2.   global sc,score1,score2,score3,score4,score5,hi
  3.   
  4.   
  5.   if sc>score1 then
  6.     set score5=score4
  7.     set score4=score3
  8.     set score3=score2
  9.     set score2=score1
  10.     set score1=sc
  11.     
  12.     set sc=0
  13.     put field "nom4" into field "nom5"
  14.     put field "nom3" into field "nom4"
  15.     put field "nom2" into field "nom3"
  16.     put field "nom1" into field "nom2"
  17.     
  18.     put "VOTRE NOM !" into field "nom"
  19.   else
  20.     if sc>score2 then
  21.       set score5=score4
  22.       set score4=score3
  23.       set score3=score2
  24.       set score2=sc
  25.       set sc=0
  26.       put field "nom4" into field "nom5"
  27.       put field "nom3" into field "nom4"
  28.       put field "nom2" into field "nom3"
  29.     
  30.       
  31.       put "VOTRE NOM !" into field "nom"
  32.     else
  33.       if sc>score3 then
  34.         set score5=score4
  35.         set score4=score3
  36.         set score3=sc
  37.         set sc=0
  38.         put field "nom4" into field "nom5"
  39.         put field "nom3" into field "nom4"
  40.        
  41.         put "VOTRE NOM !" into field "nom"
  42.       else
  43.         if sc>score4 then
  44.           set score5=score4
  45.           set score4=sc
  46.           set sc=0
  47.           put field "nom4" into field "nom5"
  48.        
  49.           put "VOTRE NOM !" into field "nom"
  50.         else
  51.           if sc>score5 then
  52.             set score5=sc
  53.             set sc=0
  54.            
  55.             put "VOTRE NOM !" into field "nom"
  56.           end if
  57.         end if
  58.       end if
  59.     end if
  60.   end if
  61.   
  62.   put score1 into field "score1"
  63.   put score2 into field "score2"
  64.   put score3 into field "score3"
  65.   put score4 into field "score4"
  66.   put score5 into field "score5"
  67.   set hi=score1
  68.   savemovie"tab.dir"
  69.   go to the frame+1
  70.   
  71. end