home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC Gamer 2000 January
/
CD-Gamer_2000-01_04_cd.bin
/
games
/
phoenix.exe
/
Tactics
/
Dogfight
/
FighterProtect.tac
< prev
next >
Wrap
Text File
|
1999-08-06
|
312b
|
17 lines
A: FIGHTER;FIGHTER2
B: FIGHTER;TURRET;BOMBER;CARRIER;FIGHTER2;EMPLACEMENT
Protect(B)
Start(A)
Set Priority(A,2)
Do(Random[A,4])
If(RandomIs[A,0]): EscortAbove(AB)
If(RandomIs[A,1]): EscortLeft(AB)
If(RandomIs[A,2]): EscortRight(AB)
If(RandomIs[A,3]): EscortBelow(AB)
Label(Adone)
Goto(Adone)