Replaced 'set' with direct assignment where applicable (re/quests folder)

Signed-off-by: Haru <haru@dotalux.com>

1 files changed, 219 insertions, 219 deletions

diff --git a/npc/re/quests/quests_mora.txt b/npc/re/quests/quests_mora.txt
index 94429ae8e..fc076a6b3 100644
--- a/npc/re/quests/quests_mora.txt
+++ b/npc/re/quests/quests_mora.txt
@@ -35,7 +35,7 @@ mid_camp,148,222,4	script	Theore#ep14_1_bs	4_F_SCIENCE,3,3,{
 		mes "[Theore]";
 		mes "How am I supposed to submit a report that's so bad!!! A 5-year-old could do better!!!";
 		mes "Noooo!!!";
-		set ep14_1_bs,1;
+		ep14_1_bs = 1;
 		close;
 	} else if (ep14_1_bs == 1) {
 		mes "- A person with a white gown -";
@@ -126,7 +126,7 @@ mid_camp,148,222,4	script	Theore#ep14_1_bs	4_F_SCIENCE,3,3,{
 				mes "- The man seems to be in a manic state. -";
 				mes "- Wait until he calms down -";
 				mes "- and try speaking to him again. -";
-				set ep14_1_bs,2;
+				ep14_1_bs = 2;
 				setquest 11182;
 				close;
 			case 2:
@@ -214,7 +214,7 @@ mid_camp,148,222,4	script	Theore#ep14_1_bs	4_F_SCIENCE,3,3,{
 		next;
 		mes "[Theore]";
 		mes "The Laphines are such a rowdy crew, and it's very unsettling to see how quiet they've been - almost like a period of calm before a giant thunderstorm.";
-		set ep14_1_bs,3;
+		ep14_1_bs = 3;
 		changequest 11182,11183;
 		close;
 	} else if (ep14_1_bs == 3) {
@@ -292,7 +292,7 @@ mid_camp,148,222,4	script	Theore#ep14_1_bs	4_F_SCIENCE,3,3,{
 			mes "My poor innocent imagination!!!!";
 			next;
 			mes "- He is in no state for conversations. You should take the pouch to Splendide and look for its owner. -";
-			set ep14_1_bs2, ep14_1_bs2+3; //4,5,6 -> 7,8,9
+			ep14_1_bs2 += 3; //4,5,6 -> 7,8,9
 			changequest 11185,11186;
 			close;
 		} else {
@@ -326,7 +326,7 @@ mid_camp,148,222,4	script	Theore#ep14_1_bs	4_F_SCIENCE,3,3,{
 		mes "[Theore]";
 		mes "Then I'm off to put the finishing touches on the report!!!!!!!";
 		mes "Oh yeah!!!!";
-		set ep14_1_bs,19;
+		ep14_1_bs = 19;
 		getexp 0,200000;
 		getitem 6380,5; //Mora_Coin
 		close;
@@ -348,7 +348,7 @@ OnTouch:
 			mes "[Theore]";
 			mes "How am I supposed to submit a report that's so bad!!! A 5-year-old could do better!!!";
 			mes "Noooo!!!";
-			set ep14_1_bs,1;
+			ep14_1_bs = 1;
 			close;
 		}
 	}
@@ -360,13 +360,13 @@ OnTouch:
 		mes "- It's just an ordinary bush. -";
 		close;
 	}
-	set .@i, atoi(charat(strnpcinfo(2),9));
-	set .@rand, rand(1,3);
+	.@i = atoi(charat(strnpcinfo(2),9));
+	.@rand = rand(1,3);
 	mes "[Unarmed Laphine]";
 	mes "Aaaarrrrrggggghhhhh!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!";
 	donpcevent "Fairy#cmd"+.@i+.@rand+"::OnEnable";
-	set ep14_1_bs, .@i+3;
-	set ep14_1_bs2, .@rand;
+	ep14_1_bs = .@i+3;
+	ep14_1_bs2 = .@rand;
 	changequest 11183,11184;
 	next;
 	mes "- You try to talk to the Laphine, -";
@@ -390,22 +390,22 @@ OnDisable:
 -	script	#mora_pouch	-1,{
 	end;
 OnTouch:
-	set .@i, atoi(charat(strnpcinfo(2),9));
+	.@i = atoi(charat(strnpcinfo(2),9));
 	if (ep14_1_bs == .@i+3) {
 		if (countitem(6390) == 0) {
 			if (checkweight(1201,1) == 0) {
 				mes " - Hang on there !! -";
 				mes " - You are carrying too many kinds of items - ";
-		   		mes " - to receive any more items. - ";
+				mes " - to receive any more items. - ";
 				mes " - Please lighten your load - ";
-		   		mes " - and try again. - ";
+				mes " - and try again. - ";
 				close;
 			}
 			if (MaxWeight - Weight < 1000) {
 				mes " - Hang on there !! -";
-			 	mes " - You are carrying too much weight - ";
+				mes " - You are carrying too much weight - ";
 				mes " - Please lighten your load - ";
-		   		mes " - and try again. - ";
+				mes " - and try again. - ";
 				close;
 			}
 			mes "- Jumble Fumble -";
@@ -414,7 +414,7 @@ OnTouch:
 			if (rand(1,5) == 4) {
 				mes "- You've found a Small pouch. -";
 				if (ep14_1_bs2 > 0 && ep14_1_bs2 < 4)
-					set ep14_1_bs2, ep14_1_bs2+3;
+					ep14_1_bs2 += 3;
 				changequest 11184,11185;
 				getitem 6390,1; //Small_Pocket
 				close;
@@ -572,7 +572,7 @@ splendide,183,117,4	script	Tired-looking Fairy	4_F_FAIRYKID3,{
 			select("Snow-white clothing:Grape clothing:Sky-blue clothing:Grassy-green clothing"),
 			select("Round wings:Two pairs of wings:Characteristic Wings");
 
-		set .@i[0], (1 << .@i[1]) | (1 << (.@i[2]+4)) | (1 << (.@i[3]+6)) | (1 << (.@i[4]+10));
+		.@i[0] = (1 << .@i[1]) | (1 << (.@i[2]+4)) | (1 << (.@i[3]+6)) | (1 << (.@i[4]+10));
 
 		mes "[Tired-looking Fairy]";
 		mes "A "+.@Skin$[.@i[2]-1]+"-skinned fairy with "+.@Hair$[.@i[1]-1]+" hair and "+.@Wings$[.@i[4]-1]+" wings, dressed in "+.@Clothing$[.@i[3]-1]+" clothing.......";
@@ -584,7 +584,7 @@ splendide,183,117,4	script	Tired-looking Fairy	4_F_FAIRYKID3,{
 			mes "Kusmi must be roaming the area southeast of the village.";
 			mes "Go see if she has lost her pouch.";
 			if (ep14_1_bs2 == 7)
-				set ep14_1_bs2,10;
+				ep14_1_bs2 = 10;
 			close;
 		case 2212: // Theodore: grassy-green hair, dark skin, snow-white clothing, round wings
 			mes "Hmm......That must be Theodore.";
@@ -593,7 +593,7 @@ splendide,183,117,4	script	Tired-looking Fairy	4_F_FAIRYKID3,{
 			mes "Theodore must be roaming the area northeast of the village.";
 			mes "Go see if he has lost his pouch.";
 			if (ep14_1_bs2 == 8)
-				set ep14_1_bs2,11;
+				ep14_1_bs2 = 11;
 			close;
 		case 9264: // Pauchon: sea-blue hair, dark skin, grassy-green clothing, characteristic wings
 			mes "Hmm......That must be Pauchon.";
@@ -602,7 +602,7 @@ splendide,183,117,4	script	Tired-looking Fairy	4_F_FAIRYKID3,{
 			mes "Pauchon must be roaming the area north of the village.";
 			mes "Go see if she has lost her pouch.";
 			if (ep14_1_bs2 == 9)
-				set ep14_1_bs2,12;
+				ep14_1_bs2 = 12;
 			close;
 		default:
 			next;
@@ -658,7 +658,7 @@ splendide,119,138,4	script	Kusmi#ep14_1_bs	4_F_FAIRYKID5,{
 			mes "Promise me you won't tell anyonee!";
 			mes "If you can promise, please talk to me againn.";
 			delitem 6390,1; //Small_Pocket
-			set ep14_1_bs,10;
+			ep14_1_bs = 10;
 			changequest 11187,11188;
 			close;
 		} else {
@@ -703,7 +703,7 @@ splendide,119,138,4	script	Kusmi#ep14_1_bs	4_F_FAIRYKID5,{
 			mes "[Kusmi]";
 			mes "Oh, and you must never ever tell anyone about what happened todayy!";
 			mes "Unless that person wanted to help uss... spreading the word won't do Splendide any goood.";
-			set ep14_1_bs,11;
+			ep14_1_bs = 11;
 			completequest 11188;
 			setquest 11189;
 			close;
@@ -726,7 +726,7 @@ splendide,119,138,4	script	Kusmi#ep14_1_bs	4_F_FAIRYKID5,{
 				next;
 				mes "[Kusmi]";
 				mes "If you're headed that way, please go see that all's okayy.";
-				set ep14_1_bs,12;
+				ep14_1_bs = 12;
 				changequest 11189,11190;
 				close;
 			case 2:
@@ -761,7 +761,7 @@ splendide,119,138,4	script	Kusmi#ep14_1_bs	4_F_FAIRYKID5,{
 			next;
 			mes "[Kusmi]";
 			mes "He always used to visit Splendide around this time, but the situation is no good now. I'll have to tell him to come another time.";
-			set ep14_1_bs,14;
+			ep14_1_bs = 14;
 			changequest 11191,11192;
 			close;
 		} else if (ep14_1_bs == 14) {
@@ -853,7 +853,7 @@ splendide,304,295,4	script	Theodore#ep14_1_bs	4_M_FAIRYKID4,{
 			mes "If you really want to hear the answer, talk to me again.";
 			mes "I need time to think.";
 			delitem 6390,1; //Small_Pocket
-			set ep14_1_bs,10;
+			ep14_1_bs = 10;
 			changequest 11187,11194;
 			close;
 		} else {
@@ -894,7 +894,7 @@ splendide,304,295,4	script	Theodore#ep14_1_bs	4_M_FAIRYKID4,{
 			mes "[Theodore]";
 			mes "And as I said before, what I told you is a secret and you must not tell anyone.";
 			mes "We do need help, but we are cornered and we don't want others to know.";
-			set ep14_1_bs,11;
+			ep14_1_bs = 11;
 			completequest 11194;
 			setquest 11195;
 			close;
@@ -916,7 +916,7 @@ splendide,304,295,4	script	Theodore#ep14_1_bs	4_M_FAIRYKID4,{
 				next;
 				mes "[Theodore]";
 				mes "If you happen to venture there, please ask a guard what things are like there.";
-				set ep14_1_bs,12;
+				ep14_1_bs = 12;
 				changequest 11195,11196;
 				close;
 			case 2:
@@ -951,7 +951,7 @@ splendide,304,295,4	script	Theodore#ep14_1_bs	4_M_FAIRYKID4,{
 			next;
 			mes "[Theodore]";
 			mes "And if it's not too much trouble, you could drop by my friend Lilitia's also...";
-			set ep14_1_bs,14;
+			ep14_1_bs = 14;
 			changequest 11197,11198;
 			close;
 		} else if (ep14_1_bs == 14) {
@@ -1033,7 +1033,7 @@ splendide,168,301,4	script	Pauchon#ep14_1_bs	4_F_FAIRYKID4,{
 			mes "I do appreciate you finding my pouch.... Hmm...";
 			mes "Please give me some time to think..";
 			delitem 6390,1; //Small_Pocket
-			set ep14_1_bs,10;
+			ep14_1_bs = 10;
 			changequest 11187,11200;
 			close;
 		} else {
@@ -1075,7 +1075,7 @@ splendide,168,301,4	script	Pauchon#ep14_1_bs	4_F_FAIRYKID4,{
 			mes "[Pauchon]";
 			mes "I'd eat the bark off of that tree if I could.";
 			mes "If only somebody could help. *sob*";
-			set ep14_1_bs,11;
+			ep14_1_bs = 11;
 			completequest 11200;
 			setquest 11201;
 			close;
@@ -1098,7 +1098,7 @@ splendide,168,301,4	script	Pauchon#ep14_1_bs	4_F_FAIRYKID4,{
 				mes "[Pauchon]";
 				mes "Oh! The guard there might know something.";
 				mes "If you're headed that way, please go find out what's up.";
-				set ep14_1_bs,12;
+				ep14_1_bs = 12;
 				changequest 11201,11202;
 				close;
 			case 2:
@@ -1131,7 +1131,7 @@ splendide,168,301,4	script	Pauchon#ep14_1_bs	4_F_FAIRYKID4,{
 			next;
 			mes "[Pauchon]";
 			mes "He's such a flighty guy, might have already left, but we were supposed to meet up in Mora Village.";
-			set ep14_1_bs,14;
+			ep14_1_bs = 14;
 			changequest 11203,11204;
 			close;
 		} else if (ep14_1_bs == 14) {
@@ -1202,13 +1202,13 @@ splendide,262,376,4	script	Laphine Soldier#ep14_1	4_M_FAIRYSOLDIER,{
 	mes "[Laphine Soldier]";
 	mes "You can get to Alfheim by making it through the Maze of the Hazy Forest. However, nobody has ever come back from the Maze of the Hazy Forest.";
 	if (questprogress(11190) == 1) {
-		set ep14_1_bs,13;
+		ep14_1_bs = 13;
 		changequest 11190,11191;
 	} else if (questprogress(11196) == 1) {
-		set ep14_1_bs,13;
+		ep14_1_bs = 13;
 		changequest 11196,11197;
 	} else if (questprogress(11202) == 1) {
-		set ep14_1_bs,13;
+		ep14_1_bs = 13;
 		changequest 11202,11203;
 	}
 	close;
@@ -1239,7 +1239,7 @@ mora,185,163,2	script	Warehouse Manager#ep14_1	4_M_RAFLE_GR,{
 		mes "[Warehouse Manager]";
 		mes "If you plan to go back to Splendide, pay a visit to Jones at the Inn.";
 		mes "He has something that needs to be urgently delivered to the army of Splendide.";
-		set ep14_1_bs,15;
+		ep14_1_bs = 15;
 		setquest 11206;
 		close;
 	} else if (ep14_1_bs == 15) {
@@ -1352,7 +1352,7 @@ mora,55,124,2	script	Jones#ep14_1_bs	4_M_MERCAT1,{
 		case 1:
 			mes "[Jones]";
 			mes "Thank you.";
-			set ep14_1_bs,16;
+			ep14_1_bs = 16;
 			changequest 11206,11207;
 			close;
 		case 2:
@@ -1374,7 +1374,7 @@ mora,55,124,2	script	Jones#ep14_1_bs	4_M_MERCAT1,{
 		mes "[Jones]";
 		mes "Please take good care of it.";
 		mes "It's for Daphrer in Splendide.";
-		set ep14_1_bs,17;
+		ep14_1_bs = 17;
 		getitem 6391,1; //Splendid_Supply_Kit
 		changequest 11207,11208;
 		close;
@@ -1416,7 +1416,7 @@ splendide,121,260,4	script	Daphrer#ep14_1_bs	4_F_FAIRY,{
 		mes "This is probably too small to be a reward, but please accept this as a sign of my gratitude.";
 		delitem 6391,1; //Splendid_Supply_Kit
 		if (ep14_1_bs == 17) {
-			set ep14_1_bs,18;
+			ep14_1_bs = 18;
 			completequest 11208;
 			getexp 0,500000;
 			getitem 6380,5; //Mora_Coin
@@ -1433,7 +1433,7 @@ splendide,121,260,4	script	Daphrer#ep14_1_bs	4_F_FAIRY,{
 		mes "I knew that it was probably a stretch......";
 		mes "Perhaps I've been unrealistic.";
 		mes "But I thank you for your trouble anyway. Please accept this as a sign of my gratitude.";
-		set ep14_1_bs,18;
+		ep14_1_bs = 18;
 		completequest 11208;
 		getexp 0,200000;
 		getitem 6380,2; //Mora_Coin
@@ -1448,14 +1448,14 @@ sec_in02,35,175,0	script	Theore Set Guid	4_F_FAIRYKID,{
 	callfunc "F_GM_NPC";
 	switch(select("Set0:Set33:Set2_0")) {
 	case 1:
-		set ep14_1_bs,0;
+		ep14_1_bs = 0;
 		end;
 	case 2:
-		set ep4_1_bs,3;
+		ep4_1_bs = 3;
 		setquest 11183;
 		end;
 	case 3:
-		set ep14_1_bs2,0;
+		ep14_1_bs2 = 0;
 		end;
 	}
 }
@@ -1864,7 +1864,7 @@ OnTouch:
 			mes "There must be someone down there.";
 			if ($@cheshire_on == 0) {
 				donpcevent "Cheshire#ep14_extra::OnEnable";
-				set $@cheshire_on,1;
+				$@cheshire_on = 1;
 			}
 			close;
 		}
@@ -1947,7 +1947,7 @@ OnDisable:
 	end;
 OnTimer600000:
 	disablenpc "Cheshire#ep14_extra";
-	set $@cheshire_on,0;
+	$@cheshire_on = 0;
 	stopnpctimer;
 	end;
 }
@@ -2008,7 +2008,7 @@ mora,117,66,3	script	Euridi#pa	4_F_MORAFINE2,{
 				mes "He wouldn't see me and locked himself in the room.";
 				mes "But he might be willing to see you, because you've been to the Hazy Forest.";
 				setquest 1109;
-				set ep14_1_rope,1;
+				ep14_1_rope = 1;
 				close;
 			}
 		}
@@ -2037,7 +2037,7 @@ mora,117,66,3	script	Euridi#pa	4_F_MORAFINE2,{
 		mes "where he is.";
 		mes "I'm counting on you, "+strcharinfo(0)+".";
 		changequest 1110,1111;
-		set ep14_1_rope,3;
+		ep14_1_rope = 3;
 		close;
 	} else if (ep14_1_rope == 3) {
 		mes "[Euridi]";
@@ -2082,10 +2082,10 @@ mora,117,66,3	script	Euridi#pa	4_F_MORAFINE2,{
 		changequest 1112,1113;
 
 		//delitem 6383,30; //Clue_Of_Lope
-		set .@count, countitem(6383);
+		.@count = countitem(6383);
 		if (.@count) delitem 6383,((.@count > 30)?30:.@count); //Clue_Of_Lope
 
-		set ep14_1_rope,5;
+		ep14_1_rope = 5;
 		close;
 	} else if (ep14_1_rope == 5) {
 		mes "[Euridi]";
@@ -2126,7 +2126,7 @@ mora,117,66,3	script	Euridi#pa	4_F_MORAFINE2,{
 			mes "With the ring in her hand, Euridi bursts into tears.";
 			mes "She starts to sing in a strained voice, still crying.";
 			changequest 1116,1117;
-			set ep14_1_rope,10;
+			ep14_1_rope = 10;
 
 			//delitem 6384,1; //Ring_Of_Lope
 			if (countitem(6384)) delitem 6384,1; //Ring_Of_Lope
@@ -2196,7 +2196,7 @@ mora,115,68,3	script	Euridi's Friend#pa	4_F_MORAFINE1,{
 		mes "because of the thick fog.";
 		mes "I think it's worth investigating.";
 		changequest 1114,1115;
-		set ep14_1_rope,7;
+		ep14_1_rope = 7;
 		close;
 	} else if (ep14_1_rope == 7) {
 		mes "[Euridi's Friend]";
@@ -2229,7 +2229,7 @@ mora,115,68,3	script	Euridi's Friend#pa	4_F_MORAFINE1,{
 		mes "Lope will be able to rest in peace now.";
 		mes "Thank you. I won't forget what you've done for me.";
 		completequest 1117;
-		set ep14_1_rope,11;
+		ep14_1_rope = 11;
 		getexp 1000000,2000000;
 		getitem 6380,10; //Mora_Coin
 		close;
@@ -2267,7 +2267,7 @@ mora,65,145,3	script	Pitt#pa	4_M_LYINGDOG,{
 		mes "He will be alive somewhere,";
 		mes "so go and try to find him! Just stop bothering me!";
 		changequest 1109,1110;
-		set ep14_1_rope,2;
+		ep14_1_rope = 2;
 		close;
 	} else if (ep14_1_rope == 2) {
 		mes "[Pitt]";
@@ -2308,7 +2308,7 @@ mora,65,145,3	script	Pitt#pa	4_M_LYINGDOG,{
 			mes "It's no use trying to talk to him any more.";
 			mes "Try talking to Euridi.";
 			changequest 1111,1112;
-			set ep14_1_rope,4;
+			ep14_1_rope = 4;
 			close;
 		}
 	} else if (ep14_1_rope == 4) {
@@ -2369,7 +2369,7 @@ mora,65,145,3	script	Pitt#pa	4_M_LYINGDOG,{
 		mes "he must be somewhere around there,";
 		mes "in whatever form he might be in.";
 		changequest 1113,1114;
-		set ep14_1_rope,6;
+		ep14_1_rope = 6;
 		getitem 6384,1; //Ring_Of_Lope
 		close;
 	} else if (ep14_1_rope == 6 || ep14_1_rope == 7) {
@@ -2444,7 +2444,7 @@ bif_fild01,132,338,3	script	Lope#pa	4_M_FAIRYSOLDIER2,2,2,{
 		mes "[Lope]";
 		mes "Now go!";
 		mes "This is my last request as a Laphine called Lope...";
-		set ep14_1_rope,9;
+		ep14_1_rope = 9;
 		changequest 1115,1116;
 		close;
 	} else {
@@ -2496,7 +2496,7 @@ OnTouch:
 			next;
 			mes "[Suspicious Man]";
 			mes "Aaaaarrrrrggghh!!!!!";
-			set ep14_1_rope,8;
+			ep14_1_rope = 8;
 			close;
 		} else {
 			mes "[Suspicious Man]";
@@ -2655,7 +2655,7 @@ mora,31,138,6	script	Raffle Researcher#ep14	4_M_RAFLE_OR,{
 		mes "The sooner you get them back,";
 		mes "the sooner I can get back to my research.";
 		setquest 5016;
-		set ep14_1_muk,1;
+		ep14_1_muk = 1;
 		next;
 		mes "[Raffle Researcher]";
 		mes "Have a safe trip.";
@@ -2710,7 +2710,7 @@ mora,31,138,6	script	Raffle Researcher#ep14	4_M_RAFLE_OR,{
 		mes "Why don't you take this and go to the inn";
 		mes "and rest up? There's nothing for you to do right now.";
 		delitem 6385,1; //Research_Tool_Bag
-		set ep14_1_muk,2;
+		ep14_1_muk = 2;
 		getitem 6380,1; //Mora_Coin
 		erasequest 5016;
 		close;
@@ -2787,7 +2787,7 @@ mora,31,138,6	script	Raffle Researcher#ep14	4_M_RAFLE_OR,{
 		mes "You can draw on his face,";
 		mes "pinch him, tickle him,";
 		mes "whatever you want. Just bully him 3 times.";
-		set ep14_1_muk,3;
+		ep14_1_muk = 3;
 		setquest 5017;
 		close;
 	} else if (ep14_1_muk  < 6) {
@@ -2841,7 +2841,7 @@ mora,31,138,6	script	Raffle Researcher#ep14	4_M_RAFLE_OR,{
 		mes "[Raffle Researcher]";
 		mes "Here is the sample tube for collecting.";
 		mes "Go and collect 10 samples!";
-		set ep14_1_muk,7;
+		ep14_1_muk = 7;
 		getitem 1092,10; //Empty_Cylinder
 		erasequest 5018;
 		setquest 5019;
@@ -2877,7 +2877,7 @@ mora,31,138,6	script	Raffle Researcher#ep14	4_M_RAFLE_OR,{
 		mes "Why don't you come back then?";
 		delitem 6386,10; //Bathtub_R_Sample
 		getitem 6380,1; //Mora_Coin
-		set ep14_1_muk,8;
+		ep14_1_muk = 8;
 		erasequest 5019;
 		setquest 5020;
 		close;
@@ -2908,30 +2908,30 @@ mora,31,138,6	script	Raffle Researcher#ep14	4_M_RAFLE_OR,{
 		mes "the unidentified creature that attacked me.";
 		next;
 		if (rand(2)) {
-			set .@str$,"teeth";
-			set .@quest,5021;
+			.@str$ = "teeth";
+			.@quest = 5021;
 		} else {
-			set .@str$,"scales";
-			set .@quest,5022;
+			.@str$ = "scales";
+			.@quest = 5022;
 		}
 		mes "[Raffle Researcher]";
 		mes "I'd better compare the two.";
 		mes "Please return to the bath";
 		mes "and look for the creature's "+.@str$+".";
 		mes "If you can, please bring me 10 of them.";
-		set ep14_1_muk,9;
+		ep14_1_muk = 9;
 		erasequest 5020;
 		setquest .@quest;
 		close;
 	} else if (ep14_1_muk == 9) {
 		if (questprogress(5021) || questprogress(5022)) {
 			if (questprogress(5021)) {
-				set .@quest,5021;
-				set .@item,6387; //Teeth_Sample
+				.@quest = 5021;
+				.@item = 6387; //Teeth_Sample
 				setarray .@str$[0],"tooth","teeth";
 			} else {
-				set .@quest,5022;
-				set .@item,6388; //Scale_Sample
+				.@quest = 5022;
+				.@item = 6388; //Scale_Sample
 				setarray .@str$[0],"scale","scales";
 			}
 			if (countitem(.@item) < 10) {
@@ -2976,14 +2976,14 @@ mora,31,138,6	script	Raffle Researcher#ep14	4_M_RAFLE_OR,{
 			switch(rand(1,6)) {
 			case 1:
 			case 3:
-				set .@quest,5021;
-				set .@item,6387; //Teeth_Sample
+				.@quest = 5021;
+				.@item = 6387; //Teeth_Sample
 				setarray .@str$[0],"tooth","teeth";
 				break;
 			case 2:
 			case 4:
-				set .@quest,5022;
-				set .@item,6388; //Scale_Sample
+				.@quest = 5022;
+				.@item = 6388; //Scale_Sample
 				setarray .@str$[0],"scale","scales";
 				break;
 			case 5:
@@ -3045,7 +3045,7 @@ mora,31,138,6	script	Raffle Researcher#ep14	4_M_RAFLE_OR,{
 			mes "You probably don't need to run around";
 			mes "like you did collecting";
 			mes "the bath water samples.";
-			set ep14_1_muk,10;
+			ep14_1_muk = 10;
 			getitem 1092,1; //Empty_Cylinder
 			erasequest 5023;
 			setquest 5024;
@@ -3078,7 +3078,7 @@ mora,31,138,6	script	Raffle Researcher#ep14	4_M_RAFLE_OR,{
 		mes "The puddle should be at 7 o'clock";
 		mes "from the village.";
 		delitem 6389,1; //Puddle_R_Sample
-		set ep14_1_muk,11;
+		ep14_1_muk = 11;
 		getitem 1092,1; //Empty_Cylinder
 		changequest 5024,5025;
 		next;
@@ -3106,7 +3106,7 @@ mora,31,138,6	script	Raffle Researcher#ep14	4_M_RAFLE_OR,{
 		mes "The puddle to the south";
 		mes "should be... at 6 o'clock from here.";
 		delitem 6389,1; //Puddle_R_Sample
-		set ep14_1_muk,12;
+		ep14_1_muk = 12;
 		getitem 1092,1; //Empty_Cylinder
 		changequest 5025,5026;
 		next;
@@ -3138,7 +3138,7 @@ mora,31,138,6	script	Raffle Researcher#ep14	4_M_RAFLE_OR,{
 		mes "It's not completely to the north.";
 		mes "it's at 11 o'clock from the village.";
 		delitem 6389,1; //Puddle_R_Sample
-		set ep14_1_muk,13;
+		ep14_1_muk = 13;
 		getitem 1092,1; //Empty_Cylinder
 		changequest 5026,5027;
 		next;
@@ -3179,7 +3179,7 @@ mora,31,138,6	script	Raffle Researcher#ep14	4_M_RAFLE_OR,{
 		mes "There's probably nothing else to do. While I run the experiment,";
 		mes "why don't you go and entertain yourself?";
 		delitem 6389,1; //Puddle_R_Sample
-		set ep14_1_muk,14;
+		ep14_1_muk = 14;
 		getitem 6380,4; //Mora_Coin
 		erasequest 5027;
 		setquest 5028;
@@ -3307,7 +3307,7 @@ mora,31,138,6	script	Raffle Researcher#ep14	4_M_RAFLE_OR,{
 		mes "[Raffle Researcher]";
 		mes "The best research assistant in my life...";
 		mes "is you, "+strcharinfo(0)+"!!!";
-		set ep14_1_muk,15;
+		ep14_1_muk = 15;
 		completequest 5028;
 		getexp 1000000,4000000;
 		getitem 6380,30; //Mora_Coin
@@ -3479,7 +3479,7 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 			next;
 			if(select("Bully anyway.:I'll stop.") == 1) {
 				emotion e_sob;
-				set ep14_1_goki,0;
+				ep14_1_goki = 0;
 				close2;
 				donpcevent "Black Shadow#ep14_muk::OnDisable";
 				end;
@@ -3506,7 +3506,7 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 			next;
 			if(select("Don't help.:Help.") == 1) {
 				emotion e_sob;
-				set ep14_1_goki,0;
+				ep14_1_goki = 0;
 				close2;
 				donpcevent "Black Shadow#ep14_muk::OnDisable";
 				end;
@@ -3606,17 +3606,17 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 			close;
 		}
 	}
-	set .@weapon$, ((getequipisequiped(EQI_HAND_R))?getequipname(EQI_HAND_R):"Bare handed");
-	set .@pc_hp, 200;
-	set .@npc_hp, 200;
+	.@weapon$ = ((getequipisequiped(EQI_HAND_R))?getequipname(EQI_HAND_R):"Bare handed");
+	.@pc_hp = 200;
+	.@npc_hp = 200;
 	setarray .@skills$[0],"Midsection punch","Headbutt","Wiggle wiggle","Screw punch","Mumble muble";
 	mes "The unidentified creature is attacking. What will you do?";
 	next;
 	while(1) {
 		switch(select("Attack with a weapon.:Attack using a skill.:Attack using teeth.:Run away in fear.")) {
 		case 1: // Weapon
-			set .@p_damage,10;
-			set .@pc_attack, rand(1,10);
+			.@p_damage = 10;
+			.@pc_attack = rand(1,10);
 			mes "["+strcharinfo(0)+"'s Attack]";
 			switch(.@pc_attack) {
 			// Miss.
@@ -3632,15 +3632,15 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 			// Hit.
 			default:
 				specialeffect EF_HIT1;
-				set .@npc_hp, .@npc_hp - .@p_damage;
+				.@npc_hp -= .@p_damage;
 				switch(.@pc_attack) {
-					case 1: set .@str$,"With your precious ^FF0000["+.@weapon$+"]^000000, you attacked the unidentified creature. The weapon pierced the creature's body."; break;
-					case 2: set .@str$,"By mistake, you use ^FF0000["+.@weapon$+"]^000000 that Holgren has thrown your way to attack the unidentified creature. With a thud, the unidentified creature's body is swaying."; break;
-					case 4: set .@str$,"You attempt to attack with your recent expensive purchase ^FF0000["+.@weapon$+"]^000000. You hit the unidentified creature's body with a thud."; break;
-					case 5: set .@str$,"You use a borrowed ^FF0000["+.@weapon$+"]^000000 to attack the unidentified creature, but the weapon slipped. But the weapon flies off and pierces the creature's body."; break;
-					case 7: set .@str$,"With your precious ^FF0000["+.@weapon$+"]^000000, you attacked the unidentified creature. It was as if the weapon was part of your body."; break;
-					case 8: set .@str$,"You use your lucky ^FF0000["+.@weapon$+"]^000000 to attack the unidentified creature."; break;
-					case 10: set .@str$,"You use a friend's ^FF0000["+.@weapon$+"]^000000 to attack the unidentified creature."; break;
+					case 1: .@str$ = "With your precious ^FF0000["+.@weapon$+"]^000000, you attacked the unidentified creature. The weapon pierced the creature's body."; break;
+					case 2: .@str$ = "By mistake, you use ^FF0000["+.@weapon$+"]^000000 that Holgren has thrown your way to attack the unidentified creature. With a thud, the unidentified creature's body is swaying."; break;
+					case 4: .@str$ = "You attempt to attack with your recent expensive purchase ^FF0000["+.@weapon$+"]^000000. You hit the unidentified creature's body with a thud."; break;
+					case 5: .@str$ = "You use a borrowed ^FF0000["+.@weapon$+"]^000000 to attack the unidentified creature, but the weapon slipped. But the weapon flies off and pierces the creature's body."; break;
+					case 7: .@str$ = "With your precious ^FF0000["+.@weapon$+"]^000000, you attacked the unidentified creature. It was as if the weapon was part of your body."; break;
+					case 8: .@str$ = "You use your lucky ^FF0000["+.@weapon$+"]^000000 to attack the unidentified creature."; break;
+					case 10: .@str$ = "You use a friend's ^FF0000["+.@weapon$+"]^000000 to attack the unidentified creature."; break;
 				}
 				mes .@str$+" ^FF0000["+.@p_damage+"]^000000 damage inflicted.";
 				break;
@@ -3648,9 +3648,9 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 			next;
 			break;
 		case 2: // Skill
-			set .@p_damage,20;
-			set .@pc_attack, rand(1,6);
-			set .@skillname$, .@skills$[rand(5)];
+			.@p_damage = 20;
+			.@pc_attack = rand(1,6);
+			.@skillname$ = .@skills$[rand(5)];
 			mes "["+strcharinfo(0)+"'s Attack]";
 			switch(.@pc_attack) {
 			// Miss.
@@ -3666,11 +3666,11 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 			// Hit.
 			default:
 				specialeffect EF_BASH;
-				set .@npc_hp, .@npc_hp - .@p_damage;
+				.@npc_hp -= .@p_damage;
 				switch(.@pc_attack) {
-					case 1: set .@str$, "With an attack so fast and furious, the creature is too stunned to move."; break;
-					case 3: set .@str$, "The creature dodged, but you foresaw his movements and targeted accurately."; break;
-					case 5: set .@str$, "Your skill flew in a perfect parabola and hit the creature exactly."; break;
+					case 1: .@str$ = "With an attack so fast and furious, the creature is too stunned to move."; break;
+					case 3: .@str$ = "The creature dodged, but you foresaw his movements and targeted accurately."; break;
+					case 5: .@str$ = "Your skill flew in a perfect parabola and hit the creature exactly."; break;
 				}
 				mes "You use skill ^0000FF["+.@skillname$+"]^000000 to attack the unidentified creature. "+.@str$+" ^FF0000["+.@p_damage+"]^000000 damage inflicted.";
 				break;
@@ -3678,12 +3678,12 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 			next;
 			break;
 		case 3: // Tooth
-			set .@p_damage,50;
-			set .@pc_attack, rand(1,10);
+			.@p_damage = 50;
+			.@pc_attack = rand(1,10);
 			mes "["+strcharinfo(0)+"'s Attack]";
 			if (.@pc_attack == 4 || .@pc_attack == 7) {
 				specialeffect EF_HIT1;
-				set .@npc_hp, .@npc_hp - .@p_damage;
+				.@npc_hp -= .@p_damage;
 				mes "You use your well-groomed teeth to bite the unidentified creature hard until your teeth sink into its flesh. ^FF0000["+.@p_damage+"]^000000 damage inflicted.";
 			} else
 				mes "You use your steel-like teeth to bite the unidentified creature, but the frightened creature dodged. He stares at you with strange eyes.";
@@ -3701,7 +3701,7 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 				next;
 				specialeffect2 EF_HIT1;
 				mes "The creature slams you with its tail. It's so painful that a tear rolls out of your eyes. ^FF000010^000000 damaged received.";
-				set .@pc_hp, .@pc_hp - 10;
+				.@pc_hp -= 10;
 				next;
 				// Unofficial check, but it's needed here.
 				callsub L_CheckPCAlive, .@pc_hp;
@@ -3725,7 +3725,7 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 					end;
 				}
 				mes "Found Researcher Raffle's ^0000FF Research tool ^000000.";
-				set ep14_1_goki, ep14_1_goki+1;
+				ep14_1_goki += 1;
 				getitem 6385,1; //Research_Tool_Bag
 				setquest 5029;
 				next;
@@ -3752,8 +3752,8 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 					changequest 5017,5018;
 					break;
 				}
-				set ep14_1_muk, ep14_1_muk+1;
-				set ep14_1_goki, ep14_1_goki+1;
+				ep14_1_muk += 1;
+				ep14_1_goki += 1;
 				close2;
 				donpcevent "Black Shadow#ep14_muk::OnDisable";
 				end;
@@ -3762,7 +3762,7 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 				next;
 				if(select("Check the body of the unidentified creature.:Leave.") == 2) {
 					setquest 5029;
-					set ep14_1_goki, ep14_1_goki+1;
+					ep14_1_goki += 1;
 					close2;
 					donpcevent "Black Shadow#ep14_muk::OnDisable";
 					end;
@@ -3770,21 +3770,21 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 				if (rand(1,30) == 7) {
 					if (checkweight(6380,1) == 0) {
 						mes "While you were checking the body of the unidentified creature, your fingers touch something. You got lucky, but due to your heavy load you failed to obtain a ^0000FF Mora Coin^000000.";
-						set ep14_1_goki, ep14_1_goki+1;
+						ep14_1_goki += 1;
 						setquest 5029;
 						close2;
 						donpcevent "Black Shadow#ep14_muk::OnDisable";
 						end;
 					}
 					mes "While you were checking the body of the unidentified creature, your fingers touch something. Lucky. Obtained a ^0000FF Mora Coin^000000.";
-					set ep14_1_goki, ep14_1_goki+1;
+					ep14_1_goki += 1;
 					getitem 6380,1; //Mora_Coin
 					setquest 5029;
 					next;
 					mes "The creature wakes up and disappears into the dark hole.";
 				} else {
 					mes "As soon as you touch the creature's body, it wakes up and disappears into the dark hole.";
-					set ep14_1_goki, ep14_1_goki+1;
+					ep14_1_goki += 1;
 					setquest 5029;
 				}
 				close2;
@@ -3797,18 +3797,18 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 		mes "Unidentified Creature HP = "+.@npc_hp;
 		next;
 		mes "[Attack of the unidentified creature]";
-		set .@npc_attack, rand(1,3);
+		.@npc_attack = rand(1,3);
 		switch(.@npc_attack) {
 		case 1:
-			set .@n_damage,10;
+			.@n_damage = 10;
 			mes "The unidentified creature shoots a stream of bath water.";
 			break;
 		case 2:
-			set .@n_damage,20;
+			.@n_damage = 20;
 			mes "The unidentified creature dashes at you with great speed. It appears to be attempting a headbutt.";
 			break;
 		case 3:
-			set .@n_damage,50;
+			.@n_damage = 50;
 			mes "The unidentified creature runs at you with its teeth bared. It appears to be attempting to bite.";
 			break;
 		}
@@ -3831,13 +3831,13 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 				mes "You stand still. While you were standing stupidly, the creature comes near and bites you mercilessly. Your mind is clear in an instant. ^FF0000["+.@n_damage+"]^000000 damage received.";
 				break;
 			}
-			set .@pc_hp, .@pc_hp - .@n_damage;
+			.@pc_hp -= .@n_damage;
 			next;
 			break;
 		case 2:
 			switch(.@npc_attack) {
 			case 1:
-				set .@miss, rand(1,5);
+				.@miss = rand(1,5);
 				mes "[Attack of the unidentified creature]";
 				switch(.@miss) {
 				// Miss.
@@ -3850,11 +3850,11 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 				// Hit.
 				default:
 					specialeffect2 EF_ICEARROW;
-					set .@pc_hp, .@pc_hp - .@n_damage;
+					.@pc_hp -= .@n_damage;
 					switch(.@miss) {
-						case 2: set .@str$,"face"; break;
-						case 4: set .@str$,"stomach"; break;
-						case 5: set .@str$,"arm"; break;
+						case 2: .@str$ = "face"; break;
+						case 4: .@str$ = "stomach"; break;
+						case 5: .@str$ = "arm"; break;
 					}
 					mes "The stream of water hits your "+.@str$+" squarely. ^FF0000["+.@n_damage+"]^000000 damage received.";
 					break;
@@ -3862,7 +3862,7 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 				next;
 				break;
 			case 2:
-				set .@miss, rand(1,10);
+				.@miss = rand(1,10);
 				mes "[Attack of the unidentified creature]";
 				switch(.@miss) {
 				// Miss.
@@ -3881,14 +3881,14 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 				// Hit.
 				default:
 					specialeffect2 EF_BASH;
-					set .@pc_hp, .@pc_hp - .@n_damage;
+					.@pc_hp -= .@n_damage;
 					switch(.@miss) {
-						case 2: set .@str$,"With a thud, you can feel intense pain."; break;
-						case 4: set .@str$,"*thud* Your back seems to give way."; break;
-						case 6: set .@str$,"The creature's attack hits you in the shoulder."; break;
-						case 8: set .@str$,"The attack is like an arrow."; break;
-						case 9: set .@str$,"The attack was fast and accurate."; break;
-						case 10: set .@str$,"It hits your hand with a thud."; break;
+						case 2: .@str$ = "With a thud, you can feel intense pain."; break;
+						case 4: .@str$ = "*thud* Your back seems to give way."; break;
+						case 6: .@str$ = "The creature's attack hits you in the shoulder."; break;
+						case 8: .@str$ = "The attack is like an arrow."; break;
+						case 9: .@str$ = "The attack was fast and accurate."; break;
+						case 10: .@str$ = "It hits your hand with a thud."; break;
 					}
 					mes "The unidentified creature dashes at you and headbutts. "+.@str$+" ^FF0000["+.@n_damage+"]^000000 damage received.";
 					break;
@@ -3896,7 +3896,7 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 				next;
 				break;
 			case 3:
-				set .@miss, rand(1,10);
+				.@miss = rand(1,10);
 				mes "[Attack of the unidentified creature]";
 				switch(.@miss) {
 				// Miss.
@@ -3921,12 +3921,12 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 				// Hit.
 				default:
 					specialeffect2 EF_HIT1;
-					set .@pc_hp, .@pc_hp - .@n_damage;
+					.@pc_hp -= .@n_damage;
 					switch(.@miss) {
-						case 2: set .@str$,"leg. Its sharp teeth penetrate your legs."; break;
-						case 4: set .@str$,"arm. Its sharp teeth penetrate your arm."; break;
-						case 6: set .@str$,"toe. You feel like your toe is being cut off."; break;
-						case 10: set .@str$,"finger. You feel like your finger is being cut off."; break;
+						case 2: .@str$ = "leg. Its sharp teeth penetrate your legs."; break;
+						case 4: .@str$ = "arm. Its sharp teeth penetrate your arm."; break;
+						case 6: .@str$ = "toe. You feel like your toe is being cut off."; break;
+						case 10: .@str$ = "finger. You feel like your finger is being cut off."; break;
 					}
 					mes "The unidentified creature runs at you with its teeth bared, and bites your "+.@str$+" ^FF0000["+.@n_damage+"]^000000 damage received.";
 					break;
@@ -3936,78 +3936,78 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 			}
 			break;
 		case 3:
-			set .@defend, rand(1,10);
+			.@defend = rand(1,10);
 			switch(.@npc_attack) {
 			case 1:
 				if (.@defend == 3 || .@defend == 6) {
-					set .@n_damage, .@n_damage / 2;
+					.@n_damage /= 2;
 					specialeffect2 EF_GUARD;
 				} else
 					specialeffect2 EF_ICEARROW;
-				set .@pc_hp, .@pc_hp - .@n_damage;
+				.@pc_hp -= .@n_damage;
 				mes "[Defense of "+strcharinfo(0)+"]";
 				switch(.@defend) {
 					// Blocked.
-					case 3: set .@str$,"You block the stream of water with your strong butt. Feels refreshing. HP reduced only by half."; break;
-					case 6: set .@str$,"You block the stream of water with your strong hands. Your hands sting a little. HP reduced only by half."; break;
+					case 3: .@str$ = "You block the stream of water with your strong butt. Feels refreshing. HP reduced only by half."; break;
+					case 6: .@str$ = "You block the stream of water with your strong hands. Your hands sting a little. HP reduced only by half."; break;
 					// Not blocked.
-					case 1: set .@str$,"You try to block the stream of water with your strong butt, but it's too late."; break;
-					case 2: set .@str$,"You try to block the stream of water with your big gut, but to no avail."; break;
-					case 4: set .@str$,"You try to block the stream of water with your gathered hands, but the creature targets a different place."; break;
-					case 5: set .@str$,"You try to block the stream of water with your strong hands, but you fail."; break;
-					case 7: set .@str$,"You try to block the stream of water with arms crossed, but you fold them wrong."; break;
-					case 8: set .@str$,"You try to block the stream of water with your rock-like head, but it was not possible."; break;
-					case 9: set .@str$,"You try to block the stream of water with your solid muscles, but it was not possible."; break;
-					case 10: set .@str$,"You try to block the stream of water with your strong feet, but your effort was wasted."; break;
+					case 1: .@str$ = "You try to block the stream of water with your strong butt, but it's too late."; break;
+					case 2: .@str$ = "You try to block the stream of water with your big gut, but to no avail."; break;
+					case 4: .@str$ = "You try to block the stream of water with your gathered hands, but the creature targets a different place."; break;
+					case 5: .@str$ = "You try to block the stream of water with your strong hands, but you fail."; break;
+					case 7: .@str$ = "You try to block the stream of water with arms crossed, but you fold them wrong."; break;
+					case 8: .@str$ = "You try to block the stream of water with your rock-like head, but it was not possible."; break;
+					case 9: .@str$ = "You try to block the stream of water with your solid muscles, but it was not possible."; break;
+					case 10: .@str$ = "You try to block the stream of water with your strong feet, but your effort was wasted."; break;
 				}
 				mes .@str$+" ^FF0000["+.@n_damage+"]^000000 damage received.";
 				next;
 				break;
 			case 2:
 				if (.@defend == 1 || .@defend == 3 || .@defend == 5 || .@defend == 7) {
-					set .@n_damage, .@n_damage / 2;
+					.@n_damage /= 2;
 					specialeffect2 EF_GUARD;
 				} else
 					specialeffect2 EF_BASH;
-				set .@pc_hp, .@pc_hp - .@n_damage;
+				.@pc_hp -= .@n_damage;
 				mes "[Defense of "+strcharinfo(0)+"]";
 				switch(.@defend) {
 					// Blocked.
-					case 1: set .@str$,"You block the dash attack with your fat butt. Your butt is world class. HP reduced only by half."; break;
-					case 3: set .@str$,"You block the dash attack with your big gut. Your gut is world class. HP reduced only by half."; break;
-					case 5: set .@str$,"You block the dash attack with your strong hands. Your hands are world class. HP reduced only by half."; break;
-					case 7: set .@str$,"The unidentified creature dashed with lightning speed, but you easily block the attack with your big gut. Your gut is world class. HP reduced only by half."; break;
+					case 1: .@str$ = "You block the dash attack with your fat butt. Your butt is world class. HP reduced only by half."; break;
+					case 3: .@str$ = "You block the dash attack with your big gut. Your gut is world class. HP reduced only by half."; break;
+					case 5: .@str$ = "You block the dash attack with your strong hands. Your hands are world class. HP reduced only by half."; break;
+					case 7: .@str$ = "The unidentified creature dashed with lightning speed, but you easily block the attack with your big gut. Your gut is world class. HP reduced only by half."; break;
 					// Not blocked.
-					case 2: set .@str$,"You try to block the dash attack with your fat butt, but miss and get hit in an unmentionable place."; break;
-					case 4: set .@str$,"You try to block the dash attack with your big gut, but your gut isn't big enough to absorb the impact."; break;
-					case 6: set .@str$,"You try to block the dash attack with arms crossed, but you feel an incredible force."; break;
-					case 8: set .@str$,"You try to block the dash attack, to no avail."; break;
-					case 9: set .@str$,"You try to block the dash attack with your strong hands, to no avail."; break;
-					case 10: set .@str$,"You try to block the dash attack with your durable feet, but the pain woke you up."; break;
+					case 2: .@str$ = "You try to block the dash attack with your fat butt, but miss and get hit in an unmentionable place."; break;
+					case 4: .@str$ = "You try to block the dash attack with your big gut, but your gut isn't big enough to absorb the impact."; break;
+					case 6: .@str$ = "You try to block the dash attack with arms crossed, but you feel an incredible force."; break;
+					case 8: .@str$ = "You try to block the dash attack, to no avail."; break;
+					case 9: .@str$ = "You try to block the dash attack with your strong hands, to no avail."; break;
+					case 10: .@str$ = "You try to block the dash attack with your durable feet, but the pain woke you up."; break;
 				}
 				mes .@str$+" ^FF0000["+.@n_damage+"]^000000 damage received.";
 				next;
 				break;
 			case 3:
 				if (.@defend == 2 || .@defend == 4 || .@defend == 6 || .@defend == 8) {
-					set .@n_damage, .@n_damage / 2;
+					.@n_damage /= 2;
 					specialeffect2 EF_GUARD;
 				}
-				set .@pc_hp, .@pc_hp - .@n_damage;
+				.@pc_hp -= .@n_damage;
 				mes "[Defense of "+strcharinfo(0)+"]";
 				switch(.@defend) {
 					// Blocked.
-					case 2: set .@str$,"but you block its attack with a branch nearby. HP reduced only by half."; break;
-					case 4: set .@str$,"but you block its attack with a weapon. HP reduced only by half."; break;
-					case 6: set .@str$,"but you block its attack using skill ^0000FFFriend Shield^000000. HP reduced only by half."; break;
-					case 8: set .@str$,"but you block its attack using a book you always carry around. HP reduced only by half."; break;
+					case 2: .@str$ = "but you block its attack with a branch nearby. HP reduced only by half."; break;
+					case 4: .@str$ = "but you block its attack with a weapon. HP reduced only by half."; break;
+					case 6: .@str$ = "but you block its attack using skill ^0000FFFriend Shield^000000. HP reduced only by half."; break;
+					case 8: .@str$ = "but you block its attack using a book you always carry around. HP reduced only by half."; break;
 					// Not blocked.
-					case 1: set .@str$,"and bites your arm."; break;
-					case 3: set .@str$,"and bites your leg."; break;
-					case 5: set .@str$,"and bites your shoulder."; break;
-					case 7: set .@str$,"and bites your finger."; break;
-					case 9: set .@str$,"and bites your finger."; break;
-					case 10: set .@str$,"and bites your toe."; break;
+					case 1: .@str$ = "and bites your arm."; break;
+					case 3: .@str$ = "and bites your leg."; break;
+					case 5: .@str$ = "and bites your shoulder."; break;
+					case 7: .@str$ = "and bites your finger."; break;
+					case 9: .@str$ = "and bites your finger."; break;
+					case 10: .@str$ = "and bites your toe."; break;
 				}
 				mes "The unidentified creature runs at you with its teeth bared, "+.@str$+" ^FF0000["+.@n_damage+"]^000000 damage received.";
 				next;
@@ -4027,7 +4027,7 @@ mora,114,79,0	script	Black Shadow#ep14_muk	CLEAR_NPC,{
 				mes "You fail to escape.";
 				next;
 				mes "The creature slams you with its tail. It's so painful that a tear rolls out of your eyes. ^FF000010^000000 damaged received.";
-				set .@pc_hp, .@pc_hp - 10;
+				.@pc_hp -= 10;
 				next;
 			}
 			break;
@@ -4121,11 +4121,11 @@ OnFullon:
 		end;
 	} else if (questprogress(5021) || questprogress(5022)) {
 		if (questprogress(5021)) {
-			set .@str$,"tooth";
-			set .@item,6387; //Teeth_Sample
+			.@str$ = "tooth";
+			.@item = 6387; //Teeth_Sample
 		} else {
-			set .@str$,"scale";
-			set .@item,6388; //Scale_Sample
+			.@str$ = "scale";
+			.@item = 6388; //Scale_Sample
 		}
 		mes "Something is shining in the water.";
 		mes "You may be able to collect the unidentified creature's "+.@str$+" samples.";
@@ -4218,7 +4218,7 @@ mora,116,81,0	duplicate(???#mora)	???#ep14_muk04	CLEAR_NPC,2,2
 mora,118,86,0	duplicate(???#mora)	???#ep14_muk05	CLEAR_NPC,2,2
 
 -	script	#mora_puddle	-1,{
-	set .@i, atoi(charat(strnpcinfo(2),9));
+	.@i = atoi(charat(strnpcinfo(2),9));
 
 	// This script has a lot of checks,
 	// so arrays are only set when used.
@@ -4254,13 +4254,13 @@ mora,118,86,0	duplicate(???#mora)	???#ep14_muk05	CLEAR_NPC,2,2
 		}
 	}
 
-	set .@quest1[0], .@quest1[.@i];
-	set .@dir$[0], .@dir$[.@i];
+	.@quest1[0] = .@quest1[.@i];
+	.@dir$[0] = .@dir$[.@i];
 	deletearray .@quest1[.@i],1;
 	deletearray .@dir$[.@i],1;
 
 	if (questprogress(.@quest1[1]) || questprogress(.@quest1[2]) || questprogress(.@quest1[3])) {
-		for(set .@j,1; .@j<=3; set .@j,.@j+1) {
+		for(.@j = 1; .@j<=3; ++.@j) {
 			if (questprogress(.@quest1[.@j]))
 				break;
 		}
@@ -4269,7 +4269,7 @@ mora,118,86,0	duplicate(???#mora)	???#ep14_muk05	CLEAR_NPC,2,2
 	}
 
 	setarray .@quest2[1],5030,5031,5032,5033;
-	set .@quest2[0], .@quest2[.@i];
+	.@quest2[0] = .@quest2[.@i];
 	deletearray .@quest2[.@i],1;
 
 	if (ep14_1_goki == 30 && questprogress(.@quest2[0])) {
@@ -4418,7 +4418,7 @@ mora,133,80,6	script	Elephantine#pa0829	4_ELEPHANT,{
 		next;
 		mes "[Elephantine]";
 		mes "I'd like you to take them out as you see them, before they try to sell anything to the adventurers lost in the forest.";
-		set .@n$,"Fruit-Carrying Insects";
+		.@n$ = "Fruit-Carrying Insects";
 		break;
 	case 2:
 		setquest 12226;
@@ -4428,7 +4428,7 @@ mora,133,80,6	script	Elephantine#pa0829	4_ELEPHANT,{
 		next;
 		mes "[Elephantine]";
 		mes "No casualties have been reported yet, but it wouldn't hurt to take precautions. Please deal with them appropriately.";
-		set .@n$,"Flowery Hunters";
+		.@n$ = "Flowery Hunters";
 		break;
 	case 3:
 		setquest 12227;
@@ -4438,7 +4438,7 @@ mora,133,80,6	script	Elephantine#pa0829	4_ELEPHANT,{
 		next;
 		mes "[Elephantine]";
 		mes "They didn't look so ferocious... but the adventurer has asked me to get rid of them, so you'll have to do it.";
-		set .@n$,"Small but Ferocious...";
+		.@n$ = "Small but Ferocious...";
 		break;
 	case 4:
 		setquest 12228;
@@ -4448,7 +4448,7 @@ mora,133,80,6	script	Elephantine#pa0829	4_ELEPHANT,{
 		next;
 		mes "[Elephantine]";
 		mes "I don't know what grudge he has against the fairies, but a request is a request.";
-		set .@n$,"An Unknown Grudge";
+		.@n$ = "An Unknown Grudge";
 		break;
 	case 5:
 		setquest 12229;
@@ -4458,7 +4458,7 @@ mora,133,80,6	script	Elephantine#pa0829	4_ELEPHANT,{
 		next;
 		mes "[Elephantine]";
 		mes "They don't seem so dangerous, but they are reported to steal books and sweets from adventurers. Please deal with them appropriately.";
-		set .@n$,"Blondie Ann";
+		.@n$ = "Blondie Ann";
 		break;
 	}
 	next;
@@ -4503,7 +4503,7 @@ mora,115,98,8	script	Hotcha#pa0829	4_ELEPHANT,{
 		next;
 		mes "[Hotcha]";
 		mes "Once they are removed, go talk to Elephantine and you can receive new tasks.";
-		for(set .@i,12225; .@i<=12229; set .@i,.@i+1) {
+		for(.@i = 12225; .@i<=12229; ++.@i) {
 			if (questprogress(.@i))
 				erasequest .@i;
 		}
@@ -4520,7 +4520,7 @@ mora,115,98,8	script	Hotcha#pa0829	4_ELEPHANT,{
 	mes "Please wait a minute while I check the documents.";
 	next;
 
-	for(set .@i,12225; .@i<=12229; set .@i,.@i+1) {
+	for(.@i = 12225; .@i<=12229; ++.@i) {
 		if (questprogress(.@i,HUNTING) == 2) {
 			mes "[Hotcha]";
 			mes "Yes, I see you've completed the task. It has been confirmed as completed.";
@@ -4601,7 +4601,7 @@ mora,119,103,4	script	Bow-wow#pa0829	4_M_DOGTRAVELER,{
 		next;
 		mes "[Bow-wow]";
 		mes "*grin* None other than... Insect Feelers! The General Goods Dealer there asked me to get four of them. I personally would not eat it for all the world...";
-		set .@n$,"Material for the Preservative";
+		.@n$ = "Material for the Preservative";
 		break;
 	case 2:
 		setquest 12232;
@@ -4611,7 +4611,7 @@ mora,119,103,4	script	Bow-wow#pa0829	4_M_DOGTRAVELER,{
 		next;
 		mes "[Bow-wow]";
 		mes "Immortal Hearts seem to be all the rage lately. The General Goods Merchant asked me to get five of them.";
-		set .@n$,"A Symbol of Resistance";
+		.@n$ = "A Symbol of Resistance";
 		break;
 	case 3:
 		setquest 12233;
@@ -4621,7 +4621,7 @@ mora,119,103,4	script	Bow-wow#pa0829	4_M_DOGTRAVELER,{
 		next;
 		mes "[Bow-wow]";
 		mes "The client is the General Goods Merchant over there. Three bunches of them will be enough.";
-		set .@n$,"Material for First Aid Kits";
+		.@n$ = "Material for First Aid Kits";
 		break;
 	case 4:
 		setquest 12234;
@@ -4631,7 +4631,7 @@ mora,119,103,4	script	Bow-wow#pa0829	4_M_DOGTRAVELER,{
 		next;
 		mes "[Bow-wow]";
 		mes "The General Goods Dealer asked me to get three Orcish Vouchers, which are to be used to make symbols of courage.";
-		set .@n$,"Symbols of Courage";
+		.@n$ = "Symbols of Courage";
 		break;
 	case 5:
 		setquest 12235;
@@ -4641,7 +4641,7 @@ mora,119,103,4	script	Bow-wow#pa0829	4_M_DOGTRAVELER,{
 		next;
 		mes "[Bow-wow]";
 		mes "The General Goods Dealer asked me to get three Skel-Bones, which are to be used to make tonic.";
-		set .@n$,"Good for Stamina...";
+		.@n$ = "Good for Stamina...";
 		break;
 	}
 	next;
@@ -4686,7 +4686,7 @@ mora,119,118,4	script	General Good Dealer#pa0	4_M_RAFLE_GR,{
 		next;
 		mes "[General Good Dealer]";
 		mes "Once they are removed, go talk to Bow-wow and you can receive new tasks.";
-		for(set .@i,12231; .@i<=12235; set .@i,.@i+1) {
+		for(.@i = 12231; .@i<=12235; ++.@i) {
 			if (questprogress(.@i))
 				erasequest .@i;
 		}
@@ -4797,7 +4797,7 @@ mora,124,108,7	script	Woof-grrr#pa0829	4_M_DOGTRAVELER2,{
 		next;
 		mes "[Woof-grrr]";
 		mes "Mementos serve as inspirations for designers of those cases. The Commodities Dealer across from me asked me to get two of them.";
-		set .@n$,"The Latest Trend in Talismans";
+		.@n$ = "The Latest Trend in Talismans";
 		break;
 	case 2:
 		setquest 12237;
@@ -4807,7 +4807,7 @@ mora,124,108,7	script	Woof-grrr#pa0829	4_M_DOGTRAVELER2,{
 		next;
 		mes "[Woof-grrr]";
 		mes "The Commodities Dealer across from me seems to make protective cases out of Shells. I was asked to get three of them.";
-		set .@n$,"Keep Your Valuables Safe";
+		.@n$ = "Keep Your Valuables Safe";
 		break;
 	case 3:
 		setquest 12238;
@@ -4817,7 +4817,7 @@ mora,124,108,7	script	Woof-grrr#pa0829	4_M_DOGTRAVELER2,{
 		next;
 		mes "[Woof-grrr]";
 		mes "The Commodities Dealer across from me asked me to get three Scale Shells, which are to be used to make knee protectors.";
-		set .@n$,"Material for Knee Protectors";
+		.@n$ = "Material for Knee Protectors";
 		break;
 	case 4:
 		setquest 12239;
@@ -4827,7 +4827,7 @@ mora,124,108,7	script	Woof-grrr#pa0829	4_M_DOGTRAVELER2,{
 		next;
 		mes "[Woof-grrr]";
 		mes "The Commodities Dealer across from me asked me to get two Venom Canines, which are to be used in the research of the substance.";
-		set .@n$,"Poison for Poison...";
+		.@n$ = "Poison for Poison...";
 		break;
 	case 5:
 		setquest 12240;
@@ -4837,7 +4837,7 @@ mora,124,108,7	script	Woof-grrr#pa0829	4_M_DOGTRAVELER2,{
 		next;
 		mes "[Woof-grrr]";
 		mes "The Commodities Dealer across from me commissioned me to get five globs of Sticky Mucus.";
-		set .@n$,"Don't Slip and Fall";
+		.@n$ = "Don't Slip and Fall";
 		break;
 	}
 	next;
@@ -4882,7 +4882,7 @@ mora,127,112,4	script	Commodities Dealer#pa08	4_F_RAFLE_PK,{
 		next;
 		mes "[Commodities Dealer]";
 		mes "Once they are removed, go talk to Woof-grrr and you can receive new tasks.";
-		for(set .@i,12236; .@i<=12240; set .@i,.@i+1) {
+		for(.@i = 12236; .@i<=12240; ++.@i) {
 			if (questprogress(.@i))
 				erasequest .@i;
 		}
@@ -4960,7 +4960,7 @@ mora,170,101,4	script	Soul Guide#pa0829	4_F_DOGTRAVELER,{
 		close;
 	} else if (.@playtime == 2) {
 		mes "You feel your mind has calmed down once again. You now have enough energy to go look for other souls, so talk to the Guide again.";
-		for(set .@i,12243; .@i<=12252; set .@i,.@i+1) {
+		for(.@i = 12243; .@i<=12252; ++.@i) {
 			if (questprogress(.@i))
 				erasequest .@i;
 		}
@@ -4990,66 +4990,66 @@ mora,170,101,4	script	Soul Guide#pa0829	4_F_DOGTRAVELER,{
 		setquest 12243;
 		setquest 12253;
 		mes "^660066Age 32. Comes from Midgard. Has been missing for 3 months since he went to the Maze of the Hazy Forest in order to collect the native plants. Low chance of survival.^000000";
-		set .@n$,"Tazar";
+		.@n$ = "Tazar";
 		break;
 	case 2:
 		setquest 12244;
 		setquest 12253;
 		mes "^660066Age 19. Adventurer who came from a far, unknown place by ship. Been missing for 2 months since he went to explore the Maze dressed in thin tights, despite dissuasion of all Mora residents.";
 		mes "Even if he's alive, he would cause trouble to the rescue team.^000000";
-		set .@n$,"Niger";
+		.@n$ = "Niger";
 		break;
 	case 3:
 		setquest 12245;
 		setquest 12253;
 		mes "^660066Age unknown. Has some mental illness. Went alone in order to purify the Maze of the Hazy forest. He insists that he has good ancestry but no one trusts him.";
 		mes "Disappearance period : 12 years. Not much chance of survival.^000000";
-		set .@n$,"Messil";
+		.@n$ = "Messil";
 		break;
 	case 4:
 		setquest 12246;
 		setquest 12253;
 		mes "^660066Age 51. Used to be a big thief who stole famous swords from all around the world.";
 		mes "Went missing in the Maze after being pursued for running an illegal casino house which caused massive casualties in his final years. Low chance of survival.^000000";
-		set .@n$,"Noirit";
+		.@n$ = "Noirit";
 		break;
 	case 5:
 		setquest 12247;
 		setquest 12253;
 		mes "^660066Age 22. An apprentice of an airship pilot. He has gone missing while drinking in Mora town, where he went for a break.";
 		mes "Rumor has it that he fled after signing somewhere. Disappearance period : 4 months. Low chance of survival.^000000";
-		set .@n$,"Pajama Sin";
+		.@n$ = "Pajama Sin";
 		break;
 	case 6:
 		setquest 12248;
 		setquest 12253;
 		mes "^660066Age Unknown. A female with long hair, dressed in black. Went on an expedition to the forest of the Maze in search of eternal life. Disappearance period : 3 months. Low chance of survival.^000000";
-		set .@n$,"Mendel";
+		.@n$ = "Mendel";
 		break;
 	case 7:
 		setquest 12249;
 		setquest 12253;
 		mes "^660066Age around 50. The current Mayor of the Mora village. He ran away to the Forest of Maze after being caught pocketing profits by cheating the residents. Survival uncertain.^000000";
-		set .@n$,"Milebit";
+		.@n$ = "Milebit";
 		break;
 	case 8:
 		setquest 12250;
 		setquest 12253;
 		mes "^660066Age 29. A young man with an unknown background.";
 		mes "Fled to the forest of maze after scamming 1200 Mora coins from Mora residents while pretending to start a lot of business and adapting himself in Mora. Survival uncertain.^000000";
-		set .@n$,"Kunmoon";
+		.@n$ = "Kunmoon";
 		break;
 	case 9:
 		setquest 12251;
 		setquest 12253;
 		mes "^660066Age 34. Flirted with several women in Mora. Fled from Mora villagers to the forest of maze. Survival uncertain.^000000";
-		set .@n$,"Chaihokin";
+		.@n$ = "Chaihokin";
 		break;
 	case 10:
 		setquest 12252;
 		setquest 12253;
 		mes "^660066Age Unknown. Disappered with coins which were joint controlled by the villagers. Low chance of survival.^000000";
-		set .@n$,"Tual";
+		.@n$ = "Tual";
 		break;
 	}
 	next;
@@ -5088,12 +5088,12 @@ sec_in02,29,34,5	script	Initializing Mora Sanjo	4_MAN_NITT,{
 		mes "[Initialization]";
 		mes "14.1 Initializing all quest window include related daily quest and map and so on";
 		freeloop(1);
-		for(set .@i,12225; .@i<=12353; set .@i,.@i+1) {
+		for(.@i = 12225; .@i<=12353; ++.@i) {
 			if (questprogress(.@i))
 				erasequest .@i;
 		}
 		freeloop(0);
-		set ep14_1_mistwoods,10;
+		ep14_1_mistwoods = 10;
 		close;
 	}
 }
@@ -5279,7 +5279,7 @@ mora,114,163,5	script	Knights Head#mo	4_M_RAFLE_OR,{
 			mes "I think you'll make a great right-hand man, the Chief.";
 			mes "I feel rewarded, as the Boss.";
 			mes "As the Leader, I'm so pleased to see you all improve.";
-			set ep14_1_rope,12;
+			ep14_1_rope = 12;
 			setquest 1118;
 			close;
 		}
@@ -5314,7 +5314,7 @@ mora,114,163,5	script	Knights Head#mo	4_M_RAFLE_OR,{
 		mes "It's no use trying to do it.";
 		completequest 1118;
 		delitem 6383,30; //Clue_Of_Lope
-		set ep14_1_rope,13;
+		ep14_1_rope = 13;
 		getitem 6380,2; //Mora_Coin
 		getexp 1000000,1000000;
 		close;