📄 npc_dye.txt
字号:
//==============================================
// 发色、发型、染料制作、药剂制作
// 代码重写 by FPE (2006.6.27)
// Jathena++ 论坛：http://www.foxofice.net/bbs
//----------------------------------------------
//==================================== 发 色 ====================================
//callfunc "MFJA_dye_function01",<物品1>,<发色代码>,"<颜色>";
function script MFJA_dye_func01 {
if(countitem(getarg(0))<1 || zeny<2000)
{
mes "[染发师]";
mes "您必须带来"+getarg(2)+"色染料和2000Zeny我才能帮你。";
close;
end;
}
mes "[染发师]";
mes "请稍后，我这就给您染出新的精彩";
next;
delitem getarg(0),1;
set zeny,zeny-2000;
setlook 6,getarg(1);
mes "[染发师]";
mes "染好了，新的颜色很适合你嘛，欢迎下次再来。";
close;
end;
}
alberta.gat,111,234,4 script 染发师 90,{
mes "[染发师]";
mes "欢迎光临！";
mes "本店可为您重新染发，不过您得自备染料和2000Zeny，想染发吗？";
next;
menu "红色",A01,
"黄色",A02,
"蓝色",A03,
"绿色",A04,
"橙色",A05,
"紫色",A06,
"白色",A07,
"黑色",A08,
"取消",-;
mes "[染发师]";
mes "那么欢迎下次再来。";
close;
end;
A01:
callfunc "MFJA_dye_func01",975,8,"红";
A02:
callfunc "MFJA_dye_func01",976,1,"黄";
A03:
callfunc "MFJA_dye_func01",978,5,"蓝";
A04:
callfunc "MFJA_dye_func01",979,4,"绿";
A05:
callfunc "MFJA_dye_func01",980,3,"橙";
A06:
callfunc "MFJA_dye_func01",981,2,"紫";
A07:
callfunc "MFJA_dye_func01",982,6,"白";
A08:
callfunc "MFJA_dye_func01",983,7,"黑";
}
//------------------------------------ 发 色 ------------------------------------
//==================================== 发 型 ====================================
alberta.gat,113,234,4 script 发型师 90,{
mes "[发型师]";
mes "发型也是一种极具个性化的艺术，想要个完美的发型吗？";
mes "每种发型只需要5000zeny";
next;
while(1)
{
switch(select("第1款","第2款","第3款","第4款","第5款","第6款","第7款","第8款","第9款","第10款","第11款","第12款","第13款","第14款","第15款","第16款","第17款","第18款","第19款","第20款","第21款","第22款","第23款","取消"))
{
case 24:
mes "[发型师]";
mes "那好吧，欢迎下次再来。";
close;
end;
break;
default:
if(@menu<10) set @hair$,"hair_"+(sex?"m":"f")+"_0"+@menu;
else set @hair$,"hair_"+(sex?"m":"f")+"_"+@menu;
set @hair_type,@menu;
cutin @hair$,4;
mes "[发型师]";
mes "您喜欢这个发型吗？";
next;
switch(select("是的","看看其他款式"))
{
case 1:
if(zeny<5000)
{
cutin @hair$,255;
mes "[发型师]";
mes "顾客您的金额不足，请足额支付，谢谢。";
close;
end;
}
set zeny,zeny-5000;
cutin @hair$,255;
mes "[发型师]";
mes "您的眼光不错嘛，这个发型一定适合你，请稍后。";
next;
setlook 1,@hair_type;
mes "[发型师]";
mes "您的头发做好了，喜欢吗？";
close;
end;
break;
case 2:
break;
}
break;
}
}
}
//------------------------------------ 发 型 ------------------------------------
//==================================== 服 色 ====================================
prontera.gat,146,160,5 script 服装师 90,{
mes "[服装师]";
mes "你不觉得衣服太旧了吗？";
mes "只要400000Zeny我可以给你弄得焕然一新";
next;
switch(select("还原色彩","第一种色","第二种色","第三种色","第四种色"))
{
if(zeny<400000)
{
mes "[服装师]";
mes "很抱歉，顾客您的金额不足。";
mes "欢迎下次再来光临小店。";
close;
end;
}
set zeny,zeny-400000;
setlook 7,@menu-1;
mes "[服装师]";
mes "您的衣服已经烫洗好了。";
mes "欢迎下次再来光临小店。";
close;
end;
}
}
//------------------------------------ 服 色 ------------------------------------
//==================================== 染 料 ====================================
//callfunc "MFJA_dye_function02",<参数>;
function script MFJA_dye_func02 {
deletearray @item[0],16;
set @type,getarg(0);
switch(select(getitemname(975),getitemname(976),getitemname(978),getitemname(979),getitemname(980),getitemname(981),getitemname(982),getitemname(983),"取消"))
{ //<染料代码>,<染料价格>,<item1>,<num1>,<item2>,<num2>,<item3>,<num3>,<item4>,<num4>,<item5>,<num5>,<item6>,<num6>,<item7>,<num8>
case 1:
setarray @item,975,3000,507,30,973,1,713,1,0,0,0,0,0,0,0,0;
break;
case 2:
setarray @item,976,3000,508,30,973,1,713,1,0,0,0,0,0,0,0,0;
break;
case 3:
setarray @item,978,3000,510,30,973,1,713,1,0,0,0,0,0,0,0,0;
break;
case 4:
setarray @item,979,3000,510,5,507,20,508,20,973,1,974,1,713,1,0,0;
break;
case 5:
setarray @item,980,3000,507,20,508,20,973,1,974,1,713,1,0,0,0,0;
break;
case 6:
setarray @item,981,3000,510,10,507,30,973,1,974,1,713,1,0,0,0,0;
break;
case 7:
setarray @item,982,3000,509,30,973,1,713,1,0,0,0,0,0,0,0,0;
break;
case 8:
setarray @item,983,3000,507,30,508,30,510,5,511,30,973,1,974,1,713,1;
break;
default:
close;
end;
break;
}
if(@type==1)
{
for(set @i,0;@i<7;set @i,@i+1)
{
if(@item[@i*2+2] && @item[@i*2+3])
{
if(countitem(@item[@i*2+2])<@item[@i*2+3])
{
next;
mes "[兹巴杜力]";
mes "对不起，材料不够。";
close;
end;
}
}
}
if(zeny<@item[1])
{
next;
mes "[兹巴杜力]";
mes "对不起，您的加工费不够。";
close;
end;
}
next;
mes "[兹巴杜力]";
mes "这就帮你做" + getitemname(@item[0]) + "。";
mes "请稍等";
for(set @i,0;@i<7;set @i,@i+1)
{
if(@item[@i*2+2] && @item[@i*2+3])
delitem @item[@i*2+2],@item[@i*2+3];
}
set zeny,zeny-@item[1];
next;
mes "[兹巴杜力]";
mes "终于完成了，请收好。";
getitem @item[0],1;
close;
end;
}
if(@type==2)
{
next;
mes getitemname(@item[0]);
for(set @i,0;@i<7;set @i,@i+1)
if(@item[@i*2+2] && @item[@i*2+3]) mes getitemname(@item[@i*2+2]) + @item[@i*2+3] + "个";
mes @item[1] + " Zeny";
close;
end;
}
}
morocc_in.gat,145,99,4 script 兹巴杜力 58,{
mes "[兹巴杜力]";
mes "我专门从事染料研究和制作，你需要什么染料？";
switch(select("制作染料","查询染料合成物","取消"))
{
case 3:
close;
end;
break;
default:
callfunc "MFJA_dye_func02",@menu;
break;
}
}
//------------------------------------ 染 料 ------------------------------------
//==================================== 药 剂 ====================================
geffen_in.gat,139,140,4 script 莫基斯坦 121,{
mes "[莫基斯坦]";
mes "本世纪最杰出的化学专家就是我啦，请问你要合成什么溶剂？";
next;
mes "[莫基斯坦]";
menu "合成中和剂",A01,
"合成混合剂",A02,
"合成说明",A03,
"取消",-;
close;
end;
A01:
if(countitem(971)<1 || countitem(713)<1 || countitem(970)<1)
{
mes "对不起，材料不够。";
close;
end;
}
if(zeny<3000)
{
mes "没钱？我就不会弄了。";
close;
end;
}
mes "材料足够，立即开工，失陪一下...";
delitem 971,1;
delitem 713,1;
delitem 970,1;
set zeny,zeny-3000;
next;
mes "[莫基斯坦]";
mes "小心保管中和剂，我还有事，拜拜。";
getitem 973,1;
close;
end;
A02:
if(countitem(972)<1 || countitem(713)<1 || countitem(970)<1)
{
mes "对不起，材料不够。";
close;
end;
}
if(zeny<4000)
{
mes "没钱？我就不会弄了。";
close;
end;
}
mes "材料足够，立即开工，失陪一下...";
delitem 972,1;
delitem 713,1;
delitem 970,1;
set zeny,zeny-4000;
next;
mes "[莫基斯坦]";
mes "小心保管混合剂，我还有事，拜拜。";
getitem 974,1;
close;
end;
A03:
mes "[中和剂]";
mes "酒精1个、帝特立米药水1个、空瓶1个、Zeny3000";
mes "[混合剂]";
mes "酒精1个、卡勒波迪药水1个、空瓶1个、Zeny4000";
close;
end;
}
//------------------------------------ 药 剂 ------------------------------------⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -