📄 npc_merchant.txt
字号:
//Merchant Quest for Athena by RoVeRT
//Modify by Robert 蝴蝶君 2004-3-13 Mail:robert_st@21cn.com
alberta_in.gat,53,43,6 script 商人公会会员 86,{
set @TEMP,0;
mes "[会员 曼修]";
if(Test_MER==2) goto JobMercQE2;
if((Test_MER==10) || (Test_MER==9)) goto JobMerQE10o9;
if(((Test_MER==8) || (Test_MER==7)) & (Test_MER != 0)) goto JobMerQE8o7aN0;
if((Test_MER <= 6) & (Test_MER != 0)) goto JobMerQLE6aN0;
mes "请问有什么事情吗？";
next;
menu "转职成为商人。",M0,"询问有关商人的事项。",M1,"询问有关转职为商人的条件。",M2,"放弃。",MEnd;
M0:
if(Class==5) goto JobMer;
if((Class !=5) & (Class !=0)) goto JNMaJNN;
mes "[会员 曼修]";
mes "你想成为商人吗？...";
next;
if(JobLevel < 10) goto NotLvl;
mes "[会员 曼修]";
mes "很好，那么，请在这份申请书上签名，并且备妥加入商人公会的入会费用1000金币。";
mes "啊~你要是现在手头上不方便的话，可以先缴交500金币保证金，馀款部分等到转职考试考完后再交也可以。";
mes "怎么样？你要现在加入吗？";
next;
menu "加入。",M00,"不，我考虑看看┅",M0End;
M00:
set Test_MER,0;
set Test_MER2,0;
set Test_MER3,0;
mes "[会员 曼修]";
mes "名字叫... " + strcharinfo(0) + " ...";
mes "这份申请书必须和会费一起交出去，你想要怎么缴纳会费呢？";
next;
menu "1000金币一次付清。",M000,"分期付款，先缴交500金币。",M001,"放弃。",M00End;
M000:
mes "[会员 曼修]";
if(Zeny >= 1000) goto Zeny1k;
mes "看你的表情好像有点困难，你也可以采用分期付款，先缴交500金币，你好好考虑一下吧！";
close;
Zeny1k:
set Zeny,Zeny-1000;
set Test_MER,4;
mes "看一看，是1000金币没错。";
goto M00Cont;
M001:
mes "[会员 曼修]";
if(Zeny >= 500) goto Zeny05k;
mes "...你不要摆出一副'我也不想一毛钱都没有'的表情嘛，快点去筹钱吧！";
close;
Zeny05k:
set Zeny,Zeny-500;
set Test_MER,3;
mes "看一看，是500金币没错。好吧！虽然分期付款并不是个好习惯...";
goto M00Cont;
M00End:
mes "[会员 曼修]";
mes "准备好后，欢迎你随时来找我！";
close;
M0End:
mes "[会员 曼修]";
mes "你现在没有钱是吗？等筹好钱再来吧！";
close;
M00Cont:
next;
mes "[会员 曼修]";
mes "很好，你已经填妥公会加入申请书，我会帮你送出去的，那么，现在就让我来为你说明转职考试的相关事项吧！对了，在那之前有一点我必须要提醒你。";
mes "商人注重商誉，不要欺骗别人，知道吗？";
next;
set @TEMP,rand(4);
mes "[会员 曼修]";
if(@TEMP == 1)
goto R0;
if(@TEMP == 2)
goto R1;
if(@TEMP == 3)
goto R2;
else(@TEMP == 4)
goto R3;
R0:
mes "到仓库去取物品，然后将它送到普隆德拉的旧剑士公会去，交给卡普拉公司普隆德拉支部总负责人就可以了。";
set @TEMP,rand(2);
goto R00;
R00:
if(@TEMP !=0) goto R01;
mes "物品统一编号：2485741.";
set Test_MER2,1;
next;
goto M00Cont1;
R01:
mes "物品统一编号：2328137.";
set Test_MER2,2;
next;
goto M00Cont1;
R1:
mes "到仓库去取物品，然后将它送到吉芬的魔法学校去，交给那里的服务员就可以了。";
set @TEMP,rand(2);
goto R10;
R10:
if(@TEMP !=0) goto R10;
mes "物品统一编号：2989396.";
set Test_MER2,3;
next;
goto M00Cont1;
R11:
mes "物品统一编号：2191737.";
set Test_MER2,4;
next;
goto M00Cont1;
R2:
mes "到仓库去取物品，然后将它送到梦罗克的染料制造厂去，交给兹巴杜力师傅就可以了。";
set @TEMP,rand(2);
goto R20;
R20:
if(@TEMP !=0) goto R21;
mes "物品统一编号：3012685.";
set Test_MER2,5;
next;
goto M00Cont1;
R21:
mes "物品统一编号：3487372.";
set Test_MER2,6;
next;
goto M00Cont1;
R3:
mes "到仓库去取物品，然后将它送到依斯鲁得岛去，交给卡普拉职员就可以了。";
set @TEMP,rand(2);
goto R30;
R30:
if(@TEMP !=0) goto R31;
mes "物品统一编号：3318702.";
set Test_MER2,7;
next;
goto M00R3;
R31:
mes "物品统一编号：3543625.";
set Test_MER2,8;
next;
goto M00R3;
M00R3:
next;
mes "[会员 曼修]";
mes "另外... (这是我私人的请求，当你将物品交给对方时，请把这封信也交给他。别忘记咯~麻烦你了~~)";
getitem 1072,1;
next;
goto M00Cont1;
M00Cont1:
mes "[会员 曼修]";
mes "记住这个编号，到仓库去告诉仓库管理员你的目的地和统一编号，他就会把东西拿出来给你，千万要记得喔！";
mes "仓库是由我为中心，右手边那间房间就是了。";
next;
mes "[会员 曼修]";
mes "事情办完后回到这里来，把收据交回拿物品的那个仓库去，然后再来找我就可以了。";
mes "那么，路上小心！";
close;
M1:
mes "[会员 曼修]";
mes "商人？简单的说就是藉由卖东西来赚钱的人。";
mes "虽然既不太会打架，也没有特别的攻击或回复技能，但可以用低廉的价格买进并以高价卖出所拥有的商品。";
next;
mes "[会员 曼修]";
mes "虽然商人有一招金钱攻击的技能，但是很浪费，所以请你考虑清楚再使用。除了剑、权杖或是双手剑等以外的武器才能使用，当然啦！买卖这些东西是没有问题的。";
mes "嗯，简单来说，商人呢，就是个可以赚很多钱的职业，知道了吗？";
close;
M2:
mes "[会员 曼修]";
mes "具备三个条件才可以成为商人。";
next;
mes "[会员 曼修]";
mes "第一，虽然说商人就是藉由买卖物品赚钱的人，但是基本技能等级最少还是要达到9级以上才可以。";
next;
mes "[会员 曼修]";
mes "第二，加入商人公会的入会费要1000金币，真想成为商人的话，这点小钱应该难不倒你吧！嗯~";
next;
mes "[会员 曼修]";
mes "第三，你还必须通过基本体力与方向感的转职测验，我会要你到某个指定的村落去送东西给某个特定的人，到时候再看你的正确性来决定是否让你转职。";
close;
MEnd:
close;
JobMer:
mes "[会员 曼修]";
mes ".....? 你说什么啊？你已经是商人啦！你该不会是在跟我开玩笑吧？！";
close;
JNMaJNN:
mes "[会员 曼修]";
mes "我们商人公会最讨厌的就是那种脚踏两条船做兼职工作的人了。";
mes "我指的就是那种白天身分是商人，晚上则变成盗贼做出偷窃的行为之类的。我最痛恨这样的人了~";
next;
mes "[会员 曼修]";
mes "嗯，虽然我话多了点，但只是想让你知道，我们不需要已经有别的职业的人。";
close;
NotLvl:
mes "[会员 曼修]";
mes "但是，要成为商人的话，基本技能等级最少也要达到9级以上才行。";
mes "虽然商人这个职业只跟钱有接触，但是最少还是得要有基本的技能不是吗？";
close;
JobMercQE2:
set Test_MER,0;
set Test_MER2,0;
set Test_MER3,0;
mes "名字是"+ strcharinfo(0) +"....";
mes "你的转职考试不合格，你已经知道吧？你的纪录会被消失。你愿意申请就再问问我吧。";
close;
JobMerQE10o9:
if(Sex == 0) goto jobmercqE10a9L;
mes "啊！ " + strcharinfo(0) + " 先生。";
goto JobMerQE10a9Cont;
jobmercqE10a9L:
mes "啊！ " + strcharinfo(0) + " 小姐。";
goto JobMerQE10a9Cont;
JobMerQE10a9Cont:
mes "有个好消息告诉你。";
if(Test_MER==10) goto JobMerQE10;
if(Test_MER==9) goto JobMerQE9;
JobMerQE10:
mes "你的转职考试已经合格了，商人公会总会已经承认你的商人资格，并且让你正式加入商人公会。";
goto JobMerQua;
JobMerQE9:
mes "你的转职考试已经合格了，商人公会总会已经承认你的商人资格，并且让你正式加入商人公会。";
mes "那么就只剩下有关会费馀款的部分了，你应该已经准备好了吧？";
next;
menu "付馀款500金币。",M0JobMerQE9,"放弃。",EndJobMerQE9;
M0JobMerQE9:
mes "[会员 曼修]";
if(Zeny < 500) goto M0jobmercE9NZ;
set Zeny,Zeny-500;
mes "嗯，500金币刚好！";
goto JobMerQua;
M0JobMerQE9NZ:
mes "都已经到了这个地步了，居然发生这种没钱付的问题，想当商人的人怎么可以这么不讲信用呢！你快点去想想办法吧！";
goto EndJobMerQE9;
EndJobMerQE9:
mes "[会员 曼修]";
mes "怎么了？有什么问题吗？";
close;
JobMerQua:
mes "按下一个钮看看吧！";
next;
mes "[会员 曼修]";
mes "恭喜你成为商人！";
releaseall;
JobChange 5;
mes "再次真心的恭喜你成为我们商人公会的一员，希望你往后仍持续参与我们的活动！";
next;
if(Test_MER2==7 || Test_MER2==8 && Test_MER3==9)
goto JobMerQ2E7o8;
if(Test_MER2==7 || Test_MER2==8 && Test_MER3==8)
mes "[会员 曼修]";
mes "(什么，你把信给忘了。好吧，那也没办法，辛苦你了。)";
goto JobMerQua1;
JobMerQ2E7o8:
mes "[会员 曼修]";
mes "(虽然没多少钱，但这是我的心意，算是谢谢你送信来给我，下次还要麻烦你了~)";
set Zeny,Zeny+100;
goto JobMerQua1;
JobMerQua1:
set Test_MER,0;
set Test_MER2,0;
set Test_MER3,0;
next;
mes "[会员 曼修]";
mes "为了要达成占有全世界通货量20%的远大目标，我们需要像你这样热血的青年！";
mes "话虽如此，重点还是想要多赚点钱啦！你也是知道的嘛！是不是~";
close;
JobMerQE8o7aN0:
mes "啊，"+ strcharinfo(0) +"。那么快就回来了吗？看起来好像你还没有完成我交给你的任务吧？赶紧出发吧！";
close;
JobMerQLE6aN0:
mes "哦？你忘记了你的路线和物品编号吗？那好吧，我再告诉你一次。";
if((Test_MER2==1) | (Test_MER2==2)) goto JobMerQ2E1oE2;
if((Test_MER2==3) | (Test_MER2==4)) goto JobMerQ2E3oE4;
if((Test_MER2==5) | (Test_MER2==6)) goto JobMerQ2E5oE6;
if((Test_MER2==7) | (Test_MER2==8)) goto JobMerQ2E7oE8;
JobMerQ2E1oE2:
mes "到仓库去取物品，然后将它送到普隆德拉的旧剑士公会去，交给卡普拉公司普隆德拉支部总负责人就可以了。";
if(Test_MER2==2) goto JobMerQ2E2;
mes "物品统一编号：2485741.";
goto JobMerQ2Cont;
JobMerQ2E2:
mes "物品统一编号：2328137.";
goto JobMerQ2Cont;
JobMerQ2E3oE4:
mes "到仓库去取物品，然后将它送到吉芬的魔法学校去，交给那里的服务员就可以了。";
if(Test_MER2==4) goto JobMerQ2E4;
mes "物品统一编号：2989396";
goto JobMerQ2Cont;
JobMerQ2E4:
mes "物品统一编号：2191737.";
goto JobMerQ2Cont;
JobMerQ2E5oE6:
mes "到仓库去取物品，然后将它送到梦罗克的染料制造厂去，交给兹巴杜力师傅就可以了。";
if(Test_MER2==6) goto JobMerQ2E6;
mes "物品统一编号：3012685.";
goto JobMerQ2Cont;
JobMerQ2E6:
mes "物品统一编号：3487372.";
goto JobMerQ2Cont;
JobMerQ2E7oE8:
mes "到仓库去取物品，然后将它送到依斯鲁得岛去，交给卡普拉职员就可以了。";
if(Test_MER2==8) goto JobMerQ2E8;
mes "物品统一编号：3318702.";
goto JobMerQ2Cont;
JobMerQ2E8:
mes "物品统一编号：3543625.";
goto JobMerQ2Cont;
JobMerQ2Cont:
mes "仓库是由我为中心，右手边那间房间就是了。";
if((Test_MER2==7) | (Test_MER2==8)) goto JobMerQ2ContE7o8;
goto JobMerQ2Cont1;
JobMerQ2ContE7o8:
mes "另外... (这封信也拜托你了~~)";
goto JobMerQ2Cont1;
JobMerQ2Cont1:
next;
mes "[会员 曼修]";
mes "记住这个编号，到仓库去告诉仓库管理员你的目的地和统一编号，他就会把东西拿出来给你，千万要记得喔！";
mes "事情办完后回到这里来，把收据交回拿物品的那个仓库去，然后再来找我就可以了。";
mes "那么，路上小心。";
close;
}
alberta_in.gat,28,29,2 script 商人工会会员 83,{
set S_FLAG,0;
mes "[会员 凯力]";
mes "有什么事情吗？";
next;
menu "为了转职考试而来。",M0,"为了打工而来。",M1,"没事。",MEnd;
M0:
mes "[会员 凯力]";
if(Class==5) goto JobMer;
if((Test_MER==10) | (Test_MER==9) | (Test_MER==2)) goto JobMerQE10oE9oE2;
if((Test_MER==8) | (Test_MER==7)) goto JobMerQE8oE7;
if(((Test_MER==6) | (Test_MER==5)) & ((countitem(1081)==0) | (countitem(1082)==0) | (countitem(1083)==0))) goto JobMerQE6oE5aBoxE0;
if(((Test_MER==6) | (Test_MER==5)) & ((countitem(1081) !=0) | (countitem(1082) !=0) | (countitem(1083) !=0))) goto JobMerQE6oE5aBoxNE0;
mes "啊，这样啊？让我看看，你的名字是"+ strcharinfo(0) +" ....";
if(Test_MER==0) goto M0JobMerQE0;
mes "噢，名单上有你的名字。那么请把东西给我吧！";
mes "选择正确的目的地。";
goto M0Cont;
M0JobMerQE0:
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -