[Schocker]

Pierwszy program, na który miałem jakiś pomysł. Dzisiaj postaram się go usprawnić, ale coś mi się dzieje z kompem... Przydało by się go poprawić, był testowany dosłownie chwilę. Może się komuś przyda... Ah, jak zwykle za bardzo się rozpisuję...

Kod:

extern void object::RechargeCell() {     point  start;              object ogni;            object elek;         start = position;              elek = radar(PowerStation);     ogni = radar(PowerCell);         goto(ogni.position);     grab(InFront);         if (ogni.energyLevel < 1 )     {         goto(elek.position);                }         else     {         drop(InFront);         goto(start);         message("Najblizsze ogniwo jest juz naladowane!", DisplayWarning);     }         while (ogni.energyLevel < 1 )     {         wait(1);     }         if (ogni.energyLevel == 1 )     {         goto(start);         message("Ładowanie zakończone!", DisplayInfo);     } }

[adiblol]

"grab();" daj między "if (ogni.energyLevel < 1 ) { " i "goto(elek.position);". I po "message("Najblizsze ogniwo jest juz naladowane!", DisplayWarning);" daj "return;", to się program zakończy.

[Schocker]

Ah, mój błąd. Właśnie o tym m.in. mówiłem.

Version 2.0! xD

Kod:

extern void object::RechargeCell2() {     point  start;              object cell;                object item;     object odgr;         start = position;              item = radar(PowerStation);     cell = radar(PowerCell);         if( item == null )     {         odgr = radar(PowerCaptor);     }     if ( odgr == null )     {         message("Nie znaleziono elektrowni ani odgromnika!", DisplayError);                 return;     }     else     {                         if (cell.energyLevel < 1 )         {             goto(cell.position);             grab(InFront);             goto(item.position);                    }                 else         {             goto(start);             message("Najblizsze ogniwo jest juz naladowane!", DisplayWarning);     return;         }                 while (cell.energyLevel < 1 )         {             wait(1);         }                 if (cell.energyLevel == 1 )         {             goto(start);             message("Ładowanie zakończone!", DisplayInfo);         }     } }

1) Przy pisaniu programu używam raczej nazw angielskich, jakoś tak się przyzwyczaiłem.
2) Teraz, najpierw szuka Elektrowni, gdy nie znajdzie jej, szuka Odgromnika. W wypadku braku i tego, wyświetla wiadomość i kończy program.
3) Ah, jeśli wszystkie ogniwa w pobliżu są naładowane, robot już nie "idzie" do żadnego, tylko po prostu pokręci się przez parę sekund, wyświetli wiadomość i zatrzyma program.

[Korniszon]

[Schocker]