📄 npc_blacksmith.txt
字号:
//==============================================
// 铁匠转职任务
// 代码重写 & 修正 by FPE (2006.6.27)
// Jathena++ 论坛：http://www.foxofice.net/bbs
//----------------------------------------------
geffen_in.gat,110,169,4 script 铁匠公会服务员 63,{
mes "[铁匠公会 阿尔特阿伊间]";
mes "你好？！我们是铁匠公会！我们操作在心理深处的热情。";
next;
mes "[铁匠公会 阿尔特阿伊间]";
mes "把熔化的金属做出新武器是我们的技术！";
next;
if(Class==0)
{
mes "[铁匠公会 阿尔特阿伊间]";
if (sex) mes "你的眼神很魅力..你想当铁匠？我们是从商人转职的，在港口之都'艾尔贝塔'可以转职成商人。";
else mes "...可爱的女孩子，你想当铁匠？我们是从商人转职的。在港口之都艾尔贝塔可以转职成商人。";
close;
end;
}
if(Class==1 || Class==7 || Class==13 || Class==14 || Class==21)
{
mes "[铁匠公会 阿尔特阿伊间]";
mes "你要制作什么剑？很可惜，我做不到。";
close;
end;
}
if(Class==2 || Class==9 || Class==16)
{
mes "[铁匠公会 阿尔特阿伊间]";
mes "对属性，有什么想要说的话？你们的指教很有帮助！";
close;
end;
}
if(Class==3 || Class==11 || Class==19 || Class==20)
{
mes "[铁匠公会 阿尔特阿伊间]";
mes "很可惜，商人以外其他职业不能加入我们公会！";
close;
end;
}
if(Class==4 || Class==8 || Class==15)
{
mes "[铁匠公会 阿尔特阿伊间]";
mes "是圣者！请祝福我做出来的金属！";
close;
end;
}
if(Class==6 || Class==12 || Class==17)
{
mes "[铁匠公会 阿尔特阿伊间]";
mes "对不起，这里没有值得偷走的东西，只制作短剑而已. ..";
close;
end;
}
if(Class==10)
{
mes "[铁匠公会 阿尔特阿伊间]";
mes "啊~ 好久不见！想要购买物品？只在办公室，真无聊";
close;
end;
}
if(Class==5)
{
if(black_q==0)
{
mes "[阿尔特阿伊间]";
mes "不要身为商人就满足，不如和我们玩美丽的烟火如何啊？请你在转职申请书上写下你的姓名和职业等级。";
next;
switch(select("申请转职","要转职需要那些条件？","等一下.."))
{
case 1:
if(SkillPoint!=0)
{
mes "[阿尔特阿伊间]";
mes "还有剩点数技能就不能申请转职，全部消耗之后再来吧！";
close;
end;
}
if(JobLevel<40)
{
mes "[阿尔特阿伊间]";
mes "嗯..你目前还不能当铁匠...转职为铁匠是职业等级40以上才可以。我是很想宽容你，不过这是这里的规定...你下次再来好了。";
close;
end;
}
mes "[阿尔特阿伊间]";
mes "嗯...你的等级还不错喔。";
next;
mes "[阿尔特阿伊间]";
mes "好吧，我们也要过虑受留公会员...至少要有商人的诚实和有着要当铁匠的积极的心应付考试就好了..我看看...";
next;
mes "[阿尔特阿伊间]";
mes "- 翻来翻去 -";
next;
mes "[阿尔特阿伊间]";
mes "嗯...从艾尔贝塔出差中的公会员'盖修 士特'有通报，说那边人手不足。你去帮他的忙吧...你的第一次考试。";
next;
set black_q,1;
mes "[阿尔特阿伊间]";
mes "那么路上小心。";
close;
end;
break;
case 2:
mes "[阿尔特阿伊间]";
mes "转职的条件啊？首先，职业等级要40以上才可以喔，再来就是要通过公会要求的考试...这两样，嗯，虽然考试有一点难不过只要用心就可以过的。";
next;
mes "[阿尔特阿伊间]";
mes "把考试用品运送到各地区之后了解各地区的特产考试，为了要当铁匠的笔试这两样。";
close;
end;
break;
case 3:
mes "[阿尔特阿伊间]";
mes "嗯，那么待会再见。";
close;
end;
break;
}
}
if(black_q>0 && black_q<8)
{
mes "[阿尔特阿伊间]";
mes "你还没出发啊？快去找艾尔贝塔的'盖修 士特'啊~那么待会再见。";
close;
end;
}
if(black_q>8 && black_q<15)
{
mes "[阿尔特阿伊间]";
mes "盖修 士特交代你的事还顺利吗？......他会要求比较高喔....";
close;
end;
}
if(black_q==15)
{
mes "[阿尔特阿伊间]";
mes "辛苦了！！第一个考试已经结束了...";
next;
mes "[阿尔特阿伊间]";
mes "嗯？......哈哈哈，并不是只考一次。去梦罗克看看吧，那边会有负责下个考试的公会员。";
next;
if(select("...太过分了吧. 但是...还是要去啊。","...咳啊呜啊！我不转职了啦！我不要！")==1)
{
set black_q,16;
mes "[阿尔特阿伊间]";
mes "....很抱歉...但是办法。你应该也很清楚吧？随便乱收一些乱七八糟的家伙之后所造成的我们公铁匠们的下场！！";
mes "造成着一些不礼貌的事情而被其他人指着的小部分的人！";
next;
mes "[阿尔特阿伊间]";
mes "就是因为他们，我们铁匠全体都在受到很大的困扰呢！....嗯。不管怎样....去一下梦罗克吧，你会遇到负责下场考试的公会员的。";
close;
end;
}
mes "[阿尔特阿伊间]";
mes "什么？你要放弃转职？再说一次看看！！你竟然说出这种话...这是对我们公会的污辱！！给我滚出去！再也不要想要成为铁匠！";
next;
mes "[阿尔特阿伊间]";
mes "连一点耐心也没有的烂人！连这种小事情也无法忍受，你认为成为铁匠之后会怎么撑下去啊！！";
close;
end;
}
if(black_q==16)
{
mes "[阿尔特阿伊间]";
mes "嗯？不是说要去梦罗克的吗？还有一个考试再等着呢..";
close;
end;
}
if(black_q==17 && countitem(1005)>0)
{
mes "[阿尔特阿伊间]";
mes "喔，果然...我的眼光没有错。成功的转职了啊！我给你，可以继承火焰之美学的权利。";
next;
jobchange 10,Upper;
set ReClass,10;
mes "[阿尔特阿伊间]";
mes "但是不要忘了。我们是把美放进体里的人呢...不要陷入似欲而脱离正道.....";
next;
delitem 1005,1;
mes "[阿尔特阿伊间]";
mes "这是...给你的礼物！！恭喜你转职！";
if(JobLevel>48) getitem 999,30;
else getitem 999,5;
close;
end;
}
}
else
{
mes "[铁匠公会 阿尔特阿伊间]";
mes "很可惜。商人以外，其他职业不能加入我们公会！";
close;
end;
}
}
alberta_in.gat,174,22,4 script 盖修 士特 63,{
mes "[盖修 士特]";
mes "热血！！我是个热血的铁匠！'盖修 士特'~ 很高兴见到你！！";
next;
if(Class==5)
{
mes "[盖修 士特]";
mes "喔喔喔！是商人吗！呵呵...很高兴见到你！刚好我需要一些帮手的呢！！";
next;
if(black_q==0)
{
mes "[盖修 士特]";
mes ".....但是！我也不能揽住忙人！赶快走你的路吧！";
next;
mes "[盖修 士特]";
mes "Crash! Crash! 铛铛铛铛~";
mes "(哼哼哼)我是个~ 热血的铁匠啊~ ";
next;
mes "[盖修 士特]";
mes "嗯？你还在那啊？！";
close;
end;
}
if(black_q==1)
{
mes "[盖修 士特]";
mes "你确定是来自铁匠公会的没有错吧！！？因为最近太多东西要做出来，我一个人都忙不过来了呢！哈哈哈！";
next;
mes "[盖修 士特]";
mes "嗯. 总而言之，你是来帮我的是吧？嗯. 应该不会错吧。那么..简单的作个面试之后再把事情交给你好了！";
next;
mes "[盖修 士特]";
mes "前几天也有个家伙来过这里，但是实在不懂的基本，而买错材料来了呢！白白浪费了一笔钱的说！";
mes "我要给你一个叫困难的事情呢...因为这需要基本之制裁可以办的到。那我要问问题罗！可以吧？";
next;
if(select("好...那么去准备一下再来吧。","有备无患！安全第一！小心的态度也不算是不好啦")==2)
{
mes "[盖修 士特]";
mes "好...那么去准备一下再来吧。";
mes "有备无患！安全第一！小心的态度也不算是不好啦";
close;
end;
}
LTakeQuest:
set @Score,0;
set @Question,rand(1,2);
if(@Question==1)
{
mes "[盖修 士特]";
mes "1.下列例子中有什么是把地区跟特产品的连结是不一致的？！";
if(select("梦罗克 - 盗贼之衣","艾尔贝塔 - 双手斧","克魔岛 - 菠色克药水","艾尔贝塔 - 尖刃铁锤")==4) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "2.下列那一像是铁匠的技能中'大地之击'的能力？";
if(select("混乱","黑暗","沉没","睡眠")==1) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "3.什么是商人不擅长的事情？";
if(select("开商店","低价买货","高价卖货","快跑")==4) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "4.卖蓝色魔力矿石的商店的位置是？";
if(select("艾尔贝塔","梦罗克","吉芬","普隆德拉")==3) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "5.那么，吉芬道具店在哪里？";
if(select("吉芬塔为中心8点钟方向","吉芬塔为中心11点钟方向","吉芬塔为中心6点钟方向","吉芬塔为中心5点钟方向")==1) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "6.以下哪一种武器是商人无法使用？";
if(select("双刃短剑","圆柄马刀","链锤","圣言之书")==4) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "7.选择以下防具当中防御力最高的东西！";
if(select("三角裤","毛皮大衣","木制铠甲","丝质外袍")==2) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "8.制作等级3的武器时安全界线是到哪里？！";
if(select("+3","+4","+5","+6")==3) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "9.可以用'玛哪树枝'做得到的物品是什么？";
if(select("草帽","亡者发箍","山羊头盔","鹿角头饰")==1) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "10.对商人而言最重要的是什么？";
if(select("信用","诚恳","金钱","口才")) set @Score,@Score+10;
mes "[盖修 士特]";
mes "嗯，好了！！辛苦你了！";
next;
mes "[盖修 士特]";
mes "那么...分数是 " + @Score + "分.....";
next;
if(@Score==100 || @Score>80 && black_q==2)
{
set black_q,3;
mes "[盖修 士特]";
mes "喔喔！！这样就没问题了！来来...";
next;
mes "[盖修 士特]";
mes "那么，我就把事情交给你好了！我去准备一下..等一下再见吧！";
close;
end;
}
else if(black_q==2)
{
mes "[盖修 士特]";
set black_q,2;
mes ".............";
next;
mes "[盖修 士特]";
mes "那个，不好意思，你又错了耶，是不是有点过分啊！如果继续这样错下去的话就没有办法把事情交给你呢，再去念点书过来吧！";
close;
end;
}
else
{
set black_q,2;
mes "[盖修 士特]";
mes ".............";
next;
mes "[盖修 士特]";
mes "那个，不好意思，如果你连这种知识也没有的话，没有办法把事情交给你呢。再去念点书在来吧！";
close;
end;
}
}
if(@Question==2)
{
mes "[盖修 士特]";
mes "1.下列例子中有什么是把地区跟特产品的连结是不一致的？！！";
if(select("艾尔帕兰 - 天地树叶子","艾尔贝塔 - 钢斧","克魔岛 - 菠色克药水","艾尔帕兰 - 钢斧")==4) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "2.杰勒比结晶的价格是多少？";
if(select("1 zeny","2 zeny","3 zeny","4 zeny")==3) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "3.开商店的必要条件是什么？！";
if(select("要有手推车。","要有物品可以卖出去。","要携带着武器。","要穿着盔甲。")==1) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "4.下列哪各地方式商人的转职所所在地？";
if(select("艾尔贝塔","梦罗克","吉芬","普隆德拉")==1) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "5.梦罗克的武器店在哪里？";
if(select("以城为中心7点方向","以城为中心11点方向","以城为中心6点方向","以城为中心5点方向")==4) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "6.以下哪一种武器是商人无法使用？";
if(select("笨拙短剑","宽剑","链锤","双手斧")==2) set @Score,@Score+10;
next;
mes "[盖修 士特]";
mes "7.以下防具中防御力最强的是什么？！";
if(select("三角裤","毛皮大衣","木制铠甲","丝质外袍")==2) set @Score,@Score+10;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -