Назад

Допишите

Автор: Nesterboy: Дата: 08.12.2009

Вобщем ребят , я тестил ивент и умя нпс невыдавал приз который я ему дал
я начал править и умя мап ругаетса начал и скрипт перестал норм работать <_<
Вопщем допишите скрипт чтоб он норм выдавал 1 тсг карту после ивента , и поправьте что я намутил заранее сяб!
prontera,149,155,5 script Супер кубик Ивент 723,{
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,"Приз в студию",
getitem 7227,1;
close; end;
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;
}

Автор: Мяфк: Дата: 08.13.2009

омг...

monster "quiz_00",5,108,"Приз в студию",

разве в конце строчки ставится "," ?

Автор: Мяфк: Дата: 08.13.2009

во общем замени этот кусок

monster "quiz_00",5,108,"Приз в студию",
getitem 7227,1;
close; end;
на
quiz_00,5,108 script Приз 787,{
getitem 7227,1;
close;
end;


Ps
про табы не забывай...

Автор: Nesterboy: Дата: 08.13.2009

мяфк , думаеш всё так просто , скрипт кривой что я токо с ним неделал , ааффффтор скрипта на коленках писал!

Автор: Мяфк: Дата: 08.14.2009

тут дисайпи выкладывал кубики, вроде рабочие юзай поиск.

Автор: Nesterboy: Дата: 08.14.2009

да есть умя єго скрипт , мне ненравитса(

Автор: Мяфк: Дата: 08.14.2009

А что там может "не нравится" если он почти такой же...

Автор: Nesterboy: Дата: 08.14.2009

нетакойже , мяфк напиши свою асю мне спросить утя кое что нуно)

Автор: Nesterboy: Дата: 08.14.2009

не такое
тема клоуз!