Автор: Magician: Дата: 01.09.2011

[FONT="Arial Black"]Некоторые нужные нпц! Такие как прокат/варпер/хилер/Мастер квестовых скиллов/
виложу тут
[/FONT]

prontera,143,179,3 script Прокат 804,{
mes "[Прокат]";
mes "Привет, здесь Вы можете орендовать Повозки, Сокола или Пеко-пеко.";
next;

L_Menu:
menu "Оренда Повозки",L_Cart,"Оренда Сокола",L_Falcon,"Оренда Пеко-пеко",L_Peco,"Выход",L_Quit;
close;

L_Cart:
if((BaseClass == Job_Merchant || BaseJob == Job_SuperNovice) && checkcart() == 0) goto L_Cart_Ok;
if(getskilllv(39)<1) goto L_Need_Skill;

mes "[Прокат]";
mes "Извините " + strcharinfo(0) + ", но Я Сдаю в оренду повозки только Продовцам, которые имеют достаточно навыков.";
close;

L_Cart_Ok:
setcart;
goto L_Quit2;

L_Need_Skill:
mes "[Прокат]";
mes "Извините Вы не имеете необходимое количество умений, чтобы орендовать повозку.";
close;

L_Falcon:
if(BaseJob != Job_Archer && BaseClass == Job_Archer && checkfalcon() == 0) goto L_Falc;
if(getskilllv(127)<1) goto L_Need_Skill2;

mes "[Прокат]";
mes "Извините " + strcharinfo(0) + ", но Я орендую соколов только Охотникам и Снайперам, которые имеют достаточно навыков.";
close;

L_Falc:
setfalcon;
goto L_Quit2;

L_Need_Skill2:
mes "[Прокат]";
mes "Извините,но у вас нет необходимых умений для оренды Сокола.";
close;

L_Peco:
if (BaseJob != Job_Swordman && BaseClass == Job_Swordman && checkriding() == 0) goto L_Peco_Ok;
if(getskilllv(63)<1) goto L_Need_Skill3;

mes "[Прокат]";
mes "Извините " + strcharinfo(0) + ", но Я орендую Пеко-пеко только Рыцарям и Крусайдерам, которые имеют достаточно навыков.";
close;

L_Peco_Ok:
setriding;
goto L_Quit2;

L_Need_Skill3:
mes "[Прокат]";
mes "Извините, но у вас нет необходимых умений, чтобы ездить на Пеко-пеко.";
close;

L_Quit:
mes "[Прокат]";
mes strcharinfo(0) + ", пожалуйста возвращайте тогда, когда Вы будете готорвы что-либо орендовать.";
close;

L_Quit2:
mes "[Прокат]";
mes strcharinfo(0) + ", пожалуйста приходите сново, если вам что-нибудь понадобиться... .";
close;
}

prontera,139,183,6 script Мастер квестовых скиллов 485,{
mes "[Мастер квестовых скиллов]";
mes "Хотите, я дам вам квестовые скиллы для ЛЮБОЙ профессии?";
next;
menu "Да",LChoice,"Нет",Lnogetskills;

LChoice:
next;
mes "[Мастер квестовых скиллов]";
mes "Скажите, какие скиллы вы хотите получить?";
menu "Для первой профы",Lgetskills,"Для второй профы",Lgetskillspro;
Lgetskills:
if (BaseClass==Job_Novice) goto Lskillsnovice;
if ((BaseJob == Job_Swordman) || (BaseJob == Job_Swordman_High)) goto Lskillsswordie;
if (BaseClass==Job_Mage) goto Lskillsmage;
if (BaseClass==Job_Archer) goto Lskillsarcher;
if (BaseClass==Job_Acolyte) goto Lskillsaco;
if (BaseClass==Job_Merchant) goto Lskillsmerchie;
if (BaseClass==Job_Thief) goto Lskillsthief;
else goto LNoavailskills;
Lskillsnovice:
mes "[Мастер квестовых скиллов]";
mes "Я вижу, вы Новичёк. Сейчас я вам добавлю ваши квестовые скиллы...";
skill 142,1,0;
if(BaseJob==0) skill 143,1,0;
mes " ";
mes "Теперь у вас есть все квестовые скиллы для вашей профессии.";
next;
goto LskillsEND;
Lskillsswordie:
mes "[Мастер квестовых скиллов]";
mes "Я вижу, вы Мечник. Сейчас я вам добавлю ваши квестовые скиллы...";
skill 142,1,0;
skill 144,1,0;
skill 145,1,0;
skill 146,1,0;
mes " ";
mes "Теперь у вас есть все квестовые скиллы для вашей профессии.";
next;
goto LskillsEND;
Lskillsmage:
mes "[Мастер квестовых скиллов]";
mes "Я вижу, вы Маг. Сейчас я вам добавлю ваши квестовые скиллы...";
skill 142,1,0;
skill 157,1,0;
mes " ";
mes "Теперь у вас есть все квестовые скиллы для вашей профессии.";
next;
goto LskillsEND;
Lskillsarcher:
mes "[Мастер квестовых скиллов]";
mes "Я вижу, вы Арчер. Сейчас я вам добавлю ваши квестовые скиллы...";
skill 142,1,0;
skill 147,1,0;
skill 148,1,0;
mes " ";
mes "Теперь у вас есть все квестовые скиллы для вашей профессии.";
next;
goto LskillsEND;
Lskillsaco:
mes "[Мастер квестовых скиллов]";
mes "Я вижу, вы Послушник. Сейчас я вам добавлю ваши квестовые скиллы...";
skill 142,1,0;
skill 156,1,0;
mes " ";
mes "Теперь у вас есть все квестовые скиллы для вашей профессии.";
next;
goto LskillsEND;
Lskillsmerchie:
mes "[Мастер квестовых скиллов]";
mes "Я вижу, вы Торговец. Сейчас я вам добавлю ваши квестовые скиллы....";
skill 142,1,0;
skill 153,1,0;
skill 154,1,0;
skill 155,1,0;
mes " ";
mes "Теперь у вас есть все квестовые скиллы для вашей профессии.";
next;
goto LskillsEND;
Lskillsthief:
mes "[Мастер квестовых скиллов]";
mes "Я вижу, вы Вор. Сейчас я вам добавлю ваши квестовые скиллы...";
skill 142,1,0;
skill 149,1,0;
skill 150,1,0;
skill 151,1,0;
skill 152,1,0;
mes " ";
LSkillhightend:
mes "Теперь у вас есть все квестовые скиллы для вашей профессии.";
next;
goto LskillsEND;
LskillsEND:
next;
mes "[Мастер квестовых скиллов]";
mes "Приятного время препровождения на сервере ******-РО!"; //Вставить что нужно или убрать =]
close;
Lnogetskills:
next;
mes "[Мастер квестовых скиллов]";
mes "Ммм, совсем не хотите?";
close;
Lgetskillspro:

///////////////////////////////////////////////////////////////////////////////////////////
if ((Class == Job_Assassin) || (Class == Job_Assassin_Cross)) goto Lsassasin; //Сины //
if ((Class == Job_Rogue) || (Class == Job_Stalker)) goto Lsrogue; //Роги //
if ((Class == Job_Knight) || (Class == Job_Lord_Knight)) goto Lsknight; //Кнайты //
if ((Class == Job_Crusader) || (Class == Job_Paladin)) goto Lscrus; //Палы //
if ((Class == Job_Blacksmith) || (Class == Job_Whitesmith)) goto Lsblack; //Смиты //
if ((Class == Job_Alchemist) || (Class == Job_Creator)) goto Lsalche; //Химы //
if ((Class == Job_Hunter) || (Class == Job_Sniper)) goto Lshunter; //Ханты //
if ((Class == Job_Bard) || (Class == Job_Clown)) goto Lsbard; //Барды //
if ((Class == Job_Dancer) || (Class == Job_Gypsy)) goto Lsdancer; //Гипси //
if ((Class == Job_Sage) || (Class == Job_Professor)) goto Lssage; //Саги //
if ((Class == Job_Wizard) || (Class == Job_High_Wizard)) goto Lswizard; //Визы //
if ((Class == Job_Monk) || (Class == Job_Champion)) goto Lsmonks; //Монки //
if ((Class == Job_Priest) || (Class == Job_High_Priest)) goto Lspriest; //Присты //
Lsassasin:
skill 1003,1,0;
skill 1004,1,0;
goto LSkillhightend;
Lsrogue:
skill 1005,1,0;
goto LSkillhightend;
Lsknight:
skill 1001,1,0;
goto LSkillhightend;
Lscrus:
skill 1002,1,0;
goto LSkillhightend;
Lswizard:
skill 1006,1,0;
goto LSkillhightend;
Lshunter:
skill 1009,1,0;
goto LSkillhightend;
Lsbard:
skill 1010,1,0;
goto LSkillhightend;
Lsdancer:
skill 1011,1,0;
goto LSkillhightend;
Lspriest:
skill 1014,1,0;
goto LSkillhightend;
Lsmonks:
skill 1015,1,0;
skill 1016,1,0;
goto LSkillhightend;
Lsblack:
skill 1012,1,0;
skill 1013,1,0;
goto LSkillhightend;
Lsalche:
skill 238,1,0;
goto LSkillhightend;
Lssage:
skill 1007,1,0;
if (a == 1) goto LSkillhightend;
mes "[Мастер квестовых скиллов]";
mes "Итак, так как вы Саг, вам нужно выбрать какой из квестовых елементальных скиллов вы хотите выбрать?";
switch(select( "Вода","Земля","Огонь","Ветер") )
{
case 1:
skill 1008,1,0;
set a,1;
goto LskillsEND;
case 2:
skill 1017,1,0;
set a,1;
goto LskillsEND;
case 3:
skill 1018,1,0;
set a,1;
goto LskillsEND;
case 4:
skill 1019,1,0;
set a,1;
goto LskillsEND;
}
}

prontera,151,186,435 script Хилер 435,{
OnTouch:
sc_end sc_stone;
sc_end sc_freeze;
sc_end sc_sleep;
sc_end sc_curse;
sc_end sc_silence;
sc_end sc_confusion;
sc_end sc_blind;
sc_end sc_bleeding;
sc_end sc_decreaseagi;
sc_end sc_poison;
sc_end sc_hallucination;
sc_end sc_stripweapon;
sc_end sc_striparmor;
sc_end sc_striphelm;
sc_end sc_stripshield;
sc_end sc_orcish;
sc_end sc_berserk;

sc_start 32, 3000000, 10; // Increase Agi
sc_start 30, 3000000, 10; // Blessing
sc_start 35, 3000000, 5; // Impositio Manus
sc_start 41, 3000000, 5; // Gloria
//sc_start 115, 3000000, 1; // Assumptio
percentheal 100,100;
end;
}

morocc.gat,159,96,5 duplicate(Хилер) Healer#h1-2 523
ayothaya.gat,155,111,5 duplicate(Хилер) Healer#h1-3 523
geffen.gat,121,61,5 duplicate(Хилер) Healer#h1-4 523
umbala.gat,94,162,5 duplicate(Хилер) Healer#h1-5 523
payon.gat,180,105,5 duplicate(Хилер) Healer#h1-6 523
alberta.gat,185,144,5 duplicate(Хилер) Healer#h1-7 523
aldebaran.gat,134,123,5 duplicate(Хилер) Healer#h1-8 523
izlude.gat,125,118,5 duplicate(Хилер) Healer#h1-9 523
xmas.gat,149,136,5 duplicate(Хилер) Healer#h1-10 523
comodo.gat,188,162,5 duplicate(Хилер) Healer#h1-11 523
amatsu.gat,200,80,5 duplicate(Хилер) Healer#h1-12 523
gonryun.gat,164,130,5 duplicate(Хилер) Healer#h1-13 523
yuno.gat,152,186,5 duplicate(Хилер) Healer#h1-14 523
niflheim.gat,188,180,5 duplicate(Хилер) Healer#h1-15 523
louyang.gat,225,103,5 duplicate(Хилер) Healer#h1-16 523

Автор: Swizz: Дата: 01.09.2011

Данные скрипты на форуме уже присутствуют, за подобные темы будем выдавать нарушения, тем-более другой раздел.Закрыто