⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 npc_refine2.txt

📁 JA++的最新...很多ROSF都用这个 ] 是个不错的东西-3-
💻 TXT
📖 第 1 页 / 共 2 页
字号:
🔍
12 
// 精炼，修理相关NPC
// 编辑：Robert蝴蝶君
// 改编：云逝
// 发行：中国部落 Cathena 开发团队
// 最后更新：2004年11月5日

// -----艾尔贝塔-----
alberta_in.gat,21,63,5	script	智诺普		84,{	set @npcname$,"[智诺普]";	callfunc "原石提炼";	}
alberta_in.gat,13,71,4	script	卡拉曼莉斯	86,{	set @npcname$,"[卡拉曼莉斯]";	callfunc "出售金属";	}
alberta_in.gat,28,58,4	script	弗雷德利	85,{	set @npcname$,"[弗雷德利]";	callfunc "装备精炼";	}

// ----- 普隆德拉 -----
prt_in.gat,63,69,4	script	帝特立西	84,{	set @npcname$,"[帝特立西]";	callfunc "原石提炼";	}
prt_in.gat,56,68,4	script	普勒越		86,{	set @npcname$,"[普勒越]";	callfunc "出售金属";	}
prt_in.gat,63,60,4	script	忽克连		85,{	set @npcname$,"[忽克连]";	callfunc "装备精炼";	}

// ----- 梦罗克 -----
morocc_in.gat,72,32,4	script	亚度拉		85,{	set @npcname$,"[亚度拉]";	callfunc "原石提炼";	}
morocc_in.gat,63,32,4	script	沙德		85,{	set @npcname$,"[沙德]";		callfunc "出售金属";	}
morocc_in.gat,73,38,4	script	亚拉甘		85,{	set @npcname$,"[亚拉甘]";	callfunc "装备精炼";	}

// ----- 裴杨 -----
payon_in01.gat,6,47,4	script	夏金		88,{	set @npcname$,"[夏金]";		callfunc "原石提炼";	}
payon_in01.gat,13,47,4	script	伯克纳德	88,{	set @npcname$,"[伯克纳德]";	callfunc "出售金属";	}
payon_in01.gat,6,50,4	script	安东尼奥	88,{	set @npcname$,"[安东尼奥]";	callfunc "装备精炼";	}

// ----- 尤诺 -----
yuno_in01.gat,164,27,4	script	汤马思		84,{	set @npcname$,"[汤马思]";	callfunc "原石提炼";	}
yuno_in01.gat,171,27,4	script	艾尔来特	86,{	set @npcname$,"[艾尔来特]";	callfunc "出售金属";	}
yuno_in01.gat,171,21,4	script	尤思特		85,{	set @npcname$,"[尤思特]";	callfunc "装备精炼";	}

// 装备修理匠
prt_in.gat,58,61,2	script	装备修理匠	63,{
	mes "[装备修理匠]";
	mes "我是修理道具、武器的铁匠，可以修复任何一种东西。";
	mes "你有什么东西需要修理的吗？";
	set @broken1,getbrokenid(1);
	set @broken2,getbrokenid(2);
	set @broken3,getbrokenid(3);
	set @broken4,getbrokenid(4);
	set @broken5,getbrokenid(5);
	set @broken6,getbrokenid(6);
	set @broken7,getbrokenid(7);
	set @broken8,getbrokenid(8);
	set @broken9,getbrokenid(9);
	set @broken10,getbrokenid(10);
	next;
	if(@broken1==NULL && @broken2==NULL && @broken3==NULL && @broken4==NULL && @broken5==NULL 
	&& @broken6==NULL && @broken7==NULL && @broken8==NULL && @broken9==NULL && @broken10==NULL) goto L_CANCEL_3;
	menu	getitemname(@broken1),REPAIR1,
		getitemname(@broken2),REPAIR2,
		getitemname(@broken3),REPAIR3,
		getitemname(@broken4),REPAIR4,
		getitemname(@broken5),REPAIR5,
		getitemname(@broken6),REPAIR6,
		getitemname(@broken7),REPAIR7,
		getitemname(@broken8),REPAIR8,
		getitemname(@broken9),REPAIR9,
		getitemname(@broken10),REPAIR10;
	REPAIR1:
		mes "[装备修理匠]";
		mes "哦，你打算修理" + getitemname(@broken1) + "呀.";
		mes "嗯...我需要一个 ^ff9999钢铁^000000和10000个金币。";
		mes "准备好了吗？";
		next;
		menu "是的",-,"不，让我再想想",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(1);
			goto L_CLOSE;
	REPAIR2:
		mes "[装备修理匠]";
		mes "哦，你打算修理" + getitemname(@broken2) + "呀.";
		mes "嗯...我需要一个 ^ff9999钢铁^000000和10000个金币。";
		mes "准备好了吗？";
		next;
		menu "是的",-,"不，让我再想想",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(2);
			goto L_CLOSE;
	REPAIR3:
		mes "[装备修理匠]";
		mes "哦，你打算修理" + getitemname(@broken3) + "呀.";
		mes "嗯...我需要一个 ^ff9999钢铁^000000和10000个金币。";
		mes "准备好了吗？";
		next;
		menu "是的",-,"不，让我再想想",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(3);
			goto L_CLOSE;
	REPAIR4:
		mes "[装备修理匠]";
		mes "哦，你打算修理" + getitemname(@broken4) + "呀.";
		mes "嗯...我需要一个 ^ff9999钢铁^000000和10000个金币。";
		mes "准备好了吗？";
		next;
		menu "是的",-,"不，让我再想想",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(4);
			goto L_CLOSE;
	REPAIR5:
		mes "[装备修理匠]";
		mes "哦，你打算修理" + getitemname(@broken5) + "呀.";
		mes "嗯...我需要一个 ^ff9999钢铁^000000和10000个金币。";
		mes "准备好了吗？";
		next;
		menu "是的",-,"不，让我再想想",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(5);
			goto L_CLOSE;
	REPAIR6:
		mes "[装备修理匠]";
		mes "哦，你打算修理" + getitemname(@broken6) + "呀.";
		mes "嗯...我需要一个 ^ff9999钢铁^000000和10000个金币。";
		mes "准备好了吗？";
		next;
		menu "是的",-,"不，让我再想想",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(6);
			goto L_CLOSE;
	REPAIR7:
		mes "[装备修理匠]";
		mes "哦，你打算修理" + getitemname(@broken7) + "呀.";
		mes "嗯...我需要一个 ^ff9999钢铁^000000和10000个金币。";
		mes "准备好了吗？";
		next;
		menu "是的",-,"不，让我再想想",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(7);
			goto L_CLOSE;
	REPAIR8:
		mes "[装备修理匠]";
		mes "哦，你打算修理" + getitemname(@broken8) + "呀.";
		mes "嗯...我需要一个 ^ff9999钢铁^000000和10000个金币。";
		mes "准备好了吗？";
		next;
		menu "是的",-,"不，让我再想想",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(8);
			goto L_CLOSE;
	REPAIR9:
		mes "[装备修理匠]";
		mes "哦，你打算修理" + getitemname(@broken9) + "呀.";
		mes "嗯...我需要一个 ^ff9999钢铁^000000和10000个金币。";
		mes "准备好了吗？";
		next;
		menu "是的",-,"不，让我再想想",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(9);
			goto L_CLOSE;
	REPAIR10:
		mes "[装备修理匠]";
		mes "哦，你打算修理" + getitemname(@broken10) + "呀.";
		mes "嗯...我需要一个 ^ff9999钢铁^000000和10000个金币。";
		mes "准备好了吗？";
		next;
		menu "是的",-,"不，让我再想想",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(10);
			goto L_CLOSE;

	L_CANCEL_1:
		mes "[装备修理匠]";
		mes "你还没听明白吗？我需要一个钢铁和10000个金币。";
		mes "亏本的生意我可不做！";
		goto L_CLOSE;
	L_CANCEL_2:
		mes "[装备修理匠]";
		mes "好吧，那就别再使用它了。";
		goto L_CLOSE;
	L_CANCEL_3:
		mes "[装备修理匠]";
		mes "看来你并没有什么东西需要修理的，那么改天再来吧。";
		goto L_CLOSE;
	L_CLOSE:
		close;
}

function	script	原石提炼	{
	mes @npcname$;
	mes "只要你将^FF0000神之金属原石^000000或^FF0000铝原石^000000拿来给我，我马上就可以为你提炼神之金属以及铝。我需要5个原石我才有办法帮你。";
	next;
	menu "提炼神之金属。",L_MENU_1,"提炼铝。",L_MENU_2,"询问有关属性石相关事项。",L_MENU_3;
	L_MENU_1:
		if (countitem(756) < 5) goto L_SUB_1;
		set @nbm,countitem(756) / 5;
			delitem 756,(@nbm * 5);
			getitem 984,@nbm;
			mes @npcname$;
			mes "这是你要的神之金属，欢迎下次再来。";
			close;
		L_SUB_1:
			mes @npcname$;
			mes "哈哈哈...你真爱开玩笑。我不是跟你说过，要是没有5个神之金属原石的话，是无法制作神之金属的吗？";
			close;
	L_MENU_2:
		if (countitem(757) < 5) goto L_SUB_2;
		set @nbm,countitem(757) / 5;
			delitem 757,(@nbm * 5);
			getitem 985,@nbm;
			mes @npcname$;
	  		mes "这是你要的铝，欢迎下次再来。";
			close;
		L_SUB_2:
		mes @npcname$;
		mes "哈哈哈...你真爱开玩笑。";
		mes "我不是跟你说过，要是没有5个铝原石的话，是无法制作铝的吗?";
			close;
	L_MENU_3:
		mes @npcname$;
		mes "所谓属性石...";
		mes "我做锻冶金属这行已经做了二十年，听过很多这类的传说...但还没实际见过呢!";
		mes "我听说金属都各自拥有水、地、火、风等属性。";
		next;
		mes @npcname$;
		mes "听说在锻冶武器时加入属性时的话...所制作出来的武器将拥有那属性时的超强力量。";
		mes "哈哈..不过话说回来，能做出这种武器的人想必一定拥有极高的锻冶技术。";
		close;
}


function	script	出售金属	{
	mes @npcname$;
	mes "这里有卖铁或是钢铁制武品锻治时所需要的金属！";
	mes "这里有卖锻治武器等级1的^007777强化武器用金属-强化级数一^000000";
	mes "与...锻治武器等级2的^007777强化武器用金属-强化级数二^000000等金属。";
	next;
L_START:
	menu "强化武器用金属-强化级数一- 200金币",L_MENU_1,"强化武器用金属-强化级数二- 1000金币",L_MENU_2,"询问有没有其他金属",L_MENU_3;
	L_MENU_1:
		set @itemid,1010;
		set @value,200;
		mes @npcname$;
		mes "你想要购买多少数量？一个需要200ZENY！";
		next;
		goto L_START_1;
	L_MENU_2:
		set @itemid,1011;
		set @value,1000;
		mes @npcname$;
		mes "你想要购买多少数量？一个需要1000ZENY！";
		next;
		goto L_START_1;
12

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -