Various NPC fixes

* LUPUS, REMEMBER TO ACTUALLY ADD THE DIVORCE NPC, THANKS :P *

git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@8571 54d463be-8e91-2dee-dedb-b68131a5f0ec

5 files changed, 0 insertions, 5466 deletions

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	"ジュノーガイド"	700,{

-	mes "[ジュノーガイド]";

-	mes "過去を知り……";

-	mes "現在を見つめ……";

-	mes "未来を予知する……";

-	mes "ここは賢者たちの都市";

-	mes "- ジュノー -";

-	mes "ジュノーにようこそ";

-	next;

-	menu "武器防具店",L1,"道具店",L2,"セージキャッスル (セージ転職所)",L3,"書店通り",L4,"中央広場",L5,"共和国図書館",L6,"シュバイチェル魔法アカデミー",L7,"モンスター博物館",L8,"会話をCancel",LEnd;

-L1:

-	mes "[ジュノーガイド]";

-	viewpoint 1,120,138,1,0xFF3355;

-	mes "^FF3355+^000000 -> 武器防具店";

-	goto Lgo;

-L2:

-	mes "[ジュノーガイド]";

-	viewpoint 1,193,142,2,0x3355FF;

-	mes "^3355FF+^000000 -> 道具店";

-	goto Lgo;

-L3:

-	mes "[ジュノーガイド]";

-	viewpoint 1,90,318,3,0x33FF55;

-	mes "^33FF55+^000000 -> セージキャッスル";

-	mes "(セージ転職所)";

-	goto Lgo;

-L4:

-	mes "[ジュノーガイド]";

-	viewpoint 1,257,102,4,0xFF3355;

-	mes "^FF3355+^000000 -> 書店通り";

-	goto Lgo;

-L5:

-	mes "[ジュノーガイド]";

-	viewpoint 1,157,170,5,0x3355FF;

-	mes "^3355FF+^000000 -> 中央広場";

-	goto Lgo;

-L6:

-	mes "[ジュノーガイド]";

-	viewpoint 1,336,204,6,0x33FF55;

-	mes "^33FF55+^000000 -> 共和国図書館";

-	goto Lgo;

-L7:

-	mes "[ジュノーガイド]";

-	viewpoint 1,323,281,7,0xFF3355;

-	mes "^FF3355+^000000 -> シュバイチェル魔法アカデミー";

-	goto Lgo;

-L8:

-	mes "[ジュノーガイド]";

-	viewpoint 1,278,288,8,0x3355FF;

-	mes "^3355FF+^000000 -> モンスター博物館";

-	goto Lgo;

-Lgo:

-	mes "になります。";

-	mes "良い時をお過ごしください。";

-	close;

-LEnd:

-	mes "[ジュノーガイド]";

-	mes "賢者たちの大都市";

-	mes "そして知識の宝庫";

-	mes "ジュノーへようこそ！";

-	close;

-}

-

-//[Amatsu]

-

-//Needs Translation

-amatsu.gat,207,91,4	script	ミス・アマツ	758,{

-	mes "[蛍ちゃん]";

-	mes "私は、第13代ミス・アマツ";

-	mes "｢蛍｣と申します。";

-	mes "アマツ代表として";

-	mes "村の案内を仰せつかっております。";

-	mes "なにかご質問が� りましたら";

-	mes "なんなりとおっしゃってくださいませ。";

-	next;

-	menu "城",L1,"道具店",L2,"武器店",L3,"居酒屋",L4;

-L1:

-		viewpoint 1,85,235,0,0xFF3355;

-		mes "[蛍ちゃん]";

-		mes "ミニマップの";

-		mes "^FF3355+^000000部分が";

-		mes "城でございます。";

-		goto LEnd;

-L2:

-		viewpoint 1,96,118,1,0xCE6300;

-		mes "[蛍ちゃん]";

-		mes "ミニマップの";

-		mes "^CE6300+^000000部分が";

-		mes "道具店になります。";

-		goto LEnd;

-L3:

-		viewpoint 1,132,117,2,0x55FF33;

-		mes "[蛍ちゃん]";

-		mes "ミニマップの";

-		mes "^55FF33+^000000部分が";

-		mes "武器店になります。";

-		goto LEnd;

-L4:

-		viewpoint 1,217,116,3,0x3355FF;

-		mes "[蛍ちゃん]";

-		mes "ミニマップの";

-		mes "^3355FF+^000000部分が";

-		mes "居酒屋になります。";

-LEnd:

-		mes "それでは、アマツで";

-		mes "楽しい時間をお過ごし下さいませ。";

-		close;

-}

-

-amatsu.gat,251,283,4	script	案内人	767,{

-	mes "[案内人]";

-	mes "ようこそ。";

-	mes "旅をするには良い季節ですね。";

-	mes "私はこのアマツの";

-	mes "案内を引き受けておる者です。";

-	next;

-	mes "[案内人]";

-	mes "何をお探しですか？";

-	next;

-	menu "城",L1,"道具店",L2,"武器店",L3,"居酒屋",L4;

-L1:

-		viewpoint 1,85,235,0,0xFF3355;

-		mes "[案内人]";

-		mes "ミニマップの";

-		mes "^FF3355+^000000部分が";

-		mes "城でございます。";

-		goto LEnd;

-L2:

-		viewpoint 1,96,118,1,0xCE6300;

-		mes "[案内人]";

-		mes "ミニマップの";

-		mes "^CE6300+^000000部分が";

-		mes "道具店になります。";

-		goto LEnd;

-L3:

-		viewpoint 1,132,117,2,0x55FF33;

-		mes "[案内人]";

-		mes "ミニマップの";

-		mes "^55FF33+^000000部分が";

-		mes "武器店になります。";

-		goto LEnd;

-L4:

-		viewpoint 1,217,116,3,0x3355FF;

-		mes "[案内人]";

-		mes "ミニマップの";

-		mes "^3355FF+^000000部分が";

-		mes "居酒屋になります。";

-LEnd:

-		mes "それでは、アマツで";

-		mes "楽しい時間をお過ごし下さいませ。";

-		close;

-}

-

-

-//[Gonryun]

-

-//Needs Translation

-gonryun.gat,163,60,4	script	コンロンガイド	780,{

-	mes "[ハ ウォンチ]";

-	mes "いつも活気に満ちて、熱気があふれ";

-	mes "毎日人々が行き交っている";

-	mes "コンロンにいらっしゃいませ!";

-	next;

-	mes "[ハ ウォンチ]";

-	mes "商売がら、村の案内をして";

-	mes "います。知りたいことがあれば";

-	mes "何でも聞いてください。";

-	next;

-	menu "村長の家",L1,"道具商人",L2,"武器商人",L3,"防具商人",L4,"旅館",L5;

-L1:

-	viewpoint 1,109,131,0,0xff3355;

-	mes "[ハ ウォンチ]";

-	mes "ミニマップの";

-	mes "^ff3355+^000000の位置に";

-	mes "村長の家があります。";

-	goto Lend;

-L2:

-	viewpoint 1,147,84,1,0xce6300;

-	mes "[ハ ウォンチ]";

-	mes "ミニマップの";

-	mes "^ce6300+^000000の位置に";

-	mes "道具商人がいます。";

-	goto Lend;

-L3:

-	viewpoint 1,174,101,2,0x55ff33;

-	mes "[ハ ウォンチ]";

-	mes "ミニマップの";

-	mes "^55ff33+^000000の位置に";

-	mes "武器商人がいます。";

-	goto Lend;

-L4:

-	viewpoint 1,173,84,3,0x3355ff;

-	mes "[ハ ウォンチ]";

-	mes "ミニマップの";

-	mes "^3355ff+^000000の位置に";

-	mes "防具商人がいます。";

-	goto Lend;

-L5:

-	viewpoint 1,215,114,4,0xffffff;

-	mes "[ハ ウォンチ]";

-	mes "ミニマップの";

-	mes "^ffffff+^000000の位置に";

-	mes "旅館があります。";

-	goto Lend;

-Lend:

-	mes "私達の楽しいコンロンを";

-	mes "思いっきり楽しんでください！";

-	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