Автор: Fiesta: Дата: 06.22.2009
Вот написал свой первый квестик, за скелет взял стандартного нпц сангласы. Что б получилось как у меня идем в дб\итемдб находим строчку 5143 и заменяем на эту:
5143,Kabuki_Mask,Kabuki Mask,5,20,,1000,,5,,1,0xFFFFFFFE,7,1,256,,30,1,214,{bonus2 bAddRace,RC_DemiHuman,10; bonus2 bSubRace,RC_DemiHuman,10;},{},{}
//скелет взят из стандартного sunglasses
//===== By: ==================================================
//= Aegis - amichan
//by Fiesta
prontera,152,176,5 script Анечка 73,{
if(SG_QUEST1 == 1) goto L_SG_Q1_Done;
if(SG_QUEST5 == 1) goto L_SG_Q8_Done;
mes "[Анечка]";
mes "Привет,хнык(";
mes "Я выграла в ивенте, а мне не дало тцг( хнык(";
next;
menu "О-о, бывает, может я могу тебе помочь?",-,"Пиши админам они мб дадут те ТЦГ.",L_SG_No;
mes "[Анечка]";
mes "Помочь? Но что я те дам взамен?";
mes "Хотя если тебе не трудно помоги мне";
next;
menu "Хорошо, что мне нужно сделать?",L_SG_1,"Таа, я думал ты что то дашь, а у тебя ничего нету!",-;
close;
L_SG_1:
mes "[Анечка]";
mes "Вы добрый человек, принесите: ";
mes "^0000881 Тцг карту^000000, ";
mes "10 Поринг коинов, ";
next;
menu "Я все принес.",L_SG_1_Check,"Ок ща принесу!",-;
mes "[Анечка]";
mes "Да хранит Вас господь.";
close;
L_SG_1_Check:
if (countitem(7227) < 1) goto L_SG_Diamond;
if (countitem(7539) < 10) goto L_SG_Feathers;
delitem 7227,1;
delitem 7539,10;
set SG_QUEST1,1;
mes "[Анечка]";
mes "Прекрасно. Я так щаслива.";
next;
mes "[Анечка]";
mes "А теперь найди моего друга, он бегает по зданиям пронтеры в поисках ТЦГ";
mes "Передай ему что ты мне его дал, и что б он возвращался, нам пора в Юно.";
mes "А кстати его зовут Ренат.Удачи.";
close;
L_SG_Diamond:
mes "[Анечка]";
mes "Ты не нашел 1 тцг. Приходи в другой раз.";
close;
L_SG_Feathers:
mes "[Анечка]";
mes "У тебя нету 10 поринг коинов. Иди поубевай порингов.";
close;
L_SG_Q1_Done:
mes "[Анечка]";
mes "Ты забыл куда я тебе сказала идти?.";
next;
mes "[Анечка]";
mes "Найди моего друга Рената, он гдето в зданиях пронтеры.";
close;
L_SG_Q8_Done:
mes "[Анечка]";
mes "Приветик, я всё еще помню как ты мне дал ТЦг.";
next;
mes "[Анечка]";
mes "Понравился квест7 Напиши на форуме спасибо!.";
close;
L_SG_No:
mes "[Sunglasses Trader]";
mes "Come back to me than you are ready.";
close;
}
prt_in,156,67,4 script Ренат 85,{
if(SG_QUEST1 == 1) goto L_SG_2;
if(SG_QUEST2 == 1) goto L_SG_Q2_Done;
mes "[Ренат]";
mes "Что ты тут ищешь? Тут нету ТЦг я всё обошел!";
close;
L_SG_2:
if(SG_QUEST2 == 1) goto L_SG_Q2_Done;
mes "[Ренат]";
mes "Привет что ты тут делаешь?";
next;
mes "[Ренат]";
mes "Оо, ты дал моей девушке ТЦГ?";
next;
menu "Да, мне стало так жалко её",L_SG_2_Start,"Ага и пришел к тебе за призом.",-;
mes "[Ренат]";
mes "хохохо";
close;
L_SG_2_Start:
mes "[Ренат]";
mes "Помоги и мне";
mes "Будь так любезен добрый человек, принеси мне 2 спички и 1кк зеней ";
next;
menu "На это было элементарно.",L_SG_Q2_Check,"Не я уже запарился.",-;
mes "[Ренат]";
mes "Давай давай.";
close;
L_SG_Q2_Check:
if(countitem(7035) < 2) goto L_SG_Sunglasses;
if(zeny<1000000) goto L_SG_Funds;
delitem 7035,2;
set zeny,zeny-1000000;
getitem 5210,1; //тут у меня выдаеться скромный приз
set SG_QUEST2,1;
mes "[Ренат]";
mes "Спасибо ты выручил меня, но мне еще кое что надо";
next;
mes "[Ренат]";
mes "В порту большого города есть корабль, найди там Филина";
// quest reset
set SG_QUEST1,0;
next;
mes "[Ренат]";
mes "ха-ха-ха";
close;
L_SG_Q2_Done:
mes "[Ренат]";
mes "Ты забыл куда я тебе сказал идти?.";
next;
mes "[Ренат]";
mes "Найди моего друга Филина, он на корабле в бальшом городе.";
// quest reset
set SG_QUEST1,0;
next;
mes "[Ренат]";
mes "ха-ха-ха";
close;
L_SG_Sunglasses:
mes "[Ренат]";
mes "Мне нада спички что б пожарить шашлык";
close;
L_SG_Funds:
mes "[Ренат]";
mes "У тебя нету деняг для меня.";
close;
}
alb_ship,117,116,6 script Филин 83,{
if(SG_QUEST2 == 1) goto L_SG_3;
if(SG_QUEST3 == 1) goto L_SG_Q3_Done;
mes "[Филин]";
mes "Привет что ищешь тут?";
mes "Погода сегодня прекрасная!";
close;
L_SG_3:
mes "[Филин]";
mes "Оо, ты пришел по просьбе рената!";
mes "Я слышал про твои благородные поступки!";
next;
mes "[Филин]";
mes "Если ты поможешь и мне я расскажу как стать самым самым";
next;
menu "Да, я сюда для этого и пришел",L_SG_3_Start,"Та лан надоело немного.",-;
mes "[Филин]";
mes "Уходи";
close;
L_SG_3_Start:
mes "[Филин]";
mes "Спасибо что согласился и мне помочь я вознагражу тебя, записывай";
mes "25 золотых слитков"; //969
mes "Treasure Box"; //7444
mes "Piece of Shield"; //7108
mes "Mobster Card "; //4317
mes "25 Forbidden Red Candle"; //660
mes "Turquoise"; //7294
next;
menu "Я все принес.",L_SG_Q3_Check,"Не я уже запарился.",-;
mes "[Филин]";
mes "Давай давай.";
close;
L_SG_Q3_Check:
if(countitem(969) < 25 || countitem(7444) < 1 || countitem(7108) < 1 || countitem(4317) < 1 || countitem(660) < 25 || countitem(7294) < 1) goto L_SG1_Sunglasses;
delitem 969,25;
delitem 7444,1;
delitem 7108,1;
delitem 4317,1;
delitem 660,25;
delitem 7294,1;
mes "[Филин]";
mes "Спасибо ты принес всё что мне не хватало";
next;
mes "[Филин]";
mes "Один кузнец научился совмещать шапку алисы и беретку";
mes "правда он при ее совмещении шапка теряет силу";
mes "Но у него получаеться красивая шапка со слотом";
mes "которая дает +10 по людям и минус 10 от людей";
mes "Спроси у Каима он знает где живет кузнец";
mes "Каим часто охотиться на востоке от пайона";
getitem 12214,2; //тут у меня выдаеться скромный приз
set SG_QUEST3,1;
// quest reset
set SG_QUEST2,0;
next;
mes "[Филин]";
mes "ха-ха-ха";
close;
L_SG_Q3_Done:
mes "[Филин]";
mes "Ты забыл куда я тебе сказал идти?.";
next;
mes "[Ренат]";
mes "Ищи Каима на востоке от пайона.";
close;
L_SG1_Sunglasses:
mes "[Филин]";
mes "у тебя чегото не хватает! Мне надо 25 золота и Forbidden Red Candle и по 1";
mes "Treasure Box,Piece of Shield,Mobster Card,Turquoise ";
close;
}
pay_fild09,100,141,3 script каим 61,{
if(SG_QUEST3 == 1) goto L_SG_4;
if(SG_QUEST4 == 1) goto L_SG_Q4_Done;
mes "[Каим]";
mes "Я охочусь на смоки";
mes "Говорят их карта дает хайд!";
close;
L_SG_4:
mes "[каим]";
mes "Ты уже знаешь про кузнеца?!";
mes "Нет я не скажу тебе ничиво, он убьет меня!";
next;
mes "[Каим]";
mes "Хотя я не вижу в тебе опасного человека";
mes "Пока я буду бить себе смоки карту принеси мне кое что";
next;
menu "Окей, что те нада?",L_SG_4_Start,"Та лан надоело немного.",-;
mes "[Каим]";
mes "твои проблемы";
close;
L_SG_4_Start:
mes "[каим]";
mes "я уже 2 дня бью карту и сильно хочу пить";
mes "Принеси мне зелий для компота";
mes "1 ЕДП"; //678
mes "Fire Bottle"; //7135
mes "Alcohol"; //970
mes "Holy Water "; //523
mes "Cursed Water"; //12020
mes "Smooth Noodle"; //12057
next;
menu "Я все принес.",L_SG_Q4_Check,"Не я уже запарился.",-;
mes "[каим]";
mes "Давай давай.";
close;
L_SG_Q4_Check:
if(countitem(678) < 1 || countitem(7135) < 1 || countitem(970) < 1 || countitem(523) < 1 || countitem(12020) < 1 || countitem(12057) < 1) goto L_SG2_Sunglasses;
delitem 678,1;
delitem 7135,1;
delitem 970,1;
delitem 523,1;
delitem 12020,1;
delitem 12057,1;
mes "[Каим]";
mes "Ой спасибо, а я как раз карту выбил";
next;
mes "[Каим]";
mes "Ищи кузнеца,я знаю он отправился в гильдию ассасинов";
mes "Беги туда он наверное уже где то там";
getitem 12221,1; //тут у меня выдаеться скромный приз
set SG_QUEST4,1;
// quest reset
set SG_QUEST3,0;
next;
mes "[каим]";
mes "ха-ха-ха";
close;
L_SG_Q4_Done:
mes "[Каим]";
mes "Ты забыл куда я тебе сказал идти?.";
next;
mes "[Каим]";
mes "Ищи кузнеца на полях около гильдии ассасинов.";
close;
L_SG2_Sunglasses:
mes "[Филин]";
mes "у тебя чегото не хватает! Мне надо по 1штучке ЕДП, алкоголь, Fire Bottle, Smooth Noodle, Cursed Water, Holy Water";
close;
}
moc_fild16,156,230,4 script Лучший кузнец 63,{
if(SG_QUEST4 == 1) goto L_SG_5;
mes "[Лучший кузнец]";
mes "привет продаю шапку +10 по людям, -10 от людей";
next;
menu "И что для этого нада?",LMats,"Нет, мне они не нужны.",LCancel;
LMats:
mes "[Лучший кузнец]";
mes "Для создания этой шапки мне потребуется следующее:";
mes "10 Гостринг карт"; //4047
close;
L_SG_5:
mes "[Лучший кузнец]";
mes "Откуда ты узнал про мое изобретение?!";
mes "Вот у людей язык без костей";
next;
mes "[Лучший кузнец]";
mes "Да я могу сделать для тебя эту шапку";
mes "Но тебе это очень дорого обойдеться";
next;
menu "я прошел такой путь,и готов на всё!",L_SG_5_Start,"Та лан надоело немного.",-;
mes "[Лучший кузнец]";
mes "ха-ха-ха,ыыыыыы";
close;
L_SG_5_Start:
mes "[Лучший кузнец]";
mes "Оо ток что звонила моя внучка Анечка";
mes "Шапочка для тебя будет стоить не очень дорого";
mes "Mr. Smile"; //2278
mes "Feather Beret"; //5170
mes "Marionette Doll[1]"; //5141
mes "Mother's Nightmare"; //7020
mes "Ant Jaw"; //1014
mes "100 Skull"; //7005
next;
menu "Я все принес.",L_SG_Q5_Check,"Не я уже запарился.",-;
mes "[каим]";
mes "Гггг.";
close;
L_SG_Q5_Check:
if(countitem(2278) < 1 || countitem(5170) < 1 || countitem(5141) < 1 || countitem(7020) < 1 || countitem(1014) < 1 || countitem(7005) < 100) goto L_SG3_Sunglasses;
delitem 2278,1;
delitem 5170,1;
delitem 5141,1;
delitem 7020,1;
delitem 1014,1;
delitem 7005,100;
mes "[Лучший кузнец]";
mes "спасибо, привет вам от Анечки";
next;
mes "[Лучший кузнец]";
mes "А вот и твой приз, не смотри что на нем написано будто он дает защиту от молчанки";
mes "Админы потом поменяют это в базе";
getitem 5143,1; //тут у меня выдаеться основной приз
set SG_QUEST5,1;
// quest reset
set SG_QUEST4,0;
next;
mes "[каим]";
mes "ха-ха-ха";
close;
L_SG3_Sunglasses:
mes "[Филин]";
mes "у тебя чегото не хватает! Мне надо Mr. Smile, Feather Beret, Marionette Doll[1], Mother's Nightmare, Ant Jaw, 100 Skull";
close;
}Автор: nomn: Дата: 06.22.2009
учитесь для своих *бучих кодов ставить ТЕГИ codebox буду карать!