npc_blacksmith.txt

c151的晋级版

////////////////////////////////////////////////////////////
// 铁匠转职任务                                           //
// JOBCHANGE QUEST - 铁匠- made by EREMES THE CANIVALIZER //
// Converted For Athena By WestChen 2004.02.13            //
////////////////////////////////////////////////////////////

geffen_in.gat,110,169,4	script	铁匠公会服务员	63,{
	mes "[铁匠公会 阿尔特阿伊间]";
	mes "你好？！我们是铁匠公会！我们操作在心理深处的热情。";
	next;
	mes "[铁匠公会 阿尔特阿伊间]";
	mes "把熔化的金属做出新武器是我们的技术！";
	next;
	if(Class == 0) goto LNovice;
	if((Class == 1) | (Class == 7) | (Class == 13) | (Class == 14) | (Class == 21)) goto LSwordman;
	if((Class == 2) | (Class == 9) | (Class == 16)) goto LMage;
	if((Class == 3) | (Class == 11) | (Class == 19) | (Class == 20)) goto LArcher;
	if((Class == 4) | (Class == 8) | (Class == 15)) goto LAcolyte;
	if((Class == 6) | (Class == 12) | (Class == 17)) goto LThief;
	if(Class == 10) goto LBlacksmith;
	if(Class == 5) goto LMerchant;
	goto LOthers;
	close;
LMerchant:
	if(SKILLPOINT > 0) goto LNotReady;
	if(Job_Black == 0) goto LTalk1;
	goto LJobChange;
	close;
LTalk1:
	mes "[阿尔特阿伊间]";
	mes "不要身为商人就满足，不如和我们玩美丽的烟火如何啊？";
	mes "请你写下在那的转职转职申请书上写下你的性名和职业等级。";
	next;
	menu "申请转职。",LJobChange,"要转职需要那些条件？",LAsk,"等一下...",LCancel;
	close;
LJobChange:
	if(SkillPoint != 0) goto LNotReady;
	if((JobLevel > 39) & (Job_Black == 0)) goto LTakeQuest;
	if(JobLevel < 40) goto LNotReady2;
	if((Job_Black > 0) & (Job_Black < 8)) goto LNotReady3;
	if((Job_Black > 8) & (Job_Black < 15)) goto LNotReady4;
	if(Job_Black == 15) goto LTalk2;
	if(Job_Black == 16) goto LTalk3;
	if((Job_Black == 17) & (countitem(1005) > 0)) goto LAllDone;
	close;
LTakeQuest:
	mes "[阿尔特阿伊间]";
	mes "嗯...你的等级还不错喔。";
	next;
	mes "[阿尔特阿伊间]";
	mes "好吧，我们也要过虑受留公会员...至少要有商人的诚实和有着要当铁匠的积极的心应付考试就好了..我看看...";
	next;
	mes "[阿尔特阿伊间]";
	mes "- 翻来翻去 -";
	next;
	mes "[阿尔特阿伊间]";
	mes "嗯...从艾尔贝塔出差中的公会员'盖修 士特'有通报，说那边人手不足。你去帮他的忙吧...你的第一次考试。";
	next;
	set Job_Black,1;
	mes "[阿尔特阿伊间]";
	mes "那麽路上小心。";
	close;
LTalk2:
	mes "[阿尔特阿伊间]";
	mes "辛苦了！！. 第一个考试已经结束了...";
	next;
	mes "[阿尔特阿伊间]";
	mes "嗯？......哈哈哈，并不是只考一次。去梦罗克看看吧，那边会有负责下个考试的公会员。";
	next;
	menu "...太过分了吧. 但是...还是要去啊。",LTakeQuest2,"...咳啊呜啊！我不转职了啦！我不要！",LCancel2;
LTakeQuest2:
	set Job_Black,16;
	mes "[阿尔特阿伊间]";
	mes "....很抱歉...但是办法。你应该也很清楚吧？随便乱收一些乱七八糟的家伙之後所造成的我们公铁匠们的下场！！";
	mes "造成着一些不礼貌的事情而被其他人指着的小部分的人！";
	next;
	mes "[阿尔特阿伊间]";
	mes "就是因为他们，我们铁匠全体都在受到很大的困扰呢！....嗯。不管怎样....去一下梦罗克吧，你会遇到负责下场考试的公会员的。";
	close;
LCancel2:
	mes "[阿尔特阿伊间]";
	mes "什麽？你要放弃转职？再说一次看看！！你竟然说出这种话...这是对我们公会的污辱！！给我滚出去！再也不要想要成为铁匠！";
	next;
	mes "[阿尔特阿伊间]";
	mes "连一点耐心也没有的烂人！连这种小事情也无法忍受，你认为成为铁匠之後会怎麽撑下去啊！！";
	close;
LTalk3:
	mes "[阿尔特阿伊间]";
	mes "嗯？不是说要去梦罗克的吗？还有一个考试再等着呢..";
	close;	
LAsk:
	mes "[阿尔特阿伊间]";
	mes "转职的条件啊 ？首先，职业等级要40以上才可以喔，再来就是要通过公会要求的考试...这两样. 嗯..虽然考试有一点难不过只要用心就可以过的。";
	mes "把考试用品运送到各地区之後了解各地区的特产考试，为了要当铁匠的笔试这两样。";
	close;
LCancel:
	mes "[阿尔特阿伊间]";
	mes "嗯. 那麽待会再见。";
	close;
LAllDone:
	mes "[阿尔特阿伊间]";
	mes "喔，果然...我的眼光没有错。成功的转职了啊！我给你，可以继承火焰之美学的权利。";
	next;
	jobchange 10;
	mes "[阿尔特阿伊间]";
	mes "但是不要忘了。我们是把美放进体里的人呢...不要陷入似欲而脱离正道.....";
	next;
	delitem 1005,1;
	mes "[阿尔特阿伊间]";
	mes "这是...给你的礼物！！恭喜你转职！";
	if(JobLevel > 48) goto LGiveMore;
	getitem 999,5;
	close;
LGiveMore:
	getitem 999,30;
	close;
LNotReady:
	mes "[阿尔特阿伊间]";
	mes "还有剩点数技能就不能申请转职，全部消耗之後再来吧！";
	close;
LNotReady2:
	mes "[阿尔特阿伊间]";
	mes "嗯..你目前还不能当商人...转职为商人是职业等级40以上才可以。我是很想宽容你，不过这是这里的规定...你下次再来好了";
	close;
LNotReady3:
	mes "[阿尔特阿伊间]";
	mes "你还没出发啊？快去找艾尔贝塔的'盖修 士特'啊~那麽待会再见。";
	close;
LNotReady4:
	mes "[阿尔特阿伊间]";
	mes "盖修 士特交代你的事还顺利吗？......他会要求比较高喔....";
	close;
LNovice:
	if(Sex == 0) goto LGirl;
	mes "[铁匠公会  阿尔特阿伊间]";
	mes "你的眼神很魅力.. 你想当铁匠？我们是从商人转职的，在港口之都'艾尔贝塔'可以转职成商人。";
	close;
LGirl:
	mes "[铁匠公会 阿尔特阿伊间]";
	mes "...可爱的女孩子，你想当铁匠？我们是从商人转职的。在港口之都艾尔贝塔可以转职成商人。";
	close;
LSwordman:
	mes "[铁匠公会  阿尔特阿伊间]";
	mes "你要制作什麽剑？很可惜，我做不到。";
	close;
LMage:
	mes "[铁匠公会  阿尔特阿伊间]";
	mes "对属性，有什麽想要说的话？你们的指教很有帮助！";
	close;
LArcher:
	mes "[铁匠公会  阿尔特阿伊间]";
	mes "很可惜，商人以外其他职业不能加入我们公会！";
	close;
LAcolyte:
	mes "[铁匠公会  阿尔特阿伊间]";
	mes "是圣者！请祝福我做出来的金属！";
	close;
LThief:
	mes "[铁匠公会  阿尔特阿伊间]";
	mes "对不起，这里没有值得偷走的东西，只制作短剑而已. ..";
	close;
LBlacksmith:
	mes "[铁匠公会  阿尔特阿伊间]";
	mes "啊~  好久不见！想要购买物品？只在办公室，真无聊";
	close;
LOthers:
	mes "[铁匠公会  阿尔特阿伊间]";
	mes "很可惜。商人以外，其他职业不能加入我们公会！";
	close;
}

alberta_in.gat,174,22,4	script	盖修 士特	63,{
	mes "[盖修 士特]";
	mes "热血！！我是个热血的铁匠！'盖修 士特'~ 很高兴见到你！！";
	next;
	if(Class == 5) goto LTalk;
	mes "[盖修 士特]";
	mes "铁匠是个很幸福的工作呢！！";
	mes "不这麽觉得吗？哇哈哈哈哈哈哈！";
	close;
LTalk:
	mes "[盖修 士特]";
	mes "喔喔喔！是商人吗！ 呵呵...很高兴见到你！刚好我需要一些帮手的呢！！";
	next;
	if(Job_Black == 0) goto LGoAway;
	if(Job_Black == 1) goto LTask1;
	if(Job_Black == 2) goto LTask2;
	if(Job_Black == 3) goto LTask3;
	if((Job_Black > 3) & (Job_Black < 9)) goto LCheckItem;
	if((Job_Black > 8) & (Job_Black < 14)) goto LTellAgain;
	if(Job_Black == 14) goto LCheckTask;
	if(Job_Black == 15) goto LNothing1;
	if(Job_Black > 15) goto LNothing2;
	close;
LGoAway:
	mes "[盖修 士特]";
	mes ".....但是！我也不能揽住忙人！赶快走你的路吧！";
	next;
	mes "[盖修 士特]";
	mes "Crash! Crash! 铛铛铛铛~";
	mes "(哼哼哼)我是个~ 热血的铁匠啊~ ";
	next;
	mes "[盖修 士特]";
	mes "嗯？你还在那啊？！";
	close;
LTask1:
	mes "[盖修 士特]";
	mes "你确定是来自铁匠公会的没有错吧！！？因为最近太多东西要做出来，我一个人都忙不过来了呢！哈哈哈！";
	next;
	mes "[盖修 士特]";
	mes "嗯. 总而言之，你是来帮我的是吧？嗯. 应该不会错吧。那麽..简单的作个面试之後再把事情交给你好了！";
	next;
	mes "[盖修 士特]";
	mes "前几天也有个家伙来过这里，但是实在不懂的基本，而买错材料来了呢！白白浪费了一笔钱的说！";
	mes "我要给你一个叫困难的事情呢...因为这需要基本之制裁可以办的到。那我要问问题罗！可以吧？";
	next;
	menu "可以~",LTakeQuest,"现在还不行..去准备一下状备之後再来好了",LCancel;
	close;
LTakeQuest:
	set @Score,0;
	set @Question,rand(1,3);
	if(@Question == 1) goto LQuestionList1;
	goto LQuestionList2;
	close;
LQuestionList1:
	mes "[盖修 士特]";
	mes "1.下列例子中有什麽是把地区跟特产品的连结是不一致的？！";
	next;
	menu "梦罗克 - 盗贼之衣",LQ1_1Wrong,"艾尔贝塔 - 双手斧",LQ1_1Wrong,"克魔岛 - 菠色克药水",LQ1_1Wrong,"艾尔贝塔 - 尖刃铁锤",LQ1_1Right;
LQ1_1Right:
	set @Score,@Score+10;
LQ1_1Wrong:
	mes "[盖修 士特]";
	mes "2.下列那一像是铁匠的技能中'大地之击'的能力？";
	next;
	menu "混乱",LQ1_2Right,"黑暗",LQ1_2Wrong,"沉没",LQ1_2Wrong,"睡眠",LQ1_2Wrong;
	close;
LQ1_2Right:
	set @Score,@Score+10;
LQ1_2Wrong:
	mes "[盖修 士特]";
	mes "3.什麽是商人不擅长的事情？";
	next;
	menu "开商店",LQ1_3Wrong,"低价买货",LQ1_3Wrong,"高价卖货",LQ1_3Wrong,"快跑",LQ1_3Right;
	close;
LQ1_3Right:
	set @Score,@Score+10;
LQ1_3Wrong:
	mes "[盖修 士特]";
	mes "4.卖蓝色魔力矿石的商店的位置是？";
	next;
	menu "艾尔贝塔",LQ1_4Wrong,"梦罗克",LQ1_4Wrong,"吉芬",LQ1_4Right,"普隆德拉",LQ1_4Wrong;
	close;
LQ1_4Right:
	set @Score,@Score+10;
LQ1_4Wrong:
	mes "[盖修 士特]";
	mes "5.那麽，吉芬道具店在哪里？";
	next;
	menu "吉芬塔为中心8点钟方向",LQ1_5Right,"吉芬塔为中心11点钟方向",LQ1_5Wrong,"吉芬塔为中心6点钟方向",LQ1_5Wrong,"吉芬塔为中心5点钟方向",LQ1_5Wrong;
	close;
LQ1_5Right:
	set @Score,@Score+10;
LQ1_5Wrong:
	mes "[盖修 士特]";
	mes "6.以下哪一种武器是商人无法使用？";
	next;
	menu "双刃短剑",LQ1_6Wrong,"圆柄马刀",LQ1_6Wrong,"链锤",LQ1_6Wrong,"圣言之书",LQ1_6Right;
	close;
LQ1_6Right:
	set @Score,@Score+10;
LQ1_6Wrong:
	mes "[盖修 士特]";
	mes "7.选择以下防具当中防御力最高的东西！";
	next;
	menu "叁角裤",LQ1_7Wrong,"毛皮大衣",LQ1_7Right,"木制铠甲",LQ1_7Wrong,"丝质外袍",LQ1_7Wrong;
	close;
LQ1_7Right:
	set @Score,@Score+10;
LQ1_7Wrong:
	mes "[盖修 士特]";
	mes "8.制作等级3的武器时安全界线是到哪里？！";
	next;
	menu "+3",LQ1_8Wrong,"+4",LQ1_8Wrong,"+5",LQ1_8Right,"+6",LQ1_8Wrong;
	close;
LQ1_8Right:
	set @Score,@Score+10;
LQ1_8Wrong:
	mes "[盖修 士特]";
	mes "9.可以用'玛哪树枝'做得到的物品是什麽？";
	next;
	menu "草帽",LQ1_9Right,"亡者发箍",LQ1_9Wrong,"山羊头盔",LQ1_9Wrong,"鹿角头饰",LQ1_9Wrong;
	close;
LQ1_9Right:
	set @Score,@Score+10;
LQ1_9Wrong:
	mes "[盖修 士特]";
	mes "10.对商人而言最重要的是什麽？";
	next;
	menu "信用",LQ1_10,"诚恳",LQ1_10,"金钱",LQ1_10,"口才",LQ1_10;
	close;
LQ1_10:
	set @Score,@Score+10;
	goto LShowScore;
LQuestionList2:
	mes "[盖修 士特]";
	mes "1.下列例子中有什麽是把地区跟特产品的连结是不一致的？！！";
	next;
	menu "艾尔帕兰 - 天地树叶子",LQ2_1Wrong,"艾尔贝塔 - 钢斧",LQ2_1Wrong,"克魔岛 - 菠色克药水",LQ2_1Wrong,"艾尔帕兰 - 钢斧",LQ2_1Right;
	close;
LQ2_1Right:
	set @Score,@Score+10;
LQ2_1Wrong:
	mes "[盖修 士特]";
	mes "2.杰勒比结晶的价格是多少？";
	next;
	menu "1 zeny",LQ2_2Wrong,"2 zeny",LQ2_2Wrong,"3 zeny",LQ2_2Right,"4 zeny",LQ2_2Wrong;
	close;
LQ2_2Right:
	set @Score,@Score+10;
LQ2_2Wrong:
	mes "[盖修 士特]";
	mes "3.开商店的必要条件是什麽？！";
	next;
	menu "要有手推车。",LQ2_3Right,"要有物品可以卖出去。",LQ2_3Wrong,"要携带着武器。",LQ2_3Wrong,"要穿着盔甲。",LQ2_3Wrong;
	close;
LQ2_3Right:
	set @Score,@Score+10;
LQ2_3Wrong:
	mes "[盖修 士特]";
	mes "4.下列哪各地方式商人的转职所所在地？";
	next;
	menu "艾尔贝塔",LQ2_4Right,"梦罗克",LQ2_4Wrong,"吉芬",LQ2_4Wrong,"普隆德拉",LQ2_4Wrong;
	close;
LQ2_4Right:
	set @Score,@Score+10;
LQ2_4Wrong:
	mes "[盖修 士特]";
	mes "5.梦罗克的武器店在哪里？";
	next;
	menu "以城为中心7点方向",LQ2_5Wrong,"以城为中心11点方向？",LQ2_5Wrong,"以城为中心6点方向？",LQ2_5Wrong,"以城为中心5点方向",LQ2_5Right;
	close;
LQ2_5Right:
	set @Score,@Score+10;
LQ2_5Wrong:
	mes "[盖修 士特]";
	mes "6.以下哪一种武器是商人无法使用？";
	next;
	menu "笨拙短剑",LQ2_6Wrong,"宽剑",LQ2_6Right,"链锤",LQ2_6Wrong,"双手斧",LQ2_6Wrong;
	close;
LQ2_6Right:
	set @Score,@Score+10;
LQ2_6Wrong:
	mes "[盖修 士特]";
	mes "7.以下防具中防御力最强的是什麽？！";
	next;
	menu "叁角裤",LQ2_7Wrong,"毛皮大衣",LQ2_7Right,"木制铠甲",LQ2_7Wrong,"丝质外袍",LQ2_7Wrong;
	close;
LQ2_7Right:
	set @Score,@Score+10;
LQ2_7Wrong:
	mes "[盖修 士特]";
	mes "8.制作等级4的武器的界线是哪里？！";
	next;
	menu "+3 ",LQ2_8Wrong,"+4 ",LQ2_8Right,"+5 ",LQ2_8Wrong,"+6 ",LQ2_8Wrong;
	close;