\b;Programy poslané z Houstonu
Následující program vyvinuli naši inženýři.

Slouží k řízení \l;mobilního štítu\u object\botshld;, aby jezdil za \l;fázovým dělem\u object\botphaz; a chránil ho.
\c;
\s;extern void object::FollowPhazer()
\s;{
\s;	\l;object\u cbot\type;    item;              // informace o fazovem delu
\s;	\l;point\u cbot\type;     dest;              // misto, kam jet
\s;	\l;float\u cbot\type;     dist;              // vzdalenost k fazovemu delu
\s;	
\s;	item = \l;radar\u cbot\radar;(\l;PhazerShooter\u cbot\category;);
\s;	\l;if\u cbot\if; ( item == null )
\s;	{
\s;		\l;message\u cbot\message;("No phazer found");
\s;		\l;return\u cbot\return;;                  // ukoncit program
\s;	}
\s;	\l;shield\u cbot\shield;(1, 25);               // zapnout stit
\s;	
\s;	\l;while\u cbot\while; ( true )               // opakovat stale dokola
\s;	{
\s;		item = \l;radar\u cbot\radar;(PhazerShooter);// najit fazove delo
\s;		\l;if\u cbot\if; ( item == null )  break;
\s;		
\s;		dist = \l;distance\u cbot\dist;(item.position, position);
\s;		\l;if\u cbot\if; ( dist < 5 )
\s;		{                        // pokud je delo blize nez 5m
\s;			\l;wait\u cbot\wait;(1);             // cekat
\s;		}
\s;		\l;else\u cbot\if;                     // jinak:
\s;		{ // Vypocitat bod 5m od fazoveho dela
\s;			dest.x = (item.position.x-position.x)*((dist-5)/dist)+position.x;
\s;			dest.y = (item.position.y-position.y)*((dist-5)/dist)+position.y;
\s;			dest.z = (item.position.z-position.z)*((dist-5)/dist)+position.z;
\s;			\l;goto\u cbot\goto;(dest, 0, 1, 1); // a dojet tam
\s;		}
\s;	}
\s;}
\n;
\b;Archivy
Seznam programů poslaných pro předchozí mise:

o  \c;\l;ServiceTower1\u programs/8_ServiceTower1;\n;
o  \c;\l;CollectTitanium3\u programs/7_CollectTitanium3;\n;
o  \c;\l;KillAnt1\u programs/6_KillAnt1;\n;
o  \c;\l;CollectTitanium2\u programs/5_CollectTitanium2;\n;
o  \c;\l;CollectTitanium1\u programs/4_CollectTitanium1;\n;
o  \c;\l;Recharge2\u programs/3_Recharge2;\n;
o  \c;\l;Recharge1\u programs/2_Recharge1;\n;
o  \c;\l;SwitchCell1\u programs/1_SwitchCell1;\n;
