From 873bd917842c3977ab3b1dcf33ada3df66de29e2 Mon Sep 17 00:00:00 2001
From: Playtester <Playtester@54d463be-8e91-2dee-dedb-b68131a5f0ec>
Date: Wed, 1 Apr 2009 15:48:47 +0000
Subject: * Optimized the renters.txt thanks to various people * Fixed an
 Aldebaran castle flag thanks to BrianL

git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@13650 54d463be-8e91-2dee-dedb-b68131a5f0ec
---
 npc/Changelog.txt         |  3 ++
 npc/guild/aldeg_cas01.txt |  2 +-
 npc/merchants/renters.txt | 79 ++++++++++++++++++++++++++---------------------
 3 files changed, 48 insertions(+), 36 deletions(-)

(limited to 'npc')

diff --git a/npc/Changelog.txt b/npc/Changelog.txt
index 18b6ca995..ea1858f87 100644
--- a/npc/Changelog.txt
+++ b/npc/Changelog.txt
@@ -1,5 +1,8 @@
 Date		Added
 ======
+2009/04/01
+	* Optimized the renters.txt thanks to various people [Playtester]
+	* Fixed an Aldebaran castle flag thanks to BrianL [Playtester]
 2009/03/31
 	* Fixed viewpoint coordinates of the Aldebaran Guides thanks to rvitoi and Saithis [Playtester]
 2009/03/29
diff --git a/npc/guild/aldeg_cas01.txt b/npc/guild/aldeg_cas01.txt
index 7cfbafb9e..2e389c749 100644
--- a/npc/guild/aldeg_cas01.txt
+++ b/npc/guild/aldeg_cas01.txt
@@ -15,7 +15,7 @@
 
 // Guild Flag (Town)
 //============================================================
-aldebaran,152,97,4	script	Neuschwanstein#a1-1	722,{
+aldebaran,152,97,4	script	Neuschwanstein#a1-1::Neuschwanstein	722,{
 	end;
 
 OnRecvCastleA01:
diff --git a/npc/merchants/renters.txt b/npc/merchants/renters.txt
index 7e20df5fb..e67bef27f 100644
--- a/npc/merchants/renters.txt
+++ b/npc/merchants/renters.txt
@@ -35,7 +35,8 @@ prontera,55,350,5	script	Peco Peco Breeder#knt	105,{
 		mes "a Peco Peco? The rental";
 		mes "fee is "+.@price+" zeny.";
 		next;
-		if (select("Rent Peco Peco:Cancel") == 1) {
+		switch(select("Rent Peco Peco:Cancel")) {
+		case 1:
 			if (zeny < .@price) {
 				mes "[Peco Peco Breeder]";
 				mes "You do not";
@@ -61,19 +62,21 @@ prontera,55,350,5	script	Peco Peco Breeder#knt	105,{
 			}
 			set zeny,zeny-.@price;
 			setriding;
+			close;
+		case 2:
+			mes "[Peco Peco Breeder]";
+			mes "I see.";
+			mes "Well then,";
+			mes "have a good day.";
+			close;
 		}
-
-		mes "[Peco Peco Breeder]";
-		mes "I see.";
-		mes "Well then,";
-		mes "have a good day.";
+	} else {
+		mes "I'm sorry, but these";
+		mes "Peco Pecos are only";
+		mes "available for Knights";
+		mes "and Lord Knights.";
 		close;
 	}
-	mes "I'm sorry, but these";
-	mes "Peco Pecos are only";
-	mes "available for Knights";
-	mes "and Lord Knights.";
-	close;
 }
 
 // Grand PecoPeco Breeder (for Crusaders)-------------------------------------------
@@ -84,15 +87,15 @@ prontera,232,318,3	script	Peco Peco Breeder#cru	105,{
 
 	mes "[PecoPeco Breeder]";
 	if (BaseJob == Job_Crusader) {
-		if (Class == Job_Crusader && Upper == 0 || Upper == 1) mes "Welcome, Crusader.";
-		else 
-mes "Welcome, Paladin.";
+		if(Upper != 1 ) mes "Welcome, Crusader.";
+		else mes "Welcome, Paladin.";
 		mes "We have a special";
 		mes "Peco Peco prepared";
 		mes "for you. To rent one";
 		mes "will cost "+.@price+" zeny.";
 		next;
-		if (select("Rent a PecoPeco:Quit") ==1) {
+		switch(select("Rent a PecoPeco:Quit")) {
+		case 1:
 			if (zeny < .@price) {
 				mes "[Peco Peco Breeder]";
 				mes "You do not";
@@ -118,17 +121,20 @@ mes "Welcome, Paladin.";
 			}
 			set zeny,zeny-.@price;
 			setriding;
+			close;
+		case 2:
+			mes "[PecoPeco Breeder]";
+			mes "See you around.";
+			close;
 		}
-		mes "[PecoPeco Breeder]";
-		mes "See you around.";
+	} else {
+		mes "What can I do for you?";
+		mes "Please be aware that";
+		mes "this Peco Peco rental";
+		mes "service is strictly for";
+		mes "Crusaders and Paladins.";
 		close;
 	}
-	mes "What can I do for you?";
-	mes "Please be aware that";
-	mes "this Peco Peco rental";
-	mes "service is strictly for";
-	mes "Crusaders and Paladins.";
-	close;
 }
 
 // Falcon Master--------------------------------------------------------------
@@ -144,7 +150,8 @@ hu_in01,381,304,5	script	Falcon Breeder#hnt	105,{
 		mes "trusty bird of prey for a";
 		mes "fee of just "+.@price+" zeny~";
 		next;
-		if (select("Rent Falcon:Cancel") == 1) {
+		switch(select("Rent Falcon:Cancel")) {
+		case 1:
 			if (zeny < .@price) {
 				mes "[Falcon Breeder]";
 				mes "What is this?";
@@ -176,18 +183,20 @@ hu_in01,381,304,5	script	Falcon Breeder#hnt	105,{
 			set zeny,zeny-.@price;
 			setfalcon;
 			close;
+		case 2:
+			mes "[Falcon Breeder]";
+			mes "W-wait, where're";
+			mes "you goin'? These";
+			mes "Falcons are top notch,";
+			mes "I guarantee it! C'mon, yo~";
+			close;
 		}
-		mes "[Falcon Breeder]";
-		mes "W-wait, where're";
-		mes "you goin'? These";
-		mes "Falcons are top notch,";
-		mes "I guarantee it! C'mon, yo~";
+	} else {
+		mes "Young fool!";
+		mes "Falcons can only";
+		mes "be used by Hunters";
+		mes "and Snipers, capish?";
+		mes "...Heh heh, jealous?";
 		close;
 	}
-	mes "Young fool!";
-	mes "Falcons can only";
-	mes "be used by Hunters";
-	mes "and Snipers, capish?";
-	mes "...Heh heh, jealous?";
-	close;
 }
-- 
cgit v1.2.3-60-g2f50