Автор: Nesterboy: Дата: 08.06.2009
Ребят допишите пожалуйста скрипт!
Вобщем нужно чтоб когда начиналса ивент в пронтере появлялса нпс , и варпал в комнату ожидания , а потом как 3 минуты пройдёт убераетса нпс и начинатеса ивент
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",152,161;
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,"Приз в студию",7227,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;
}Автор: Nesterboy: Дата: 08.08.2009
ошибки с табуляцией , сколько непробуйю бестолку..... можеш доделать скрипт!?
Автор: DiS[IP]: Дата: 08.08.2009
[FONT=Lucida Console]Нестер,для кого я выкладываю свои вещи?Этот скрипт просто опасно юзать для здоровья,я бы руки оторвал тому кто его написал.Зайди в мой топик "Бесплатное написание автоэвентов" и используй те кубики,которые я выложил.
P.S:Скрипт ппц говно [/FONT]
Автор: Nesterboy: Дата: 08.08.2009
ооо Дис , я думал ты уже ушол с ruseA , рад тя видеть!)
Автор: DiS[IP]: Дата: 08.08.2009
[FONT=Lucida Console]Я никуда не уходил и не уйду,как же я без вас )Я тебя тоже рад видеть)
P.S:Серег,смайлы не пашут,включи!11111
[/FONT]