SAIL - Skrzynie

Tematy zbędne, ale zbyt dobre by je usunąć znajdują się tutaj.
ph3nom
Veteran
Сообщения: 286
Зарегистрирован: Чт авг 03, 2006 2:17 pm
Откуда: Europe

SAIL - Skrzynie

Сообщение ph3nom »

Jak zrobić aby skrzynie spadały w losowych miejscach przez całą grę? 8)
Последний раз редактировалось Shaman Вт апр 17, 2007 3:07 pm, всего редактировалось 1 раз.
Изображение
Аватара пользователя
NNPlaya
Community Veteran
Community Veteran
Сообщения: 372
Зарегистрирован: Сб окт 14, 2006 4:52 pm
Откуда: Tuszyn, Polska
Контактная информация:

Сообщение NNPlaya »

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

Код: Выделить всё

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;
Последний раз редактировалось NNPlaya Вт окт 31, 2006 4:32 pm, всего редактировалось 1 раз.
ph3nom
Veteran
Сообщения: 286
Зарегистрирован: Чт авг 03, 2006 2:17 pm
Откуда: Europe

Сообщение ph3nom »

Dzięki, jesteś wielki! :)
Изображение
Radzio
Site Administrator
Site Administrator
Poland
Сообщения: 2898
Зарегистрирован: Пт июл 28, 2006 10:58 am
Откуда: Bialystok, Poland

Сообщение Radzio »

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

Код: Выделить всё

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)
Аватара пользователя
YuriStriatov
Site Administrator
Site Administrator
Cuba
Сообщения: 1395
Зарегистрирован: Пт фев 17, 2006 3:02 am
Контактная информация:

Сообщение 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.
Изображение
Аватара пользователя
NNPlaya
Community Veteran
Community Veteran
Сообщения: 372
Зарегистрирован: Сб окт 14, 2006 4:52 pm
Откуда: Tuszyn, Polska
Контактная информация:

Сообщение 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

Код: Выделить всё

Begin
CreateCratesAnywhere(Rand(0,5),true);  
end;
Radzio
Site Administrator
Site Administrator
Poland
Сообщения: 2898
Зарегистрирован: Пт июл 28, 2006 10:58 am
Откуда: Bialystok, Poland

Сообщение 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)
Аватара пользователя
DMblack
Soldier level 0
Soldier level 0
Сообщения: 9
Зарегистрирован: Вс дек 24, 2006 1:22 pm

Сообщение DMblack »

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

albo jakąs pętle jak zrobic
Аватара пользователя
NNPlaya
Community Veteran
Community Veteran
Сообщения: 372
Зарегистрирован: Сб окт 14, 2006 4:52 pm
Откуда: Tuszyn, Polska
Контактная информация:

Сообщение NNPlaya »

Код: Выделить всё

every 0$10 do
Begin
enable;
CreateCratesAnywhere(5,true); //5 to liczba skrzyń, true oznacza, że przy zrzucie nastąpi materializacja
end;
Аватара пользователя
Folkner
Community Veteran
Community Veteran
Сообщения: 118
Зарегистрирован: Пт ноя 17, 2006 1:48 pm

Сообщение Folkner »

Ten wyżej to cały kod? bo mi niedziala ;/
.
Radzio
Site Administrator
Site Administrator
Poland
Сообщения: 2898
Зарегистрирован: Пт июл 28, 2006 10:58 am
Откуда: Bialystok, Poland

Сообщение Radzio »

to caly kod i powinien dzialac
Аватара пользователя
NNPlaya
Community Veteran
Community Veteran
Сообщения: 372
Зарегистрирован: Сб окт 14, 2006 4:52 pm
Откуда: Tuszyn, Polska
Контактная информация:

Сообщение NNPlaya »

Jeszcze przed tym daj coś takiego:

Код: Выделить всё

Starting
Begin
end;
I będzie działać
Аватара пользователя
Folkner
Community Veteran
Community Veteran
Сообщения: 118
Зарегистрирован: Пт ноя 17, 2006 1:48 pm

Сообщение Folkner »

Dopisałem ale 10 sekund po rozpoczeciu gry spada 1 skrzynka i koniec wiecej dostaw niema :/
.
Radzio
Site Administrator
Site Administrator
Poland
Сообщения: 2898
Зарегистрирован: Пт июл 28, 2006 10:58 am
Откуда: Bialystok, Poland

Сообщение Radzio »

to zamien ten caly kod na:

Код: Выделить всё

starting
begin
end;
every 0$10 do
begin
CreateCratesAnywhere(5,true);
enable;
end;
Аватара пользователя
NNPlaya
Community Veteran
Community Veteran
Сообщения: 372
Зарегистрирован: Сб окт 14, 2006 4:52 pm
Откуда: Tuszyn, Polska
Контактная информация:

Сообщение NNPlaya »

Jest jakaś różnica Radzio, czy enable; napisane jest po CreateCrates czy przed?
Закрыто