home *** CD-ROM | disk | FTP | other *** search
/ ftp.team17.com 2014 / 2014.05.ftp.team17.com.tar / ftp.team17.com / pub / t17 / demos / pc / PhoenixDemo_De.exe / Tactics / Mission1 / MISSION1GOTOMINER.tac next >
Text File  |  1998-11-18  |  1KB  |  63 lines

  1. // A is Beck, B is Tom, C is Reggie.
  2.  
  3. A: CANTPICK
  4. B: CANTPICK
  5. C: CANTPICK
  6.  
  7. Start(A)
  8.  
  9. Label(Adone)
  10. Goto(Adone)
  11. Start(B)
  12.  
  13. Label(MakeProgress)
  14. FlyToFace(BC)
  15. Label(MakingProgress)
  16. // If Beck lags behind, stop and wait for him, then go back for him.
  17. If(Closer[A,C,B]): Goto(Catch_Beck_up)
  18. If(Distant[A,B,15000]): Goto(Beck_lagging_behind)
  19. Goto(MakingProgress)
  20.  
  21. Label(Beck_lagging_behind)
  22. // wait for a few seconds, then go back.
  23. Do(Random[B,4])
  24. If(RandomIs[B,0]): Timer(B,3000)
  25. If(RandomIs[B,1]): Timer(B,3500)
  26. If(RandomIs[B,2]): Timer(B,4000)
  27. If(RandomIs[B,3]): Timer(B,4500)
  28. Message(COME ON THEN)
  29. StopAndFire(BA)
  30. Label(Wait_for_Beck)
  31. If(Closer[A,C,B]): Goto(Catch_Beck_up)
  32. If(CloseTogether[A,B,8000]): Goto(MakeProgress)
  33. If(Timer[B]): Goto(Wait_for_Beck)
  34. // Go back for Beck.
  35. FlyToFace(BA)
  36. Label(GO_BACK)
  37. If(Distant[A,B,8000]): Goto(GO_BACK)
  38. Message(COME ON THEN)
  39. // wait for a few seconds, then carry on.
  40. Do(Random[B,4])
  41. If(RandomIs[B,0]): Timer(B,1000)
  42. If(RandomIs[B,1]): Timer(B,1500)
  43. If(RandomIs[B,2]): Timer(B,2000)
  44. If(RandomIs[B,3]): Timer(B,2500)
  45. Message(COME ON THEN)
  46. StopAndFire(BA)
  47. Label(Wait_for_Beck_2)
  48. If(Closer[A,C,B]): Goto(Catch_Beck_up)
  49. If(Timer[B]): Goto(Wait_for_Beck_2)
  50. Goto(MakeProgress)
  51.  
  52. Label(Catch_Beck_up)
  53. FlyToFaceQuick(BC)
  54. If(Closer[A,C,B]): Goto(Catch_Beck_up)
  55. Goto(MakeProgress)
  56.  
  57. Label(Bdone)
  58. Goto(Bdone)
  59.  
  60. Start(C)
  61.  
  62. Label(Cdone)
  63. Goto(Cdone)