SAIL - Skrzynie

Tematy zbędne, ale zbyt dobre by je usunąć znajdują się tutaj.
ph3nom
Veteran
Posty: 286
Rejestracja: Št Aug 03, 2006 2:17 pm
Bydlisko: Europe

SAIL - Skrzynie

Príspevok autor: ph3nom »

Jak zrobić aby skrzynie spadały w losowych miejscach przez całą grę? 8)
Naposledy upravil/-a Shaman v Ut Apr 17, 2007 3:07 pm, upravené celkom 1 krát.
Obrázok
Používateľov profilový obrázok
NNPlaya
Community Veteran
Community Veteran
Posty: 372
Rejestracja: So Okt 14, 2006 4:52 pm
Bydlisko: Tuszyn, Polska
Kontakt:

Príspevok autor: NNPlaya »

Zastosuj jakąś pętle, albo mój patent (trochę bez sensu) ale działa:

Kód: Vybrať všetko

export x;

STARTING
Begin
x=1;
end;

Every 0$1 trigger x=1 do
Begin
enable;
Wait(0$20);   //zamiast dwadzieścia wpisz liczbę w sekundach między zrzutami.
CreateCratesAnywhere(5,true); //zamiast 5 wpisz liczbę skrzyń przy jednym zrzucie, lub jeśli chcesz, by ilość skrzyń była losowa, wpisz CreateCratesAnywhere(Rand(1,5),true);
end;
Naposledy upravil/-a NNPlaya v Ut Okt 31, 2006 4:32 pm, upravené celkom 1 krát.
ph3nom
Veteran
Posty: 286
Rejestracja: Št Aug 03, 2006 2:17 pm
Bydlisko: Europe

Príspevok autor: ph3nom »

Dzięki, jesteś wielki! :)
Obrázok
Radzio
Site Administrator
Site Administrator
Poland
Posty: 2898
Rejestracja: Pi Júl 28, 2006 10:58 am
Bydlisko: Bialystok, Poland

Príspevok autor: Radzio »

sorka, ze sie wtracam ale wydaje mis sie ze twoj kod nie jest zbyt wydajny, czyz nie lepiej byloby uzyc:

Kód: Vybrať všetko

every 0$XX do
CreateCratesAnywhere(1,true);
gdzie za XX mozna wstapic dowolna wartosc w sekundach co jaka mialyby sie pojawiac, a zamiast 1 oczywiscie wratosc skrzynek (lub losowo)
Používateľov profilový obrázok
YuriStriatov
Site Administrator
Site Administrator
Cuba
Posty: 1395
Rejestracja: Pi Feb 17, 2006 3:02 am
Kontakt:

Príspevok autor: YuriStriatov »

W teorii ten kod powinien po 20 sekundach zrzucac paczke co sekunde, chyba ze Wait() dziala opoznia tez wykonanie petli. Wtedy nie ma roznicy czy tak czy tak, tyle ze twoja metoda kod jest czytelniejszy i to wszystko.
Obrázok
Používateľov profilový obrázok
NNPlaya
Community Veteran
Community Veteran
Posty: 372
Rejestracja: So Okt 14, 2006 4:52 pm
Bydlisko: Tuszyn, Polska
Kontakt:

Príspevok autor: NNPlaya »

Szczerze mówiąc to ten kod faktycznie zrzuca paczkę co sekundę. Już dawno temu bawiłem się w robienie zrzutów co x sekund. Myślę, że kod radzia będzie działał poprawnie. Tylko po every 0$XX do powinno być chyba

Kód: Vybrať všetko

Begin
CreateCratesAnywhere(Rand(0,5),true);  
end;
Radzio
Site Administrator
Site Administrator
Poland
Posty: 2898
Rejestracja: Pi Júl 28, 2006 10:58 am
Bydlisko: Bialystok, Poland

Príspevok autor: Radzio »

ten kod twoj (NNPlaya) co 1 sekunde czeka 20 sekund i zrzuca skrzynie wiec po 20 sekundach zacznie zrzucac skrzynie masowo (tzn. podana wartosc co kazda sekunde), oprocz tego moj kod nie musi wczytywac do pamieci zmiennej x, co jest wogole zbedne chyba ze chcialbys kiedys zablokowac every, ale mozesz do tego uzyc komendy disable 8)
Používateľov profilový obrázok
DMblack
Soldier level 0
Soldier level 0
Posty: 9
Rejestracja: Ne Dec 24, 2006 1:22 pm

Príspevok autor: DMblack »

to wkoncu jak najlepiej wpisac zeby te skrzynki zlatywaly co 10 sekund??

albo jakąs pętle jak zrobic
Používateľov profilový obrázok
NNPlaya
Community Veteran
Community Veteran
Posty: 372
Rejestracja: So Okt 14, 2006 4:52 pm
Bydlisko: Tuszyn, Polska
Kontakt:

Príspevok autor: NNPlaya »

Kód: Vybrať všetko

every 0$10 do
Begin
enable;
CreateCratesAnywhere(5,true); //5 to liczba skrzyń, true oznacza, że przy zrzucie nastąpi materializacja
end;
Používateľov profilový obrázok
Folkner
Community Veteran
Community Veteran
Posty: 118
Rejestracja: Pi Nov 17, 2006 1:48 pm

Príspevok autor: Folkner »

Ten wyżej to cały kod? bo mi niedziala ;/
.
Radzio
Site Administrator
Site Administrator
Poland
Posty: 2898
Rejestracja: Pi Júl 28, 2006 10:58 am
Bydlisko: Bialystok, Poland

Príspevok autor: Radzio »

to caly kod i powinien dzialac
Používateľov profilový obrázok
NNPlaya
Community Veteran
Community Veteran
Posty: 372
Rejestracja: So Okt 14, 2006 4:52 pm
Bydlisko: Tuszyn, Polska
Kontakt:

Príspevok autor: NNPlaya »

Jeszcze przed tym daj coś takiego:

Kód: Vybrať všetko

Starting
Begin
end;
I będzie działać
Používateľov profilový obrázok
Folkner
Community Veteran
Community Veteran
Posty: 118
Rejestracja: Pi Nov 17, 2006 1:48 pm

Príspevok autor: Folkner »

Dopisałem ale 10 sekund po rozpoczeciu gry spada 1 skrzynka i koniec wiecej dostaw niema :/
.
Radzio
Site Administrator
Site Administrator
Poland
Posty: 2898
Rejestracja: Pi Júl 28, 2006 10:58 am
Bydlisko: Bialystok, Poland

Príspevok autor: Radzio »

to zamien ten caly kod na:

Kód: Vybrať všetko

starting
begin
end;
every 0$10 do
begin
CreateCratesAnywhere(5,true);
enable;
end;
Používateľov profilový obrázok
NNPlaya
Community Veteran
Community Veteran
Posty: 372
Rejestracja: So Okt 14, 2006 4:52 pm
Bydlisko: Tuszyn, Polska
Kontakt:

Príspevok autor: NNPlaya »

Jest jakaś różnica Radzio, czy enable; napisane jest po CreateCrates czy przed?
Zablokowany