pzdcomgwtf

Stylist,Reset NPC Unknown syntax

9 сообщений в этой теме

Вот скрипт:

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 "Итак ты хочеш поменять "[email protected]$[@type];
mes "Выбирай себе.";
next;

LRepeat: // Here we go again
setlook @type,@n;

if (@n < @max) set @s$,"Дальше "[email protected]$[@type]+":";
else set @s$,"Первую "[email protected]$[@type]+":";
if (@n > @min) set @s$,@s$+"Предыдущую "[email protected]$[@type]+":";
else set @s$,@s$+"Последнюю "[email protected]$[@type]+":";
set @s$,@s$+"Мне '^000088"[email protected]+"'^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 "Прекрасный выбор "[email protected]$[@type]+".";
next;
return;
case 4:
mes "[Stylish Stylist]";
mes "Выбери номер с ^000088"[email protected]+"^000000 до ^880000"[email protected]+"^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 "[email protected]+" (HS["+getd("sty_"[email protected]+"hs")+"] HC["+getd("sty_"[email protected]+"hc")+"] CC["+getd("sty_"[email protected]+"cc")+"]):";
set @s$,@s$+"Нет спасибо.";
set @n,select(@s$);

if (@n <= $sty_slots) {
setlook 1,getd("sty_"[email protected]+"hs");
setlook 6,getd("sty_"[email protected]+"hc");
setlook 7,getd("sty_"[email protected]+"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 "[email protected]+" (HS["+getd("sty_"[email protected]+"hs")+"] HC["+getd("sty_"[email protected]+"hc")+"] CC["+getd("sty_"[email protected]+"cc")+"]):";
set @s$,@s$+"Нет спасибо.";
set @n,select(@s$);

if (@n <= $sty_slots) {
setd "sty_"[email protected]+"hs",getlook(1);
setd "sty_"[email protected]+"hc",getlook(6);
setd "sty_"[email protected]+"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 [email protected],    5000,    5000,    9000,    0;
    setarray [email protected], 7227, 7227, 7227, 0;
    setarray [email protected], 1, 1, 1, 0;
    mes "^FF3355[Vostein]^000000";
    if([email protected][3] && reset_limit > [email protected][3]) {
        mes "Sorry you can only reset "+callfunc("F_InsertPlural",[email protected][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 [email protected],(select("^0055FFAbilities:Statistics:To erase all memory^000000:No, Thanks"));
    if([email protected] > 3)
    next;
    mes "^FF3355[Vostein]^000000"; 
    mes "I say goodbye to you!"; 
    close;
    }
    mes "^FF3355[Vostein]^000000";
    if (Zeny < [email protected][[email protected]]) {
        mes "I'm Sorry, isn't enough zeny!";
    close;
    }
    if(countitem([email protected][[email protected]]<[email protected][[email protected]])){
        mes "I'm Sorry, isn't enough loot's!";
    close;
    }
    if([email protected][3]){
        mes "You can only reset "+callfunc("F_InsertPlural",[email protected][3],"time")+" in your life, are you sure?";
        if(select("Let me think:That's fine") == 1) close;
    }
    set Zeny, [email protected][[email protected]];
    delitem [email protected][[email protected]],[email protected][[email protected]];
    if([email protected]&1){
        sc_end SC_ALL;// TODO make a sc_end current classes sc only
        ResetSkill;
    }
    if([email protected]&2) ResetStatus;
    mes "Memory is erased!";
    if([email protected][3]) set reset_limit,reset_limit + 1;
    close;
}
 

 

 

Безымянный.png

0

Поделиться сообщением


Ссылка на сообщение
Поделиться на других сайтах

Зарание спасибо!

0

Поделиться сообщением


Ссылка на сообщение
Поделиться на других сайтах

у тебя пробел вместо %таба%

0

Поделиться сообщением


Ссылка на сообщение
Поделиться на других сайтах

Протабил точно тоже самое...

На 84 линии причем... Суть в том что я поискал аналогичные нпц посмотрел как что там, делаю подобно - но тем немение ошибка не уходит...

Изменено пользователем pzdcomgwtf
0

Поделиться сообщением


Ссылка на сообщение
Поделиться на других сайтах

смените кодировку на utf8

0

Поделиться сообщением


Ссылка на сообщение
Поделиться на других сайтах

Протабил, преобразовал в utf8 без ROM Результат на скрине

Безымянный.png

0

Поделиться сообщением


Ссылка на сообщение
Поделиться на других сайтах

Разобрался тему можно удалить если не кому не нужна.

 

-1

Поделиться сообщением


Ссылка на сообщение
Поделиться на других сайтах
3 часа назад, pzdcomgwtf сказал:

Разобрался тему можно удалить если не кому не нужна.

 

Так может стоит описать, в чем была причина и как исправлять?

0

Поделиться сообщением


Ссылка на сообщение
Поделиться на других сайтах

Я решил проблемму что щас екзешник 20130807 в игру не пускает так что...

А вообще Сменил кодировку на utf8 без ROM, Протабил  function script F_StyleLoad { на 84 line, на 157 помоему line все.

1

Поделиться сообщением


Ссылка на сообщение
Поделиться на других сайтах

Создайте аккаунт или войдите для комментирования

Вы должны быть пользователем, чтобы оставить комментарий

Создать аккаунт

Зарегистрируйтесь для получения аккаунта. Это просто!


Зарегистрировать аккаунт

Войти

Уже зарегистрированы? Войдите здесь.


Войти сейчас