Все о ро.
Вы хотите отреагировать на этот пост ? Создайте аккаунт всего в несколько кликов или войдите на форум.
Все о ро.

Рагнарок онлайн...Создай свой сервер сам.


Вы не подключены. Войдите или зарегистрируйтесь

[Event]Dice

Перейти вниз  Сообщение [Страница 1 из 1]

1[Event]Dice Empty [Event]Dice Сб Май 15, 2010 5:43 am

Admin


Admin

Код:
force_5-1,27,167,4   script   Супер кубик Ивент   71,{
if ( $@KUB != 0 ) goto JU_Ero;
mes "[Супер кубик Ивент]";
mes "Привет!Я провожу ивент с названием:";
mes "...................................";
mes "^0000FF Супер кубик Ивент ^000000";
mes "...................................";
next;
mes "[Супер кубик Ивент]";
mes "Ты хочеш попасть на ивент?";
next;
menu "Да",HK_D,"Нет",HK_N;

HK_D:
mes "[Супер кубик Ивент]";
mes "Хорошо!Щас вы будуте телепортированы в комнату ожыдания";
next;
warp "quiz_00",12,110;
close;

HK_N:
mes "[Супер кубик Ивент]";
mes "Тогда увидимся в следущий раз =)";
close;

JU_Ero:
mes "[Супер кубик Ивент]";
mes "Приходите когда будет набор людей";
close;
}


-   script   Event_Kubik   -1,{
OnClock1318:
OnInit:
callfunc "Walk_Off";
disablenpc "Виходимс";
set $@KUB,1;
end;
OnMinute00:
killmonsterall "quiz_00";
set $@KUB,0;
announce "Начался набор людей на Супер кубик Ивент !",0;
sleep 15000;
announce "Продолжается набор людей на Супер кубик Ивент.Через 3 мин начало ивента !",0;
sleep 60000;
announce "Продолжается набор людей на Супер кубик Ивент.Через 2 мин начало ивента !",0;
sleep 60000;
announce "Продолжается набор людей на Супер кубик Ивент.Через 1 мин начало ивента !",0;
sleep 30000;
announce "Набор людей на Супер кубик Ивент закончен !",0;
if ( getareausers("quiz_00",10,131,27,100) == 1 ) goto L_LMF;
set $@KUB,1;
areaannounce "quiz_00",4,131,27,100,"До начала выкидывания кубика осталось 30 секунд.Просим занять места на кубиках с цифрами !",0;
sleep 28000;
areaannounce "quiz_00",4,131,27,100,"Приготовились !!!",0;
sleep 2000;
callfunc "Main_function1";
end;
L_LMF:
announce "Ивент Супер кубик отменяется,ибо на ивент пришел только 1 игрок !",0;
sleep 5000;
areawarp "quiz_00",4,125,27,100,"prontera",155,177;
end;
}


function   script   Main_function2   {
if ( getareausers("quiz_00",10,131,27,100) == 0 ) {
announce "Конец Ивента Супер кубик.Победителей нету !",0;
stopnpctimer "Event_Kubik";
return;
end;
}
if ( getareausers("quiz_00",10,131,27,100) == 1 ) {
areaannounce "quiz_00",4,131,27,100,"Выпало число - "+$@random,0;
announce "Конец Ивента Супер кубик.Есть 1 победитель !",0;
callfunc "Walk_On";
mapannounce "quiz_00","Заберите свой приз, и тогда сможете выйти !",0;
stopnpctimer "Event_Kubik";
enablenpc "Виходимс";
monster "quiz_00",5,108,"Приз в студию",1360,1;
sleep 5000;
areawarp "quiz_00",4,131,8,120,"prontera",155,177;
return;
end;
} else {
if ( getareausers("quiz_00",10,131,27,100) >= 2 ) {
areaannounce "quiz_00",4,131,27,100,"Выпало число - "+$@random,0;
areaannounce "quiz_00",4,131,27,100,"У вас 10 секунд,чтоб поменять позицыю",0;
sleep 10000;
callfunc "Main_function1";
return;

}
}
}
function   script   Main_function1   {
set $@random,rand(1,6);
callfunc "Enable_k"+$@random;
callfunc "Enable_other";
callfunc "Main_function2";
return;
}

quiz_00,4,106,4   script   Виходимс   71,{
mes "[ Ивент Супер кубик ]";
mes "Подравляю с победой !!!";
next;
warp "SavePoint",0,0;
close;
}

function   script   Enable_other   {
//Все,кроме кубиков
areawarp "quiz_00",10,131,11,124,"quiz_00",7,122;
areawarp "quiz_00",12,129,26,126,"quiz_00",7,122;
areawarp "quiz_00",22,121,27,106,"quiz_00",7,122;
areawarp "quiz_00",10,121,17,108,"quiz_00",7,122;
areawarp "quiz_00",10,107,13,100,"quiz_00",7,122;
areawarp "quiz_00",14,105,17,100,"quiz_00",7,122;
areawarp "quiz_00",16,107,17,106,"quiz_00",7,122;
areawarp "quiz_00",18,111,21,102,"quiz_00",7,122;
areawarp "quiz_00",18,101,19,100,"quiz_00",7,122;
areawarp "quiz_00",22,101,25,100,"quiz_00",7,122;
areawarp "quiz_00",24,103,26,102,"quiz_00",7,122;
areawarp "quiz_00",26,105,27,104,"quiz_00",7,122;
areawarp "quiz_00",18,125,21,116,"quiz_00",7,122;
areawarp "quiz_00",20,115,21,114,"quiz_00",7,122;
areawarp "quiz_00",14,123,17,122,"quiz_00",7,122;
areawarp "quiz_00",14,125,15,124,"quiz_00",7,122;
areawarp "quiz_00",22,125,23,122,"quiz_00",7,122;
areawarp "quiz_00",26,125,27,122,"quiz_00",7,122;
return;
}

function   script   Enable_k1   {
//Кубики - 1
areawarp "quiz_00",12,125,13,124,"quiz_00",7,122;
areawarp "quiz_00",24,125,25,124,"quiz_00",7,122;
return;
}

function   script   Enable_k2   {
//Кубики - 2
areawarp "quiz_00",24,123,25,122,"quiz_00",7,122;
areawarp "quiz_00",20,101,21,100,"quiz_00",7,122;
return;
}

function   script   Enable_k3   {
//Кубики - 3
areawarp "quiz_00",22,105,23,104,"quiz_00",7,122;
areawarp "quiz_00",12,123,13,122,"quiz_00",7,122;
return;
}

function   script   Enable_k4   {
//Кубики - 4
areawarp "quiz_00",10,123,11,122,"quiz_00",7,122;
areawarp "quiz_00",18,113,21,112,"quiz_00",7,122;
return;
}

function   script   Enable_k5   {
//Кубики - 5
areawarp "quiz_00",18,115,19,114,"quiz_00",7,122;
areawarp "quiz_00",24,105,25,104,"quiz_00",7,122;
return;
}

function   script   Enable_k6   {
//Кубики - 6
areawarp "quiz_00",22,103,23,102,"quiz_00",7,122;
areawarp "quiz_00",14,107,15,106,"quiz_00",7,122;
areawarp "quiz_00",16,125,17,124,"quiz_00",7,122;
return;
}

function   script   Walk_Off   {
setcell "quiz_00",9,125,9,120,cell_walkable,0;
setcell "quiz_00",9,111,9,106,cell_walkable,0;
return;
}

function   script   Walk_On   {
setcell   "quiz_00",9,111,9,106,cell_walkable,1;
return;
}

https://myserver.forum2x2.ru

Вернуться к началу  Сообщение [Страница 1 из 1]

Права доступа к этому форуму:
Вы не можете отвечать на сообщения