Автор: T10ne: Дата: 11.20.2009
Много вопросов накапилось...
1.Гв с ним замком(скрипт,если мона указать путь укажите):D
2.Как поставить определенный % что б вешь выпадала из монстра(тоже путь):)
3.Дайте стилиста(может сам найду:D)
....
Вопросы еше сегодня напишу:p
Автор: Мяфк: Дата: 11.20.2009
1) npc\custom\WoE_Setter.txt через него настроить Гв.
3) Есть и стандартный если что npc\custom\dye.txt
Автор: Melhior: Дата: 11.20.2009
Первый вопрос наверное о ГВ с одним замком...
Закрой их и всё... В файле scripts_guild
Автор: T10ne: Дата: 11.20.2009
Цитата TrojanX;15273]1. не понял вапроса
2.battle/drops
3.
[HTML:
prontera,169,180,5 script Стилист 122,{
// 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;
}[/HTML]
Автор: T10ne: Дата: 11.21.2009
Цитата Мяфк;15287:
1) npc\custom\WoE_Setter.txt через него настроить Гв.
3) Есть и стандартный если что npc\custom\dye.txt
Автор: Melhior: Дата: 11.21.2009
Цитата T10ne;15297:
второй вопрос в том что к примеру стоит 10%Голд а хочю 70% как это изменить(путь)?
Автор: Cole McCormick: Дата: 11.21.2009
это меняется в mob_db.txt ищи моба с которого падает голд, в его строке ищи ид голда, и следующее значение это шанс падения, смотри по предыдущим значениям ид итемов которые падают со 100% вероятностью, и примерно рассчитывай.