Oryginalna strona colobot.cba.pl umarła, gdy cba.pl przestało oferować darmowy hosting. To jest statyczny mirror, pobrany w 2018. ~krzys_h
 
Polski Portal COLOBOTa
COLOBOT Polish Portal

Programy - Fabryka ogniw

colobotwymiiata - 14-03-2009, 20:23
Temat postu: Fabryka ogniw
Program służy do produkcji zwykłych ogniw, w zastępstwie budynku. Wystarczy umieścić robota w miejscu oznaczonym znacznikiem energii(zielonu plus[bo w końcu ma działać jak budynek]), odpalić program i położyć przed nim(robotem) kostkę tytanu. Robot niszczy kostki, więc musi być działem(nie dawałem ogranicznika, bo za dużo pisania). Wszystkie informacje(o czasie działania) zaczerpnięte z SatCom'u.
Kod:
extern void object::Fabryka_Ogniw()
{
    aim(0);
    if(radar(PowerSpot,0,360,0,3)==null)
    {
        message("Nie ma znacznika energii!",DisplayError);
        return;
    }
    object q;
    point pos;
    pos.x = position.x + cos(orientation) * 2;
    pos.y = position.y + sin(orientation) * 2;
    while(radar(PowerSpot,0,360,0,3)!=null)
    {
        if(radar(Titanium,0,50,0,5)!=null)
        {
            wait(3);
            if(radar(Titanium,0,50,0,5)!=null)
            {
                q=radar(Titanium,0,50,0,5);
                turn(direction(q.position));
                aim(cel(position,q.position)-pitch -4);
                fire(0.1);
                message("Zaczynam pracę...",DisplayInfo);
                wait(12);
                produce(pos,0,PowerCell,"");
                message("Wytworzono zwykłe ogniwo elektryczne",DisplayInfo);
                aim(0);
            }
        }
    }
}
float cel (point a,point b )
{
    return asin((b.z-a.z)/distance(a,b));
}

Abadon - 14-03-2009, 20:34

He he widzę że robisz colobotwymiiata "konkurencję" w wyścigu robienia coraz bardziej pomysłowych programów bbiidduull'owi. Program bardzo ciekawy, ale można by jeszcze dodać takie coś żeby robot sam się naprowadzał na tą "zieloną pozycję", ale i tak to należą Ci się brawa.

Powered by phpBB modified by Przemo & WRIM © 2003 phpBB Group