diff options
-rw-r--r-- | npc/Changelog.txt | 7 | ||||
-rw-r--r-- | npc/cities/lighthalzen.txt | 8 | ||||
-rw-r--r-- | npc/cities/valkyrie.txt | 13 | ||||
-rw-r--r-- | npc/other/old/guide.txt | 1153 | ||||
-rw-r--r-- | npc/other/old/kafra.txt | 1866 | ||||
-rw-r--r-- | npc/other/old/pvp.txt | 1455 | ||||
-rw-r--r-- | npc/other/old/wedding.txt | 715 | ||||
-rw-r--r-- | npc/other/old/weddingtxt.txt | 277 | ||||
-rw-r--r-- | npc/quests/skills/alchemist_skills.txt | 32 | ||||
-rw-r--r-- | npc/scripts_athena.conf | 5 |
10 files changed, 34 insertions, 5497 deletions
diff --git a/npc/Changelog.txt b/npc/Changelog.txt index 2a9efb45c..4f9c51556 100644 --- a/npc/Changelog.txt +++ b/npc/Changelog.txt @@ -33,6 +33,13 @@ Playtester Date Added
======
09/01
+ * Removed useless 'npc\other\old' directory, who would need that anyway... [DracoRPG]
+ * Commented out the path to Divorce NPC as Lupus forgot to add it for good [DracoRPG]
+ * Fixed critical syntax errors in the new Valkyrie script, (è_é) @ Lupus [DracoRPG]
+ * Improved Bioethics quest & nearby Rekenber Guards [DracoRPG]
+ - Used isequipped() instead of getequipid() to simplify code (esp. with accessories)
+ - Rewritten the custom text about Hom. Res. and removed its actual learning
+ - iRO-ized answers to the test (text was taken from a pRO guide so pRO names >.>)
* Rogue Job quest: now baby thieves can pass 4th test [Lupus]
- In the same quest, fixed test4 quest NPC, thanks to Dj-Yhn
- Added divorcing Deviruchi, converted by LightFighter
diff --git a/npc/cities/lighthalzen.txt b/npc/cities/lighthalzen.txt index fded46eda..a18b4db36 100644 --- a/npc/cities/lighthalzen.txt +++ b/npc/cities/lighthalzen.txt @@ -1952,7 +1952,7 @@ lhz_in01.gat,73,188,4 script Guide#03 862,{ lhz_in01.gat,34,226,4 script Rekenber Guard#01 867,{
- if(getequipid(10) == 2241 && getequipid(9) == 2243)goto s_Staff;
+ if(isequipped(2241) && isequipped(2243)) goto s_Staff;
mes "[Rekenber Guard]";
mes "This is a restricted";
mes "area! Please show";
@@ -1987,7 +1987,7 @@ s_Staff: lhz_in01.gat,19,129,0 script LhzHiddenTrg1::LhzTrig -1,1,1{
OnTouch:
- if(getequipid(10) == 2241 && getequipid(9) == 2243)goto s_Staff;
+ if(isequipped(2241) && isequipped(2243)) goto s_Staff;
mes "[Rekenber Guard]";
mes "This area is restricted";
mes "to the public! Who are you";
@@ -2015,7 +2015,7 @@ lhz_in01.gat,24,131,2 duplicate(LhzTrig) Rekenber Guard#02 867 lhz_in01.gat,25,141,4 script Regenschirm Guard 868,{
- if(getequipid(10) == 2241 && getequipid(9) == 2243)goto s_Staff;
+ if(isequipped(2241) && isequipped(2243)) goto s_Staff;
mes "[Regenschirm Guard]";
mes "This area is restricted";
mes "to the public! Who are you";
@@ -2038,7 +2038,7 @@ s_Staff: close;
s_Yes:
- if(getequipid(7) == 2657 || getequipid(8) == 2657)goto s_Auth;
+ if(isequipped(2657)) goto s_Auth;
mes "[Regenschirm Guard]";
mes "I'm sorry but I can't let";
mes "staff without proper autorization";
diff --git a/npc/cities/valkyrie.txt b/npc/cities/valkyrie.txt index 164196ff9..64cf99a7e 100644 --- a/npc/cities/valkyrie.txt +++ b/npc/cities/valkyrie.txt @@ -36,13 +36,13 @@ yuno_in02.gat,93,207,0 script Book of Ymir 111,{ mes "...The entrance to the Hall of Honor is open to everyone who will move forward, into their next lives.";
mes "It is there to help heroes decide what they want to do, and can access every place in this world.";
next;
- mes "[Book of Ymir]"
+ mes "[Book of Ymir]";
mes "In the Hall of Honor, everything is perfectly prepared for heroes.";
mes "It is rumored that any wish that cannot be fulfilled in our reality can be realized in the Hall of Honor.";
next;
- switch(select("Stop reading.:Continue reading.")) {
+ switch(select("Stop reading.","Continue reading.")) {
case 1:
- mes "[Book of Ymir]"
+ mes "[Book of Ymir]";
mes ". . . . .";
close;
break;
@@ -56,11 +56,10 @@ yuno_in02.gat,93,207,0 script Book of Ymir 111,{ break;
}
}
- if(Upper==2 || baseClass == Job_Taekwon || BaseJob == Job_Gunslinger || BaseJob == Job_Ninja){
-
- }
-) goto L_IGNORE; //don't allow Taekwondo classes, Baby Classes, and GS/NJ
+ if(Upper==2 || baseClass == Job_Taekwon || BaseJob == Job_Gunslinger || BaseJob == Job_Ninja)
+ goto L_IGNORE; //don't allow Taekwondo classes, Baby Classes, and GS/NJ
if(valkyrie_Q >= 1) goto L_CONT;
+
L_IGNORE:
mes ". . . . .";
close;
diff --git a/npc/other/old/guide.txt b/npc/other/old/guide.txt deleted file mode 100644 index 40f49d2bb..000000000 --- a/npc/other/old/guide.txt +++ /dev/null @@ -1,1153 +0,0 @@ -//===== eAthena Script =======================================
-//= Guide Script
-//===== By: ==================================================
-//= Lotsa People (1.0)
-//= Even More People (1.1)
-//= Darkchild (1.2)
-//===== Current Version: =====================================
-//= 1.2
-//===== Compatible With: =====================================
-//= Any eAthena Version In Which Duplicate Works
-//===== Description: =========================================
-//= Guides In RO World
-//===== Additional Comments: =================================
-//= 1.2 - Used the duplicate and fixed minor things
-//============================================================
-
-//[Prontera Guide]
-
-//Complete
-prontera.gat,154,187,4 script Guide#p1-1::guide_p 105,{
- cutin "prt_soldier",2;
- mes "[Prontera Squad]";
- mes "Welcome to Prontera,the Capital City of Rune-Midgard Kingdom.";
- mes "We can help you to find Buildings easily, Feel free to inquire at us anytime.";
- mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok.";
-L_START_1:
- next;
- menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4;
- L_MENU_1:
- if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT;
- mes "[Prontera Squad]";
- mes "Please choose a Menu first.";
- mes "Do you want me to leave indications on the Mini-Map?";
- next;
- menu "Yes, Please.",-,"No, Thanks.",L_MENU_1_ROOT;
- set @COMPASS_CHECK,1;
- L_MENU_1_ROOT:
- mes "[Prontera Squad]";
- mes "Please select location you want me to show you.";
- L_SUB_1:
- next;
- menu "Swordman Asosiation",L_MENU_1_1,"^0000FFSantuary^000000",L_MENU_1_2,"Prontera Chivalry",L_MENU_1_3,"Armory",L_MENU_1_4,"Kit Shop",L_MENU_1_5,"Inn",L_MENU_1_6,"Trading Post",L_MENU_1_7,"Pub",L_MENU_1_8,"Library",L_MENU_1_9,"Job Agency",L_MENU_1_10,"The Castle of Prontera",L_MENU_1_11,"City Hall",L_MENU_1_12,"Cancel",L_MENU_1_13;
- L_MENU_1_1:
- mes "[Prontera Squad]";
- mes "The 'Swordman Assosiation' has moved to Izlude, the Sattelite of Prontera, now that Building is Empty";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,237,41,1,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_2:
- mes "[Prontera Squad]";
- mes "The main Chapel of Rune-Midgard Kingdom, `Santuary' is located at Northeast. Usually citizens visit there to become Acolyte";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,236,316,2,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_3:
- mes "[Prontera Squad]";
- mes "'Prontera Chivalry' the Defense Force of Prontera City is located at Northwest.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,46,345,3,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_4:
- mes "[Prontera Squad]";
- mes "'Armory' is located at Northeast around the Fountain.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,175,220,4,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_5:
- mes "[Prontera Squad]";
- mes "'Kit Shop' is located Northwest around the Fountain.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,134,221,5,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_6:
- mes "[Prontera Squad]";
- mes "There are 2 'Inn's' around the Fountain, on is located at West, other one at East.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,204,214,6,0xFF00FF;
- viewpoint 1,107,192,7,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_7:
- mes "[Prontera Squad]";
- mes "'Trading Post' is located at Southeast around the Fountain.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,179,184,8,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_8:
- mes "[Prontera Squad]";
- mes "'Pub is located at Southeast around the Fountain, right behind Trading Post building.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,208,154,9,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_9:
- mes "[Prontera Squad]";
- mes "There are 2 Buildings of 'Library', located both at Northern East and Northern West around the Fountain.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,120,267,10,0x00FF00;
- viewpoint 1,192,267,11,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_10:
- mes "[Prontera Squad]";
- mes "'Job Agency' is located at Southeast of the Fountain.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,133,183,12,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_11:
- mes "[Prontera Squad]";
- mes "'The Castle Of Prontera' is located at Due North. Clockwise rotation is 12.";
- mes "And when you go outside the Castle through a postern, you will see the North Prontera Field.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,156,360,13,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_12:
- mes "[Prontera Squad]";
- mes "City Hall is located at Southeast Contour. The Clockwise rotarion is 7.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,75,91,14,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_13:
- mes "[Prontera Squad]";
- mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'.";
- goto L_START_1;
- L_MENU_2:
- viewpoint 2,237,41,1,0x00FF00;
- viewpoint 2,236,316,2,0xFF0000;
- viewpoint 2,46,345,3,0x00FF00;
- viewpoint 2,175,220,4,0xFF00FF;
- viewpoint 2,8,134,5,0xFF00FF;
- viewpoint 2,204,214,6,0xFF00FF;
- viewpoint 2,107,192,7,0xFF00FF;
- viewpoint 2,179,184,8,0x00FF00;
- viewpoint 2,208,154,9,0x00FF00;
- viewpoint 2,120,267,10,0x00FF00;
- viewpoint 2,192,267,11,0x00FF00;
- viewpoint 2,133,183,12,0x00FF00;
- viewpoint 2,156,360,13,0x00FF00;
- viewpoint 2,75,91,14,0x00FF00;
- set @COMPASS_CHECK,0;
- goto L_START_1;
- L_MENU_3:
- mes "[Prontera Squad]";
- mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One.";
- mes "Please Check this gorgeous newest system with your own eyes.";
- next;
- mes "[Prontera Squad]";
- mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen.";
- mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window";
- mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it.";
- goto L_START_1;
- L_MENU_4:
- mes "[Prontera Squad]";
- mes "Have a nice day.";
- cutin "prt_soldier",255;
- close;
-}
-//Duplicate
-prontera.gat,282,208,2 duplicate(guide_p) Guide#p1-2 105
-
-prontera.gat,29,200,6 duplicate(guide_p) Guide#p1-3 105
-
-prontera.gat,160,29,0 duplicate(guide_p) Guide#p1-4 105
-
-prontera.gat,151,330,4 duplicate(guide_p) Guide#p1-5 105
-
-
-//[Izlude]
-
-//Complete
-izlude.gat,123,87,6 script Guide 105,{
- mes "[Izlude Squad]";
- mes "Welcome to Izlude, the New Satelite of Prontera.";
- mes "Feel free to inquire at us anytime, Algight?";
-L_START_1:
- next;
- menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4;
- L_MENU_1:
- if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT;
- mes "[Izlude Squad]";
- mes "Please choose a Menu first.";
- mes "Do you want me to leave indications on the Mini-Map?";
- next;
- menu "Yes, Please",-,"No, Thanks",L_SUB_1;
- set @COMPASS_CHECK,1;
- L_MENU_1_ROOT:
- L_SUB_1:
- next;
- menu "^FF0000Swordman Asosiation^000000",L_MENU_1_1,"Swordman Hall",L_MENU_1_2,"Arena",L_MENU_1_3,"Izlude Marina",L_MENU_1_4,"Armory",L_MENU_1_5,"Kit Shop",L_MENU_1_6,"Cancel",L_MENU_1_7;
- L_MENU_1_1:
- mes "[Izlude Squad]";
- mes "Do you want to be a Swordman?";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,52,140,1,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_2:
- mes "[Izlude Squad]";
- mes "Swordman Hall, the official Building of Swordman Assosiation is at East Contour.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,214,130,2,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_3:
- mes "[Izlude Squad]";
- mes "'Arena' the Popular Colosseum is at Due North. The Clockwise totation is 12.";
- mes "You can have fun there, you know.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,128,225,3,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_4:
- mes "[Izlude Squad]";
- mes "Marina which allows you to go to 'Alberta' or 'Byalan Island' is at Northeast.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,200,180,4,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_5:
- mes "[Izlude Squad]";
- mes "Armory is near at Northwest, and you can find it easily.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,111,149,5,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_6:
- mes "[Izlude Squad]";
- mes "Kit Shop is near at Northeast, and you can find it easily.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,148,148,6,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_7:
- mes "[Izlude Squad]";
- mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'.";
- goto L_START_1;
- L_MENU_2:
- viewpoint 2,52,140,1,0xFF0000;
- viewpoint 2,214,130,2,0x00FF00;
- viewpoint 2,128,225,3,0x00FF00;
- viewpoint 2,200,180,4,0xFF0000;
- viewpoint 2,111,149,5,0xFF00FF;
- viewpoint 2,148,148,6,0xFF00FF;
- set @COMPASS_CHECK,0;
- goto L_START_1;
- L_MENU_3:
- mes "[Izlude Squad]";
- mes "We altered the Location Guideinto de Newest Digital Style, out of the former Analog One.";
- mes "Please Check this gorgeous newest system with your own eyes.";
- next;
- mes "[Izlude Squad]";
- mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen.";
- mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window";
- mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it.";
- goto L_START_1;
- L_MENU_4:
- mes "[Izlude Squad]";
- mes "Don't get lost.";
- close;
-}
-
-//[Geffen]
-
-//Complete
-geffen.gat,203,116,0 script Guide#p1-6::guide_g 705,{
- cutin "gef_soldier",2;
- mes "[Geffen Squad]";
- mes "Welcome to Geffen, the City of Magic.";
- mes "We will help you when you take the Wrong way, Feel free to inquire at us anytime.";
- mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok.";
-L_START_1:
- next;
- menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4;
- L_MENU_1:
- if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT;
- mes "[Geffen Squad]";
- mes "Please choose a Menu first.";
- mes "Do you want me to leave indications on the Mini-Map?";
- next;
- menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT;
- set @COMPASS_CHECK,1;
- L_MENU_1_ROOT:
- L_SUB_1:
- next;
- menu "^FF0000Magic Acadamy^000000",L_MENU_1_1,"Forge",L_MENU_1_2,"Armory",L_MENU_1_3,"Kit Shop",L_MENU_1_4,"Pub",L_MENU_1_5,"Inn",L_MENU_1_6,"Cancel",L_MENU_1_7;
- L_MENU_1_1:
- mes "[Geffen Squad]";
- mes "'Magic Acadamy' is the Building in charge of Every Magical Theory.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,61,180,1,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_2:
- mes "[Geffen Squad]";
- mes "'Forge' is located at Southeast around the Tower of Magic.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,182,59,2,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_3:
- mes "[Geffen Squad]";
- mes "'Armory' is located at Northwest oround the Tower of Magic.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,99,140,3,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_4:
- mes "[Geffen Squad]";
- mes "'Kit Shop' is located at Southwest arround the Tower of Magic.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,44,86,4,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_5:
- mes "[Geffen Squad]";
- mes "'Pub' is located at Northeast around the Tower of Magic.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,138,138,5,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_6:
- mes "[Geffen Squad]";
- mes "'Inn' is located at Northeast around the Tower of Magic.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,172,174,6,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_7:
- mes "[Geffen Squad]";
- mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'.";
- goto L_START_1;
- L_MENU_2:
- viewpoint 2,61,180,1,0xFF0000;
- viewpoint 2,182,59,2,0x00FF00;
- viewpoint 2,99,140,3,0xFF00FF;
- viewpoint 2,44,86,4,0xFF00FF;
- viewpoint 2,138,138,5,0xFF00FF;
- viewpoint 2,172,174,6,0xFF00FF;
- set @COMPASS_CHECK,0;
- goto L_START_1;
- L_MENU_3:
- mes "[Geffen Squad]";
- mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One.";
- mes "Please Check this gorgeous newest system with your own eyes.";
- next;
- mes "[Geffen Squad]";
- mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen.";
- mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window";
- mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it.";
- goto L_START_1;
- L_MENU_4:
- mes "[Geffen Squad]";
- mes "Have a nice day.";
- cutin "gef_soldier",255;
- close;
-}
-
-//Duplicate
-geffen.gat,118,62,0 duplicate(guide_g) Guide#p1-7 105
-
-//[Payon]
-payon.gat,82,116,4 script Guide#p1-8::guide_p 708,{
- cutin "pay_soldier",2;
- mes "[Payon Squad]";
- mes "Welcome to Payon, the uplander village.";
- mes "We will help you when you take the wrong way, Feel free to inquire at us anytime.";
- mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok.";
-L_START_1:
- next;
- menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4;
- L_MENU_1:
- if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT;
- mes "[Payon Squad]";
- mes "Please choose a Menu first.";
- mes "Do you want me to leave indications on the Mini-Map?";
- next;
- menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT;
- set @COMPASS_CHECK,1;
- L_MENU_1_ROOT:
- L_SUB_1:
- next;
- menu "^FF0000Archer Guild^000000",L_MENU_1_1,"Armory",L_MENU_1_2,"Kit Shop",L_MENU_1_3,"Inn",L_MENU_1_4,"Central Palace",L_MENU_1_5,"Cancel",L_MENU_1_6;
- L_MENU_1_1:
- mes "[Payon Squad]";
- mes "'Archer Guild' is a Control Office of Archers. It is located at Northeast Contour of the Archer Village.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,174,189,1,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_2:
- mes "[Payon Squad]";
- mes "'Armory' is located at Northwest around the Centre.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,30,176,2,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_3:
- mes "[Payon Squad]";
- mes "'Kit Shop' is located at Northwest Contour of the Archer Village.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,174,189,3,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_4:
- mes "[Payon Squad]";
- mes "'Inn' is located at East around the Centre.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,172,134,4,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_5:
- mes "[Payon Squad]";
- mes "'Central Palace' is at North around the Centre.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,89,166,5,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_6:
- mes "[Payon Squad]";
- mes "If you want to remove location marks, Please choose 'Wipe all Indications on the Mini-Map.'.";
- goto L_START_1;
- L_MENU_2:
- viewpoint 2,174,189,1,0xFF0000;
- viewpoint 2,30,176,2,0xFF00FF;
- viewpoint 2,174,189,3,0xFF00FF;
- viewpoint 2,172,134,4,0xFF00FF;
- viewpoint 2,89,166,5,0x00FF00;
- set @COMPASS_CHECK,0;
- goto L_START_1;
- L_MENU_3:
- mes "[Payon Squad]";
- mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One.";
- mes "Please Check this gorgeous newest system with your own eyes.";
- next;
- mes "[Payon Squad]";
- mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen.";
- mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window";
- mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it.";
- goto L_START_1;
- L_MENU_4:
- mes "[Payon Squad]";
- mes "Bon Voyage, Wanderer.";
- cutin "pay_soldier",255;
- close;
-}
-
-//Duplicate
-pay_arche.gat,85,30,2 duplicate(guide_p) Guide#p1-9 105
-
-//[Alberta]
-
-alberta.gat,23,238,4 script Guide#p1-10::guide_a 105,{
- mes "[Alberta Squad]";
- mes "Welcome to Alberta, the The Port Town.";
- mes "We will helpyou when you take a wrong way, Feel free to inquire at us anytime.";
- mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok.";
-L_START_1:
- next;
- menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4;
- L_MENU_1:
- if (@COMPASS_CHECK != 0) goto L_SUB_1;
- mes "[Alberta Squad]";
- mes "Please choose a Menu first.";
- mes "Do you want me to leave indications on the Mini-Map?";
- next;
- menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT;
- set @COMPASS_CHECK,1;
- L_MENU_1_ROOT:
- L_SUB_1:
- menu "^FF0000Merchant Guild^000000",L_MENU_1_1,"Armory",L_MENU_1_2,"Kit Shop",L_MENU_1_3,"Inn",L_MENU_1_4,"Cancel",L_MENU_1_5;
- L_MENU_1_1:
- mes "[Alberta Squad]";
- mes "'Merchant Guild' will help you to transform into a Merchant.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,33,41,1,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_2:
- mes "[Alberta Squad]";
- mes "'Armory' is located at North Contour from the Centre of Mini-Map.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,117,37,2,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_3:
- mes "[Alberta Squad]";
- mes "'Kit Shop' is located at the Centre of Mini-Map.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,98,154,3,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_4:
- mes "[Alberta Squad]";
- mes "'Armory' is located at North Contour around the Centre of Mini-Map.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,65,233,4,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_5:
- mes "[Alberta Squad]";
- mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'.";
- goto L_START_1;
- L_MENU_2:
- viewpoint 2,33,41,1,0xFF0000;
- viewpoint 2,117,37,2,0xFF00FF;
- viewpoint 2,98,154,3,0xFF00FF;
- viewpoint 2,65,233,4,0xFF00FF;
- set @COMPASS_CHECK,0;
- goto L_START_1;
- L_MENU_3:
- mes "[Alberta Squad]";
- mes "We altered the Location Guideinto de Newest Digital Style, out of the former Analog One.";
- mes "Please Check this gorgeous newest system with your own eyes.";
- next;
- mes "[Alberta Squad]";
- mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen.";
- mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window";
- mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it.";
- goto L_START_1;
- L_MENU_4:
- mes "[Alberta Squad]";
- mes "Ta Ta.";
- close;
-}
-
-//Duplicate
-alberta.gat,120,60,3 duplicate(guide_a) Guide#p1-11 105
-
-//[Morroc]
-
-morocc.gat,153,286,6 script Guide#p1-12::guide_m 707,{
- cutin "moc_soldier",2;
- mes "[Morocc Squad]";
- mes "Welcome to Morroc,the Frontier.";
- mes "We will help you when you take a Wrong Way, Feel free to inquire at us anytime, Algight?";
-L_START_1:
- next;
- menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4;
- L_MENU_1:
- if (@COMPASS_CHECK != 0) goto L_SUB_1;
- mes "[Morocc Squad]";
- mes "Please choose a Menu first.";
- mes "Do you want me to leave indications on the Mini-Map?";
- next;
- menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT;
- set @COMPASS_CHECK,1;
- L_MENU_1_ROOT:
- L_SUB_1:
- next;
- menu "^FF0000Thief Guild^000000",L_MENU_1_1,"Armory",L_MENU_1_2,"Inn",L_MENU_1_3,"Pub",L_MENU_1_4,"Mercenary Guild",L_MENU_1_5,"Cancel",L_MENU_1_6;
- L_MENU_1_1:
- mes "[Morocc Squad]";
- mes "'Thief Guild' wich grants you to be a Thief is located inside by hearsay...";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,24,297,1,0xFF0000;
- goto L_SUB_1;
- L_MENU_1_2:
- mes "[Morocc Squad]";
- mes "'Armory' is located at Southwest around the Centre of Mini-Map.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,253,56,2,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_3:
- mes "[Morocc Squad]";
- mes "In Morroc there are 2 'Inn's' located both at South and Northeast around the Centre on Mini-Map.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,274,269,3,0xFF00FF;
- viewpoint 1,197,66,3,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_4:
- mes "[Morocc Squad]";
- mes "'Pub' is located at Northwest around the Centre.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,52,259,4,0xFF00FF;
- goto L_SUB_1;
- L_MENU_1_5:
- mes "[Morocc Squad]";
- mes "'Mercenary Guild' is at East Contour around the Centre of Mini-Map.";
- if (@COMPASS_CHECK != 1) goto L_SUB_1;
- viewpoint 1,284,171,5,0x00FF00;
- goto L_SUB_1;
- L_MENU_1_6:
- mes "[Morocc Squad]";
- mes "If you want to remove location marks, Please choose 'Wipe all Indications on the Mini-Map.'.";
- goto L_START_1;
- L_MENU_2:
- viewpoint 2,24,297,1,0xFF0000;
- viewpoint 2,253,56,2,0xFF00FF;
- viewpoint 2,274,269,3,0xFF00FF;
- viewpoint 2,197,66,3,0xFF00FF;
- viewpoint 2,52,259,4,0xFF00FF;
- viewpoint 2,284,171,5,0x00FF00;
- set @COMPASS_CHECK,0;
- goto L_START_1;
- L_MENU_3:
- mes "[Morocc Squad]";
- mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One.";
- mes "Please Check this gorgeous newest system with your own eyes.";
- next;
- mes "[Morroc Squad]";
- mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen.";
- mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window";
- mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it.";
- goto L_START_1;
- L_MENU_4:
- mes "[Morocc Squad]";
- mes "Good by for now.";
- cutin "moc_soldier",255;
- close;
-}
-
-//Duplicate
-morocc.gat,54,97,6 duplicate(guide_m) Guide#p1-13 707
-
-
-//[Comodo]
-
-comodo.gat,322,178,4 script Guide#p1-14::guide_c 700,{
- mes "[Native Papaya]";
- mes "Where the night life continues 24 hours a day";
- mes "The city of Dreams and Fantasy!";
- mes "We welcome you to the land of Comodo!";
- mes "I know the area very well.";
- mes "If you need directions, ask me anytime for asistance";
- next;
- menu "Casino",L_MENU_1,"Hula dancing stage ^0000FF(Dancer Job Change)^000000",L_MENU_2,"Weapons and Armor Shop",L_MENU_3,"Tool store",L_MENU_4,"Tourist Shop",L_MENU_5,"Kafra Corp. Western Branch",L_MENU_6,"Chief's House",L_MENU_7,"Pub",L_MENU_8,"Camp Ground",L_MENU_9,"End Conversation",L_MENU_10;
- L_MENU_1:
- viewpoint 1,140,98,1,0xFF6633;
- mes "^FF0000+^000000 -> Casino!";
- mes "The heart of Comodo's night life!";
- mes "A heaven of rest for tired travelers!";
- mes "Another service provided here.!";
- mes "The COmodo Casino ~!";
- close;
- L_MENU_2:
- viewpoint 1,188,168,2,0x0000FF;
- mes "^0000FF+^000000 -> Hula dancing Stage";
- mes "Hula Hula - Hula Hula";
- mes "When you become more comfortable performing on stage, you should consider changing job to be a Dancer";
- mes "What do you think? Hula Dancing Stage - ^0000FF(Change job to Dancer)^000000";
- close;
- L_MENU_3:
- viewpoint 1,266,70,3,0x00FFFF;
- mes "^00FFFF+^000000 -> Weapons and Armor Shop";
- mes "Here in Comodo, you can find unique items only found in Comodo.";
- mes "'Comodo Weapons and Armor Shop'";
- close;
- L_MENU_4:
- viewpoint 1,86,128,4,0x515151;
- mes "^808080+^000000 -> Tool Shop";
- mes "Here in Comodo, you can find tools only found in Comodo";
- mes "'Comodo Tool Store'";
- close;
- L_MENU_5:
- viewpoint 1,298,124,5,0x3355FF;
- mes "^0000FF+^000000 -> Tourist Shop";
- mes "Here in Comodo, you can find unique gifts only found in Comodo";
- mes "'Comodo Tourist Shop'";
- close;
- L_MENU_6:
- viewpoint 1,136,202,6,0xFF5555;
- mes "^FF0000+^000000 -> Kafra Corp. Western Branch";
- mes "The Western Branch of Midgards Kafra Corp.";
- mes "Ofering you the best service!";
- mes "Kafra Corp.'s Western Branch center is located here in Comodo";
- close;
- L_MENU_7:
- viewpoint 1,114,294,7,0xFF5555;
- mes "^FF0000+^000000 -> Chief's House";
- mes "This is the house where the Chief of Comodo resides.";
- mes "If you are one who posseses a serious interest in Comodo, you can meet the Chief in person.";
- mes "I think that would be okay with him.";
- close;
- L_MENU_8:
- viewpoint 1,166,298,8,0xFF5555;
- mes "^FF0000+^000000 -> Pub";
- mes "The pub is a place where tourists from all over the world come to converse and exchange ideas";
- mes "Bringing the ethnic atmosphere of Comodo, to an environment which tourists can enjoy";
- close;
- L_MENU_9:
- viewpoint 1,210,308,9,0xFF5555;
- mes "^FF0000+^000000 -> Camp Ground";
- mes "Sometimes with family and sometimes with friends, people come to Comodo campground to creat great memories.";
- mes "BBQ Camp Ground is where you can taste the ethnic flavors of Comodo's Spit BBQ!";
- close;
- L_MENU_10:
- mes "[Native Papaya]";
- mes "Because Comodo is located in a cave, sunlight cannot shine into this area.";
- mes "It is dark 24 hours a day!";
- mes "The residents of Comodo are using this unusual circumstance to draw tourists to our area...";
- close;
-}
-
-//Duplicates
-comodo.gat,176,350,4 duplicate(guide_c) Guide#p1-14 700
-
-comodo.gat,37,219,4 duplicate(guide_c) Guide#p1-15 700
-
-//[Yuno]
-
-//Needs Translation
-yuno.gat,153,47,4 script "ƒWƒ…ƒm[ƒKƒCƒh" 700,{
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- mes "‰ß‹Ž‚ð’m‚ècc";
- mes "Œ»Ý‚ðŒ©‚Â‚ßcc";
- mes "–¢—ˆ‚ð—\’m‚·‚écc";
- mes "‚±‚±‚ÍŒ«ŽÒ‚½‚¿‚Ì“sŽs";
- mes "- ƒWƒ…ƒm[ -";
- mes "ƒWƒ…ƒm[‚ɂ悤‚±‚»";
- next;
- menu "•Ší–h‹ï“X",L1,"“¹‹ï“X",L2,"ƒZ[ƒWƒLƒƒƒbƒXƒ‹ (ƒZ[ƒW“]EŠ)",L3,"‘“X’Ê‚è",L4,"’†‰›Lê",L5,"‹¤˜a‘}‘ŠÙ",L6,"ƒVƒ…ƒoƒCƒ`ƒFƒ‹–‚–@ƒAƒJƒfƒ~[",L7,"ƒ‚ƒ“ƒXƒ^[”Ž•¨ŠÙ",L8,"‰ï˜b‚ðCancel",LEnd;
-L1:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,120,138,1,0xFF3355;
- mes "^FF3355+^000000 -> •Ší–h‹ï“X";
- goto Lgo;
-L2:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,193,142,2,0x3355FF;
- mes "^3355FF+^000000 -> “¹‹ï“X";
- goto Lgo;
-L3:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,90,318,3,0x33FF55;
- mes "^33FF55+^000000 -> ƒZ[ƒWƒLƒƒƒbƒXƒ‹";
- mes "(ƒZ[ƒW“]EŠ)";
- goto Lgo;
-L4:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,257,102,4,0xFF3355;
- mes "^FF3355+^000000 -> ‘“X’Ê‚è";
- goto Lgo;
-L5:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,157,170,5,0x3355FF;
- mes "^3355FF+^000000 -> ’†‰›Lê";
- goto Lgo;
-L6:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,336,204,6,0x33FF55;
- mes "^33FF55+^000000 -> ‹¤˜a‘}‘ŠÙ";
- goto Lgo;
-L7:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,323,281,7,0xFF3355;
- mes "^FF3355+^000000 -> ƒVƒ…ƒoƒCƒ`ƒFƒ‹–‚–@ƒAƒJƒfƒ~[";
- goto Lgo;
-L8:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- viewpoint 1,278,288,8,0x3355FF;
- mes "^3355FF+^000000 -> ƒ‚ƒ“ƒXƒ^[”Ž•¨ŠÙ";
- goto Lgo;
-Lgo:
- mes "‚É‚È‚è‚Ü‚·B";
- mes "—Ç‚¢Žž‚ð‚¨‰ß‚²‚µ‚‚¾‚³‚¢B";
- close;
-LEnd:
- mes "[ƒWƒ…ƒm[ƒKƒCƒh]";
- mes "Œ«ŽÒ‚½‚¿‚Ì‘å“sŽs";
- mes "‚»‚µ‚Ä’mŽ¯‚Ì•óŒÉ";
- mes "ƒWƒ…ƒm[‚ւ悤‚±‚»I";
- close;
-}
-
-//[Amatsu]
-
-//Needs Translation
-amatsu.gat,207,91,4 script ƒ~ƒXEƒAƒ}ƒc 758,{
- mes "[Œu‚¿‚á‚ñ]";
- mes "Ž„‚ÍA‘æ13‘ãƒ~ƒXEƒAƒ}ƒc";
- mes "¢Œu£‚Æ\‚µ‚Ü‚·B";
- mes "ƒAƒ}ƒc‘ã•\‚Æ‚µ‚Ä";
- mes "‘º‚̈ēà‚ð‹Â‚¹‚‚©‚Á‚Ä‚¨‚è‚Ü‚·B";
- mes "‚È‚É‚©‚²Ž¿–₪‚ ‚è‚Ü‚µ‚½‚ç";
- mes "‚È‚ñ‚È‚è‚Æ‚¨‚Á‚µ‚á‚Á‚Ä‚‚¾‚³‚¢‚Ü‚¹B";
- next;
- menu "é",L1,"“¹‹ï“X",L2,"•Ší“X",L3,"‹Žð‰®",L4;
-L1:
- viewpoint 1,85,235,0,0xFF3355;
- mes "[Œu‚¿‚á‚ñ]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^FF3355+^000000•”•ª‚ª";
- mes "é‚Å‚²‚´‚¢‚Ü‚·B";
- goto LEnd;
-L2:
- viewpoint 1,96,118,1,0xCE6300;
- mes "[Œu‚¿‚á‚ñ]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^CE6300+^000000•”•ª‚ª";
- mes "“¹‹ï“X‚É‚È‚è‚Ü‚·B";
- goto LEnd;
-L3:
- viewpoint 1,132,117,2,0x55FF33;
- mes "[Œu‚¿‚á‚ñ]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^55FF33+^000000•”•ª‚ª";
- mes "•Ší“X‚É‚È‚è‚Ü‚·B";
- goto LEnd;
-L4:
- viewpoint 1,217,116,3,0x3355FF;
- mes "[Œu‚¿‚á‚ñ]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^3355FF+^000000•”•ª‚ª";
- mes "‹Žð‰®‚É‚È‚è‚Ü‚·B";
-LEnd:
- mes "‚»‚ê‚Å‚ÍAƒAƒ}ƒc‚Å";
- mes "Šy‚µ‚¢ŽžŠÔ‚ð‚¨‰ß‚²‚µ‰º‚³‚¢‚Ü‚¹B";
- close;
-}
-
-amatsu.gat,251,283,4 script ˆÄ“àl 767,{
- mes "[ˆÄ“àl]";
- mes "‚悤‚±‚»B";
- mes "—·‚ð‚·‚é‚É‚Í—Ç‚¢‹Gß‚Å‚·‚ËB";
- mes "Ž„‚Í‚±‚̃Aƒ}ƒc‚Ì";
- mes "ˆÄ“à‚ðˆø‚«Žó‚¯‚Ä‚¨‚éŽÒ‚Å‚·B";
- next;
- mes "[ˆÄ“àl]";
- mes "‰½‚ð‚¨’T‚µ‚Å‚·‚©H";
- next;
- menu "é",L1,"“¹‹ï“X",L2,"•Ší“X",L3,"‹Žð‰®",L4;
-L1:
- viewpoint 1,85,235,0,0xFF3355;
- mes "[ˆÄ“àl]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^FF3355+^000000•”•ª‚ª";
- mes "é‚Å‚²‚´‚¢‚Ü‚·B";
- goto LEnd;
-L2:
- viewpoint 1,96,118,1,0xCE6300;
- mes "[ˆÄ“àl]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^CE6300+^000000•”•ª‚ª";
- mes "“¹‹ï“X‚É‚È‚è‚Ü‚·B";
- goto LEnd;
-L3:
- viewpoint 1,132,117,2,0x55FF33;
- mes "[ˆÄ“àl]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^55FF33+^000000•”•ª‚ª";
- mes "•Ší“X‚É‚È‚è‚Ü‚·B";
- goto LEnd;
-L4:
- viewpoint 1,217,116,3,0x3355FF;
- mes "[ˆÄ“àl]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^3355FF+^000000•”•ª‚ª";
- mes "‹Žð‰®‚É‚È‚è‚Ü‚·B";
-LEnd:
- mes "‚»‚ê‚Å‚ÍAƒAƒ}ƒc‚Å";
- mes "Šy‚µ‚¢ŽžŠÔ‚ð‚¨‰ß‚²‚µ‰º‚³‚¢‚Ü‚¹B";
- close;
-}
-
-
-//[Gonryun]
-
-//Needs Translation
-gonryun.gat,163,60,4 script ƒRƒ“ƒƒ“ƒKƒCƒh 780,{
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "‚¢‚Â‚àŠˆ‹C‚É–ž‚¿‚ÄA”M‹C‚ª‚ ‚Ó‚ê";
- mes "–ˆ“úlX‚ªs‚«Œð‚Á‚Ä‚¢‚é";
- mes "ƒRƒ“ƒƒ“‚É‚¢‚ç‚Á‚µ‚á‚¢‚Ü‚¹!";
- next;
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "¤”„‚ª‚çA‘º‚̈ēà‚ð‚µ‚Ä";
- mes "‚¢‚Ü‚·B’m‚肽‚¢‚±‚Æ‚ª‚ ‚ê‚Î";
- mes "‰½‚Å‚à•·‚¢‚Ä‚‚¾‚³‚¢B";
- next;
- menu "‘º’·‚̉Æ",L1,"“¹‹ï¤l",L2,"•Ší¤l",L3,"–h‹ï¤l",L4,"—·ŠÙ",L5;
-L1:
- viewpoint 1,109,131,0,0xff3355;
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^ff3355+^000000‚̈ʒu‚É";
- mes "‘º’·‚̉Ƃª‚ ‚è‚Ü‚·B";
- goto Lend;
-L2:
- viewpoint 1,147,84,1,0xce6300;
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^ce6300+^000000‚̈ʒu‚É";
- mes "“¹‹ï¤l‚ª‚¢‚Ü‚·B";
- goto Lend;
-L3:
- viewpoint 1,174,101,2,0x55ff33;
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^55ff33+^000000‚̈ʒu‚É";
- mes "•Ší¤l‚ª‚¢‚Ü‚·B";
- goto Lend;
-L4:
- viewpoint 1,173,84,3,0x3355ff;
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^3355ff+^000000‚̈ʒu‚É";
- mes "–h‹ï¤l‚ª‚¢‚Ü‚·B";
- goto Lend;
-L5:
- viewpoint 1,215,114,4,0xffffff;
- mes "[ƒn ƒEƒHƒ“ƒ`]";
- mes "ƒ~ƒjƒ}ƒbƒv‚Ì";
- mes "^ffffff+^000000‚̈ʒu‚É";
- mes "—·ŠÙ‚ª‚ ‚è‚Ü‚·B";
- goto Lend;
-Lend:
- mes "Ž„’B‚ÌŠy‚µ‚¢ƒRƒ“ƒƒ“‚ð";
- mes "Žv‚¢‚Á‚«‚èŠy‚µ‚ñ‚Å‚‚¾‚³‚¢I";
- close;
-}
-
-// Below not in japanese NPC
-
-aldebaran.gat,139,63,4 script Soldier 105,{
- mes "[Al De Baran Guard]";
- mes "I am just any ordinary guard you could find in any other cities!!";
- mes "I am in charge of Service Guide in Al De Baran Garrison, and the name is Al De Baran Guard (No Name) !!";
- mes "I will guide you though our town!";
- next;
- menu "Get Location Guide",L0,"End conversation",End;
-
- L0:
- mes "^FF0000+^000000 -> Kafra Main Office";
- mes "^0000FF+^000000 -> Weapon Shop";
- mes "^00F0F0+^000000 -> Sorcerer Guild (Closed)";
- mes "^808080+^000000 -> Pub";
- mes "^00FF00+^000000 -> Item Shop";
- mes "^F0F000+^000000 -> Chemical Acadamy (Closed)";
- viewpoint 0,53,228,1,0xFF0000;
- viewpoint 1,48,198,1,0x0000FF;
- viewpoint 2,48,198,1,0x00F0F0;
- viewpoint 3,48,198,1,0x808080;
- viewpoint 4,48,198,1,0x00FF00;
- viewpoint 5,35,35,1,0xF0F000;
- close;
- LEnd:
- mes "[Al De Baran Guard]";
- mes "We are shown to protect Al De Baran!!";
- close;
-}
-
-izlude.gat,124,178,4 script Soldier 105,{
- mes "[Soldier]";
- mes "HeHeHeHe... HaHaHaHa";
- mes "Huh? Why am I so happy?";
- mes "you wanna know?";
- next;
- menu "Sure, why?",Sure,"Not really, I don't care.",NotReally;
-
- Sure:
- mes "[Soldier]";
- mes "Ah~~ There is not much for us to do these days. Merchants buy items, which monsters drop. You knew that, right?";
- next;
- menu "Of course",OfCourse,"Eh? Really?",EhReally;
-
- OfCourse:
- mes "[Soldier]";
- mes "HaHa In fact, that was actually our job.";
- mes "But there were more and more hunters who come in order to get paid. So it was just too much to handle.";
- next;
- mes "[Soldier]";
- mes "We had to work over time every day.";
- mes "Ah~~~ that was a nightmare...~~~";
- mes "Anyways, the government took a smart action, making the Registration System. The Office of Prize Compensation only pays those who have the Registration.";
- next;
- mes "[Soldier]";
- mes "Requirements for the Registration are for a merchant to secure sufficient funds and to stay at one place all the time. The Office gives away the registration to any merchant who fullfills those requirements.";
- next;
- mes "[Soldier]";
- mes "So there aren't too many people that come to us any more. I mean we are still busy, but that's nothing compared to how it was before~~";
- mes "People who suffered first know how to thank even the slightest comfort.";
- mes "HaHaHaHaHa!";
- close;
- EhReally:
- mes "[Soldier]";
- mes "What?! What do you mean you didn't know?!";
- mes "Hm... well... well... You know you could get some items killing some monsters. You could make some money out of it if you bring and sell those to a merchant.";
- mes "ANYWAYS!";
- next;
- mes "[Soldier]";
- mes "HaHa In fact, that was actually our job.";
- mes "But there were more and more hunters who come in order to get paid. So it was just too much to handle.";
- next;
- mes "[Soldier]";
- mes "We had to work over time every day.";
- mes "Ah~~~ that was a nightmare...~~~";
- mes "Anyways, the government took a smart action, making the Registration System. The Office of Prize Compensation only pays those who have the Registration.";
- next;
- mes "[Soldier]";
- mes "Requirements for the Registration are for a merchant to secure sufficient funds and to stay at one place all the time. The Office gives away the registration to any merchant who fullfills those requirements.";
- next;
- mes "[Soldier]";
- mes "So there aren't too many people that come to us any more. I mean we are still busy, but that's nothing compared to how it was before~~";
- mes "People who suffered first know how to thank even the slightest comfort.";
- mes "HaHaHaHaHa!";
- close;
- NotReally:
- mes "[Soldier]";
- mes "OK Good bye~~";
- close;
-}
-
-prontera.gat,160,330,4 script Guard#p2-1::guard_p 105,{
- mes "Welcome to Prontera.";
- close;
-}
-
-prontera.gat,223,99,1 duplicate(guard_p) Guard#p2-2 105
-
-prontera.gat,229,104,1 duplicate(guard_p) Guard#p2-3 105
-
-prontera.gat,47,339,5 duplicate(guard_p) Guard#p2-4 105
-
-prontera.gat,52,344,5 duplicate(guard_p) Guard#p2-5 105
-
-
-prt_maze02.gat,100,69,4 script Soldier#p3-1::soldier_p 105,{
- mes "[Soldier]";
- mes "Yo yo, you'd be better not to go in there. It has rumored there is a Demon living in the forest.";
- mes "Of course it is just a rumor because no one see the people turning back from the palce.";
- mes "hmmm... it's up to you to go in or leave.";
- close;
-}
-prt_maze02.gat,110,69,4 duplicate(soldier_p) Soldier#p3-2 105
-
-//Yuno
-yuno.gat,46,165,4 script Soldier#p4-1::soldier_y 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- close;
-}
-
-yuno.gat,61,165,4 duplicate(soldier_y) Soldier#p4-2 105
-
-yuno.gat,150,228,4 duplicate(soldier_y) Soldier#p4-2 105
-
-yuno.gat,165,228,4 duplicate(soldier_y) Soldier#p4-2 105
-
-yuno.gat,262,319,2 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to Yuno, the scholar's city where ancient wisdom exists.";
- next;
- mes "[Yuno Soldier]";
- mes "There is a holy shield for Crusaders called 'The Messenger of the God'.";
- next;
- mes "[Yuno Soldier]";
- mes "It looks like a long shield with a angel's wing image on its center.";
- mes " It is especially strong against undead or demons.";
- close;
-}
-
-yuno.gat,227,292,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists, Yuno.";
- next;
- mes "[Yuno Soldier]";
- mes "Around the City of Yuno, there is fallen angel that fakes himself as the real angel, named 'Fake Angel'.";
- next;
- mes "[Yuno Soldier]";
- mes "This one fakes itself as the real angel, and acts as if it's blessing travelers, and attacks them.";
- mes "It looks all beautiful, so it's bad if you fall for its appearance.";
- close;
-}
-
-yuno.gat,150,283,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists, Yuno.";
- next;
- mes "[Yuno Soldier]";
- mes "Larva Golem is a stone doll that has a stone heart in which its magical power was induced by magma.";
- mes "....from the body, it flows...";
- next;
- mes "[Yuno Soldier]";
- mes "Magma is really hot as to even melt away armor and weapon made with steel.";
- mes "if you attack thoughtlessly, ";
- next;
- mes "[Yuno Soldier]";
- mes "you might get a lot of damage on yourself and even get your armor and weapon broken.";
- close;
-}
-
-yuno.gat,165,283,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- next;
- mes "[Yuno Soldier]";
- mes "'Geographer', it is a hard shell type thing that grows around flowers from the earth.";
- mes "Thus, even if it's far away, you can't think less of it.";
- next;
- mes "[Yuno Soldier]";
- mes "it got such name 'cause the passing-by geography scholar got eaten away during his research.";
- close;
-}
-
-//Comodo
-
-//Yuno
-yuno.gat,46,165,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- close;
-}
-
-yuno.gat,61,165,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- close;
-}
-
-
-yuno.gat,150,228,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- close;
-}
-
-yuno.gat,165,228,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- close;
-}
-
-yuno.gat,262,319,2 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to Yuno, the scholar's city where ancient wisdom exists.";
- next;
- mes "[Yuno Soldier]";
- mes "There is a holy shield for Crusaders called 'The Messenger of the God'.";
- next;
- mes "[Yuno Soldier]";
- mes "It looks like a long shield with a angel's wing image on its center.";
- mes " It is especially strong against undead or demons.";
- close;
-}
-
-yuno.gat,227,292,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists, Yuno.";
- next;
- mes "[Yuno Soldier]";
- mes "Around the City of Yuno, there is fallen angel that fakes himself as the real angel, named 'Fake Angel'.";
- next;
- mes "[Yuno Soldier]";
- mes "This one fakes itself as the real angel, and acts as if it's blessing travelers, and attacks them.";
- mes "It looks all beautiful, so it's bad if you fall for its appearance.";
- close;
-}
-
-yuno.gat,150,283,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists, Yuno.";
- next;
- mes "[Yuno Soldier]";
- mes "Larva Golem is a stone doll that has a stone heart in which its magical power was induced by magma.";
- mes "....from the body, it flows...";
- next;
- mes "[Yuno Soldier]";
- mes "Magma is really hot as to even melt away armor and weapon made with steel.";
- mes "if you attack thoughtlessly, ";
- next;
- mes "[Yuno Soldier]";
- mes "you might get a lot of damage on yourself and even get your armor and weapon broken.";
- close;
-}
-
-yuno.gat,165,283,4 script Yuno Soldier 105,{
- mes "[Yuno Soldier]";
- mes "Welcome to City of scholars where wisdom exists.";
- next;
- mes "[Yuno Soldier]";
- mes "'Geographer', it is a hard shell type thing that grows around flowers from the earth.";
- mes "Thus, even if it's far away, you can't think less of it.";
- next;
- mes "[Yuno Soldier]";
- mes "it got such name 'cause the passing-by geography scholar got eaten away during his research.";
- close;
-}
diff --git a/npc/other/old/kafra.txt b/npc/other/old/kafra.txt deleted file mode 100644 index dcf05a1ce..000000000 --- a/npc/other/old/kafra.txt +++ /dev/null @@ -1,1866 +0,0 @@ -//===== eAthena Script =======================================
-//= Kafra Script
-//===== By: ==================================================
-//= Lotsa People (1.0)
-//= Darlskies (1.1)
-//= Darkchild (1.2)
-//= Syrus22 (2.0)
-//= Syrus22 (2.1)
-//= Darkchild (2.2)
-//===== Current Version: =====================================
-//= 2.2
-//===== Compatible With: =====================================
-//= Any eAthena Version In Which functions work.
-//===== Description: =========================================
-//= All The Kafra's In Ro, Incl HQ
-//===== Additional Comments: =================================
-//= Darkskies did all the kafra points stuff.
-//= Syrus22 - I compltely rewrote the script pretty much except for
-//= the normal conversation text in the Kafra HQ NPCs.
-//= Syrus22 - I fixed the Special Reserve in the Kafra HQ to really
-//= give you items. I will add the Lottery Chances when I get
-//= full info on the prizes.
-//= Syrus22 - I will add a Louyang Kafra when I get better location info.
-//= Darkchild - Added Comodo
-//============================================================
-
-//**********************************************//
-//Actual Kafra NPCs //
-//**********************************************//
-//These will set the necessary variables for my //
-//functions to work. //
-//**********************************************//
-//---Orc Dungeon Kafra---
-gef_fild10.gat,73,340,4 script Kafra#orc1 115,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"gef_fild10.gat";
-set @save1x,54;
-set @save1y,232;
-
-callfunc "kaframain";
-break;
-}
-//---Byalan Kafra---
-izlu2dun.gat,106,58,8 script Kafra 115,{
-if (class != Job_Novice) goto Lkafra;
-if((job_merchant_q==8) || (job_merchant_q==7)) goto JobMerQE8oE7;
-if((job_merchant_q==6) || (job_merchant_q==5)) goto JobMerQE6oE5;
-
-JobMerQE8oE7:
- if(countitem(Delivery_Message) != 0) goto JobMerQE8oE7Cont;
-
-JobMerQE8oE7Cont:
- menu "Excuse me.",M0;
-
- M0:
- mes "[Kafra]";
- mes "Yes?";
- cutin "kafra_03",255;
- close;
-
-JobMerQE6oE5:
- mes "[Kafra]";
- mes "Delivery fro the Merchant Guild?? Ah, Right! Yes! I almost forgot.";
- mes "Okay,Please put down here....";
- if((countitem(1081)==1) || (countitem(1082)==1) || (countitem(1083)==1)) goto MerBox123E1;
- mes ".... I think our orders are almost one Box of Oversized and Heavy....But you seem to carry it on without difficulty.";
- close;
-
- MerBox123E1:
- next;
- mes "[Kafra]";
- mes "Let me check its Serial numbers, I have to give the receipt to you anyhow.";
- if(nov_1_2_cos_c==7) goto JobMerQ2E7;
- if(nov_1_2_cos_c==8) goto JobMerQ2E8;
- next;
- mes "[Kafra]";
- mes "......? Excuse me! I think you gave me the wrong one.";
- mes "Our order should have the serial numbers as either of 3318702 or 3543625...";
- cutin "kafra_03",255;
- close;
-
-JobMerQ2E7:
- if(countitem(1081) !=0) goto MerBox1NE0;
-
- MerBox1NE0:
- mes "Um.... 3012685. Yes! This is the right one we ordered. Here, your receipt.";
- delitem 1081,1;
- getitem 1079,1;
- goto JobMerQ2Cont;
-
-JobMerQ2E8:
- if(countitem(1081) !=0) goto MerBox2NE0;
-
- MerBox2NE0:
- mes "Um.... 3543625. Yes! This is the right one we ordered. Here, your receipt.";
- delitem 1082,1;
- getitem 1080,1;
- goto JobMerQ2Cont;
-
-JobMerQ2Cont:
- if(job_merchant_q==6) goto JobMerQE6;
- getitem 3005,2;
- goto JobMerQ2Cont1;
-
-JobMerQE6:
- getitem 3005,2;
- goto JobMerQ2Cont1;
-
-JobMerQ2Cont1:
- getitem 3017,1;
- if(countitem(Delivery_Message) != 0) goto DevMsg;
- goto DevMsgCont;
-
-DevMsg:
- menu "This is from Mr. Mahnsoo...",M1;
-
- M1:
- delitem 1072,1;
- set nov_3_merchant,11;
- mes "[Kapra]";
- mes "Oh, my good Lord! Mr. Mansoo wrote me a Letter? Thank you, Thank you~";
- mes "I though he would send one one of these days, but I've never expected it would be so soon like this time~";
- goto DevMsgCont;
-
- DevMsgCont:
- next;
- mes "[Kafra]";
- mes "I really appreciate you for what you've done so far. This is my Small Gift for you to lay my heart.";
- mes "I hope you will help me next time.";
- set @TEMP,rand(2);
- goto R0;
-
- R0:
- if(@TEMP !=0) goto R1;
- getitem 513,3;
- cutin "kafra_03",255;
- close;
- R1:
- getitem 512,3;
- cutin "kafra_03",255;
- close;
-
-Lkafra:
-set @cutinpic$,"kafra_03";
-
-set @save,1;
-set @save1map$,"izlu2dun.gat";
-set @save1x,87;
-set @save1y,170;
-
-callfunc "kaframain";
-break;
-}
-//---Pyramids Kafra---
-moc_ruins.gat,61,156,5 script Kafra#pyr1 114,{
-set @cutinpic$,"kafra_04";
-
-set @save,1;
-set @save1map$,"moc_ruins.gat";
-set @save1x,41;
-set @save1y,141;
-
-callfunc "kaframain";
-break;
-}
-//---Northern Prontera Field Kafra---
-prt_fild01.gat,198,47,8 script Kafra#pfl1 112,{
-set @cutinpic$,"kafra_06";
-
-set @save,1;
-set @save1map$,"prt_fild01.gat";
-set @save1x,197;
-set @save1y,50;
-
-callfunc "kaframain";
-break;
-}
-//---Culvert Kafra---
-prt_fild05.gat,290,224,1 script Kafra#pfl2 114,{
-set @cutinpic$,"kafra_04";
-
-set @save,1;
-set @save1map$,"prt_fild05.gat";
-set @save1x,274;
-set @save1y,243;
-
-callfunc "kaframain";
-break;
-}
-//---In Alberta Kafras---
-alberta.gat,28,229,8 script Kafra#alb1 115,{
-set @cutinpic$,"kafra_02";
-
-set @save1map$,"alberta.gat";
-set @save1x,31;
-set @save1y,231;
-set @save2map$,"pay_fild03.gat";
-set @save2x,386;
-set @save2y,76;
-
-set @warps,4;
-
-set @warp1$,"Payon";
-set @warp1name$,"payon.gat";
-set @warp1x,69;
-set @warp1y,100;
-set @warp1zeny,1300;
-
-set @warp2$,"Prontera";
-set @warp2name$,"prontera.gat";
-set @warp2x,116;
-set @warp2y,75;
-set @warp2zeny,2100;
-
-set @warp3$,"Morocc";
-set @warp3name$,"morocc.gat";
-set @warp3x,156;
-set @warp3y,46;
-set @warp3zeny,2200;
-
-set @warp4$,"Comodo";
-set @warp4name$,"comodo.gat";
-set @warp4x,209;
-set @warp4y,143;
-set @warp4zeny,2400;
-
-set @kaflocations,1;
-set @location1x,113;
-set @location1y,60;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-alberta.gat,113,60,5 script Kafra#alb2 112,{
-set @cutinpic$,"kafra_06";
-
-set @save,1;
-set @save1map$,"alberta.gat";
-set @save1x,117;
-set @save1y,57;
-
-set @warps,4;
-
-set @warp1$,"Payon";
-set @warp1name$,"payon.gat";
-set @warp1x,69;
-set @warp1y,100;
-set @warp1zeny,1300;
-
-set @warp2$,"Prontera";
-set @warp2name$,"prontera.gat";
-set @warp2x,116;
-set @warp2y,75;
-set @warp2zeny,2100;
-
-set @warp3$,"Morocc";
-set @warp3name$,"morocc.gat";
-set @warp3x,156;
-set @warp3y,46;
-set @warp3zeny,2200;
-
-set @warp4$,"Comodo";
-set @warp4name$,"comodo.gat";
-set @warp4x,209;
-set @warp4y,143;
-set @warp4zeny,2400;
-
-set @kaflocations,1;
-set @location1x,28;
-set @location1y,229;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---Sunken Ship Kafra---
-alb2trea.gat,59,69,1 script Kafra#snk1 117,{
-set @cutinpic$,"kafra_03";
-
-set @save,1;
-set @save1map$,"alb2trea.gat";
-set @save1x,92;
-set @save1y,64;
-
-callfunc "kaframain";
-break;
-}
-//---In Al De Baran Kafra---
-aldebaran.gat,143,119,4 script Kafra#ald1 113,{
-set @cutinpic$,"kafra_05";
-
-set @save,1;
-set @save1map$,"aldebaran.gat";
-set @save1x,143;
-set @save1y,109;
-
-set @warps,3;
-
-set @warp1$,"Geffen";
-set @warp1name$,"geffen.gat";
-set @warp1x,120;
-set @warp1y,39;
-set @warp1zeny,1600;
-
-set @warp2$,"Mjolnir Dead Pit";
-set @warp2name$,"mjolnir_02.gat";
-set @warp2x,99;
-set @warp2y,351;
-set @warp2zeny,1700;
-
-set @warp3$,"Comodo";
-set @warp3name$,"comodo.gat";
-set @warp3x,209;
-set @warp3y,143;
-set @warp3zeny,2200;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Geffen Kafras---
-geffen.gat,120,62,8 script Kafra#gef1 115,{
-set @cutinpic$,"kafra_03";
-
-set @save,1;
-set @save1map$,"geffen.gat";
-set @save1x,119;
-set @save1y,40;
-
-set @warps,5;
-
-set @warp1$,"Prontera";
-set @warp1name$,"prontera.gat";
-set @warp1x,116;
-set @warp1y,75;
-set @warp1zeny,1400;
-
-set @warp2$,"Izlude";
-set @warp2name$,"izlude.gat";
-set @warp2x,91;
-set @warp2y,105;
-set @warp2zeny,1800;
-
-set @warp3$,"Al De Baran";
-set @warp3name$,"aldebaran.gat";
-set @warp3x,143;
-set @warp3y,110;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2200;
-
-set @warp5$,"Comodo";
-set @warp5name$,"comodo.gat";
-set @warp5x,209;
-set @warp5y,143;
-set @warp5zeny,2400;
-
-set @kaflocations,1;
-set @location1x,203;
-set @location1y,123;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-geffen.gat,203,123,3 script Kafra#gef2 114,{
-set @cutinpic$,"kafra_04";
-
-set @save1map$,"geffen.gat";
-set @save1x,200;
-set @save1y,124;
-set @save2map$,"gef_fild00.gat";
-set @save2x,51;
-set @save2y,194;
-
-set @warps,5;
-
-set @warp1$,"Prontera";
-set @warp1name$,"prontera.gat";
-set @warp1x,116;
-set @warp1y,75;
-set @warp1zeny,1400;
-
-set @warp2$,"Izlude";
-set @warp2name$,"izlude.gat";
-set @warp2x,91;
-set @warp2y,105;
-set @warp2zeny,1800;
-
-set @warp3$,"Al De Baran";
-set @warp3name$,"aldebaran.gat";
-set @warp3x,143;
-set @warp3y,110;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2200;
-
-set @warp5$,"Comodo";
-set @warp5name$,"comodo.gat";
-set @warp5x,209;
-set @warp5y,143;
-set @warp5zeny,2400;
-
-set @kaflocations,1;
-set @location1x,120;
-set @location1y,62;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Izlude Kafra---
-izlude.gat,124,115,6 script Kafra#izl1 117,{
-set @cutinpic$,"kafra_01";
-
-set @save1map$,"izlude.gat";
-set @save1x,128;
-set @save1y,111;
-set @save2map$,"prt_fild08.gat";
-set @save2x,349;
-set @save2y,202;
-
-set @warps,4;
-
-set @warp1$,"Prontera";
-set @warp1name$,"prontera.gat";
-set @warp1x,116;
-set @warp1y,75;
-set @warp1zeny,900;
-
-set @warp2$,"Payon";
-set @warp2name$,"payon.gat";
-set @warp2x,69;
-set @warp2y,100;
-set @warp2zeny,1700;
-
-set @warp3$,"Geffen";
-set @warp3name$,"geffen.gat";
-set @warp3x,120;
-set @warp3y,39;
-set @warp3zeny,1800;
-
-set @warp4$,"Comodo";
-set @warp4name$,"comodo.gat";
-set @warp4x,209;
-set @warp4y,143;
-set @warp4zeny,2000;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Morocc Kafras---
-morocc.gat,156,97,4 script Kafra#moc1 115,{
-set @cutinpic$,"kafra_03";
-
-set @save,1;
-set @save1map$,"morocc.gat";
-set @save1x,156;
-set @save1y,46;
-
-set @warps,5;
-
-set @warp1$,"Prontera";
-set @warp1name$,"prontera.gat";
-set @warp1x,116;
-set @warp1y,75;
-set @warp1zeny,1800;
-
-set @warp2$,"Payon";
-set @warp2name$,"payon.gat";
-set @warp2x,69;
-set @warp2y,100;
-set @warp2zeny,1800;
-
-set @warp3$,"Alberta";
-set @warp3name$,"alberta.gat";
-set @warp3x,117;
-set @warp3y,56;
-set @warp3zeny,2200;
-
-set @warp4$,"Geffen";
-set @warp4name$,"geffen.gat";
-set @warp4x,120;
-set @warp4y,39;
-set @warp4zeny,2200;
-
-set @warp5$,"Comodo";
-set @warp5name$,"comodo.gat";
-set @warp5x,209;
-set @warp5y,143;
-set @warp5zeny,1800;
-
-set @kaflocations,1;
-set @location1x,163;
-set @location1y,260;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-morocc.gat,163,260,4 script Kafra 114,{
-set @cutinpic$,"kafra_04";
-
-set @save1map$,"morocc.gat";
-set @save1x,187;
-set @save1y,281;
-set @save2map$,"moc_fild07.gat";
-set @save2x,212;
-set @save2y,30;
-
-set @warps,5;
-
-set @warp1$,"Prontera";
-set @warp1name$,"prontera.gat";
-set @warp1x,116;
-set @warp1y,75;
-set @warp1zeny,1800;
-
-set @warp2$,"Payon";
-set @warp2name$,"payon.gat";
-set @warp2x,69;
-set @warp2y,100;
-set @warp2zeny,1800;
-
-set @warp3$,"Alberta";
-set @warp3name$,"alberta.gat";
-set @warp3x,117;
-set @warp3y,56;
-set @warp3zeny,2200;
-
-set @warp4$,"Geffen";
-set @warp4name$,"geffen.gat";
-set @warp4x,120;
-set @warp4y,39;
-set @warp4zeny,2200;
-
-set @warp5$,"Comodo";
-set @warp5name$,"comodo.gat";
-set @warp5x,209;
-set @warp5y,143;
-set @warp5zeny,1800;
-
-set @kaflocations,1;
-set @location1x,156;
-set @location1y,97;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Payon Kafra---
-payon.gat,99,116,4 script Kafra#pay1 113,{
-set @cutinpic$,"kafra_05";
-
-set @save1map$,"payon.gat";
-set @save1x,69;
-set @save1y,100;
-set @save2map$,"pay_fild01.gat";
-set @save2x,340;
-set @save2y,347;
-
-set @warps,4;
-
-set @warp1$,"Alberta";
-set @warp1name$,"alberta.gat";
-set @warp1x,117;
-set @warp1y,56;
-set @warp1zeny,1300;
-
-set @warp2$,"Prontera";
-set @warp2name$,"prontera.gat";
-set @warp2x,116;
-set @warp2y,72;
-set @warp2zeny,1800;
-
-set @warp3$,"Morocc";
-set @warp3name$,"morocc.gat";
-set @warp3x,156;
-set @warp3y,46;
-set @warp3zeny,1800;
-
-set @warp4$,"Comodo";
-set @warp4name$,"comodo.gat";
-set @warp4x,209;
-set @warp4y,143;
-set @warp4zeny,2000;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---Archer Village Kafra---
-pay_arche.gat,55,123,8 script Kafra 117,{
-set @cutinpic$,"kafra_01";
-
-set @save,1;
-set @save1map$,"pay_arche.gat";
-set @save1x,49;
-set @save1y,144;
-
-callfunc "kaframain";
-break;
-}
-//---In Prontera Kafras---
-prontera.gat,29,207,6 script Kafra#pro2 113,{
-set @cutinpic$,"kafra_05";
-
-set @warps,6;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,1400;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,1700;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,1800;
-
-set @warp5$,"Orc Dungeon";
-set @warp5name$,"gef_fild10.gat";
-set @warp5x,52;
-set @warp5y,326;
-set @warp5zeny,1700;
-
-set @warp6$,"Comodo";
-set @warp6name$,"comodo.gat";
-set @warp6x,209;
-set @warp6y,143;
-set @warp6zeny,2000;
-
-set @save1map$,"prontera.gat";
-set @save1x,33;
-set @save1y,208;
-set @save2map$,"prt_fild05.gat";
-set @save2x,367;
-set @save2y,205;
-
-set @kaflocations,1;
-set @location1x,146;
-set @location1y,89;
-set @location2x,282;
-set @location2y,200;
-set @location3x,151;
-set @location3y,29;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-prontera.gat,146,89,6 script Kafra#pro1 115,{
-set @cutinpic$,"kafra_03";
-
-set @warps,6;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,1400;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,1700;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,1800;
-
-set @warp5$,"Orc Dungeon";
-set @warp5name$,"gef_fild10.gat";
-set @warp5x,52;
-set @warp5y,326;
-set @warp5zeny,1700;
-
-set @warp6$,"Comodo";
-set @warp6name$,"comodo.gat";
-set @warp6x,209;
-set @warp6y,143;
-set @warp6zeny,2000;
-
-set @save,1;
-set @save1map$,"prontera.gat";
-set @save1x,116;
-set @save1y,73;
-
-set @kaflocations,1;
-set @location1x,29;
-set @location1y,207;
-set @location2x,282;
-set @location2y,200;
-set @location3x,151;
-set @location3y,29;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-prontera.gat,282,199,6 script Kafra 115,{
-set @cutinpic$,"kafra_03";
-
-set @warps,6;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,1400;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,1700;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,1800;
-
-set @warp5$,"Orc Dungeon";
-set @warp5name$,"gef_fild10.gat";
-set @warp5x,52;
-set @warp5y,326;
-set @warp5zeny,1700;
-
-set @warp6$,"Comodo";
-set @warp6name$,"comodo.gat";
-set @warp6x,209;
-set @warp6y,143;
-set @warp6zeny,2000;
-
-set @save,1;
-set @save1map$,"prontera.gat";
-set @save1x,117;
-set @save1y,73;
-
-set @kaflocations,1;
-set @location1x,29;
-set @location1y,207;
-set @location2x,146;
-set @location2y,89;
-set @location3x,151;
-set @location3y,29;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-prontera.gat,151,29,8 script Kafra 115,{
-set @cutinpic$,"kafra_03";
-
-set @warps,6;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,1400;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,1700;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,1800;
-
-set @warp5$,"Orc Dungeon";
-set @warp5name$,"gef_fild10.gat";
-set @warp5x,52;
-set @warp5y,326;
-set @warp5zeny,1700;
-
-set @warp6$,"Comodo";
-set @warp6name$,"comodo.gat";
-set @warp6x,209;
-set @warp6y,143;
-set @warp6zeny,2000;
-
-set @save1map$,"prontera.gat";
-set @save1x,150;
-set @save1y,33;
-set @save2map$,"prt_fild08.gat";
-set @save2x,170;
-set @save2y,369;
-
-set @kaflocations,1;
-set @location1x,29;
-set @location1y,207;
-set @location2x,146;
-set @location2y,89;
-set @location3x,282;
-set @location3y,199;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Yuno Kafras---
-yuno.gat,328,108,6 script Kafra 117,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"yuno.gat";
-set @save1x,332;
-set @save1y,107;
-
-set @warps,4;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,2100;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2100;
-
-set @kafralocations,1;
-set @location1x,151;
-set @location1y,87;
-set @location2x,278;
-set @location2y,221;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-yuno.gat,151,87,4 script Kafra 115,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"yuno.gat";
-set @save1x,154;
-set @save1y,75;
-
-set @warps,4;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,2100;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2100;
-
-set @kafralocations,1;
-set @location1x,328;
-set @location1y,108;
-set @location2x,278;
-set @location2y,221;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-yuno.gat,278,221,6 script Kafra 117,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"yuno.gat";
-set @save1x,332;
-set @save1y,107;
-
-set @warps,4;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,2100;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2100;
-
-set @kafralocations,1;
-set @location1x,328;
-set @location1y,108;
-set @location2x,151;
-set @location2y,87;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Umbala Kafra---
-umbala.gat,128,133,4 script Kafra 115,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"umbala.gat";
-set @save1x,126;
-set @save1y,131;
-
-set @warps,4;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,2100;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2100;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---In Gonryun Kafra---
-//Note: Gave this Kafra the same warps as Umbala and Yuno till I get the
-//real warp information.
-gonryun.gat,159,122,4 script Kafra 116,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"gonryun.gat";
-set @save1x,160;
-set @save1y,62;
-
-set @warps,4;
-
-set @warp1$,"Izlude";
-set @warp1name$,"izlude.gat";
-set @warp1x,91;
-set @warp1y,105;
-set @warp1zeny,900;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,2100;
-
-set @warp3$,"Payon";
-set @warp3name$,"payon.gat";
-set @warp3x,69;
-set @warp3y,100;
-set @warp3zeny,2100;
-
-set @warp4$,"Morocc";
-set @warp4name$,"morocc.gat";
-set @warp4x,156;
-set @warp4y,46;
-set @warp4zeny,2100;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//---Comodo---
-comodo.gat,166,163,3 script Kafra 721,{
-set @cutinpic$,"kafra_02";
-
-set @save,1;
-set @save1map$,"comodo.gat";
-set @save1x,188;
-set @save1y,148;
-
-set @warps,2;
-
-set @warp1$,"Morroc";
-set @warp1name$,"morocc.gat";
-set @warp1x,156;
-set @warp1y,46;
-set @warp1pay,2400;
-
-set @warp2$,"Geffen";
-set @warp2name$,"geffen.gat";
-set @warp2x,120;
-set @warp2y,39;
-set @warp2zeny,2100;
-
-set @special,1;
-
-callfunc "kaframain";
-break;
-}
-//**********************************************//
-//Kafra Main //
-//**********************************************//
-//The main kafra script. This will call the //
-//necessary functions from the rest of the //
-//script. //
-//**********************************************//
-function script kaframain -1,{
-cutin @cutinpic$,2;
-mes "[Kafra Employee]";
-mes "Welcome to Kafra Corporation. The Kafra services are always by your side.";
-mes "How may I assist you?";
-next;
-if ((@warps > 0) && (@special > 0)) goto Lallmenu;
-if ((@warps > 0) && (@special == 0)) goto Lwarpmenu;
-if (@warps == 0) goto Lnowarpmenu;
-
-Lallmenu:
-menu "Save",Lsave,"Use Storage",Lstorage,"Use Teleport Service",Lwarp,"Rent a Cart",Lcart,"Check Other Information",Lother,"Cancel",Lcancel;
-
-Lwarpmenu:
-menu "Save",Lsave,"Use Storage",Lstorage,"Use Teleport Service",Lwarp,"Rent a Cart",Lcart,"Cancel",Lcancel;
-
-Lnowarpmenu:
-menu "Save",Lsave,"Use Storage",Lstorage,"Rent a Cart",Lcart,"Cancel",Lcancel;
-
-Lsave:
-callfunc "kafrasave";
-break;
-
-Lstorage:
-callfunc "kafrastorage";
-break;
-
-Lwarp:
-callfunc "kafrawarps";
-break;
-
-Lcart:
-callfunc "kafracart";
-break;
-
-Lother:
-callfunc "kafrainfo";
-break;
-
-Lcancel:
-callfunc "kafraend";
-break;
-}
-//**********************************************//
-//Kafra Save //
-//**********************************************//
-//This will handle the save function for all the//
-//kafras. //
-//**********************************************//
-function script kafrasave -1,{
-if (@save == 1) goto Lsavein;
-mes "[Kafra]";
-mes "Where would you like to save?";
-next;
-menu "Save Outside City",Lsaveout,"Save Inside City",Lsavein;
-
-Lsavein:
- savepoint @save1map$,@save1x,@save1y;
- mes "[Kafra]";
- mes "Your respawn point has been saved. Thank you.";
- callfunc "kafraend";
- break;
-
-Lsaveout:
- savepoint @save2map$,@save2x,@save2y;
- mes "[Kafra]";
- mes "Your respawn point has been saved. Thank you.";
- callfunc "kafraend";
- break;
-}
-//**********************************************//
-//Kafra Storage //
-//**********************************************//
-//This will handle the storage functions for //
-//all the kafras. //
-//**********************************************//
-function script kafrastorage -1,{
-if (getskilllv(1) < 6) goto NeedJobLevel;
-if (Zeny < 30) goto NeedZenys;
-set specialreserve,specialreserve + 30;
-set Zeny, Zeny - 30;
-mes "[Kafra]";
-mes "Ok let me just open your storage for you.";
-openstorage;
-callfunc "kafraend";
-break;
-
-NeedJobLevel:
- mes "[Kafra]";
- mes "I'm sorry but you must have Basic Skill 6 to use storage.";
- callfunc "kafraend";
- break;
-
-NeedZenys:
- mes "[Kafra]";
- mes "I'm sorry but you are short on Zeny.";
- callfunc "kafraend";
- break;
-}
-//**********************************************//
-//Kafra Warps //
-//**********************************************//
-//This will handle all the actual warping and //
-//the payment of Zeny //
-//**********************************************//
-function script kafrawarps -1,{
-mes "[Kafra]";
-mes "Please choose your destination.";
-next;
-if (@warps == 7) goto L7;
-if (@warps == 6) goto L6;
-if (@warps == 5) goto L5;
-if (@warps == 4) goto L4;
-if (@warps == 3) goto L3;
-if (@warps == 2) goto L2;
-
-L2:
- menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,"Cancel",Lcancel;
-
-L3:
- menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,"Cancel",Lcancel;
-
-L4:
- menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,"Cancel",Lcancel;
-
-L5:
- menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,@warp5$ + " -> " + @warp5zeny,Lwarp5,"Cancel",Lcancel;
-
-L6:
- menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,@warp5$ + " -> " + @warp5zeny,Lwarp5,@warp6$ + " -> " + @warp6zeny,Lwarp6,"Cancel",Lcancel;
-
-L7:
- menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,@warp5$ + " -> " + @warp5zeny,Lwarp5,@warp6$ + " -> " + @warp6zeny,Lwarp6,@warp7$ + " -> " + @warp7zeny,Lwarp7,"Cancel",Lcancel;
-
-Lwarp1:
- if (Zeny < @warp1zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp1zeny;
- set Zeny,Zeny - @warp1zeny;
- warp @warp1name$,@warp1x,@warp1y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lwarp2:
- if (Zeny < @warp2zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp2zeny;
- set Zeny,Zeny - @warp2zeny;
- warp @warp2name$,@warp2x,@warp2y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lwarp3:
- if (Zeny < @warp3zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp3zeny;
- set Zeny,Zeny - @warp3zeny;
- warp @warp3name$,@warp3x,@warp3y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lwarp4:
- if (Zeny < @warp4zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp4zeny;
- set Zeny,Zeny - @warp4zeny;
- warp @warp4name$,@warp4x,@warp4y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lwarp5:
- if (Zeny < @warp5zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp5zeny;
- set Zeny,Zeny - @warp5zeny;
- warp @warp5name$,@warp5x,@warp5y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lwarp6:
- if (Zeny < @warp6zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp6zeny;
- set Zeny,Zeny - @warp6zeny;
- warp @warp6name$,@warp6x,@warp6y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lwarp7:
- if (Zeny < @warp7zeny) goto Lneedzeny;
- set specialreserve,specialreserve + @warp7zeny;
- set Zeny,Zeny - @warp7zeny;
- warp @warp7name$,@warp7x,@warp7y;
- set @end,1;
- callfunc "kafraend";
- break;
-
-Lneedzeny:
- mes "[Kafra]";
- mes "I'm sorry you don't have the necessary amount of zeny.";
- callfunc "kafraend";
- break;
-
-Lcancel:
- mes "[Kafra]";
- mes "Ok, Come again soon.";
- callfunc "kafraend";
- break;
-}
-//**********************************************//
-//Kafra Cart //
-//**********************************************//
-//This will handle the cart rental function for //
-//all the Kafras. //
-//**********************************************//
-function script kafracart -1,{
-if ((class == Job_Merchant) || (class == Job_Blacksmith) || (class == Job_Alchem) || (class == Job_Merchant_High) || (class == Job_Whitesmith) || (class == Job_Creator)) goto Lrentcart;
-mes "[Kafra]";
-mes "Sorry this service is only provided for Merchant classes.";
-callfunc "kafraend";
-break;
-
-Lrentcart:
- if (getskilllv(39) < 1) goto Lnopush;
- mes "[Kafra]";
- mes "The cart rental fee is 800 zeny. Do you want to rent a cart?";
- next;
- menu "Rent a Cart",Lrent,"Cancel",Lcancel;
-
-Lrent:
- if (Zeny < 800) goto Lneedzeny;
- set specialreserve,specialreserve + 800;
- set Zeny,Zeny - 800;
- setcart;
- mes "[Kafra]";
- mes "There ya go...";
- callfunc "kafraend";
- break;
-
-Lnopush:
- mes "[Kafra]";
- mes "Sorry but you must have at least ^ff0000Pushcart^000000 level 1.";
- callfunc "kafraend";
- break;
-
-Lneedzeny:
- mes "[Kafra]";
- mes "Sorry but you don't have the zeny.";
- callfunc "kafraend";
- break;
-
-Lcancel:
- mes "[Kafra]";
- mes "Ok. Goodbye then";
- callfunc "kafraend";
- break;
-}
-//**********************************************//
-//Kafra Information //
-//**********************************************//
-//This will handle the extra Kafra functions //
-//such as your kafra points and the locations of//
-//other kafras. //
-//**********************************************//
-function script kafrainfo -1,{
-if (@kaflocations == 1) goto Lfullmenu;
-menu "Check Special Reserve Points",Lreserve,"Cancel",Lcancel;
-
-Lfullmenu:
- menu "Check Special Reserve Points",Lreserve,"Location Tip",Llocation,"Cancel",Lcancel;
-
-Lreserve:
- mes "[Kafra]";
- mes strcharinfo(0) + ", you have accumulated " + specialreserve + " Special Reserve Points.";
- next;
- mes "[Kafra]";
- mes "You can redeem your points at our Headquarters in Al De Baran.";
- callfunc "kafraend";
- break;
-
-Llocation:
- mes "[Kafra]";
- mes "Ok I'll mark them on your map.";
- if (@location1x == 0) goto Lfinished;
- viewpoint 0,@location1x,@location1y,1,0x0000FF;
- if (@location2x == 0) goto Lfinished;
- viewpoint 1,@location2x,@location2y,1,0x0000FF;
- if (@location3x == 0) goto Lfinished;
- viewpoint 2,@location3x,@location3y,1,0x0000FF;
- if (@location4x == 0) goto Lfinished;
- viewpoint 3,@location4x,@location4y,1,0x0000FF;
- callfunc "kafraend";
- break;
-
-Lfinished:
- callfunc "kafraend";
- break;
-
-Lcancel:
- mes "[Kafra]";
- mes "Ok. Bye then...";
- callfunc "kafraend";
- break;
-}
-//**********************************************//
-//End Kafra Function //
-//**********************************************//
-//This will empty all possible variables and end//
-//the kafra scripts. //
-//**********************************************//
-function script kafraend -1,{
-set @warps,0;
-set @save,0;
-set @special,0;
-set @kaflocations,0;
-set @location1x,0;
-set @location2x,0;
-set @location3x,0;
-set @location4x,0;
-if (@end == 1) goto Lbreak;
-cutin @cutinpic$,255;
-close;
-
-Lbreak:
- set @end,0;
- cutin @cutinpic$,255;
- break;
-}
-//---Kafra Warehouse---
-aldeba_in.gat,24,245,4 script Kafra Service 115,{
- cutin "kafra_03",2;
- mes "[Kapra Jasmine]";
- mes "Hi~ I am Kafra No. 1 Type Jasmine.";
- mes "Thank you for comming all the way to Kafra Main Office here at Al De Baran!";
- next;
- mes "[Kapra Jasmine]";
- mes "Our Kapra Service is always together with our customers!";
- mes "Our Kapra Service has a history and legacy of 5 thousand 8 hundred years old...";
- mes "Blah-blah-blah.....";
- next;
- menu "FIVE THOUSNAD AND EIGHT HUNDRED YEARS?!",L0,"Ahh~ Shut Up!",L1,"You go a boyfriend?",L3;
-
- L0:
- mes "[Kapra Jasmine]";
- mes "Shut UP! And listen! It to me a week to memorice this!";
- mes "I've got poor memory unlike other Kafra agents!";
- mes "..... Eh!... What did I just say...";
- next;
- mes "[Kapra Jasmine]";
- mes "Hohohoho. S-sorry... I-it was a show, a standing comedy...";
- mes "Right... Dream Show only for Ka-Kafra customers~!";
- mes "(but a solo show)";
- close;
- L1:
- mes "[Kapra Jasmine]";
- mes ". . . . .";
- mes "I was the member of Kafra Garrion before I joined Kafra Service Team...";
- mes "The speciality was 'Bash'!!";
- mes "I'm trying to be feminine and live a quiet life";
- mes "So please don0t tempt me...";
- close;
- L2:
- mes "[Kapra Jasmine]";
- mes "My, my~. Kafra Service has a ridiculous rule that no Agent can have a boyfriend";
- mes ". . . . .";
- mes ". . . . . . . . . .";
- next;
- mes "[Kapra Jasmine]";
- mes "Just kidding~~ Hehe";
- close;
-}
-
-aldeba_in.gat,79,161,6 script Kafra 115,{
- mes "[Kafra]";
- mes "Welcome, my dearest " + strcharinfo(0) + ".";
- mes "Take goods as many as you've got speacial reserve from Kafra Service~";
- next;
- mes "[Kafra]";
- mes "Please keep in mind that each window requires a different special reserve for your information.";
- mes "Window I am at allows you to use special reserve form ^FF00FF100p to 3000p^000000.";
- next;
- mes "[Kafra]";
- mes "Your special reserve is ^FF0000" + specialreserve + "^000000~";
- mes "Please choose the items you want.";
- next;
- menu "100 = Carrot 7 ea",100,"200 = Carrot 15 ea",200,"300 = Carrot 25 ea",300,"400 = Carrot 35 ea",400,"500 = Carrot 50 ea",500,"600 = Carrot 60 ea",600,"700 = Carrot 75 ea",700,"800 = Carrot 85 ea",800,"900 = Carrot 100 ea",900,"1000 = 1st Lotery Chance!",1000,"Next Articles",L0,"Cancel",LEnd;
-
- 100:
- if(specialreserve < 100) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,7;
- set specialreserve,specialreserve - 100;
- close;
- 200:
- if(specialreserve < 200) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,15;
- set specialreserve,specialreserve - 200;
- close;
- 300:
- if(specialreserve < 300) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,25;
- set specialreserve,specialreserve - 300;
- close;
- 400:
- if(specialreserve < 400) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,35;
- set specialreserve,specialreserve - 400;
- close;
- 500:
- if(specialreserve < 500) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,50;
- set specialreserve,specialreserve - 500;
- close;
- 600:
- if(specialreserve < 600) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,60;
- set specialreserve,specialreserve - 600;
- close;
- 700:
- if(specialreserve < 700) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,75;
- set specialreserve,specialreserve - 700;
- close;
- 800:
- if(specialreserve < 800) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,85;
- set specialreserve,specialreserve - 800;
- close;
- 900:
- if(specialreserve < 900) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 515,100;
- set specialreserve,specialreserve - 900;
- close;
- 1000:
- mes "^FF0000Under Construction^000000";
- close;
- L0:
- menu "1100 = Red Potion 7 ea",1100,"1300 = Red Potion 15 ea",1300,"1500 = Red Potion 25 ea",1500,"1700 = Red Potion 35 ea",1700,"1900 = Red Potion 50 ea",1900,"2100 = Red Potion 60 ea",2100,"2300 = Red Potion 75 ea",2300,"2500 = Red Potion 85 ea",2500,"2800 = Red Potion 100 ea",2800,"3000 = 2nd Lotery Chance!",3000,"Cancel",EndL0;
-
- 1100:
- if(specialreserve < 1100) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,7;
- set specialreserve,specialreserve - 1100;
- close;
- 1300:
- if(specialreserve < 1300) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,15;
- set specialreserve,specialreserve - 1300;
- close;
- 1500:
- if(specialreserve < 1500) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,25;
- set specialreserve,specialreserve - 1500;
- close;
- 1700:
- if(specialreserve < 1700) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,35;
- set specialreserve,specialreserve - 1700;
- close;
- 1900:
- if(specialreserve < 1900) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,50;
- set specialreserve,specialreserve - 1900;
- close;
- 2100:
- if(specialreserve < 2100) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,60;
- set specialreserve,specialreserve - 2100;
- close;
- 2300:
- if(specialreserve < 2300) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,75;
- set specialreserve,specialreserve - 2300;
- close;
- 2500:
- if(specialreserve < 2500) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,85;
- set specialreserve,specialreserve - 2500;
- close;
- 2800:
- if(specialreserve < 2800) goto Lneedpoints;
- mes "[Kafra]";
- mes "Good choice... Here ya go.";
- getitem 501,100;
- set specialreserve,specialreserve - 2800;
- close;
- 3000:
- mes "^FF0000Under Construction^000000";
- close;
-Lend:
- mes "[Kafra]";
- mes "Ok then... Come again if you change your mind.";
- close;
-}
-
-aldeba_in.gat,81,166,4 script Kafra Service 117,{
- cutin "kafra_01",2;
- mes "[Kafra Pavianne]";
- mes "Welcome! I'm Kafra service's the first Kapra Type 'Pavianne'";
- next;
- mes "[Kafra Pavianne]";
- mes "Our Kapra Service is always trying to meet 100% customers satisfaction based on 3 principles, Trust, Devotion and Truest.";
- mes "With complete Service training and supervision, we serve our customers to meet thier needs.";
- next;
- menu "Buy Kafra Pass",L0,"What is Kafra Pass",L1,"Good Bye",L3;
-
- L0:
- getitem 1084,1;
- set Zeny, Zeny-2000;
- mes "[Kafra Pavianne]";
- mes "Thank you for using our Kapra Service all the time!";
- mes "Have a Nice Day!";
- cutin "kafra_01",255;
- close;
- L1:
- mes "[Kafra Pavianne]";
- mes "The best gift you could get only at Kafra Main Office!";
- mes "^4040FF'K A P R A's P A S S'^000000!!";
- mes "TaDa~!";
- next;
- mes "[Kafra Pavianne]";
- mes "With Kafra Pass, you could experience the convenience of Kafra Service world-wide! No Hassle!";
- mes "The price is 2000 zeny~~";
- next;
- mes "[Kafra Pavianne]";
- mes "Visit any Kafra Service in Midgard, and you could enjoy Kafra Service any time any where for once.";
- mes "Ending a a conversation with Kafra Service Agent will expire the pass.";
- cutin "kafra_01",255;
- close;
- L3:
- mes "[Kafra Pavianne]";
- mes "Thank you for using Kafra Service!";
- mes "It was Kafra Pavianne";
- cutin "kafra_01",255;
- close;
-}
-
-aldeba_in.gat,83,244,4 script Kafra Service 116,{
- cutin "kafra_02",2;
- mes "[Kafra Blossom]";
- mes "..... Pavianne is such an old-timer!";
- mes "Too stubborn...";
- mes "We should make customers to experience more unique, never-seen, aspects of Kafra here at Main Office.";
- next;
- mes "[Kafra Blossom]";
- mes "Now! WELCOOOOOME~~ I am Kafra Tailing Type.";
- mes "Please don't forget to continue using our Kafra Service, and ask for me, Tailing~~";
- next;
- menu "I'm an admirer of you~!",L0,"Ehhaha",L1;
-
- L0:
- mes "[Kafra Blossom]";
- mes "Really!";
- mes "Thank you sooo much~";
- mes "Here is... my... autograph...";
- next;
- mes "[Kafra Blossom]";
- mes "Don't even bother to look in your Item Iventory. It won't be there... Hehe..";
- mes "My autograph will remail win your heart.";
- cutin "kafra_02",255;
- close;
- L1:
- mes "[Kafra Blossom]";
- mes "Huh?";
- mes ". . . . .";
- mes "That's all?";
- mes "Phew~ such a dull customer...";
- cutin "kafra_02",255;
- close;
-}
-
-aldeba_in.gat,91,244,4 script Kafra Service 112,{
- cutin "kafra_06",2;
- mes "[Kafra Curly Sue]";
- mes "Hello, hello?!!";
- mes "The youngest of all! Kafra cutty~~";
- mes "I am Kafra Type 'Curly Sue'";
- next;
- mes "[Kafra Curly Sue]";
- mes "It hasn't been long meeting customers since I am new, but I am always doing my best!!";
- next;
- menu "Where is your mom?",L0,"End conversation",LEnd;
-
- L0:
- mes "[Kafra Curly Sue]";
- mes ". . . . .";
- mes "Sob sob ...";
- mes "I am no a KID!!";
- next;
- cutin "kafra_06",255;
- close;
- LEnd:
- mes "[Kafra Curly Sue]";
- mes "Here at Kafra Service, We're all doing out B-E-S-T! to provide our customers the B-E-S-T! services.";
- mes "We really appreciate your business with us.";
- next;
- cutin "kafra_06",255;
- close;
-}
-
-aldeba_in.gat,96,181,4 script Kafra Service 113,{
- cutin "kafra_05",2;
- mes "[Kafra Leilah]";
- mes "Kafra Service.";
- mes "What can I do for you?";
- next;
- menu "Save.",Lsave,"Use Storage Service",Lstorage,"Use Cart Service.",Lcart,"End conversation.",Lcancel;
-
- Lsave:
- mes "[Kafra Leilah]";
- mes "Please. This is Kafra Service Command Center in charge of training Kafra Service Agent.";
- next;
- mes "[Kafra Leilah]";
- mes "For Actual Services you must visit Kafra Service Center Agent at each city including Al De Baran.";
- mes "... But I will do that for you...";
- next;
- savepoint "aldeba_in.gat",96,179;
- cutin "kafra_05",255;
- close;
- Lstorage:
- if((class ==Job_Novice) && (JobLevel<6)) goto NeedJobLevel;
- if(Zeny<30) goto NeedZenys;
- set Zeny, Zeny-30;
- openstorage;
- cutin "kafra_02",255;
- close;
-
- NeedJobLevel:
- mes "[Kafra Leilah]";
- mes "I am sorry but you have to be at least novice with job level 6 if you want to use the storage";
- cutin "kafra_05",255;
- close;
- NeedZenys:
- mes "[Kafra Leilah]";
- mes "Dear, you don't have enough zeny. The Storage fee is 30 Zeny.";
- cutin "kafra_05",255;
- close;
- Lcart:
- if((class ==Job_Merchant) || (class==Job_Blacksmith) || (class==Job_Alchem)) goto UseCart;
- mes "[Kafra Leilah]";
- mes "I'm sorry. The cart service is only provided for Merchants, Blacksmiths and Alchemists only.";
- cutin "kafra_04",255;
- close;
-
- UseCart:
- mes "[Kafra Leilah]";
- mes "The Cart Fee is 800 Zeny. Do you want to Rent a Cart?";
- next;
- menu "Rent a Cart.",RentCart,"Cancel.",RCCancel;
-
- RentCart:
- if(Zeny<800) goto RCNeedZenys;
- if(getskilllv(39) < 1) got Lneedskill;
- if((CheckCart)==1) goto GetCart;
-
- GetCart:
- set Zeny,Zeny-800;
- set specialreserve,specialreserve + 800;
- setcart;
- mes "[Kafra]";
- mes "There you go..";
- cutin "kafra_08",255;
- close;
- RCNeedZenys:
- mes "[Kafra Leilah]";
- mes "Dear, you don't have enough zeny. You need 800 Zeny.";
- cutin "kafra_04",255;
- close;
- Lneedskill:
- mes "[Kafra Leilah]";
- mes "Sorry dear but you need the Pushcart skill to rent a cart.";
- cutin "kafra_04",255;
- close;
- RCCancel:
- cutin "kafra_04",255;
- close;
- Lcancel:
- cutin "kafra_05",2;
- close;
-}
-
-aldeba_in.gat,142,238,4 script Kafra Service 114,{
- cutin "kafra_04",2;
- mes "[Kafra Roxie]";
- mes "Welcome! I'm Kafra Type 'Roxie'";
- mes "The Special Secret about Kapra only for you Kapra!";
- next;
- mes "[Kafra Roxie]";
- mes "You know... Our Kapra Service wasn't actually called Kapra originally~~";
- mes "Well what do you think it actually was?~";
- next;
- mes "[Kafra Roxie]";
- mes "TaDa~ Surprisingly it was~~~!";
- mes "Ka! P (Ring Ring Ring)";
- mes "Oh... my phone... Sorry please wait...";
- next;
- mes "[Kafra Roxie]";
- mes "Hi? Kapra Type Roxie";
- mes "Huh! Director, sir! Yes! Yes! I understand! ..... Sure!";
- mes "Ah... Huh?!";
- next;
- mes "[Kafra Roxie]";
- mes "No-no sir!";
- mes "Yes! I understand!!";
- next;
- mes "[Kafra Roxie]";
- mes "*Click*";
- mes "..... Hehehe...";
- mes ". . . . .";
- next;
- mes "[Kafra Roxie]";
- mes "Ah... Please ignore what you've just heard from me, haha.";
- mes ". . . . .";
- close;
-}
\ No newline at end of file diff --git a/npc/other/old/pvp.txt b/npc/other/old/pvp.txt deleted file mode 100644 index 6dcbdfec3..000000000 --- a/npc/other/old/pvp.txt +++ /dev/null @@ -1,1455 +0,0 @@ -// Original Athena Japanese Dev PVP Script
-// *With added NPCs, missing Warps, and Warpers*
-// *Caution! This is an intended version/addition of the Izlude Arena!*
-//
-// Additions/Translation By DiaDz
-// Jan 24, 2004
-//
-//Addition 2v2 script by: Unknown - added
-
-
-
-// Begin PVP Room N
-pvp_y_room.gat,30,85,4 script Usher 31~40 105,{
- if ((BaseLevel < 31) || (BaseLevel > 40)) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_1-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_1-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_1-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_1-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_1-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_1-1.gat") >= 128 ) goto LError;
- warp "pvp_y_1-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_1-2.gat") >= 128 ) goto LError;
- warp "pvp_y_1-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_1-3.gat") >= 128 ) goto LError;
- warp "pvp_y_1-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_1-4.gat") >= 128 ) goto LError;
- warp "pvp_y_1-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_1-5.gat") >= 128 ) goto LError;
- warp "pvp_y_1-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 31~40";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 41 ~ LV 50",0;
- break;
-}
-pvp_y_room.gat,38,85,4 script Usher 41~50 105,{
- if ((BaseLevel < 41) || (BaseLevel > 50)) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_2-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_2-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_2-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_2-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_2-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_2-1.gat") >= 128 ) goto LError;
- warp "pvp_y_2-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_2-2.gat") >= 128 ) goto LError;
- warp "pvp_y_2-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_2-3.gat") >= 128 ) goto LError;
- warp "pvp_y_2-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_2-4.gat") >= 128 ) goto LError;
- warp "pvp_y_2-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_2-5.gat") >= 128 ) goto LError;
- warp "pvp_y_2-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 41~50";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 40 ~ LV 50",0;
- break;
-}
-pvp_y_room.gat,46,85,4 script Usher 51~60 105,{
- if ((BaseLevel < 51) || (BaseLevel > 60)) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_3-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_3-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_3-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_3-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_3-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_3-1.gat") >= 128 ) goto LError;
- warp "pvp_y_3-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_3-2.gat") >= 128 ) goto LError;
- warp "pvp_y_3-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_3-3.gat") >= 128 ) goto LError;
- warp "pvp_y_3-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_3-4.gat") >= 128 ) goto LError;
- warp "pvp_y_3-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_3-5.gat") >= 128 ) goto LError;
- warp "pvp_y_3-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 51~60";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 51 ~ LV 60",0;
- break;
-}
-pvp_y_room.gat,54,85,4 script Usher 61~70 105,{
- if ((BaseLevel < 61) || (BaseLevel > 70)) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_4-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_4-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_4-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_4-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_4-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_4-1.gat") >= 128 ) goto LError;
- warp "pvp_y_4-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_4-2.gat") >= 128 ) goto LError;
- warp "pvp_y_4-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_4-3.gat") >= 128 ) goto LError;
- warp "pvp_y_4-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_4-4.gat") >= 128 ) goto LError;
- warp "pvp_y_4-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_4-5.gat") >= 128 ) goto LError;
- warp "pvp_y_4-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 61~70";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 61 ~ LV 70",0;
- break;
-}
-pvp_y_room.gat,62,85,4 script Usher 71~80 105,{
- if ((BaseLevel < 71) || (BaseLevel > 80)) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_5-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_5-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_5-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_5-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_5-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_5-1.gat") >= 128 ) goto LError;
- warp "pvp_y_5-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_5-2.gat") >= 128 ) goto LError;
- warp "pvp_y_5-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_5-3.gat") >= 128 ) goto LError;
- warp "pvp_y_5-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_5-4.gat") >= 128 ) goto LError;
- warp "pvp_y_5-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_5-5.gat") >= 128 ) goto LError;
- warp "pvp_y_5-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 71~80";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 71 ~ LV 80",0;
- break;
-}
-pvp_y_room.gat,70,85,4 script Usher 81~90 105,{
- if ((BaseLevel < 81) || (BaseLevel > 90)) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_6-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_6-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_6-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_6-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_6-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_6-1.gat") >= 128 ) goto LError;
- warp "pvp_y_6-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_6-2.gat") >= 128 ) goto LError;
- warp "pvp_y_6-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_6-3.gat") >= 128 ) goto LError;
- warp "pvp_y_6-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_6-4.gat") >= 128 ) goto LError;
- warp "pvp_y_6-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_6-5.gat") >= 128 ) goto LError;
- warp "pvp_y_6-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 81~90";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 81 ~ LV 90",0;
- break;
-}
-pvp_y_room.gat,78,85,4 script Usher 91~Higher 105,{
- if (BaseLevel < 91) goto LVNG;
- menu "Prontera Arena [" + getmapusers("pvp_y_7-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_7-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_7-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_7-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_7-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_7-1.gat") >= 128 ) goto LError;
- warp "pvp_y_7-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_7-2.gat") >= 128 ) goto LError;
- warp "pvp_y_7-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_7-3.gat") >= 128 ) goto LError;
- warp "pvp_y_7-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_7-4.gat") >= 128 ) goto LError;
- warp "pvp_y_7-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_7-5.gat") >= 128 ) goto LError;
- warp "pvp_y_7-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 91~Higher";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 91 ~ Higher",0;
- break;
-}
-pvp_y_room.gat,86,85,4 script Usher All Levels 105,{
- menu "Prontera Arena [" + getmapusers("pvp_y_8-1.gat") + " / 128]",Lpro,
- "Izlude Arena [" + getmapusers("pvp_y_8-2.gat") + " / 128]",Lizu,
- "Payon Arena [" + getmapusers("pvp_y_8-3.gat") + " / 128]",Lpay,
- "Alberta Arena [" + getmapusers("pvp_y_8-4.gat") + " / 128]",Lalb,
- "Morroc Arena [" + getmapusers("pvp_y_8-5.gat") + " / 128]",Lmoc,
- "Quit",Lcancel;
-Lpro:
- if(getmapusers("pvp_y_8-1.gat") >= 128 ) goto LError;
- warp "pvp_y_8-1",0,0;
- break;
-Lizu:
- if(getmapusers("pvp_y_8-2.gat") >= 128 ) goto LError;
- warp "pvp_y_8-2",0,0;
- break;
-Lpay:
- if(getmapusers("pvp_y_8-3.gat") >= 128 ) goto LError;
- warp "pvp_y_8-3",0,0;
- break;
-Lalb:
- if(getmapusers("pvp_y_8-4.gat") >= 128 ) goto LError;
- warp "pvp_y_8-4",0,0;
- break;
-Lmoc:
- if(getmapusers("pvp_y_8-5.gat") >= 128 ) goto LError;
- warp "pvp_y_8-5",0,0;
- break;
-Lcancel:
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "All Levels",0;
- break;
-}
-
-// Begin PVP Room N
-pvp_n_room.gat,30,85,4 script Usher 31~40 105,{
- if ((BaseLevel < 31) || (BaseLevel > 40)) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_1-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_1-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_1-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_1-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_1-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_1-1.gat") >= 64 ) goto LError;
- warp "pvp_n_1-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_1-2.gat") >= 32 ) goto LError;
- warp "pvp_n_1-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_1-3.gat") >= 32 ) goto LError;
- warp "pvp_n_1-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_1-4.gat") >= 32 ) goto LError;
- warp "pvp_n_1-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_1-5.gat") >= 32 ) goto LError;
- warp "pvp_n_1-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 31~40";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 31 ~ LV 40",0;
- break;
-}
-pvp_n_room.gat,38,85,4 script Usher 41~50 105,{
- if ((BaseLevel < 41) || (BaseLevel > 50)) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_2-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_2-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_2-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_2-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_2-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_2-1.gat") >= 64 ) goto LError;
- warp "pvp_n_2-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_2-2.gat") >= 32 ) goto LError;
- warp "pvp_n_2-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_2-3.gat") >= 32 ) goto LError;
- warp "pvp_n_2-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_2-4.gat") >= 32 ) goto LError;
- warp "pvp_n_2-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_2-5.gat") >= 32 ) goto LError;
- warp "pvp_n_2-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 41~50";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 41 ~ LV 50",0;
- break;
-}
-pvp_n_room.gat,46,85,4 script Usher 51~60 105,{
- if ((BaseLevel < 51) || (BaseLevel > 60)) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_3-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_3-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_3-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_3-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_3-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_3-1.gat") >= 64 ) goto LError;
- warp "pvp_n_3-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_3-2.gat") >= 32 ) goto LError;
- warp "pvp_n_3-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_3-3.gat") >= 32 ) goto LError;
- warp "pvp_n_3-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_3-4.gat") >= 32 ) goto LError;
- warp "pvp_n_3-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_3-5.gat") >= 32 ) goto LError;
- warp "pvp_n_3-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 51~60";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 51 ~ LV 60",0;
- break;
-}
-pvp_n_room.gat,54,85,4 script Usher 61~70 105,{
- if ((BaseLevel < 61) || (BaseLevel > 70)) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_4-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_4-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_4-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_4-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_4-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_4-1.gat") >= 64 ) goto LError;
- warp "pvp_n_4-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_4-2.gat") >= 32 ) goto LError;
- warp "pvp_n_4-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_4-3.gat") >= 32 ) goto LError;
- warp "pvp_n_4-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_4-4.gat") >= 32 ) goto LError;
- warp "pvp_n_4-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_4-5.gat") >= 32 ) goto LError;
- warp "pvp_n_4-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 61~70";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 61 ~ LV 70",0;
- break;
-}
-pvp_n_room.gat,62,85,4 script Usher 71~80 105,{
- if ((BaseLevel < 71) || (BaseLevel > 80)) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_5-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_5-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_5-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_5-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_5-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_5-1.gat") >= 64 ) goto LError;
- warp "pvp_n_5-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_5-2.gat") >= 32 ) goto LError;
- warp "pvp_n_5-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_5-3.gat") >= 32 ) goto LError;
- warp "pvp_n_5-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_5-4.gat") >= 32 ) goto LError;
- warp "pvp_n_5-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_5-5.gat") >= 32 ) goto LError;
- warp "pvp_n_5-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 71~80";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 71 ~ LV 80",0;
- break;
-}
-pvp_n_room.gat,70,85,4 script Usher 81~90 105,{
- if ((BaseLevel < 81) || (BaseLevel > 90)) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_6-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_6-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_6-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_6-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_6-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_6-1.gat") >= 64 ) goto LError;
- warp "pvp_n_6-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_6-2.gat") >= 32 ) goto LError;
- warp "pvp_n_6-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_6-3.gat") >= 32 ) goto LError;
- warp "pvp_n_6-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_6-4.gat") >= 32 ) goto LError;
- warp "pvp_n_6-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_6-5.gat") >= 32 ) goto LError;
- warp "pvp_n_6-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 81~90";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 81 ~ LV 90",0;
- break;
-}
-pvp_n_room.gat,78,85,4 script Usher 91~Higher 105,{
- if (BaseLevel < 91) goto LVNG;
- menu "Sandwich Arena [" + getmapusers("pvp_n_7-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_7-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_7-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_7-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_7-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_7-1.gat") >= 64 ) goto LError;
- warp "pvp_n_7-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_7-2.gat") >= 32 ) goto LError;
- warp "pvp_n_7-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_7-3.gat") >= 32 ) goto LError;
- warp "pvp_n_7-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_7-4.gat") >= 32 ) goto LError;
- warp "pvp_n_7-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_7-5.gat") >= 32 ) goto LError;
- warp "pvp_n_7-5",0,0;
- break;
-Lcancel:
- close;
-LVNG:
- mes "[PVP Usher]";
- mes "Sorry, this arena is only for levels 91~Higher0";
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "LV 91 ~ Higher",0;
- break;
-}
-pvp_n_room.gat,86,85,4 script Usher All Levels 105,{
- menu "Sandwich Arena [" + getmapusers("pvp_n_8-1.gat") + " / 64]",Lsand,
- "Rock Arena [" + getmapusers("pvp_n_8-2.gat") + " / 32]",Llock,
- "Four Arena [" + getmapusers("pvp_n_8-3.gat") + " / 32]",Lpolu,
- "Undercross Arena [" + getmapusers("pvp_n_8-4.gat") + " / 32]",Lunder,
- "Copass Arena [" + getmapusers("pvp_n_8-5.gat") + " / 32]",Lcom,
- "Quit",Lcancel;
-Lsand:
- if(getmapusers("pvp_n_8-1.gat") >= 64 ) goto LError;
- warp "pvp_n_8-1",0,0;
- break;
-Llock:
- if(getmapusers("pvp_n_8-2.gat") >= 32 ) goto LError;
- warp "pvp_n_8-2",0,0;
- break;
-Lpolu:
- if(getmapusers("pvp_n_8-3.gat") >= 32 ) goto LError;
- warp "pvp_n_8-3",0,0;
- break;
-Lunder:
- if(getmapusers("pvp_n_8-4.gat") >= 32 ) goto LError;
- warp "pvp_n_8-4",0,0;
- break;
-Lcom:
- if(getmapusers("pvp_n_8-5.gat") >= 32 ) goto LError;
- warp "pvp_n_8-5",0,0;
- break;
-Lcancel:
- close;
-LError:
- mes "[PVP Usher]";
- mes "Sorry, this arena is currently full";
- close;
-OnInit:
- waitingroom "All Levels",0;
- break;
-}
-
-// PvP Representative NPC prontera 164 175
-prontera.gat,164,175,5 script PvP Representative 116,{
- mes "[PvP Representative]";
- mes "Hello there! I'm the PvP Representative!";
- next;
- mes "[PvP Representative]";
- mes "I'm here to advertise our Arena in Izlude! It's specially designed for you players to beat each other up!";
- next;
- menu "Sounds interesting! I'll join!",entrance,"PvP? Whats that?",info,"Nah, maybe later.",quit;
-entrance:
- mes "[PvP Representative]";
- mes "Most excellent! I'll warp you to our Arena's Front Gate!";
- next;
- warp "izlude.gat",128,218;
- close;
-info:
- mes "[PvP Representative]";
- mes "PvP Stands For 'Player versus Player', where you get to choose from a variety of arenas in which to fight in!";
- next;
- mes "[PvP Representative]";
- mes "You don't have to worry about losing items, we have a NO PENALTY rule that states you cannot loose items or EXP!";
- next;
- mes "[PvP Representative]";
- mes "So whadduya think?";
- next;
- menu "Sounds interesting! I'll join!",entrance,"Nah, maybe later.",quit;
-quit:
- mes "[PvP Representative]";
- mes "'Kay - I hope you change your mind in the near future.";
- mes " ";
- mes "Come Again! ^_^";
- close;
-}
-
-// Arena Bulletin Board NPC izlude 125 219
-izlude.gat,125,219,5 script Arena Bulletin Board 111,{
- mes "[Arena Bulletin Board]";
- mes "Welcome to the one and only...";
- mes " ";
- mes "Player Versus Player Arena!";
- close;
-}
-
-// Arena Master NPC prt_are_in 100 84
-prt_are_in.gat,100,84,4 script Arena Master 734,{
- mes "[Arena Master]";
- mes "Aaahh yes! Welcome to my humble and world renown PvP Arena!";
- next;
- mes "[Arena Master]";
- mes "Tell me...do you wish to learn more of my Arena?";
- next;
- menu "Sure",sure,"Maybe later...",later;
-sure:
- mes "[Arena Master]";
- mes "After much boredom that I've went through all my life of killing simple monsters, I decided that it wasn't enough!";
- next;
- mes "[Arena Master]";
- mes "I needed HUMAN FLESH! To satisfy my need to kill...";
- next;
- mes "[Arena Master]";
- mes "And after years of construction and planning ~ it's finally complete for all of Midgard to see and cherish!";
- next;
- mes "[Arena Master]";
- mes "I present you...";
- mes " ";
- mes "MY ARENA!!!";
- close;
-later:
- mes "[Arena Master]";
- mes "Fine fine, please do enjoy your stay.";
- close;
-}
-
-// PvP Attendant NPC prt_are_in 97 86
-prt_are_in.gat,97,86,4 script PvP Attendant 98,{
- mes "[PvP Attendant]";
- mes "Welcome To The PVP ARENA!";
- next;
- mes "[PvP Attendant]";
- mes "The Hall to the Left leads to City simulation Arenas";
- next;
- mes "[PvP Attendant]";
- mes "The Hall to the Right leads to our Special map Arenas";
- close;
-}
-
-// PvP Attendant NPC prt_are_in 102 86
-prt_are_in.gat,102,86,4 script PvP Attendant 98,{
- mes "[PvP Attendant]";
- mes "Welcome To The PVP ARENA!";
- next;
- mes "[PvP Attendant]";
- mes "The Hall to the Left leads to City simulation Arenas";
- next;
- mes "[PvP Attendant]";
- mes "The Hall to the Right are our Special map Arenas";
- close;
-}
-
-// Begin 2v2 pvp Script
-pvp_2vs2.gat,32,22,2 script Bruno 87,{
- mes "[Bruno]";
- mes "You wimpin out already?";
- menu "Yes",goback,"No",stay;
- goback:
- mes "Man!, you don't even got scratches, you wimp.";
- next;
- warp "prt_are_in.gat",167,90;
- close;
- stay:
- mes "Impressive!, I respect your stamina!";
- close;
-}
-
-prt_are_in.gat,167,92,4 script Bruno 87,{
- mes "[Bruno]";
- mes "You sure you wanna goto our underground 2vs2 arena dork?";
- menu "Yes",gopvp,"No",nopvp;
- gopvp:
- mes "Was nice knowin you chump.";
- next;
- warp "pvp_2vs2.gat",36,49;
- close;
- nopvp:
- mes "Didn't think so, wuss!";
- close;
-}
-
-prt_are_in.gat,92,86,4 script Herman 125,{
- mes "[Herman]";
- mes "Welcome to Royal Rumble!";
- mes "Ladies and Gents, my name is Herman from 'Cool Event Corp.'!";
- next;
- menu "What's Royal Rumble?",M0,"Boo~Go Home~",MEnd;
-
- M0:
- mes "[Herman]";
- mes "We, Cool Event Corp., have opened a special event open to everyone visiting the Arena.";
- mes "You can escape your monotonous life with this really great even we are providing you!";
- next;
- mes "[Herman]";
- mes "This event is called ..Rooooooyal Rumbbbbbbble!!";
- mes "*Cough*..*Cough*..*Cough* !!";
- next;
- mes "[Herman]";
- mes ". . . . .";
- mes "Arrggghhh Sooorry...";
- next;
- mes "[Herman]";
- mes "When there are enough players in every 'Stand-By Room',";
- mes "We will guide you to the beautiful Colosseum.";
- next;
- mes "[Herman]";
- mes "In that Colosseum, you have to fight with hard and hostile Monsters within 5 minutes,";
- mes "Using 8 warp zones located in 8 directions.";
- next;
- mes "[Herman]";
- mes "When you strike into the deep inside of Monsters you will see Organ NPCs which control and generate Monsters.";
- mes "You should have to speak them if you want to make an easy way to get a victory. They will release you from enemies.";
- next;
- mes "[Herman]";
- mes "Whatever you eliminate all enemies by yourself or get helped by Organ NPCs, When you kill them all,";
- mes "It is regarded as the Perfect Clear on Royal Rumble!";
- next;
- mes "[Herman]";
- mes "Have some fun in Royal Rumble with your companions.";
- mes "Once again, My name is Herman from Cool Event Corp. Thank you!";
- close;
-
- MEnd:
- mes "[Herman]";
- mes "You go Home, Baby";
- close;
-}
-
-prt_are_in.gat,93,86,4 script Lancelot 125,{
- mes "[Lancelot]";
- mes "Hi Hi! Come on ! Make yourself at Home!";
- mes "My name is Lacelot from Cool Event Corp. I am here to tell you about Time Limit Fight. Do you want to Listen?";
- next;
- menu "Yeah, Cool.",M0,"Sorry, I don't want to.",MEnd;
-
- M0:
- mes "[Lancelot]";
- mes "We, Cool Event Corp., open a Special event to give a fun to everybody visiting Arena.";
- mes "You can slip your monotonous day life for the moment during the event we provide you!";
- next;
- mes "[Lancelot]";
- mes "The Event Called ..Timeeeee-- Limmmmmitttt---Figgggghhtt !!";
- mes "*Aaahchoo* !! *Achoo* !! *Cough**Cough* ..";
- next;
- mes "[Lancelot]";
- mes ". . . . . Whack..";
- mes "Oh Boy.. Really Sorry to make you uncomfortable with this.";
- next;
- mes "[Lancelot]";
- mes "When players gather as many as we need in Each Standbyroom";
- mes "We will guide you to the Labylinth.";
- next;
- mes "[Lancelot]";
- mes "In that Labylinth,you have to terminate all monsters within 5 minutes,";
- mes "Using this Warp zone and that warp zone...";
- next;
- mes "[Lancelot]";
- mes "When you kill all Monsters in one room,another gate will be opened ..and you can go in there.";
- mes "One thing you must know is when you enter the new room door is totally closed to block your exit ..";
- next;
- mes "[Lancelot]";
- mes "You cannot go back to where you're from.";
- next;
- mes "[Lancelot]";
- mes "In case of Level 1 Stage, the door of Boss Stage will be opened when you eliminate all monsters in every room ..";
- mes "But in Level 2 and 3, even though there are many complexed corridors, if you follow the shortcut, you will enter the Boss Room at ease.";
- next;
- mes "[Lancelot]";
- mes "Get some fun with your companions.";
- mes "Thank you for your time, once again my name is Lancelot!";
- close;
- MEnd:
- mes "[Lancelot]";
- mes "Alright, Bye Bye";
- close;
-}
-
-prt_are_in.gat,94,85,4 Zakkie 84,{
- mes "[Zakkie]";
- mes "Welcome to Royal Rumble,the World of Fighters!";
- mes "My name is Zakkie from Cool Event Corp.!";
- mes "If you don't mind let me give you some tips for more fun.";
- next;
- menu "No!i don't mind.Go ahead.",M0,"Errr....I know already.",MEnd;
-
- M0:
- mes "[Zakkie]";
- mes "when get started, You will ecounter many monsters through 8 warp zones.";
- mes "You can choose either way of the Battle. You can find Organ NPCs behind each Warp Zone or You can kill all Enemies by yourself.";
- next;
- mes "[Zakkie]";
- mes "When you satisfy one of them, it is regarded as Clear on that Round.";
- mes "We suggest you to discuss with party members to find out better way of the Battle.";
- close;
- MEnd:
- mes "[Zakkie]";
- mes "Whattt!! Did you say you know the tips?!";
- mes "Wow~Excellent. Then you don't need my help. Well have fun~!";
- close;
-}
-
-prt_are_in.gat,108,86,4 script Boris 84,{
- mes "[Boris]";
- mes "Hmm.. I can easily imagine how frustrated you have been in your life, dear.. Because Common people cannot dare to visit me.";
- mes "Let me introduce myself. My name is Boris and the director of Customer Support Team in Cool Event Corp.";
- mes "I will give you the exceptional tips only for the Bloodthirsty.";
- next;
- menu "Will you please?",M0,"Thank you but I already know about it.",MEnd;
-
- M0:
- mes "[Boris]";
- mes "Before get started, you must work out a strategy considering your members.";
- mes "Then you can warp into the Battle.";
- next;
- mes "[Boris]";
- mes "If 8 men jump into the Warp zone together, You will succeed.";
- mes "Otherwise If a man or two, I don't think you can survive.";
- next;
- mes "[Boris]";
- mes "And let's talk about the Running Time of Royal Rumble and of Time Limit Fight.";
- mes "Although every Battle Time is limitted, but sometimes it is increased by a Bonus when you clear One Round.";
- next;
- mes "[Boris]";
- mes "Bonus Time will be increased by Second.. When you get a Bonus Time";
- mes "Definately you could extent the Limit of Battle. You can check the Time passage with the announcement of our employee.";
- close;
-
- MEnd:
- mes "[Boris]";
- mes ".. Ahh...I need my room in Dark ..";
- mes "Hmm Hmm Nothing, Nothing.";
- close;
-}
-
-// Add missing Warps Begins Here
-prt_are_in.gat,32,95,0 warp areawarpfix1 1,1,pvp_y_room.gat,52,23
-prt_are_in.gat,170,95,0 warp areawarpfix2 1,1,pvp_n_room.gat,52,23
-pvp_y_room.gat,52,18,0 warp areawarpfix3 1,1,prt_are_in.gat,32,92
-pvp_n_room.gat,52,18,0 warp areawarpfix4 1,1,prt_are_in.gat,170,92
-
-// PvP Mapflags
-pvp_y_1-1.gat mapflag nopenalty
-pvp_y_1-2.gat mapflag nopenalty
-pvp_y_1-3.gat mapflag nopenalty
-pvp_y_1-4.gat mapflag nopenalty
-pvp_y_1-5.gat mapflag nopenalty
-pvp_y_2-1.gat mapflag nopenalty
-pvp_y_2-2.gat mapflag nopenalty
-pvp_y_2-3.gat mapflag nopenalty
-pvp_y_2-4.gat mapflag nopenalty
-pvp_y_2-5.gat mapflag nopenalty
-pvp_y_3-1.gat mapflag nopenalty
-pvp_y_3-2.gat mapflag nopenalty
-pvp_y_3-3.gat mapflag nopenalty
-pvp_y_3-4.gat mapflag nopenalty
-pvp_y_3-5.gat mapflag nopenalty
-pvp_y_4-1.gat mapflag nopenalty
-pvp_y_4-2.gat mapflag nopenalty
-pvp_y_4-3.gat mapflag nopenalty
-pvp_y_4-4.gat mapflag nopenalty
-pvp_y_4-5.gat mapflag nopenalty
-pvp_y_5-1.gat mapflag nopenalty
-pvp_y_5-2.gat mapflag nopenalty
-pvp_y_5-3.gat mapflag nopenalty
-pvp_y_5-4.gat mapflag nopenalty
-pvp_y_5-5.gat mapflag nopenalty
-pvp_y_6-1.gat mapflag nopenalty
-pvp_y_6-2.gat mapflag nopenalty
-pvp_y_6-3.gat mapflag nopenalty
-pvp_y_6-4.gat mapflag nopenalty
-pvp_y_6-5.gat mapflag nopenalty
-pvp_y_7-1.gat mapflag nopenalty
-pvp_y_7-2.gat mapflag nopenalty
-pvp_y_7-3.gat mapflag nopenalty
-pvp_y_7-4.gat mapflag nopenalty
-pvp_y_7-5.gat mapflag nopenalty
-pvp_y_8-1.gat mapflag nopenalty
-pvp_y_8-2.gat mapflag nopenalty
-pvp_y_8-3.gat mapflag nopenalty
-pvp_y_8-4.gat mapflag nopenalty
-pvp_y_8-5.gat mapflag nopenalty
-pvp_n_1-1.gat mapflag nopenalty
-pvp_n_1-2.gat mapflag nopenalty
-pvp_n_1-3.gat mapflag nopenalty
-pvp_n_1-4.gat mapflag nopenalty
-pvp_n_1-5.gat mapflag nopenalty
-pvp_n_2-1.gat mapflag nopenalty
-pvp_n_2-2.gat mapflag nopenalty
-pvp_n_2-3.gat mapflag nopenalty
-pvp_n_2-4.gat mapflag nopenalty
-pvp_n_2-5.gat mapflag nopenalty
-pvp_n_3-1.gat mapflag nopenalty
-pvp_n_3-2.gat mapflag nopenalty
-pvp_n_3-3.gat mapflag nopenalty
-pvp_n_3-4.gat mapflag nopenalty
-pvp_n_3-5.gat mapflag nopenalty
-pvp_n_4-1.gat mapflag nopenalty
-pvp_n_4-2.gat mapflag nopenalty
-pvp_n_4-3.gat mapflag nopenalty
-pvp_n_4-4.gat mapflag nopenalty
-pvp_n_4-5.gat mapflag nopenalty
-pvp_n_5-1.gat mapflag nopenalty
-pvp_n_5-2.gat mapflag nopenalty
-pvp_n_5-3.gat mapflag nopenalty
-pvp_n_5-4.gat mapflag nopenalty
-pvp_n_5-5.gat mapflag nopenalty
-pvp_n_6-1.gat mapflag nopenalty
-pvp_n_6-2.gat mapflag nopenalty
-pvp_n_6-3.gat mapflag nopenalty
-pvp_n_6-4.gat mapflag nopenalty
-pvp_n_6-5.gat mapflag nopenalty
-pvp_n_7-1.gat mapflag nopenalty
-pvp_n_7-2.gat mapflag nopenalty
-pvp_n_7-3.gat mapflag nopenalty
-pvp_n_7-4.gat mapflag nopenalty
-pvp_n_7-5.gat mapflag nopenalty
-pvp_n_8-1.gat mapflag nopenalty
-pvp_n_8-2.gat mapflag nopenalty
-pvp_n_8-3.gat mapflag nopenalty
-pvp_n_8-4.gat mapflag nopenalty
-pvp_n_8-5.gat mapflag nopenalty
-pvp_2vs2.gat mapflag nopenalty
-
-pvp_y_1-1.gat mapflag pvp
-pvp_y_1-2.gat mapflag pvp
-pvp_y_1-3.gat mapflag pvp
-pvp_y_1-4.gat mapflag pvp
-pvp_y_1-5.gat mapflag pvp
-pvp_y_2-1.gat mapflag pvp
-pvp_y_2-2.gat mapflag pvp
-pvp_y_2-3.gat mapflag pvp
-pvp_y_2-4.gat mapflag pvp
-pvp_y_2-5.gat mapflag pvp
-pvp_y_3-1.gat mapflag pvp
-pvp_y_3-2.gat mapflag pvp
-pvp_y_3-3.gat mapflag pvp
-pvp_y_3-4.gat mapflag pvp
-pvp_y_3-5.gat mapflag pvp
-pvp_y_4-1.gat mapflag pvp
-pvp_y_4-2.gat mapflag pvp
-pvp_y_4-3.gat mapflag pvp
-pvp_y_4-4.gat mapflag pvp
-pvp_y_4-5.gat mapflag pvp
-pvp_y_5-1.gat mapflag pvp
-pvp_y_5-2.gat mapflag pvp
-pvp_y_5-3.gat mapflag pvp
-pvp_y_5-4.gat mapflag pvp
-pvp_y_5-5.gat mapflag pvp
-pvp_y_6-1.gat mapflag pvp
-pvp_y_6-2.gat mapflag pvp
-pvp_y_6-3.gat mapflag pvp
-pvp_y_6-4.gat mapflag pvp
-pvp_y_6-5.gat mapflag pvp
-pvp_y_7-1.gat mapflag pvp
-pvp_y_7-2.gat mapflag pvp
-pvp_y_7-3.gat mapflag pvp
-pvp_y_7-4.gat mapflag pvp
-pvp_y_7-5.gat mapflag pvp
-pvp_y_8-1.gat mapflag pvp
-pvp_y_8-2.gat mapflag pvp
-pvp_y_8-3.gat mapflag pvp
-pvp_y_8-4.gat mapflag pvp
-pvp_y_8-5.gat mapflag pvp
-pvp_n_1-1.gat mapflag pvp
-pvp_n_1-2.gat mapflag pvp
-pvp_n_1-3.gat mapflag pvp
-pvp_n_1-4.gat mapflag pvp
-pvp_n_1-5.gat mapflag pvp
-pvp_n_2-1.gat mapflag pvp
-pvp_n_2-2.gat mapflag pvp
-pvp_n_2-3.gat mapflag pvp
-pvp_n_2-4.gat mapflag pvp
-pvp_n_2-5.gat mapflag pvp
-pvp_n_3-1.gat mapflag pvp
-pvp_n_3-2.gat mapflag pvp
-pvp_n_3-3.gat mapflag pvp
-pvp_n_3-4.gat mapflag pvp
-pvp_n_3-5.gat mapflag pvp
-pvp_n_4-1.gat mapflag pvp
-pvp_n_4-2.gat mapflag pvp
-pvp_n_4-3.gat mapflag pvp
-pvp_n_4-4.gat mapflag pvp
-pvp_n_4-5.gat mapflag pvp
-pvp_n_5-1.gat mapflag pvp
-pvp_n_5-2.gat mapflag pvp
-pvp_n_5-3.gat mapflag pvp
-pvp_n_5-4.gat mapflag pvp
-pvp_n_5-5.gat mapflag pvp
-pvp_n_6-1.gat mapflag pvp
-pvp_n_6-2.gat mapflag pvp
-pvp_n_6-3.gat mapflag pvp
-pvp_n_6-4.gat mapflag pvp
-pvp_n_6-5.gat mapflag pvp
-pvp_n_7-1.gat mapflag pvp
-pvp_n_7-2.gat mapflag pvp
-pvp_n_7-3.gat mapflag pvp
-pvp_n_7-4.gat mapflag pvp
-pvp_n_7-5.gat mapflag pvp
-pvp_n_8-1.gat mapflag pvp
-pvp_n_8-2.gat mapflag pvp
-pvp_n_8-3.gat mapflag pvp
-pvp_n_8-4.gat mapflag pvp
-pvp_n_8-5.gat mapflag pvp
-pvp_2vs2.gat mapflag pvp
-
-pvp_y_1-1.gat mapflag pvp_noparty
-pvp_y_1-2.gat mapflag pvp_noparty
-pvp_y_1-3.gat mapflag pvp_noparty
-pvp_y_1-4.gat mapflag pvp_noparty
-pvp_y_1-5.gat mapflag pvp_noparty
-pvp_y_2-1.gat mapflag pvp_noparty
-pvp_y_2-2.gat mapflag pvp_noparty
-pvp_y_2-3.gat mapflag pvp_noparty
-pvp_y_2-4.gat mapflag pvp_noparty
-pvp_y_2-5.gat mapflag pvp_noparty
-pvp_y_3-1.gat mapflag pvp_noparty
-pvp_y_3-2.gat mapflag pvp_noparty
-pvp_y_3-3.gat mapflag pvp_noparty
-pvp_y_3-4.gat mapflag pvp_noparty
-pvp_y_3-5.gat mapflag pvp_noparty
-pvp_y_4-1.gat mapflag pvp_noparty
-pvp_y_4-2.gat mapflag pvp_noparty
-pvp_y_4-3.gat mapflag pvp_noparty
-pvp_y_4-4.gat mapflag pvp_noparty
-pvp_y_4-5.gat mapflag pvp_noparty
-pvp_y_5-1.gat mapflag pvp_noparty
-pvp_y_5-2.gat mapflag pvp_noparty
-pvp_y_5-3.gat mapflag pvp_noparty
-pvp_y_5-4.gat mapflag pvp_noparty
-pvp_y_5-5.gat mapflag pvp_noparty
-pvp_y_6-1.gat mapflag pvp_noparty
-pvp_y_6-2.gat mapflag pvp_noparty
-pvp_y_6-3.gat mapflag pvp_noparty
-pvp_y_6-4.gat mapflag pvp_noparty
-pvp_y_6-5.gat mapflag pvp_noparty
-pvp_y_7-1.gat mapflag pvp_noparty
-pvp_y_7-2.gat mapflag pvp_noparty
-pvp_y_7-3.gat mapflag pvp_noparty
-pvp_y_7-4.gat mapflag pvp_noparty
-pvp_y_7-5.gat mapflag pvp_noparty
-pvp_y_8-1.gat mapflag pvp_noparty
-pvp_y_8-2.gat mapflag pvp_noparty
-pvp_y_8-3.gat mapflag pvp_noparty
-pvp_y_8-4.gat mapflag pvp_noparty
-pvp_y_8-5.gat mapflag pvp_noparty
-pvp_n_1-1.gat mapflag pvp_noparty
-pvp_n_1-2.gat mapflag pvp_noparty
-pvp_n_1-3.gat mapflag pvp_noparty
-pvp_n_1-4.gat mapflag pvp_noparty
-pvp_n_1-5.gat mapflag pvp_noparty
-pvp_n_2-1.gat mapflag pvp_noparty
-pvp_n_2-2.gat mapflag pvp_noparty
-pvp_n_2-3.gat mapflag pvp_noparty
-pvp_n_2-4.gat mapflag pvp_noparty
-pvp_n_2-5.gat mapflag pvp_noparty
-pvp_n_3-1.gat mapflag pvp_noparty
-pvp_n_3-2.gat mapflag pvp_noparty
-pvp_n_3-3.gat mapflag pvp_noparty
-pvp_n_3-4.gat mapflag pvp_noparty
-pvp_n_3-5.gat mapflag pvp_noparty
-pvp_n_4-1.gat mapflag pvp_noparty
-pvp_n_4-2.gat mapflag pvp_noparty
-pvp_n_4-3.gat mapflag pvp_noparty
-pvp_n_4-4.gat mapflag pvp_noparty
-pvp_n_4-5.gat mapflag pvp_noparty
-pvp_n_5-1.gat mapflag pvp_noparty
-pvp_n_5-2.gat mapflag pvp_noparty
-pvp_n_5-3.gat mapflag pvp_noparty
-pvp_n_5-4.gat mapflag pvp_noparty
-pvp_n_5-5.gat mapflag pvp_noparty
-pvp_n_6-1.gat mapflag pvp_noparty
-pvp_n_6-2.gat mapflag pvp_noparty
-pvp_n_6-3.gat mapflag pvp_noparty
-pvp_n_6-4.gat mapflag pvp_noparty
-pvp_n_6-5.gat mapflag pvp_noparty
-pvp_n_7-1.gat mapflag pvp_noparty
-pvp_n_7-2.gat mapflag pvp_noparty
-pvp_n_7-3.gat mapflag pvp_noparty
-pvp_n_7-4.gat mapflag pvp_noparty
-pvp_n_7-5.gat mapflag pvp_noparty
-pvp_n_8-1.gat mapflag pvp_noparty
-pvp_n_8-2.gat mapflag pvp_noparty
-pvp_n_8-3.gat mapflag pvp_noparty
-pvp_n_8-4.gat mapflag pvp_noparty
-pvp_n_8-5.gat mapflag pvp_noparty
-
-pvp_y_1-1.gat mapflag nomemo
-pvp_y_1-2.gat mapflag nomemo
-pvp_y_1-3.gat mapflag nomemo
-pvp_y_1-4.gat mapflag nomemo
-pvp_y_1-5.gat mapflag nomemo
-pvp_y_2-1.gat mapflag nomemo
-pvp_y_2-2.gat mapflag nomemo
-pvp_y_2-3.gat mapflag nomemo
-pvp_y_2-4.gat mapflag nomemo
-pvp_y_2-5.gat mapflag nomemo
-pvp_y_3-1.gat mapflag nomemo
-pvp_y_3-2.gat mapflag nomemo
-pvp_y_3-3.gat mapflag nomemo
-pvp_y_3-4.gat mapflag nomemo
-pvp_y_3-5.gat mapflag nomemo
-pvp_y_4-1.gat mapflag nomemo
-pvp_y_4-2.gat mapflag nomemo
-pvp_y_4-3.gat mapflag nomemo
-pvp_y_4-4.gat mapflag nomemo
-pvp_y_4-5.gat mapflag nomemo
-pvp_y_5-1.gat mapflag nomemo
-pvp_y_5-2.gat mapflag nomemo
-pvp_y_5-3.gat mapflag nomemo
-pvp_y_5-4.gat mapflag nomemo
-pvp_y_5-5.gat mapflag nomemo
-pvp_y_6-1.gat mapflag nomemo
-pvp_y_6-2.gat mapflag nomemo
-pvp_y_6-3.gat mapflag nomemo
-pvp_y_6-4.gat mapflag nomemo
-pvp_y_6-5.gat mapflag nomemo
-pvp_y_7-1.gat mapflag nomemo
-pvp_y_7-2.gat mapflag nomemo
-pvp_y_7-3.gat mapflag nomemo
-pvp_y_7-4.gat mapflag nomemo
-pvp_y_7-5.gat mapflag nomemo
-pvp_y_8-1.gat mapflag nomemo
-pvp_y_8-2.gat mapflag nomemo
-pvp_y_8-3.gat mapflag nomemo
-pvp_y_8-4.gat mapflag nomemo
-pvp_y_8-5.gat mapflag nomemo
-pvp_n_1-1.gat mapflag nomemo
-pvp_n_1-2.gat mapflag nomemo
-pvp_n_1-3.gat mapflag nomemo
-pvp_n_1-4.gat mapflag nomemo
-pvp_n_1-5.gat mapflag nomemo
-pvp_n_2-1.gat mapflag nomemo
-pvp_n_2-2.gat mapflag nomemo
-pvp_n_2-3.gat mapflag nomemo
-pvp_n_2-4.gat mapflag nomemo
-pvp_n_2-5.gat mapflag nomemo
-pvp_n_3-1.gat mapflag nomemo
-pvp_n_3-2.gat mapflag nomemo
-pvp_n_3-3.gat mapflag nomemo
-pvp_n_3-4.gat mapflag nomemo
-pvp_n_3-5.gat mapflag nomemo
-pvp_n_4-1.gat mapflag nomemo
-pvp_n_4-2.gat mapflag nomemo
-pvp_n_4-3.gat mapflag nomemo
-pvp_n_4-4.gat mapflag nomemo
-pvp_n_4-5.gat mapflag nomemo
-pvp_n_5-1.gat mapflag nomemo
-pvp_n_5-2.gat mapflag nomemo
-pvp_n_5-3.gat mapflag nomemo
-pvp_n_5-4.gat mapflag nomemo
-pvp_n_5-5.gat mapflag nomemo
-pvp_n_6-1.gat mapflag nomemo
-pvp_n_6-2.gat mapflag nomemo
-pvp_n_6-3.gat mapflag nomemo
-pvp_n_6-4.gat mapflag nomemo
-pvp_n_6-5.gat mapflag nomemo
-pvp_n_7-1.gat mapflag nomemo
-pvp_n_7-2.gat mapflag nomemo
-pvp_n_7-3.gat mapflag nomemo
-pvp_n_7-4.gat mapflag nomemo
-pvp_n_7-5.gat mapflag nomemo
-pvp_n_8-1.gat mapflag nomemo
-pvp_n_8-2.gat mapflag nomemo
-pvp_n_8-3.gat mapflag nomemo
-pvp_n_8-4.gat mapflag nomemo
-pvp_n_8-5.gat mapflag nomemo
-pvp_2vs2.gat mapflag nomemo
-
-pvp_y_1-1.gat mapflag noteleport
-pvp_y_1-2.gat mapflag noteleport
-pvp_y_1-3.gat mapflag noteleport
-pvp_y_1-4.gat mapflag noteleport
-pvp_y_1-5.gat mapflag noteleport
-pvp_y_2-1.gat mapflag noteleport
-pvp_y_2-2.gat mapflag noteleport
-pvp_y_2-3.gat mapflag noteleport
-pvp_y_2-4.gat mapflag noteleport
-pvp_y_2-5.gat mapflag noteleport
-pvp_y_3-1.gat mapflag noteleport
-pvp_y_3-2.gat mapflag noteleport
-pvp_y_3-3.gat mapflag noteleport
-pvp_y_3-4.gat mapflag noteleport
-pvp_y_3-5.gat mapflag noteleport
-pvp_y_4-1.gat mapflag noteleport
-pvp_y_4-2.gat mapflag noteleport
-pvp_y_4-3.gat mapflag noteleport
-pvp_y_4-4.gat mapflag noteleport
-pvp_y_4-5.gat mapflag noteleport
-pvp_y_5-1.gat mapflag noteleport
-pvp_y_5-2.gat mapflag noteleport
-pvp_y_5-3.gat mapflag noteleport
-pvp_y_5-4.gat mapflag noteleport
-pvp_y_5-5.gat mapflag noteleport
-pvp_y_6-1.gat mapflag noteleport
-pvp_y_6-2.gat mapflag noteleport
-pvp_y_6-3.gat mapflag noteleport
-pvp_y_6-4.gat mapflag noteleport
-pvp_y_6-5.gat mapflag noteleport
-pvp_y_7-1.gat mapflag noteleport
-pvp_y_7-2.gat mapflag noteleport
-pvp_y_7-3.gat mapflag noteleport
-pvp_y_7-4.gat mapflag noteleport
-pvp_y_7-5.gat mapflag noteleport
-pvp_y_8-1.gat mapflag noteleport
-pvp_y_8-2.gat mapflag noteleport
-pvp_y_8-3.gat mapflag noteleport
-pvp_y_8-4.gat mapflag noteleport
-pvp_y_8-5.gat mapflag noteleport
-pvp_n_1-1.gat mapflag noteleport
-pvp_n_1-2.gat mapflag noteleport
-pvp_n_1-3.gat mapflag noteleport
-pvp_n_1-4.gat mapflag noteleport
-pvp_n_1-5.gat mapflag noteleport
-pvp_n_2-1.gat mapflag noteleport
-pvp_n_2-2.gat mapflag noteleport
-pvp_n_2-3.gat mapflag noteleport
-pvp_n_2-4.gat mapflag noteleport
-pvp_n_2-5.gat mapflag noteleport
-pvp_n_3-1.gat mapflag noteleport
-pvp_n_3-2.gat mapflag noteleport
-pvp_n_3-3.gat mapflag noteleport
-pvp_n_3-4.gat mapflag noteleport
-pvp_n_3-5.gat mapflag noteleport
-pvp_n_4-1.gat mapflag noteleport
-pvp_n_4-2.gat mapflag noteleport
-pvp_n_4-3.gat mapflag noteleport
-pvp_n_4-4.gat mapflag noteleport
-pvp_n_4-5.gat mapflag noteleport
-pvp_n_5-1.gat mapflag noteleport
-pvp_n_5-2.gat mapflag noteleport
-pvp_n_5-3.gat mapflag noteleport
-pvp_n_5-4.gat mapflag noteleport
-pvp_n_5-5.gat mapflag noteleport
-pvp_n_6-1.gat mapflag noteleport
-pvp_n_6-2.gat mapflag noteleport
-pvp_n_6-3.gat mapflag noteleport
-pvp_n_6-4.gat mapflag noteleport
-pvp_n_6-5.gat mapflag noteleport
-pvp_n_7-1.gat mapflag noteleport
-pvp_n_7-2.gat mapflag noteleport
-pvp_n_7-3.gat mapflag noteleport
-pvp_n_7-4.gat mapflag noteleport
-pvp_n_7-5.gat mapflag noteleport
-pvp_n_8-1.gat mapflag noteleport
-pvp_n_8-2.gat mapflag noteleport
-pvp_n_8-3.gat mapflag noteleport
-pvp_n_8-4.gat mapflag noteleport
-pvp_n_8-5.gat mapflag noteleport
-pvp_2vs2.gat mapflag noteleport
-
-pvp_y_1-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_1-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_1-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_1-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_1-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_2-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_2-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_2-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_2-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_2-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_3-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_3-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_3-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_3-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_3-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_4-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_4-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_4-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_4-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_4-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_5-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_5-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_5-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_5-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_5-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_6-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_6-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_6-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_6-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_6-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_7-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_7-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_7-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_7-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_7-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_8-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_8-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_8-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_8-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_y_8-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_1-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_1-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_1-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_1-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_1-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_2-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_2-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_2-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_2-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_2-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_3-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_3-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_3-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_3-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_3-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_4-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_4-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_4-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_4-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_4-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_5-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_5-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_5-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_5-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_5-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_6-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_6-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_6-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_6-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_6-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_7-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_7-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_7-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_7-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_7-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_8-1.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_8-2.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_8-3.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_8-4.gat mapflag nosave prt_are_in.gat,100,80
-pvp_n_8-5.gat mapflag nosave prt_are_in.gat,100,80
-pvp_2vs2.gat mapflag nosave prt_are_in.gat,100,80
diff --git a/npc/other/old/wedding.txt b/npc/other/old/wedding.txt deleted file mode 100644 index 38ed55c2f..000000000 --- a/npc/other/old/wedding.txt +++ /dev/null @@ -1,715 +0,0 @@ -//////////////////////////////////////////////////////////
-// Wedding Script Alpha (v1.4) //
-//////////////////////////////////////////////////////////
-//
-//=====eAthena Script====================================
-// Wedding Script
-//=====By================================================
-// AppleGirl and Evera(version 1.0)
-//=====Current Version===================================
-// 1.45b
-//=====Compatible With:==================================
-// Any eAthena Version; RO Episode 6+
-//=====Description=======================================
-// Fully working wedding script for all kind of weddings
-//=====Additional Comments:==============================
-// Tested and debugged by whocares (maybe 1-2 bugs left)(version 1.1)
-//======= Version 1.2 By ShadowLady =====================
-// Same Sex Weddings.
-// Now the script(npcs) tell the players how they must perform exactly.
-//======= Version 1.3 By ShadowLady =====================
-// You might need to update the wedding rings in item_db
-// Same for the tux/dress, so all classes and lvs can use it ^^
-// And check if they are wearing the tux/dress and not only have it on the inventory.
-//======= Version 1.4 By ShadowLady =====================
-// Added some code ideas. Thanks to Jbain for help me debbuging
-// Added @outfit variable, to check if you already bought a tux/dress
-// Fixed "part" of the divorce npc. The code is bugged by itself -_- Need both chars to be online yet.
-////======= Version 1.45 By ShadowLady =====================
-// Fixed some minor bugs. Same-sex is disabled by default now.
-// Change $progress variable to $@progress, so it dont screw up the ceremony on a server crash.
-// Added a Special GM Menu to enable/disable same-sex weddings and reset most variables.
-////======= Version 1.45b By Aria =====================
-// Added the $progress to $@progress variable change that ShadowLady put in notes, but not in code.
-//=======================================================
-// Variable Notes:
-//
-// event_wedding - 1 signifies marriage
-// $groom$ - Groom's name storage
-// $bride$ - Bride's name storage
-// $@progress - Sets global restriction upon wedding
-// @register - Temporary registration check
-// @zleft - Temporary zeny needed check
-// $name$ - Insert name for bride
-// $name2$ - Insert name for groom
-// $get_ring - Check so you can't get ring twice
-// $reason$ - Objection to wedding
-// @outfit - Check if the char already got a dress or tuxedo from the npc
-// Tristan
-prt_church.gat,99,125,4 script Tristan the Third 108,{
- if($groom$ == strcharinfo(0) && $@progress != 3) goto L_GroomCeremony;
- if(@register == 0) goto L_GroomNeedToRegister;
- if($bride$ == strcharinfo(0)) goto L_BrideCeremony;
- menu "Here To Attend",L_Wedding,"Here for another reason",L_OtherReason;
-L_GroomCeremony:
- if(@register == 0) goto L_GroomNeedToRegister;
- if($@progress == 1) goto L_BrideNeedToRegister;
- if($@progress == 0) goto L_Wedding;
- if(countitem(2613) < 1) goto L_NeedRing;//Items: Diamond_Ring,
- if((getequipid(2) != 2338) && (getequipid(2) != 7170)) goto L_Attire;
- mes "[Tristan the Third]";
- mes "Everything is ready, it's your call now...";
- next;
- menu "Perform Wedding.",-,"Cancel Wedding.",L_CancelWedding;
- set $@progress,3;
- mes "[Tristan the Third]";
- mes "Well all you have to do now is the easy part input your bride's name, remember to spell it correctly.";
- input $name2$;
- next;
- if($name2$ != $bride$) goto L_WrongBrideName;
- deltimer "a13";
- marriage $name2$;
- mes "[Tristan the Third]";
- mes "Please tell your wife to speak to me, and then we will start exchanging rings";
- delitem 2613,1;//Items: Diamond_Ring,
- if (sex == 0) getitem 2635,1;//Items: Wedding_Ring_F,
- if (sex == 1) getitem 2634,1;//Items: Wedding_Ring_M,
- set @get_ring,1;
- next;
- mes "[Tristan the Third]";
- mes "Will you and your bride please move onto the stand. I will now preform the Wedding Ceremony!";
- set event_wedding,1;
- deltimer "weddinglimit1";
- deltimer "weddinglimit2";
- announce "The Wedding of "+$groom$+" and "+$bride$+", will now be held at Prontera Church.",5;
- addtimer 50000,"a1";
- addtimer 55000,"a2";
- addtimer 60000,"a3";
- addtimer 65000,"a4";
- addtimer 70000,"a5";
- addtimer 75000,"a6";
- addtimer 80000,"a7";
- addtimer 85000,"a8";
- addtimer 90000,"a9";
- addtimer 95000,"a10";
- addtimer 100000,"a11";
- addtimer 105000,"a12";
- close;
-L_BrideCeremony:
- if(countitem(2613) < 1) goto L_NeedRing;//Items: Diamond_Ring,
- if((getequipid(2) != 2338) && (getequipid(2) != 7170)) goto L_Attire;
- mes "[Tristan the Third]";
- mes "Well all you have to do now is the easy part input your groom's name, remember to spell it correctly.";
- input $name$;
- next;
- if($name$ != $groom$) goto L_WrongGroomName;
- deltimer "a13";
- deltimer "weddinglimit1";
- deltimer "weddinglimit2";
- marriage $name$;
- delitem 2613,1;//Items: Diamond_Ring,
- if (sex == 0) getitem 2635,1;//Items: Wedding_Ring_F,
- if (sex == 1) getitem 2634,1;//Items: Wedding_Ring_M,
- set @get_ring,1;
- close;
-L_CancelWedding:
- mes "[Tristan the Third]";
- mes "The wedding has been cancelled by "+strcharinfo(0)+".";
- set $@progress,0;
- set $groom$,"null";
- set $bride$,"null";
- set @register,0;
- set event_wedding,0;
- set @get_ring,0;
- deltimer "a1";
- deltimer "a2";
- deltimer "a3";
- deltimer "a4";
- deltimer "a5";
- deltimer "a6";
- deltimer "a7";
- deltimer "a8";
- deltimer "a9";
- deltimer "a10";
- deltimer "a11";
- deltimer "a12";
- deltimer "a13";
- close;
-L_GroomNeedToRegister:
- mes "[Tristan the Third]";
- mes "Hello, please register with Marry if you want me to perform a marriage for you.";
- close;
-L_Wedding:
- if(event_wedding != 1) goto L_Guest;
- mes "[Tristan the Third]";
- mes "Hello again "+strcharinfo(0)+", I hope wish for the best of luck in your life.";
- close;
-L_BrideNeedToRegister:
- mes "[Tristan the Third]";
- mes "I'm sorry, I cannot start the ceremony if the bride has not registered yet.";
- close;
-L_OtherReason:
- if(@get_ring == 1) goto L_Wedding;
- mes "[Tristan the Third]";
- mes "Do you have a reason why these two should not be bonded in holy matrimony?";
- next;
- menu "Yes I Do.",-,"No",L_NoReason;
- areaannounce "prt_church.gat",0,0,350,350,"Ladies and Gentlemen,"+strcharinfo(0)+" has an objection to this marriage",0;
- mes "[Tristan the Third]";
- mes "Please enter your reason, for this action.";
- input $reason$;
- next;
- areaannounce "prt_church.gat",0,0,350,350,""+$reason$+"",0;
- set $@progress,0;
- set $groom$,"null";
- set $bride$,"null";
- set $name$,"null";
- set $name2$,"null";
- set @register,0;
- set event_wedding,0;
- set @get_ring,0;
- deltimer "a1";
- deltimer "a2";
- deltimer "a3";
- deltimer "a4";
- deltimer "a5";
- deltimer "a6";
- deltimer "a7";
- deltimer "a8";
- deltimer "a9";
- deltimer "a10";
- deltimer "a11";
- deltimer "a12";
- mes "The wedding has been called off.";
- close;
-L_NoReason:
- if($groom$ == strcharinfo(0)) goto L_InProgress;
- if($bride$ == strcharinfo(0)) goto L_InProgress;
- mes "[Tristan the Third]";
- mes "Please have a seat than and let me continue the wedding.";
- close;
-L_Guest:
- mes "[Tristan the Third]";
- mes "Enjoy the cerimony.";
- mes "But I must continue the cerimony, so lets talk after.";
- close;
-L_InProgress:
- mes "[Tristan the Third]";
- mes "Your wedding is in progress, please try talking with me later.";
- close;
-L_WrongBrideName:
- mes "[Marry Happy]";
- mes "How come you forgot your wife's name!? Sorry come back later when you know who you want to marry.";
- close;
-L_WrongGroomName:
- mes "[Marry Happy]";
- mes "How come you forgot your husband's name!? Sorry come back later when you know who you want to marry.";
- close;
-L_NeedRing:
- mes "[Tristan the Third]";
- mes "You need a Diamond Ring in order to perform the wedding.";
- close;
-L_Attire:
- if(sex == 1) goto L_NeedTuxedo;
- if(sex == 0) goto L_NeedDress;
- close;
-L_NeedTuxedo:
- mes "[Tristan the Third]";
- mes "You need a Tuxedo before we can continue the ceremony.";
- close;
-L_NeedDress:
- mes "[Tristan the Third]";
- mes "Oh my is it your wedding day?";
- mes "Well sorry to break it to you, you need a wedding dress to get married.";
- close;
-}
-
-// Marry
-prt_church.gat,95,100,4 script Marry 71,{
-// Set the ceremony prices here. A for @outfit==0 and B for @outfit==1.
-// Real prices are 1,3m for males and 1,2m for females. Set at your own will.
- set @costgroomA,120000;
- set @costgroomB,60000;
- set @costbrideA,100000;
- set @costbrideB,50000;
- mes "[Marry Happy]";
- mes "Marriage refers to a hope of everybody to find the desired happiness.";
- mes "So may i ask, is there someone special you wish to be with forever?";
- next;
- menu "Inquire about the wedding ceremony.",L_Principles,"Inquire about the procedure of wedding ceremony.",L_WeddingSystem,"Apply for a wedding ceremony.",L_Marry,"We are the invincible single army!",L_LiveSolo,"Special Menu",L_GmMenu;
-L_GmMenu:
- set @gmlevel,getgmlevel(50);
- if(@gmlevel < 50) goto L_NotGM;
- mes "Hello " + strcharinfo(0) + " How i can serve you?";
- menu "Enable Same-Sex Weddings",L_EnableSameSex,"Disable Same-Sex Weddings",L_DisableSameSex,"Reset the Variables",L_ResetVariables,"Just Checking...",L_Bye;
-L_NotGM:
- mes "You cant have access to this special menu " + strcharinfo(0) + "";
- mes "Only GMs can change the ceremony options.";
- close;
-L_EnableSameSex:
- set $samesex,1;
- mes "Same-Sex Weddings are enabled now!";
- close;
-L_DisableSameSex:
- set $samesex,0;
- mes "Same-Sex Weddings are disabled now!";
- close;
-L_ResetVariables:
- set $@progress,0;
- set $groom$,"null";
- set $bride$,"null";
- set $name$,"null";
- set $name2$,"null";
- set @register,0;
- set event_wedding,0;
- set @get_ring,0;
- set @outfit,0;
- deltimer "weddinglimit1";
- deltimer "weddinglimit2";
- deltimer "a1";
- deltimer "a2";
- deltimer "a3";
- deltimer "a4";
- deltimer "a5";
- deltimer "a6";
- deltimer "a7";
- deltimer "a8";
- deltimer "a9";
- deltimer "a10";
- deltimer "a11";
- deltimer "a12";
- deltimer "a13";
- mes "All variables are reseted and timers off!";
- close;
-L_Principles:
- mes "[Marry Happy]";
- mes "His Majesty King Tristan III of the Rune Midgard Kingdom will be officiating this wedding, with the intent of blessing all the people through his noble message.";
- next;
- mes "[Marry Happy]";
- mes "Although His Majesty has a rather busy agenda, for the sake of newly married couples, he has personally come here, to the Prontera Church.";
- mes "It is the favor of our King that everyone would live happily ever after.";
- next;
- mes "[Marry Happy]";
- mes "The proposal must be done with prudence and courtesy.";
- mes "Once the wedlocks have been made, they cannot be undone.";
- mes "The two who are united in marriage must be with the other forever until the day they leave this world.";
- next;
- mes "[Marry Happy]";
- mes "Also, males only with females, and females only with males can be wed. Although there may be those who desire a homosexual or bestial marriage... it is approved.";
- next;
- mes "[Marry Happy]";
- mes "If there is a significant other whom you want to spend the rest of your life with, then don't be shy to propose.";
- mes "Wishing for many blessings upon couples who wish to live happily ever after..";
- close;
-L_WeddingSystem:
- mes "[Marry Happy]";
- mes "First make sure both players a registered to get married.";
- mes "Obviously, you must know each other to get married?";
- mes "If both have registered, and you must be on the same party.";
- mes "Then talk to Thristan the Third.";
- next;
- mes "[Marry Happy]";
- mes "You must go to Thristan the Third,";
- mes "and the Groom must talk to him first.";
- mes "And you must tell him the Bride";
- mes "you wish to get married with.";
- mes "Be sure to tell him exactly who you want to marry.";
- next;
- mes "[Marry Happy]";
- mes "After the Groom has spoken, next the Bride must talk.";
- mes "Then when both of you have spoken each others names,";
- mes "Thristan the third will read out both of your names.";
- next;
- mes "[Marry Happy]";
- mes "After you have got married,";
- mes "you will both recive a ring of marrige.";
- mes "And as soon as both of you wear these rings,";
- mes "you will be forever married with each other.";
- mes "You can also be refused of a lasting marrige.";
- mes "But, dont be sad.";
- next;
- mes "[Marry Happy]";
- mes "If there are many people that wish to get married,";
- mes "So please keep to the order you register.";
- mes "Thristan does not do multiple marriges at once.";
- mes "He will only see one couple at a time.";
- next;
- mes "[Marry Happy]";
- mes "Lastly, you must put forth your name quickly";
- mes "to Thristan the third.";
- mes "After the male has said yes to marrage ";
- mes "the female has 3 minutes to reply.";
- mes "Or you shall forever never be able";
- mes "to get married.";
- next;
- mes "[Marry Happy]";
- mes "An easy way to write down the each others name,";
- mes "Send a message to each other";
- mes "then in the private message window press up";
- next;
- mes "[Marry Happy]";
- mes "Then it will show the other persons name.";
- mes "If you press ctrl + C that name will be saved.";
- mes "Next time you need that name";
- mes "you can press shift + insert.";
- mes "Then you will get that name quickly and easily.";
- next;
- mes "[Marry Happy]";
- mes "You should have a go at using this method.";
- mes "Remeber, Press ctrl + C to save that name.";
- next;
- input $nametest$;
- mes "[Marry Happy]";
- mes "Hopefully you will remember this method.";
- mes "If you ever decide to get married.";
- mes "Remember to register.";
- close;
-L_Marry:
- mes "[Marry Happy]";
- mes "If you wish to get married you must first register.";
- mes "Male is ^FF00FF" + @costgroomA + "^000000 zeny and female is ^FF00FF" + @costbrideA + "^000000 zeny";
- if((countitem(2338) > 0) || (countitem(7170) > 0) || (@outfit == 1)) mes "But only ^FF00FF" + @costgroomB + "^000000 zeny for male and ^FF00FF" + @costbrideB + "^000000 zeny for female if you already have registered before";
- mes "Both male and female must have registered,";
- mes "and both must have paid fees, have Diamond Rings and be on same party!";
- mes "The Bride will get a Wedding Dress, while the Groom will get a Chinese Tuxedo";
- next;
- mes "[Marry Happy]";
- mes "If both people have paid and meet recquirements";
- mes "you are able to get married strait away.";
- mes "One must be the Groom and the other the Bride.";
- mes "Do you wish to register to get married?";
- if($SameSex == 1) menu "I'm gonna be the Groom",-,"I'm gonna be the Bride",L_BrideRegister,"Never mind",L_Bye;
- if(event_wedding == 1) goto L_Married;
- if(@register >= 1) goto L_AlreadyRegistered;
- if($@progress >= 2) goto L_InProgress;
- if(($samesex == 0) && (sex == 0)) goto L_BrideRegister;
- if((countitem(2338) > 0) || (countitem(7170) > 0) || (@outfit == 1)) goto L_GroomRegister2;
- mes "[Marry Happy]";
- if(sex == 1) mes "No problem sir, please fill out your name here.";
- if(sex == 0) mes "No problem miss, please fill out your name here.";
- mes "And I'll need to collect a " + @costgroomA + " zeny fee for your wedding fees and outfit.";
- next;
- mes "[Marry Happy]";
- mes "Now You Must Insert The Your Bride's Name";
- input $name$;
- next;
- if(zeny < @costgroomA) goto L_NeedZeny1;
- set $groom$,strcharinfo(0);
- set @register,1;
- set zeny,zeny-@costgroomA;
- set $@progress,1;
- if(sex == 1) getitem 7170,1;
- if(sex == 0) getitem 2338,1;
- set @outfit,1;
- mes "[Marry Happy]";
- mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your marriage.";
- addtimer 300000,"weddinglimit1";
- areaannounce "prt_church.gat",0,0,350,350,strcharinfo(0)+" has registered for the wedding.",0;
- next;
- mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes.";
- deltimer "a13";
- addtimer 300000,"a13";
- close;
-L_BrideRegister:
- if ($name$ != strcharinfo(0)) goto L_NotBride;
- if($groom$ == strcharinfo(0)) goto L_CantMarryYourself;
- if($@progress != 1) goto L_GroomNotRegistered;
- if(@register >= 1) goto L_AlreadyRegistered;
- if((countitem(2338) > 0) || (countitem(7170) > 0) || (@outfit == 1)) goto L_BrideRegister2;
- mes "[Marry Happy]";
- if(sex == 1) mes "No problem sir, please fill out your name here.";
- if(sex == 0) mes "No problem miss, please fill out your name here.";
- mes "And I'll need to collect a 100,000z fee for your wedding fees and outfit.";
- next;
- if(zeny < @costbrideA) goto L_NeedZeny2;
- mes "[Marry Happy]";
- mes "Now You Must Insert The Your Groom's Name";
- input $name2$;
- if($name2$ != $groom$) goto L_WrongName;
- set $bride$,strcharinfo(0);
- set @register,1;
- set zeny,zeny-@costbrideA;
- set $@progress,2;
- set event_wedding,1;
- if(sex == 1) getitem 7170,1;
- if(sex == 0) getitem 2338,1;
- set @outfit,1;
- deltimer "weddinglimit1";
- addtimer 300000,"weddinglimit2";
- next;
- mes "[Marry Happy]";
- mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your wedding.";
- areaannounce "prt_church.gat",0,0,350,350,strcharinfo(0)+" has registered for the wedding.",0;
- next;
- mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes.";
- deltimer "a13";
- addtimer 300000,"a13";
- close;
-
-L_GroomRegister2:
- mes "[Marry Happy]";
- if(sex == 1) mes "No problem sir, please fill out your name here.";
- if(sex == 0) mes "No problem mis, please fill out your name here.";
- mes "And I'll need to collect a 60,000z fee for your wedding fees.";
- next;
- mes "[Marry Happy]";
- mes "Now You Must Insert The Your Bride's Name";
- input $name$;
- next;
- if(zeny < @costgroomB) goto L_NeedZeny3;
- set $groom$,strcharinfo(0);
- set @register,1;
- set zeny,zeny-@costgroomB;
- set $@progress,1;
- mes "[Marry Happy]";
- mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your marriage.";
- addtimer 300000,"weddinglimit1";
- areaannounce "prt_church.gat",0,0,350,350,strcharinfo(0)+" has registered for the wedding.",0;
- next;
- mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes.";
- deltimer "a13";
- addtimer 300000,"a13";
- close;
-L_BrideRegister2:
- mes "[Marry Happy]";
- if(sex == 1) mes "No problem sir, please fill out your name here.";
- if(sex == 0) mes "No problem mis, please fill out your name here.";
- mes "And I'll need to collect a 50,000z fee for your wedding fees.";
- next;
- if(zeny < @costbrideB) goto L_NeedZeny4;
- mes "[Marry Happy]";
- mes "Now You Must Insert The Your Groom's Name";
- input $name2$;
- if($name2$ != $groom$) goto L_WrongName;
- set $bride$,strcharinfo(0);
- set @register,1;
- set zeny,zeny-@costbrideB;
- set $@progress,2;
- set event_wedding,1;
- deltimer "weddinglimit1";
- addtimer 300000,"weddinglimit2";
- next;
- mes "[Marry Happy]";
- mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your wedding.";
- areaannounce "prt_church.gat",0,0,350,350,strcharinfo(0)+" has registered for the wedding.",0;
- next;
- mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes.";
- deltimer "a13";
- addtimer 300000,"a13";
- close;
-
-L_NeedZeny1:
- set @zleft,@costgroomA-zeny;
- mes "[Marry Happy]";
- mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short.";
- set @zleft,0;
- close;
-L_NeedZeny2:
- set @zleft,@costbrideA-zeny;
- mes "[Marry Happy]";
- mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short.";
- set @zleft,0;
- close;
-L_NeedZeny3:
- set @zleft,@costgroomB-zeny;
- mes "[Marry Happy]";
- mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short.";
- set @zleft,0;
- close;
-L_NeedZeny4:
- set @zleft,@costbrideB-zeny;
- mes "[Marry Happy]";
- mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short.";
- set @zleft,0;
- close;
-L_AlreadyRegistered:
- mes "[Marry Happy]";
- mes "You can't register a second time silly.";
- close;
-
-L_Bye:
- mes "[Marry Happy]";
- mes "Alrighty then, come back soon!";
- close;
-
-L_InProgress:
- mes "[Marry Happy]";
- mes "I cannot accept registrations while a wedding is in progress, try again later.";
- close;
-L_WrongName:
- mes "[Marry Happy]";
- mes "No one have registered with that name. Sorry.";
- close;
-L_GroomNotRegistered:
- mes "[Marry Happy]";
- mes "The groom must register first in order to initiate the wedding.";
- close;
-
-L_Married:
- mes "[Marry Happy]";
- mes "Hello again "+strcharinfo(0)+", I hope wish for the best of luck in your life.";
- close;
-L_LiveSolo:
- mes "[Marry Happy]";
- mes "Well live a happy bachelors life";
- close;
-L_NotBride:
- mes "[Marry Happy]";
- mes "You're not the bride";
- close;
-L_YouCantMarryYourself:
- mes "[Marry Happy]";
- mes "What the hell you trying to do? Marry yourself?O_O";
- close;
-}
-
-prt_church.gat,95,95,4 script Marry 71,{
- mes "[Marry Sad]";
- mes "Getting divorce can bring a lot of sorrow.";
- mes "By any chance, you you want to get divorced?";
- next;
- menu "I came to get a divorce",L_FirstDivorce,"What do I need for a divorce",L_DivorceSystem;
-L_FirstDivorce:
- if(divorce > 0) goto L_AlreadyDivorced;
- mes "[Marry Sad]";
- mes "So you came for a divorce, i have been divorced 2 times myself.";
- mes "Life will continue whoever said you need a partner was wrong.";
- mes "Dont forget that you and your partner must be online!";
- next;
- menu "Are you sure",-,"No i'm not ready",L_No;
- mes "[Marry Sad]";
- mes "You have made your choice,";
- mes "now you must live with it.";
- next;
- mes "You have been divorced!";
- set event_wedding,0;
- set divorce,1;
- set @register,0;
- divorce;
- close;
-L_AlreadyDivorced:
- mes "[Marry Sad]";
- mes "So you came for another divorce,wow you must be trying to find true love.";
- mes "Dont worry about it, it's not you, it's their fault.";
- next;
- menu "Are you sure",-,"No i'm not ready",L_No;
- mes "[Marry Sad]";
- mes "You have made your choice,";
- mes "now you must live with it.";
- next;
- mes "You have been divorced again!";
- set event_wedding,0;
- set divorce,2;
- set @register,0;
- divorce;
- close;
-L_No:
- mes "[Marry Sad]";
- mes "You should always be sure about what step you take in life.";
- close;
-L_DivorceSystem:
- mes "[Marry Sad]";
- mes "You just need to wish to not be married again and i will perform the divorce.";
- mes "Both you and your partner must be online.";
- close;
-}
-prt_church.gat,99,124,0 script weddinglimit1 -1,{
- announce "The bride has not registered within the alotted time frame.",3;
- announce "Your wedding has been cancelled.",3;
- set $@progress,0;
- set $groom$,"null";
- set $name$,"null";
- set $name2$,"null";
- set @register,0;
- deltimer "a1";
- deltimer "a2";
- deltimer "a3";
- deltimer "a4";
- deltimer "a5";
- deltimer "a6";
- deltimer "a7";
- deltimer "a8";
- deltimer "a9";
- deltimer "a10";
- deltimer "a11";
- deltimer "a12";
-}
-
-prt_church.gat,99,124,0 script weddinglimit2 -1,{
- announce "The groom has not begun the wedding ceremony by speaking to Tristan the Third.",3;
- announce "Your wedding has been cancelled.",3;
- set $@progress,0;
- set $groom$,"null";
- set $bride$,"null";
- set $name$,"null";
- set $name2$,"null";
- set @register,0;
- set event_wedding,0;
- deltimer "a1";
- deltimer "a2";
- deltimer "a3";
- deltimer "a4";
- deltimer "a5";
- deltimer "a6";
- deltimer "a7";
- deltimer "a8";
- deltimer "a9";
- deltimer "a10";
- deltimer "a11";
- deltimer "a12";
-}
-
-prt_church.gat,99,124,0 script a1 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"Ladies and Gentlemen, We will now join in holy matrimony these two lovers.",0;
-}
-prt_church.gat,99,124,0 script a2 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"Now more than ever, will both of your lives be entwined together as so will be your souls.",0;
-}
-prt_church.gat,99,124,0 script a3 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"You will both honor and cherish each other through the best and worst of times.",0;
-}
-prt_church.gat,99,124,0 script a4 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"The safety and well being of your other will now also be your responsibility.",0;
-}
-prt_church.gat,99,124,0 script a5 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"May in sickness or good health, your love will burn bright as no force can extinguish it.",0;
-}
-prt_church.gat,99,124,0 script a6 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"Those here stand witness to these vows bestowed upon you, you must act accordingly to them.",0;
-}
-prt_church.gat,99,124,0 script a7 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"Understanding that, we are nothing more but mortals on this earth, but this is our triumph.",0;
-}
-prt_church.gat,99,124,0 script a8 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"We here will now join these two mortal entities, and create an immortal love.",0;
-}
-prt_church.gat,99,124,0 script a9 -1,{
-areaannounce "prt_church.gat",0,0,350,350,$groom$+", do you you wish to take "+$bride$+" as your lawfully beloved wife?",0;
-}
-prt_church.gat,99,124,0 script a10 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"And do you "+$bride$+", wish to take "+$groom$+" as your lawfully beloved husband?",0;
-}
-prt_church.gat,99,124,0 script a11 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"And so be it, by the powers vested in me...",0;
-}
-prt_church.gat,99,124,0 script a12 -1,{
-areaannounce "prt_church.gat",0,0,350,350,"I pronouce you Husband and Wife, you may kiss the bride.",0;
- wedding;
- set $@progress,0;
- set $groom$,"null";
- set $bride$,"null";
- set $name$,"null";
- set $name2$,"null";
-}
-prt_church.gat,99,124,0 script a13 -1,{
-
-areaannounce "prt_church.gat",0,0,350,350,"The wedding has been cancelled.",0;
- set $@progress,0;
- set $groom$,"null";
- set $bride$,"null";
- set $name$,"null";
- set $name2$,"null";
- set @register,0;
- set event_wedding,0;
- set @get_ring,0;
-}
diff --git a/npc/other/old/weddingtxt.txt b/npc/other/old/weddingtxt.txt deleted file mode 100644 index 2caea19d6..000000000 --- a/npc/other/old/weddingtxt.txt +++ /dev/null @@ -1,277 +0,0 @@ -//UNFINISHED! need to set names and give rings!
-//Made by AppleGirl and Evera/Lorri.
-//PROPERTY OF eATHENA! OTHER ATHENAS DON'T TOUCH THIS!
-//Note: permanent variables event_marriage. 0=nothing done yet 1=m registered 2=f registered 3=m before ring 4=f before ring 5=m married 6=f married
-
-prt_church.gat,99,125,8 script Tristan the Third 108,{
-mes "[Thristan the Third]";
-if(event_marriage == 0) goto Lreg;
-if(event_marriage == 1) goto Lmale;
-if(event_marriage == 2) goto Lfemale;
-if(event_marriage == 3) && (countitem(2634)<1) || (event_marriage == 3) && (getequipname(136) == 2634) goto Lmcere;
-if(event_marriage == 4) && (countitem(2635)<1) || (event_marriage == 4) && (getequipname(136) == 2635) goto Lfcere;
-if(event_marriage >= 5) goto Lhappy;
-//else goto Lhappy;
-//if(even
-Lreg:
-mes "If you wish to get married you must first register";
-Lmale:
-if (getequipname(16) == 7170) goto Lmale2;
-if (getequipname(16) != 7170) goto Lmale3;
-mes "OmG1! H4X0Rz!1";
-close;
-Lmale2:
-if (zeny >= 30000) goto Lmale4;
-if (zeny <= 29999) goto Lmale3;
-mes "OmG1! H4X0Rz!1";
-close;
-//NOTE! Triggers to save/respond names aren't done!
-Lmale4:
- mes "Hello, how are you doing this wonderful day? Ah. I see you've registered to marry";
- mes "Do you wish to marry?";
-menu
-"yes",Lmyes,"No",Lcancel;
-Lmyes:
-//enable for input; can't be done with current script.c
-// mes"What is your bride's name?";
-// input @namemale;
- next;
- mes "I will now collect your ^FF00FFmoney^000000.";
- set Zeny, Zeny-30000;
- next;
-//enable for input; can't be done with current script.c
-// input @namemale;
- mes "Here is the ring. Please put it on your bride's hand";
- mes "By the holy power invested in me..";
- mes "I now pronounce you husband and wife!";
- mes "you may now kiss the bride.";
- emotion 46;
-//enable for setvariable
- set event_marriage,3;
- getitem 2634,1;
- close;
-Lmale3:
- mes "Hm, have you forgotten to bring your ^FF00FFTuxedo^000000 or ^FF00FFmoney^000000?";
- mes "Have a good look for it.";
- mes "Because you must bring it in order to get married.";
- mes "If you have it right now, please show me";
-close;
-Lfemale:
-if (zeny >= 20000) goto Lfemale4;
-if (zeny <= 19999) goto Lfemale3;
-mes "OmG1! H4X0Rz!1";
-close;
-Lfemale4:
- mes "Hello, how are you doing this wonderful day? Ah. I see you've registered to marry";
- mes "Do you wish to marry?";
-menu
-"yes",Lfyes,"No",Lcancel;
-Lfyes:
-//enable for input; can't be done with current script.c
-// mes "What is your groom's name?";
-// input @namefemale;
- next;
- mes "I will now collect your ^FF00FFmoney^000000.";
- set Zeny, Zeny-20000;
- next;
-//enable for input; can't be done with current script.c
- input @namefemale;
- mes "Here is the ring. Please put it on your groom's hand";
- mes "By the holy power invested in me..";
- mes "I now pronounce you husband and wife!";
-//enable for setvariable
- set event_marriage,4;
- getitem 2635,1;
- close;
-Lfemale3:
- mes "Hm, have you forgotten to bring your ^FF00FFWedding Veil^000000, ^FF00FFWedding Dress^000000, or ^FF00FFMoney^000000?";
- mes "Have a good look for it.";
- mes "Because you must bring it in order to get married.";
- mes "If you have it right now, please show me";
-close;
-Lmcere:
- mes "By the holy power invested in me..";
- mes "I now pronounce you husband and wife!";
- mes "you may now kiss the bride.";
- emotion 46;
- set event_marriage,5;
-close;
-Lfcere:
-
- mes "By the holy power invested in me..";
- mes "I now pronounce you husband and wife!";
- emotion 46;
- set event_marriage,6;
-close;
-Lhappy:
-mes "I hope your marriage is happy and successful!";
-close;
-Lcancel:
-mes "A true pity. I hope to see you another time.";
-close;
-}
-prt_church.gat,95,100,3 script Mary 71,{
-mes "[Mary Happy]";
-if(event_marriage == 0) goto Lstart;
-if(event_marriage != 0) goto Lhappy;
-mes "OmG1! H4X0Rz!1";
-close;
-Lstart:
-mes "Getting married bring a lot of joy.";
-mes "By any chance, you you want to get engaged with someone?";
-next;
-menu "Explain the principles of Marrige",Lprinciples,"How does the marrige system work.",Lsystem,"I want to get married with someone.",Lmarried,"I live solo forever!",Lsolo;
-
-Lprinciples:
- mes "[Mary Happy]";
- mes "His Majesty King Tristan III of the Rune Midgard Kingdom will be officiating this wedding, with the intent of blessing all the people through his noble message.";
- next;
- mes "[Mary Happy]";
- mes "Although His Majesty has a rather busy agenda, for the sake of newly married couples, he has personally come here, to the Prontera Church.";
- mes "It is the favor of our King that everyone would live happily ever after.";
- next;
- mes "[Mary Happy]";
- mes "The proposal must be done with prudence and courtesy.";
- mes "Once the wedlocks have been made, they cannot be undone.";
- mes "The two who are united in marriage must be with the other forever until the day they leave this world.";
- next;
- mes "[Mary Happy]";
- mes "Also, males only with females, and females only with males can be wed. Although there may be those who desire a homosexual or bestial marriage... it is not approved.";
- next;
- mes "[Mary Happy]";
- mes "If there is a significant other whom you want to spend the rest of your life with, then don't be shy to propose.";
- mes "Wishing for many blessings upon couples who wish to live happily ever after..";
- close;
-Lsystem:
- mes "[Mary Happy]";
- mes "First make sure both players a registered to get married.";
- mes "Obviously, you must know each other to get married?";
- mes "If both have registered, and you must be on the same party.";
- mes "Then talk to Thristan the Third.";
- next;
- mes "[Mary Happy]";
- mes "You must go to Thristan the Third,";
- mes "and the male must talk to him first.";
- mes "And you must tell him the girl";
- mes "you wish to get married with.";
- mes "Be sure to tell him exactly who you want to marry.";
- next;
- mes "[Mary Happy]";
- mes "After the male has spoken, next the female must talk.";
- mes "Then when both of you have spoken each others names,";
- mes "Thristan the third will read out both of your names.";
- next;
- mes "[Mary Happy]";
- mes "After you have got married,";
- mes "you will both recive a ring of marrige.";
- mes "And as soon as both of you wear these rings,";
- mes "you will be forever married with each other.";
- mes "You can also be refused of a lasting marrige.";
- mes "But, dont be sad.";
- next;
- mes "[Mary Happy]";
- mes "If there are many people that wish to get married,";
- mes "So please keep to the order you register.";
- mes "Thristan does not do multiple marriges at once.";
- mes "He will only see one couple at a time.";
- next;
- mes "[Mary Happy]";
- mes "Lastly, you must put forth your name quickly";
- mes "to Thristan the third.";
- mes "After the male has said yes to marrage ";
- mes "the female has 3 minutes to reply.";
- mes "Or you shall forever never be able";
- mes "to get married.";
- next;
- mes "[Mary Happy]";
- mes "An easy way to write down the each others name,";
- mes "Send a message to each other";
- mes "then in the private message window press up";
- next;
-//o_O who removed this part? we use a diff system now
-// mes "[Mary Happy]";
-// mes "Then it will show the other persons name.";
-// mes "If you press ctrl + C that name will be saved.";
-// mes "Next time you need that name";
-// mes "you can press shift + insert.";
-// mes "Then you will get that name quickly and easily.";
-// next;
-// mes "[Mary Happy]";
-// mes "You should have a go at using this method.";
-// mes "Remeber, Press ctrl + C to save that name.";
-// next;
-// input @nametest;
- mes "[Mary Happy]";
- mes "Hopefully you will remember this method.";
- mes "If you ever decide to get married.";
- mes "Remember to register.";
-Lmarried:
- mes "[Mary Happy]";
- mes "If you wish to get married you must first register.";
- mes "Male is ^FF00FF30,000^000000 zeny and female is ^FF00FF20,000^000000 zeny";
- mes "Both male and female must have registered,";
- mes "and both must have paid fees,";
- mes "and the female must have a wedding veil.";
- next;
- mes "[Mary Happy]";
- mes "If both people have paid and meet recquirements";
- mes "you are able to get married strait away.";
- mes "Do you wish to register to get married?";
- menu "Yes",LYes,"No",LNo;
-LYes:
-//add check for sex and if veil and tuxedo and wedding dress
-if (Sex == 1) goto Lmale;
-if (Sex == 0) goto Lfemale;
-Lmale:
-if (getequipname(16) == 7170) goto Lmale2;
-if (getequipname(16) != 7170) goto Lmale3;
-mes "[Mary Happy]";
-mes "OmG1! H4X0Rz!1";
-close;
-Lmale2:
-if (zeny >= 30000) goto Lmale4;
-if (zeny <= 29999) goto Lmale3;
-mes "[Mary Happy]";
-mes "OmG1! H4X0Rz!1";
-close;
-Lmale4:
- set event_marriage,1;
- mes "[Mary Happy]";
- mes "You are now registered =) go talk to his majesty, King Tristan III for your marriage.";
-close;
-Lmale3:
- mes "[Mary Happy]";
- mes "Hm, have you forgotten to bring your ^FF00FFTuxedo^000000 or ^FF00FFmoney^000000?";
- mes "Have a good look for it.";
- mes "Because you must bring it in order to get married.";
- mes "If you have it right now, please show me";
-close;
-
-Lfemale:
-if (getequipname(16) == 2338) && (getequipname(256) == 2206) goto Lfemale2;
-if (getequipname(16) != 2338) || (getequipname(256) == 2206) goto Lfemale3;
-mes "[Mary Happy]";
-mes "OmG1! H4X0Rz!1";
-Lfemale2:
-if (zeny >= 20000) goto Lfemale4;
-if (zeny <= 19999) goto Lfemale3;
-mes "[Mary Happy]";
-mes "OmG1! H4X0Rz!1";
-Lfemale4:
- set event_marriage,2;
- mes "[Mary Happy]";
- mes "You are now registered =) go talk to his majesty, King Tristan III for your marriage.";
-Lfemale3:
- mes "[Mary Happy]";
- mes "Hm, have you forgotten to bring your ^FF00FFWedding Veil^000000, ^FF00FFWedding Dress^000000, or ^FF00FFMoney^000000?";
- mes "Have a good look for it.";
- mes "Because you must bring it in order to get married.";
- mes "If you have it right now, please show me";
-close;
-LNo:
- mes "I hope you have a wonderful day!";
-close;
-Lhappy:
- mes "I hope your marriage is happy and successful!";
-close;
-}
\ No newline at end of file diff --git a/npc/quests/skills/alchemist_skills.txt b/npc/quests/skills/alchemist_skills.txt index af4b85c15..6088e30d7 100644 --- a/npc/quests/skills/alchemist_skills.txt +++ b/npc/quests/skills/alchemist_skills.txt @@ -92,7 +92,7 @@ L_nojob: //=====================Requires Bug Testing=====================
lhz_in01.gat,46,125,6 script Rekenber Guard 867,{
mes "[Rekenber Guard]";
- if(getequipid(9) == 2243){
+ if(isequipped(2241) && isequipped(2243)){
mes "......................";
next;
switch(select("Nice day, huh?","Cancel")){
@@ -255,7 +255,7 @@ lhz_in01.gat,224,140,8 script Kellasus 57,{ input @kelques$;
next;
mes "[Kellasus]";
- if(@kelques$ != "Rest"){
+ if(@kelques$ != "Vaporize"){
mes "Hmpf. I knew you had";
mes "no knowledge on";
mes "homunculus.";
@@ -269,7 +269,7 @@ lhz_in01.gat,224,140,8 script Kellasus 57,{ input @kelques$;
next;
mes "[Kellasus]";
- if(@kelques$ != "Germination Breed"){
+ if(@kelques$ != "Embryo"){
mes "Hmpf. I knew you had";
mes "no knowledge on";
mes "homunculus.";
@@ -283,7 +283,7 @@ lhz_in01.gat,224,140,8 script Kellasus 57,{ input @kelques$;
next;
mes "[Kellasus]";
- if(@kelques$ != "Resurrect Homunculus"){
+ if(@kelques$ != "Homunculus Ressurection"){
mes "Hmpf. I knew you had";
mes "no knowledge on";
mes "homunculus.";
@@ -323,8 +323,9 @@ lhz_in01.gat,224,140,8 script Kellasus 57,{ mes "...";
next;
mes "[Kellasus]";
- mes "I guess I could teach you a few skills..";
- //Gives player bio ethics and sets bitshift for quest finished
+ mes "He wants me to get back? Okay, well...";
+ mes "I guess you've deserved it.";
+ mes "Here you are, secrets of homunculus are yours now~";
if(BaseJob == Job_Alchem) skill 238,1,0;
set MISC_QUEST,MISC_QUEST|64;
set bioeth,0;
@@ -405,24 +406,23 @@ lhz_in01.gat,225,122,4 script Skrajiad 754,{ mes "be a master of all trades";
mes "to be proficient in Alchemy";
mes "But it's incredibly rewarding to";
- mes "those of us who never stop askins";
+ mes "those of us who never stop asking";
mes "how and why our world works.";
if(bioeth == 1) set bioeth,2;
close;
}
lhz_in02.gat,269,273,4 script Bringel 709,{
//Unofficial Text
- if(bioeth > 3 || MISC_QUEST&64){
- if(getskilllv(247) == 0 && BaseJob == Job_Alchem) skill 247,1,0;
- }
if(bioeth == 3){
mes "[Bringel]";
- mes "I see you're here to";
- mes "learn about homunculus...";
- mes "I will teach you a";
- mes "valuable skill to use.";
- //Learn res homun
- if(BaseJob == Job_Alchem) skill 247,1,0;
+ mes "Oh, you're here to learn about Homunculus?";
+ mes "Well, I can't really help you...";
+ next;
+ mes "[Bringel]";
+ mes "However, I've heard about a skill named";
+ mes "Homunculus Ressurection.";
+ mes "It seems it is a very important thing";
+ mes "for people working on them.";
set bioeth,4;
close;
}
diff --git a/npc/scripts_athena.conf b/npc/scripts_athena.conf index 60401005e..102151e14 100644 --- a/npc/scripts_athena.conf +++ b/npc/scripts_athena.conf @@ -55,9 +55,6 @@ npc: npc/merchants/kunai_maker.txt npc: npc/merchants/socket_enchant.txt
npc: npc/merchants/ammo_boxes.txt
npc: npc/merchants/ammo_dealer.txt
-// Temp Shops
-// Removed in kRO (because Scrolls have been added into mobs drops)
-//npc: npc/merchants/scrolls_arrows.txt
// --------------------------------------------------------------
// -------------------------- Airport ---------------------------
npc: npc/airports/airships.txt
@@ -177,7 +174,7 @@ npc: npc/other/msg_boards.txt npc: npc/other/bulletin_boards.txt
npc: npc/other/monster_museum.txt
npc: npc/other/marriage.txt
-npc: npc/other/divorce.txt
+//npc: npc/other/divorce.txt
npc: npc/other/dts_warper.txt
npc: npc/other/comodo_gambling.txt
// --------------------------------------------------------------
|