Merge pull request #1412 from Asheraf/strcharinfo

change *strcharinfo to use constants
Closes #1412 as merged

16 files changed, 130 insertions, 130 deletions

diff --git a/npc/events/MemorialDay_2008.txt b/npc/events/MemorialDay_2008.txt
index cf4e54430..41ff5b610 100644
--- a/npc/events/MemorialDay_2008.txt
+++ b/npc/events/MemorialDay_2008.txt
@@ -51,7 +51,7 @@ prontera,182,214,4	script	Lauds#Memorial	1_M_MERCHANT,{
 		mes "[Mad Sago Lauds]";
 		mes "Where is your towel!?";
 		next;
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "My what?";
 		next;
 		mes "[Mad Sago Lauds]";
@@ -107,7 +107,7 @@ prontera,182,214,4	script	Lauds#Memorial	1_M_MERCHANT,{
 			delitem 1059,30;
 			delitem 914,20;
 			getitem 6025,1;
-			getnameditem 6025," + strcharinfo(0) + ";
+			getnameditem 6025," + strcharinfo(PC_NAME) + ";
 			Memorial08 = 2;
 			close;
 		}
@@ -200,11 +200,11 @@ prontera,182,214,4	script	Lauds#Memorial	1_M_MERCHANT,{
 //== Memorial Plaque =======================================
 prontera,153,286,4	script	Memorial Plaque#Memorial	4_BOARD3,{
 	if (Memorial08 < 8) {
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "- It's a dusty old plaque.-";
 		close;
 	} else if (Memorial08 == 8) {
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "- It's a dusty old plaque.-";
 		mes "'This must be what Lauds was talking about.'";
 		mes "'Let's dust it off with the towel.'";
@@ -339,7 +339,7 @@ prontera,150,270,4	script	Grast#Memorial	4_M_HUMERCHANT,{
 			next;
 			mes "[Grast]";
 			mes "If I provide you all materials, however, I won't have to thank you for your service.";
-			mes "It's your call, " + strcharinfo(0) + ".";
+			mes "It's your call, " + strcharinfo(PC_NAME) + ".";
 			next;
 			if (select("I'll gather the rest.", "Give me the materials.") == 2) {
 				goto L_GiveUp;
@@ -357,7 +357,7 @@ prontera,150,270,4	script	Grast#Memorial	4_M_HUMERCHANT,{
 			mes "[Grast]";
 			mes "You see, I have two different gifts in my each hand.";
 			mes "A best thing would be giving you both of them, but...";
-			mes "How do you like to test your luck, " + strcharinfo(0) + "?";
+			mes "How do you like to test your luck, " + strcharinfo(PC_NAME) + "?";
 			next;
 			mes "[Grast]";
 			mes "Okay, which hand would you like to pick?";
diff --git a/npc/events/christmas_2005.txt b/npc/events/christmas_2005.txt
index db2423e8f..795b50256 100644
--- a/npc/events/christmas_2005.txt
+++ b/npc/events/christmas_2005.txt
@@ -256,7 +256,7 @@ prontera,155,285,3	script	Enjoy#enjoy	4_M_MONK,{
 			mes "and tell him about our plan.";
 			mes "On a way back, bring as many phalanges as you can. ";
 			next;
-			mes "["+ strcharinfo(0) +"]";
+			mes "["+ strcharinfo(PC_NAME) +"]";
 			mes "Alright,sir!!!";
 			next;
 			mes "[Enjoy]";
@@ -272,7 +272,7 @@ prontera,155,285,3	script	Enjoy#enjoy	4_M_MONK,{
 			mes "We are not being jealous,";
 			mes "It's just not right leading a loose life!";
 			next;
-			mes "["+ strcharinfo(0) +"]";
+			mes "["+ strcharinfo(PC_NAME) +"]";
 			mes "Let's punish!!!!!!!!!!!!!!!!!!!!!!!!!!!";
 			christ_solo05 = 1;
 			close;
@@ -336,7 +336,7 @@ prontera,155,285,3	script	Enjoy#enjoy	4_M_MONK,{
 			mes "Fine!!";
 			mes "You are all ready!!!";
 			next;
-			mes "["+ strcharinfo(0) +"]";
+			mes "["+ strcharinfo(PC_NAME) +"]";
 			mes "Wait!!";
 			mes "Where's other people??";
 			next;
@@ -352,7 +352,7 @@ prontera,155,285,3	script	Enjoy#enjoy	4_M_MONK,{
 			donpcevent "Mas#mas02::OnCommandOn";
 			donpcevent "Event#event02::OnCommandOn";
 			next;
-			mes "["+ strcharinfo(0) +"]";
+			mes "["+ strcharinfo(PC_NAME) +"]";
 			mes "Oh.. Yup!!!";
 			next;
 			mes "[Enjoy]";
@@ -416,32 +416,32 @@ prontera,155,285,3	script	Enjoy#enjoy	4_M_MONK,{
 			donpcevent "Mas#mas02::OnCommandOff";
 			donpcevent "Event#event02::OnCommandOff";
 			close2;
-			mapannounce "prontera", "Single soldiers "+ strcharinfo(0) +"'s sorrow spread all over the town.",bc_map,0x66FFCC;
-			monster "prontera",155,300,""+ strcharinfo(0) +"'s anguish",1062,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",156,300,""+ strcharinfo(0) +"'s jealousy",1062,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",157,300,""+ strcharinfo(0) +"'s despair",1062,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",158,300,""+ strcharinfo(0) +"'s frustration",1062,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",154,300,""+ strcharinfo(0) +"'s bombing",1062,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",158,299,""+ strcharinfo(0) +"'s grudge",1246,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",157,299,""+ strcharinfo(0) +"'s curse",1246,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",156,299,""+ strcharinfo(0) +"'s anger",1246,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",155,299,""+ strcharinfo(0) +"'s grief",1246,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",154,299,""+ strcharinfo(0) +"'s hatred",1246,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",158,298,""+ strcharinfo(0) +"'s a bitter taste of solo",1245,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",157,298,""+ strcharinfo(0) +"'s couple punisher",1245,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",156,298,""+ strcharinfo(0) +"'s loneliness",1245,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",155,298,""+ strcharinfo(0) +"'s sobbing",1245,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",154,298,""+ strcharinfo(0) +"'s darkness",1245,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",158,297,""+ strcharinfo(0) +"'s depression",1244,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",157,297,""+ strcharinfo(0) +"'s estrangement",1244,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",156,297,""+ strcharinfo(0) +"'s nightmare",1244,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",155,297,""+ strcharinfo(0) +"'s wail",1244,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",154,297,""+ strcharinfo(0) +"'s whisper",1244,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",158,296,""+ strcharinfo(0) +"'s regret",1588,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",157,296,""+ strcharinfo(0) +"'s shadow",1588,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",156,296,""+ strcharinfo(0) +"'s couplebreaker",1588,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",155,296,""+ strcharinfo(0) +"'s sadness",1588,1,"Enjoy#enjoy::OnMyMobDead";
-			monster "prontera",154,296,""+ strcharinfo(0) +"'s symbol of brokenheart",1588,1,"Enjoy#enjoy::OnMyMobDead";
+			mapannounce "prontera", "Single soldiers "+ strcharinfo(PC_NAME) +"'s sorrow spread all over the town.",bc_map,0x66FFCC;
+			monster "prontera",155,300,""+ strcharinfo(PC_NAME) +"'s anguish",1062,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",156,300,""+ strcharinfo(PC_NAME) +"'s jealousy",1062,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",157,300,""+ strcharinfo(PC_NAME) +"'s despair",1062,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",158,300,""+ strcharinfo(PC_NAME) +"'s frustration",1062,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",154,300,""+ strcharinfo(PC_NAME) +"'s bombing",1062,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",158,299,""+ strcharinfo(PC_NAME) +"'s grudge",1246,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",157,299,""+ strcharinfo(PC_NAME) +"'s curse",1246,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",156,299,""+ strcharinfo(PC_NAME) +"'s anger",1246,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",155,299,""+ strcharinfo(PC_NAME) +"'s grief",1246,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",154,299,""+ strcharinfo(PC_NAME) +"'s hatred",1246,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",158,298,""+ strcharinfo(PC_NAME) +"'s a bitter taste of solo",1245,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",157,298,""+ strcharinfo(PC_NAME) +"'s couple punisher",1245,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",156,298,""+ strcharinfo(PC_NAME) +"'s loneliness",1245,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",155,298,""+ strcharinfo(PC_NAME) +"'s sobbing",1245,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",154,298,""+ strcharinfo(PC_NAME) +"'s darkness",1245,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",158,297,""+ strcharinfo(PC_NAME) +"'s depression",1244,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",157,297,""+ strcharinfo(PC_NAME) +"'s estrangement",1244,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",156,297,""+ strcharinfo(PC_NAME) +"'s nightmare",1244,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",155,297,""+ strcharinfo(PC_NAME) +"'s wail",1244,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",154,297,""+ strcharinfo(PC_NAME) +"'s whisper",1244,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",158,296,""+ strcharinfo(PC_NAME) +"'s regret",1588,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",157,296,""+ strcharinfo(PC_NAME) +"'s shadow",1588,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",156,296,""+ strcharinfo(PC_NAME) +"'s couplebreaker",1588,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",155,296,""+ strcharinfo(PC_NAME) +"'s sadness",1588,1,"Enjoy#enjoy::OnMyMobDead";
+			monster "prontera",154,296,""+ strcharinfo(PC_NAME) +"'s symbol of brokenheart",1588,1,"Enjoy#enjoy::OnMyMobDead";
 			donpcevent "Enjoy#enjoy::OnCommandGo";
 			end;
 		}
@@ -607,7 +607,7 @@ prontera,188,177,4	script	Happymerry#happymerry	4_M_LGTMAN,{
 		mes "I hate christmas~!";
 		emotion e_sob;
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "Are...you...?";
 		next;
 		mes "[Happymerry]";
@@ -618,7 +618,7 @@ prontera,188,177,4	script	Happymerry#happymerry	4_M_LGTMAN,{
 		mes "Blessing? Gloria~~?!";
 		mes "Couples~~duh~!!!!!!";
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "You seem to be the right one!!!";
 		mes "Enjoy is waiting for you.";
 		mes "let's go!!!";
@@ -637,7 +637,7 @@ prontera,188,177,4	script	Happymerry#happymerry	4_M_LGTMAN,{
 		mes "So,where is Enjoy?";
 		mes "Where is he?!";
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "He's waiting for you!";
 		mes "Go ahead~";
 		mes "I'll follow you after contacting others.";
@@ -689,7 +689,7 @@ prontera,62,339,3	script	Christ#christ	4_M_PECOKNIGHT,{
 		mes "Only thing I need is this chubby Pecopeco~!";
 		mes "";
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "Um...";
 		next;
 		mes "[Christ]";
@@ -706,14 +706,14 @@ prontera,62,339,3	script	Christ#christ	4_M_PECOKNIGHT,{
 		mes "I'm not gonna be lonely~";
 		mes "No I won't!!!";
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "Actually Enjoy told me...";
 		next;
 		mes "[Christ]";
 		mes "Huh? What did you say?";
 		mes "Enjoy? You know him? Then,you must be the one whom Happymerry sent!?";
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "Yes~ Happymerry sent me...";
 		next;
 		mes "[Christ]";
@@ -783,7 +783,7 @@ prontera,163,66,7	script	Mas#mas	4_M_ALCHE_A,{
 		mes "No time to waste~~";
 		mes "Let's dig herbs.......";
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "Hey~are you ok? Are you Mas?";
 		next;
 		mes "[Mas]";
@@ -794,7 +794,7 @@ prontera,163,66,7	script	Mas#mas	4_M_ALCHE_A,{
 		mes "Never mind!! What am I thinking?!!";
 		mes "Get away~I have dig herbs~";
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "Mas!!";
 		mes "Are you ok?!";
 		mes "Christ sent me.";
@@ -809,7 +809,7 @@ prontera,163,66,7	script	Mas#mas	4_M_ALCHE_A,{
 		mes "[Mas]";
 		mes "...Are going with me?";
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "No~~";
 		mes "I have something left to do.";
 		mes "I have to tell others about this.";
@@ -854,14 +854,14 @@ prontera,35,209,5	script	Event#event	4_M_SITDOWN,{
 		mes "[Event]";
 		mes "........................";
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "...Are... you...?";
 		next;
 		mes "[Event]";
 		mes "...I love you too~!!!";
 		emotion e_omg,1;
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "(Oh,my..)";
 		next;
 		mes "[Event]";
@@ -875,7 +875,7 @@ prontera,35,209,5	script	Event#event	4_M_SITDOWN,{
 		//Emotion "Event#event" ET_KIK
 		emotion e_kis;
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "Mas sent me here.";
 		mes "You know about Enjoy's plan, right?";
 		mes "...Are you listening?";
@@ -896,7 +896,7 @@ prontera,35,209,5	script	Event#event	4_M_SITDOWN,{
 		mes "-and packed his stuff and bowed to Kafra.-";
 		mes "";
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "Finally!!! Done telling everyone!!";
 		mes "Now I should get my ^0000FFBranch of Dead Tree^000000s packed up";
 		mes "and go punish singles!!!";
@@ -914,7 +914,7 @@ prontera,35,209,5	script	Event#event	4_M_SITDOWN,{
 		mes "-He  talked to his right hand-";
 		mes "-and packed his stuff and bowed to Kafra.-";
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "Finally!!! Done telling everyone!!";
 		mes "Now I should get my things packed up";
 		mes "and go punish singles!!!";
@@ -929,7 +929,7 @@ prontera,35,209,5	script	Event#event	4_M_SITDOWN,{
 		mes "...I love you too~!!!";
 		emotion e_omg,1;
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "(Oh.my~)";
 		next;
 		mes "[Event]";
@@ -1055,7 +1055,7 @@ prontera,156,242,0	script	Oholy#pron::OholyDup	1_F_PRIEST,{
 			next;
 			mes "[Oholy]";
 			mes "Well, please bring me back";
-			mes "Christmas carol music book, "+ strcharinfo(0) +".";
+			mes "Christmas carol music book, "+ strcharinfo(PC_NAME) +".";
 			mes "That little devil will be still";
 			mes "in the town because it only happened a few minutes ago.";
 			next;
@@ -1168,7 +1168,7 @@ prontera,156,242,0	script	Oholy#pron::OholyDup	1_F_PRIEST,{
 			mes "-You started humming then,-";
 			mes "-began to sing the next phase-";
 			next;
-			mes "["+ strcharinfo(0) +"]";
+			mes "["+ strcharinfo(PC_NAME) +"]";
 			mes "~Soon the snowflackes will fall~";
 			mes "~and tomorrow you'll see~";
 			mes "~Every wish, one and all,~";
@@ -1414,7 +1414,7 @@ function	script	F_carol_devi	{
 		mes "soul and be bound in a beneficial contract with me?";
 		emotion e_kis;
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "Hey, you! Deviruchi!!!";
 		mes "What a brat!!! Gotcha!";
 		next;
@@ -1437,7 +1437,7 @@ function	script	F_carol_devi	{
 			enablenpc getarg(1);
 			disablenpc getarg(0);
 			next;
-			mes "["+ strcharinfo(0) +"]";
+			mes "["+ strcharinfo(PC_NAME) +"]";
 			mes "Rudolph... If... Foggy...";
 			mes "Sledge... Reindeer...";
 			mes "Hmm, I think I got what I need.";
@@ -1505,7 +1505,7 @@ function	script	F_carol_devi	{
 		mes "soul and be bound in a beneficial contract with me?";
 		emotion e_omg;
 		next;
-		mes "["+ strcharinfo(0) +"]";
+		mes "["+ strcharinfo(PC_NAME) +"]";
 		mes "Hey, you! Deviruchi!!!";
 		mes "What a brat!!! Gotcha!";
 		next;
@@ -1535,7 +1535,7 @@ function	script	F_carol_devi2	{
 	mes "soul and be bound in a beneficial contract with me?";
 	emotion e_omg;
 	next;
-	mes "["+ strcharinfo(0) +"]";
+	mes "["+ strcharinfo(PC_NAME) +"]";
 	mes "Hey, you! Deviruchi!!!";
 	mes "What a brat!!! Gotcha!";
 	next;
diff --git a/npc/events/christmas_2008.txt b/npc/events/christmas_2008.txt
index 64f3efa93..6d8621545 100644
--- a/npc/events/christmas_2008.txt
+++ b/npc/events/christmas_2008.txt
@@ -159,7 +159,7 @@ prontera,226,306,4	script	Caroller#iROxmas08	1_F_PRIEST,{
 							next;
 							emotion e_heh;
 							delitem 6092,6;
-							getnameditem 12354,"+strcharinfo(0)+";
+							getnameditem 12354,"+strcharinfo(PC_NAME)+";
 							mes "[Caroller]";
 							mes "Let's care about others around you on this Christmas season!";
 							close;
@@ -213,7 +213,7 @@ prontera,226,306,4	script	Caroller#iROxmas08	1_F_PRIEST,{
 					mes "[Caroller]";
 					mes "And just stay there, every Christmas, for your whole life?";
 					next;
-					mes "["+strcharinfo(0)+"]";
+					mes "["+strcharinfo(PC_NAME)+"]";
 					mes "What? What do you mean?";
 					next;
 					mes "[Caroller]";
@@ -441,7 +441,7 @@ prontera,226,306,4	script	Caroller#iROxmas08	1_F_PRIEST,{
 			next;
 			emotion e_ok;
 			getitem 2784,1;
-			getnameditem 12354,"+strcharinfo(0)+";
+			getnameditem 12354,"+strcharinfo(PC_NAME)+";
 			delitem 1019,10;
 			delitem 1005,1;
 			delitem 7312,1;
@@ -577,21 +577,21 @@ prontera,226,306,4	script	Caroller#iROxmas08	1_F_PRIEST,{
 			next;
 			switch(select("Poring", "Angeling", "Ghostring")) {
 				case 1:
-					mes "["+strcharinfo(0)+"]";
+					mes "["+strcharinfo(PC_NAME)+"]";
 					mes "Um...I choose Poring!";
 					.@SantaCardP = 1;
 					next;
 					break;
 
 				case 2:
-					mes "["+strcharinfo(0)+"]";
+					mes "["+strcharinfo(PC_NAME)+"]";
 					mes "Um...I choose Angeling!";
 					.@SantaCardP = 2;
 					next;
 					break;
 
 				case 3:
-					mes "["+strcharinfo(0)+"]";
+					mes "["+strcharinfo(PC_NAME)+"]";
 					mes "Um...I choose Ghostring!";
 					.@SantaCardP = 3;
 					next;
@@ -634,7 +634,7 @@ prontera,226,306,4	script	Caroller#iROxmas08	1_F_PRIEST,{
 			}
 		}
 		if (.@SantaCardWins < 3) {
-			mes "["+strcharinfo(0)+"]";
+			mes "["+strcharinfo(PC_NAME)+"]";
 			mes "This is just luck.";
 			mes "Let me try again!!";
 			next;
diff --git a/npc/events/easter_2008.txt b/npc/events/easter_2008.txt
index 5a28cd0bf..4d914ebcb 100644
--- a/npc/events/easter_2008.txt
+++ b/npc/events/easter_2008.txt
@@ -597,7 +597,7 @@ morocc,131,26,5	script	Secret Corps#egg	4_M_MASKMAN,{
 		mes "back with good news.";
 		mes "So did it work?";
 		next;
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "Actually...";
 		mes "Nothing happened....";
 		next;
@@ -650,7 +650,7 @@ morocc,131,26,5	script	Secret Corps#egg	4_M_MASKMAN,{
 
 pay_dun00,22,127,0	script	Trace#egg1	CLEAR_NPC,{
 	if (easter2008 == 5) {
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "Well...";
 		mes "This is the place";
 		mes "the Corps Member";
@@ -659,21 +659,21 @@ pay_dun00,22,127,0	script	Trace#egg1	CLEAR_NPC,{
 		mes "these Holy Eggs.";
 		next;
 		if (countitem(Holy_Egg) > 32) {
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Here we go...";
 			mes "Will this really bring";
 			mes "this ancient hero";
 			mes "back to life? I'm...";
 			mes "I'm kind of scared!";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "...............................";
 			mes "...............................";
 			mes "...............................";
 			mes "...............................";
 			mes "...............................";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "^333333*Whew!*^000000 Nothing happened!";
 			mes "I guess I better go back to";
 			mes "that Corps Member and let";
@@ -684,7 +684,7 @@ pay_dun00,22,127,0	script	Trace#egg1	CLEAR_NPC,{
 			end;
 		}
 		else {
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Huh? Where did I put";
 			mes "those 33 Holy Eggs";
 			mes "that I needed for this?";
@@ -692,7 +692,7 @@ pay_dun00,22,127,0	script	Trace#egg1	CLEAR_NPC,{
 		}
 	}
 	else {
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "There was something";
 		mes "here, but I can't tell";
 		mes "for sure what it was...";
@@ -702,7 +702,7 @@ pay_dun00,22,127,0	script	Trace#egg1	CLEAR_NPC,{
 
 iz_dun02,340,346,0	script	Trace#egg	CLEAR_NPC,{
 	if (easter2008 == 6) {
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "Well...";
 		mes "This is the place";
 		mes "the Corps Member";
@@ -711,21 +711,21 @@ iz_dun02,340,346,0	script	Trace#egg	CLEAR_NPC,{
 		mes "these Holy Eggs.";
 		next;
 		if (countitem(Holy_Egg) > 32) {
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Here we go...";
 			mes "Will this really bring";
 			mes "this ancient hero";
 			mes "back to life? I'm...";
 			mes "I'm kind of scared!";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "...............................";
 			mes "...............................";
 			mes "...............................";
 			mes "...............................";
 			mes "...............................";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "^333333*Whew!*^000000 Nothing happened!";
 			mes "I guess I better go back to";
 			mes "that Corps Member and let";
@@ -736,7 +736,7 @@ iz_dun02,340,346,0	script	Trace#egg	CLEAR_NPC,{
 			end;
 		}
 		else {
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Huh? Where did I put";
 			mes "those 33 Holy Eggs";
 			mes "that I needed for this?";
@@ -744,7 +744,7 @@ iz_dun02,340,346,0	script	Trace#egg	CLEAR_NPC,{
 		}
 	}
 	else {
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "There was something";
 		mes "here, but I can't tell";
 		mes "for sure what it was...";
@@ -754,7 +754,7 @@ iz_dun02,340,346,0	script	Trace#egg	CLEAR_NPC,{
 
 mjo_dun03,308,256,0	script	Trace#egg2	CLEAR_NPC,{
 	if (easter2008 == 7) {
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "Well...";
 		mes "This is the place";
 		mes "the Corps Member";
@@ -763,21 +763,21 @@ mjo_dun03,308,256,0	script	Trace#egg2	CLEAR_NPC,{
 		mes "these Holy Eggs.";
 		next;
 		if (countitem(Holy_Egg) > 32) {
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Here we go...";
 			mes "Will this really bring";
 			mes "this ancient hero";
 			mes "back to life? I'm...";
 			mes "I'm kind of scared!";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "...............................";
 			mes "...............................";
 			mes "...............................";
 			mes "...............................";
 			mes "...............................";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "^333333*Whew!*^000000 Nothing happened!";
 			mes "I guess I better go back to";
 			mes "that Corps Member and let";
@@ -788,7 +788,7 @@ mjo_dun03,308,256,0	script	Trace#egg2	CLEAR_NPC,{
 			end;
 		}
 		else {
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Huh? Where did I put";
 			mes "those 33 Holy Eggs";
 			mes "that I needed for this?";
@@ -796,7 +796,7 @@ mjo_dun03,308,256,0	script	Trace#egg2	CLEAR_NPC,{
 		}
 	}
 	else {
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "There was something";
 		mes "here, but I can't tell";
 		mes "for sure what it was...";
@@ -806,7 +806,7 @@ mjo_dun03,308,256,0	script	Trace#egg2	CLEAR_NPC,{
 
 gl_prison,157,176,0	script	Trace#egg3	CLEAR_NPC,{
 	if (easter2008 == 8) {
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "Well...";
 		mes "This is the place";
 		mes "the Corps Member";
@@ -815,21 +815,21 @@ gl_prison,157,176,0	script	Trace#egg3	CLEAR_NPC,{
 		mes "these Holy Eggs.";
 		next;
 		if (countitem(Holy_Egg) > 32) {
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Here we go...";
 			mes "Will this really bring";
 			mes "this ancient hero";
 			mes "back to life? I'm...";
 			mes "I'm kind of scared!";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "...............................";
 			mes "...............................";
 			mes "...............................";
 			mes "...............................";
 			mes "...............................";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "^333333*Whew!*^000000 Nothing happened!";
 			mes "I guess I better go back to";
 			mes "that Corps Member and let";
@@ -840,7 +840,7 @@ gl_prison,157,176,0	script	Trace#egg3	CLEAR_NPC,{
 			end;
 		}
 		else {
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Huh? Where did I put";
 			mes "those 33 Holy Eggs";
 			mes "that I needed for this?";
@@ -848,7 +848,7 @@ gl_prison,157,176,0	script	Trace#egg3	CLEAR_NPC,{
 		}
 	}
 	else {
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "There was something";
 		mes "here, but I can't tell";
 		mes "for sure what it was...";
diff --git a/npc/events/event_skill_reset.txt b/npc/events/event_skill_reset.txt
index 406cc1afe..0f01a3b98 100644
--- a/npc/events/event_skill_reset.txt
+++ b/npc/events/event_skill_reset.txt
@@ -72,7 +72,7 @@ yuno,138,187,4	script	Hypnotist Teacher	4_F_TELEPORTER,{
 		close;
 	}
 	mes "Hello, I am the Skill Resetter.";
-	mes "Your name is ^0080FF"+strcharinfo(0)+"^000000.";
+	mes "Your name is ^0080FF"+strcharinfo(PC_NAME)+"^000000.";
 	mes "How can I help you?";
 	next;
 	switch (select("^009500Information about Reset skills.^000000","^00B6FFReset skills.^000000","^000088Nevermind^000000")) {
@@ -96,7 +96,7 @@ yuno,138,187,4	script	Hypnotist Teacher	4_F_TELEPORTER,{
 		mes "Before skill reset in starting.";
 		mes "You shall have to first tell me your Base Level.";
 		next;
-		mes "^D5A500[" + strcharinfo(0) + "]^000000";
+		mes "^D5A500[" + strcharinfo(PC_NAME) + "]^000000";
 		mes "My Base level is ^AA00AALevel " + BaseLevel + "BaseLv.^000000";
 		next;
 		@zeny = BaseLevel*20000;
diff --git a/npc/events/gdevent_aru.txt b/npc/events/gdevent_aru.txt
index ba7564fff..39c3ca5f7 100644
--- a/npc/events/gdevent_aru.txt
+++ b/npc/events/gdevent_aru.txt
@@ -123,7 +123,7 @@ arug_dun01,199,195,5	script	Dwarf#aru_gd	4_M_DWARF,{
 				mes "I can't live without it...";
 				next;
 				if (countitem(Pickaxe) > 0) {
-					mes "[" + strcharinfo(0) + "]";
+					mes "[" + strcharinfo(PC_NAME) + "]";
 					mes "Is this the pickaxe that you've been looking for?";
 					next;
 					mes "[Morestone]";
@@ -138,7 +138,7 @@ arug_dun01,199,195,5	script	Dwarf#aru_gd	4_M_DWARF,{
 					mes "You are great! What guild are you from?";
 					mes "Could it be Gravity or Mercury?";
 					next;
-					mes "[" + strcharinfo(0) + "]";
+					mes "[" + strcharinfo(PC_NAME) + "]";
 					mes "I am a member of the ^3131FF"+.@chk_yourgdname$+"^.";
 					next;
 					mes "[Morestone]";
@@ -255,7 +255,7 @@ arug_dun01,199,195,5	script	Dwarf#aru_gd	4_M_DWARF,{
 					mes "I can't live without it...";
 					next;
 					if (countitem(Pickaxe) > 0) {
-						mes "[" + strcharinfo(0) + "]";
+						mes "[" + strcharinfo(PC_NAME) + "]";
 						mes "Is this the pickaxe that you've been looking for?";
 						next;
 						mes "[Morestone]";
@@ -270,7 +270,7 @@ arug_dun01,199,195,5	script	Dwarf#aru_gd	4_M_DWARF,{
 						mes "You are great! What guild are you from?";
 						mes "Could it be Gravity or Mercury?";
 						next;
-						mes "[" + strcharinfo(0) + "]";
+						mes "[" + strcharinfo(PC_NAME) + "]";
 						mes "I am a member of the ^3131FF"+.@chk_yourgdname$+"^.";
 						next;
 						mes "[Morestone]";
@@ -398,7 +398,7 @@ arug_dun01,199,195,5	script	Dwarf#aru_gd	4_M_DWARF,{
 					mes "I can't live without it...";
 					next;
 					if (countitem(Pickaxe) > 0) {
-						mes "[" + strcharinfo(0) + "]";
+						mes "[" + strcharinfo(PC_NAME) + "]";
 						mes "Is this the pickaxe that you've been looking for?";
 						next;
 						mes "[Morestone]";
@@ -413,7 +413,7 @@ arug_dun01,199,195,5	script	Dwarf#aru_gd	4_M_DWARF,{
 						mes "You are great! What guild are you from?";
 						mes "Could it be Gravity or Mercury?";
 						next;
-						mes "[" + strcharinfo(0) + "]";
+						mes "[" + strcharinfo(PC_NAME) + "]";
 						mes "I am a member of the ^3131FF"+.@chk_yourgdname$+"^.";
 						next;
 						mes "[Morestone]";
@@ -521,7 +521,7 @@ arug_que01,100,81,3	script	Pierrot Pier#aru_gd	4_M_PIERROT,{
 		mes "- and come back later. -";
 		close;
 	}
-	if (strcharinfo(0) == getguildmaster(getcharid(2))) {
+	if (strcharinfo(PC_NAME) == getguildmaster(getcharid(2))) {
 		if ($@gdeventv_a2 == 0) {
 			.@que_2143 = questprogress(2143,PLAYTIME);
 			if (!.@que_2143) {
diff --git a/npc/events/gdevent_sch.txt b/npc/events/gdevent_sch.txt
index 4660e4598..1d6b892b7 100644
--- a/npc/events/gdevent_sch.txt
+++ b/npc/events/gdevent_sch.txt
@@ -123,7 +123,7 @@ schg_dun01,194,148,5	script	Dwarf#sch_gd	4_M_DWARF,{
 				mes "I can't live without it...";
 				next;
 				if (countitem(Pickaxe) > 0) {
-					mes "[" + strcharinfo(0) + "]";
+					mes "[" + strcharinfo(PC_NAME) + "]";
 					mes "Is this the pickaxe that you've been looking for?";
 					next;
 					mes "[Morestone]";
@@ -138,7 +138,7 @@ schg_dun01,194,148,5	script	Dwarf#sch_gd	4_M_DWARF,{
 					mes "You are great! What guild are you from?";
 					mes "Could it be Gravity or Mercury?";
 					next;
-					mes "[" + strcharinfo(0) + "]";
+					mes "[" + strcharinfo(PC_NAME) + "]";
 					mes "I am a member of the ^3131FF"+.@chk_yourgdname$+"^.";
 					next;
 					mes "[Morestone]";
@@ -255,7 +255,7 @@ schg_dun01,194,148,5	script	Dwarf#sch_gd	4_M_DWARF,{
 					mes "I can't live without it...";
 					next;
 					if (countitem(Pickaxe) > 0) {
-						mes "[" + strcharinfo(0) + "]";
+						mes "[" + strcharinfo(PC_NAME) + "]";
 						mes "Is this the pickaxe that you've been looking for?";
 						next;
 						mes "[Morestone]";
@@ -270,7 +270,7 @@ schg_dun01,194,148,5	script	Dwarf#sch_gd	4_M_DWARF,{
 						mes "You are great! What guild are you from?";
 						mes "Could it be Gravity or Mercury?";
 						next;
-						mes "[" + strcharinfo(0) + "]";
+						mes "[" + strcharinfo(PC_NAME) + "]";
 						mes "I am a member of the ^3131FF"+.@chk_yourgdname$+"^.";
 						next;
 						mes "[Morestone]";
@@ -397,7 +397,7 @@ schg_dun01,194,148,5	script	Dwarf#sch_gd	4_M_DWARF,{
 					mes "I can't live without it...";
 					next;
 					if (countitem(Pickaxe) > 0) {
-						mes "[" + strcharinfo(0) + "]";
+						mes "[" + strcharinfo(PC_NAME) + "]";
 						mes "Is this the pickaxe that you've been looking for?";
 						next;
 						mes "[Morestone]";
@@ -412,7 +412,7 @@ schg_dun01,194,148,5	script	Dwarf#sch_gd	4_M_DWARF,{
 						mes "You are great! What guild are you from?";
 						mes "Could it be Gravity or Mercury?";
 						next;
-						mes "[" + strcharinfo(0) + "]";
+						mes "[" + strcharinfo(PC_NAME) + "]";
 						mes "I am a member of the ^3131FF"+.@chk_yourgdname$+"^.";
 						next;
 						mes "[Morestone]";
@@ -520,7 +520,7 @@ schg_que01,100,81,3	script	Pierrot Pier#sch_gd	4_M_PIERROT,{
 		mes "- and come back later. -";
 		close;
 	}
-	if (strcharinfo(0) == getguildmaster(getcharid(2))) {
+	if (strcharinfo(PC_NAME) == getguildmaster(getcharid(2))) {
 		if ($@gdeventv_s2 == 0) {
 			.@que_2143 = questprogress(2143,PLAYTIME);
 			if (!.@que_2143) {
diff --git a/npc/events/god_se_festival.txt b/npc/events/god_se_festival.txt
index 50c11cd8c..1dbbe434a 100644
--- a/npc/events/god_se_festival.txt
+++ b/npc/events/god_se_festival.txt
@@ -72,7 +72,7 @@ yuno,118,192,5	script	Rmimi Ravies#gq_fes01	4_F_HUGIRL,{
 		mes "This is the flower.";
 		mes "This is just a formality, but let me check your qualifications.";
 		next;
-		if (strcharinfo(0) == getguildmaster(.@GID)) {
+		if (strcharinfo(PC_NAME) == getguildmaster(.@GID)) {
 			mes "[Rmimi Ravies]";
 			mes "Your qualification is verified as a Guild master.";
 			next;
@@ -141,7 +141,7 @@ yuno,118,192,5	script	Rmimi Ravies#gq_fes01	4_F_HUGIRL,{
 				mes "[Rmimi Ravies]";
 				mes "Have a good time.";
 				donpcevent "Rmimi Ravies#gq_fes01::OnStart";
-				announce "["+ strcharinfo(0) +"] member of ["+ getguildname(.@GID) +"] is summoning a 'Valkyrie's Present' in 'Juno'.",bc_all,"0x70dbdb";
+				announce "["+ strcharinfo(PC_NAME) +"] member of ["+ getguildname(.@GID) +"] is summoning a 'Valkyrie's Present' in 'Juno'.",bc_all,"0x70dbdb";
 				close;
 			}
 			else {
@@ -448,7 +448,7 @@ rachel,132,117,3	script	Rhehe Ravies#gq_fes03	4_F_HUGIRL,{
 		mes "A flower!!";
 		mes "Shall we proceed?";
 		next;
-		if (strcharinfo(0) == getguildmaster(.@GID)) {
+		if (strcharinfo(PC_NAME) == getguildmaster(.@GID)) {
 			mes "[Rhehe Ravies]";
 			mes "Eeeeh, so young and yet you're a guild master? Your guildsmen must be jealous.";
 			next;
@@ -521,7 +521,7 @@ rachel,132,117,3	script	Rhehe Ravies#gq_fes03	4_F_HUGIRL,{
 				mes "[Rhehe Ravies]";
 				mes "I hope you enjoy yourself!";
 				donpcevent "Rhehe Ravies#gq_fes03::OnStart";
-				announce "["+ strcharinfo(0) +"] member of ["+ getguildname(.@GID) +"] is summoning a 'Valkyrie's Present' in 'Rachel'.",bc_all,"0x70dbdb";
+				announce "["+ strcharinfo(PC_NAME) +"] member of ["+ getguildname(.@GID) +"] is summoning a 'Valkyrie's Present' in 'Rachel'.",bc_all,"0x70dbdb";
 				close;
 			}
 			else {
diff --git a/npc/events/halloween_2006.txt b/npc/events/halloween_2006.txt
index 8c7b4dcbf..101434be3 100644
--- a/npc/events/halloween_2006.txt
+++ b/npc/events/halloween_2006.txt
@@ -80,7 +80,7 @@ prontera,164,69,3	script	Cool Devi#06_hw	4_DEVIRUCHI,{
 		mes "I just can guess what he will say next. So what do you say?";
 		next;
 		if (select("What will he say?", "I also know about it.") == 1) {
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "What will he say?";
 			next;
 			mes "[Cool Devi]";
@@ -96,7 +96,7 @@ prontera,164,69,3	script	Cool Devi#06_hw	4_DEVIRUCHI,{
 			mes "Why don't you give him back the 'Pumpkin Mojo'.";
 			mes "Don't worry he will compensate you.";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Compensate?With what?";
 			next;
 			mes "[Cool Devi]";
@@ -235,7 +235,7 @@ prontera,164,69,3	script	Cool Devi#06_hw	4_DEVIRUCHI,{
 		mes "Why don't you give him back the 'Pumpkin Mojo'.";
 		mes "Don't worry he will compensate you.";
 		next;
-		mes "[" + strcharinfo(0) + "]";
+		mes "[" + strcharinfo(PC_NAME) + "]";
 		mes "Compensate? With what?";
 		next;
 		mes "[Cool Devi]";
@@ -296,7 +296,7 @@ geffen,145,132,3	script	Hoirin#06_hw	4_F_NOVICE,{
 			mes "You'll get addicted to it.";
 			mes "Don't be surprised after trying it.";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "......................";
 			mes "You seem to be such a passionate person.";
 			mes "So, what's the ingredient anyway.?";
@@ -470,7 +470,7 @@ nif_in,19,32,3	script	Deviruchi#06_hw	4_DEVIRUCHI,{
 			mes "[Deviruchi]";
 			mes "Says she..Huh?!!Me?!!";
 			next;
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Poor Devi~";
 			mes "You shouldn't have lied~";
 			mes "Wish you a luck.";
@@ -679,7 +679,7 @@ nif_fild01,167,113,3	script	Masta's chicken#06_hw01	4_NFCOCK,{
 			end;
 		}
 		else {
-			mes "[" + strcharinfo(0) + "]";
+			mes "[" + strcharinfo(PC_NAME) + "]";
 			mes "Hm...I must have misspelled.";
 			close;
 		}
diff --git a/npc/events/halloween_2009.txt b/npc/events/halloween_2009.txt
index ac2b0d39d..e71abeaef 100644
--- a/npc/events/halloween_2009.txt
+++ b/npc/events/halloween_2009.txt
@@ -261,7 +261,7 @@ prontera,220,72,5	duplicate(09Treats)	Trick or Treater#iRO8	4_M_KID1,2,2
 				mes "[Halloween Wizard]";
 				mes "Which town do you want to play a trick on?";
 				next;
-				getmapxy(.@mapname$, .@mapx, .@mapy, UNITTYPE_PC, strcharinfo(0));
+				getmapxy(.@mapname$, .@mapx, .@mapy, UNITTYPE_PC, strcharinfo(PC_NAME));
 				if (.@mapname$ == "prontera") {
 					switch(select("Geffen", "Payon", "Alberta", "Aldebaran")) {
 						case 1:
diff --git a/npc/events/idul_fitri.txt b/npc/events/idul_fitri.txt
index a403d6b96..50996c07d 100644
--- a/npc/events/idul_fitri.txt
+++ b/npc/events/idul_fitri.txt
@@ -40,7 +40,7 @@ prontera,146,92,3	script	Cellerb	1_M_MERCHANT,{
 		specialeffect EF_SANDMAN;
 		close;
 	}
-	mes "Haii......^FF8800"+strcharinfo(0)+"^000000!!";
+	mes "Haii......^FF8800"+strcharinfo(PC_NAME)+"^000000!!";
 	mes "First day of Idul Fitri has arrived.";
 	mes "Congratulation celebrate him.";
 	mes "There is event special today.";
diff --git a/npc/events/lunar_2008.txt b/npc/events/lunar_2008.txt
index 1a7703055..7a560e58a 100644
--- a/npc/events/lunar_2008.txt
+++ b/npc/events/lunar_2008.txt
@@ -70,7 +70,7 @@ payon_in01,193,30,4	script	Rice Mill Grandma#rat	1_F_ORIENT_04,{
 		next;
 		if (select("Of course.", "I don't even know you.") == 1) {
 			lunar_rat = 1;
-			mes "[" + strcharinfo(0)+"]";
+			mes "[" + strcharinfo(PC_NAME)+"]";
 			mes "Of course.";
 			mes "What can I do?";
 			next;
@@ -83,7 +83,7 @@ payon_in01,193,30,4	script	Rice Mill Grandma#rat	1_F_ORIENT_04,{
 			mes "nasty little moles.";
 			next;
 			select("Not a problem.");
-			mes "[" + strcharinfo(0)+"]";
+			mes "[" + strcharinfo(PC_NAME)+"]";
 			mes "Not a problem.";
 			mes "I'll catch those animals,";
 			mes "and bring back any Rice";
diff --git a/npc/events/nguild/nguild_managers.txt b/npc/events/nguild/nguild_managers.txt
index 21b1e4b86..6ff1e7e2a 100644
--- a/npc/events/nguild/nguild_managers.txt
+++ b/npc/events/nguild/nguild_managers.txt
@@ -52,7 +52,7 @@ function	script	F_GldManager	{
 		mes "Where are the guardians? Destroy these intruders!";
 		return;
 	}
-	if (strcharinfo(0) != getguildmaster(@GID)){
+	if (strcharinfo(PC_NAME) != getguildmaster(@GID)){
 		mes "You're not ^5533FF" + getguildmaster(@GID) + "^000000! I am here to follow ^5533FF" + getguildmaster(@GID) + "^000000's command only";
 		return 0;
 	}
diff --git a/npc/events/nguild/nguild_warper.txt b/npc/events/nguild/nguild_warper.txt
index 94f65e546..07ee4b0ed 100644
--- a/npc/events/nguild/nguild_warper.txt
+++ b/npc/events/nguild/nguild_warper.txt
@@ -96,7 +96,7 @@ prontera,146,163,6	script	Novice Castles	4_F_NOVICE,{
 
 n_castle,102,107,5	script	Cita	4_F_NOVICE,{
 	mes "[Cita]";
-	mes "Hello, "+ strcharinfo(0) +". Can I help you?";
+	mes "Hello, "+ strcharinfo(PC_NAME) +". Can I help you?";
 	next;
 	if (select("Warp me to Prontera!","Cancel") == 1) {
 		warp "prontera",155,177+rand(5);
diff --git a/npc/events/valentinesday_2009.txt b/npc/events/valentinesday_2009.txt
index 6b964d42c..1151a08fb 100644
--- a/npc/events/valentinesday_2009.txt
+++ b/npc/events/valentinesday_2009.txt
@@ -161,7 +161,7 @@ prontera,164,174,4	script	Trader#Val09	1_M_MERCHANT,{
 			delitem 7174,1;
 			delitem 7948,1;
 			Zeny -= 500;
-			getnameditem 12744,strcharinfo(0);
+			getnameditem 12744,strcharinfo(PC_NAME);
 			mes "[Marco Bassinio]";
 			mes "Happy Valentine's Day!";
 			mes "Valentine's the reason I came back.";
@@ -397,9 +397,9 @@ prontera,154,185,5	script	Event Ring Maker#Val09	4_F_KAFRA7,{
 	Zeny -= 1000;
 	iROval09ring = 1;
 	if (Sex == SEX_MALE) {
-		getnameditem 12742,strcharinfo(0);
+		getnameditem 12742,strcharinfo(PC_NAME);
 	} else {
-		getnameditem 12743,strcharinfo(0);
+		getnameditem 12743,strcharinfo(PC_NAME);
 	}
 	mes "[Event Ring Maker]";
 	mes "Here, the most precious ring in the world!";
@@ -477,7 +477,7 @@ prontera,157,185,4	script	Valentine Vote Manager#v	4_F_KAFRA5,{
 					Val09Rings += .@input;
 					if (Val09Rings > $Val09votes_M) {
 						$Val09votes_M = Val09Rings;
-						$Val09name_M$ = strcharinfo(0);
+						$Val09name_M$ = strcharinfo(PC_NAME);
 					}
 					next;
 					break;
@@ -505,7 +505,7 @@ prontera,157,185,4	script	Valentine Vote Manager#v	4_F_KAFRA5,{
 					Val09Rings += .@input;
 					if (Val09Rings > $Val09votes_F) {
 						$Val09votes_F = Val09Rings;
-						$Val09name_F$ = strcharinfo(0);
+						$Val09name_F$ = strcharinfo(PC_NAME);
 					}
 					next;
 					break;
diff --git a/npc/events/valentinesday_2012.txt b/npc/events/valentinesday_2012.txt
index e0ef97b67..0b240180f 100644
--- a/npc/events/valentinesday_2012.txt
+++ b/npc/events/valentinesday_2012.txt
@@ -40,7 +40,7 @@ mosk_in,21,246,5	script	Pinkamenia	1_F_LIBRARYGIRL,{
 		setarray .@SweetsID[0],538,558,539,573,559,560,12062,596,597,12414,12319;
 		setarray .@SweetsCost[0],1,2,5,10,10,10,15,15,15,20,20;
 		mes .@n$;
-		mes "Hello "+strcharinfo(0)+", do";
+		mes "Hello "+strcharinfo(PC_NAME)+", do";
 		mes "you want to buy some items?";
 		mes "You'll have to give me Love";
 		mes "Flowers for them, of course!";
@@ -99,7 +99,7 @@ mosk_in,21,246,5	script	Pinkamenia	1_F_LIBRARYGIRL,{
 		close;
 	} else if (BaseLevel >= 45) {
 		mes .@n$;
-		mes "Hello "+strcharinfo(0)+", it's";
+		mes "Hello "+strcharinfo(PC_NAME)+", it's";
 		mes "Valentine's Day and we";
 		mes "love to deliver sweet";
 		mes "chocolates.";
@@ -116,7 +116,7 @@ mosk_in,21,246,5	script	Pinkamenia	1_F_LIBRARYGIRL,{
 		close;
 	}
 	mes .@n$;
-	mes "Hello "+strcharinfo(0)+"!";
+	mes "Hello "+strcharinfo(PC_NAME)+"!";
 	close;
 
 OnInit:
@@ -171,7 +171,7 @@ mosk_in,21,244,3	script	Baker Extraordinaire	4_M_NOVELIST,{
 		}
 	} else {
 		mes .@n$;
-		mes "Hello, "+strcharinfo(0)+"!";
+		mes "Hello, "+strcharinfo(PC_NAME)+"!";
 		close;
 	}
 }