set .@cru_m,rand(1,3);
if (.@cru_m == 1) {
mes "[Gabriel Valentine]";
mes "1. Which attribute is the most effective in atttacking the Undead?";
next;
if (select("Neutral:Earth:Undead:Holy") == 4)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "2. If the monster is a Level 2 Undead, how much more damage does a Holy attack do compared to Fire?";
next;
if (select("25 %:50 %:75 %:100 %") == 2)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "3. What item can you not get from an Evil Druid?";
next;
if (select("Monk Hat:Yggdrasil leaf:White Herb:Amulet ") == 1)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "4. Which Undead monster";
mes "has the highest HP?";
next;
if (select("Ghoul:Skeleton Prisoner:Wraith:Zombie Prisoner") == 4)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "5. Which of the following monsters is a different size than the others?";
next;
if (select("Wraith:Khalitzburg:Drake:Evil Druid") == 3)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "6. Which card grants you tolerance to Undead property attacks?";
next;
if (select("Orc Skeleton Card:Orc Zombie Card:Ghoul Card:Skel Worker Card") == 2)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "7. What was the relationship between Munak and Bongun before they passed away?";
next;
if (select("Big Brother and Little Sister:Childhood friends in the same village:Stepbrother and sister:Complete strangers") == 2)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "8. Which of the following monsters is not aggressive?";
next;
if (select("Soldier Skeleton:Orc Skeleton:Skeleton:Skel Worker") == 3)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "9. What is the name of the shield in which a Munak Card has been inserted?";
next;
if (select("Atomic Shield:Amulet Shield:Hypnotic Shield:Homeroth Shield") == 2)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "10. Which of the following monsters does not drop Memento?";
next;
if (select("Munak:Ghoul:Mummy:Soldier Skeleton") == 1)
set .@cru_t,.@cru_t+10;
}
else if (.@cru_m == 2) {
mes "[Gabriel Valentine]";
mes "1. Which of the following monsters is a different attribute than the others?";
next;
if (select("Carat:Wind Ghost:Isis:Wanderer") == 3)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "2. Which sword is effective in attacking Demon monsters?";
next;
if (select("Decussate Tsurugi:Hollowed Tsurugi:Damned Tsurugi:Drowsy Tsurugi") == 1)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "3. Which item is NOT dropped by Dokebi?";
next;
if (select("Rough Elunium:Golden Hammer:Sword Mace:Mighty Staff") == 2)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "4. Which Demon monster has the most HP?";
next;
if (select("Giearth:Magnolia:Dokebi:Marionette") == 4)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "5. Which Demon monster is a different size than the others?";
next;
if (select("Ghostring:Whisper:Deviruchi:Baphomet Junior") == 1)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "6. Which shield reduces damage inflicted by Demon monsters?";
next;
if (select("Satanic Shield:Shield from Hell:Amulet Shield:Excellent Shield") == 2)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "7. Which attribute is the most effective on the Wind Ghost?";
next;
if (select("Water:Earth:Fire:Wind") == 2)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "8. Which monster is different from the other Demon monsters?";
next;
if (select("Sohee:Isis:Dokebi:Whisper") == 4)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "9. What effect does the Marionette Card have?";
next;
if (select("Increase defense against Shadow attacks by 30 %:Increase defense against poison attacks by 30 %:Increase defense against Ghost attacks by 30 %:Increase defense against Neutral attacks by 30 %") == 3)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "10. Which of the following is an effective way to react when encountering a demon monster?";
next;
if (select("Scream, 'Evil one, go away!':Offer your soul and get a deal.:Put Holy Water on a weapon and attack.:Put on a Deviruchi hat.") == 3)
set .@cru_t,.@cru_t+10;
}
else {
mes "[Gabriel Valentine]";
mes "1. What level of 'Divine Protection' do you need to learn 'Demon Bane?'";
next;
if (select("Level 1:Level 2:Level 3:Level 4") == 3)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "2. If your INT is 30, including INT bonuses from quipment, at level 55, how much HP does Level 5 Heal recover?";
next;
if (select("396:440:484:528") == 2)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "3. With Level 7 Divine Protection, by how much is your defense against the Undead increased?";
next;
if (select("21:22:23:24") == 1)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "4. Which of the following spears can attack Nightmare, which is endowed with the Ghost attribute?";
next;
if (select("Lance:Bill Guisarme:Cresent scythe:Zephyrus") == 4)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "5. What level of 'Heal' do you need to learn 'Cure?'";
next;
if (select("Level 1:Level 2:Level 3:Level 4") == 2)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "6. What is the attack speed when Level 3 Cavalier Mastery is learned?";
next;
if (select("70 % of normal speed:80 % of normal speed:90 % of normal speed:100 % of normal speed") == 2)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "7. Which of the following is not correct of the Demon Bane skill?";
next;
if (select("Increase attack on Undead:Only Acolytes can learn the skill:When mastered, + 30 increase:Passive Skill") == 2)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "8. How much SP does Level 7 Heal use?";
next;
if (select("30:31:33:35") == 2)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "9. What status cannot be";
mes "cured with the Cure skill?";
next;
if (select("Curse:Silence:Chaos:Blind") == 1)
set .@cru_t,.@cru_t+10;
mes "[Gabriel Valentine]";
mes "10. What best describes a Crusader?";
next;
if (select("One preparing for matrimony.:One preparing for the Holy War.:One preparing consummation.:One preparing potions.") == 2)
set .@cru_t,.@cru_t+10;
