[jedrus113]

Jeśli przylecicie na jakąś nieznaną planete, to przed zużyciem cennej kostki tytanu na budowe radar,u możecie użyć tego programu do sprawdzenia czy na planecie są jakieś wrogie formy życia.

Kod:

int Compte(int cat) //cat - kategoria { int i, total; object p; total = 0; for ( i=0 ; i<10000 ; i++ ) { p = retobject(i); if ( p == null ) break; if ( p.category == cat ) total ++; } return total; } extern void object::Radar3() { message("Na planecie jest:"); if(radar(AlienQueen) != null) { int liczbakroli=Compte(AlienQueen); message(Compte(AlienQueen)+"Krolowych obcych"); } if(radar(AlienEgg) != null) { int liczbajaj=Compte(AlienEgg); message(Compte(AlienEgg)+" jaj obcych"); } if(radar(AlienAnt) != null) { int lczbamrowek=Compte(AlienAnt); message(Compte(AlienAnt)+" mrowek"); } if(radar(AlienSpider) != null) { int lczbapajakow=Compte(AlienSpider); message(Compte(AlienSpider)+" pajakow"); } if(radar(AlienWasp) != null) { int lczbaos=Compte(AlienWasp); message(Compte(AlienWasp)+" os"); } if(radar(AlienWorm) != null) { int lczbarobali=Compte(AlienWorm); message(Compte(AlienWorm)+" robakow"); } }

//Jest to ostateczna wersja tego programu (Błąd z osami poprawiony) nieda się go już chyba ulepszyć.

---

Radar.txt Radar4,3

Pobierz Plik ściągnięto 59 raz(y) 1,01 KB

[adiblol]

Jesli chcesz sprawdzić ile jest owadów to Poczytaj o funkcji retobject.

[jedrus113]

Wielkie Dzięki adiblol bez ciebie bym se niedał rady (ale mogłeś napisać co to jest retobject).

[adiblol]

Piszę z komórki więc mi się nie chciało. Błąd jest przy osach.

[Bartek c++]

ProgramPrzyda się w misjach ściągniętych z neta

[pipok]

[pipok]

Ech! nieupilnowane copy&paste...
Przepraszam

Kod:

extern void object::Radar3() {   int ileObcych;   message("Na planecie jest:");   ileObcych=Compte(AlienQueen);   if (ileObcych!=0)   { message(ileObcych)+" Krolowych obcych");  }   ileObcych=Compte(AlienEgg);   if (ileObcych!=0)   { message(ileObcych)+" jaj obcych");  } [...]

[jedrus113]

Nienawidze was !!
Ale bede miał nauczke na przyszłość "NIGDY NIE PISZ ŻE LEPIEJ BYĆ NIE MOŻE BO ZAWSZE ZNAJDZIE SIE KTOŚ KTO ZNAJDZIE SPOSÓB AŻEBY TO ULEPSZYĆ!!"
Echch..
Radar4.0

Kod:

int Compte(int cat) //cat - kategoria { int i, total; object p; total = 0; for ( i=0 ; i<10000 ; i++ ) { p = retobject(i); if ( p == null ) break; if ( p.category == cat ) total ++; } return total; } extern void object::Radar4() { int ileObcych; message("Na planecie jest:"); ileObcych=Compte(AlienQueen); if (ileObcych!=0) message((ileObcych)+" Krolowych obcych"); ileObcych=Compte(AlienEgg); if (ileObcych!=0) message((ileObcych)+" jaj obcych"); ileObcych=Compte(AlienAnt); if (ileObcych!=0) message((ileObcych)+" mrowek"); ileObcych=Compte(AlienSpider); if (ileObcych!=0) message((ileObcych)+" pajakow"); ileObcych=Compte(AlienWasp); if (ileObcych!=0) message((ileObcych)+" os"); ileObcych=Compte(AlienWorm); if (ileObcych!=0) message((ileObcych)+" robakow"); }

[jedrus113]

Sie nawet przezwas zalogować nie zdążyłem..
Można by prosić jakiegoś kogoś ze uprawnieniami o kasacje tego posta wyżej? Napiszę drugi ładniejszy..

[shoter]

do tego mozna funkcje wykorzystac
ileObcych=Compte(AlienQueen);
if (ileObcych!=0) message((ileObcych)+" Krolowych obcych");

void(int cat,string zdanie)
{
int ile = Compte(AlienQueen);
if(ile !=0) message((ile) + zdanie);

}

[adiblol]

Uważaj jedrus z tym 'nienawidzę was'. To jest ostatnie ostrzeżenie. Później dostaniesz WARNA!!!

[jedrus113]

[shoter]

[adiblol]

Nie terroryzuję tylko Jedrus jest dziecinny i trzeba go ukarać

[ Dodano: 08-07-2009, 16:39 ]
Jedrus, nienawidzisz nas za to że jesteśmy lepsi od ciebie czy jak?

[Schocker]

Plus, to, co pisał Pipok, było sugestią, a nie rozkazem. @Jedrus: Mogłeś ulepszyć program, nie musiałeś... Nikt Cię tu do tego nie zmuszał.
@Adiblol: Wg. mnie jeszcze jeden post, pokazujący jego dziecinność i warn. Póki co jeden.
// Schocker, masz zapewnione uprawnienia moderatora! Tylko będę musiał skonsultować z Abadonem -adiblol
// o.O Miło... ^^ Bardzo. Tyle mi się udało sklecić. Dzięki! ^^ -Schocker