change *strcharinfo to use constants

1 files changed, 69 insertions, 69 deletions

diff --git a/npc/re/quests/quests_dicastes.txt b/npc/re/quests/quests_dicastes.txt
index c615a16ef..0aa4ffa1a 100644
--- a/npc/re/quests/quests_dicastes.txt
+++ b/npc/re/quests/quests_dicastes.txt
@@ -435,7 +435,7 @@ dic_in01,254,119,0	script	Item Storage#01	CLEAR_NPC,{
 	mes "put in 500 Zeny?";
 	next;
 	if(select("Use safe", "No way.")==2) {
-		mes "["+strcharinfo(0)+"]";
+		mes "["+strcharinfo(PC_NAME)+"]";
 		mes "I will use it later.";
 		close;
 	}
@@ -557,7 +557,7 @@ dic_in01,48,263,5	script	Hunting Dept. 1 Manager	4_MAN_BENKUNI,{
 	que_dic(0,12103,4000,.@s$);
 	que_dic(0,12104,73000,.@s$);
 	que_dic(0,12105,59000,.@s$);
-	mes "Um....." + strcharinfo(0) + "";
+	mes "Um....." + strcharinfo(PC_NAME) + "";
 	mes "You will be in trouble if you lie about the request...";
 	close;
 }
@@ -626,7 +626,7 @@ dic_in01,51,266,6	script	Hunting Dept. 2 Manager	4_MAN_BENKUNI,{
 	que_dic(0,12109,53000,.@s$);
 	que_dic(0,12110,30000,.@s$);
 	que_dic(0,12111,42000,.@s$);
-	mes "Umm.." + strcharinfo(0) + "";
+	mes "Umm.." + strcharinfo(PC_NAME) + "";
 	mes "Please check your request history again. There is a discrepancy with our documents.";
 	close;
 }
@@ -754,7 +754,7 @@ dic_in01,48,273,1	script	Supply Dept. 2 Manager	4_MAN_BENKUNI,{
 	mes "Let me check your records first.";
 	next;
 	mes "[Supply Dept. 2 Manager]";
-	.@s$ = "" + strcharinfo(0) + ", you handle your requests quite well. You are not like the pub owner who just sends requests here every day.";
+	.@s$ = "" + strcharinfo(PC_NAME) + ", you handle your requests quite well. You are not like the pub owner who just sends requests here every day.";
 	que_dic(1,12127,65300,6023,5,.@s$);
 	que_dic(1,12128,65300,6020,21,.@s$);
 	que_dic(1,12129,82800,1042,27,.@s$);
@@ -1227,7 +1227,7 @@ dic_in01,138,225,3	script	Diel Guard#ep133_19	4_MAN_GALTUN1,{
 		if (select("I have permission.", "Go back.") == 1) {
 			mes "[Diel Guard]";
 			mes "Wait...";
-			mes strcharinfo(0) + "......ah... I see your name on the list.";
+			mes strcharinfo(PC_NAME) + "......ah... I see your name on the list.";
 			mes "I'm sorry.";
 			mes "Please go through.";
 			close2;
@@ -1243,7 +1243,7 @@ dic_in01,138,225,3	script	Diel Guard#ep133_19	4_MAN_GALTUN1,{
 	}
 	else if (ep13_3_secret > 13) {
 		mes "[Diel Guard]";
-		mes "Ah, you are " + strcharinfo(0) + "..";
+		mes "Ah, you are " + strcharinfo(PC_NAME) + "..";
 		mes "I received an order from Ahat to let you through anytime.";
 		mes "Please go up.";
 		close2;
@@ -1377,7 +1377,7 @@ dic_in01,294,276,5	script	Secret Adjutant#ep133_2	4_M_CATMAN2,{
 		next;
 		cutin (Sex == SEX_MALE?"ep13_ahat_f":"ep13_ahat_m"),2;
 		mes "[Ahat]";
-		mes "" + strcharinfo(0) + "....";
+		mes "" + strcharinfo(PC_NAME) + "....";
 		mes "All you need to do is follow Cheshire's orders.";
 		mes "Don't ask stupid questions. This is an order.";
 		mes "Cheshire. continue.";
@@ -1657,7 +1657,7 @@ dic_in01,300,280,5	script	Minister Ahat#ep133_21	4_HUMAN_GERUTOO,{
 			next;
 		}
 		else {
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "You!!!";
 			mes "I'm in love!";
 			mes "I will die for you!";
@@ -1898,7 +1898,7 @@ dic_in01,158,188,3	script	Jarute HesLanta#ep133_2	4_MAN_JERUTOO,{
 			mes "I will send you out";
 			next;
 			select("I was joking before.");
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "I want to know about Ahat too.";
 			mes "I want to talk about him with you.";
 			mes "But aren't you too defenseless while I'm talking like this?";
@@ -1950,7 +1950,7 @@ dic_in01,158,188,3	script	Jarute HesLanta#ep133_2	4_MAN_JERUTOO,{
 		mes "Oh no!";
 		next;
 		select("No!", "That's not it!");
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "I'm not under the spell!";
 		mes "I only pretend that I am. I'm also investigating Ahat!";
 		next;
@@ -1968,7 +1968,7 @@ dic_in01,158,188,3	script	Jarute HesLanta#ep133_2	4_MAN_JERUTOO,{
 		mes "So everything started from the crack.";
 		next;
 		select("He is human.");
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "El Dicastes only recently allowed humans to visit.";
 		mes "Why would a human take the place of a Sapha Jarute?";
 		next;
@@ -2096,7 +2096,7 @@ dic_in01,158,188,3	script	Jarute HesLanta#ep133_2	4_MAN_JERUTOO,{
 		mes "[HesLanta]";
 		mes "But why are you asking?";
 		next;
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "Nothing.";
 		mes "I was only curious personally.";
 		mes "What are you going to do now?";
@@ -2109,44 +2109,44 @@ dic_in01,158,188,3	script	Jarute HesLanta#ep133_2	4_MAN_JERUTOO,{
 		next;
 		while (1) {
 			if (.@yes == 5) {
-				mes "[" + strcharinfo(0) + "]";
+				mes "[" + strcharinfo(PC_NAME) + "]";
 				mes "To summarize.";
 				mes "The report robber is Cheshire.";
 				mes "Cheshire is Ahat's servant and they are related to the crack.";
 				mes "They are trying to hide something or someone at the crack";
 				mes "and the crack was created by the evil lord Morroc!";
 				next;
-				mes "[" + strcharinfo(0) + "]";
+				mes "[" + strcharinfo(PC_NAME) + "]";
 				mes "Ahat is the evil lord?";
 				mes "No...";
 				mes "This is unbelievable.";
 				next;
-				mes "[" + strcharinfo(0) + "]";
+				mes "[" + strcharinfo(PC_NAME) + "]";
 				mes "I must go back to the expedition camp to report to Doha!";
 				ep13_3_secret = 22;
 				setquest 7203;
 				close;
 			}
 			else if (.@yes == 0) {
-				mes "[" + strcharinfo(0) + "]";
+				mes "[" + strcharinfo(PC_NAME) + "]";
 				mes "First the report culprit was..";
 				next;
 				switch (select("Cheshire", "Ahat", "BK")) {
 					case 1:
-						mes "[" + strcharinfo(0) + "]";
+						mes "[" + strcharinfo(PC_NAME) + "]";
 						mes "It was Cheshire";
 						mes "Cheshire is a feline.";
 						mes "and the bandana was to hid his ears.";
 						++.@yes;
 						break;
 					case 2:
-						mes "[" + strcharinfo(0) + "]";
+						mes "[" + strcharinfo(PC_NAME) + "]";
 						mes "Ahat? It can't be him.";
 						mes "Ahat doesn't fit the witness information.";
 						mes "Let's rethink this.";
 						break;
 					case 3:
-						mes "[" + strcharinfo(0) + "]";
+						mes "[" + strcharinfo(PC_NAME) + "]";
 						mes "BK?";
 						mes "Nonsense";
 						mes "Let's rethink this.";
@@ -2155,16 +2155,16 @@ dic_in01,158,188,3	script	Jarute HesLanta#ep133_2	4_MAN_JERUTOO,{
 				next;
 			}
 			else if (.@yes == 1) {
-				mes "[" + strcharinfo(0) + "]";
+				mes "[" + strcharinfo(PC_NAME) + "]";
 				mes "Why would Cheshire try to steal the report?";
 				next;
 				if (select("No idea.", "To make the conflict between 3 countries worse") == 1) {
-					mes "[" + strcharinfo(0) + "]";
+					mes "[" + strcharinfo(PC_NAME) + "]";
 					mes "We don't know the actual reason at this point.";
 					mes "But what will Cheshire gain out of this?";
 				}
 				else {
-					mes "[" + strcharinfo(0) + "]";
+					mes "[" + strcharinfo(PC_NAME) + "]";
 					mes "To bring conflict between the three countries?";
 					mes "What will Cheshire gain out of this?";
 				}
@@ -2172,17 +2172,17 @@ dic_in01,158,188,3	script	Jarute HesLanta#ep133_2	4_MAN_JERUTOO,{
 				next;
 			}
 			else if (.@yes == 2) {
-				mes "[" + strcharinfo(0) + "]";
+				mes "[" + strcharinfo(PC_NAME) + "]";
 				mes "Cheshire's master is Ahat.";
 				mes "So all his actions are to..";
 				next;
 				if (select("Cheshire is plotting on his own.", "Ahat must be ordering him.") == 1) {
-					mes "[" + strcharinfo(0) + "]";
+					mes "[" + strcharinfo(PC_NAME) + "]";
 					mes "Cheshire arbitrary?";
 					mes "Are you sure?";
 				}
 				else {
-					mes "[" + strcharinfo(0) + "]";
+					mes "[" + strcharinfo(PC_NAME) + "]";
 					mes "Yes. Ahat must have order him.";
 					mes "But why would Ahat do that?";
 					mes "Conflict between three countries? Or the report content?";
@@ -2191,23 +2191,23 @@ dic_in01,158,188,3	script	Jarute HesLanta#ep133_2	4_MAN_JERUTOO,{
 				next;
 			}
 			else if (.@yes == 3) {
-				mes "[" + strcharinfo(0) + "]";
+				mes "[" + strcharinfo(PC_NAME) + "]";
 				mes "Let's think Ahat over.";
 				mes "Ahat came from the crack.";
 				mes "and has no records before that.";
 				next;
-				mes "[" + strcharinfo(0) + "]";
+				mes "[" + strcharinfo(PC_NAME) + "]";
 				mes "And tries to erase all traces found near the crack.";
 				mes "And Ahat wants to eliminate...";
 				next;
 				if (select("Ahat himself.", "Morroc because of the crack?") == 1) {
-					mes "[" + strcharinfo(0) + "]";
+					mes "[" + strcharinfo(PC_NAME) + "]";
 					mes "Yes, Ahat might be a trace of himself.";
 					mes "Saphas want to hide something that is why they hired me";
 					mes "that doesn't belong to any influence can be used as a puppet to do his dirty work.";
 				}
 				else {
-					mes "[" + strcharinfo(0) + "]";
+					mes "[" + strcharinfo(PC_NAME) + "]";
 					mes "A bit dramatic but we cannot rule out the evil lord Morroc.";
 					mes "Because the crack was created by the evil lord Morroc himself.";
 				}
@@ -2215,19 +2215,19 @@ dic_in01,158,188,3	script	Jarute HesLanta#ep133_2	4_MAN_JERUTOO,{
 				next;
 			}
 			else if (.@yes == 4) {
-				mes "[" + strcharinfo(0) + "]";
+				mes "[" + strcharinfo(PC_NAME) + "]";
 				mes "Ahat and the crack and then Morroc..";
 				mes "I can tell there is a relationship between them but I can't pinpoint it.";
 				mes "And in the expedition's report...";
 				next;
 				if (select("Content of conflict between three countries.. ", "Content about evil lord Morroc..") == 1) {
-					mes "[" + strcharinfo(0) + "]";
+					mes "[" + strcharinfo(PC_NAME) + "]";
 					mes "There was something about the conflict between three countries..";
 					mes "But.. I don't think it all adds up?";
 					mes "Let's think it over.";
 				}
 				else {
-					mes "[" + strcharinfo(0) + "]";
+					mes "[" + strcharinfo(PC_NAME) + "]";
 					mes "Yes. There is a report from the tracking team led by Echinacea.";
 					mes "It was about the evil lord Morroc.";
 					++.@yes;
@@ -2235,7 +2235,7 @@ dic_in01,158,188,3	script	Jarute HesLanta#ep133_2	4_MAN_JERUTOO,{
 				next;
 			}
 			else {
-				mes "[" + strcharinfo(0) + "]";
+				mes "[" + strcharinfo(PC_NAME) + "]";
 				mes "Oh no. I don't know.";
 				mes "Let's think it over.";
 				.@yes = 0;
@@ -3415,7 +3415,7 @@ mid_campin,168,170,3	script	Inspector Doha#ep133	1_M_ORIENT01,{
 			mes "Me?";
 			mes "Are you the person the captain was speaking of?";
 			mes "What was the name...";
-			mes strcharinfo(0) + "?";
+			mes strcharinfo(PC_NAME) + "?";
 			next;
 			mes "[Doha]";
 			mes "Hmm.. I don't know why you were chosen but I guess they trusted you enough.";
@@ -3849,7 +3849,7 @@ dic_in01,245,119,4	script	Shay#ep133_13	4_M_ACROSS,{
 					"7188","The Knits at the square are interested in Ahat.",
 					"7189","I heard from Pioms that most of the Saphas are interested in the minister.",
 					"7190","Galtens are interested in the Cat Merchant for their cat ears.";
-				mes "[" + strcharinfo(0) + "]";
+				mes "[" + strcharinfo(PC_NAME) + "]";
 				mes "I'm trying to organize the information I've collected.";
 				.@size = getarraysize(.@ward$);
 				for (.@i = 0; .@i < .@size; .@i += 2)
@@ -3860,7 +3860,7 @@ dic_in01,245,119,4	script	Shay#ep133_13	4_M_ACROSS,{
 				if (!.@sealall) mes "But what should I do with the collected information?";
 				next;
 				if (.@sealall < 3) {
-					mes "[" + strcharinfo(0) + "]";
+					mes "[" + strcharinfo(PC_NAME) + "]";
 					mes "Moan...";
 					mes "[Shay]";
 					mes "You look lost like as if nothing makes sense anymore.";
@@ -3871,7 +3871,7 @@ dic_in01,245,119,4	script	Shay#ep133_13	4_M_ACROSS,{
 					mes "There are the Cat Merchants outside of the castle, too.";
 					break;
 				}
-				mes "[" + strcharinfo(0) + "]";
+				mes "[" + strcharinfo(PC_NAME) + "]";
 				mes "Everybody";
 				mes "is talking about the minister these days!";
 				mes "What is with this Ahat anyway.";
@@ -3895,7 +3895,7 @@ dic_in01,245,119,4	script	Shay#ep133_13	4_M_ACROSS,{
 				mes "I garnished it with bananas.";
 				mes "Doesn't look like it but this is an apple pie.";
 				next;
-				mes "[" + strcharinfo(0) + "]";
+				mes "[" + strcharinfo(PC_NAME) + "]";
 				mes "But why is there a carrot in a pie.";
 				mes "And there is no hint of apples.";
 				next;
@@ -4590,7 +4590,7 @@ dic_fild01,231,174,5	script	BK#ep133_18	4_M_MERCAT2,{
 		next;
 		input .@inputstr$;
 		if (.@inputstr$ == "Shay's special drink will be delivered" || .@inputstr$ == "Shay's special drink will be delivered.") {
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Hmm. If you don't cooperate,";
 			mes "Shay's special drink will be delivered.";
 			mes "By Shay himself!";
@@ -4617,7 +4617,7 @@ dic_fild01,231,174,5	script	BK#ep133_18	4_M_MERCAT2,{
 			ep13_3_secret = 6;
 			close;
 		}
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "" + .@inputstr$ + ".....?";
 		mes "Hmm.. I think you are wrong?";
 		mes "What was it..";
@@ -4763,7 +4763,7 @@ dic_fild01,231,174,5	script	BK#ep133_18	4_M_MERCAT2,{
 			mes "- BK says this and takes the exploit certification out of your hand.";
 			mes "Shocking information that the Sapha minister Ahat is not a Sapha!-";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "...I must find out.";
 			mes ".. Near the crack he said...";
 			mes "Should I talk to Shay?";
@@ -4851,12 +4851,12 @@ dic_fild01,231,174,5	script	BK#ep133_18	4_M_MERCAT2,{
 		setquest 7194;
 		donpcevent strnpcinfo(NPC_NAME)+"::OnDisable";
 		next;
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "Hmm.. I may need to discuss these with Shay.";
 		close;
 	}
 	else if (ep13_3_secret == 11) {
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		if (.@npc$[.@type] == "Rock Pile") mes "This is where you picked up the strange magical stone.";
 		else if (.@npc$[.@type] == "Dirt Pile") mes "Collected Clotted Bloodstains from the dirt pile here.";
 		else if (.@npc$[.@type] == "Split Earth") mes "It is the place where the frozen skin was found.";
@@ -5010,7 +5010,7 @@ dicastes01,117,262,0	script	Frede#13_3	4_MAN_PIOM5,2,2,{
 			mes "[Frede]";
 			mes "Moan... moan...";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Are you alright?";
 			mes "You don't look well. Do you need help?";
 			next;
@@ -5040,7 +5040,7 @@ dicastes01,117,262,0	script	Frede#13_3	4_MAN_PIOM5,2,2,{
 			close;
 		}
 		mes "[Frede]";
-		mes "" + strcharinfo(0) + ", the guys said they wanted to meet up together sometime.";
+		mes "" + strcharinfo(PC_NAME) + ", the guys said they wanted to meet up together sometime.";
 		mes "Make sure you ckear your schedule.";
 		close;
 	}
@@ -5071,7 +5071,7 @@ dic_in01,165,104,0	script	Frede#13_3_in	4_MAN_PIOM,{
 			mes "I'm glad I got a shot of the ^f57d7dBradium^000000 before it was too late.";
 			percentheal -90,0;
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Huff...Huff...";
 			mes "I'm glad that you feel better.";
 			next;
@@ -5080,7 +5080,7 @@ dic_in01,165,104,0	script	Frede#13_3_in	4_MAN_PIOM,{
 			mes "You look a little pale too......";
 			emotion e_omg;
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "No, it's nothing.";
 			mes "I'm only a little tired, that's all.";
 			next;
@@ -5093,13 +5093,13 @@ dic_in01,165,104,0	script	Frede#13_3_in	4_MAN_PIOM,{
 			close;
 		}
 		else if (ep13_3_bra == 2) {
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "But the injury on your leg doesn't look new. Why did you come out with a wounded leg?";
 			next;
 			mes "[Frede]";
 			mes "I can still move around with this leg and I wanted to help the village.";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "But you should stay home and recover.";
 			next;
 			mes "[Frede]";
@@ -5322,12 +5322,12 @@ dic_in01,165,104,0	script	Frede#13_3_in	4_MAN_PIOM,{
 				}
 			if (!.@fail) {
 				mes "[Frede]";
-				mes "" + strcharinfo(0) + " I'm forever in your debt!";
+				mes "" + strcharinfo(PC_NAME) + " I'm forever in your debt!";
 				mes "I just came back after meeting my friends!";
 				mes "Tyler needs some medical treatment but everyone else is safe.";
 				next;
 				mes "[Frede]";
-				mes "I don't even want to imagine what could have happened if you, " + strcharinfo(0) + ", weren't here to help.";
+				mes "I don't even want to imagine what could have happened if you, " + strcharinfo(PC_NAME) + ", weren't here to help.";
 				mes "I don't want to lose any more friends.";
 				next;
 				mes "[Frede]";
@@ -5347,7 +5347,7 @@ dic_in01,165,104,0	script	Frede#13_3_in	4_MAN_PIOM,{
 			close;
 		}
 		mes "[Frede]";
-		mes "" + strcharinfo(0) + ", the guys said they wanted to meet up together sometime.";
+		mes "" + strcharinfo(PC_NAME) + ", the guys said they wanted to meet up together sometime.";
 		mes "Make sure you clear your schedule.";
 		close;
 	}
@@ -5422,7 +5422,7 @@ dic_dun01,205,43,5	script	Brian#ep13_3_	4_MAN_PIOM4,{
 			mes "What brings you here this time?";
 			next;
 			select("You give Bradium to Brian.");
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Frede asked me to give you this.";
 			next;
 			mes "[Brian]";
@@ -5553,7 +5553,7 @@ dic_dun01,153,107,4	script	Tyler#13_3	4_MAN_PIOM6,{
 			case 1:
 			break;
 			}
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Frede asked me to give you this.";
 			next;
 			mes "[Tyler]";
@@ -5663,7 +5663,7 @@ dic_dun01,235,243,0	script	John#13_3	4_MAN_PIOM,{
 			mes "......";
 			next;
 			select("You give Bradium to John.");
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Frede asked me to give you this.";
 			next;
 			mes "[John]";
@@ -5752,7 +5752,7 @@ dic_dun02,110,127,5	script	Rose#13_3	4_MAN_PIOM6,{
 			mes "If you really have feelings, race differences shouldn't be a problem.";
 			next;
 			select("You give Bradium to Rose.");
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "You give Bradium to Rose.";
 			next;
 			mes "[Rose]";
@@ -5842,7 +5842,7 @@ dic_dun01,64,107,7	script	Bain#13_3	4_MAN_PIOM4,{
 			mes "It doesn't come off. I'll have to go back to the village to get treatment.";
 			next;
 			select("Give Bradium.");
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Frede asked me to give you this.";
 			next;
 			mes "[Bain]";
@@ -5952,7 +5952,7 @@ dic_dun01,58,225,4	script	Lash#13_3	4_MAN_PIOM5,{
 			mes "Never knew I would feel this. Sob.";
 			next;
 			select("You give Bradium to Lash.");
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Frede asked me to give you this.";
 			next;
 			mes "[Lash]";
@@ -5997,7 +5997,7 @@ dic_in01,349,129,5	script	Bouy#13_3	4_MAN_BENKUNI,{
 			mes "I didn't know. Excuse me.";
 			mes "What did he ask you to do?";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "He asked me to deliver Bradium to his friends working in the cave outside the village.";
 			next;
 			mes "[Bouy]";
@@ -6014,7 +6014,7 @@ dic_in01,349,129,5	script	Bouy#13_3	4_MAN_BENKUNI,{
 			mes "[Bouy]";
 			mes "Worst case, they wouldn't come back to the village at all.";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Is there another way?";
 			next;
 			mes "[Bouy]";
@@ -6260,7 +6260,7 @@ mid_campin,111,120,3	script	Soldier#ep133_is04	4_M_EIN_SOLDIER,{
 			mes "You do?";
 			mes "What is your name.";
 			mes "Thank you.";
-			mes "So you are " + strcharinfo(0) + ".";
+			mes "So you are " + strcharinfo(PC_NAME) + ".";
 			next;
 			mes "[Soldier]";
 			mes "You may go in now.";
@@ -6340,7 +6340,7 @@ function	script	eldicastes_c	{
 			mes "Yes.";
 			mes "That is what he meant.";
 			mes "Agiff also approved before he left.";
-			mes "" + strcharinfo(0) + ", you are invited.";
+			mes "" + strcharinfo(PC_NAME) + ", you are invited.";
 			next;
 			mes "[Vyhannus]";
 			mes "You are kind and respect others";
@@ -6352,7 +6352,7 @@ function	script	eldicastes_c	{
 			next;
 			mes "[Vyhannus]";
 			mes "I invite you to El Dicastes, our capital city.";
-			mes "" + strcharinfo(0) + "";
+			mes "" + strcharinfo(PC_NAME) + "";
 			next;
 			select("Never would have imagined.");
 			mes "[Hound]";
@@ -6395,11 +6395,11 @@ function	script	eldicastes_c	{
 			mes "Okay. You should be able to talk to him, right?";
 			mes "Shall we start with introducing ourselves?";
 			mes "This is...";
-			mes ""+strcharinfo(0)+"...";
+			mes ""+strcharinfo(PC_NAME)+"...";
 			next;
 			mes "[Vyhannus]";
 			mes "My name is Vyhannus.";
-			mes strcharinfo(0)+"..?";
+			mes strcharinfo(PC_NAME)+"..?";
 			mes "Glad to meet you.";
 			next;
 			if(select("Same here.", "A tree monster!")==1) {
@@ -6784,11 +6784,11 @@ dic_in01,42,264,3	script	Adventurer Clerk#ep133	4_MAN_NITT,{
 				mes "I will compare with the invitation list from Manuk.";
 				mes "What is your name?";
 				next;
-				mes "[" + strcharinfo(0) + "]";
-				mes "It is " + strcharinfo(0) + ".";
+				mes "[" + strcharinfo(PC_NAME) + "]";
+				mes "It is " + strcharinfo(PC_NAME) + ".";
 				next;
 				mes "[Clerk Rhawyne]";
-				mes "Yes.. " + strcharinfo(0) + "...";
+				mes "Yes.. " + strcharinfo(PC_NAME) + "...";
 				mes "I found it.";
 				mes "Welcome to El Dicastes, capital city of Sapha.";
 				next;
@@ -7519,7 +7519,7 @@ moc_para01,44,19,3	script	Cat Hand Agent#gekk	4_M_MERCAT2,{
 						next;
 						input .@inputstr$;
 						mes "[Agent Geck]";
-						mes "" + strcharinfo(0) + "? Human names are strange to me.";
+						mes "" + strcharinfo(PC_NAME) + "? Human names are strange to me.";
 						next;
 						mes "[Agent Geck]";
 						mes "Now you are Geck's personal slav... sponsor.";