//================= Hercules Script =======================================
//= _ _ _
//= | | | | | |
//= | |_| | ___ _ __ ___ _ _| | ___ ___
//= | _ |/ _ \ '__/ __| | | | |/ _ \/ __|
//= | | | | __/ | | (__| |_| | | __/\__ \
//= \_| |_/\___|_| \___|\__,_|_|\___||___/
//================= License ===============================================
//= This file is part of Hercules.
//= http://herc.ws - http://github.com/HerculesWS/Hercules
//=
//= Copyright (C) 2012-2020 Hercules Dev Team
//= Copyright (C) L0ne_W0lf
//= Copyright (C) DracoRPG
//= Copyright (C) Reddozen
//= Copyright (C) Lupus
//=
//= Hercules is free software: you can redistribute it and/or modify
//= it under the terms of the GNU General Public License as published by
//= the Free Software Foundation, either version 3 of the License, or
//= (at your option) any later version.
//=
//= This program is distributed in the hope that it will be useful,
//= but WITHOUT ANY WARRANTY; without even the implied warranty of
//= MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
//= GNU General Public License for more details.
//=
//= You should have received a copy of the GNU General Public License
//= along with this program. If not, see <http://www.gnu.org/licenses/>.
//=========================================================================
//= Priest Skills Quests
//================= Description ===========================================
//= Quests for skills: Redempito
//================= Current Version =======================================
//= 1.5
//=========================================================================
prt_church,111,112,1 script Sister Linus 1_F_PRIEST,{
if (BaseJob == Job_Priest) {
if (PRIEST_SK == 100) {
if (getskilllv("PR_REDEMPTIO") == 0) {
mes "[Sister Linus]";
mes "Hm? We've met before,";
mes "haven't we? Then again,";
mes "all Priests begin to look";
mes "the same after a while. Ah,";
mes "were you one of the ones";
mes "to whom I taught Redemptio?";
next;
mes "[Sister Linus]";
mes "Ah, you've forgotten, have";
mes "you? Well, it's no problem for";
mes "me to teach you again. This skill enables you to revive your fallen";
mes "Party Members by sacrificing";
mes "your own life for them.";
next;
mes "[Sister Linus]";
mes "^3131FFOh holy and venerable one,";
mes "we pray to you. Please show";
mes "us your mercy and guide us";
mes "with your light. Give us the";
mes "strength to walk the path of";
mes "love and sacrifice. Redemptio!^000000";
skill "PR_REDEMPTIO",1,0;
next;
mes "[Sister Linus]";
mes "There...";
mes "You should be able";
mes "to perform Redemptio";
mes "now. I hope you use it";
mes "well on your adventures~";
close;
}
else {
mes "[Sister Linus]";
mes "I'll always be praying";
mes "for your safety. Be careful,";
mes "and I hope that you can bring";
mes "love and compassion to all";
mes "whom you meet in your travels.";
close;
}
}
else if (PRIEST_SK == 0) {
redemp = 1014;
if (getskilllv("PR_REDEMPTIO")) {
mes "[Sister Linus]";
mes "I'll always be praying";
mes "for your safety. Be careful,";
mes "and I hope that you can bring";
mes "love and compassion to all";
mes "whom you meet in your travels.";
PRIEST_SK = 100;
close;
}
mes "[Sister Linus]";
mes "Please have mercy and";
mes "spread your light through";
mes "the world. Guide her with";
mes "your benevolent wisdom...";
mes "Bless her, and may she";
mes "be protected by your grace.";
next;
select("Whom are you praying for, sister?");
mes "[Sister Linus]";
mes "Oh! You startled me!";
mes "Whom am I praying for?";
mes "Well, I once knew a young,";
mes "playful and merry nun who was";
mes "also a bit brazen. But I have";
mes "many joyful memories of her.";
next;
mes "[Sister Linus]";
mes "One day, a group of adventurers";
mes "came to Prontera Church in hopes of hiring a Priest to accompany";
mes "them to ^3131DDGlast Heim^000000. It must have been fate that she was the only";
mes "Priest that was available.";
next;
mes "[Sister Linus]";
mes "I remember that she was";
mes "so determined to join those";
mes "adventurers, and we had no";
mes "choice but to let her go.";
mes "Still, many of us believed";
mes "that it was too dangerous...";
next;
mes "[Sister Linus]";
mes "I hear that, at first, their";
mes "ragtag team was able to";
mes "successfully exterminate";
mes "a great number of monsters.";
mes "But supporting them as a Priest";
mes "must have been tough for her...";
next;
mes "[Sister Linus]";
mes "Then, tragedy struck.";
mes "Surrounded by Wanderers,";
mes "the adventurers quickly fell";
mes "in defeat, one by one. Soon,";
mes "the young nun was the only one of the group still standing.";
next;
mes "[Sister Linus]";
mes "Alone against impossible";
mes "odds, that poor girl had no";
mes "choice but to try a desperate";
mes "gamble. She began to chant";
mes "the ancient holy spell...";
next;
select("Ancient spell...?");
mes "[Sister Linus]";
mes "Yes! ^FF0000Redemptio^000000!";
mes "A skill that only the";
mes "most talented Priests";
mes "can perform! And here she";
mes "was, a young nun with very";
mes "little experience, trying it!";
next;
mes "[Sister Linus]";
mes "Redemptio is the last";
mes "resort skill that can be";
mes "used to nobly save the";
mes "lives of others at the cost";
mes "of ^3131FFsacrificing your own life^000000.";
next;
mes "[Sister Linus]";
mes "Yes, I remember the days";
mes "she wasn't very interested";
mes "in studying the Priest and";
mes "Acolyte skills. Surprisingly,";
mes "she had learned enough to";
mes "attempt to cast Redemptio...";
next;
mes "[Sister Linus]";
mes "Miraculously, she succeeded";
mes "in reviving her party members.";
mes "They quickly used a Yggdrasil";
mes "Leaf to restore her life, and they defeated the Wanderers and";
mes "returned home safely.";
next;
mes "[Sister Linus]";
mes "Because of this success, she";
mes "was promoted to High Priest";
mes "despite the many mistakes she";
mes "made in the past. Now she travels the world, helping adventurers";
mes "in any way that she can.";
next;
mes "[Sister Linus]";
mes "But, well, she'll";
mes "always be that spunky";
mes "and joyful girl to me.";
next;
mes "["+ strcharinfo(PC_NAME) +"]";
mes "Wait, you still haven't";
mes "answered my question.";
mes "Are you praying for this";
mes "nun? And if so, is she";
mes "in some kind of danger?";
next;
mes "[Sister Linus]";
mes "Well, a few months ago,";
mes "she went on a mission to";
mes "^3131FFLighthalzen^000000, a city in the";
mes "Schwaltzvalt Republic. I was";
mes "just worried since I haven't";
mes "heard from her in a while.";
next;
mes "[Sister Linus]";
mes "I come here to pray for";
mes "her everyday, and hope that";
mes "she'll come back safely and";
mes "share stories of her adventures";
mes "with me. Ooh, we'll talk all night long! It'll be so much fun!";
next;
mes "[Sister Linus]";
mes "Goodness, I've been";
mes "running my mouth! I'm";
mes "sorry to keep you, did you";
mes "have somewhere to go? Well,";
mes "I'll be praying for your safety~ ";
next;
mes "["+ strcharinfo(PC_NAME) +"]";
mes "Before I go, would you";
mes "please tell me the name";
mes "of that High Priest you were";
mes "talking about? If I see her,";
mes "I'll ask her to contact you.";
next;
mes "[Sister Linus]";
mes "Oh, thank you! Her name";
mes "is High Priest Sorin. Um,";
mes "^3131FFMargaretha Sorin^000000. If you";
mes "happen to find her, please";
mes "let her know that I am";
mes "praying for her safety.";
PRIEST_SK = 1;
close;
}
else if (PRIEST_SK == 1) {
mes "[Sister Linus]";
mes "Oh, hello~";
mes "How are you";
mes "doing today?";
next;
if (select("Please teach me ^3131FFRedemptio^000000.", "Cancel") == 1) {
mes "[Sister Linus]";
mes "Ooh, Redemptio would be";
mes "a good skill for you to learn~";
mes "It's difficult to cast, but when you succeed, you can revive all";
mes "of your defeated Party Members.";
next;
mes "[Sister Linus]";
mes "Of course, the drawback";
mes "is that you must ^3131FFsacrifice";
mes "your own life^000000 in order to";
mes "use the skill. Now, to learn";
mes "Redemptio, you must first";
mes "learn ^3131FFLevel 1 Resurrection^000000.";
next;
mes "[Sister Linus]";
mes "Ah, you must";
mes "also bring me";
mes "^3131FF30 Holy Waters and";
mes "20 Blue Gemstones^000000";
mes "so you can attempt";
mes "to learn the skill.";
PRIEST_SK = 2;
next;
mes "[Sister Linus]";
mes "Um, but if you fail to";
mes "learn Redemptio, you'll";
mes "lose 1 Holy Water and";
mes "1 Blue Gemstone and";
mes "you'll have to try it again...";
close;
}
mes "[Sister Linus]";
mes "Praying gives me a";
mes "sense of peace and";
mes "comfort. Perhaps that";
mes "is one of the reasons";
mes "why I chose this job...";
close;
}
else if (PRIEST_SK == 2) {
if (getskilllv("ALL_RESURRECTION") > 0) {
if (countitem(Holy_Water) > 29 && countitem(Blue_Gemstone) > 19) {
mes "[Sister Linus]";
mes "Ooh, it seems like you've";
mes "brought everything that you";
mes "need to learn Redemptio.";
mes "Are you ready to try it? If you";
mes "fail, you'll lose 1 Holy Water";
mes "and 1 Blue Gemstone, okay?";
next;
mes "[Sister Linus]";
mes "Now, please";
mes "concentrate and";
mes "repeat this special";
mes "prayer after me.";
next;
mes "[Sister Linus]";
mes "^3131FFOh holy and venerable one,";
mes "we pray to you. Please show";
mes "us your mercy and guide us";
mes "with your light. Give us the";
mes "strength to walk the path of";
mes "love and sacrifice. Redemptio!^000000";
next;
.@redem_s = JobLevel+getskilllv("ALL_RESURRECTION");
.@red_suc = rand(1,100);
if( .@redem_s < 31 ) {
if( .@red_suc > 20 && .@red_suc < 41 )
.@success = 1;
} else if( .@redem_s < 41 ) {
if( .@red_suc > 10 && .@red_suc < 41 )
.@success = 1;
} else {
if( .@red_suc > 10 && .@red_suc < 51 )
.@success = 1;
}
if (.@success) {
specialeffect(EF_HEALSP, AREA, playerattached());
mes "[Sister Linus]";
mes "Congratulations!";
mes "You successfully";
mes "learned Redemptio!";
mes "Please remember to only";
mes "use this skill in the most";
mes "critical situations.";
delitem Blue_Gemstone,20;
delitem Holy_Water,30;
PRIEST_SK = 100;
skill "PR_REDEMPTIO",1,0;
close;
}
else {
specialeffect(EF_POISONHIT, AREA, playerattached());
mes "[Sister Linus]";
mes "Oh no! I'm sorry,";
mes "but you failed to";
mes "learn Redemptio. Well,";
mes "I'll be waiting right here,";
mes "so we can try again when";
mes "you're ready, okay?";
delitem Blue_Gemstone,1;
delitem Holy_Water,1;
close;
}
}
else {
mes "[Sister Linus]";
mes "If you want to try to learn";
mes "Redemptio, please bring";
mes "^3131FF20 Blue Gemstones^000000 and";
mes "^3131FF30 Holy Waters^000000. Ah, and";
mes "you need to learn ^3131FFLevel 1";
mes "Resurrection^000000 beforehand.";
close;
}
}
else {
mes "[Sister Linus]";
mes "If you want to try to learn";
mes "Redemptio, please bring";
mes "^3131FF20 Blue Gemstones^000000 and";
mes "^3131FF30 Holy Waters^000000. Ah, and";
mes "you need to learn ^3131FFLevel 1";
mes "Resurrection^000000 beforehand.";
close;
}
}
}
else {
mes "[Sister Linus]";
mes "Please have mercy and";
mes "spread your light through";
mes "the world. Guide her with";
mes "your benevolent wisdom...";
mes "Bless her, and may she";
mes "be protected by your grace.";
close;
}
}
