pzdcomgwtf Опубликовано 27 февраля, 2017 Жалоба Поделиться Опубликовано 27 февраля, 2017 Вот скрипт: prt_in,38,107,7 script Leiv#custom_stylist 923,{ // Retrieving bound vaules from current config for maximum flexibility // Note: when min_hair_style is set to 0 in config, eAthena resets it to 1. set @min_hair_style,getbattleflag("min_hair_style"); set @max_hair_style,getbattleflag("max_hair_style"); set @min_hair_color,getbattleflag("min_hair_color"); set @max_hair_color,getbattleflag("max_hair_color"); set @min_cloth_color,getbattleflag("min_cloth_color"); set @max_cloth_color,getbattleflag("max_cloth_color"); // Correcting slot count; avalilable maximum is 8, // as string length is limited to 255 characters. if ($sty_slots < 1) set $sty_slots,3; else if ($sty_slots > 8) set $sty_slots,8; mes "[Stylish Stylist]"; mes "Приветствую тебя воин."; mes "Я могу тебя чуть-чуть улутшить"; mes "Сделаем тебя смешнее"; mes "Мм красивый ты и так."; mes "Но я сделаю тебя лутше"; mes "Начнём пожалуй."; next; LStart: // Main menu set @s$,""; set @s$,"Изменить мой стиль:Загрузить мой стиль:Сохранить мой стиль:"; if (getgmlevel() > 89) set @s$,@s$+"[GM] Кол-во слотов:"; set @s$,@s$+"Спасибо пока!"; switch(select(@s$)) { case 1: mes "[Stylish Stylist]"; mes "Начнём пожалуй?"; next; LRepeat: // Here we go again switch(select("Изменить мою причу:Цвет волос другой:Цвет одежды другой:В начало.")) { case 1: callfunc "F_StyleBrowse",1,@min_hair_style,@min_hair_style,@max_hair_style; break; case 2: callfunc "F_StyleBrowse",6,@min_hair_color,@min_hair_color,@max_hair_color; break; case 3: callfunc "F_StyleBrowse",7,@min_cloth_color,@min_cloth_color,@max_cloth_color; break; case 4: mes "[Stylish Stylist]"; mes "Что?"; mes "Ладно."; next; goto LStart; break; } goto LRepeat; break; case 2: callfunc "F_StyleLoad"; goto LStart; break; case 3: callfunc "F_StyleSave"; goto LStart; break; case 4: if (getgmlevel() > 39) { mes "[Stylish Stylist]"; mes "Скока слотов?"; next; input @n; set $sty_slots,@n; close; } } mes "[Stylish Stylist]"; mes "Всё увидимся в другой раз."; close; } function script F_StyleBrowse { set @name$[1],"hairstyle"; set @name$[6],"hair color"; set @name$[7],"clothes color"; set @type,getarg(0); set @n,getarg(1); set @min,getarg(2); set @max,getarg(3); set @t,getlook(@type); mes "[Stylish Stylist]"; mes "Итак ты хочеш поменять "+@name$[@type]; mes "Выбирай себе."; next; LRepeat: // Here we go again setlook @type,@n; if (@n < @max) set @s$,"Дальше "+@name$[@type]+":"; else set @s$,"Первую "+@name$[@type]+":"; if (@n > @min) set @s$,@s$+"Предыдущую "+@name$[@type]+":"; else set @s$,@s$+"Последнюю "+@name$[@type]+":"; set @s$,@s$+"Мне '^000088"+@n+"'^000000 нравиться...:Я выбиру сам...:Неет, дай мою обратно."; switch(select(@s$)) { case 1: if (@n < @max) set @n,@n+1; else set @n,@min; goto LRepeat; return; case 2: if (@n > @min) set @n,@n-1; else set @n,@max; goto LRepeat; return; case 3: mes "[Stylish Stylist]"; mes "Прекрасный выбор "+@name$[@type]+"."; next; return; case 4: mes "[Stylish Stylist]"; mes "Выбери номер с ^000088"+@min+"^000000 до ^880000"+@max+"^000000."; next; input @i; if (@i >= @min && @i <= @max) { set @n,@i; mes "[Stylish Stylist]"; mes "Прекрасный выбор."; next; } else { mes "[Stylish Stylist]"; mes "Ой, я ввёл не тот номер."; next; } goto LRepeat; return; case 5: mes "[Stylish Stylist]"; mes "На тебе обратно"; next; specialeffect2 253; setlook @type,@t; return; } } function script F_StyleLoad { mes "[Stylish Stylist]"; mes "Выбери слот откуда загрузить."; next; set @s$,""; for( set @i,1; @i<=$sty_slots; set @i,@i+1) set @s$,@s$+"Slot "+@i+" (HS["+getd("sty_"+@i+"hs")+"] HC["+getd("sty_"+@i+"hc")+"] CC["+getd("sty_"+@i+"cc")+"]):"; set @s$,@s$+"Нет спасибо."; set @n,select(@s$); if (@n <= $sty_slots) { setlook 1,getd("sty_"+@n+"hs"); setlook 6,getd("sty_"+@n+"hc"); setlook 7,getd("sty_"+@n+"cc"); specialeffect2 454; mes "[Stylish Stylist]"; mes "На."; next; } else { mes "[Stylish Stylist]"; mes "Без проблем."; next; } return; } function script F_StyleSave { mes "[Stylish Stylist]"; mes "Куда сохраним?."; next; set @s$,""; for( set @i,1; @i<=$sty_slots; set @i,@i+1) set @s$,@s$+"Slot "+@i+" (HS["+getd("sty_"+@i+"hs")+"] HC["+getd("sty_"+@i+"hc")+"] CC["+getd("sty_"+@i+"cc")+"]):"; set @s$,@s$+"Нет спасибо."; set @n,select(@s$); if (@n <= $sty_slots) { setd "sty_"+@n+"hs",getlook(1); setd "sty_"+@n+"hc",getlook(6); setd "sty_"+@n+"cc",getlook(7); specialeffect2 244; mes "[Stylish Stylist]"; mes "Всё отлично."; next; } else { mes "[Stylish Stylist]"; mes "Без проблем."; next; } return; } Вот ошибка, перепробовал все! И пользуясь случаем, reset npc вот скрипт, ошибка на скрине: prt_in,38,104,7 script Vostein 918,{ // Skills, Stats, Both, Limit setarray .@Reset, 5000, 5000, 9000, 0; setarray .@Item, 7227, 7227, 7227, 0; setarray .@Count, 1, 1, 1, 0; mes "^FF3355[Vostein]^000000"; if(.@Reset[3] && reset_limit > .@Reset[3]) { mes "Sorry you can only reset "+callfunc("F_InsertPlural",.@Reset[3],"time")+" in your life."; close; } mes "I welcome, my name is Vostein!"; mes "I erase memory."; mes "Than I can help?"; next; mes "^FF3355[Vostein]^000000"; mes "^00565Price^000000"; mes "To erase characteristics - loot, zeny"; mes "It will cost to you"; mes "To erase Abilities - ^FFA500loot, zeny^000000"; mes "To erase Statistics - ^FFA500loot, zeny^000000"; mes "To erase all memory - ^FFA500loot, zeny^000000"; set .@i,(select("^0055FFAbilities:Statistics:To erase all memory^000000:No, Thanks")); if(.@i > 3) next; mes "^FF3355[Vostein]^000000"; mes "I say goodbye to you!"; close; } mes "^FF3355[Vostein]^000000"; if (Zeny < .@Reset[.@i-1]) { mes "I'm Sorry, isn't enough zeny!"; close; } if(countitem(.@Item[.@i-1]<.@Count[.@i-1])){ mes "I'm Sorry, isn't enough loot's!"; close; } if(.@Reset[3]){ mes "You can only reset "+callfunc("F_InsertPlural",.@Reset[3],"time")+" in your life, are you sure?"; if(select("Let me think:That's fine") == 1) close; } set Zeny, Zeny-.@Reset[.@i-1]; delitem .@Item[.@i-1],.@Count[.@i-1]; if(.@i&1){ sc_end SC_ALL;// TODO make a sc_end current classes sc only ResetSkill; } if(.@i&2) ResetStatus; mes "Memory is erased!"; if(.@Reset[3]) set reset_limit,reset_limit + 1; close; } Ссылка на комментарий Поделиться на другие сайты Поделиться
pzdcomgwtf Опубликовано 27 февраля, 2017 Автор Жалоба Поделиться Опубликовано 27 февраля, 2017 Зарание спасибо! Ссылка на комментарий Поделиться на другие сайты Поделиться
Salfer Опубликовано 27 февраля, 2017 Жалоба Поделиться Опубликовано 27 февраля, 2017 у тебя пробел вместо %таба% Ссылка на комментарий Поделиться на другие сайты Поделиться
pzdcomgwtf Опубликовано 27 февраля, 2017 Автор Жалоба Поделиться Опубликовано 27 февраля, 2017 (изменено) Протабил точно тоже самое... На 84 линии причем... Суть в том что я поискал аналогичные нпц посмотрел как что там, делаю подобно - но тем немение ошибка не уходит... Изменено 27 февраля, 2017 пользователем pzdcomgwtf Ссылка на комментарий Поделиться на другие сайты Поделиться
Nurkz Опубликовано 27 февраля, 2017 Жалоба Поделиться Опубликовано 27 февраля, 2017 смените кодировку на utf8 Ссылка на комментарий Поделиться на другие сайты Поделиться
pzdcomgwtf Опубликовано 27 февраля, 2017 Автор Жалоба Поделиться Опубликовано 27 февраля, 2017 Протабил, преобразовал в utf8 без ROM Результат на скрине Ссылка на комментарий Поделиться на другие сайты Поделиться
pzdcomgwtf Опубликовано 27 февраля, 2017 Автор Жалоба Поделиться Опубликовано 27 февраля, 2017 Разобрался тему можно удалить если не кому не нужна. 1 Ссылка на комментарий Поделиться на другие сайты Поделиться
Кеник Опубликовано 27 февраля, 2017 Жалоба Поделиться Опубликовано 27 февраля, 2017 3 часа назад, pzdcomgwtf сказал: Разобрался тему можно удалить если не кому не нужна. Так может стоит описать, в чем была причина и как исправлять? Ссылка на комментарий Поделиться на другие сайты Поделиться
pzdcomgwtf Опубликовано 27 февраля, 2017 Автор Жалоба Поделиться Опубликовано 27 февраля, 2017 Я решил проблемму что щас екзешник 20130807 в игру не пускает так что... А вообще Сменил кодировку на utf8 без ROM, Протабил function script F_StyleLoad { на 84 line, на 157 помоему line все. 1 Ссылка на комментарий Поделиться на другие сайты Поделиться
Рекомендуемые сообщения