change *strcharinfo to use constants

8 files changed, 40 insertions, 40 deletions

diff --git a/npc/other/arena/arena_aco.txt b/npc/other/arena/arena_aco.txt
index a700ee1bb..0c46eea21 100644
--- a/npc/other/arena/arena_aco.txt
+++ b/npc/other/arena/arena_aco.txt
@@ -1135,7 +1135,7 @@ prt_are_in,25,31,3	script	Staff#aco-2	1_F_02,{
 		mes "this, especially if you";
 		mes "broke some record, but";
 		mes "all I can do is restore your";
-		mes "HP and SP for you, "+strcharinfo(0)+".";
+		mes "HP and SP for you, "+strcharinfo(PC_NAME)+".";
 		percentheal 100,100;
 		next;
 		mes "[Staff]";
@@ -1184,7 +1184,7 @@ prt_are_in,25,31,3	script	Staff#aco-2	1_F_02,{
 		.@topchoaco = .@acotop_t % 60;
 		.@gapaco = .@acotop_t - .@record_timeaco;
 		mes "[Staff]";
-		mes "^3131FF"+strcharinfo(0)+"^000000, right?";
+		mes "^3131FF"+strcharinfo(PC_NAME)+"^000000, right?";
 		mes "Hey, you did great! You";
 		mes "completed this Arena Battle";
 		mes "in "+.@record_minaco+" min and "+.@record_secaco+" seconds!";
@@ -1216,25 +1216,25 @@ prt_are_in,25,31,3	script	Staff#aco-2	1_F_02,{
 			mes "Arena - Acolyte Class Record!";
 			if (BaseJob == Job_Acolyte) {
 				$arn_acotop = .@record_timeaco;
-				$arn_acotopn$ = strcharinfo(0);
+				$arn_acotopn$ = strcharinfo(PC_NAME);
 				donpcevent "Vendigos::OnLineRec_aco";
 			}
 			else {
 				if (BaseLevel < 70) {
 					$arn_pritop60 = .@record_timeaco;
-					$arn_pritopn60$ = strcharinfo(0);
+					$arn_pritopn60$ = strcharinfo(PC_NAME);
 				}
 				else if (BaseLevel < 80) {
 					$arn_pritop70 = .@record_timeaco;
-					$arn_pritopn70$ = strcharinfo(0);
+					$arn_pritopn70$ = strcharinfo(PC_NAME);
 				}
 				else if (BaseLevel < 90) {
 					$arn_pritop80 = .@record_timeaco;
-					$arn_pritopn80$ = strcharinfo(0);
+					$arn_pritopn80$ = strcharinfo(PC_NAME);
 				}
 				else {
 					$arn_pritop90 = .@record_timeaco;
-					$arn_pritopn90$ = strcharinfo(0);
+					$arn_pritopn90$ = strcharinfo(PC_NAME);
 				}
 				donpcevent "Vendigos::OnLineRec_pri";
 			}
@@ -1368,35 +1368,35 @@ prt_are_in,25,31,3	script	Staff#aco-2	1_F_02,{
 			next;
 			mes "[Staff]";
 			mes "Oooh... A brand new";
-			mes "record. ^3131FF"+ strcharinfo(0)+"^000000, your";
+			mes "record. ^3131FF"+ strcharinfo(PC_NAME)+"^000000, your";
 			mes "name will now be listed in";
 			mes "the Time Force Battle Arena";
 			mes "Acolyte Class Records.";
 			mes "Congratulations~";
 			if (BaseJob == Job_Acolyte) {
 				$arn_acotop = .@record_timeaco;
-				$arn_acotopn$ = strcharinfo(0);
+				$arn_acotopn$ = strcharinfo(PC_NAME);
 				donpcevent "#Vendigos::OnLineRec_aco";
 			}
 			else {
 				if (BaseLevel < 70) {
 					$arn_pritop60 = .@record_timeaco;
-					$arn_pritopn60$ = strcharinfo(0);
+					$arn_pritopn60$ = strcharinfo(PC_NAME);
 					donpcevent "#Vendigos::OnLineRec_pri60";
 				}
 				else if (BaseLevel < 80) {
 					$arn_pritop70 = .@record_timeaco;
-					$arn_pritopn70$ = strcharinfo(0);
+					$arn_pritopn70$ = strcharinfo(PC_NAME);
 					donpcevent "#Vendigos::OnLineRec_pri70";
 				}
 				else if (BaseLevel < 90) {
 					$arn_pritop80 = .@record_timeaco;
-					$arn_pritopn80$ = strcharinfo(0);
+					$arn_pritopn80$ = strcharinfo(PC_NAME);
 					donpcevent "#Vendigos::OnLineRec_pri80";
 				}
 				else {
 					$arn_pritop90 = .@record_timeaco;
-					$arn_pritopn90$ = strcharinfo(0);
+					$arn_pritopn90$ = strcharinfo(PC_NAME);
 					donpcevent "#Vendigos::OnLineRec_pri90";
 				}
 			}
diff --git a/npc/other/arena/arena_lvl50.txt b/npc/other/arena/arena_lvl50.txt
index 482e3fd58..fbd2ba193 100644
--- a/npc/other/arena/arena_lvl50.txt
+++ b/npc/other/arena/arena_lvl50.txt
@@ -844,8 +844,8 @@ prt_are_in,25,188,3	script	Staff#50-2	1_F_02,{
 	@gap50 = (60 * $top_50min + $top_50sec) - (60 * @record_min50 + @record_sec50);
 	mes "[Staff]";
 	mes "Wow, you did a good job~ ";
-	mes "Your name is...^3131FF" + strcharinfo(0) +"^000000, isn't it?";
-	mes "^3131FF"+ strcharinfo(0) +"^000000, total time you spent to pass the battle..";
+	mes "Your name is...^3131FF" + strcharinfo(PC_NAME) +"^000000, isn't it?";
+	mes "^3131FF"+ strcharinfo(PC_NAME) +"^000000, total time you spent to pass the battle..";
 	next;
 	mes "[Staff]";
 	mes "is "+@record_min50+"minutes "+@record_sec50+"seconds.";
@@ -898,10 +898,10 @@ prt_are_in,25,188,3	script	Staff#50-2	1_F_02,{
 		mes "What a great job!";
 		next;
 		mes "[Staff]";
-		mes "You have been recorded as the fastest player among people who cleared ^FF0000Arena Time Force Battle lvl 50s^000000, ^3131FF"+strcharinfo(0)+"^000000.";
+		mes "You have been recorded as the fastest player among people who cleared ^FF0000Arena Time Force Battle lvl 50s^000000, ^3131FF"+strcharinfo(PC_NAME)+"^000000.";
 		$top_50min = @record_min50;
 		$top_50sec = @record_sec50;
-		$arena_50topn$ = strcharinfo(0);
+		$arena_50topn$ = strcharinfo(PC_NAME);
 		donpcevent "Vendigos::OnLineRec_50";
 		next;
 		if (arena_point > 29950) {
diff --git a/npc/other/arena/arena_lvl60.txt b/npc/other/arena/arena_lvl60.txt
index 41c444388..b81831345 100644
--- a/npc/other/arena/arena_lvl60.txt
+++ b/npc/other/arena/arena_lvl60.txt
@@ -854,8 +854,8 @@ prt_are_in,25,135,3	script	Staff#60-2	1_F_02,{
 	@gap60 = (60 * $top_60min + $top_60sec) - (60 * @record_min60 + @record_sec60);
 	mes "[Staff]";
 	mes "Wow, you did a good job~ ";
-	mes "Your name is...^3131FF" + strcharinfo(0) +"^000000, isn't it?";
-	mes "^3131FF"+ strcharinfo(0) +"^000000, total time you spent to pass the battle..";
+	mes "Your name is...^3131FF" + strcharinfo(PC_NAME) +"^000000, isn't it?";
+	mes "^3131FF"+ strcharinfo(PC_NAME) +"^000000, total time you spent to pass the battle..";
 	next;
 	mes "[Staff]";
 	mes "is "+@record_min60+"minutes "+@record_sec60+"seconds.";
@@ -908,10 +908,10 @@ prt_are_in,25,135,3	script	Staff#60-2	1_F_02,{
 		mes "What a great job!";
 		next;
 		mes "[Staff]";
-		mes "You have been recorded as the fastest player among people who cleared ^FF0000Arena Time Force Battle lvl 60s^000000, ^3131FF"+strcharinfo(0)+"^000000.";
+		mes "You have been recorded as the fastest player among people who cleared ^FF0000Arena Time Force Battle lvl 60s^000000, ^3131FF"+strcharinfo(PC_NAME)+"^000000.";
 		$top_60min = @record_min60;
 		$top_60sec = @record_sec60;
-		$arena_60topn$ = strcharinfo(0);
+		$arena_60topn$ = strcharinfo(PC_NAME);
 		donpcevent "Vendigos::OnLineRec_60";
 		next;
 		if (arena_point > 29950) {
diff --git a/npc/other/arena/arena_lvl70.txt b/npc/other/arena/arena_lvl70.txt
index 90bc1aa69..c862585aa 100644
--- a/npc/other/arena/arena_lvl70.txt
+++ b/npc/other/arena/arena_lvl70.txt
@@ -819,8 +819,8 @@ prt_are_in,25,84,3	script	Staff#70-2	1_F_02,{
 	@gap70 = (60 * $top_70min + $top_70sec) - (60 * @record_min70 + @record_sec70);
 	mes "[Staff]";
 	mes "Wow, you did a good job~ ";
-	mes "Your name is...^3131FF" + strcharinfo(0) +"^000000, isn't it?";
-	mes "^3131FF"+ strcharinfo(0) +"^000000, total time you spent to pass the battle..";
+	mes "Your name is...^3131FF" + strcharinfo(PC_NAME) +"^000000, isn't it?";
+	mes "^3131FF"+ strcharinfo(PC_NAME) +"^000000, total time you spent to pass the battle..";
 	next;
 	mes "[Staff]";
 	mes "is "+@record_min70+"minutes "+@record_sec70+"seconds.";
@@ -873,10 +873,10 @@ prt_are_in,25,84,3	script	Staff#70-2	1_F_02,{
 		mes "What a great job!";
 		next;
 		mes "[Staff]";
-		mes "You have been recorded as the fastest player among people who cleared ^FF0000Arena Time Force Battle lvl 70s^000000, ^3131FF"+strcharinfo(0)+"^000000.";
+		mes "You have been recorded as the fastest player among people who cleared ^FF0000Arena Time Force Battle lvl 70s^000000, ^3131FF"+strcharinfo(PC_NAME)+"^000000.";
 		$top_70min = @record_min70;
 		$top_70sec = @record_sec70;
-		$arena_70topn$ = strcharinfo(0);
+		$arena_70topn$ = strcharinfo(PC_NAME);
 		donpcevent "Vendigos::OnLineRec_70";
 		next;
 		if (arena_point > 29970) {
diff --git a/npc/other/arena/arena_lvl80.txt b/npc/other/arena/arena_lvl80.txt
index 7bab16f4a..044b1eb31 100644
--- a/npc/other/arena/arena_lvl80.txt
+++ b/npc/other/arena/arena_lvl80.txt
@@ -800,8 +800,8 @@ prt_are_in,77,187,3	script	Staff#80-2	1_F_02,{
 	@gap80 = (60 * $top_80min + $top_80sec) - (60 * @record_min80 + @record_sec80);
 	mes "[Staff]";
 	mes "Wow, you did a good job~ ";
-	mes "Your name is...^3131FF" + strcharinfo(0) +"^000000, isn't it?";
-	mes "^3131FF"+ strcharinfo(0) +"^000000, total time you spent to pass the battle..";
+	mes "Your name is...^3131FF" + strcharinfo(PC_NAME) +"^000000, isn't it?";
+	mes "^3131FF"+ strcharinfo(PC_NAME) +"^000000, total time you spent to pass the battle..";
 	next;
 	mes "[Staff]";
 	mes "is "+@record_min80+"minutes "+@record_sec80+"seconds.";
@@ -854,10 +854,10 @@ prt_are_in,77,187,3	script	Staff#80-2	1_F_02,{
 		mes "What a great job!";
 		next;
 		mes "[Staff]";
-		mes "You have been recorded as the fastest player among people who cleared ^FF0000Arena Time Force Battle lvl 80s^000000, ^3131FF"+strcharinfo(0)+"^000000.";
+		mes "You have been recorded as the fastest player among people who cleared ^FF0000Arena Time Force Battle lvl 80s^000000, ^3131FF"+strcharinfo(PC_NAME)+"^000000.";
 		$top_80min = @record_min80;
 		$top_80sec = @record_sec80;
-		$arena_80topn$ = strcharinfo(0);
+		$arena_80topn$ = strcharinfo(PC_NAME);
 		donpcevent "Vendigos::OnLineRec_80";
 		next;
 		if (arena_point > 29980) {
diff --git a/npc/other/arena/arena_party.txt b/npc/other/arena/arena_party.txt
index b3fb751e6..ad341e8a9 100644
--- a/npc/other/arena/arena_party.txt
+++ b/npc/other/arena/arena_party.txt
@@ -1012,8 +1012,8 @@ prt_are_in,77,135,3	script	Staff#party-2	1_F_02,{
 	@gappt = (60 * $top_ptmin + $top_ptsec) - (60 * @record_minpt + @record_secpt);
 	mes "[Staff]";
 	mes "Wow, you did a good job~ ";
-	mes "Your name is...^3131FF" + strcharinfo(0) +"^000000, isn't it?";
-	mes "^3131FF"+ strcharinfo(0) +"^000000, total time you spent to pass the battle..";
+	mes "Your name is...^3131FF" + strcharinfo(PC_NAME) +"^000000, isn't it?";
+	mes "^3131FF"+ strcharinfo(PC_NAME) +"^000000, total time you spent to pass the battle..";
 	next;
 	mes "[Staff]";
 	mes "is "+@record_minpt+"minutes "+@record_secpt+"seconds.";
diff --git a/npc/other/arena/arena_point.txt b/npc/other/arena/arena_point.txt
index 40af36d46..5292ebab3 100644
--- a/npc/other/arena/arena_point.txt
+++ b/npc/other/arena/arena_point.txt
@@ -43,14 +43,14 @@ prt_are_in,103,11,3	script	Arena Point Manager	4_M_JOB_HUNTER,{
 	switch(select("Point Check", "Convert Points", "^660000Conversion Info^000000")) {
 	case 1:
 		mes "[Arena Point Manager]";
-		mes "" + strcharinfo(0) + ",";
+		mes "" + strcharinfo(PC_NAME) + ",";
 		mes "you currently have";
 		mes "" + arena_point + " Arena Points";
 		mes "and " + tt_point + " Turbo Track Points.";
 		close;
 	case 2:
 		mes "[Arena Point Manager]";
-		mes "" + strcharinfo(0) + ",";
+		mes "" + strcharinfo(PC_NAME) + ",";
 		mes "you currently have";
 		mes "" + arena_point + " Arena Points";
 		mes "and " + tt_point + " Turbo Track Points.";
@@ -136,7 +136,7 @@ prt_are_in,103,11,3	script	Arena Point Manager	4_M_JOB_HUNTER,{
 					arena_point += .@want_point;
 					next;
 					mes "[Arena Point Manager]";
-					mes "" + strcharinfo(0) + ",";
+					mes "" + strcharinfo(PC_NAME) + ",";
 					mes "you now have";
 					mes "^4682B4" + arena_point + "^000000 Arena Points";
 					mes "and ^00688B" + tt_point + "^000000 Turbo Track Points.";
@@ -176,14 +176,14 @@ S_ExchangePoints:
 	}
 	if (tt_point >= getarg(1)) {
 		mes "[Arena Point Manager]";
-		mes "" + strcharinfo(0) + ",";
+		mes "" + strcharinfo(PC_NAME) + ",";
 		mes "you've converted "+getarg(1)+" Track";
 		mes "Points into "+getarg(2)+" Arena Point.";
 		tt_point -= getarg(1);
 		arena_point += getarg(2);
 		next;
 		mes "[Arena Point Manager]";
-		mes "" + strcharinfo(0) + ",";
+		mes "" + strcharinfo(PC_NAME) + ",";
 		mes "you now have";
 		mes "^4682B4" + arena_point + "^000000 Arena Points";
 		mes "and ^00688B" + tt_point + "^000000 Turbo Track Points.";
diff --git a/npc/other/arena/arena_room.txt b/npc/other/arena/arena_room.txt
index 83a8b4de9..b8806e112 100644
--- a/npc/other/arena/arena_room.txt
+++ b/npc/other/arena/arena_room.txt
@@ -73,10 +73,10 @@ arena_room,94,93,5	script	Vendigos	4W_M_01,{
 			break;
 		case 3:
 			mes "[Vendigos]";
-			mes "Let me check "+strcharinfo(0)+"'s current arena points.";
+			mes "Let me check "+strcharinfo(PC_NAME)+"'s current arena points.";
 			next;
 			mes "[Vendigos]";
-			mes ""+strcharinfo(0)+" has total ^3131FF"+arena_point+"^000000 points.";
+			mes ""+strcharinfo(PC_NAME)+" has total ^3131FF"+arena_point+"^000000 points.";
 			next;
 			mes "[Vendigos]";
 			mes "If you wish to know how to use arena points, please refer to the 2nd menu ^3131FF'About Arena Points'^000000.";
@@ -728,10 +728,10 @@ prt_are_in,98,14,3	script	Givu#arena	4_F_JOB_KNIGHT,{
 		}
 	case 4:
 		mes "[Givu]";
-		mes "Let me check "+strcharinfo(0)+"'s current arena points.";
+		mes "Let me check "+strcharinfo(PC_NAME)+"'s current arena points.";
 		next;
 		mes "[Givu]";
-		mes ""+strcharinfo(0)+" has total ^3131FF"+arena_point+"^000000 points.";
+		mes ""+strcharinfo(PC_NAME)+" has total ^3131FF"+arena_point+"^000000 points.";
 		close;
 	}
 }