home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer 2000 January / CD-Gamer_2000-01_04_cd.bin / games / phoenix.exe / Tactics / Manouevres / FlyToFaceQuick.man < prev    next >
Text File  |  1999-01-11  |  230b  |  13 lines
  1. // A=me, B=target
  2. Fly(B.POS+A.ANG*[0,0,-5000])
  3. Aim(B.POS)
  4. Label(GetThere)
  5. If(SIZE A.POS-B.POS<8000): Goto (StopAndFace)
  6. Goto(GetThere)
  7.  
  8. Label(StopAndFace)
  9. Fly(B.POS+A.ANG*[0,0,-5000])
  10. Aim(B.POS)
  11. Label(done)
  12. Goto(done)
  13.