📄 npc_monk.txt
字号:
//==============================================
// 武僧转职任务
// 代码重写 & 修正 by FPE (2006.7.15)
// Jathena++ 论坛：http://www.foxofice.net/bbs
//----------------------------------------------
monk_test.gat mapflag nomemo dummy
monk_test.gat mapflag noteleport dummy
monk_test.gat mapflag nosave SavePoint
monk_test.gat mapflag nopenalty dummy
monk_test.gat mapflag nobranch dummy
job_monk.gat,0,0,0,0 monster 盗蘑菇 1182,170,0,0,0
job_monk.gat,0,0,0,0 monster 小盗虫 1051,120,0,0,0
prt_monk.gat,55,249,4 script 武道僧#1 139,0,5,{
mes "[都好父]";
mes "你这家伙！没有我的允许";
mes "既然可以随便进入";
mes "神圣的修练场！！";
next;
mes "[都好父]";
mes "快给我出去！";
close;
end;
}
prt_monk.gat,59,247,4 script 武道僧 120,{
if(JOB_MONK_Q!=1 && JOB_MONK_Q!=2 && class!=15)
{
mes "[都好父]";
mes "嗯？你找本主有什么事吗？";
mes "想要进入武道家的修练场前";
mes "先要告诉我你的姓名和职业等级，";
mes "基本等级之后才能进去！";
next;
mes "[都好父]";
mes "来，告诉我你的姓名和职业等级，基本等级";
next;
if(select("不理他","告诉他")==1)
{
mes "[都好父]";
mes "没礼貌的家伙！快给我出去！";
close2;
warp "prt_fild03.gat",357,256;
end;
}
mes "[都好父]";
mes "嗯…你叫 " + strcharinfo(0);
mes "…是这样念没错吧，";
mes "我看看，职业等级是 " + joblevel;
next;
mes "[都好父]";
mes "来找我有什么事呢？";
mes strcharinfo(0) + " 先生/小姐";
next;
set @string_temp1$,"想要见识一下武道家修练的情形…";
set @string_temp2$,"想要成为武道家…";
set @string_temp3$,"想要在修练场休息一下…";
}
if(JOB_MONK_Q==1)
{
mes "[都好父]";
mes "怎么样？看过之后有改变你的想法吗？";
next;
set @string_temp1$,"没有";
set @string_temp2$,"我要当武道家！";
set @string_temp3$,"我要再休息一下";
}
switch(select(@string_temp1$,@string_temp2$,@string_temp3$))
{
case 1:
mes "[都好父]";
mes "嗯，是吗，我知道了";
mes "希望我们武道家修练的样子，";
mes "能助于你成为，有力量的武道家";
set JOB_MONK_Q,1;
close;
end;
break;
case 2:
if(Class!=4)
{
mes "[都好父]";
mes "您真爱开玩笑";
close;
end;
}
if(joblevel<40)
{
mes "[都好父]";
mes "职业等级 40 级以上才能够转职啊...";
next;
mes "[都好父]";
mes "别太心急，在世界上多磨练自己之后再来吧.";
mes "等到达到转职条件之后再来找我吧... 哈哈.";
close;
end;
}
if(skillpoint>0)
{
mes "[都好父]";
mes "嗯... 情况不错，你还有一些必备技能还没学会吧？";
mes "等你先学会那些技能之后，再来申请吧";
close;
end;
}
mes "[都好父]";
mes "嗯…职业等级也到了一定的程度…";
mes "好吧…进去里面找[武海]长老吧，";
mes "他会好好的引导你的";
set JOB_MONK_Q,2;
close;
end;
break;
case 3:
mes "[都好父]";
mes "好吧，看来你是走累了…";
mes "偶而也需要休息一下，";
mes "在武道家修练场这里";
mes "休息一下再走吧，";
next;
mes "[都好父]";
mes "总是想要努力";
mes "有力量的是我们武道家";
mes "希望我们的样子";
mes "能带给你小小的安息";
close;
end;
break;
}
if(JOB_MONK_Q==2)
{
mes "[都好父]";
mes "嗯…去见[武海]长老吧！";
mes "他在东南边方向，的[武道家的殿堂]里";
close;
end;
}
if(Class==15)
{
mes "[都好父]";
mes "并不是很欢迎你来到圣卡毕利那修道院";
mes "不过欢迎光临，";
mes "希望你不要妨碍到，正在修练中的武道家";
mes "就算你是武道家，也是一样！";
close;
end;
}
}
monk_in.gat,99,58,4 script 武海 长老 60,{
if(JOB_MONK_Q==2)
{
mes "[武海 长老]";
mes "嗯…是个想要成为武道家的年经人…？";
mes "是吗";
next;
if(select("是","不是")==2)
{
mes "[武海 长老]";
mes "嗯…应该是没错啊…";
mes "不是吗，看老夫的气力衷退了…";
mes "连这点小事情都看不出来…";
mes "那么，走你的路吧，年经人。";
close;
end;
}
mes "[武海 长老]";
mes "喔喔…这个时代还会有年轻人会记得我们武道家啊…";
mes "欢迎光临，师弟！";
next;
mes "[武海 长老]";
mes "想要当武道家吗！老夫真是高兴啊…";
mes "首先，当武道家之前，要光大概知道一下";
mes "几件事情，";
next;
mes "[武海 长老]";
mes "我们武道家们，要严格锻练自己的身体";
mes "并要守护和平";
next;
mes "[武海 长老]";
mes "锻练身体是为了，帮助弱者";
mes "是为了保护弱者的";
next;
mes "[武海 长老]";
mes "当然，要把心情抚平，更重要的是不能得意忘行";
next;
mes "[武海 长老]";
mes "经历这些过程会很辛苦的，";
mes "甚至会感觉到痛苦";
mes "看你可不可以忍受这种过程，";
mes "来决定你可不可以成为武道家";
next;
mes "[武海 长老]";
mes "好…那就来测试一下";
mes "看你转职成为武道家之后";
mes "是否确实有资格当武道家";
next;
mes "[武海 长老]";
mes "首先，小小的考式一下你对武道家转职的旨意力";
next;
if(joblevel==50)
{
mes "[武海 长老]";
mes "喔喔！看不出来你这么努力啊";
mes "职业等级都已经 " + joblevel +" 级啰";
mes "这样的话你就不用再作收集的任务测验";
next;
mes "[武海 长老]";
mes "辛苦了！！";
mes "我相信你想要成为武道家的旨意";
mes "已传达给大家了！！";
next;
mes "[武海 长老]";
mes "我看看…有个叫";
mes "啊…[道武侠]的武道家想要想要见你";
mes "他在这里的北边，在武道家前辈";
mes "的墓地那里";
set JOB_MONK_Q,4;
close;
end;
}
set JOB_MONK_Q,3;
set JOB_MONK_C,rand(1,6);
L_Collect:
mes "[武海 长老]";
switch(JOB_MONK_C)
{
case 1:
mes "去寻找蝙蝠牙10个";
mes "熊掌5个";
mes "毒魔菇芽孢20个";
mes "再拿过来，";
break;
case 2:
mes "去寻找刺蝟尖刺5个";
mes "蜘蛛丝20个";
mes "蝗虫后腿10个";
mes "再拿过来，";
break;
case 3:
mes "去寻找植物梗30个个";
mes "杰勒比结晶5个";
mes "昆虫外壳10个";
mes "再拿过来，";
break;
case 4:
mes "去寻找粘稠液体5个";
mes "蚯蚓皮10个";
mes "绿色药草20个";
mes "再拿过来，";
break;
case 5:
mes "去寻找猴子尾巴20个";
mes "铁矿石5个";
mes "蓝色药草3个";
mes "再拿过来，";
break;
case 6:
mes "去寻找坚硬外皮5个";
mes "坚硬外壳20个";
mes "刹勒空结晶5个";
mes "再拿过来，";
break;
}
next;
mes "这是为了考验你的旨意力，所以要亲自去寻找，";
next;
mes "[武海 长老]";
mes "那么全部拿到之后再来找我吧，";
mes "好出发吧，";
mes "愿老天的保佑一起伴随著你";
close;
end;
}
if(JOB_MONK_Q==3)
{
switch(JOB_MONK_C)
{
case 1:
if(countitem(913)>10 && countitem(948)>5 && countitem(7033)>20)
{
delitem 913,10;
delitem 948,5;
delitem 7033,20;
mes "[武海 长老]";
mes "喔喔…真的都找到了啊！！";
mes "辛苦了！！";
mes "我相信你想要成为武道家的旨意";
mes "已传达给大家了！！";
next;
mes "[武海 长老]";
mes "我看看…有个叫";
mes "啊…[道武侠]的武道家想要想要见你";
mes "他在这里的北边，在武道家前辈";
mes "的墓地那里";
set JOB_MONK_Q,4;
set JOB_MONK_C,0;
close;
end;
}
break;
case 2:
if(countitem(1027)>5 && countitem(1025)>20 && countitem(940)>10)
{
delitem 1027,5;
delitem 1025,20;
delitem 940,10;
mes "[武海 长老]";
mes "喔喔…真的都找到了啊！！";
mes "辛苦了！！";
mes "我相信你想要成为武道家的旨意";
mes "已传达给大家了！！";
next;
mes "[武海 长老]";
mes "我看看…有个叫";
mes "啊…[道武侠]的武道家想要想要见你";
mes "他在这里的北边，在武道家前辈";
mes "的墓地那里";
set JOB_MONK_Q,4;
set JOB_MONK_C,0;
close;
end;
}
break;
case 3:
if(countitem(7012)<30 && countitem(909)<5 && countitem(955)<10)
{
delitem 7012,30;
delitem 909,5;
delitem 955,10;
mes "[武海 长老]";
mes "喔喔…真的都找到了啊！！";
mes "辛苦了！！";
mes "我相信你想要成为武道家的旨意";
mes "已传达给大家了！！";
next;
mes "[武海 长老]";
mes "我看看…有个叫";
mes "啊…[道武侠]的武道家想要想要见你";
mes "他在这里的北边，在武道家前辈";
mes "的墓地那里";
set JOB_MONK_Q,4;
set JOB_MONK_C,0;
close;
end;
}
break;
case 4:
if(countitem(938)<5 && countitem(1055)<10 && countitem(511)<20)
{
delitem 938,5;
delitem 1055,10;
delitem 511,20;
mes "[武海 长老]";
mes "喔喔…真的都找到了啊！！";
mes "辛苦了！！";
mes "我相信你想要成为武道家的旨意";
mes "已传达给大家了！！";
next;
mes "[武海 长老]";
mes "我看看…有个叫";
mes "啊…[道武侠]的武道家想要想要见你";
mes "他在这里的北边，在武道家前辈";
mes "的墓地那里";
set JOB_MONK_Q,4;
set JOB_MONK_C,0;
close;
end;
}
break;
case 5:
if(countitem(942)<20 && countitem(1002)<5 && countitem(510)<3)
{
delitem 942,20;
delitem 1002,5;
delitem 510,3;
mes "[武海 长老]";
mes "喔喔…真的都找到了啊！！";
mes "辛苦了！！";
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -