39 lines
1.8 KiB
Plaintext
39 lines
1.8 KiB
Plaintext
\b;Programs dispatched by Houston
|
|
Below is one of the programs that has been developed by our engineers.
|
|
An upgrade on the previous program: the \l;grabber\u object\botgr;, on its way back from the converter, makes a stop, if necessary, at the \l;power station\u object\station; to recharge its power cell.
|
|
|
|
This program also works on \l;winged grabbers\u object\botgj;, if the \l;derrick\u object\derrick; is on another island than the \l;converter\u object\convert;.
|
|
\c;
|
|
\s;extern void object::CollectTitanium2()
|
|
\s;{
|
|
\s; // 1) Variable definition.
|
|
\s; \l;object\u cbot\type; item; // info. about objects
|
|
\s;
|
|
\s; // 2) Go to the titanium ore and grab it.
|
|
\s; item = \l;radar\u cbot\radar;(\l;TitaniumOre\u cbot\category;);// look for titanium ore
|
|
\s; \l;goto\u cbot\goto;(item.position); // go to the position
|
|
\s; \l;grab\u cbot\grab;(); // grab the titanium
|
|
\s;
|
|
\s; // 3) Go to the converter and drop it.
|
|
\s; item = \l;radar\u cbot\radar;(\l;Converter\u cbot\category;); // look for converter
|
|
\s; \l;goto\u cbot\goto;(item.position); // go to the position
|
|
\s; \l;drop\u cbot\drop;(); // drop the titanium
|
|
\s; \l;move\u cbot\move;(-2.5); // step back 2.5 m
|
|
\s;
|
|
\s; // 4) If power cell half empty, recharges.
|
|
\s; if ( energyCell.energyLevel < 0.5 )
|
|
\s; { // if so:
|
|
\s; item = \l;radar\u cbot\radar;(\l;PowerStation\u cbot\category;); // look for station
|
|
\s; \l;goto\u cbot\goto;(item.position); // go there
|
|
\s; \l;wait\u cbot\wait;(5); // wait
|
|
\s; }
|
|
\s;}
|
|
\n;
|
|
\b;Archives
|
|
Index of the programs dispatched in former missions:
|
|
|
|
o \c;\l;CollectTitanium1\u mlcrys1;\n;
|
|
o \c;\l;Recharge2\u mltropi3;\n;
|
|
o \c;\l;Recharge1\u mllune4;\n;
|
|
o \c;\l;SwitchCell1\u mllune1;\n;
|