SAIL - Skrzynie

Tematy zbędne, ale zbyt dobre by je usunąć znajdują się tutaj.
ph3nom
Veteran
Příspěvky: 286
Registrován: jeu. août 03, 2006 2:17 pm
Localisation: Europe

SAIL - Skrzynie

Message od ph3nom »

Jak zrobić aby skrzynie spadały w losowych miejscach przez całą grę? 8)
Dernière modification par Shaman le mar. avr. 17, 2007 3:07 pm, modifié 1 fois.
Image
Avatar de l’utilisateur
NNPlaya
Community Veteran
Community Veteran
Příspěvky: 372
Registrován: sam. oct. 14, 2006 4:52 pm
Localisation: Tuszyn, Polska
Kontaktovat uživatele:

Message od NNPlaya »

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

Code : Tout sélectionner

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;
Dernière modification par NNPlaya le mar. oct. 31, 2006 4:32 pm, modifié 1 fois.
ph3nom
Veteran
Příspěvky: 286
Registrován: jeu. août 03, 2006 2:17 pm
Localisation: Europe

Message od ph3nom »

Dzięki, jesteś wielki! :)
Image
Radzio
Site Administrator
Site Administrator
Poland
Příspěvky: 2898
Registrován: ven. juil. 28, 2006 10:58 am
Localisation: Bialystok, Poland

Message od Radzio »

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

Code : Tout sélectionner

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)
Avatar de l’utilisateur
YuriStriatov
Site Administrator
Site Administrator
Cuba
Příspěvky: 1395
Registrován: ven. févr. 17, 2006 3:02 am
Kontaktovat uživatele:

Message od 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.
Image
Avatar de l’utilisateur
NNPlaya
Community Veteran
Community Veteran
Příspěvky: 372
Registrován: sam. oct. 14, 2006 4:52 pm
Localisation: Tuszyn, Polska
Kontaktovat uživatele:

Message od 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

Code : Tout sélectionner

Begin
CreateCratesAnywhere(Rand(0,5),true);  
end;
Radzio
Site Administrator
Site Administrator
Poland
Příspěvky: 2898
Registrován: ven. juil. 28, 2006 10:58 am
Localisation: Bialystok, Poland

Message od 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)
Avatar de l’utilisateur
DMblack
Soldier level 0
Soldier level 0
Příspěvky: 9
Registrován: dim. déc. 24, 2006 1:22 pm

Message od DMblack »

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

albo jakąs pętle jak zrobic
Avatar de l’utilisateur
NNPlaya
Community Veteran
Community Veteran
Příspěvky: 372
Registrován: sam. oct. 14, 2006 4:52 pm
Localisation: Tuszyn, Polska
Kontaktovat uživatele:

Message od NNPlaya »

Code : Tout sélectionner

every 0$10 do
Begin
enable;
CreateCratesAnywhere(5,true); //5 to liczba skrzyń, true oznacza, że przy zrzucie nastąpi materializacja
end;
Avatar de l’utilisateur
Folkner
Community Veteran
Community Veteran
Příspěvky: 118
Registrován: ven. nov. 17, 2006 1:48 pm

Message od Folkner »

Ten wyżej to cały kod? bo mi niedziala ;/
.
Radzio
Site Administrator
Site Administrator
Poland
Příspěvky: 2898
Registrován: ven. juil. 28, 2006 10:58 am
Localisation: Bialystok, Poland

Message od Radzio »

to caly kod i powinien dzialac
Avatar de l’utilisateur
NNPlaya
Community Veteran
Community Veteran
Příspěvky: 372
Registrován: sam. oct. 14, 2006 4:52 pm
Localisation: Tuszyn, Polska
Kontaktovat uživatele:

Message od NNPlaya »

Jeszcze przed tym daj coś takiego:

Code : Tout sélectionner

Starting
Begin
end;
I będzie działać
Avatar de l’utilisateur
Folkner
Community Veteran
Community Veteran
Příspěvky: 118
Registrován: ven. nov. 17, 2006 1:48 pm

Message od Folkner »

Dopisałem ale 10 sekund po rozpoczeciu gry spada 1 skrzynka i koniec wiecej dostaw niema :/
.
Radzio
Site Administrator
Site Administrator
Poland
Příspěvky: 2898
Registrován: ven. juil. 28, 2006 10:58 am
Localisation: Bialystok, Poland

Message od Radzio »

to zamien ten caly kod na:

Code : Tout sélectionner

starting
begin
end;
every 0$10 do
begin
CreateCratesAnywhere(5,true);
enable;
end;
Avatar de l’utilisateur
NNPlaya
Community Veteran
Community Veteran
Příspěvky: 372
Registrován: sam. oct. 14, 2006 4:52 pm
Localisation: Tuszyn, Polska
Kontaktovat uživatele:

Message od NNPlaya »

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