Okie ladies and gentleman if this commit breaks anything it's jman's and maki's fault, yes, blame them.

Fixing pre-re / re npc support, moving /config/ folder to src root so other servers may also make use of the #define renewal dir and other stuff.

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

1 files changed, 292 insertions, 0 deletions

diff --git a/npc/re/guides/guides_payon.txt b/npc/re/guides/guides_payon.txt
new file mode 100644
index 000000000..c703a98c9
--- /dev/null
+++ b/npc/re/guides/guides_payon.txt
@@ -0,0 +1,292 @@
+//===== rAthena Script ======================================= 
+//= Payon Guides
+//===== By: ================================================== 
+//= L0ne_W0lf
+//===== Current Version: ===================================== 
+//= 1.1
+//===== Compatible With: ===================================== 
+//= rAthena SVN
+//===== Description: ========================================= 
+//= [Aegis Conversion]
+//= Guides for the city of Payon.
+//===== Additional Comments: ================================= 
+//= 1.0 First version, Renewal guides.
+//= 1.1 Fixed and optimized. [Euphy]
+//============================================================ 
+
+payon,163,64,3	script	Guide#01payon::GuidePayon	708,{
+	cutin "pay_soldier",2;
+	mes "[Payon Guide]";
+	mes "Welcome to ^8B4513Payon^000000,";
+	mes "the Mountain Village.";
+	mes "Do you need help navigating the village?";
+	next;
+	while (1) {
+		switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) {
+		case 1:
+			set .@loop,1;
+			while (.@loop) {
+				switch(select("[ Archer Village ]:[ Tool Shop]:[ Weapon & Armor Shop ]:[ Inn & Tavern ]:[ Central Palace ]:[ Palace Court ]:[ Royal Kitchen ]:Previous Menu")) {
+				case 1:
+					mes "[Payon Guide]";
+					mes "^B9062FArcher Village^000000 is where";
+					mes "the Archer Association resides.";
+					mes "Please use the far north gate to enter the village.";
+					mes "Would you like to check any other locations?";
+					viewpoint 1,227,328,0,0xFF0000;
+					next;
+					break;
+				case 2:
+					callsub L_Mark,"^0000FFTool Shop";
+					viewpoint 1,144,85,1,0x0A82FF;
+					next;
+					break;
+				case 3:
+					callsub L_Mark,"^FF5400Weapon & Armor Shop";
+					viewpoint 1,139,159,2,0xFFB400;
+					next;
+					break;
+				case 4:
+					callsub L_Mark,"^006400Inn & Tavern";
+					viewpoint 1,220,117,3,0xAAFF00;
+					next;
+					break;
+				case 5:
+					callsub L_Mark,"^7F3300Central Palace";
+					viewpoint 1,155,245,4,0xD2691E;
+					next;
+					break;
+				case 6:
+					callsub L_Mark,"^800080Palace Court";
+					viewpoint 1,107,325,5,0xDA70D6;
+					next;
+					break;
+				case 7:
+					callsub L_Mark,"^B9062FRoyal Kitchen";
+					viewpoint 1,154,325,6,0xFF0000;
+					next;
+					break;
+				case 8:
+					set .@loop,0;
+					break;
+				}
+			}
+			break;
+		case 2:
+			set .@loop,1;
+			while (.@loop) {
+				switch(select("[ Eden Teleport Officer ]:[ Kafra Shop ]:[ Repair / Armsmith ]:[ Kafra Employee]:[ Trap Specialist ]:[ Seiayblem ]:[ Leablem ]:[ Jade ]:[ Pet Groomer ]:[ Chef Assistant ]:Previous Menu")) {
+				case 1:
+					callsub L_Mark,"^0000FFEden Teleport Officer";
+					viewpoint 1,177,111,7,0x0A82FF;
+					next;
+					break;
+				case 2:
+					callsub L_Mark,"^FF5400Kafra Shop Girls";
+					viewpoint 1,164,157,8,0xFFB400;
+					next;
+					break;
+				case 3:
+					callsub L_Mark,"^006400Repairman & Armsmith";
+					viewpoint 1,144,170,9,0xAAFF00;
+					next;
+					break;
+				case 4:
+					callsub L_Mark,"^7F3300Kafra Employees";
+					viewpoint 1,181,104,10,0xD2691E;
+					viewpoint 1,175,226,11,0xD2691E;
+					next;
+					break;
+				case 5:
+					callsub L_Mark,"^800080Trap Specialist";
+					viewpoint 1,123,109,12,0xDA70D6;
+					next;
+					break;
+				case 6:
+					mes "[Payon Guide]";
+					mes "^B9062FSeiyablem^000000";
+					mes "is a technician";
+					mes "who can create ^0000FFslots^000000 on weapons and armors,";
+					mes "but not all equipment";
+					mes "can be slotted. Well, that's what he says.";
+					mes "Would you like to check any other locations?";
+					viewpoint 1,140,151,13,0xFF0000;
+					next;
+					break;
+				case 7:
+					mes "[Payon Guide]";
+					mes "^0000FFLeablem^000000";
+					mes "is a technician";
+					mes "who can create ^0000FFslots^000000 on weapons and armors,";
+					mes "but not all equipment";
+					mes "can be slotted. Well, that's what he says.";
+					mes "Would you like to check any other locations?";
+					viewpoint 1,236,199,14,0x0A82FF;
+					next;
+					break;
+				case 8:
+					mes "[Payon Guide]";
+					mes "^FF5400Jade^000000";
+					mes "can exchange different types of";
+					mes "^FF5400Gemstones^000000.";
+					mes "Would you like to check any other locations?";
+					viewpoint 1,173,238,15,0xFFB400;
+					next;
+					break;
+				case 9:
+					callsub L_Mark,"^006400Pet Groomer";
+					viewpoint 1,177,131,16,0xAAFF00;
+					next;
+					break;
+				case 10:
+					callsub L_Mark,"^7F3300Chef Assistant";
+					viewpoint 1,206,119,17,0xD2691E;
+					next;
+					break;
+				case 11:
+					set .@loop,0;
+					break;
+				}
+			}
+			break;
+		case 3:
+			mes "[Payon Guide]";
+			mes "Sure, I'll remove all marks from your mini-map.";
+			mes "Is there anything else I can do for you?";
+			viewpoint 2,1,1,0,0xFFFF00;
+			viewpoint 2,1,1,1,0x000000;
+			viewpoint 2,1,1,2,0xFF0000;
+			viewpoint 2,1,1,3,0xFFFF00;
+			viewpoint 2,1,1,4,0xFFFF00;
+			viewpoint 2,1,1,5,0xFFFF00;
+			viewpoint 2,1,1,6,0xFFFF00;
+			viewpoint 2,1,1,7,0xFFFF00;
+			viewpoint 2,1,1,8,0xFFFF00;
+			viewpoint 2,1,1,9,0xFFFF00;
+			viewpoint 2,1,1,10,0xFFFF00;
+			viewpoint 2,1,1,11,0xFFFF00;
+			viewpoint 2,1,1,12,0xFFFF00;
+			viewpoint 2,1,1,13,0xFFFF00;
+			viewpoint 2,1,1,14,0xFFFF00;
+			viewpoint 2,1,1,15,0xFFFF00;
+			viewpoint 2,1,1,16,0xFFFF00;
+			viewpoint 2,1,1,17,0xFFFF00;
+			next;
+			break;
+		case 4:
+			mes "[Payon Guide]";
+			mes "Enjoy your stay.";
+			close;
+			cutin "pay_soldier",255;
+			end;
+		}
+	}
+	end;
+L_Mark:
+	mes "[Payon Guide]";
+	mes "Let me mark the location of the";
+	mes getarg(0)+"^000000";
+	mes "on your mini-map.";
+	mes "Would you like to check any other locations?";
+	return;
+}
+
+payon,151,182,6	duplicate(GuidePayon)	Guide#02payon	708
+payon,221,85,6	duplicate(GuidePayon)	Guide#03payon	708
+payon,233,324,4	duplicate(GuidePayon)	Guide#04payon	708
+
+pay_arche,86,33,4	script	Guide#05payon	708,{
+	cutin "pay_soldier",2;
+	mes "[Payon Guide]";
+	mes "Welcome to ^8B4513Archer Village^000000,";
+	mes "a subsidiary village of Payon.";
+	mes "Do you need help navigating the village?";
+	next;
+	set .@str$,"Would you like to check any other locations?";
+	while (1) {
+		switch(select("[ Payon Dungeon ]:[ Archer Guild ]:[ Tool Shop ]:[ Kafra Employee ]:[ Mercenary Guildsman ]:[ Alchemist Guildsman ]:[ Eden Teleport Officer ]:Remove Marks from Mini-Map:Cancel")) {
+		case 1:
+			mes "[Payon Guide]";
+			mes "Let me mark the entrance of";
+			mes "the ^B9062FPayon Dungeon^000000";
+			mes "on your mini-map.";
+			mes .@str$;
+			viewpoint 1,38,131,0,0xFF0000;
+			next;
+			break;
+		case 2:
+			mes "[Payon Guide]";
+			mes "The ^0000FFArcher Guild^000000";
+			mes "is where you can change";
+			mes "your job to Archer.";
+			mes .@str$;
+			viewpoint 1,143,164,1,0x0A82FF;
+			next;
+			break;
+		case 3:
+			mes "[Payon Guide]";
+			mes "Let me mark the location of the";
+			mes "^FF5400Tool Shop^000000";
+			mes "on your mini-map.";
+			mes .@str$;
+			viewpoint 1,72,156,2,0xFFB400;
+			next;
+			break;
+		case 4:
+			mes "[Payon Guide]";
+			mes "Let me mark the location of the ^006400Kafra Employee^000000";
+			mes "on your mini-map.";
+			mes .@str$;
+			viewpoint 1,55,123,3,0xAAFF00;
+			next;
+			break;
+		case 5:
+			mes "[Payon Guide]";
+			mes "Let me mark the location of the";
+			mes "^7F3300Bow Mercenary Manager^000000 and";
+			mes "^7F3300Mercenary Goods Merchant^000000";
+			mes "on your mini-map.";
+			mes .@str$;
+			viewpoint 1,101,166,4,0xD2691E;
+			next;
+			break;
+		case 6:
+			mes "[Payon Guide]";
+			mes "Let me mark the location of the";
+			mes "^800080Alchemist Guildsman^000000";
+			mes "on your mini-map.";
+			mes .@str$;
+			viewpoint 1,127,113,5,0xDA70D6;
+			next;
+			break;
+		case 7:
+			mes "[Payon Guide]";
+			mes "The ^0000FFEden Teleport Officer^000000";
+			mes "is currently staying inside";
+			mes "the Archer Guild building.";
+			mes .@str$;
+			viewpoint 1,143,164,6,0x0A82FF;
+			next;
+			break;
+		case 8:
+			mes "[Payon Guide]";
+			mes "Sure, I'll remove all marks from your mini-map.";
+			mes .@str$;
+			viewpoint 2,1,1,0,0xFFFF00;
+			viewpoint 2,1,1,1,0x000000;
+			viewpoint 2,1,1,2,0xFF0000;
+			viewpoint 2,1,1,3,0xFFFF00;
+			viewpoint 2,1,1,4,0xFFFF00;
+			viewpoint 2,1,1,5,0xFFFF00;
+			viewpoint 2,1,1,6,0xFFFF00;
+			next;
+			break;
+		case 9:
+			mes "[Payon Guide]";
+			mes "Enjoy your stay.";
+			close2;
+			cutin "pay_soldier",255;
+			end;
+		}
+	}
+}