npc_monk.txt

JA++的最新...很多ROSF都用这个 ] 是个不错的东西-3-

	goto IsOther;

IsOther:
	mes "[道武侠]";
	mes "我们武道家！";
	mes "拥有无限力量的人！";
	mes "拥有无限智慧的人！";
	next;
	mes "[道武侠]";
	mes "以我们无限的力量和智慧！";
	mes "守护世界和平！";
	next;
	mes "[道武侠]";
	mes "所以说！！";
	mes "你也是敌人吗？";
	mes "挡住了我的路！！！";
	next;
	mes "[道武侠]";
	mes "只要挡住我！！就打！！";
	mes "嗒啊啊啊啊！！";
	next;
	mes "[道武侠]";
	mes "呵哈哈哈哈！！";
	next;
	mes "[道武侠]";
	mes "不必害怕，走你的路吧！";
	close;

L_START:
	mes "[道武侠]";
	mes "有什么事吗？";
	mes "想要跟我聊一些有关神的事吗？";
	next;
	mes "[道武侠]";
	mes "喔，你正在进行武道家的修行，";
	mes "你所散发的气，跟武道家的那个很类似，";
	next;
	mes "[道武侠]";
	mes "看来气脉已打开，";
	mes "应该是从武海 长老大人那里过来的吧，";
	mes "很好，";
	next;
	mes "[道武侠]";
	mes "我先讲一下有关武道家精神部份";
	mes "的必要事项，";
	mes "以及有关武道家的简单教理，";
	mes "再来帮你调整气血之后，帮你做成可以";
	mes "参加下一关考试的身体，";
	next;
	mes "[道武侠]";
	mes "好好记住我讲的话，再来默念，";
	mes "慢慢的把心镇定下来…准备好了吗？";
	next;
	if(select("是","不是")==2)
	{
		mes "[道武侠]";
		mes "准备好了再过来吧！";
		close;
		end;
	}

	mes "[道武侠]";
	mes "好…开始，";
	next;
	set @JOB_MONK_C2,rand(1,3);

L_Again:
	if(@JOB_MONK_C2==1)
	{
		set @monk_str0$,"神的地上代理人";
		set @monk_str1$,"神罚的地上代行者";
		set @monk_str2$,"我们武道家是";
		set @monk_str3$,"我们的使命是";
		set @monk_str4$,"以我们的极限肉体";
		set @monk_str5$,"违背神者";
		set @monk_str6$,"把愚蠢的人之肉身";
		set @monk_str7$,"徘徊的人之肉身";
		set @monk_str8$,"彻底的追击";
		set @monk_str9$,"把他抹灭及毁灭";
	}

	if(@JOB_MONK_C2==2)
	{
		set @monk_str0$,"为了神传达著神的声明";
		set @monk_str1$,"以我们拥有的肉体来显示我们的光荣";
		set @monk_str2$,"我们武道家";
		set @monk_str3$,"神罚的地上代行者";
		set @monk_str4$,"神的地上代理人";
		set @monk_str5$,"我们武道家的使命是";
		set @monk_str6$,"违背神者";
		set @monk_str7$,"未死亡者之肉身";
		set @monk_str8$,"把愚蠢的人之肉体";
		set @monk_str9$,"彻底的追击让他消灭";
	}

	if(@JOB_MONK_C2==3)
	{
		set @monk_str0$,"违背神者给予审判！";
		set @monk_str1$,"违背神者给予最后！";
		set @monk_str2$,"违背神者给予绝灭！";
		set @monk_str3$,"我们，武道家";
		set @monk_str4$,"以拥有的肉体来代替神的光荣";
		set @monk_str5$,"神的地上代理人";
		set @monk_str6$,"神罚的地上代行者";
		set @monk_str7$,"就算骨骼及肉体被切割";
		set @monk_str8$,"所有都是为了神的光荣";
		set @monk_str9$,"为了审判所有对抗神者";
	}

	mes "[道武侠]";
	mes "好好听著，开始默念，";
	next;
	mes "[道武侠]";
	mes @monk_str0$;
	next;
	mes "[道武侠]";
	mes @monk_str1$;
	next;
	mes "[道武侠]";
	mes @monk_str2$;
	next;
	mes "[道武侠]";
	mes @monk_str3$;
	next;
	mes "[道武侠]";
	mes @monk_str4$;
	next;
	mes "[道武侠]";
	mes @monk_str5$;
	next;
	mes "[道武侠]";
	mes @monk_str6$;
	next;
	mes "[道武侠]";
	mes @monk_str7$;
	next;
	mes "[道武侠]";
	mes @monk_str8$;
	next;
	mes "[道武侠]";
	mes @monk_str9$;
	next;
	mes "[道武侠]";
	mes "好了，到此为止";
	mes strcharinfo(0) + " 换你了";
	next;
	set @monk_q, 0;
	if(@JOB_MONK_C2 == 1) goto L_MONK_Q1_1;
	if(@JOB_MONK_C2 == 2) goto L_MONK_Q2_1;
	if(@JOB_MONK_C2 == 3) goto L_MONK_Q3_1;

L_MONK_Q1_1:
	//神的地上代理人
	if(select("我们的使命是","我们武道家","违背神者","把愚蠢的人之肉体","彻底的追击","以我们极限的肉体","神的地上代理人","徘徊的人之肉身","把他抹杀及消灭","神罚的地上代行者")==7) set @monk_q,@monk_q+1;
	next;
	//神罚的地上代行者
	if(select("我们武道家","彻底的追击","神的地上代理人","我们的使命是","神罚的地上代行者","违背神者","徘徊的人之肉身","把愚蠢的人之肉体","以我们极限的肉体","把他抹杀及消灭")==5) set @monk_q,@monk_q+1;
	next;
	//我们武道家
	if(select("以我们极限的肉体","我们武道家","神的地上代理人","我们的使命是","神罚的地上代行者","徘徊的人之肉身","彻底的追击","违背神者","把愚蠢的人之肉体","把他抹杀及消灭")==2) set @monk_q,@monk_q+1;
	next;
	//我们的使命是
	if(select("我们的使命是","神的地上代理人","我们武道家","彻底的追击","神罚的地上代行者","把他抹杀及消灭","以我们极限的肉体","徘徊的人之肉身","违背神者","把愚蠢的人之肉体")==1) set @monk_q,@monk_q+1;
	next;
	//以我们极限的肉体
	if(select("神罚的地上代行者","神的地上代理人","我们武道家","我们的使命是","违背神者","把愚蠢的人之肉体","徘徊的人之肉身","彻底的追击","以我们极限的肉体","把他抹杀及消灭")==9) set @monk_q,@monk_q+1;
	next;
	//违背神者
	if(select("神的地上代理人","把愚蠢的人之肉体","违背神者","神罚的地上代行者","我们的使命是","把他抹杀及消灭","彻底的追击","以我们极限的肉体","我们武道家","徘徊的人之肉身")==3) set @monk_q,@monk_q+1;
	next;
	//愚蠢的人之肉身
	if(select("徘徊的人之肉身","彻底的追击","把他抹杀及消灭","神的地上代理人","神罚的地上代行者","以我们极限的肉体","我们武道家","我们的使命是","违背神者","把愚蠢的人之肉体")==10) set @monk_q,@monk_q+1;
	next;
	//徘徊的人之肉身
	if(select("徘徊的人之肉身","彻底的追击","把愚蠢的人之肉体","神的地上代理人","我们武道家","我们的使命是","以我们极限的肉体","违背神者","神罚的地上代行者","把他抹杀及消灭")==1) set @monk_q,@monk_q+1;
	next;
	//彻底的追击
	if(select("神的地上代理人","神罚的地上代行者","我们武道家","我们的使命是","以我们极限的肉体","把他抹杀及消灭","违背神者","把愚蠢的人之肉体","徘徊的人之肉身","彻底的追击")==10) set @monk_q,@monk_q+1;
	next;
	//把他抹杀及消灭
	if(select("神的地上代理人","神罚的地上代行者","我们武道家","我们的使命是","以我们极限的肉体","违背神者","把愚蠢的人之肉体","徘徊的人之肉身","彻底的追击","把他抹杀及消灭")==10) set @monk_q,@monk_q+1;
	goto L_MONK_QUEST_END;

L_MONK_Q2_1:
	//为了神传达著神的声明
	if(select("我们武道家","以我们拥有的肉体来显示我们的光荣","神罚的地上代行者","为了神传达著神的声明","神的地上代理人","未死亡者之肉身","我们武道家的使命是","违背神者","把愚蠢的人之肉体","彻底的追击让他消灭")==4) set @monk_q,@monk_q+1;
	next;
	//以我们拥有的肉体来显示我们的光荣
	if(select("我们武道家","神的地上代理人","我们武道家的使命是","神罚的地上代行者","违背神者","未死亡者之肉身","彻底的追击让他消灭","为了神传达著神的声明","以我们拥有的肉体来显示我们的光荣","把愚蠢的人之肉体")==9) set @monk_q,@monk_q+1;
	next;
	//我们武道家
	if(select("我们武道家","以我们拥有的肉体来显示我们的光荣","为了神传达著神的声明","彻底的追击让他消灭","违背神者","神罚的地上代行者","把愚蠢的人之肉体","神的地上代理人","我们武道家的使命是","未死亡者之肉身")==1) set @monk_q,@monk_q+1;
	next;
	//神罚的地上代行者
	if(select("以我们拥有的肉体来显示我们的光荣","违背神者","我们武道家","神的地上代理人","未死亡者之肉身","神罚的地上代行者","我们武道家的使命是","把愚蠢的人之肉体","彻底的追击让他消灭","为了神传达著神的声明")==6) set @monk_q,@monk_q+1;
	next;
	//神的地上代理人
	if(select("未死亡者之肉身","为了神传达著神的声明","神罚的地上代行者","我们武道家的使命是","违背神者","把愚蠢的人之肉体","彻底的追击让他消灭","我们武道家","以我们拥有的肉体来显示我们的光荣","神的地上代理人")==10) set @monk_q,@monk_q+1;
	next;
	//我们武道家的使命是
	if(select("神罚的地上代行者","我们武道家","以我们拥有的肉体来显示我们的光荣","为了神传达著神的声明","我们武道家的使命是","神的地上代理人","未死亡者之肉身","违背神者","彻底的追击让他消灭","把愚蠢的人之肉体")==5) set @monk_q,@monk_q+1;
	next;
	//违背神者
	if(select("以我们拥有的肉体来显示我们的光荣","违背神者","我们武道家的使命是","未死亡者之肉身","我们武道家","神罚的地上代行者","神的地上代理人","把愚蠢的人之肉体","彻底的追击让他消灭","为了神传达著神的声明")==2) set @monk_q,@monk_q+1;
	next;
	//未死亡者之肉身
	if(select("未死亡者之肉身","神罚的地上代行者","神的地上代理人","以我们拥有的肉体来显示我们的光荣","我们武道家的使命是","我们武道家","违背神者","把愚蠢的人之肉体","为了神传达著神的声明","彻底的追击让他消灭")==1) set @monk_q,@monk_q+1;
	next;
	//愚蠢的人之肉身
	if(select("为了神传达著神的声明","我们武道家","以我们拥有的肉体来显示我们的光荣","神的地上代理人","神罚的地上代行者","我们武道家的使命是","违背神者","把愚蠢的人之肉体","未死亡者之肉身","彻底的追击让他消灭")==8) set @monk_q,@monk_q+1;
	next;
	//彻底的追击让他消灭
	if(select("为了神传达著神的声明","以我们拥有的肉体来显示我们的光荣","我们武道家","神罚的地上代行者","神的地上代理人","我们武道家的使命是","违背神者","未死亡者之肉身","把愚蠢的人之肉体","彻底的追击让他消灭")==10) set @monk_q,@monk_q+1;
	goto L_MONK_QUEST_END;

L_MONK_Q3_1:
	//违背神者给予审判！
	if(select("违背神者给予最后！","违背神者给予审判！","违背神者给予绝灭！","以拥有的肉体来代替神的光荣","我们，武道家","神罚的地上代行者","神的地上代理人","就算骨骼及肉体被切割","为了审判所有对抗神者","所有都是为了神的光荣")==2) set @monk_q,@monk_q+1;
	next;
	//违背神者给予最后！
	if(select("就算骨骼及肉体被切割","神罚的地上代行者","以拥有的肉体来代替神的光荣","所有都是为了神的光荣","为了审判所有对抗神者","违背神者给予绝灭！","违背神者给予审判！","违背神者给予最后！","我们，武道家","神的地上代理人")==8) set @monk_q,@monk_q+1;
	next;
	//违背神者给予绝灭！
	if(select("违背神者给予审判！","违背神者给予最后！","违背神者给予绝灭！","我们，武道家","就算骨骼及肉体被切割","为了审判所有对抗神者","所有都是为了神的光荣","以拥有的肉体来代替神的光荣","神的地上代理人","神罚的地上代行者")==3) set @monk_q,@monk_q+1;
	next;
	//我们，武道家
	if(select("违背神者给予最后！","违背神者给予审判！","违背神者给予绝灭！","以拥有的肉体来代替神的光荣","我们，武道家","神罚的地上代行者","神的地上代理人","所有都是为了神的光荣","就算骨骼及肉体被切割","为了审判所有对抗神者")==5) set @monk_q,@monk_q+1;
	next;
	//以拥有的肉体来代替神的光荣
	if(select("违背神者给予审判！","违背神者给予最后！","违背神者给予绝灭！","以拥有的肉体来代替神的光荣","我们，武道家","神的地上代理人","神罚的地上代行者","所有都是为了神的光荣","就算骨骼及肉体被切割","为了审判所有对抗神者")==4) set @monk_q,@monk_q+1;
	next;
	//神的地上代理人
	if(select("违背神者给予最后！","违背神者给予绝灭！","违背神者给予审判！","我们，武道家","以拥有的肉体来代替神的光荣","神罚的地上代行者","神的地上代理人","就算骨骼及肉体被切割","所有都是为了神的光荣","为了审判所有对抗神者")==7) set @monk_q,@monk_q+1;
	next;
	//神罚的地上代行者
	if(select("违背神者给予最后！","就算骨骼及肉体被切割","神罚的地上代行者","所有都是为了神的光荣","为了审判所有对抗神者","违背神者给予绝灭！","违背神者给予审判！","以拥有的肉体来代替神的光荣","我们，武道家","神的地上代理人")==3) set @monk_q,@monk_q+1;
	next;
	//就算骨骼及肉体被切割
	if(select("就算骨骼及肉体被切割","所有都是为了神的光荣","违背神者给予审判！","违背神者给予最后！","违背神者给予绝灭！","我们，武道家","以拥有的肉体来代替神的光荣","神的地上代理人","神罚的地上代行者","为了审判所有对抗神者")==1) set @monk_q,@monk_q+1;
	next;
	//所有都是为了神的光荣
	if(select("违背神者给予绝灭！","违背神者给予最后！","违背神者给予审判！","所有都是为了神的光荣","以拥有的肉体来代替神的光荣","我们，武道家","就算骨骼及肉体被切割","神罚的地上代行者","神的地上代理人","为了审判所有对抗神者")==4) set @monk_q,@monk_q+1;
	next;
	//为了审判所有对抗神者
	if(select("违背神者给予审判！","违背神者给予最后！","违背神者给予绝灭！","我们，武道家","以拥有的肉体来代替神的光荣","神的地上代理人","神罚的地上代行者","就算骨骼及肉体被切割","所有都是为了神的光荣","为了审判所有对抗神者")==10) set @monk_q,@monk_q+1;

L_MONK_QUEST_END:
	if(@monk_q!=10)
	{
		mes "[" + strcharinfo(0) + "]";
		mes "此列表尚待模拟 >.< ";
		next;
		mes "[道武侠]";
		mes "好总之辛苦你了";
		next;
		mes "[道武侠]";
		mes "呵嗯…";	
		next;
		mes "[道武侠]";
		mes "真是的，连这个都不知道吗？";
		next;
		mes "[道武侠]";	
		mes "你自已无妨怀疑一下，";
		mes "自己的本质也无所谓啦？";
		mes "…真是的，这不是在开玩笑吧";
		mes "来，来，再来尝试一次";
		next;
		mes "[道武侠]";	
		mes "我怕漏掉先跟你说，在通过这次关之前";
		mes "不论找谁都是没有用的，";
		set JOB_MONK_Q,5;
		close;
		end;
	}

	set @monk_q,0;
	next;
	mes "[道武侠]";
	mes "呵嗯…";
	next;
	mes "[道武侠]";
	mes "…真厉害！太完美了";
	next;
	mes "[道武侠]";
	mes "不过别太早放下心，武道家的路还很远呢，";
	next;
	mes "[道武侠]";
	mes "嗒啊！…";
	next;
	mes "咻喀！";
	next;
	mes "咻苦！";
	next;
	mes "啪厌！";
	next;
	mes "[道武侠]";
	mes "以我们的约定，你的血脉已经照武道家";
	mes "的血脉流著";
	next;
	mes "[道武侠]";
	mes "好…再来就去找[富海]先生吧，";
	next;
	mes "[道武侠]";
	mes "好，出发吧，是[富海]先生，不要忘记";
	set JOB_MONK_Q,6;
	close;
	end;

Part1:
	mes "[道武侠]";
	mes "嗯，好吧，我再念一次";
	next;
	goto L_Again;

Part2:
	mes "[道武侠]";
	mes "嗯？忘记要找谁了吗？";
	next;
	mes "[道武侠]";
	mes "………现在，";
	next;
	mes "[道武侠]";
	mes "…你在考验我的忍耐性吗？";
	next;
	mes "[道武侠]";
	mes "…好吧，我再讲一次，";
	mes "请去找[富海]先生";
	close;
	end;
Part3:
	mes "[道武侠]";
	mes "…剩下的考试，祝你一切顺利";
	close;
	end;
}

prt_monk.gat,57,179,4	script	富海	110,{
	if(@Choice_mission==1)
	{
		mes "[富海]";
		mes "嗯，都准备好了吗？，";
		mes "只要确知自己有此能力耐的话";
		mes "也不必准备什么";
		next;
		mes "[富海]";
		mes "你所选择的采集蘑菇考试是";
		mes "坚持要说的话…是考验自己的考试，";
		next;
		mes "[富海]";
		mes "再来，去修道院中心附近的建筑物里面，";
		next;
		mes "[富海]";
		mes "这个考试只要收集到一定的蘑菇，";
		mes "就可以过关了";
		mes "好那么，出发吧，";
		close;
		end;
	}

	if(@Choice_mission==2)
	{
		mes "[富海]";
		mes "嗯，都准备好了吗？，";
		mes "不过双腿齐全的话";
		mes "也不必准备什么";
		next;
		mes "[富海]";
		mes "你所选择的马拉松考试是";
		mes "坚持要说的话…是克服自己的考试，";
		next;
		mes "[富海]";
		mes "再来，去修道院中心附近的建筑物里面，";
		next;
		mes "[富海]";
		mes "这个考试只要按照指定的次数，";
		mes "指定的场合绕著跑就好了，";
		mes "好那么，出发吧，";
		close;
		end;
	}

	if(JOB_MONK_Q!=6)
	{
		mes "[富海]";
		mes "哈啊啊啊啊…！！";
		next;
		mes "-疑似陷入冥想中-";
		close;