sindro
-
Постов
34 -
Зарегистрирован
-
Посещение
-
Победитель дней
1
Сообщения, опубликованные sindro
-
-
-
вообще не кого не варпает,,,сидим в пронте эвент начался и все тишина как сидели так и сидим,,,
-
Ребят помогите в общем такая вот проблема запускаю Эвент регистрируюсь,Пишет осталось 5 минут потом 3 2 и тг после истечение времени не варпает на пвп локу где и должен проходить пвп эвент ,
вот скрипт
itemmall,172,81,4 script PvP 761,{
if(getgmlevel() > 59){
if(($pvpboistart == 1) || ($naborpvp == 1)){
mes "^C600FF[Event]PvP^000000";
mes "Остановить эвент?";
switch(select("Да:Нет:Продолжить")){
case 1:
announce "[Event]PvP: Битва была остановленна Администратором.",0,0xFF7E00;
set $players,0;
set $AllPrize,0;
pvpoff "pvp_2v2";
disablenpc "[Event]PvP";
set $naborpvp, 0;
set $pvpboistart,0;
mapwarp "guild_vs1","Prontera",49,48;
stopnpctimer;
end;
close;
case 2:
close;
case 3:
break;
}
}
mes "^C600FF[Event]PvP^000000";
mes "В чем сделать ставку?";
switch(select("Лут:Передумал:Варпнуться на эвент")){
case 1:
lootpvp:
mes "Введи id вещи, какой лут будет выставлен на ставку.";
mes "0 - Выход";
input $@lootpvp;
if($@lootpvp == 0) close;
if(getitemname($@lootpvp)=="null"){
mes "Вы не правильно ввели id вещи";
next;
goto lootpvp;
}
stavkapvp:
mes "Количество?";
input $@stavkapvp;
if($@stavkapvp < 1){
mes "Ставка должна быть больше 0";
next;
goto stavkapvp;
}
else if($@stavkapvp > 5000){
mes "Ставка должна быть не больше 5000";
next;
goto stavkapvp;
}
kolpvp:
mes "Введи максимальное количество человек, которые смогут участвовать в эвенте.";
input $@kolpvp;
if($@kolpvp < 2){
mes "Количество человек должно быть не меньше 2";
next;
goto kolpvp;
}
disablenpc "[Event]PvP";
set $players,1;
set $AllPrize,0;
set $naborpvp, 0;
set $pvpboistart,0;
set $@name$, getitemname($@lootpvp);
donpcevent "[Event]announ::onstart";
close;
case 2:
close;;
case 3:
warp "guild_vs1",49,48;
close2;
}
}
mes "^C600FF[Event]PvP^000000";
mes "Я тут просто стою...";
close2;
}
- script [Event]announ -1,{
OnInit:
disablenpc "[Event]PvP";
disablenpc "[Event]PvP Prize";
end;
onstart:
disablenpc "[Event]PvP Prize";
set $pvpboistart,0;
pvpoff "pvp_2v2";
mapwarp "pvp_2v2","Prontera",153,123;
sleep 500;
announce "[Event]PvP: Открыт набор на PvP Битву. До начала - 2 - минуты",0,0xFF7E00;
enablenpc "[Event]PvP";
set $naborpvp,1;
sleep 500;
announce "[Event]PvP: Стоимость участия: ["+$@stavkapvp+" "+$@name$+"], Максимальное количество воинов: "+$@kolpvp+".",0,0xFF7E00;
sleep 59000;
announce "[Event]PvP: До начала Битвы осталась - 1 - минута",0,0xFF7E00;
sleep 50000;
announce "[Event]PvP: До начала Битвы осталось - 10 - секунд.",0,0xFF7E00;
sleep 5000;
announce "[Event]PvP: До начала Битвы осталось - 5 - секунд.",0,0xFF7E00;
sleep 3000;
announce "[Event]PvP: До начала Битвы осталось - 4 - секунды.",0,0xFF7E00;
sleep 1000;
announce "[Event]PvP: До начала Битвы осталось - 3 - секунды.",0,0xFF7E00;
sleep 1000;
announce "[Event]PvP: До начала Битвы осталось - 2 - секунды.",0,0xFF7E00;
sleep 1000;
announce "[Event]PvP: До начала Битвы осталось - 1 - секунда.",0,0xFF7E00;
sleep 1000;
set $naborpvp,0;
disablenpc "[Event]PvP";
announce "[Event]PvP: Набор закрыт!",bc_blue;
sleep 5000;
mapannounce "pvp_2v2","[Event]PvP: До включёния PvP режима - 5 - секунд.",0,0xFF7E00;
sleep 1000;
mapannounce "pvp_2v2","[Event]PvP: До включёния PvP режима - 4 - секунды.",0,0xFF7E00;
sleep 1000;
mapannounce "pvp_2v2","[Event]PvP: До включёния PvP режима - 3 - секунды.",0,0xFF7E00;
sleep 1000;
mapannounce "pvp_2v2","[Event]PvP: До включёния PvP режима - 2 - секунды.",0,0xFF7E00;
sleep 1000;
mapannounce "pvp_2v2","[Event]PvP: До включёния PvP режима - 1 - секунда.",0,0xFF7E00;
sleep 1000;
mapannounce "pvp_2v2","[Event]PvP: Мочи ВСЕХ!!!!",0,0xFF7E00;
pvpon "pvp_2v2";
initnpctimer;
end;
OnTimer10:
if((getmapusers("pvp_2v2") == 0) || (getmapusers("pvp_2v2") == 1 && $pvpboistart == 0)){
announce "[Event]PvP: Битва отменена,так как мало народу или все погибли!",0,0xFF7E00;
pvpoff "pvp_2v2";
set $pvpboistart,0;
mapwarp "pvp_2v2","Prontera",153,123;
stopnpctimer;
end;
}
else if(getmapusers("pvp_2v2") > 1){
set $pvpboistart,1;
initnpctimer;
end;
}
else if (getmapusers("pvp_2v2") == 1 && $pvpboistart == 1){
pvpoff "pvp_2v2";
mapannounce "pvp_2v2","[Event]PvP: Поздравляю, Вы выиграли, подойдите пожалуйста к [Event]PvP Prize.",0,0xFF7E00;
enablenpc "[Event]PvP Prize";
set $pvpboistart,0;
set $naborpvp,0;
stopnpctimer;
end;
}
OnPCKillEvent:
getmapxy .@mapboy$,.@x,.@y,0;
if(.@mapboy$ == "pvp_2v2"){
attachrid(killedrid);
announce "[Event]PvP: "+rid2name(killerrid)+", жесточайше избил игрока "+strcharinfo(0)+" и отправил его на кафру.",0,0xFF7E00;
set @vhodpvp,0;
sc_end SC_ALL;
percentheal 100,100;
sleep2 1;
warp "SavePoint",0,0;
dispbottom "[Event]PvP: Тебя убил "+rid2name(killerrid)+"...";
sleep2 500;
if((getmapusers("pvp_2v2") == 1) && ($@pvpboistart == 1)){
mapannounce "pvp_2v2","[Event]PvP: Поздравляю, Вы выиграли, подойдите пожалуйста к [Event]PvP Prize.",0,0xFF7E00;
set @vhodpvp,0;
set $pvpboistart,0;
pvpoff "pvp_2v2";
stopnpctimer;
sleep2 250;
enablenpc "[Event]PvP Prize";
end;
}
end;
}
}
prontera,173,175,5 script [Event]PvP 761,{
mes "^C600FF[Event]PvP^000000";
if(BaseLevel < 250){
mes "Твой уровень слишком мал, минимум 250.";
close;
}
if(@vhodpvp == 1){
mes "Ты уже зарегестрирован.";
close;
}
if(($pvpboistart == 1) && ($naborpvp == 0)){
mes "Бой уже идёт, ждите начала нового раунда";
close;
}
if(($pvpboistart == 0) && ($naborpvp == 0)){
mes "Битва сейчас не идёт или места закончились.";
close;
}
if(($pvpboistart == 0) && ($naborpvp == 1) && (@vhodpvp == 0)){
mes "Хочешь сделать ставку?";
mes "Ставка: ^FF0000"+$@stavkapvp+" "+$@name$+"^000000";
menu "Да хочу",reg,"Нет, я передумал",pvp_no;
reg:
if(countitem($@lootpvp) < $@stavkapvp){
mes "^C600FF[Event]PvP^000000";
mes "Ставка: ^FF0000"+$@stavkapvp+" "+getitemname($@lootpvp)+"^000000";
close;
}
if(($players < $@kolpvp) && ($naborpvp == 1)){
set $players, $players + 1;
set $AllPrize, $AllPrize + $@stavkapvp;
set @vhodpvp,1;
delitem $@lootpvp,$@stavkapvp;
announce "[Event]PvP: Игрок ["+strcharinfo(0)+"] зарегестрировался на PvP Битву.",0,0xFF7E00;
sleep2 1;
warp "pvp_2v2",50,45;
close;
}
if(($players == $@kolpvp) && ($naborpvp == 1)){
set $players, $players + 1;
set $AllPrize, $AllPrize + $@stavkapvp;
delitem $@lootpvp,$@stavkapvp;
set @vhodpvp,1;
set $naborpvp,0;
announce "[Event]PvP: Игрок ["+strcharinfo(0)+"] зарегестрировался на PvP Битву.",0,0xFF7E00;
sleep2 1;
warp "pvp_2v2",50,45;
sleep2 100;
announce "[Event]PvP: Кол-во бойцов набрано. Ожидайте начала Битвы.",0,0xFF7E00;
close;
}
if(($players > $@kolpvp) && ($naborpvp == 0)){
mes "Ты опоздал, места закончились.";
close;
}
pvp_no:
mes "Удачи...";
close;
}
mes "Ждите начала эвента";
close;
OnInit:
waitingroom "[ PvP War ]",0;
end;
}
guild_vs1,54,32,4 script [Event]PvP Prize 906,{
if (sex == 1) {
announce "[Event]PvP: Игрок "+strcharinfo(0)+" победил в PvP Битве и получил: "+$AllPrize+" "+$@name$,0,0xFF7E00;
}
else {
announce "[Event]PvP: Игрок "+strcharinfo(0)+" победила в PvP Битве и получила: "+$AllPrize+" "+$@name$,0,0xFF7E00;
}
pvpoff "pvp_2v2";
set @vhodpvp,0;
getitem $@lootpvp,$AllPrize;
set #CASHPOINTS, #CASHPOINTS + rand(10,30);
dispbottom "У Вас "+#CASHPOINTS+" Cash Points.";
warp "SavePoint",0,0;
sleep2 250;
disablenpc "[Event]PvP Prize";
end;
}
-
да есть
-
это чтоб в интернете зарабатывать?
-
Я за Русских,Украинцы предатели в нынешние время...вспомнить 08.08.2008 северную осетию...Где Украинцы Были наемниками у Грузии
-
Нужен человек кто сможет сделать афину+клиент и поставить на хост,деньгами не богат,ну и не бесплатно...в скайп Sindrouz или в icq 655693739
- 1
- 1
-
и так куплю евенты скрипты и тп не дорого и не за бесплатно моя аська 655693739 или скайп sindrouz все предложение туда по поводу скриптов
- 5
-
Нужен чел кто сможет сделать хороший сайт-форум и не дорого для Ро мой скайп sindrouz
- 3
-
Ув Знатоки...возник вопрос как сделать так чтоб простые игроки могли кидать пати кто в премиум ааке
а то при кидание пати пишит Your GM level doesn't authorize you to preform this action on the specified player
подскажите где поправить зарание благодарю
- 3
-
-
спасибо
- 2
-
от пустили человека
-
Вобщем то хотелось узнать Где лежит нпс который вытаскивает карты и как его поставить
-
а поточнее? Англ не знаю
- 2
-
Уважаемый народ...Подскажите пожалуйста как сделать чтоб админы меньше 99 лвл гма,не кидали дил не выкидывали напол шмот...
знаю что в папке gm надо изминить что-то а вот что и где незнаю...зарание спасибо
- 1
-
открываеться хост какойто перезалейте
-
Не появляеться в конце Нпс Киса чтоб взять падарок сидит в инвизе что не так помагите поправить...
//---Время, когда эвент будет начинаться.---//
- script taro_main -1,{
OnClock0500:
OnClock1100:
OnClock1700:
OnClock2300:
//---Аннонс Эвента + проверки.---//
announce "[Tarot Card of Fate] Объявляется набор на эвент! ( Время на регистрацию 5 минут )",0;
sleep 120000;
enablenpc "Карта Таро";
end;
}
- script OnInitTaro -1,{
OnInit:
disablenpc "Киса#2";
disablenpc "Карта Таро";
end;
}
//---Выигрыш.---//
guild_vs1,52,52,5 script Киса#2 876,{
if (sex == 1) { // Мальчик.
announce "[Tarot Card of Fate] Победитель эвента "+ strcharinfo(0) +"! Поздравляем его!",0;
}
else { // Остальные (девочка).
announce "[Tarot Card of Fate] Победительница эвента "+ strcharinfo(0) +"! Поздравляем её!",0;
};
getitem 7227,1; // Можно поставить свой приз.
warp "prontera",156,178;
sleep2 25000;
disablenpc "Киса#2";
end;
}
//---Регистрация на Эвент.---//
prontera,139,170,6 script Карта Таро 735,{
if($@RR_RR_RR==2){
mes "Игра уже идёт.";
close;
}
if($@RR_RR_Nu>=120){
mes "На эвенте больше нет мест.";
close;
}
if (select("[Зарегистрироваться]:[Выйти]") == 2) { close; }
set $@RR_RR_Na$[set($@RR_RR_Nu,$@RR_RR_Nu+1)],strcharinfo(0);
mes "Спасибо за регистрацию. Ожидайте начала эвента.";
if($@RR_RR_Nu>=2&&!$@RR_RR_RR){
set $@RR_RR_RR,1;
doevent "Карта Таро::OnRRRRRR";
}
close;
OnRRRRRR:
announce "[Tarot Card of Fate] В комнате эвентов появился NPC 'Карта Таро'.",bc_all;
sleep 120000;
for(set .rr,1;.rr<=$@RR_RR_Nu;set .rr,.rr+1){
if(!isloggedin(getcharid(3,$@RR_RR_Na$[.rr]))){
for(set .rr2,.rr;.rr2<=$@RR_RR_Nu;set .rr2,.rr2+1){
set $@RR_RR_Na$[.rr2],$@RR_RR_Na$[.rr2+1];
}
set .rr,.rr-1;
}else{
warpchar "guild_vs3",50,50,getcharid(0,$@RR_RR_Na$[.rr]);
set .rr4,.rr4+1;
}
}
set $@RR_RR_Nu,.rr4;
sleep 1000;
mapannounce "guild_vs3","[Tarot Card of Fate] Эвент начнётся через 20 секунд!",bc_map;
sleep 20000;
set $@RR_RR_RR,2;
mapannounce "guild_vs3","[Tarot Card of Fate] Начнём эвент!",bc_map;
sleep 1000;
while(getmapusers("guild_vs3")!=1){
sleep 500;
for(set .rr,1;.rr<=$@RR_RR_Nu;set .rr,.rr+1){
sleep 500;
if(attachrid(getcharid(3,$@RR_RR_Na$[.rr]))){
if(strcharinfo(3)=="guild_vs3"){
set .@ui,522+rand(1,14);
atcommand "@effect "+.@ui;
if(.@ui==531){
deletearray $@RR_RR_Na$[.rr],1;
sleep2 500;
warp "SavePoint",0,0;
}
}
detachrid;
}
}
}
sleep 3000;
mapwarp "guild_vs3","guild_vs1",50,50;
deletearray $@RR_RR_Na$[0],128;
enablenpc "Киса#2";
set $@RR_RR_RR,0;
set $@RR_RR_Nu,0;
sleep 3000;
disablenpc "Киса#2";
disablenpc "Карта Таро";
end;
}
скинте правельный плз
-
все вопрос решил тему можно закрывать
-
Уважаемые помогите взял линукс дебиан установил все по инструкции и вот что вышла? Что это может быть? Кто правильно подскажет от благодарю денюшкой
мое подозрение что у хоста закрыты порты?
-
Как видно сидишь через роутер. А там порты сами собой не открываються. Открой порты на свой локальный ип тсп и юдп
не подскажите как открыть эти порты
-
подробно обьясните как что сделать куда залесть я нуб
-
Вобщем собрал сервер собрался открыть дома для друзей ну и кто хотел бы поиграть,
прописал свои айпишники инетовские
в rAthena\conf\char_athena.conf
// Login Server IP
// The character server connects to the login server using this IP address.
// NOTE: This is useful when you are running behind a firewall or are on
// a machine with multiple interfaces.
//login_ip: мой ип инет
// Character Server IP
// The IP address which clients will use to connect.
// Set this to what your server's public IP address is.
//char_ip: мой ип инет
map_athena.conf
// Character Server IP
// The map server connects to the character server using this IP address.
// NOTE: This is useful when you are running behind a firewall or are on
// a machine with multiple interfaces.
//char_ip: мой ип инет
и
// Map Server IP
// The IP address which clients will use to connect.
// Set this to what your server's public IP address is.
//map_ip: мой ип инет
Пробывал уберать слеши где айпи пишиться вот такая вот ошибка выходит
- 1
-
Клиент+Эмуль
в Запросы
Опубликовано
Break Надёжный проверяемый качественный