home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer 2000 January / CD-Gamer_2000-01_04_cd.bin / games / phoenix.exe / Tactics / Dogfight / 2on1Fighter.tac < prev    next >
Text File  |  1999-09-20  |  821b  |  48 lines
  1. // A represents roles A and B
  2. A: FIGHTER
  3.  
  4. // B represents role C
  5. B: FIGHTER;FIGHTER2;TURRET;EMPLACEMENT
  6.  
  7. Targets(B)
  8.  
  9. Link: A,A
  10. Link: B,A
  11. Link: C,B
  12.  
  13. Start(A)
  14.  
  15. Set Priority(A,5)
  16.  
  17. // Are we together?
  18. If(CloseTogether[A,B,10000]): Goto(AB_TOGETHER)
  19.     // squad completely split.
  20.     //Tactic Message({A}:{}LETS GET HIM,{B})
  21.     Split(AC,1on1Fighter)
  22.     Split(BC,1on1Fighter)
  23.     Goto(Adone)
  24.  
  25.     Label(AB_TOGETHER)
  26.     Do(Random[A,2])
  27.     If(RandomIs[A,0]): Goto(AB_TOG_FORMATION)
  28.         //Tactic Message({A}:{}LETS GET HIM,{B})
  29.         Split(AC,1on1Fighter)
  30.         Split(BC,1on1Fighter)
  31.         Goto(Adone)
  32.  
  33.         Label(AB_TOG_FORMATION)
  34.         //Tactic Message({A}:{}FOLLOW ME IN,{B})
  35.         Split(ABC,2on1FighterFormation)
  36.         Goto(Adone)
  37.  
  38. Label(Adone)
  39. Goto(Adone)
  40.  
  41. Start(B)
  42.  
  43. Label(Bdone)
  44. Goto(Bdone)
  45.  
  46. Start(C)
  47. Label(Cdone)
  48. Goto(Cdone)