home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer 2000 January / CD-Gamer_2000-01_04_cd.bin / games / phoenix.exe / Tactics / Dogfight / 2on2Fighter.tac < prev    next >
Encoding:
Text File  |  1999-09-15  |  1.4 KB  |  68 lines
  1. A: FIGHTER
  2. B: FIGHTER
  3.  
  4. // C is the role class for BOTH targets
  5. C: FIGHTER;FIGHTER2;EMPLACEMENT
  6.  
  7. Link: A,A
  8. Link: B,B
  9. Link: C,C
  10. Link: D,C
  11.  
  12. Targets(C)
  13.  
  14. Start(A)
  15.  
  16. Set Priority(A,5)
  17.  
  18. // Are we together?
  19. If(CloseTogether[A,B,20000]): Goto(AB_TOGETHER)
  20.     // squad completely split.
  21.     If(CloseTogether[C,D,20000]): Goto(GET_TOGETHER)
  22.         If(Closer[C,A,D]): Goto(A_TAKE_C)
  23.             //Tactic Message({A}:{}ILL TAKE ONE,{B},{}YOU TAKE THE OTHER.)
  24.             Split(AD,1on1Fighter)
  25.             Split(BC,1on1Fighter)
  26.             Goto(Adone)
  27.  
  28.             Label(A_TAKE_C)
  29.             //Tactic Message({A}:{}ILL TAKE ONE,{B},{}YOU TAKE THE OTHER.)
  30.             Split(AC,1on1Fighter)
  31.             Split(BD,1on1Fighter)
  32.             Goto(Adone)
  33.  
  34.         Label(GET_TOGETHER)
  35.         //Tactic Message({A}:{}FORM UP ON MY WING,{B})
  36.         Split(ABCD,2on2FighterGetTogether)
  37.         Goto(Adone)
  38.  
  39.     Label(AB_TOGETHER)
  40.     If(CloseTogether[C,D,20000]): Goto(AB_TOG_CD_TOG)
  41.         If(Closer[C,A,D]): Goto(AB_TAKE_C)
  42.             //Tactic Message({A}:{}WELL BOTH TAKE THE CLOSEST ONE.)
  43.             Split(ABD,2on1Fighter)
  44.             Goto(Adone)
  45.  
  46.             Label(AB_TAKE_C)
  47.             //Tactic Message({A}:{}WELL BOTH TAKE THE CLOSEST ONE.)
  48.             Split(ABC,2on1Fighter)
  49.             Goto(Adone)
  50.  
  51.         Label(AB_TOG_CD_TOG)
  52.         //Tactic Message({A}:{}ILL TAKE ONE,{B},{}YOU TAKE THE OTHER.)
  53.         Split(AD,1on1Fighter)
  54.         Split(BC,1on1Fighter)
  55.         Goto(Adone)
  56.  
  57. Label(Adone)
  58. Goto(Adone)
  59.  
  60. Start(B)
  61. Set Priority(B,5)
  62.  
  63. Label(Bdone)
  64. Goto(Bdone)
  65.  
  66. Start(C)
  67. Label(Cdone)
  68. Goto(Cdone)