npc_sage.txt

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

	if(JOB_SAGE_Q==5)
	{
		mes "[柯瑞土斯 贝多尔]";
		mes "怎么样，还想再考试吗？";
		mes "你通过了笔试";
		next;
		mes "[柯瑞土斯 贝多尔]";
		mes "去海尔梅斯教受那里考术科吧，";
		mes "不赶快去在做什么？";
		close;
		end;
	}

	if(JOB_SAGE_Q>=6)
	{
		mes "[柯瑞土斯 贝多尔]";
		mes "因为现在在看其它入学生的考卷有点忙";
		mes "有什么事要说，请下次再来找我吧！";
		close;
		end;
	}

	if(JOB_SAGE_Q==3)
	{
		set JOB_SAGE_Q,4;
		mes "[柯瑞土斯 贝多尔]";
		mes "欢迎，欢迎来到修巴依采勒比学院，";
		mes "办好入学考试才来的吗？";
		next;
		mes "[柯瑞土斯 贝多尔]";
		mes "我来看看，";
		mes "名字是 " + strcharinfo(0) + " ";
		mes "啊…";
		mes "那么马上来考试吧！";
		next;
		mes "[柯瑞土斯 贝多尔]";
		mes "我要考的考题是，关于构成这个";
		mes "世界的所有事物，";
		mes "共有20个问题，每个问题5分，";
		mes "只要80分以上就算及格，";
		next;
		goto L_SAGE_QUEST_AGAIN;
	}

	if(JOB_SAGE_Q==4)
	{
		mes "[柯瑞土斯 贝多尔]";
		mes "欢迎，";
		mes "这次有读好书再来吗？";
		next;
		mes "[柯瑞土斯 贝多尔]";
		mes "这次的条件也一样，总共出20题";
		mes "每题答对5分，80分以上就算合格，";
		next;

L_SAGE_QUEST_AGAIN:
		mes "[柯瑞土斯 贝多尔]";
		mes "那么马上开始吧";
		mes "没有马上回答，考试就会中止";
		next;
		set @sage_t,0;
		set @sage_quest_c,rand(1,3);

		//类型A：
		if(@sage_quest_c==1)
		{
			mes "1. 普隆德拉的礼品商人不卖的物品是？";
			if(select("白色盘子","红色相框","花束","玻璃珠")==3) set @sage_t, @sage_t+5;
			next;
			mes "2. 不卖双刃短剑的城市是？";
			if(select("普隆德拉","梦罗克","吉芬","姜饼城")==1) set @sage_t,@sage_t+5;
			next;
			mes "3. 与乌龟岛最近的城市是？";
			if(select("艾尔帕兰","艾尔贝塔","克魔岛","依斯鲁得岛")==2) set @sage_t,@sage_t+5;
			next;
			mes "4. 以下不同种族的魔物是？";
			if(select("奈吉鸟","单眼虫","伞蜥","海星")==4) set @sage_t,@sage_t+5;
			next;
			mes "5. 以下属性不同的魔物是？";
			if(select("螳螂","重金属蝗虫","摇滚蝗虫","锹形虫")==2) set @sage_t,@sage_t+5;
			next;
			mes "6. 以下大小不同的魔物是？";
			if(select("幽灵剑士","幽灵弓箭手","邪骸浪人","镜妖")==1) set @sage_t,@sage_t+5;
			next;
			mes "7. 以下不是给“酒精”的魔物是？";
			if(select("鬼火","漂浮虫","毒魔菇","蛙王")==3) set @sage_t,@sage_t+5;
			next;
			mes "8. 与骑士转职没关系的人是？";
			if(select("詹姆士 喜拉吉斯","汤姆斯 塞尔班特斯","艾咪 佩亚特丽","爱德蒙登 克鲁斯多")==2) set @sage_t,@sage_t+5;
			next;
			mes "9. 不是普隆德拉的居民是？";
			if(select("特诺","比娜","佑比","忽克连")==2) set @sage_t,@sage_t+5;
			next;
			mes "10. 戴眼镜的卡普拉员工的名字是？";
			if(select("狄波萝太","泰依琳","克拉丽斯","德帛硫")==3) set @sage_t,@sage_t+5;
			next;
			mes "11. 使用Lv.7的雷暴术时消耗的SP量是？";
			if(select("49","59","69","74")==2) set @sage_t,@sage_t+5;
			next;
			mes "12. 当SP剩下 50% 时，能量外套的伤害力减少量与SP消耗量是？";
			if(select("伤害力24% SP1.5%","伤害力24% SP2%","伤害力18% SP1.5%","伤害力18% SP2%")==4) set @sage_t,@sage_t+5;
			next;
			mes "13. 在魔法师的“箭术”系列魔法中，少掉的一种属性是什么？";
			if(select("水属性","地属性","火属性","风属性")==2) set @sage_t,@sage_t+5;
			next;
			mes "14. 盗贼的情况，二刀连击 Lv.7 时，机率与攻击力是？";
			if(select("35% 120%","35% 140%","40% 120%","40% 140%")==2) set @sage_t,@sage_t+5;
			next;
			mes "15. 下列哪一种怪兽弱于有加螃蟹卡片(对火属性怪兽有20%的追加损失)武器？";
			if(select("绿苍蝇","小恶魔","长老树精","巴风特")==3) set @sage_t,@sage_t+5;
			next;
			mes "16. 右手训练 Lv.4 的效能是？";
			if(select("回复 80%的受损量","回复 90%的受损量","回复 100%的受损量","回复 110%的受损")==2) set @sage_t,@sage_t+5;
			next;
			mes "17. 以下哪种魔物的魔法防御力最强？";
			if(select("楸形虫","苍蝇","白蚁","刺蝟虫")==4) set @sage_t,@sage_t+5;
			next;
			mes "18. 从下面选出哪一种魔物最怕火属性攻击？";
			if(select("刺刀哥布灵","链锤哥布灵","刺锤哥布灵","榔头哥布灵")==4) set @sage_t,@sage_t+5;
			next;
			mes "19. 对不死系攻击，有抵抗力的卡片是？";
			if(select("邪骸兽人卡片","兽人腐尸卡片","绿腐尸卡片","邪骸矿工卡片")==2) set @sage_t,@sage_t+5;
			next;
			mes "20. 僵尸与妖道在死前，是什么样的关系？";
			if(select("妹妹与亲哥哥","邻居姊姊与弟弟","没血缘的兄妹","不认识的人")==2) set @sage_t,@sage_t+5;
		}

		//类型B：
		if(@sage_quest_c==2)
		{
			mes "1. 梦罗克宝石商人不卖的宝石是？";
			if(select("黄宝石","深红宝石","钻石","蓝宝石")==2) set @sage_t,@sage_t+5;
			next;
			mes "2. 不卖魔物饲料的城市是？";
			if(select("普隆德拉","梦罗克","艾尔帕兰","艾尔贝塔")==3) set @sage_t,@sage_t+5;
			next;
			mes "3. 与迷藏森林最近的城市是？";
			if(select("普隆德拉","梦罗克","吉芬","斐扬")==1) set @sage_t,@sage_t+5;
			next;
			mes "4. 以下不同种族的魔物是？";
			if(select("摩卡","土波利","漂浮虫","梅纳海葵")==4) set @sage_t,@sage_t+5;
			next;
			mes "5. 以下属性不同的魔物是？";
			if(select("土人","蛇女伊丝","基尔瑟","小恶魔")==3) set @sage_t,@sage_t+5;
			next;
			mes "6. 以下大小不同的魔物是？";
			if(select("小盗虫（先攻）","锹形虫","重金属蝗虫","艾斯蜘蛛")==4) set @sage_t,@sage_t+5;
			next;
			mes "7. 以下不是给“天地树叶子”的魔物是？";
			if(select("马尔杜克","小巴风特","天使波利","邪骸浪人")==1) set @sage_t,@sage_t+5;
			next;
			mes "8. 与祭司转职没有关系的人是？";
			if(select("汤姆斯 塞尔班特斯","文强 派内迪特","彼特 艾帕罗多","欣诗 马茹卡利特")==2) set @sage_t,@sage_t+5;
			next;
			mes "9. 不是梦罗克居民的人是？";
			if(select("世毕阿杰","阿里卡哩","安东尼奥","尤塌亚迈尼")==3) set @sage_t,@sage_t+5;
			next;
			mes "10. 蓝色的头发很有魅力的卡普拉的职员叫什么名字？";
			if(select("狄波萝太","泰依琳","克拉丽斯","德帛硫")==1) set @sage_t,@sage_t+5;
			next;
			mes "11. 为了学火焰之壁不需要的过程是？";
			if(select("火箭术 Lv 4","心灵爆破 Lv 4","火球术 Lv 5","火狩 Lv 1")==2) set @sage_t,@sage_t+5;
			next;
			mes "12. 没有 int增加值把禅心学到 Lv.6的时，因为技能而恢复10秒的 SP是？";
			if(select("14","16","18","21")==3) set @sage_t,@sage_t+5;
			next;
			mes "13. 在职业等级 33时，魔法师因增加值获得的 INT 数值是？";
			if(select("7","6","5","4")==4) set @sage_t,@sage_t+5;
			next;
			mes "14. 弓箭手的情况，心神凝聚Lv.5 的 SP 消耗量与持续时间是？";
			if(select("45 / 80秒","50 / 80秒","45 / 90秒","50 / 90秒")==1) set @sage_t,@sage_t+5;
			next;
			mes "15. 选择对火属性武器短剑最弱的怪兽？";
			if(select("短剑刺刀哥布灵","槌子刺刀哥布灵","铁锤 刺刀哥布灵","钢斧 刺刀哥布灵")==4) set @sage_t,@sage_t+5;
			next;
			mes "16. 可以插卡片的拳刃可以在哪一种怪兽身上得到？";
			if(select("土拨鼠","沙漠之狼","傀儡娃娃","麦斯特")==1) set @sage_t,@sage_t+5;
			mes "17. 和魔法没有关连的卡片是？";
			if(select("马尔杜克卡片","魔锅蛋卡片","树精卡片","蚁后卡片")==2) set @sage_t,@sage_t+5;
			next;
			mes "18. 跟INT没关系的卡片是？";
			if(select("白蚁幼虫卡片","战蚁卡片","沙漠幼狼卡片","长老树精卡片")==2) set @sage_t,@sage_t+5;
			next;
			mes "19. 对风魔贤者有效的属性是？";
			if(select("水属性","地属性","火属性","风属性")==2) set @sage_t,@sage_t+5;
			next;
			mes "20. 下列HP最高的恶魔型魔物是？";
			if(select("基尔瑟","魔锅蛋","土人","傀儡娃娃")==4) set @sage_t,@sage_t+5;
		}

		//类型C：
		if(@sage_quest_c==3)
		{
			mes "1. 吉芬的魔法商人不卖的物品是？";
			if(select("大衣","橡木魔杖","头箍","秘银之衣")==1) set @sage_t,@sage_t+5;
			next;
			mes "2. 不卖厚刃剑的城市是？";
			if(select("普隆德拉","依斯鲁得岛","艾尔帕兰","斐扬")==3) set @sage_t,@sage_t+5;
			next;
			mes "3. 与克雷斯特汉姆古城最近的城市是？";
			if(select("普隆德拉","吉芬","梦罗克","斐扬")==2) set @sage_t,@sage_t+5;
			next;
			mes "4. 以下不同种族的魔物是？";
			if(select("海星","马克","乌贼","冰波利")==4) set @sage_t,@sage_t+5;
			next;
			mes "5. 以下不同属性的魔物是？";
			if(select("沙漠幼狼","狸猫","小鸡","巧克猴")==2) set @sage_t,@sage_t+5;
			next;
			mes "6. 以下不同大小的魔物是？";
			if(select("海盗之王","恶灵","闇神官","卡利斯格")==1) set @sage_t,@sage_t+5;
			next;
			mes "7. 以下不是给“强化武器金属---级数一”的魔物是？";
			if(select("虫蛹","大嘴鸟蛋","小野猪","沙漠幼狼")==2) set @sage_t,@sage_t+5;
			next;
			mes "8. 与铁匠转职没有关系的人是？";
			if(select("巴伊斯里特","修加巴殷","巴尔卡帝","哥伦卡史特")==3) set @sage_t,@sage_t+5;
			next;
			mes "9. 不是艾尔帕兰居民的人是？";
			if(select("RS125","莫克娜","小题大作的青年","裘卡缇")==2) set @sage_t,@sage_t+5;
			next;
			mes "10. 最年轻的卡普拉职员的名字是？";
			if(select("狄波萝太","泰依琳","克拉丽斯","德帛硫")==4) set @sage_t,@sage_t+5;
			next;
			mes "11. 使用暗之障壁 Lv.6时，消耗 SP与回避次数是？";
			if(select("SP 40，6次","SP 35，6次","SP 40，7次","SP 35，7次")==3) set @sage_t,@sage_t+5;
			next;
			mes "12. 在使用心灵爆破 Lv.6时，给对方魔物的伤害力是 MATK的几倍？";
			if(select("1.2倍","1.3倍","1.4倍","1.5倍")==2) set @sage_t,@sage_t+5;
			next;
			mes "13. 初学者转职成为魔法师时，可以成为混合剂4号的触媒的矿石是？";
			if(select("蓝色魔力矿石","红色魔力矿石","黄色魔力矿石","透明的宝石")==4) set @sage_t,@sage_t+5;
			next;
			mes "14. 剑士的情况，狂击Lv.6 的 SP攻击力与SP 消耗量是？";
			if(select("250%  8","280%  8","280%  15","310%  15")==3) set @sage_t,@sage_t+5;
			next;
			mes "15. 练完盗贼的回避率增加技能之后增加的回避率是什么？";
			if(select("30","40","50","60")==1) set @sage_t,@sage_t+5;
			next;
			mes "16. 在Job Lv.50的时候刺客以加值的形式来拿到的AGI是多少？";
			if(select("7","8","9","10")==4) set @sage_t,@sage_t+5;
			next;
			mes "17. 在下列魔物当中选出不同属性的魔物？";
			if(select("螳螂","卡那多斯","基尔瑟","刺蝟虫")==2) set @sage_t,@sage_t+5;
			next;
			mes "18. 哪一个是不同的魔物？";
			if(select("溜溜猴","魔锅蛋","重金属蝗虫","杰洛米")==4) set @sage_t,@sage_t+5;
			next;
			mes "19. 为了学习“治疗术”，“治愈术”最小的技能等级是？";
			if(select("Lv. 1","Lv. 2","Lv. 3","Lv. 4")==2) set @sage_t,@sage_t+5;
			next;
			mes "20. 天使之护Lv. 7时，对不死系增加的防御力是？";
			if(select("21","22","23","24")==1) set @sage_t,@sage_t+5;
		}

		next;
		mes "[柯瑞土斯 贝多尔]";
		mes "20 题都答好了吗？";
		mes "那么，来算分数吧，";
		next;
		mes "[柯瑞土斯 贝多尔]";
		mes "我来看看…";
		mes "呵嗯…呵嗯…";
		if(@sage_t>=80)
		{
			set JOB_SAGE_Q,5;
			next;
			mes "[柯瑞土斯 贝多尔]";
			mes "你的分数是 " + @sage_t + " 分，";
			mes "真是差强人意，";
			mes "不过这种水准应该可以听课了";
			next;
			mes "[柯瑞土斯 贝多尔]";
			mes "这样你通过了笔试";
			mes "那么，去海尔梅斯教授那里考术科吧！";
			close;
			end;
		}

		next;
		mes "[柯瑞土斯 贝多尔]";
		mes "你的分数是 " + @sage_t + " 分，";
		mes "很可惜没有合格";
		next;
		mes "[柯瑞土斯 贝多尔]";
		mes "再给你考笔试的资格，";
		mes "再累积点关于世界的知识再来吧！";
		close;
		end;
	}

	mes "[柯瑞土斯 贝多尔]";
	mes "呵嗯…";
	mes "人学是次要的，即然是不同的职业没办法成为贤者";
	mes "所谓才能是从出生就累积的……";
	next;
	mes "[柯瑞土斯 贝多尔]";
	mes "所以，不要在这种地方徘徊…";
	mes "与别人一起去打猎也好。";
	close;
	end;
}

yuno_in03.gat,169,180,4	script	术科考试 教授	755,{
	if(JOB_SAGE_Q==2)
	{
		mes "[海尔梅斯 特利斯]";
		mes "我是担任术科考试的海尔梅斯教授，你是想要成为贤者的学生吗？";
		next;
		mes "[海尔梅斯 特利斯]";
		mes "先通过柯瑞土斯教授的笔试再来吧，那之后再来考我的测验吧！";
		close;
		end;
	}

	if(JOB_SAGE_Q==5)
	{
		mes "[海尔梅斯 特利斯]";
		mes "欢迎，是完成笔试的学生啊？那么来考术科吧！";
		next;
		mes "[海尔梅斯 特利斯]";
		mes "术科没什么特别的，在时间内抓到所有登场的魔物就结束了！";
		next;
		mes "[海尔梅斯 特利斯]";
		mes "比听一百次，亲自去做做看更容易了解，怎样，现在考试好吗？";
		next;
		if(select("我要考术科","给我准备的时间")==1)
		{
			mes "[海尔梅斯 特利斯]";
			mes "那么马上那开始吧，努力考试平安回来吧！";
			next;
			set JOB_SAGE_Q, 6;
			savepoint "yuno_in03.gat",163,180;
			warp "job_sage.gat",50,154;
			end;
		}
		mes "[海尔梅斯 特利斯]";
		mes "好，那么…慢慢准备再来吧";
		set JOB_SAGE_Q,6;
		close;
		end;
	}

	if(JOB_SAGE_Q==6)
	{
		mes "[海尔梅斯 特利斯]";
		mes "那么，要重考吗？";
		next;
		if(select("我要考术科","给我准备的时间")==1)
		{
			mes "[海尔梅斯 特利斯]";
			mes "那么马上那开始吧，";
			mes "努力考试平安回来吧！";
			next;
			set JOB_SAGE_Q, 6;
			savepoint "yuno_in03.gat",163,180;
			warp "job_sage.gat",50,154;
			end;
		}
		mes "[海尔梅斯 特利斯]";
		mes "好，那么…慢慢准备再来吧";
		set JOB_SAGE_Q,6;
		close;
		end;
	}

	if(JOB_SAGE_Q==7 || JOB_SAGE_Q==8 )
	{
		if(JOB_SAGE_Q_M==1)
		{
			mes "[海尔梅斯 特利斯]";
			mes "嗯？要再讲一次才听的懂吗？不是叫你做有关历史魔法的研究吗？";
			next;
			mes "[海尔梅斯 特利斯]";
			mes "去找在魔法學院的斯必安萊利斯教授";
			close;
			end;
		}