Перейти к содержанию

JustHateMe

Проверенные
  • Постов

    139
  • Зарегистрирован

  • Посещение

  • Победитель дней

    6

Весь контент JustHateMe

  1. Присоединяюсь, интересно узнать цену и время исполнения.
  2. JustHateMe

    Первая работа)

    Собственно, чего-то "оригинального" в нем особо нет.. Обычный шапочник.. только через select =) Собственно учусь только -) prontera,164,165,3 script Шапка нннада? 430,{ mes "[Non player charter]"; mes "Приветствую тебя " + (Sex?"^FF0000 Mr. ^FF0000":"^FF0000 Mrs.^FF0000") + " "+ strcharinfo(0); next; mes "[Non player charter]"; mes "Я, могу преобразить тебя. Дать тебе эксплюзивную шапочку!"; mes "Но только в обмен на что-то.. желаешь попробовать?"; next; if(select("Да! Крути меня полностью:Нет")==2){ mes "[Non player charter]"; mes "Хорошо.. Ты всегда можешь найти меня здесь.."; close ;} mes "[Non player charter]"; mes "Оkay, смотри мой список шапочек"; specialeffect2 435 +strcharinfo(0); next; if(select("Смотреть список:Я передумал")==2){ mes "[Non player charter]"; mes "Хорошо.. Ты всегда можешь найти меня здесь.."; close; } switch(select("Bunny Top Hat:Chicken Hat [1]:Chick Hat:Deviling Hat [1]:Fish Head Hat:Fish In Mouth:Flower Crown:Laurel Wreath [1]:Hibiscus:Hyuke's Black Cat Ears:Hunter's Cap [1]:Koneko Hat:Wild Rose Hat [1]:Lif Doll Hat [1]:Little Angel Doll:Purple Cowboy Hat [1]")){ case 1: mes "Для получения Bunny Top Hat тебе нужно принисти следующие вещи:"; mes "^000088Magician Hat [id 5045] Х1^000000.^000088 Bunny Band [id 2214] Х1 ^000000.^000088 Scarlet Dyestuffs [id 975] Х5 ^000000"; mes "Ты все принес?"; if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; } if(countitem(5045) < 1 || countitem(2214) < 1 || countitem(975) < 5){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;} delitem 5045,1; delitem 2214,1; delitem 975,5; next; mes "[Non player charter]"; mes "Поздравляю! Вот твоя шапочка."; getitem 5378,1; close; case 2: mes "Для получения Chicken Hat [1] тебе нужно принисти следующие вещи:"; mes " ^000088Shell [id 935] Х200 ^000000 ^000088 Feather of Birds [id916 ] Х100 ^000000 ^000088 Feather [id 949 ] Х50 ^000000 ^000088 White Dyestuffs [id 982 ] Х1 ^000000"; mes "Ты все принес?"; if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; } if(countitem(935) < 200 || countitem(916) < 100 || countitem(949) < 50 || countitem(982) < 1){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;} delitem 935,200; delitem 916,100; delitem 949,50; delitem 982,1; next; mes "[Non player charter]"; mes "Поздравляю! Вот твоя шапочка."; getitem 5431,1; close; case 3: mes "Для получения Chick Hat тебе нужно принисти следующие вещи:"; mes "^000088 Chicken Hat [1] [id 5431] Х1 ^000000.^000088 Lemon Dyestuffs [id 976] Х5 ^000000"; mes "Ты все принес?"; if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; } if(countitem(5431) < 1 || countitem(976) < 5){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;} delitem 5431,1; delitem 976,5; next; mes "[Non player charter]"; mes "Поздравляю! Вот твоя шапочка."; getitem 5283,1; close; case 4: mes "Для получения Deviling Hat [1] тебе нужно принисти следующие вещи:"; mes "^000088Little Evil Wing [id 1039] Х200 ^000000 ^000088 Hand of God [id 1009] Х5 ^000000 ^000088 Cap [1] [id 2227] Х1 ^000000 ^000088 Evil Wing [id 2255] Х1 ^000000 ^000088 Black Dyestuffs [id 983] Х3 ^000000"; mes "Ты все принес?"; if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; } if(countitem(1039) < 200 || countitem(1009) < 5 || countitem(2227) < 1 || countitem(2255) < 1 || countitem(983) < 3){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;} delitem 1039,200; delitem 1009,5; delitem 2227,1; delitem 2255,1; delitem 983,3; next; mes "[Non player charter]"; mes "Поздравляю! Вот твоя шапочка."; getitem 5254,1; close; case 5: mes "Для получения Fish Head Hat тебе нужно принисти следующие вещи:"; mes "^000088Fin [id 951] Х150^000000 ^000088Aquamarine [id 720] Х50^000000 ^000088Fish Tail [id 1023] Х100^000088Rotten Fish [id 624] Х20^000000"; mes "Ты все принес?"; if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; } if(countitem(951) < 150 || countitem(720) < 50 || countitem(1023) < 100 || countitem(624) < 20){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;} delitem 951,150; delitem 720,50; delitem 1023,100; delitem 624,20; next; mes "[Non player charter]"; mes "Поздравляю! Вот твоя шапочка."; getitem 5380,1; close; case 6: mes "Для получения Fish In Mouth тебе нужно принисти следующие вещи:"; mes "^000088Gill [id 956] Х100^000000^000088Sticky Mucus [id 938] Х150^000000 ^000088Fish Tail [id 1023] Х100^000000^000088Cobaltblue Dyestuff [id 978] х1^000000"; mes "Ты все принес?"; if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; } if(countitem(956) < 100 || countitem(938) < 150 || countitem(1023) < 100 || countitem(978) < 1){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;} delitem 956,100; delitem 938,150; delitem 1023,100; delitem 978,1; next; mes "[Non player charter]"; mes "Поздравляю! Вот твоя шапочка."; getitem 5403,1; close; case 7: mes "Для получения Flower Crown тебе нужно принисти следующие вещи:"; mes "^000088Tough Vines [id 7197] Х200^000000 ^000088Pointed Scale [id 906] Х100^000000 ^000088Illusion Flower [id 710] Х20^000000"; mes "Ты все принес?"; if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; } if(countitem(7197) < 200 || countitem(906) < 100 || countitem(710) < 20){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;} delitem 7197,200; delitem 906,100; delitem 710,20; next; mes "[Non player charter]"; mes "Поздравляю! Вот твоя шапочка."; getitem 5303,1; close; case 8: mes "Для получения Laurel Wreath [1] тебе нужно принисти следующие вещи:"; mes "^000088Tough Vines [id 7197]Х200^000000 ^000088Shoot [id 711] Х100^000000 ^000088Witherless Rose [id 748] Х20^000000"; mes "Ты все принес?"; if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; } if(countitem(7197) < 200 || countitem(711) < 100 || countitem(748) < 20){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;} delitem 7197,200; delitem 711,100; delitem 748,20; next; mes "[Non player charter]"; mes "Поздравляю! Вот твоя шапочка."; getitem 5185,1; close; case 9: mes "Для получения Hibiscus тебе нужно принисти следующие вещи:"; mes "^000088Four Leaf Clover [id 706] Х30^000000 ^000088Singing Flower [id 629] Х30^000000 ^000088Flower [id 712] Х100^000000 ^000088Scarlet Dyestuffs [id 975] Х3^000000 ^000088Lemon Dyestuffs [id 976] Х1^000000"; mes "Ты все принес?"; if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; } if(countitem(706) < 30 || countitem(629) < 30 || countitem(712) < 100 || countitem(975) < 3 || countitem(976) < 1){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;} delitem 706,30; delitem 629,30; delitem 712,100; delitem 975,3; delitem 976,1; next; mes "[Non player charter]"; mes "Поздравляю! Вот твоя шапочка."; getitem 5139,1; close; case 10: mes "Для получения Hyuke's Black Cat Ears тебе нужно принисти следующие вещи:"; mes "^000088Black Cat Ears [id 5057] Х1^000000 ^000088TCG [id 7227] Х10^000000 ^000088Black Dyestuffs [id 983] Х1^000000"; mes "Ты все принес?"; if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; } if(countitem(5057) < 1 || countitem(7227) < 10 || countitem(983) < 1){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;} delitem 5057,1; delitem 7227,10; delitem 983,1; next; mes "[Non player charter]"; mes "Поздравляю! Вот твоя шапочка."; getitem 5360,1; close; case 11: mes "Для получения Hunter's Cap [1] тебе нужно принисти следующие вещи:"; mes "^000088Magni's Cap [id 5122] Х1^000000 ^000088Darkgreen Dyestuff [id 979] Х10^000000 ^000088Soft Silk [id 7166] Х200^000000"; mes "Ты все принес?"; if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; } if(countitem(5122) < 1 || countitem(979) < 10 || countitem(7166) < 200){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;} delitem 5122,1; delitem 979,10; delitem 7166,200; next; mes "[Non player charter]"; mes "Поздравляю! Вот твоя шапочка."; getitem 5383,1; close; case 12: mes "Для получения Koneko Hat тебе нужно принисти следующие вещи:"; mes "^000088Drooping Cat [id 5058] x1^000000 ^000088White Dyestuffs [id 982] Х5^000000 ^000088Feather [id 949] Х150^000000 ^000088Soft Feather [id 7063] Х80^000000"; mes "Ты все принес?"; if(select("ДА:Нет, пойду собирать")==2){ mes "[Non player charter]"; mes "Удачи"; close; } if(countitem(5058) < 1 || countitem(982) < 5 || countitem(949) < 150 || countitem(7063) < 80){ mes "[Non player charter]"; mes "У тебя чего-то не хватает, собери все и возвращайся."; close;} delitem 5058,1; delitem 982,5; delitem 949,150; delitem 7063,80; next; mes "[Non player charter]"; mes "Поздравляю! Вот твоя шапочка."; getitem 5372,1; close; } }
  3. + Помогите ему ссылкой и я заодно скачаю) очень надо
  4. А вообще отпишитесь, использует кто это? Нужно это на мид серваках?)
  5. Вот тут много чего найдешь
  6. Если еще не нашел или не написал вот держи) prontera,153,193,6 script Job Master 609,{ mes "^ff0000[Job Master]^000000"; if(Upper == 1 && Class >= Job_Lord_Knight) goto L_noReq; if(SkillPoint != 0){ mes "Извини, используй все свои неизученые скилл поинты."; mes "И приходи опять!"; close; } if(JobLevel < 10) goto L_LvError; switch(Class){ case Job_Novice_High: case Job_Baby: case Job_Novice: skill 142,1,0; skill 143,1,0; mes "Приветствую, пожалуйста выбери проффесию которую хочешь получить"; if(lastJob != 0 && Class == Job_Novice_High){ switch(lastJob){ case Job_Knight: case Job_Crusader: set @target_job, Job_Swordman_High; break; case Job_Monk: case Job_Priest: set @target_job, Job_Acolyte_High; break; case Job_Alchemist: case Job_Blacksmith: set @target_job, Job_Merchant_High; break; case Job_Rogue: case Job_Assassin: set @target_job, Job_Thief_High; break; case Job_Wizard: case Job_Sage: set @target_job, Job_Mage_High; break; case Job_Hunter: case Job_Bard: case Job_Dancer: set @target_job, Job_Archer_High; break; } } else { switch(select("Мечник","Маг","Арчер","Аколит","Торговец","Воришка", "Супер новис","Тэйквон","Ганслинкер","Ниндзя")){ case 7: if(Class == Job_Novice_High) goto L_noReq; if($@JC_SupNovM > BaseLevel) goto L_BvError; if(Upper == 2) set @target_job, Job_Super_Baby; else set @target_job, Job_SuperNovice; break; case 8: if(Class == Job_Novice_High) goto L_noReq; if(Upper == 2) goto L_noReq; set @target_job, Job_Taekwon; break; case 9: case 10: if(Class == Job_Novice_High || Upper == 2) goto L_noReq; set @target_job, @menu + 15; break; default: set @target_job, @menu; if(Class == Job_Novice_High) set @target_job, @target_job + 4001; break; } } mes "Ты точно решил получить проффесию " + JobName(@target_job) + "?"; if(select("Нет.","Да.") == 2){ callfunc "Job_Change", @target_job; if(@target_job == Job_Gunslinger || @target_job == Job_Ninja || @target_job == Job_Taekwon) { callfunc "F_ClearJobVar"; } else { if($@JC_Plat) goto L_GivePlat; } } close; break; default: if(JobLevel < $@JC_MinimumJB) goto L_LvError; deletearray @job_opt, getarraysize(@job_opt); if(Class < Job_Knight || Class == Job_Taekwon || (Class > Job_Baby && Class < Job_Baby_Knight) || (Class > Job_Novice_High && Class < Job_Lord_Knight)){ if(lastJob != 0){ set @target_job, lastJob + 4001; } else { switch(Class){ case Job_Swordman_High: case Job_Baby_Swordman: case Job_Swordman: set @job_opt[0], Job_Knight; set @job_opt[1], Job_Crusader; break; case Job_Mage_High: case Job_Baby_Mage: case Job_Mage: set @job_opt[0], Job_Wizard; set @job_opt[1], Job_Sage; break; case Job_Archer_High: case Job_Baby_Archer: case Job_Archer: set @job_opt[0], Job_Hunter; if(Sex == 0) set @job_opt[1], Job_Dancer; else set @job_opt[1], Job_Bard; break; case Job_Acolyte_High: case Job_Baby_Acolyte: case Job_Acolyte: set @job_opt[0], Job_Priest; set @job_opt[1], Job_Monk; break; case Job_Merchant_High: case Job_Baby_Merchant: case Job_Merchant: set @job_opt[0], Job_Blacksmith; set @job_opt[1], Job_Alchemist; break; case Job_Thief_High: case Job_Baby_Thief: case Job_Thief: set @job_opt[0], Job_Assassin; set @job_opt[1], Job_Rogue; break; default: set @job_opt[0], Job_Star_Gladiator; set @job_opt[1], Job_Soul_Linker; break; } mes "Приветствую, пожалуйста выбери проффесию которую хочешь получить"; set @target_job, @job_opt[select(JobName(@job_opt[0]), JobName(@job_opt[1]))-1]; if(Class > Job_Novice_High && Class < Job_Lord_Knight) set @target_job, @target_job + 4001; } mes "Ты точно решил получить проффесию " + JobName(@target_job) + "?"; if(select("Нет","Да")==2){ callfunc "Job_Change", @target_job; if(@target_job == Job_Star_Gladiator || @target_job == Job_Soul_Linker) { callfunc "F_ClearJobVar"; } else { if($@JC_Plat) goto L_GivePlat; } } close; } if(checkfalcon() || checkcart() || checkriding()) goto L_remove; if((Class >=Job_Knight) && (Class <=Job_Crusader2)){ mes "Do you want to reborn?"; if(select("Yes","No")==1){ if(BaseLevel < 99 || JobLevel < 50) goto L_cantCh; set lastJob, Class; if(Class == Job_Knight2){ set lastJob, Job_Knight; } else { if(Class == Job_Crusader2){ set lastJob, Job_Crusader; } } jobchange Job_Novice_High; resetlvl(1); skill 142,1,0; skill 143,1,0; } close; } } mes "Ооой... Смотрика что-то пошло не так. Сообщи об этой ошибке администрации сервера!"; close; L_GivePlat: if (BaseClass==Job_SuperNovice) goto L_sSuperN; if (BaseClass==Job_Swordman) goto L_sSword; if (BaseClass==Job_Mage) goto L_sMage; if (BaseClass==Job_Archer) goto L_sArcher; if (BaseClass==Job_Acolyte) goto L_sAcolyte; if (BaseClass==Job_Merchant) goto L_sMerchant; if (BaseClass==Job_Thief) goto L_sThief; close; L_sSuperN: skill 142,1,0; close; L_sSword: skill 142,1,0; skill 144,1,0; skill 145,1,0; skill 146,1,0; close; L_sMage: skill 142,1,0; skill 157,1,0; close; L_sArcher: skill 142,1,0; skill 147,1,0; skill 148,1,0; close; L_sAcolyte: skill 142,1,0; skill 156,1,0; close; L_sMerchant: skill 142,1,0; skill 153,1,0; skill 154,1,0; skill 155,1,0; close; L_sThief: skill 142,1,0; skill 149,1,0; skill 150,1,0; skill 151,1,0; skill 152,1,0; close; L_cantCh: mes "Прости, ты уже достиг своего максимума! тебе некуда больше рости"; mes "Иди мочи всех х)"; close; L_LvError: mes "Мне очень жаль, у тебя недостаточно Job-уровней для смены профессии. Качайся."; mes "И приходи снова!"; close; L_BvError: mes "Мне очень жаль, у тебя не достаточно базовых уровней для смены профессии. Качайся."; mes "И приходи снова!"; close; L_noReq: mes "I'm sorry, you do not meet the requirements to change"; mes "И приходи снова!"; close; L_remove: mes "Пожалуйста сдай своего фалькона, пеку или тележку."; mes "И приходи снова!"; close; OnInit: // Variable Setup set $@JC_MinimumJB, 40; //Minimum job level for changing between 2nd and advance Class (Default : 40) set $@JC_Plat, 1; //Give Platinum skills on Jobchange (Default : 1-yes) set $@JC_SupNovM, 45; //Base Level to change into Super Novice (Default : 45) end; } Возможно в конце один диалог немного кривоват.. А в целом работает нормально =)
  7. + Пополняйте списки Нужно знать таких гадов в лицо)
  8. Пробовал - как видишь 3 нипися и 3 эррора получил -)
  9. Вообщем помогите кто может -)Error в трен ниписях =\ [22:19:35][Error]: npc_parsesrcfile: Unknown syntax in file 'npc/!my_npc/pvp1.tx t', line '1'. Stopping... * w1=prontera.gat,147,174,7 script └Ёхэр: * w2=:arena 954,{ * w3= * w4=♣prontera.gat,147,174,7 script └Ёхэр: :arena 954,{ [22:19:35][Error]: npc_parsesrcfile: Unable to parse, probably a missing or extr a TAB in file 'npc/!my_npc/healer.txt', line '1'. Skipping line... * w1=prontera,149,189,6 * w2= script * w3=─юъЄюЁ * w4= 834,10,10,{ [22:19:35][Error]: npc_parsesrcfile: Unknown syntax in file 'npc/!my_npc/healer. txt', line '3'. Stopping... * w1=OnTouch: * w2= * w3= * w4= OnTouch: [22:19:35][Error]: npc_parsesrcfile: Unknown syntax in file 'npc/!my_npc/new.txt ', line '7'. Stopping... * w1=- script time -1,{ * w2= * w3= * w4= - script time -1,{ Где "new.txt" скрипт(день/ночь) (с этого форума). Где "healer.txt" хиллер с данной темы. Где "pvp1.txt" PvP NPC с этого форума. Буду благодарен за поддержку -)
  10. [22:16:00][Error]: npc_parsesrcfile: Unknown syntax in file 'npc/!my_npc/new.txt ', line '7'. Stopping... * w1=- script time -1,{ * w2= * w3= * w4= - script time -1,{ Вот такую штуку выдает
  11. "Какую ошибку выдает? " npc_parsesrcfile: Unable to parse, probably a missing or extra TAB in file 'npc/!my_npc/healer.txt', line '1'. Skipping line... [Error]: npc_parsesrcfile: Unknown syntax in file 'npc/!my_npc/healer.txt , line '3'. Stopping... вот такая дребедень =\
  12. Если кто может предложить еще хиллера он еще актуален(представленные выше скрипты не работают) =\
  13. Вот вам Хилер с эффектами,а так же распознаёт вещи и чинит сломаные. prontera,149,189,6 script Доктор 834,10,10,{ OnTouch: while(getbrokenid(1)) repair(1); percentheal 100,100; specialeffect2 42; sc_start SC_BLESSING,300000,10; specialeffect2 37; sc_start SC_INCREASEAGI,300000,10; sc_start SC_MAGNIFICAT,300000,5; sc_start SC_ANGELUS,300000,10; emotion 21; getinventorylist; for(set .@i,0; .@i<@inventorylist_count; set .@i,.@i+1){ if(@inventorylist_identify[.@i]==1) continue; delitem2 @inventorylist_id[.@i],1,0,0,0,0,0,0,0; getitem @inventorylist_id[.@i],1; } } Спасибо но он почему-то не работает. Ошибка есть в скрипте -) Всем тоже большое спасибо -)
  14. JustHateMe

    Warper,Healer.

    Доброго времени суток. Буду очень благодарен тому доброму человеку который может поделиться НПЦ которые указаны в шапке темы-) З.Ы Варпер и Хиллер. Варпер который варпает в дагеоны(уровни дагеонов) и Хиллер который при лечении дает сразу бафф. Заранее спасибо
×
×
  • Создать...
Яндекс.Метрика