Update to last rAthena npc.

Fix some typos
change sc_bleeding to -> sc_blooding
Updated RE EXP for quests_brasilis.txt

1 files changed, 58 insertions, 51 deletions

diff --git a/npc/quests/quests_veins.txt b/npc/quests/quests_veins.txt
index 0fad3c34e..bfd7f7d51 100644
--- a/npc/quests/quests_veins.txt
+++ b/npc/quests/quests_veins.txt
@@ -1,10 +1,10 @@
 //===== Hercules Script ======================================
 //= Veins Quests
-//===== By: ================================================== 
+//===== By: ==================================================
 //= L0ne_W0lf
-//===== Current Version: ===================================== 
-//= 2.2
-//===== Description: ========================================= 
+//===== Current Version: =====================================
+//= 2.5
+//===== Description: =========================================
 //= [Official Conversion]
 //= Collection of Veins Quests 
 //= Stone Quest:
@@ -23,12 +23,12 @@
 //= - Missing addition to High Priest Zhed to start quest.
 //= - Infiltrate Thor Volcano Base. What is Arunafeltz up to?
 //= - Variable in use: rachel_camel (max 27)
-//===== Additional Comments: ================================= 
+//===== Additional Comments: =================================
 //= 1.0 First version, Added Veins Stone quest. [L0ne_W0lf]
 //= 1.1 Added Veins Spy Quest. [L0ne_W0lf]
 //= 1.2 Added Veins Siblings Quest. [L0ne_W0lf]
-//=	Added Veins Thor Volcano Base Quest NPC. [L0ne_W0lf]
-//=	Start NPC is missing, but will be added when I get it.
+//=     Added Veins Thor Volcano Base Quest NPC. [L0ne_W0lf]
+//=     Start NPC is missing, but will be added when I get it.
 //= 1.3 Fixed two typos small in Asbar. [L0ne_W0lf]
 //= 1.3a More fixes to some of the Base quest NPCs. [L0ne_W0lf]
 //= 1.4 Added missing checkweights. [L0ne_W0lf]
@@ -43,11 +43,14 @@
 //=     - Thor Volcano Base Quest
 //= 2.0 Removed level requirement. (bugreport:4678) [L0ne_W0lf]
 //= 2.1 Added missing changequest (3071-3076). [Joseph]
-//= 2.2 Added renewal checks for exp distribution [Streusel]
-//============================================================ 
-
-// Stone Quest
-//============================================================ 
+//= 2.2 Moved "Wincing Old Man" to pre-re/re coordinates. [Euphy]
+//= 2.3 Fixed incorrect use of 'close'. [Joseph]
+//= 2.4 Updated RE/Pre-RE EXP. [Euphy]
+//= 2.5 Added GM management NPC. [Euphy]
+//============================================================
+
+// Stone Quest :: veins_stone
+//============================================================
 -	script	::WincingOldMan_veins	-1,{
 	if ((MaxWeight - Weight) < 2000 || checkweight(1201,1) == 0) {
 		mes "- Wait a moment! -";
@@ -288,10 +291,7 @@
 		mes "find these useful. Anyway,";
 		mes "I hope you like these rocks...";
 		set veins_stone,8;
-		if(checkre(0))
-			getexp 30000,0;
-		else
-			getexp 300000,0;
+		getexp (checkre(3))?30000:300000,0;
 		getitem 985,3; //Elunium
 		close;
 	}
@@ -641,8 +641,8 @@ ve_in02,68,39,7	script	Factory Worker#ve2	943,{
 	close;
 }
 
-// Spy Quest
-//============================================================ 
+// Spy Quest :: veins_secret
+//============================================================
 prontera,202,122,0	script	Kid#sch	703,{
 	if (que_sch == 0) {
 		mes "[Rooney]";
@@ -722,7 +722,7 @@ prontera,202,122,0	script	Kid#sch	703,{
 		mes "[Rooney]";
 		mes "Hey, alright! Thanks";
 		mes "for the cash! Heh heh~";
-		set zeny,zeny-100;
+		set Zeny, Zeny-100;
 		set que_sch,3;
 		close;
 	}
@@ -818,7 +818,7 @@ prt_church,89,108,6	script	Bard#sch	741,{
 		mes "kid that was supposed";
 		mes "to come find me here.";
 		set que_sch,2;
-		set zeny,zeny+100;
+		set Zeny, Zeny+100;
 		next;
 		mes "[Lasda]";
 		mes "I'd like you to come";
@@ -975,10 +975,7 @@ prt_church,89,108,6	script	Bard#sch	741,{
 		mes "reward with our sincere thanks.";
 		set que_sch,26;
 		getitem 12106,1; //Accessory_Box
-		if(checkre(0))
-			getexp 60000,0;
-		else
-			getexp 600000,0;
+		getexp (checkre(3))?60000:600000,0;
 		close;
 	}
 	else {
@@ -1584,7 +1581,7 @@ job_duncer,93,106,6	script	Dance Instructor#sch	892,{
 			mes "your Megaphone. Thanks";
 			mes "for everything, and I'll see";
 			mes "you around, adventurer~";
-			set zeny,zeny-500000;
+			set Zeny, Zeny-500000;
 			set que_sch,18;
 			getitem 7040,1; //Megaphone
 			close;
@@ -1630,7 +1627,7 @@ job_duncer,93,106,6	script	Dance Instructor#sch	892,{
 				mes "so I'm not supposed to let";
 				mes "you have this. Don't let";
 				mes "anyone know I gave you this!";
-				set zeny,zeny-500000;
+				set Zeny, Zeny-500000;
 				getitem 7040,1; //Megaphone
 				close;
 			}
@@ -2651,8 +2648,22 @@ comodo,135,299,0	script	Young Man#sch2	809,{
 	}
 }
 
-// Siblings Quest
-//============================================================ 
+sec_in02,10,43,4	script	Extra Story Patch	809,{
+	callfunc "F_GM_NPC";
+	mes "[Patch]";
+	mes "Yeah, you can try.";
+	next;
+	if(select("Now:How many?") == 2) {
+		input .@input,0,1000;
+		set que_sch, .@input;
+	}
+	mes " ";
+	mes ""+que_sch;
+	close;
+}
+
+// Siblings Quest :: veins_camel
+//============================================================
 veins,327,185,3	script	Kid#camelcamel	944,{
 	if (MISC_QUEST & 8192) {
 		if (rachel_camel == 0) {
@@ -3047,8 +3058,8 @@ veins,327,185,3	script	Kid#camelcamel	944,{
 			completequest 3083;
 			set rachel_camel,25;
 			specialeffect2 EF_ABSORBSPIRITS;
-			if(checkre(0))
-				getexp 100000,70000;
+			if (checkre(3))
+				getexp 100000,50000;
 			else
 				getexp 1000000,700000;
 			close;
@@ -3134,6 +3145,7 @@ veins,327,185,3	script	Kid#camelcamel	944,{
 				mes "I'm happy that";
 				mes "I can help you too!";
 				set aru_monas,16;
+				changequest 17011,17012;
 				close;
 			}
 			else if (aru_monas < 26) {
@@ -4014,7 +4026,7 @@ veins,181,166,3	script	Lockenlock	900,{
 		mes "The army's rotten to the core";
 		mes "for doing something like this.";
 		next;
-		mes "	[Locksmith Lockenlock]";
+		mes "[Locksmith Lockenlock]";
 		mes "You're a real good person,";
 		mes "and I'm glad I got to know";
 		mes "you. I don't know if we'll";
@@ -5059,9 +5071,8 @@ veins,221,120,5	script	Young Town Native	943,{
 	}
 }
 
-// Thor Volcano Base Quest
-//============================================================ 
-
+// Thor Volcano Base Quest :: veins_camp
+//============================================================
 ra_temin,87,133,1	script	Rachel Guard#vol1	934,5,2,{
 	if (aru_vol == 2) {
 		mes "[Guard Karlum]";
@@ -5187,14 +5198,12 @@ ra_temin,87,133,1	script	Rachel Guard#vol1	934,5,2,{
 		disablenpc "Rachel Guard#vol1";
 		end;
 	}
-	else {
-		mes "[Guard Karlum]";
-		mes "High Priest Vildt isn't";
-		mes "here right now. Please";
-		mes "come back later if you";
-		mes "wish to see him.";
-		close;
-	}
+	mes "[Guard Karlum]";
+	mes "High Priest Vildt isn't";
+	mes "here right now. Please";
+	mes "come back later if you";
+	mes "wish to see him.";
+	close;
 
 OnInit:
 	enablenpc "Rachel Guard#vol1";
@@ -5202,7 +5211,7 @@ OnInit:
 
 OnTouch:
 	warp "ra_temin",85,137;
-	close;
+	end;
 }
 
 ra_temin,82,133,7	script	Rachel Guard#vol2	934,5,2,{
@@ -6091,10 +6100,7 @@ ve_in,281,214,3	script	Bookshelf#vol	111,{
 		else {
 			getitem 12103,1; //Bloody_Dead_Branch
 		}
-		if(checkre(0))
-			getexp 80000,0;
-		else
-			getexp 800000,0;
+		getexp (checkre(3))?100000:800000,0;
 		mes "^3355FFWell, you've done all";
 		mes "that you could here.";
 		mes "Now would be a good time";
@@ -6334,7 +6340,7 @@ thor_camp,250,104,3	script	Sahedi#vol	934,{
 		mes "like this in the past, but...";
 		mes "Is this... How bad is this?";
 		next;
-		emotion 19,1;
+		emotion e_swt2,1;
 		mes "["+strcharinfo(0)+"]";
 		mes "Oh... Oh, no!";
 		mes "Yikes! I guess if it's";
@@ -6425,7 +6431,7 @@ thor_camp,250,104,3	script	Sahedi#vol	934,{
 		mes "It'll be a disaster, just";
 		mes "like it happened in the past!";
 		next;
-		emotion 52,1;
+		emotion e_flash,1;
 		mes "["+strcharinfo(0)+"]";
 		mes "Yes, I agree. There's";
 		mes "a good chance of an...";
@@ -6437,7 +6443,7 @@ thor_camp,250,104,3	script	Sahedi#vol	934,{
 		mes "How much time do we";
 		mes "have to evacuate?";
 		next;
-		emotion 52,1;
+		emotion e_flash,1;
 		mes "["+strcharinfo(0)+"]";
 		mes "Well... Uh...";
 		mes "According to my data...";
@@ -7141,6 +7147,7 @@ thor_camp,156,57,3	duplicate(VeinsDummy)	Dummy#5	111
 thor_camp,162,57,3	duplicate(VeinsDummy)	Dummy#6	111
 
 thor_camp,248,104,5	script	Aitra#vol	939,{
+	end;
 OnInit:
 	disablenpc "Aitra#vol";
 	end;
@@ -7355,7 +7362,7 @@ ve_in,237,131,1	script	Female Customer#ve1	940,{
 	next;
 	mes "["+strcharinfo(0)+"]";
 	mes "Meee?";
-	emotion 19,1;
+	emotion e_swt2,1;
 	next;
 	mes "[Female Customer]";
 	mes "Mmm...";