summaryrefslogtreecommitdiff
path: root/npc/003-0/priest.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/003-0/priest.txt')
-rw-r--r--npc/003-0/priest.txt255
1 files changed, 255 insertions, 0 deletions
diff --git a/npc/003-0/priest.txt b/npc/003-0/priest.txt
new file mode 100644
index 000000000..ffa4ce754
--- /dev/null
+++ b/npc/003-0/priest.txt
@@ -0,0 +1,255 @@
+// TMW2 scripts.
+// Authors:
+// Jesusalva
+// Description:
+// Leader of the PRIEST class
+
+003-0,58,30,0 script Priest Master NPC_PLAYER,{
+ /*
+ if (!is_staff())
+ goto L_Close;
+ */
+ if (!(MAGIC_SUBCLASS & CL_PRIEST))
+ goto L_SignUp;
+ goto L_Member;
+
+// Sign Up
+L_SignUp:
+ // Not allowed if subclass filled or not from main class
+ if (total_subclass() >= max_subclass() || getskilllv(WIZARD_MAGE) < 2)
+ goto L_Close;
+ mesn;
+ mesq l("Hey there! Do you want to join the Priest Class?");
+ mesc l("Warning: If you join a subclass, you can't leave it later!"), 1;
+ next;
+ if (askyesno() != ASK_YES)
+ close;
+ // TODO: Requeriment for signing up to a subclass? Or is the tier + skill quest hard enough?
+ MAGIC_SUBCLASS=MAGIC_SUBCLASS|CL_PRIEST;
+ mesn;
+ mesq l("Welcome to the Priest guild!");
+ close;
+
+// Close
+L_Close:
+ goodbye;
+ closedialog;
+ close;
+
+L_Missing:
+ mesn;
+ mesq l("Hey hey! You don't have that stuff, CAN'T YOU READ?!");
+ percentheal 0, -10;
+ next;
+ goto L_Member;
+
+// Membership area
+// Priest
+// AL_HOLYLIGHT (standard holy magic attack - 125% of MATK)
+// MG_SRECOVERY (small increase to SP Recovery while idle each 10 sec.)
+// ALL_RESURRECTION (Revive at 10% HP. May insta-kill undead. Max Level 3~4)
+// PR_ASPERSIO (Change anyone weapon to holy for 60s. Or 40 defense-disregard holy dmg to undead/evil)
+// TF_DETOXIFY (cancels poison. 40% MP.)
+
+L_Member:
+ mesn;
+ mesq l("Hey there! Do you want to learn new skills for a very small teaching fee?");
+ select
+ rif(sk_intcost(AL_HOLYLIGHT) && !getskilllv(AL_HOLYLIGHT), l("Learn Holy Light")),
+ rif(sk_intcost(TF_DETOXIFY) && !getskilllv(TF_DETOXIFY), l("Learn Detoxify")),
+ rif(sk_intcost(ALL_RESURRECTION) && getskilllv(ALL_RESURRECTION) < (1+degree_subclass()/2), l("Learn Ressurection")),
+ rif(sk_intcost(MG_SRECOVERY) && sk_canlvup(MG_SRECOVERY), l("Improve Mana Recovery")),
+ rif(sk_intcost(PR_ASPERSIO) && sk_canlvup(PR_ASPERSIO), l("Improve Blessed Weapon")),
+ l("Leave Subclass"),
+ l("Nothing at the moment.");
+ mes "";
+ switch (@menu) {
+ case 1:
+ mesc l("[Holy Light]");
+ mesc l("The basic magic attack from a Priest. No effect against Holy Monsters.");
+ mes "";
+ mesn;
+ mesq l("This useful skill will only require:");
+ mesc l("@@/@@ @@", countitem(Tentacle), (getskilllv(AL_HOLYLIGHT)+1)*10, getitemlink(Tentacle));
+ mesc l("@@/@@ @@", countitem(MushroomSpores), (getskilllv(AL_HOLYLIGHT)+1)*5, getitemlink(MushroomSpores));
+ mesc l("@@/@@ @@", countitem(WolvernTooth), (getskilllv(AL_HOLYLIGHT)+1)*3, getitemlink(WolvernTooth));
+ mesc l("@@/@@ @@", countitem(RedScorpionClaw), (getskilllv(AL_HOLYLIGHT)+1)*1, getitemlink(RedScorpionClaw));
+ next;
+ if (askyesno() == ASK_YES) {
+ if (
+ countitem(Tentacle) < (getskilllv(AL_HOLYLIGHT)+1)*10 ||
+ countitem(MushroomSpores) < (getskilllv(AL_HOLYLIGHT)+1)*5 ||
+ countitem(WolvernTooth) < (getskilllv(AL_HOLYLIGHT)+1)*3 ||
+ countitem(RedScorpionClaw) < (getskilllv(AL_HOLYLIGHT)+1)*1) goto L_Missing;
+
+ delitem Tentacle, (getskilllv(AL_HOLYLIGHT)+1)*10;
+ delitem MushroomSpores, (getskilllv(AL_HOLYLIGHT)+1)*5;
+ delitem WolvernTooth, (getskilllv(AL_HOLYLIGHT)+1)*3;
+ delitem RedScorpionClaw, (getskilllv(AL_HOLYLIGHT)+1)*1;
+
+ sk_lvup(AL_HOLYLIGHT);
+
+ next;
+ }
+ break;
+ case 2:
+ mesc l("[Detoxify]");
+ mesc l("Cancels Poison. Antidotes are hard to come by, anyway.");
+ mes "";
+ mesn;
+ mesq l("This useful skill will only require:");
+ mesc l("@@/@@ @@", countitem(Acorn), (getskilllv(TF_DETOXIFY)+1)*70, getitemlink(Acorn));
+ mesc l("@@/@@ @@", countitem(Root), (getskilllv(TF_DETOXIFY)+1)*10, getitemlink(Root));
+ mesc l("@@/@@ @@", countitem(FrozenYetiTear),(getskilllv(TF_DETOXIFY)+1)*2, getitemlink(FrozenYetiTear));
+ mesc l("@@/@@ @@", countitem(FluoPowder), (getskilllv(TF_DETOXIFY)+1)*1, getitemlink(FluoPowder));
+ next;
+ if (askyesno() == ASK_YES) {
+ if (
+ countitem(Acorn) < (getskilllv(TF_DETOXIFY)+1)*70 ||
+ countitem(Root) < (getskilllv(TF_DETOXIFY)+1)*10 ||
+ countitem(FrozenYetiTear) < (getskilllv(TF_DETOXIFY)+1)*2 ||
+ countitem(FluoPowder) < (getskilllv(TF_DETOXIFY)+1)*1) goto L_Missing;
+
+ delitem Acorn, (getskilllv(TF_DETOXIFY)+1)*70;
+ delitem Root, (getskilllv(TF_DETOXIFY)+1)*10;
+ delitem FrozenYetiTear, (getskilllv(TF_DETOXIFY)+1)*2;
+ delitem FluoPowder, (getskilllv(TF_DETOXIFY)+1)*1;
+
+ sk_lvup(TF_DETOXIFY);
+
+ next;
+ }
+ break;
+ case 3:
+ mesc l("[Ressurection]");
+ mesc l("Raise fallen party members so they can keep fighting.");
+ mes "";
+ mesn;
+ mesq l("This useful skill will only require:");
+ mesc l("@@/@@ @@", countitem(Acorn), (getskilllv(ALL_RESURRECTION)+1)*60, getitemlink(Acorn));
+ mesc l("@@/@@ @@", countitem(Bread), (getskilllv(ALL_RESURRECTION)+1)*30, getitemlink(Bread));
+ mesc l("@@/@@ @@", countitem(SmallMushroom), (getskilllv(ALL_RESURRECTION)+1)*20, getitemlink(SmallMushroom));
+ mesc l("@@/@@ @@", countitem(PinkBlobime), (getskilllv(ALL_RESURRECTION)+1)*20, getitemlink(PinkBlobime));
+ mesc l("@@/@@ @@", countitem(RedApple), (getskilllv(ALL_RESURRECTION)+1)*15, getitemlink(RedApple));
+ next;
+ if (askyesno() == ASK_YES) {
+ if (
+ countitem(Acorn) < (getskilllv(ALL_RESURRECTION)+1)*60 ||
+ countitem(Bread) < (getskilllv(ALL_RESURRECTION)+1)*30 ||
+ countitem(SmallMushroom) < (getskilllv(ALL_RESURRECTION)+1)*20 ||
+ countitem(PinkBlobime) < (getskilllv(ALL_RESURRECTION)+1)*20 ||
+ countitem(RedApple) < (getskilllv(ALL_RESURRECTION)+1)*15) goto L_Missing;
+
+ delitem Acorn, (getskilllv(ALL_RESURRECTION)+1)*60;
+ delitem Bread, (getskilllv(ALL_RESURRECTION)+1)*30;
+ delitem SmallMushroom, (getskilllv(ALL_RESURRECTION)+1)*20;
+ delitem PinkBlobime, (getskilllv(ALL_RESURRECTION)+1)*20;
+ delitem RedApple, (getskilllv(ALL_RESURRECTION)+1)*15;
+
+ sk_lvup(ALL_RESURRECTION);
+
+ next;
+ }
+ break;
+ case 4:
+ mesc l("[MP Regen]");
+ mesc l("Heals more mana while standing.");
+ mes "";
+ mesn;
+ mesq l("This useful skill will only require:");
+ mesc l("@@/@@ @@", countitem(Acorn), (getskilllv(MG_SRECOVERY)+1)*70, getitemlink(Acorn));
+ mesc l("@@/@@ @@", countitem(Root), (getskilllv(MG_SRECOVERY)+1)*10, getitemlink(Root));
+ mesc l("@@/@@ @@", countitem(FrozenYetiTear),(getskilllv(MG_SRECOVERY)+1)*2, getitemlink(FrozenYetiTear));
+ mesc l("@@/@@ @@", countitem(FluoPowder), (getskilllv(MG_SRECOVERY)+1)*1, getitemlink(FluoPowder));
+ next;
+ if (askyesno() == ASK_YES) {
+ if (
+ countitem(Acorn) < (getskilllv(MG_SRECOVERY)+1)*70 ||
+ countitem(Root) < (getskilllv(MG_SRECOVERY)+1)*10 ||
+ countitem(FrozenYetiTear) < (getskilllv(MG_SRECOVERY)+1)*2 ||
+ countitem(FluoPowder) < (getskilllv(MG_SRECOVERY)+1)*1) goto L_Missing;
+
+ delitem Acorn, (getskilllv(MG_SRECOVERY)+1)*70;
+ delitem Root, (getskilllv(MG_SRECOVERY)+1)*10;
+ delitem FrozenYetiTear, (getskilllv(MG_SRECOVERY)+1)*2;
+ delitem FluoPowder, (getskilllv(MG_SRECOVERY)+1)*1;
+
+ sk_lvup(MG_SRECOVERY);
+
+ next;
+ }
+ break;
+ case 5:
+ mesc l("[Bless Weapon]");
+ mesc l("Changes anyone's weapon to Holy elemental. Causes small damage when used on offensive.");
+ mes "";
+ mesn;
+ mesq l("This useful skill will only require:");
+ mesc l("@@/@@ @@", countitem(Acorn), (getskilllv(PR_ASPERSIO)+1)*70, getitemlink(Acorn));
+ mesc l("@@/@@ @@", countitem(Root), (getskilllv(PR_ASPERSIO)+1)*10, getitemlink(Root));
+ mesc l("@@/@@ @@", countitem(FrozenYetiTear),(getskilllv(PR_ASPERSIO)+1)*2, getitemlink(FrozenYetiTear));
+ mesc l("@@/@@ @@", countitem(FluoPowder), (getskilllv(PR_ASPERSIO)+1)*1, getitemlink(FluoPowder));
+ next;
+ if (askyesno() == ASK_YES) {
+ if (
+ countitem(Acorn) < (getskilllv(PR_ASPERSIO)+1)*70 ||
+ countitem(Root) < (getskilllv(PR_ASPERSIO)+1)*10 ||
+ countitem(FrozenYetiTear) < (getskilllv(PR_ASPERSIO)+1)*2 ||
+ countitem(FluoPowder) < (getskilllv(PR_ASPERSIO)+1)*1) goto L_Missing;
+
+ delitem Acorn, (getskilllv(PR_ASPERSIO)+1)*70;
+ delitem Root, (getskilllv(PR_ASPERSIO)+1)*10;
+ delitem FrozenYetiTear, (getskilllv(PR_ASPERSIO)+1)*2;
+ delitem FluoPowder, (getskilllv(PR_ASPERSIO)+1)*1;
+
+ sk_lvup(PR_ASPERSIO);
+
+ next;
+ }
+ break;
+ case 6:
+ // All skills related may include the basic class skills if they're related.
+ mesc l("WARNING: If you leave the subclass, you'll lose all skills related to it!"), 1;
+ mesc l("This cannot be undone. Are you sure?"), 1;
+ mes "";
+ if (askyesno() == ASK_YES) {
+ mes "";
+ if (validatepin()) {
+ skill AL_HOLYLIGHT, 0, 0;
+ skill TF_DETOXIFY, 0, 0;
+ skill ALL_RESURRECTION, 0, 0;
+ skill MG_SRECOVERY, 0, 0;
+ skill PR_ASPERSIO, 0, 0;
+ MAGIC_SUBCLASS=MAGIC_SUBCLASS^CL_PRIEST;
+ mesc l("You abandoned the PRIEST class!"), 1;
+ close;
+ } else {
+ mesc l("Failed to validate pin. Aborting.");
+ next;
+ }
+ } else {
+ mes "";
+ mesc l("Operation aborted. Phew!");
+ next;
+ }
+ break;
+ default:
+ goto L_Close;
+ }
+
+ goto L_Member;
+
+OnInit:
+ .@npcId = getnpcid(0, .name$);
+ //setunitdata(.@npcId, UDT_HEADTOP, WarlordHelmet); // TODO: wizard hat
+ setunitdata(.@npcId, UDT_HEADMIDDLE, SorcererRobe);
+ setunitdata(.@npcId, UDT_HEADBOTTOM, NPCEyes);
+ setunitdata(.@npcId, UDT_WEAPON, JeansChaps);
+ setunitdata(.@npcId, UDT_HAIRSTYLE, 2);
+ setunitdata(.@npcId, UDT_HAIRCOLOR, 4);
+
+ .sex=G_MALE;
+ .distance=5;
+ end;
+}
+