colobot-data/help/P/mlvolca1.txt

62 lines
2.7 KiB
Plaintext

\b;Programy przysłane z Houston
Ponieważ w tej misji potrzebne będzie mnóstwo tytanu, po raz kolejny usprawniliśmy program \c;CollectTitanium\n;. Gromadzi on całą serię kostek tytanu na wolnej powierzchni, więc możesz mu już pozwolić pracować zupełnie samodzielnie. Ładuje on również swoje ogniwo elektryczne w \l;stacji energetycznej\u object\station; jeśli jest to konieczne.
\c;
\s;extern void object::CollectTitanium3()
\s;{
\s; // 1) Deklaracje zmiennych.
\s; \l;object\u cbot\type; item; // informacja o obiekcie
\s;
\s; \l;while\u cbot\while; (true) // informacja o obiekcie
\s; {
\s;
\s; // 2) Idź do rudy tytanu i podnieś ją
\s; item = \l;radar\u cbot\radar;(\l;TitaniumOre\u cbot\category;);// znajdź rudę tytanu
\s; \l;goto\u cbot\goto;(item.position); // idź do pozycji
\s; \l;grab\u cbot\grab;(); // podnieś porcję rudy
\s;
\s; // 3) Idź do huty i zostaw rudę
\s; item = \l;radar\u cbot\radar;(\l;Converter\u cbot\category;); // znajdź hutę
\s; \l;goto\u cbot\goto;(item.position); // idź do pozycji
\s; \l;drop\u cbot\drop;(); // zostaw rudę
\s; \l;move\u cbot\move;(-2.5); // cofnij się o 2,5 m
\s;
\s; // 4) Poczekaj na przetopienie rudy i zabierz tytan
\s; \l;do\u cbot\do;
\s; {
\s; \l;wait\u cbot\wait;(1); // poczekaj na kostkę tytanu
\s; item = \l;radar\u cbot\radar;(\l;Titanium\u cbot\category;, 0, 45, 0, 5);
\s; }
\s; \l;while\u cbot\while; ( item == null );
\s; \l;goto\u cbot\goto;(item.position);
\s; \l;grab\u cbot\grab;(); // weź ją
\s;
\s; // 5) Idź do wolnego miejsca i zostaw ją
\s; \l;goto\u cbot\goto;(\l;space\u cbot\space;(position)); // idź do wolnego miejsca
\s; \l;drop\u cbot\drop;(); // zostaw tytan
\s;
\s; // 6) Naładuj ogniwo elektryczne, jeśli jest w połowie zużyte
\s; \l;if\u cbot\if; ( energyCell.energyLevel < 0.5 )
\s; { // jeśli tak:
\s; item = \l;radar\u cbot\radar;(\l;PowerStation\u cbot\category;);
\s; \l;if\u cbot\if; ( item != null ) // czy znaleziono stację
\s; {
\s; \l;goto\u cbot\goto;(item.position); // idź tam
\s; \l;while\u cbot\while; ( energyCell.energyLevel < 1 )
\s; { // do czasu naładowania:
\s; \l;wait\u cbot\wait;(1); // czekaj
\s; }
\s; }
\s; }
\s; }
\s;}
\n;
\b;Archiwum
Lista programów przysłanych w poprzednich misjach:
o \c;\l;KillAnt1\u mlsaari2;\n;
o \c;\l;CollectTitanium2\u mlcrys2;\n;
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;