summaryrefslogtreecommitdiff
path: root/npc/re/instances
diff options
context:
space:
mode:
authorAsheraf <acheraf1998@gmail.com>2016-08-25 13:00:05 +0100
committerhemagx <hemagx2@gmail.com>2016-08-26 21:34:19 +0200
commit84c253d2b012bc06b25a843c09a60cb28c678e95 (patch)
tree8af64fb54cd80be5991410d508620b083d90540d /npc/re/instances
parent13067dc118b790e676dc2cecf272279a850c7ce2 (diff)
downloadhercules-84c253d2b012bc06b25a843c09a60cb28c678e95.tar.gz
hercules-84c253d2b012bc06b25a843c09a60cb28c678e95.tar.bz2
hercules-84c253d2b012bc06b25a843c09a60cb28c678e95.tar.xz
hercules-84c253d2b012bc06b25a843c09a60cb28c678e95.zip
Implementation of Ghost palace instance based on iRO
* Added ghost palace instance script * Add needed monster, item and quest database entries * Added mapflags for instance map (1@spa)
Diffstat (limited to 'npc/re/instances')
-rw-r--r--npc/re/instances/ghost_palace.txt837
1 files changed, 837 insertions, 0 deletions
diff --git a/npc/re/instances/ghost_palace.txt b/npc/re/instances/ghost_palace.txt
new file mode 100644
index 000000000..ea8f3d853
--- /dev/null
+++ b/npc/re/instances/ghost_palace.txt
@@ -0,0 +1,837 @@
+//================= Hercules Script =======================================
+//= _ _ _
+//= | | | | | |
+//= | |_| | ___ _ __ ___ _ _| | ___ ___
+//= | _ |/ _ \ '__/ __| | | | |/ _ \/ __|
+//= | | | | __/ | | (__| |_| | | __/\__ \
+//= \_| |_/\___|_| \___|\__,_|_|\___||___/
+//================= License ===============================================
+//= This file is part of Hercules.
+//= http://herc.ws - http://github.com/HerculesWS/Hercules
+//=
+//= Copyright (C) 2016 Hercules Dev Team
+//= Copyright (C) Asheraf
+//= Copyright (C) pengc2010
+//=
+//= 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/>.
+//=========================================================================
+//= Ghost Palace
+//================= Current Version =======================================
+//= 1.1
+//=========================================================================
+1@spa mapflag src4instance
+
+dali02,44,129,5 script Unpleasent Royal Guard 4_M_SAKRAYROYAL,{
+ if (BaseLevel < 120) {
+ mes("[Unpleasent Royal Guard]");
+ mes("Althought I need help with a task, you are not strong enough to assist me, noob~!");
+ next;
+ mes("[Unpleasent Royal Guard]");
+ mes("Come back after when you have done some training and are at least level 120!");
+ close();
+ }
+ if (questprogress(1261)) {
+ mes("[Unpleasent Royal Guard]");
+ mes("The monsters that attacked the palace are wandering around the secret entrance. It would be very bad if they spotted us... Please wait until the time limit for re-entrance passed.");
+ close();
+ }
+ if (questprogress(1260)) {
+ if (has_instance("1@spa") == "") {
+ mes("[Unpleasent Royal Guard]");
+ mes("Did the gate close?\r"
+ "Please enter the gate as soon as you can next time.");
+ erasequest 1260;
+ close();
+ }
+ mes("[Unpleasent Royal Guard]");
+ mes("Please go ahead, ^0000ffThe entrance is behind me.^000000\r"
+ "I will be right behind you!");
+ close();
+ }
+ .@party_id = getcharid(1);
+ if (!.@party_id) {
+ mes("[Unpleasent Royal Guard]");
+ mes("This is a solo instance. Please form a solo party before continuing.");
+ close();
+ }
+ if (getcharid(0) != getpartyleader(.@party_id,2)) {
+ mes("[Unpleasent Royal Guard]");
+ mes("I'm looking for adventurers to help me!\r"
+ "I want to talk to the team leader, can I?");
+ close();
+ }
+ mes("[Unpleasent Royal Guard]");
+ mes("I need some help, even from the likes of you.");
+ next;
+ mes("[Unpleasent Royal Guard]");
+ mes("In the middle of the battle the princess disappeared while I was guarding the palace.");
+ next;
+ mes("[Unpleasent Royal Guard]");
+ mes("You run ahead and i will catch up.\r"
+ "We must save her.");
+ next;
+ if (select("I will help.", "This is not a good time.") == 2) {
+ mes("[Unpleasent Royal Guard]");
+ mes("Even now all the royal guards are fighting and dying to the monsters.");
+ next;
+ mes("[Unpleasent Royal Guard]");
+ mes("We must save the princess no matter how much fear grips our hearts!");
+ close();
+ }
+ .@instance = instance_create("Ghost Palace", .@party_id);
+ .@p_name$ = getpartyname(.@party_id);
+ .@md_name$ = "Ghost Palace";
+ if (.@instance < 0) {
+ mesf("Party Name: %s", .@p_name$);
+ mesf("Party Leader: %s", strcharinfo(0));
+ mesf("^0000FF%s^000000 - Reservation Failed!", .@md_name$);
+ close();
+ }
+ if (instance_attachmap("1@spa", .@instance) != "") {
+ instance_set_timeout(3600, 300, .@instance);
+ instance_init(.@instance);
+ if (!questprogress(1260)) setquest 1260;
+ mes("[Unpleasent Royal Guard]");
+ mes("Thank You..\r"
+ "I will open the secret passage to ^0000FFGhost Palace.^000000\r"
+ "Please be ready!");
+ close();
+ } else {
+ instance_destroy(.@instance);
+ mesf("^0000FF%s^000000 - Reservation Failed!", .@md_name$);
+ close();
+ }
+}
+
+dali02,41,134,0 script Interdimensional Device::gpportal PORTAL,{
+ if (BaseLevel < 120) {
+ mes("[Unpleasent Royal Guard]");
+ mes("Althought I need help with a task, you are not strong enough to assist me, noob~!");
+ next;
+ mes("[Unpleasent Royal Guard]");
+ mes("Come back after when you have done some training and are at least level 120!");
+ close();
+ }
+ if (questprogress(1261)) {
+ if (questprogress(1261, PLAYTIME) == 2) {
+ erasequest 1261;
+ if (questprogress(1260))
+ erasequest 1260;
+ end;
+ }
+ mes("[Unpleasent Royal Guard]");
+ mes("The monsters that attacked the palace are wandering around the secret entrance. It would be very bad if they spotted us... Please wait until the time limit for re-entrance passed.");
+ close();
+ }
+ if (getcharid(0) == getpartyleader(.@party_id,2) && !questprogress(1260)) {
+ mes("[Unpleasent Royal Guard]");
+ mes("I'm looking for adventurers to help me!\r"
+ "I want to talk to the team leader, can I?");
+ close();
+ }
+ mes("[Unpleasent Royal Guard]");
+ mes("I can see the secret passage into the Palace... Are you ready to save the princess?!");
+ next;
+ if (select("Enter", "Stop") == 2) {
+ mes("[Unpleasent Royal Guard]");
+ mes("Even now all the royal guards are fighting and dying to the monsters.");
+ next;
+ mes("[Unpleasent Royal Guard]");
+ mes("We must save the princess no matter how much fear grips our hearts!");
+ close();
+ }
+ if (has_instance("1@spa") == "") {
+ mes("^FF0000Inside the device you see a dark hole. If you wish to enter you may wish to talk to the Unpleasant Royal Guard first.^000000");
+ close();
+ }
+ mapannounce("dali", sprintf(_$("%s of the party, %s, is entering the Ghost Palace."), strcharinfo(0), getpartyname(getcharid(1))), bc_map, C_SPRINGGREEN);
+ if (!questprogress(1260)) setquest 1260;
+ setquest 1261;
+ warp("1@spa", 198, 188);
+ close();
+}
+
+1@spa,197,204,5 script King#gp1 4_M_RUSKING,{
+ mes("[King]");
+ mes("You are hereby appointed as the personal guard to Princess Tiara. I trust your loyalty above all else.");
+ npctalk(_("You are hereby appointed as the personal guard to Princess Tiara. I trust your loyalty above all else."), instance_npcname("King#gp1"));
+ next;
+ mes("[Lurid Royal Guard]");
+ mes("I will protect the Princess with my life.");
+ npctalk(_("I will protect the Princess with my life."), instance_npcname("Lurid Royal Guard#gp1"));
+ next;
+ mes("[King]");
+ mes("The marriage arrangements are going as planned. The prince is here to meet the princess.");
+ npctalk(_("The marriage arrangements are going as planned. The prince is here to meet the princess."), instance_npcname("King#gp1"));
+ next;
+ mes("[Lurid Royal Guard]");
+ mes("...Yes, your majesty.");
+ npctalk(_("...Yes, your majesty."), instance_npcname("Lurid Royal Guard#gp1"));
+ next;
+ mes("[King]");
+ mes("My gods, there are monsters in the castle! Get rid of them now!");
+ npctalk(_("My gods, there are monsters in the castle! Get rid of them now!"), instance_npcname("King#gp1"));
+ close2();
+ donpcevent instance_npcname("#gp1control")+"::OnStart";
+ end;
+}
+
+1@spa,1,1,1 script #gp1control HIDDEN_NPC,{
+ end;
+OnStart:
+ hideonnpc instance_npcname("Lurid Royal Guard#gp1");
+ hideonnpc instance_npcname("King#gp1");
+ sleep 1000;
+OnSummon:
+ sleep 2000;
+ .@map$ = instance_mapname("1@spa");
+ areamonster(.@map$, 182, 190, 214, 214, _("Cursed Sentinel"), CURSED_SENTINEL, 2, instance_npcname("#gp1control")+"::OnMyMobDead");
+ areamonster(.@map$, 182, 190, 214, 214, _("Cursed Solider"), CURSED_SOLDIER, 2, instance_npcname("#gp1control")+"::OnMyMobDead");
+ end;
+OnMyMobDead:
+ if (mobcount(instance_mapname("1@spa"), instance_npcname("#gp1control")+"::OnMyMobDead"))
+ end;
+ if ('gp1 < 2) {
+ ++'gp1;
+ donpcevent instance_npcname("#gp1control")+"::OnSummon";
+ end;
+ }
+ mapannounce(instance_mapname("1@spa"), _("The passage on 2nd floor in the palace of the ghost is open."), bc_map, C_YELLOW);
+ enablenpc instance_npcname("#gp1warp");
+ disablenpc instance_npcname("#gp1control");
+ end;
+OnInstanceInit:
+ 'gp1 = 0;
+ disablenpc instance_npcname("#gp1warp");
+ end;
+}
+
+1@spa,132,122,0 script Lurid Royal Guard#gp2 4_M_SAKRAYROYAL,{
+ cutin("npc-tiara", 3);
+ mes("[Lurid Royal Guard]");
+ mes("Your Highness, the King has invited a prince from a neighboring country to be your betrothed. Be ready to meet him...");
+ npctalk(_("Your Highness, the King has invited a prince from a neighboring country to be your betrothed. Be ready to meet him..."), instance_npcname("Lurid Royal Guard#gp2"));
+ next;
+ mes("[Princess Tiara]");
+ mes("If...if a marriage is arranged what should I do ?");
+ npctalk(_("If...if a marriage is arranged what should I do ?"), instance_npcname("Tiara Princess#gp2"));
+ next;
+ mes("[Lurid Royal Guard]");
+ mes("The only thing I can do is protect you from physical harm.");
+ npctalk(_("The only thing I can do is protect you from physical harm."), instance_npcname("Lurid Royal Guard#gp2"));
+ next;
+ mes("[Princess Tiara]");
+ mes("Then, what can I do?");
+ npctalk(_("Then, what can I do?"), instance_npcname("Tiara Princess#gp2"));
+ next;
+ mes("[Lurid Royal Guard]");
+ mes("......");
+ mes("You must decide that for yourself your highness...");
+ npctalk(_("You must decide that for yourself your highness..."), instance_npcname("Lurid Royal Guard#gp2"));
+ next;
+ mes("[Princess Tiara]");
+ mes("Would it be easier for you if I were married and sent off to another country?");
+ npctalk(_("Would it be easier for you if I were married and sent off to another country?"), instance_npcname("Tiara Princess#gp2"));
+ next;
+ cutin("", 255);
+ mes("[Lurid Royal Guard]");
+ mes("I will alway stand by you and protect you forever.");
+ npctalk(_("I will alway stand by you and protect you forever."), instance_npcname("Lurid Royal Guard#gp2"));
+ next;
+ mes("[Princess Tiara]");
+ mes("Monsters in the castle? Protect me!");
+ npctalk(_("Monsters in the castle? Protect me!"), instance_npcname("Tiara Princess#gp2"));
+ next;
+ mes("[Lurid Royal Guard]");
+ mes("Step back, Let's go!");
+ npctalk(_("Step back, Let's go!"), instance_npcname("Lurid Royal Guard#gp2"));
+ close2();
+ donpcevent instance_npcname("#gp2control")+"::OnStart";
+ end;
+}
+
+1@spa,1,1,1 script #gp2control HIDDEN_NPC,{
+ end;
+OnStart:
+ hideonnpc instance_npcname("Lurid Royal Guard#gp2");
+ hideonnpc instance_npcname("Tiara Princess#gp2");
+ sleep 1000;
+OnSummon:
+ sleep 2000;
+ .@map$ = instance_mapname("1@spa");
+ areamonster(.@map$, 143, 96, 94, 143, _("Broken Mind"), BROKEN_MIND, 3, instance_npcname("#gp2control")+"::OnMyMobDead");
+ areamonster(.@map$, 143, 96, 94, 143, _("Floating Word"), FLOATING_WORD, 4, instance_npcname("#gp2control")+"::OnMyMobDead");
+ areamonster(.@map$, 143, 96, 94, 143, _("Like Love"), LIKE_LOVE, 3, instance_npcname("#gp2control")+"::OnMyMobDead");
+ end;
+OnMyMobDead:
+ if (mobcount(instance_mapname("1@spa"), instance_npcname("#gp2control")+"::OnMyMobDead"))
+ end;
+ mapannounce(instance_mapname("1@spa"), _("The passage on the 3rd floor of the palace is open."), bc_map, C_YELLOW);
+ enablenpc instance_npcname("#gp2warp");
+ disablenpc instance_npcname("#gp2control");
+ end;
+OnInstanceInit:
+ disablenpc instance_npcname("#gp2warp");
+ end;
+}
+
+1@spa,32,54,1 script King#gp3 4_M_RUSKING,{
+ mes("[King]");
+ mes("It was you who brought the monsters here, you want to get rid of me and have the princess for yourself?");
+ npctalk(_("It was you who brought the monsters here, you want to get rid of me and have the princess for yourself?"), instance_npcname("King#gp3"));
+ next;
+ mes("[Lurid Royal Guard]");
+ mes("It's a trap, you should trust me, your majesty!");
+ npctalk(_("It's a trap, you should trust me, your majesty!"), instance_npcname("Lurid Royal Guard#gp3"));
+ next;
+ mes("[King]");
+ mes("Shut up! You're betrayed me ! I trusted you... you must pay for your disgrace.");
+ npctalk(_("Shut up! You're betrayed me ! I trusted you... you must pay for your disgrace."), instance_npcname("King#gp3"));
+ next;
+ mes("[King]");
+ mes("You will suffer for the rest of your life.");
+ npctalk(_("You will suffer for the rest of your life."), instance_npcname("King#gp3"));
+ close2();
+ donpcevent instance_npcname("#gp3control")+"::OnStart";
+ end;
+}
+
+1@spa,54,28,0 script #gp3warp WARPNPC,1,1,{
+ if (!'gp5)
+ warp("1@spa", 218, 186);
+ else {
+ if (questprogress(40024))
+ completequest 40024;
+ mes("It is time to leave Palace of the ghost.\r"
+ "Everything is completed.\r"
+ "Everything will be vanished...");
+ close2();
+ if (first_time_gpmission)
+ getitem Gray_Piece, 1;
+ if (!first_time_gpmission) {
+ getitem Gray_Piece, 2;
+ getexp(900000, 500000);
+ ++first_time_gpmission;
+ }
+ warp("dali02", 49, 127);
+ end;
+ }
+ end;
+}
+
+1@spa,35,56,1 script Ominous Voice#gp3 4_TRACE,{
+ end;
+OnStart:
+ initnpctimer;
+ end;
+OnTimer3000:
+ npctalk(_("Oh, faithful royal guard, you are trapped."));
+ end;
+OnTimer6000:
+ npctalk(_("The conspiracy in the palace has your princess in grave danger..."));
+ end;
+OnTimer9000:
+ npctalk(_("Who are you? Show yourself!"), instance_npcname("Lurid Royal Guard#gp3"));
+ end;
+OnTimer12000:
+ npctalk(_("Ah... so you do hear me?"));
+ end;
+OnTimer15000:
+ npctalk(_("...?"), instance_npcname("Lurid Royal Guard#gp3"));
+ end;
+OnTimer18000:
+ npctalk(_("I...I..."), instance_npcname("Lurid Royal Guard#gp3"));
+ end;
+OnTimer21000:
+ npctalk(_("Kukuku... What do you want boy?"));
+ end;
+OnTimer24000:
+ stopnpctimer;
+ hideonnpc instance_npcname("Ominous Voice#gp3");
+ hideonnpc instance_npcname("Lurid Royal Guard#gp3");
+ donpcevent instance_npcname("#gp3control")+"::OnSummon";
+ end;
+}
+
+1@spa,1,1,1 script #gp3control HIDDEN_NPC,{
+ end;
+OnStart:
+ hideonnpc instance_npcname("King#gp3");
+ hideonnpc instance_npcname("Soldier#gp3_1");
+ hideonnpc instance_npcname("Soldier#gp3_2");
+ hideonnpc instance_npcname("Soldier#gp3_3");
+ hideonnpc instance_npcname("Captain of the Guard#gp3");
+ donpcevent instance_npcname("Ominous Voice#gp3")+"::OnStart";
+ end;
+OnSummon:
+ initnpctimer;
+ .@map$ = instance_mapname("1@spa");
+ 'talkid[0] = areamonster(.@map$, 61, 63, 24, 24, _("Cursed Memory"), CURSED_MEMORY, 2 + 'gp3, instance_npcname("#gp3control")+"::OnMyMobDead");
+ 'talkid[1] = areamonster(.@map$, 61, 63, 24, 24, _("Colorless Vow"), COLORLESS_VOW, 3 + 'gp3, instance_npcname("#gp3control")+"::OnMyMobDead");
+ 'talkid[2] = areamonster(.@map$, 61, 63, 24, 24, _("Old Friendship"), OLD_FRIENDSHIP, 2 + 'gp3, instance_npcname("#gp3control")+"::OnMyMobDead");
+ end;
+OnTimer2000:
+ stopnpctimer;
+ unittalk('talkid[0], _("Faithful Guards"));
+ unittalk('talkid[1], _("Run!"));
+ unittalk('talkid[2], _("Being framed..."));
+ end;
+OnMyMobDead:
+ if (mobcount(instance_mapname("1@spa"), instance_npcname("#gp3control")+"::OnMyMobDead"))
+ end;
+ if (!'gp3) {
+ mapannounce instance_mapname("1@spa"), "The passage on the 4rd floor of the palace is open.", bc_map, C_YELLOW;
+ enablenpc instance_npcname("#gp3warp");
+ donpcevent instance_npcname("#gp4control")+"::OnSummon";
+ disablenpc instance_npcname("#gp1warp");
+ }
+ ++'gp3;
+ if ('gp3 < 5)
+ donpcevent instance_npcname("#gp3control")+"::OnSummon";
+ else {
+ stopnpctimer;
+ disablenpc instance_npcname("#gp3control");
+ }
+ end;
+OnInstanceInit:
+ disablenpc instance_npcname("#gp3warp");
+ 'gp3 = 0;
+ end;
+}
+
+1@spa,199,214,1 script Lurid Royal Guard#gp4 4_M_SAKRAYROYAL,{
+ mes("[Lurid Royal Guard]");
+ mes("Where is Princess Tiara?");
+ npctalk(_("Where is Princess Tiara?"), instance_npcname("Lurid Royal Guard#gp4"));
+ next;
+ mes("[Visiting Prince]");
+ mes("You are too late... but you brought what I was looking for. Thanks for your help.");
+ npctalk(_("You are too late... but you brought what I was looking for. Thanks for your help."), instance_npcname("Visiting Prince#gp4"));
+ next;
+ mes("[Visiting Prince]");
+ mes("Cursed Thanatos Magic Trace! Are you ready to have a new master?");
+ npctalk(_("Cursed Thanatos Magic Trace! Are you ready to have a new master?"), instance_npcname("Visiting Prince#gp4"));
+ next;
+ cutin("tartanos", 3);
+ mes("[Thanatos Magic Trace]");
+ mes("How dare you!");
+ npctalk(_("How dare you!"), instance_npcname("Thanatos Magic Trace#gp4"));
+ next;
+ mes("[Visiting Prince]");
+ mes("Aah, aah!!!");
+ npctalk(_("Aah, aah!!!"), instance_npcname("Visiting Prince#gp4"));
+ close2();
+ cutin("", 255);
+ donpcevent instance_npcname("#gp4control")+"::OnBoss";
+ end;
+}
+
+1@spa,1,1,1 script #gp4control HIDDEN_NPC,{
+ end;
+OnStart:
+ end;
+OnSummon:
+ .@map$ = instance_mapname("1@spa");
+ areamonster(.@map$, 182, 217, 214, 188, _("Cursed Sentinel"), CURSED_SENTINEL, rand(2,3), instance_npcname("#gp4control")+"::OnMyMobDead");
+ areamonster(.@map$, 182, 217, 214, 188, _("Sweet Slaughter"), SWEET_SLAUGHTER, rand(2,3), instance_npcname("#gp4control")+"::OnMyMobDead");
+ end;
+OnMyMobDead:
+ if (mobcount(instance_mapname("1@spa"), instance_npcname("#gp4control")+"::OnMyMobDead"))
+ end;
+ ++'gp4;
+ if ('gp4 > 3)
+ donpcevent instance_npcname("#gp4control")+"::OnStory";
+ else
+ donpcevent instance_npcname("#gp4control")+"::OnSummon";
+ end;
+OnStory:
+ for(.@i = 1; .@i <= 4; ++.@i)
+ enablenpc instance_npcname("Soldier's Corpse#gp4_"+.@i);
+ enablenpc instance_npcname("Captain's Corpse#gp4");
+ enablenpc instance_npcname("King's Corpse#gp4");
+ enablenpc instance_npcname("Lurid Royal Guard#gp4");
+ enablenpc instance_npcname("Thanatos Magic Trace#gp4");
+ enablenpc instance_npcname("Visiting Prince#gp4");
+ end;
+OnBoss:
+ for(.@i = 1; .@i <= 4; ++.@i)
+ hideonnpc instance_npcname("Soldier's Corpse#gp4_"+.@i);
+ hideonnpc instance_npcname("Captain's Corpse#gp4");
+ hideonnpc instance_npcname("King's Corpse#gp4");
+ hideonnpc instance_npcname("Lurid Royal Guard#gp4");
+ hideonnpc instance_npcname("Thanatos Magic Trace#gp4");
+ hideonnpc instance_npcname("Visiting Prince#gp4");
+ sleep 1000;
+ monster(instance_mapname("1@spa"), 197, 218, _("Torturous Redeemer"), TORTUROUS_REDEEMER, 1, instance_npcname("#gp4control")+"::OnBossDead");
+ end;
+OnBossDead:
+ monster(instance_mapname("1@spa"), 197, 180, _("Sweet Slaughter"), SWEET_SLAUGHTER, 1, instance_npcname("#gp4control")+"::OnMobDead");
+ end;
+OnMobDead:
+ mapannounce instance_mapname("1@spa"), "The passage on the 5th floor of the palace is open.", bc_map, C_YELLOW;
+ enablenpc instance_npcname("#gp4warp");
+ donpcevent instance_npcname("#gp5control")+"::OnStart";
+ disablenpc instance_npcname("#gp4control");
+ end;
+OnInstanceInit:
+ disablenpc instance_npcname("#gp4warp");
+ for(.@i = 1; .@i <= 4; ++.@i)
+ disablenpc instance_npcname("Soldier's Corpse#gp4_"+.@i);
+ disablenpc instance_npcname("Captain's Corpse#gp4");
+ disablenpc instance_npcname("King's Corpse#gp4");
+ disablenpc instance_npcname("Lurid Royal Guard#gp4");
+ disablenpc instance_npcname("Thanatos Magic Trace#gp4");
+ disablenpc instance_npcname("Visiting Prince#gp4");
+ 'gp4 = 0;
+ end;
+}
+
+1@spa,57,42,0 script Lurid Royal Guard#gp5 4_M_SAKRAYROYAL,{
+ mes("[Princess Tiara]");
+ mes("You kept your promise.");
+ npctalk(_("You kept your promise."), instance_npcname("Tiara Princess#gp5"));
+ next;
+ mes("[Lurid Royal Guard]");
+ mes("princess!");
+ npctalk(_("princess"), instance_npcname("Lurid Royal Guard#gp5"));
+ next;
+ cutin("npc-tiara", 3);
+ mes("[Princess Tiara]");
+ mes("Thank you..now I can rest at beside you...");
+ npctalk(_("Thank you..now I can rest at beside you..."), instance_npcname("Tiara Princess#gp5"));
+ next;
+ mes("[Lurid Royal Guard]");
+ mes("No..NO!!!!!!");
+ npctalk(_("No..NO!!!!!!"), instance_npcname("Lurid Royal Guard#gp5"));
+ next;
+ mes("[The Voice of Princess Tiara]");
+ mes("I want to be with you forever in peace...forever...");
+ npctalk(_("I want to be with you forever in peace...forever..."), instance_npcname("Tiara Princess#gp5"));
+ next;
+ cutin("b-tiara", 3);
+ mes("[Lurid Royal Guard]");
+ mes("no.....Ahh ahh ahh!!!~!");
+ npctalk(_("no.....Ahh ahh ahh!!!~!"), instance_npcname("Lurid Royal Guard#gp5"));
+ next;
+ mes("[The Voice of Princess Tiara]");
+ mes("I love you...");
+ npctalk(_("I love you..."), instance_npcname("Tiara Princess#gp5"));
+ close2();
+ cutin("", 255);
+ donpcevent instance_npcname("#gp5control")+"::OnStart2";
+ end;
+}
+
+1@spa,40,44,6 script Sakray#gp5 4_M_SAKRAY,{
+ cutin("sakray", 3);
+ mes("[Lurid Royal Guard]");
+ mes("Are you satisfied..? Thanatos Magic Trace?");
+ npctalk(_("Are you satisfied..? Thanatos Magic Trace?"), instance_npcname("Sakray#gp5"));
+ next;
+ mes("[Thanatos Magic Trace]");
+ mes("I need more blood..Sakray, offer me his blood.");
+ npctalk(_("I need more blood..Sakray, offer me his blood."), instance_npcname("Thanatos Magic Trace#gp5"));
+ next;
+ mes("[Sakray]");
+ mes("Okay, that is good. A traveler.\r"
+ "Did you see?");
+ npctalk(_("Okay, that is good. A traveler. Did you see?"), instance_npcname("Sakray#gp5"));
+ next;
+ mesf("[%s]", strcharinfo(0));
+ mes("Sakray, What do you want sympathy? Or is it a trap?");
+ unittalk(getcharid(3), _("Sakray, What do you want sympathy? Or is it a trap?"));
+ next;
+ mes("[Sakray]");
+ mes("Non...I did not need to make an effort to catch a novice.");
+ npctalk(_("Non...I did not need to make an effort to catch a novice."), instance_npcname("Sakray#gp5"));
+ next;
+ mesf("[%s]", strcharinfo(0));
+ mes("If so... then why...?");
+ unittalk(getcharid(3), _("If so... then why...?"));
+ next;
+ cutin("cry-b", 3);
+ mes("[Sakray]");
+ mes("I wanted to get rid of a piece of humanity inside of me through you.");
+ npctalk(_("I wanted to get rid of a piece of humanity inside of me through you."), instance_npcname("Sakray#gp5"));
+ next;
+ mes("[Sakray]");
+ mes("I am quite satisfied with the result.");
+ next;
+ mes("[Thanatos Magic Trace]");
+ mes("Sakray, offer the blood to me now!");
+ npctalk(_("Sakray, offer the blood to me now!"), instance_npcname("Thanatos Magic Trace#gp5"));
+ next;
+ mes("[Sakray]");
+ mes("If you were me, what would you do?");
+ next;
+ mes("[Sakray]");
+ mes("Can you set yourself free from this curse?");
+ next;
+ mesf("[%s]", strcharinfo(0));
+ mes("...");
+ unittalk(getcharid(3), _("..."));
+ next;
+ mes("[Sakray]");
+ mes("Heh heh... I will keep watching you until the day you grow up enough.");
+ next;
+ mes("[Sakray]");
+ mes("I am willing to hunt you later for Thanatos.");
+ next;
+ cutin("", 255);
+ mes("[Sakray]");
+ mes("Farewell then.");
+ close2();
+ donpcevent instance_npcname("#gp5control")+"::OnEnd";
+ hideonnpc instance_npcname("Sakray#gp5");
+ hideonnpc instance_npcname("Thanatos Magic Trace#gp5");
+ end;
+}
+
+1@spa,1,1,1 script #gp5control HIDDEN_NPC,{
+ end;
+OnStart:
+ stopnpctimer instance_npcname("#gp3control");
+ disablenpc instance_npcname("#gp3control");
+ killmonster instance_mapname("1@spa"), "All";
+ disablenpc instance_npcname("#gp3warp");
+ enablenpc instance_npcname("Lurid Royal Guard#gp5");
+ enablenpc instance_npcname("Tiara Princess#gp5");
+ end;
+OnStart2:
+ hideonnpc instance_npcname("Lurid Royal Guard#gp5");
+ hideonnpc instance_npcname("Tiara Princess#gp5");
+ sleep 2000;
+OnSummon:
+ initnpctimer;
+ .@map$ = instance_mapname("1@spa");
+ 'talkid[0] = areamonster(.@map$, 61, 63, 24, 24, _("Forgotten Name"), FORGOTTEN_NAME, rand(1,2), instance_npcname("#gp5control")+"::OnMyMobDead");
+ 'talkid[1] = areamonster(.@map$, 61, 63, 24, 24, _("Colorless Vow"), COLORLESS_VOW, 2, instance_npcname("#gp5control")+"::OnMyMobDead");
+ 'talkid[2] = areamonster(.@map$, 61, 63, 24, 24, _("Sweet Slaughter"), SWEET_SLAUGHTER, rand(1,2), instance_npcname("#gp5control")+"::OnMyMobDead");
+ end;
+OnTimer2000:
+ stopnpctimer;
+ unittalk('talkid[0], _("What is this..??"));
+ unittalk('talkid[1], _("Wake up! look at us... We are monsters?"));
+ unittalk('talkid[2], _("Sakray killed the princess!"));
+ end;
+OnMyMobDead:
+ if (mobcount(instance_mapname("1@spa"), instance_npcname("#gp5control")+"::OnMyMobDead"))
+ end;
+ ++'gp5;
+ if ('gp5 > 2)
+ donpcevent instance_npcname("#gp5control")+"::OnStory";
+ else
+ donpcevent instance_npcname("#gp5control")+"::OnSummon";
+ end;
+OnBossDead:
+ enablenpc instance_npcname("Sakray#gp5");
+ enablenpc instance_npcname("Thanatos Magic Trace#gp5");
+ end;
+OnStory:
+ stopnpctimer;
+ 'BossID = monster(instance_mapname("1@spa"), 44, 47, _("Torturous Redeemer"), E_TORTUROUS_REDEEMER, 1, instance_npcname("#gp5control")+"::OnBossDead");
+ unittalk('BossID, _("Thanatos Magic Trace! I will destroy you if I can't have you... Oh no! How could this be?"));
+ sleep 3000;
+ unitkill 'BossID;
+ end;
+OnEnd:
+ hideoffnpc instance_npcname("Voice of Princess Tiara");
+ hideoffnpc instance_npcname("Voice of Sakray");
+ hideoffnpc instance_npcname("Thanatos Magic Trace");
+ npctalk(_("What can I do for you?"), instance_npcname("Voice of Princess Tiara"));
+ sleep 3000;
+ npctalk(_("I will always stand by you. Please reset beside me."), instance_npcname("Voice of Sakray"));
+ sleep 3000;
+ npctalk(_("Your soul is mine until you find the blood that satisfies me.."), instance_npcname("Thanatos Magic Trace"));
+ sleep 3000;
+ npctalk(_("Reset in the shadow with me."), instance_npcname("Voice of Sakray"));
+ sleep 3000;
+ npctalk(_("In the dark forever..."), instance_npcname("Voice of Sakray"));
+ sleep 3000;
+ mapannounce(instance_mapname("1@spa"), _("It is time to leave the Ghost Palace."), bc_map, C_YELLOW);
+ enablenpc instance_npcname("King#gpend");
+ enablenpc instance_npcname("#gp3warp");
+ hideonnpc instance_npcname("Voice of Princess Tiara");
+ hideonnpc instance_npcname("Voice of Sakray");
+ hideonnpc instance_npcname("Thanatos Magic Trace");
+ end;
+OnInstanceInit:
+ disablenpc instance_npcname("Lurid Royal Guard#gp5");
+ disablenpc instance_npcname("Tiara Princess#gp5");
+ disablenpc instance_npcname("Thanatos Magic Trace#gp5");
+ disablenpc instance_npcname("Sakray#gp5");
+ disablenpc instance_npcname("King#gpend");
+ hideonnpc instance_npcname("Voice of Princess Tiara");
+ hideonnpc instance_npcname("Voice of Sakray");
+ hideonnpc instance_npcname("Thanatos Magic Trace");
+ 'gp5 = 0;
+ end;
+}
+
+1@spa,48,29,1 script King#gpend 4_M_RUSKING,{
+ mes("[King]");
+ mes("Hey there, are you alive?\r"
+ "I did not expect to meet someone alive");
+ next;
+ mes("[King]");
+ mes("Do you possibly have ^009900Gray Piece^000000?\r"
+ "Can you give it to me?\r"
+ "The old memory of faithful royal guard,\r"
+ "the memory of everyone he loved becomes broken pieces and are contained inside of them.");
+ next;
+ mes("[King]");
+ mes("Will you give ^009900Gray Piece^000000 to me?\r"
+ "The guilt is eating my soul.\r"
+ "My soul is stuck in ghost palace.");
+ next;
+ mes("[King]");
+ mes("I am collecting Sakray's abandoned memories from these shards.");
+ next;
+ mes("[King]");
+ mes("If you give any Gray Shards to me, I can make equipment for you.");
+ next;
+ mes("[King]");
+ mes("The cursed knight...\r"
+ "Please help me save the soul of Sakray.");
+ next;
+ setarray .@items_list, Thanatos_Sword, Thanatos_Great_Sword, Thanatos_Spear, Thanatos_Long_Spear, Thanatos_Staff, Thanatos_Two-Handed_Staff, Thanatos_Bow,
+ Thanatos_Dagger, Thanatos_Katar, Thanatos_Knuckles, Thanatos_Hammer, Thanatos_Axe, Thanatos_Violin, Thanatos_Whip, Gray_Shield,
+ Gray_Armor, Gray_Robe, Gray_Cloak, Boots_of_Gray, Gray_Helmet;
+
+ setarray .@cost, 200, 200, 200, 200, 200, 200, 200, 200, 200, 200, 200, 200, 200, 200, 100, 100, 100, 100, 100, 100;
+ .@menulist$ = "";
+ for (.@i = 0; .@i < getarraysize(.@items_list); ++.@i)
+ .@menulist$ += getitemname(.@items_list[.@i])+":";
+ while (true) {
+ .@choice = select(.@menulist$, "Cancel") - 1;
+ if (.@choice == getarraysize(.@items_list)) {
+ mes("[King]");
+ mes("Someday, Sakray will get out of his curse for sure.\r"
+ "I believe collecting Gray Shards is the only method to save him.");
+ close();
+ }
+ next;
+ mes("[King]");
+ mesf("to make a ^FF0000%s^000000 \r"
+ "I need %d ^009900Gray Shard^000000", getitemname(.@items_list[.@choice]), .@cost[.@choice]);
+ switch (select("Cancel", "hand over "+.@cost[.@choice]+" Gray Shard.")) {
+ case 1:
+ next;
+ mes("[King]");
+ mes("Someday, Sakray will get out of curse for sure. I believe");
+ next;
+ break;
+ case 2:
+ next;
+ if (countitem(Gray_Piece) < .@cost[.@choice]) {
+ mes("[King]");
+ mes("You don't have enough Gray Shards.");
+ mesf("I need %d Gray Shards to make a ^FF0000%s.^000000", .@cost[.@choice], getitemname(.@items_list[.@choice]));
+ break;
+ }
+ mes("[King]");
+ mesf("I will make a ^FF0000%s^000000 \r"
+ "with %d ^009900Gray Shard^000000", getitemname(.@items_list[.@choice]), .@cost[.@choice]);
+ next;
+ mes("[King]");
+ mes("You see a light through the folded hands of the king and it gradually takes on a shape.");
+ next;
+ mes("[King]");
+ mesf("All right, it is done.\r"
+ "Take this ^FF0000%s.^000000\r"
+ "Use it to confront Sakray and Thanatos.", getitemname(.@items_list[.@choice]));
+ next;
+ mes("[King]");
+ mes("The power requires a sacrifice.\r"
+ "Please be careful...");
+ delitem Gray_Piece, .@cost[.@choice];
+ getitem .@items_list[.@choice], 1;
+ close();
+ }
+ }
+}
+
+// 1st floor npc's
+1@spa,198,201,1 script Lurid Royal Guard#gp1 4_M_SAKRAYROYAL,{
+ end;
+}
+1@spa,197,217,0 warp #gp1warp 1,1,1@spa,114,120
+
+// 2nd floor npc's
+1@spa,135,125,3 script Tiara Princess#gp2 4_F_MAYSEL,{
+ end;
+}
+1@spa,117,137,0 warp #gp2warp 1,1,1@spa,60,43
+
+// 3rd floor npc's
+1@spa,30,58,5 script Lurid Royal Guard#gp3 4_M_SAKRAY_TIED,{
+ end;
+}
+1@spa,28,52,0 script Captain of the Guard#gp3 4_M_KY_KNT,{
+ end;
+}
+1@spa,30,52,0 script Soldier#gp3_1 4_M_KY_SOLD,{
+ end;
+}
+1@spa,34,53,1 script Soldier#gp3_2 4_M_CRU_SOLD,{
+ end;
+}
+1@spa,25,53,0 script Soldier#gp3_3 4_M_CRU_SOLD,{
+ end;
+}
+
+// 4th floor npc's
+1@spa,201,198,1 script Soldier's Corpse#gp4_1 4_M_DIEMAN,{
+ end;
+}
+1@spa,191,207,0 script Soldier's Corpse#gp4_2 4_M_DIEMAN,{
+ end;
+}
+1@spa,206,209,0 script Soldier's Corpse#gp4_3 4_M_DIEMAN,{
+ end;
+}
+1@spa,189,193,0 script Soldier's Corpse#gp4_4 4_M_DIEMAN,{
+ end;
+}
+1@spa,211,194,4 script Captain's Corpse#gp4 4_M_LIEMAN,{
+ end;
+}
+1@spa,194,214,5 script King's Corpse#gp4 4_M_TRISTAN,{
+ end;
+}
+1@spa,197,218,5 script Visiting Prince#gp4 4_M_KNIGHT_SILVER,{
+ end;
+}
+1@spa,197,218,0 script Thanatos Magic Trace#gp4 HIDDEN_WARP_NPC,{
+ end;
+}
+1@spa,178,186,0 warp #gp4warp 1,1,1@spa,30,57
+
+// 5th floor npc's
+1@spa,60,43,3 script Tiara Princess#gp5 4_F_MAYSEL,{
+ end;
+}
+1@spa,40,44,0 script Thanatos Magic Trace#gp5 HIDDEN_WARP_NPC,{
+ end;
+}
+1@spa,40,46,0 script Voice of Princess Tiara CLEAR_NPC,{
+ end;
+}
+1@spa,42,43,0 script Voice of Sakray CLEAR_NPC,{
+ end;
+}
+1@spa,40,41,0 script Thanatos Magic Trace CLEAR_NPC,{
+ end;
+}
+