Merge pull request #1729 from HerculesWS/uwe_kleine_quest

 Optimize Uwe Kleine NPC, fix typos and an unintended fallthrough in quests_ein

Uwe Kleine NPC had a lot of repetition, solved by using functions.
There was a case where you'd select the option "About Cooking"
which only displays text when ein_cook % 2 == 1 and ein_cook < 10,
for any other case it would fallthrough to the next option.
Wrong grammar and typos have been corrected as well,
some of them outside of the Uwe Kleine NPC.

1 files changed, 618 insertions, 2102 deletions

diff --git a/npc/quests/quests_ein.txt b/npc/quests/quests_ein.txt
index f7d702277..f5b2e14a6 100644
--- a/npc/quests/quests_ein.txt
+++ b/npc/quests/quests_ein.txt
@@ -474,20 +474,479 @@ einbech,97,167,5	script	Cavitar	4_M_EINOLD,{
 
 //== Uwe Kleine :: ein_anoz ================================
 einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
+	function F_AboutEinbroch {
+		mes "[Uwe]";
+		mes "Einbroch was originally";
+		mes "built to support Einbech's";
+		mes "mining efforts. Because it's";
+		mes "small and crowded with people,";
+		mes "there's no room to build the ore refining factories over there.";
+		next;
+		mes "[Uwe]";
+		mes "Since Einbroch used to be";
+		mes "an empty lot, it was perfect";
+		mes "for building factories. That's";
+		mes "what my grandfather told me a";
+		mes "long time ago. Anyway, Einbroch quickly grew into a major city.";
+		next;
+		mes "[Uwe]";
+		mes "Now people think that this";
+		mes "city was never planned to be";
+		mes "just an extension of Einbech.";
+		mes "See that rampart over there?";
+		mes "It doesn't connect to Einbech at all! No protection for them...";
+		next;
+		mes "[Uwe]";
+		mes "It's like the government";
+		mes "lost all interest in Einbech.";
+		mes "Even the miners there have";
+		mes "been moving here to work in ";
+		mes "the factories. But more people hasn't made this city more lively.";
+		next;
+		mes "[Uwe]";
+		mes "Einbroch may look modern";
+		mes "and exciting now, but soon";
+		mes "you'll see that there's no sign";
+		mes "of warmth or life. So... Just don't live here in your old age.";
+		next;
+		.@choice2$ = "I won't. Thanks for the advice.";
+		if (BaseClass == Job_Blacksmith)
+			.@choice2$ = "But I like the city life~";
+		switch (select("Then why are you here?", .@choice2$)) {
+		case 1:
+			if (BaseClass == Job_Blacksmith) {
+				mes "[Uwe]";
+				mes "Well, sugar honey,";
+				mes "I've been waiting for";
+				mes "someone. But... It looks";
+				mes "like that person won't be";
+				mes "coming back anyway.";
+				next;
+				mes "[Uwe]";
+				mes "Oooh, but let's not talk";
+				mes "about that. Next time you";
+				mes "drop by, we'll talk about";
+				mes "something more fun, 'kay?";
+				close;
+			}
+			mes "[Uwe]";
+			mes "Well, I have some";
+			mes "precious memories of";
+			mes "this place. Once, there was";
+			mes "a man who lived here who";
+			mes "was just like a father to me.";
+			next;
+			mes "[Uwe]";
+			mes "Oh, but I'm sure that";
+			mes "you don't want to hear";
+			mes "about that. Next time you";
+			mes "drop by, we'll talk about";
+			mes "something more fun, 'kay?";
+			mes "Buhbye for now, cutie~";
+			close;
+		case 2:
+			if (BaseClass != Job_Blacksmith) {
+				mes "[Uwe]";
+				mes "Oh, that is such";
+				mes "a good decision,";
+				mes "sugar honey! Oh, you";
+				mes "cutie adventurers are";
+				mes "so precious, so lovable.";
+				mes "^333333*Tee hee hee~*^000000";
+				next;
+				mes "[Uwe]";
+				mes "Well, that was";
+				mes "a fun talk. Come";
+				mes "back and visit, 'kay?";
+				mes "I'll miss you until";
+				mes "the next time~";
+				close;
+			}
+			mes "[Uwe]";
+			mes "Big cities can be nice,";
+			mes "but you never get to enjoy";
+			mes "the sensation of stepping";
+			mes "barefoot through the grass,";
+			mes "or the magnificent sight of";
+			mes "the shining stars at night.";
+			next;
+			mes "[Uwe]";
+			mes "And the people who live";
+			mes "in the cities can be so";
+			mes "uptight! I've known more";
+			mes "than a few who look down";
+			mes "on people from smaller towns.";
+			next;
+			mes "[Uwe]";
+			mes "It's sad to see some";
+			mes "people will always be";
+			mes "that ignorant. I... I just";
+			mes "can't believe those people";
+			mes "can be sooo close minded!";
+			next;
+			mes "[Uwe]";
+			mes "Oh...!";
+			mes "I'm sorry, I guess";
+			mes "I went a little overboard.";
+			mes "^666666*Titter*^000000 Next time you drop";
+			mes "by, we'll talk about something";
+			mes "more fun, 'kay? Buhbye~";
+			close;
+		}
+	}
+	
+	function F_ForgeWeapon {
+		mes "[Uwe]";
+		mes "Well...";
+		mes "I actually just";
+		mes "do smithing work";
+		mes "to create my own";
+		mes "cooking tools.";
+		next;
+		mes "[Uwe]";
+		mes "Oh, I understand";
+		mes "that somebody needs";
+		mes "to fight the monsters,";
+		mes "but I'm the wrong person";
+		mes "to ask for forging weapons.";
+		mes "I... am a strict pacifist~";
+		next;
+		mes "[Uwe]";
+		mes "Just go look";
+		mes "around for a little";
+		mes "bit, I'm sure you'll";
+		mes "find a Blacksmith";
+		mes "who's willing to forge";
+		mes "you a good weapon~";
+		close;
+	}
+	
+	function F_Cancel {
+		mes "[Uwe]";
+		mes "Oh...?";
+		mes "Well, feel";
+		mes "free to visit";
+		mes "me whenever";
+		mes "you want, 'kay?";
+		close;	
+	}
+	
+	function F_RandCloseMsg {
+		switch (rand(1, 3)) {
+		case 1:
+			mes "...Ho ho~";
+			close;
+		case 2:
+			mes "...*Tee Hee~*";
+			close;
+		case 3:
+			mes "...Behbie~";
+			close;
+		}
+	}
+	
+	function F_Ingredients {
+		mes "[Uwe]";
+		mes "Now for beginners,";
+		mes "learning to select";
+		mes "and use ingredients";
+		mes "is one of the most";
+		mes "important fundamentals.";
+		next;
+		mes "[Uwe]";
+		mes "Cooking is like forging";
+		mes "since specific ingredients";
+		mes "are needed to make specialty";
+		mes "items or dishes. You can't just";
+		mes "skip them if you really need";
+		mes "them, right? Right!";
+		next;
+		mes "[Uwe]";
+		mes "Once you make up your";
+		mes "mind to do something,";
+		mes "focus on finishing it, 'kay?";
+		mes "Never cut corners and always";
+		mes "dedicate yourself to make the";
+		mes "very best finished product~";
+		if (ein_cook == 7 && BaseClass == Job_Blacksmith)
+			ein_cook += 10;
+		next;
+		mes "[Uwe]";
+		mes "Well, that was";
+		mes "a fun talk. Come";
+		mes "back and visit, 'kay?";
+		mes "I'll miss you until";
+		mes "the next time~";
+		F_RandCloseMsg();
+	}
+	
+	function F_Cooking {
+		mes "[Uwe]";
+		mes "Mm...?";
+		mes "Did you just";
+		mes "say that you";
+		mes "want to learn";
+		mes "the art of cooking?";
+		next;
+		mes "[Uwe]";
+		mes "I'm sorry, but I can't";
+		mes "really give culinary";
+		mes "lessons. But I will";
+		mes "give good advice for";
+		mes "hopeful beginners.";
+		next;
+		mes "[Uwe]";
+		mes "Now...";
+		mes "For your tuition";
+		mes "I'll need-- Gosh,";
+		mes "there's just so many";
+		mes "things. Get some paper,";
+		mes "and a pen for this list...";
+		next;
+		ein_cook += 100;
+		mes "[Uwe]";
+		mes "Just kidding!";
+		mes "^333333*Titter~*^000000 I don't need";
+		mes "much to make some";
+		mes "cooking utensils. Bring";
+		mes "6 ^0000FFLarge Jellopy^000000. That's it!";
+		next;
+		mes "[Uwe]";
+		mes "In return, I will give you";
+		mes "1 Coal and some useful";
+		mes "cooking advice for novices.";
+		mes "I give this advice for free to";
+		mes "my smithing colleages, though...";
+		next;
+		mes "[Uwe]";
+		mes "Why ^EEA9B8don't^000000 you";
+		mes "become a Blacksmith?";
+		mes "I'm much more confident";
+		mes "in that field. ^333333*Tee hee~*^000000";
+		next;
+		mes "[Uwe]";
+		mes "Well, I'll be";
+		mes "waiting right";
+		mes "here until you";
+		mes "come back.";
+		F_RandCloseMsg();
+	}
+	
+	function F_Heart {
+		mes "[Uwe]";
+		mes "Ah, heart. Just like forging,";
+		mes "you need passion and desire";
+		mes "to create something special.";
+		mes "Every smith and cook knows that";
+		mes "you can do anything if you have";
+		mes "the will and the commitment.";
+		next;
+		mes "[Uwe]";
+		mes "Well, that's all";
+		mes "I really have to";
+		mes "say about that. But";
+		mes "come back and chat";
+		mes "whenever you please.";
+		F_RandCloseMsg();
+	}
+	
+	function F_Skills {
+		mes "[Uwe]";
+		mes "When you're beginning to learn";
+		mes "skills, you can't let yourself be discouraged! Practice makes";
+		mes "perfect, you know? But never";
+		mes "use your lack of skills as an";
+		mes "excuse if you happen to fail...";
+		next;
+		mes "[Uwe]";
+		mes "Effort is also an essential";
+		mes "in forging and cooking! Now,";
+		mes "on the other hand, if you put";
+		mes "in all the effort but didn't learn any of the skills, you'll still get nowhere fast, right? Right!";
+		next;
+		mes "[Uwe]";
+		mes "The key is to always";
+		mes "give 100% effort and work";
+		mes "on improving your skills.";
+		mes "Before you know it, you'll";
+		mes "be a respected master!";
+		next;
+		mes "[Uwe]";
+		mes "Well, that was";
+		mes "a fun talk. Come";
+		mes "back and visit, 'kay?";
+		mes "I'll miss you until";
+		mes "the next time~";
+		F_RandCloseMsg();
+	}
+	
+	function F_Tools {
+		mes "[Uwe]";
+		mes "Cooking is a little";
+		mes "easier if you have";
+		mes "nicer tools to use,";
+		mes "but that's it. Tools by";
+		mes "themselves can't make";
+		mes "just anybody a master.";
+		next;
+		mes "[Uwe]";
+		mes "In the end, the best";
+		mes "tools are the ones you're";
+		mes "most comfortable with using.";
+		mes "In fact, I still use the old knife I used back when I was just";
+		mes "a little novice chef~";
+		next;
+		mes "[Uwe]";
+		mes "Oh, while we're on";
+		mes "the subject of tools,";
+		mes "I just received some";
+		mes "new hammers today.";
+		mes "Would you like a couple?";
+		next;
+		if (checkweight(Spawn, 50) == 0) {
+			mes "[Uwe]";
+			mes "Mmmm...?";
+			mes "You're holding too many";
+			mes "things. I can't give you any";
+			mes "hammers if you don't have";
+			mes "room. Hurry, put your extra";
+			mes "stuff in your Kafra Storage~";
+			close;
+		}
+		ein_cook += 10;
+		getitem Golden_Hammer, 1;
+		getitem Iron_Hammer, 1;
+		next;
+		mes "[Uwe]";
+		mes "Well, I hope";
+		mes "you like them~";
+		F_RandCloseMsg();
+	}
+	
+	function F_ToolsWithoutReward {
+		mes "[Uwe]";
+		mes "Cooking is a little";
+		mes "easier if you have";
+		mes "nicer tools to use,";
+		mes "but that's it. Tools by";
+		mes "themselves can't make";
+		mes "just anybody a master.";
+		next;
+		mes "[Uwe]";
+		mes "In the end, the best";
+		mes "tools are the ones you're";
+		mes "most comfortable with using.";
+		mes "In fact, I still use the old knife I used back when I was just";
+		mes "a little novice chef~";
+		next;
+		mes "[Uwe]";
+		mes "Well, that was";
+		mes "a fun talk. Come";
+		mes "back and visit, 'kay?";
+		mes "I'll miss you until";
+		mes "the next time~";
+		F_RandCloseMsg();
+	}
+	
+	function F_OverWeight {
+		mes "[Uwe]";
+		mes "Oh, I was going to give";
+		mes "you a little something,";
+		mes "but you've carrying too";
+		mes "many things. Why don't";
+		mes "you put some of it away";
+		mes "in your Kafra Storage?";
+		close;
+	}
+	
+	function F_LargeJellopyForCoal {
+		if (countitem(Large_Jellopy) > 5) {
+			if (checkweight(Spawn, 199) == 0)
+				F_OverWeight();
+			mes "[Uwe]";
+			mes "Thank you ^EEA9B8so^000000 much!";
+			mes "Here's the Coal I promised~";
+			mes "Oh, and take these Mini Furnaces. They were just lying around, so you know, I thought, well, why don't you take them? *Tee hee hee~*";
+			delitem Large_Jellopy, 6;
+			ein_cook = 219;
+			getitem Coal, 1;
+			getitem Portable_Furnace, 10;
+			next;
+			mes "[Uwe]";
+			mes "I hope you enjoy!";
+			mes "Personally, I think the";
+			mes "best part of smithing";
+			mes "is standing over the flaming";
+			mes "heat and getting all ^EEA9B8hot and";
+			mes "sweaty^000000. Ooh, how exciting~!";
+			close;
+		} else if (countitem(Large_Jellopy) > 0) {
+			mes "[Uwe]";
+			mes "Ooh, you're missing";
+			mes "some. I guess you can";
+			mes "still give them to me, but";
+			mes "you'd get less of a reward";
+			if (Sex == SEX_MALE) {
+				mes "...you ^EEA9B8naughty boy^000000.";
+			} else {
+				mes "...you ^EEA9B8naughty girl^000000.";
+			}
+			next;
+			.@choice = select("Give him all.", "Cancel.");
+			if (.@choice == 1) {
+				mes "[Uwe]";
+				mes "Just kidding~";
+				mes "Don't be so nervous, I don't really need those anymore. But since I know you're hard working, I'll throw in a little something extra...";
+				next;
+				mes "[Uwe]";
+				mesf("I usually give you cutie %ss 10 Mini Furnaces, but you can have ^EEA9B811^000000." /* TODO: HULD Plural Table for jobname() */
+				     "There's the little something extra I was talking about.", jobname(Class));
+			} else {
+				mes "[Uwe]";
+				mes "Well... Then... Anyway,";
+				mes "Congratulation to becoming";
+				mesf("a %s!!", jobname(Class));
+				mes "This is my present for it.";
+				if (Sex == SEX_MALE) {
+					mes "...you ^EEA9B8naughty boy^000000.";
+				} else {
+					mes "...you ^EEA9B8naughty girl^000000.";
+				}
+			}
+			if (checkweight(Knife, 1) == 0 ||
+			    checkweight(Spawn, (.@choice == 1 ? 220 : 200)) == 0)
+					F_OverWeight();
+			ein_cook = 219;
+			getitem Portable_Furnace, (.@choice == 1 ? 11 : 10);
+			next;
+			mes "[Uwe]";
+			mes "I know it's not very extravagant, but these will come in handy next time you're smithing. So make the best use of them, 'kay?";
+			close;
+		} else {
+			mes "[Uwe]";
+			mes "^666666You didn't bring";
+			mes "any Large Jellopy...?^000000.";
+			ein_cook = 219;
+			next;
+			mes "[Uwe]";
+			mes "It's fine! It's not like I feel ^EEA9B8betrayed^000000 or anything, but I don't need them anymore! Since we're both in the business of smithing, I just hope that you remember to follow through on your favors, 'kay? Buhbye~";
+			close;
+		}
+	}
+	
 	EinUwe = 0;
 	if (BaseClass == Job_Blacksmith) {
 		if (ein_cook > 999) {
-			.@ccc = ein_cook-1000;
-			if (.@ccc > 199) {
+			if (ein_cook > 1199) {
 				mes "[Uwe]";
 				mes "Oh hello hello~";
 				mes "It's been a long";
 				mes "time since we've talked,";
 				mes "you cutie adventurer~";
 				next;
-				switch(select("So... You're a chef.", "Yes, I tried my best.")) {
+				switch (select("So... You're a chef.", "Yes, I tried my best.")) {
 				case 1:
-					mes "["+ strcharinfo(PC_NAME) +"]";
+					mesf("[%s]", strcharinfo(PC_NAME));
 					mes "So...";
 					mes "You're a chef.";
 					next;
@@ -505,18 +964,10 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 					next;
 					break;
 				}
-				if (checkweight(Spawn,200) == 0) {
-					mes "[Uwe]";
-					mes "Oh, I was going to give";
-					mes "you a little something,";
-					mes "but you've carrying too";
-					mes "many things. Why don't";
-					mes "you put some of it away";
-					mes "in your Kafra Storage?";
-					close;
-				}
+				if (checkweight(Spawn, 200) == 0)
+					F_OverWeight();
 				ein_cook = 219;
-				getitem Portable_Furnace,10;
+				getitem Portable_Furnace, 10;
 				mes "[Uwe]";
 				mes "I had these lying";
 				mes "around, so why don't";
@@ -529,13 +980,8 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 				mes "Alright then~";
 				mes "Hope you enjoy";
 				mes "your Mini Furances";
-				switch(rand(1,3)) {
-				case 1: mes "...Ho ho~"; close;
-				case 2: mes "...*Tee Hee~*"; close;
-				case 3: mes "...Behbie~"; close;
-				}
-			}
-			else if (.@ccc > 99) {
+				F_RandCloseMsg();
+			} else if (ein_cook > 1099) { //6 Large Jellopy for Coal Part
 				mes "[Uwe]";
 				mes "Oh hello hello~";
 				mes "It's been a long";
@@ -550,155 +996,12 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 				mes "Did you already forget";
 				mes "the 6 Large Jellopy?";
 				next;
-				switch(select("There you go.", "I want to quit.", "Can I do it later?")) {
+				switch (select("There you go.", "I want to quit.", "Can I do it later?")) {
 				case 1:
-					if (countitem(Large_Jellopy) > 5) {
-						if (checkweight(Spawn,199) == 0) {
-							mes "[Uwe]";
-							mes "Oh, I was going to give";
-							mes "you a little something,";
-							mes "but you've carrying too";
-							mes "many things. Why don't";
-							mes "you put some of it away";
-							mes "in your Kafra Storage?";
-							close;
-						}
-						mes "[Uwe]";
-						mes "Thank you ^EEA9B8so^000000 much!";
-						mes "Here's the Coal I promised~";
-						mes "Oh, and take these Mini Furnaces. They were just lying around, so you know, I thought, well, why don't you take them? *Tee hee hee~*";
-						delitem Large_Jellopy,6;
-						ein_cook = 219;
-						getitem Coal,1;
-						getitem Portable_Furnace,10;
-						next;
-						mes "[Uwe]";
-						mes "I hope you enjoy!";
-						mes "Personally, I think the";
-						mes "best part of smithing";
-						mes "is standing over the flaming";
-						mes "heat and getting all ^EEA9B8hot and";
-						mes "sweaty^000000. Ooh, how exciting~!";
-						close;
-					}
-					else if (countitem(Large_Jellopy) > 0) {
-						mes "[Uwe]";
-						mes "Ooh, you're missing";
-						mes "some. I guess you can";
-						mes "still give them to me, but";
-						mes "you'd get less of a reward";
-						if (Sex == SEX_MALE) {
-							mes "...you ^EEA9B8naughty boy^000000.";
-						}
-						else {
-							mes "...you ^EEA9B8naughty girl^000000.";
-						}
-						switch(select("Give him all.", "Cancel.")) {
-						case 1:
-							if (checkweight(Knife,1) == 0) {
-								mes "[Uwe]";
-								mes "Oh, I was going to give";
-								mes "you a little something,";
-								mes "but you've carrying too";
-								mes "many things. Why don't";
-								mes "you put some of it away";
-								mes "in your Kafra Storage?";
-								close;
-							}
-							mes "[Uwe]";
-							mes "Just kidding~";
-							mes "Don't be so nervous, I don't really need those anymore. But since I know you're hard working, I'll throw in a little something extra...";
-							next;
-							if (checkweight(Spawn,220) == 0) {
-								mes "[Uwe]";
-								mes "Oh, I was going to give";
-								mes "you a little something,";
-								mes "but you've carrying too";
-								mes "many things. Why don't";
-								mes "you put some of it away";
-								mes "in your Kafra Storage?";
-								close;
-							}
-							mes "[Uwe]";
-							if (Class == Job_Whitesmith) {
-								mes "I usually give you cutie MasterSmiths 10 Mini Furnaces, but you can have ^EEA9B811^000000. There's the little something extra I was talking about.";
-							}
-							else {
-								mes "I usually give you cutie Blacksmiths 10 Mini Furnaces, but you can have ^EEA9B811^000000. There's the little something extra I was talking about.";
-							}
-							ein_cook = 219;
-							getitem Portable_Furnace,11;
-							next;
-							mes "[Uwe]";
-							mes "I know it's not very extravagant, but these will come in handy next time you're smithing. So make the best use of them, 'kay?";
-							close;
-						case 2:
-							if (checkweight(Knife,1) == 0) {
-								mes "[Uwe]";
-								mes "Oh, I was going to give";
-								mes "you a little something,";
-								mes "but you've carrying too";
-								mes "many things. Why don't";
-								mes "you put some of it away";
-								mes "in your Kafra Storage?";
-								close;
-							}
-							mes "[Uwe]";
-							mes "Well... Then... Anyway,";
-							mes "Congratulation to became";
-							if (Class == Job_Whitesmith) {
-								mes "a Master Smith!!";
-							}
-							else {
-								mes "a Black Smith!!";
-							}
-							mes "This is my present for it.";
-							if (Sex == SEX_MALE) {
-								mes "...you ^EEA9B8naughty boy^000000.";
-							}
-							else {
-								mes "...you ^EEA9B8naughty girl^000000.";
-							}
-							break;
-						}
-						if (checkweight(Spawn,100) == 0) {
-							next;
-							mes "Oh, I was going to give";
-							mes "you a little something,";
-							mes "but you've carrying too";
-							mes "many things. Why don't";
-							mes "you put some of it away";
-							mes "in your Kafra Storage?";
-							close;
-						}
-						ein_cook = 219;
-						getitem Portable_Furnace,5;
-						next;
-						mes "[Uwe]";
-						mes "I know it's not very extravagant, but these will come in handy next time you're smithing. So make the best use of them, 'kay?";
-						close;
-					}
-					else {
-						mes "[Uwe]";
-						mes "^666666You didn't bring";
-						mes "any Large Jellopy...?^000000.";
-						ein_cook = 219;
-						next;
-						mes "[Uwe]";
-						mes "It's fine! It's not like I feel ^EEA9B8betrayed^000000 or anything, but I don't need them anymore! Since we're both in the business of smithing, I just hope that you remember to follow through on your favors, 'kay? Buhbye~";
-						close;
-					}
+					F_LargeJellopyForCoal();
 				case 2:
-					if (checkweight(Spawn,200) == 0) {
-						mes "[Uwe]";
-						mes "Oh, I was going to give";
-						mes "you a little something,";
-						mes "but you've carrying too";
-						mes "many things. Why don't";
-						mes "you put some of it away";
-						mes "in your Kafra Storage?";
-						close;
-					}
+					if (checkweight(Spawn, 200) == 0)
+						F_OverWeight();
 					mes "[Uwe]";
 					mes "Quit...?";
 					mes "Oh well, at least you're honest. But let me give you a little something, since we're both fellow smiths.";
@@ -710,12 +1013,11 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 					mes "been very, very bad.";
 					if (Sex == SEX_MALE) {
 						mes "...You ^EEA9B8naughty boy^000000.";
-					}
-					else {
+					} else {
 						mes "...You ^EEA9B8naughty girl^000000.";
 					}
 					ein_cook = 219;
-					getitem Portable_Furnace,10;
+					getitem Portable_Furnace, 10;
 					next;
 					mes "[Uwe]";
 					mes "I know it's not very extravagant, but these will come in handy next time you're smithing. So make the best use of them, 'kay?";
@@ -724,144 +1026,26 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 					mes "[Uwe]";
 					mes "Oooh, you came back later than I thought, so I don't need really need them anymore. Then again, just holding onto them doesn't sound right either...";
 					next;
-					switch(select("Here you go~", "I want to quit.")) {
+					switch (select("Here you go~", "I want to quit.")) {
 					case 1:
-						if (checkweight(Spawn,199) == 0) {
-							mes "[Uwe]";
-							mes "Oh, I was going to give";
-							mes "you a little something,";
-							mes "but you've carrying too";
-							mes "many things. Why don't";
-							mes "you put some of it away";
-							mes "in your Kafra Storage?";
-							close;
-						}
-						if (countitem(Large_Jellopy) > 5) {
-							mes "[Uwe]";
-							mes "Thank you ^EEA9B8so^000000 much!";
-							mes "Here's the Coal I promised~";
-							mes "Oh, and take these Mini Furnaces. They were just lying around, so you know, I thought, well, why don't you take them? *Tee hee hee~*";
-							delitem Large_Jellopy,6;
-							ein_cook = 219;
-							getitem Coal,1;
-							getitem Portable_Furnace,10;
-							close;
-						}
-						else if (countitem(Large_Jellopy) > 0) {
-							mes "[Uwe]";
-							mes "Ooh, you're missing";
-							mes "some. I guess you can";
-							mes "still give them to me, but";
-							mes "you'd get less of a reward";
-							if (Sex == SEX_MALE) {
-								mes "...You ^EEA9B8naughty boy^000000.";
-							}
-							else {
-								mes "...You ^EEA9B8naughty girl^000000.";
-							}
-							switch(select("Give them all.", "Cancel.")) {
-							case 1:
-								if (checkweight(Spawn,220) == 0) {
-									mes "[Uwe]";
-									mes "Oh, I was going to give";
-									mes "you a little something,";
-									mes "but you've carrying too";
-									mes "many things. Why don't";
-									mes "you put some of it away";
-									mes "in your Kafra Storage?";
-									close;
-								}
-								mes "[Uwe]";
-								mes "Just kidding~";
-								mes "Don't be so nervous, I don't really need those anymore. But since I know you're hard working, I'll throw in a little something extra...";
-								next;
-								mes "[Uwe]";
-								if (Class == Job_Whitesmith) {
-									mes "I usually give you cutie MasterSmiths 10 Mini Furnaces, but you can have ^EEA9B811^000000. There's the little something extra I was talking about.";
-								}
-								else {
-									mes "I usually give you cutie Blacksmiths 10 Mini Furnaces, but you can have ^EEA9B811^000000. There's the little something extra I was talking about.";
-								}
-								ein_cook = 219;
-								getitem Portable_Furnace,11;
-								next;
-								mes "[Uwe]";
-								mes "I know it's not very extravagant, but these will come in handy next time you're smithing. So make the best use of them, 'kay?";
-								close;
-							case 2:
-								if (checkweight(Spawn,200) == 0) {
-									mes "[Uwe]";
-									mes "Oh, I was going to give";
-									mes "you a little something,";
-									mes "but you've carrying too";
-									mes "many things. Why don't";
-									mes "you put some of it away";
-									mes "in your Kafra Storage?";
-									close;
-								}
-								mes "[Uwe]";
-								mes "Okay.";
-								mes "Anyway~!";
-								mes "When you do get all";
-								mes "that Large Jellopy,";
-								mes "just come back to me.";
-								if (Sex == SEX_MALE) {
-									mes "...you ^EEA9B8naughty boy^000000.";
-								}
-								else {
-									mes "...you ^EEA9B8naughty girl^000000.";
-								}
-								ein_cook = 219;
-								getitem Portable_Furnace,10;
-								next;
-								mes "[Uwe]";
-								mes "This Portable Furnace is not expensive";
-								mes "but very important item for smiths, right?";
-								mes "Use it!";
-								mes "And visit me someday again. Huhuhu..";
-								close;
-							}
-						}
-						else {
-							mes "[Uwe]";
-							mes "^666666You didn't bring";
-							mes "any Large Jellopy...?^000000.";
-							ein_cook = 219;
-							next;
-							mes "[Uwe]";
-							mes "It's fine! It's not like I feel ^EEA9B8betrayed^000000 or anything, but I don't need them anymore! Since we're both in the business of smithing, I just hope that you remember to follow through on your favors, 'kay? Buhbye~";
-							close;
-						}
+						F_LargeJellopyForCoal();
 					case 2:
-						if (checkweight(Spawn,200) == 0) {
-							mes "[Uwe]";
-							mes "Oh, I was going to give";
-							mes "you a little something,";
-							mes "but you've carrying too";
-							mes "many things. Why don't";
-							mes "you put some of it away";
-							mes "in your Kafra Storage?";
-							close;
-						}
+						if (checkweight(Spawn, 200) == 0)
+							F_OverWeight();
 						mes "[Uwe]";
 						mes "Well... Then... Anyway,";
-						mes "Congratulation to became";
-						if (Class == Job_Whitesmith) {
-							mes "a Master Smith!!";
-							mes "This is my present for it. Huhuhu.";
-						}
-						else {
-							mes "a Black Smith!!";
+						mes "Congratulation to becoming";
+						mesf("a %s!!", jobname(Class));
 							mes "This is my present for it. Huhuhu.";
+						if (Class != Job_Whitesmith) {
 							if (Sex == SEX_MALE) {
 								mes "...You ^EEA9B8naughty boy^000000.";
-							}
-							else {
+							} else {
 								mes "...You ^EEA9B8naughty girl^000000.";
 							}
 						}
 						ein_cook = 219;
-						getitem Portable_Furnace,10;
+						getitem Portable_Furnace, 10;
 						next;
 						mes "[Uwe]";
 						mes "I know it's not very extravagant, but these will come in handy next time you're smithing. So make the best use of them, 'kay?";
@@ -875,7 +1059,7 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 			mes "Cooking is such a joy~!";
 			mes "The scents, the flavors, the sensation of sheer ^EEA9B8satiation^000000...";
 			next;
-			switch(select("Um, isn't this a forge?", "Ignore him.")) {
+			switch (select("Um, isn't this a forge?", "Ignore him.")) {
 			case 1:
 				mes "[Uwe]";
 				mes "Is this a forge?";
@@ -898,12 +1082,11 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 				mes "important factor in cooking,";
 				if (Sex == SEX_MALE) {
 					mes "you ^EEA9B8naughty little man^000000?";
-				}
-				else {
+				} else {
 					mes "you ^EEA9B8naughty, naughty girl^000000?";
 				}
 				next;
-				switch(select("Heart.", "Ingredients.", "Skills.", "Tools.")) {
+				switch (select("Heart.", "Ingredients.", "Skills.", "Tools.")) {
 				case 1:
 					mes "[Uwe]";
 					mes "...";
@@ -935,7 +1118,7 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 					mes "so please have one, 'kay?";
 					mes "Welcome to Einbroch, cutie~";
 					ein_cook = 1;
-					getitem Emveretarcon,1;
+					getitem Emveretarcon, 1;
 					break;
 				case 2:
 					mes "[Uwe]";
@@ -959,7 +1142,7 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 					mes "Steel. Why don't you have 2 of";
 					mes "them as my little way of saying, ''Welcome to Einbroch, cutie~!''";
 					ein_cook = 3;
-					getitem Iron,2;
+					getitem Iron, 2;
 					break;
 				case 3:
 					mes "[Uwe]";
@@ -996,7 +1179,7 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 					mes "so please have one, 'kay?";
 					mes "Welcome to Einbroch, cutie~";
 					ein_cook = 5;
-					getitem Emveretarcon,1;
+					getitem Emveretarcon, 1;
 					break;
 				case 4:
 					mes "[Uwe]";
@@ -1025,7 +1208,7 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 					mes "my way of saying ''Welcome";
 					mes "to Einbroch, sugar honey~''";
 					ein_cook = 7;
-					getitem Iron_Hammer,1;
+					getitem Iron_Hammer, 1;
 					break;
 				}
 				next;
@@ -1035,11 +1218,7 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 				mes "come and see me";
 				mes "anytime, alright?";
 				mes "So don't be shy";
-				switch(rand(1,3)) {
-				case 1: mes "...Ho ho~"; close;
-				case 2: mes "...*Tee Hee~*"; close;
-				case 3: mes "...Behbie~"; close;
-				}
+				F_RandCloseMsg();
 			case 2:
 				mes "[Uwe]";
 				mes "Hmmm...?";
@@ -1049,438 +1228,62 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 				mes "and people to see. Ah well~";
 				close;
 			}
-		}
-		else if (ein_cook < 10) {
+		} else if (ein_cook < 10) {
 			mes "[Uwe]";
 			mes "Oh! Hello again,";
 			mes "you cutie adventurer.";
 			mes "So tell me, what brings";
-			mes "you here, "+strcharinfo(PC_NAME)+"?";
+			mesf("you here, %s?", strcharinfo(PC_NAME));
 			next;
-			switch(select("Ask about Cooking.", "Ask about Einbroch.", "Cancel.")) {
+			switch (select("Ask about Cooking.", "Ask about Einbroch.", "Cancel.")) {
 			case 1:
+				if (ein_cook % 2 == 0)
+					close; //Yes, there's really nothing defined for this in the Aegis Script
+				mes "[Uwe]";
+				mes "Ooh, cooking!";
+				mes "So what did you";
+				mes "want to ask me...?";
+				next;
 				if (ein_cook == 1) {
-					mes "[Uwe]";
-					mes "Ooh, cooking!";
-					mes "So what did you";
-					mes "want to ask me...?";
-					next;
-					switch(select("Ingredients", "Skills", "Tools", "Cancel")) {
+					switch (select("Ingredients", "Skills", "Tools", "Cancel")) {
 					case 1:
-						mes "[Uwe]";
-						mes "Now for beginners,";
-						mes "learning to select";
-						mes "and use ingredients";
-						mes "is one of the most";
-						mes "important fundamentals.";
-						next;
-						mes "[Uwe]";
-						mes "Cooking is like forging";
-						mes "since specific ingredients";
-						mes "are needed to make specialty";
-						mes "items or dishes. You can't just";
-						mes "skip them if you really need";
-						mes "them, right? Right!";
-						next;
-						mes "[Uwe]";
-						mes "Once you make up your";
-						mes "mind to do something,";
-						mes "focus on finishing it, 'kay?";
-						mes "Never cut corners and always";
-						mes "dedicate yourself to make the";
-						mes "very best finished product~";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_Ingredients();
 					case 2:
-						mes "[Uwe]";
-						mes "When you're beginning to learn";
-						mes "skills, you can't let yourself be discouraged! Practice makes";
-						mes "perfect, you know? But never";
-						mes "use your lack of skills as an";
-						mes "excuse if you happen to fail...";
-						next;
-						mes "[Uwe]";
-						mes "Effort is also an essential";
-						mes "in forging and cooking! Now,";
-						mes "on the other hand, if you put";
-						mes "in all the effort but didn't learn any of the skills, you'll still get nowhere fast, right? Right!";
-						next;
-						mes "[Uwe]";
-						mes "The key is to always";
-						mes "give 100% effort and work";
-						mes "on improving your skills.";
-						mes "Before you know it, you'll";
-						mes "be a respected master!";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						switch(rand(1,3)) {
-						case 1: mes "Hohohohoho."; close;
-						case 2: mes "Umhohohoho.*"; close;
-						case 3: mes "Umho."; close;
-						}
+						F_Skills();
 					case 3:
-						mes "[Uwe]";
-						mes "Cooking is a little";
-						mes "easier if you have";
-						mes "nicer tools to use,";
-						mes "but that's it. Tools by";
-						mes "themselves can't make";
-						mes "just anybody a master.";
-						next;
-						mes "[Uwe]";
-						mes "In the end, the best";
-						mes "tools are the ones you're";
-						mes "most comfortable with using.";
-						mes "In fact, I still use the old knife I used back when I was just";
-						mes "a little novice chef~";
-						next;
-						mes "[Uwe]";
-						mes "Oh, while we're on";
-						mes "the subject of tools,";
-						mes "I just received some";
-						mes "new hammers today.";
-						mes "Would you like a couple?";
-						next;
-						if (checkweight(Spawn,50) == 0) {
-							mes "[Uwe]";
-							mes "Mmmm...?";
-							mes "You're holding too many";
-							mes "things. I can't give you any";
-							mes "hammers if you don't have";
-							mes "room. Hurry, put your extra";
-							mes "stuff in your Kafra Storage~";
-							close;
-						}
-						ein_cook = 11;
-						getitem Golden_Hammer,1;
-						getitem Iron_Hammer,1;
-						mes "[Uwe]";
-						mes "Well, I hope";
-						mes "you like them~";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_Tools();
 					case 4:
-						mes "[Uwe]";
-						mes "Oh...?";
-						mes "Well, feel";
-						mes "free to visit";
-						mes "me whenever";
-						mes "you want, 'kay?";
-						close;
+						F_Cancel();
 					}
-				}
-				else if (ein_cook == 3) {
-					mes "[Uwe]";
-					mes "Ooh, cooking!";
-					mes "So what did you";
-					mes "want to ask me...?";
-					next;
-					switch(select("Heart", "Skills", "Tools", "Cancel.")) {
+				} else if (ein_cook == 3) {
+					switch (select("Heart", "Skills", "Tools", "Cancel.")) {
 					case 1:
-						mes "[Uwe]";
-						mes "Ah, heart. Just like forging,";
-						mes "you need passion and desire";
-						mes "to create something special.";
-						mes "Every smith and cook knows that";
-						mes "you can do anything if you have";
-						mes "the will and the commitment.";
-						next;
-						mes "[Uwe]";
-						mes "Well, that's all";
-						mes "I really have to";
-						mes "say about that. But";
-						mes "come back and chat";
-						mes "whenever you please.";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_Heart();
 					case 2:
-						mes "[Uwe]";
-						mes "When you're beginning to learn";
-						mes "skills, you can't let yourself be discouraged! Practice makes";
-						mes "perfect, you know? But never";
-						mes "use your lack of skills as an";
-						mes "excuse if you happen to fail...";
-						next;
-						mes "[Uwe]";
-						mes "Effort is also an essential";
-						mes "in forging and cooking! Now,";
-						mes "on the other hand, if you put";
-						mes "in all the effort but didn't learn any of the skills, you'll still get nowhere fast, right? Right!";
-						next;
-						mes "[Uwe]";
-						mes "The key is to always";
-						mes "give 100% effort and work";
-						mes "on improving your skills.";
-						mes "Before you know it, you'll";
-						mes "be a respected master!";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						switch(rand(1,3)) {
-						case 1: mes "Hohohohoho."; close;
-						case 2: mes "Umhohohoho.*"; close;
-						case 3: mes "Umho."; close;
-						}
+						F_Skills();
 					case 3:
-						mes "[Uwe]";
-						mes "Cooking is a little";
-						mes "easier if you have";
-						mes "nicer tools to use,";
-						mes "but that's it. Tools by";
-						mes "themselves can't make";
-						mes "just anybody a master.";
-						next;
-						mes "[Uwe]";
-						mes "In the end, the best";
-						mes "tools are the ones you're";
-						mes "most comfortable with using.";
-						mes "In fact, I still use the old knife I used back when I was just";
-						mes "a little novice chef~";
-						next;
-						mes "[Uwe]";
-						mes "Oh, while we're on";
-						mes "the subject of tools,";
-						mes "I just received some";
-						mes "new hammers today.";
-						mes "Would you like a couple?";
-						next;
-						if (checkweight(Spawn,50) == 0) {
-							mes "[Uwe]";
-							mes "Mmmm...?";
-							mes "You're holding too many";
-							mes "things. I can't give you any";
-							mes "hammers if you don't have";
-							mes "room. Hurry, put your extra";
-							mes "stuff in your Kafra Storage~";
-							close;
-						}
-						ein_cook = 13;
-						getitem Golden_Hammer,1;
-						getitem Iron_Hammer,1;
-						mes "[Uwe]";
-						mes "Well, I hope";
-						mes "you like them~";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_Tools();
 					case 4:
-						mes "[Uwe]";
-						mes "Oh...?";
-						mes "Well, feel";
-						mes "free to visit";
-						mes "me whenever";
-						mes "you want, 'kay?";
-						close;
+						F_Cancel();
 					}
-				}
-				else if (ein_cook == 5) {
-					mes "[Uwe]";
-					mes "Ooh, cooking!";
-					mes "So what did you";
-					mes "want to ask me...?";
-					next;
-					switch(select("Heart", "Ingredients", "Tools", "Cancel")) {
+				} else if (ein_cook == 5) {
+					switch (select("Heart", "Ingredients", "Tools", "Cancel")) {
 					case 1:
-						mes "[Uwe]";
-						mes "Ah, heart. Just like forging,";
-						mes "you need passion and desire";
-						mes "to create something special.";
-						mes "Every smith and cook knows that";
-						mes "you can do anything if you have";
-						mes "the will and the commitment.";
-						next;
-						mes "[Uwe]";
-						mes "Well, that's all";
-						mes "I really have to";
-						mes "say about that. But";
-						mes "come back and chat";
-						mes "whenever you please.";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_Heart();
 					case 2:
-						mes "[Uwe]";
-						mes "Now for beginners,";
-						mes "learning to select";
-						mes "and use ingredients";
-						mes "is one of the most";
-						mes "important fundamentals.";
-						next;
-						mes "[Uwe]";
-						mes "Cooking is like forging";
-						mes "since specific ingredients";
-						mes "are needed to make specialty";
-						mes "items or dishes. You can't just";
-						mes "skip them if you really need";
-						mes "them, right? Right!";
-						next;
-						mes "[Uwe]";
-						mes "Once you make up your";
-						mes "mind to do something,";
-						mes "focus on finishing it, 'kay?";
-						mes "Never cut corners and always";
-						mes "dedicate yourself to make the";
-						mes "very best finished product~";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_Ingredients();
 					case 3:
-						mes "[Uwe]";
-						mes "Cooking is a little";
-						mes "easier if you have";
-						mes "nicer tools to use,";
-						mes "but that's it. Tools by";
-						mes "themselves can't make";
-						mes "just anybody a master.";
-						next;
-						mes "[Uwe]";
-						mes "In the end, the best";
-						mes "tools are the ones you're";
-						mes "most comfortable with using.";
-						mes "In fact, I still use the old knife I used back when I was just";
-						mes "a little novice chef~";
-						next;
-						mes "[Uwe]";
-						mes "Oh, while we're on";
-						mes "the subject of tools,";
-						mes "I just received some";
-						mes "new hammers today.";
-						mes "Would you like a couple?";
-						next;
-						if (checkweight(Spawn,50) == 0) {
-							mes "[Uwe]";
-							mes "Mmmm...?";
-							mes "You're holding too many";
-							mes "things. I can't give you any";
-							mes "hammers if you don't have";
-							mes "room. Hurry, put your extra";
-							mes "stuff in your Kafra Storage~";
-							close;
-						}
-						ein_cook = 15;
-						getitem Golden_Hammer,1;
-						getitem Iron_Hammer,1;
-						next;
-						mes "[Uwe]";
-						mes "Well, I hope";
-						mes "you like them~";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_Tools();
 					case 4:
-						mes "[Uwe]";
-						mes "Oh...?";
-						mes "Well, feel";
-						mes "free to visit";
-						mes "me whenever";
-						mes "you want, 'kay?";
-						close;
+						F_Cancel();
 					}
-				}
-				else if (ein_cook == 7) {
-					mes "[Uwe]";
-					mes "Ooh, cooking!";
-					mes "So what did you";
-					mes "want to ask me...?";
-					next;
-					switch(select("Heart", "Ingredients", "Skills", "Cancel.")) {
+				} else if (ein_cook == 7) {
+					switch (select("Heart", "Ingredients", "Skills", "Cancel.")) {
 					case 1:
-						mes "[Uwe]";
-						mes "Ah, heart. Just like forging,";
-						mes "you need passion and desire";
-						mes "to create something special.";
-						mes "Every smith and cook knows that";
-						mes "you can do anything if you have";
-						mes "the will and the commitment.";
-						next;
-						mes "[Uwe]";
-						mes "Well, that's all";
-						mes "I really have to";
-						mes "say about that. But";
-						mes "come back and chat";
-						mes "whenever you please.";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_Heart();
 					case 2:
-						mes "[Uwe]";
-						mes "Now for beginners,";
-						mes "learning to select";
-						mes "and use ingredients";
-						mes "is one of the most";
-						mes "important fundamentals.";
-						next;
-						mes "[Uwe]";
-						mes "Cooking is like forging";
-						mes "since specific ingredients";
-						mes "are needed to make specialty";
-						mes "items or dishes. You can't just";
-						mes "skip them if you really need";
-						mes "them, right? Right!";
-						next;
-						mes "[Uwe]";
-						mes "Once you make up your";
-						mes "mind to do something,";
-						mes "focus on finishing it, 'kay?";
-						mes "Never cut corners and always";
-						mes "dedicate yourself to make the";
-						mes "very best finished product~";
-						ein_cook = 17;
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
-					case 3:
+						F_Ingredients();
+					case 3: //Yes, the part is suddenly different here in the Aegis Script as well.
 						mes "[Uwe]";
 						mes "'I couldn't do it cuz";
 						mes "I'm not skillful with it.'";
@@ -1518,458 +1321,56 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 						mes "[Uwe]";
 						mes "Well, I hope";
 						mes "you like them~";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_RandCloseMsg();
 					case 4:
-						mes "[Uwe]";
-						mes "Oh...?";
-						mes "Well, feel";
-						mes "free to visit";
-						mes "me whenever";
-						mes "you want, 'kay?";
-						close;
+						F_Cancel();
 					}
-				}
-				else if (ein_cook == 9) {
-					mes "[Uwe]";
-					mes "Ooh, cooking!";
-					mes "So what did you";
-					mes "want to ask me...?";
-					next;
-					switch(select("Heart", "Ingredients", "Skills", "Tools", "Cancel.")) {
+				} else if (ein_cook == 9) {
+					switch (select("Heart", "Ingredients", "Skills", "Tools", "Cancel.")) {
 					case 1:
-						mes "[Uwe]";
-						mes "Ah, heart. Just like forging,";
-						mes "you need passion and desire";
-						mes "to create something special.";
-						mes "Every smith and cook knows that";
-						mes "you can do anything if you have";
-						mes "the will and the commitment.";
-						next;
-						mes "[Uwe]";
-						mes "Well, that's all";
-						mes "I really have to";
-						mes "say about that. But";
-						mes "come back and chat";
-						mes "whenever you please.";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_Heart();
 					case 2:
-						mes "[Uwe]";
-						mes "Now for beginners,";
-						mes "learning to select";
-						mes "and use ingredients";
-						mes "is one of the most";
-						mes "important fundamentals.";
-						next;
-						mes "[Uwe]";
-						mes "Cooking is like forging";
-						mes "since specific ingredients";
-						mes "are needed to make specialty";
-						mes "items or dishes. You can't just";
-						mes "skip them if you really need";
-						mes "them, right? Right!";
-						next;
-						mes "[Uwe]";
-						mes "Once you make up your";
-						mes "mind to do something,";
-						mes "focus on finishing it, 'kay?";
-						mes "Never cut corners and always";
-						mes "dedicate yourself to make the";
-						mes "very best finished product~";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_Ingredients();
 					case 3:
-						mes "[Uwe]";
-						mes "When you're beginning to learn";
-						mes "skills, you can't let yourself be discouraged! Practice makes";
-						mes "perfect, you know? But never";
-						mes "use your lack of skills as an";
-						mes "excuse if you happen to fail...";
-						next;
-						mes "[Uwe]";
-						mes "Effort is also an essential";
-						mes "in forging and cooking! Now,";
-						mes "on the other hand, if you put";
-						mes "in all the effort but didn't learn any of the skills, you'll still get nowhere fast, right? Right!";
-						next;
-						mes "[Uwe]";
-						mes "The key is to always";
-						mes "give 100% effort and work";
-						mes "on improving your skills.";
-						mes "Before you know it, you'll";
-						mes "be a respected master!";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						switch(rand(1,3)) {
-						case 1: mes "Hohohohoho."; close;
-						case 2: mes "Umhohohoho.*"; close;
-						case 3: mes "Umho."; close;
-						}
+						F_Skills();
 					case 4:
-						mes "[Uwe]";
-						mes "Cooking is a little";
-						mes "easier if you have";
-						mes "nicer tools to use,";
-						mes "but that's it. Tools by";
-						mes "themselves can't make";
-						mes "just anybody a master.";
-						next;
-						mes "[Uwe]";
-						mes "In the end, the best";
-						mes "tools are the ones you're";
-						mes "most comfortable with using.";
-						mes "In fact, I still use the old knife I used back when I was just";
-						mes "a little novice chef~";
-						next;
-						mes "[Uwe]";
-						mes "Oh, while we're on";
-						mes "the subject of tools,";
-						mes "I just received some";
-						mes "new hammers today.";
-						mes "Would you like a couple?";
-						next;
-						if (checkweight(Spawn,50) == 0) {
-							mes "[Uwe]";
-							mes "Mmmm...?";
-							mes "You're holding too many";
-							mes "things. I can't give you any";
-							mes "hammers if you don't have";
-							mes "room. Hurry, put your extra";
-							mes "stuff in your Kafra Storage~";
-							close;
-						}
-						ein_cook = 19;
-						getitem Golden_Hammer,1;
-						getitem Iron_Hammer,1;
-						next;
-						mes "[Uwe]";
-						mes "Well, I hope";
-						mes "you like them~";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_Tools();
 					case 5:
-						mes "[Uwe]";
-						mes "Oh...?";
-						mes "Well, feel";
-						mes "free to visit";
-						mes "me whenever";
-						mes "you want, 'kay?";
-						close;
+						F_Cancel();
 					}
 				}
 			case 2:
-				mes "[Uwe]";
-				mes "Einbroch was originally";
-				mes "built to support Einbech's";
-				mes "mining efforts. Because it's";
-				mes "small and crowded with people,";
-				mes "there's no room to build the ore refining factories over there.";
-				next;
-				mes "[Uwe]";
-				mes "Since Einbroch used to be";
-				mes "an empty lot, it was perfect";
-				mes "for building factories. That's";
-				mes "what my grandfather told me a";
-				mes "long time ago. Anyway, Einbroch quickly grew into a major city.";
-				next;
-				mes "[Uwe]";
-				mes "Now people think that this";
-				mes "city was never planned to be";
-				mes "just an extension of Einbech.";
-				mes "See that rampart over there?";
-				mes "It doesn't connect to Einbech at all! No protection for them...";
-				next;
-				mes "[Uwe]";
-				mes "It's like the government";
-				mes "lost all interest in Einbech.";
-				mes "Even the miners there have";
-				mes "been moving here to work in ";
-				mes "the factories. But more people hasn't made this city more lively.";
-				next;
-				mes "[Uwe]";
-				mes "Einbroch may look modern";
-				mes "and exciting now, but soon";
-				mes "you'll see that there's no sign";
-				mes "of warmth or life. So... Just don't live here in your old age.";
-				next;
-				switch(select("Then why are you here?", "But I like the city life~")) {
-				case 1:
-					mes "[Uwe]";
-					mes "Well, sugar honey,";
-					mes "I've been waiting for";
-					mes "someone. But... It looks";
-					mes "like that person won't be";
-					mes "coming back anyway.";
-					next;
-					mes "[Uwe]";
-					mes "Oooh, but let's not talk";
-					mes "about that. Next time you";
-					mes "drop by, we'll talk about";
-					mes "something more fun, 'kay?";
-					close;
-				case 2:
-					mes "[Uwe]";
-					mes "Big cities can be nice,";
-					mes "but you never get to enjoy";
-					mes "the sensation of stepping";
-					mes "barefoot through the grass,";
-					mes "or the magnificent sight of";
-					mes "the shining stars at night.";
-					next;
-					mes "[Uwe]";
-					mes "And the people who live";
-					mes "in the cities can be so";
-					mes "uptight! I've known more";
-					mes "than a few who look down";
-					mes "on people from smaller towns.";
-					next;
-					mes "[Uwe]";
-					mes "It's sad to see some";
-					mes "people will always be";
-					mes "that ignorant. I... I just";
-					mes "can't believe those people";
-					mes "can be sooo close minded!";
-					next;
-					mes "[Uwe]";
-					mes "Oh...!";
-					mes "I'm sorry, I guess";
-					mes "I went a little overboard.";
-					mes "^666666*Titter*^000000 Next time you drop";
-					mes "by, we'll talk about something";
-					mes "more fun, 'kay? Buhbye~";
-					close;
-				}
+				F_AboutEinbroch();
 			case 3:
-				mes "[Uwe]";
-				mes "Oh...?";
-				mes "Well, feel";
-				mes "free to visit";
-				mes "me whenever";
-				mes "you want, 'kay?";
-				close;
+				F_Cancel();
 			}
-		}
-		else if ((ein_cook < 20) || (ein_cook == 219)) {
+		} else if (ein_cook < 20 || ein_cook == 219) {
 			mes "[Uwe]";
 			mes "Oh, welcome back.";
 			mes "So how's the weapon";
 			mes "forging coming along?";
 			next;
-			switch(select("Talk about Cooking", "Talk about Einbroch", "Talk about Cooking Utensils", "Cancel")) {
+			switch (select("Talk about Cooking", "Talk about Einbroch", "Talk about Cooking Utensils", "Cancel")) {
 			case 1:
 				mes "[Uwe]";
 				mes "Ooh, cooking!";
 				mes "So what did you";
 				mes "want to ask me...?";
 				next;
-				switch(select("Heart", "Ingredients", "Skills", "Tools", "Cancel.")) {
+				switch (select("Heart", "Ingredients", "Skills", "Tools", "Cancel.")) {
 				case 1:
-					mes "[Uwe]";
-					mes "Ah, heart. Just like forging,";
-					mes "you need passion and desire";
-					mes "to create something special.";
-					mes "Every smith and cook knows that";
-					mes "you can do anything if you have";
-					mes "the will and the commitment.";
-					next;
-					mes "[Uwe]";
-					mes "Well, that's all";
-					mes "I really have to";
-					mes "say about that. But";
-					mes "come back and chat";
-					mes "whenever you please.";
-					switch(rand(1,3)) {
-					case 1: mes "...Ho ho~"; close;
-					case 2: mes "...*Tee Hee~*"; close;
-					case 3: mes "...Behbie~"; close;
-					}
+					F_Heart();
 				case 2:
-					mes "[Uwe]";
-					mes "Now for beginners,";
-					mes "learning to select";
-					mes "and use ingredients";
-					mes "is one of the most";
-					mes "important fundamentals.";
-					next;
-					mes "[Uwe]";
-					mes "Cooking is like forging";
-					mes "since specific ingredients";
-					mes "are needed to make specialty";
-					mes "items or dishes. You can't just";
-					mes "skip them if you really need";
-					mes "them, right? Right!";
-					next;
-					mes "[Uwe]";
-					mes "Once you make up your";
-					mes "mind to do something,";
-					mes "focus on finishing it, 'kay?";
-					mes "Never cut corners and always";
-					mes "dedicate yourself to make the";
-					mes "very best finished product~";
-					next;
-					mes "[Uwe]";
-					mes "Well, that was";
-					mes "a fun talk. Come";
-					mes "back and visit, 'kay?";
-					mes "I'll miss you until";
-					mes "the next time~";
-					switch(rand(1,3)) {
-					case 1: mes "...Ho ho~"; close;
-					case 2: mes "...*Tee Hee~*"; close;
-					case 3: mes "...Behbie~"; close;
-					}
+					F_Ingredients();
 				case 3:
-					mes "[Uwe]";
-					mes "When you're beginning to learn";
-					mes "skills, you can't let yourself be discouraged! Practice makes";
-					mes "perfect, you know? But never";
-					mes "use your lack of skills as an";
-					mes "excuse if you happen to fail...";
-					next;
-					mes "[Uwe]";
-					mes "Effort is also an essential";
-					mes "in forging and cooking! Now,";
-					mes "on the other hand, if you put";
-					mes "in all the effort but didn't learn any of the skills, you'll still get nowhere fast, right? Right!";
-					next;
-					mes "[Uwe]";
-					mes "The key is to always";
-					mes "give 100% effort and work";
-					mes "on improving your skills.";
-					mes "Before you know it, you'll";
-					mes "be a respected master!";
-					next;
-					mes "[Uwe]";
-					mes "Well, that was";
-					mes "a fun talk. Come";
-					mes "back and visit, 'kay?";
-					mes "I'll miss you until";
-					mes "the next time~";
-					switch(rand(1,3)) {
-					case 1: mes "...Ho ho~"; close;
-					case 2: mes "...*Tee Hee~*"; close;
-					case 3: mes "...Behbie~"; close;
-					}
+					F_Skills();
 				case 4:
-					mes "[Uwe]";
-					mes "Cooking is a little";
-					mes "easier if you have";
-					mes "nicer tools to use,";
-					mes "but that's it. Tools by";
-					mes "themselves can't make";
-					mes "just anybody a master.";
-					next;
-					mes "[Uwe]";
-					mes "In the end, the best";
-					mes "tools are the ones you're";
-					mes "most comfortable with using.";
-					mes "In fact, I still use the old knife I used back when I was just";
-					mes "a little novice chef~";
-					next;
-					mes "[Uwe]";
-					mes "Well, that was";
-					mes "a fun talk. Come";
-					mes "back and visit, 'kay?";
-					mes "I'll miss you until";
-					mes "the next time~";
-					switch(rand(1,3)) {
-					case 1: mes "...Ho ho~"; close;
-					case 2: mes "...*Tee Hee~*"; close;
-					case 3: mes "...Behbie~"; close;
-					}
+					F_ToolsWithoutReward();
 				case 5:
-					mes "[Uwe]";
-					mes "Oh...?";
-					mes "Well, feel";
-					mes "free to visit";
-					mes "me whenever";
-					mes "you want, 'kay?";
-					close;
+					F_Cancel();
 				}
 			case 2:
-				mes "[Uwe]";
-				mes "Einbroch was originally";
-				mes "built to support Einbech's";
-				mes "mining efforts. Because it's";
-				mes "small and crowded with people,";
-				mes "there's no room to build the ore refining factories over there.";
-				next;
-				mes "[Uwe]";
-				mes "Since Einbroch used to be";
-				mes "an empty lot, it was perfect";
-				mes "for building factories. That's";
-				mes "what my grandfather told me a";
-				mes "long time ago. Anyway, Einbroch quickly grew into a major city.";
-				next;
-				mes "[Uwe]";
-				mes "Now people think that this";
-				mes "city was never planned to be";
-				mes "just an extension of Einbech.";
-				mes "See that rampart over there?";
-				mes "It doesn't connect to Einbech at all! No protection for them...";
-				next;
-				mes "[Uwe]";
-				mes "It's like the government";
-				mes "lost all interest in Einbech.";
-				mes "Even the miners there have";
-				mes "been moving here to work in ";
-				mes "the factories. But more people hasn't made this city more lively.";
-				next;
-				mes "[Uwe]";
-				mes "Einbroch may look modern";
-				mes "and exciting now, but soon";
-				mes "you'll see that there's no sign";
-				mes "of warmth or life. So... Just don't live here in your old age.";
-				next;
-				switch(select("Then why are you here?", "But I like the city life~")) {
-				case 1:
-					mes "[Uwe]";
-					mes "Well, sugar honey,";
-					mes "I've been waiting for someone. But... It looks like that person won't be coming back anyway.";
-					next;
-					mes "[Uwe]";
-					mes "Oooh, but let's not talk about that. Next time you drop by, we'll talk about something more fun, 'kay? Buhbye~";
-					close;
-				case 2:
-					mes "[Uwe]";
-					mes "Well, big cities are nice, but you never get to enjoy the sensation of stepping barefoot through the grass, or the clear sight of the stars at night.";
-					next;
-					mes "[Uwe]";
-					mes "And the people who live in cities can be so uptight! I've known more than a few who look down on people who live in smaller towns.";
-					next;
-					mes "[Uwe]";
-					mes "It's sad to see some people will always be that ignorant. I... I just can't believe people can be sooo close minded!";
-					next;
-					mes "[Uwe]";
-					mes "Oh...!";
-					mes "I'm sorry, I guess I went a little overboard. ^666666*Titter*^000000 Next time you drop by, we'll talk about something more fun, 'kay? Buhbye~";
-					close;
-				}
+				F_AboutEinbroch();
 			case 3:
 				mes "[Uwe]";
 				mes "Cooking utensils?";
@@ -1995,19 +1396,18 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 				mes "30 ^0000FFJubilee^000000 and 4 ^0000FFLarge Jellopy^000000.";
 				mes "Then, I'll trade you 1 Coal for all of those. How does it sound?";
 				next;
-				switch(select("Sure.", "No, thanks.")) {
+				switch (select("Sure.", "No, thanks.")) {
 				case 1:
-					if ((countitem(Jubilee) > 29) && (countitem(Large_Jellopy) > 3)) {
-						delitem Jubilee,30;
-						delitem Large_Jellopy,4;
-						getitem Coal,1;
+					if (countitem(Jubilee) > 29 && countitem(Large_Jellopy) > 3) {
+						delitem Jubilee, 30;
+						delitem Large_Jellopy, 4;
+						getitem Coal, 1;
 						mes "[Uwe]";
 						mes "Hooray!";
 						mes "Thank you";
 						mes "^EEA9B8soooo^000000 much!";
 						close;
-					}
-					else {
+					} else {
 						mes "[Uwe]";
 						mes "Hmmm...?";
 						mes "You don't have";
@@ -2031,22 +1431,15 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 					close;
 				}
 			case 4:
-				mes "[Uwe]";
-				mes "Oh...?";
-				mes "Well, feel";
-				mes "free to visit";
-				mes "me whenever";
-				mes "you want, 'kay?";
-				close;
+				F_Cancel();
 			}
-		}
-		else if (ein_cook > 299) {
+		} else if (ein_cook > 299) {
 			if (Class == Job_Whitesmith) {
 				mes "[Uwe]";
 				mes "Oooh...!";
 				mes "Congratulations!";
 				mes "You finally became";
-				mes "a cutie MasterSmith!";
+				mesf("a cutie %s!", jobname(Class));
 				next;
 				mes "[Uwe]";
 				mes "Mmmm...";
@@ -2057,14 +1450,13 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 				mes "cookies I just baked~";
 				next;
 				ein_cook = 9;
-				getitem Well_Baked_Cookie,5;
+				getitem Well_Baked_Cookie, 5;
 				mes "[Uwe]";
 				mes "Okay, enjoy!";
 				mes "I hope you have";
 				mes "a good time smithing!";
 				close;
-			}
-			else {
+			} else {
 				mes "[Uwe]";
 				mes "Hmmm?";
 				mes "Oh, it's you~";
@@ -2082,40 +1474,24 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 				close;
 			}
 		}
-	}
-	else {
-		.@aaa = ein_cook % 2;
-		if (.@aaa == 1) {
-			.@bbb = ein_cook;
-			if (.@bbb > 99) {
-				.@bbb -= 100;
-				if (.@bbb > 99) {
-					.@bbb -= 100;
-					if (.@bbb > 99) {
-						.@ccc = 3;
-					}
-					else {
-						.@ccc = 2;
-					}
-				}
-				else {
-					.@ccc = 1;
-				}
-			}
-			else {
-				.@ccc = 0;
-			}
-			if (.@ccc < 3) {
+	} else {
+		if (ein_cook % 2 == 1) {
+			if (ein_cook >= 300) {
+				mes "[Uwe]";
+				mes "Ah, hello again,";
+				mes "cutie adventurer.";
+				mes "How can I help you?";
+				next;
+			} else {
 				mes "[Uwe]";
 				mes "Hm...?";
 				mes "I never forget a face,";
 				mes "but somehow I feel like";
 				mes "we've met somewhere before...";
 				next;
-				if (.@ccc == 0) {
+				if (ein_cook < 100) {
 					ein_cook += 300;
-				}
-				else if (.@ccc == 2) {
+				} else if (ein_cook < 300) {
 					ein_cook += 100;
 				}
 				mes "[Uwe]";
@@ -2129,442 +1505,66 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 				mes "What brings to";
 				if (Sex == SEX_MALE) {
 					mes "me, you ^EEA9B8naughty boy^000000?";
-				}
-				else {
+				} else {
 					mes "me, you ^EEA9B8naughty girl^000000?";
 				}
 				next;
 			}
-			else if (.@ccc == 3) {
-				mes "[Uwe]";
-				mes "Ah, hello again,";
-				mes "cutie adventurer.";
-				mes "How can I help you?";
-				next;
-			}
-			switch(select("Ask about Einbroch.", "Ask about Cooking.", "Cancel.")) {
+			switch (select("Ask about Einbroch.", "Ask about Cooking.", "Cancel.")) {
 			case 1:
-				mes "[Uwe]";
-				mes "Einbroch was originally";
-				mes "built to support Einbech's";
-				mes "mining efforts. Because it's";
-				mes "small and crowded with people,";
-				mes "there's no room to build the ore refining factories over there.";
-				next;
-				mes "[Uwe]";
-				mes "Since Einbroch used to be";
-				mes "an empty lot, it was perfect";
-				mes "for building factories. That's";
-				mes "what my grandfather told me a";
-				mes "long time ago. Anyway, Einbroch quickly grew into a major city.";
-				next;
-				mes "[Uwe]";
-				mes "Now people think that this";
-				mes "city was never planned to be";
-				mes "just an extension of Einbech.";
-				mes "See that rampart over there?";
-				mes "It doesn't connect to Einbech at all! No protection for them...";
-				next;
-				mes "[Uwe]";
-				mes "It's like the government";
-				mes "lost all interest in Einbech.";
-				mes "Even the miners there have";
-				mes "been moving here to work in ";
-				mes "the factories. But more people hasn't made this city more lively.";
-				next;
-				mes "[Uwe]";
-				mes "Einbroch may look modern";
-				mes "and exciting now, but soon";
-				mes "you'll see that there's no sign";
-				mes "of warmth or life. So... Just don't live here in your old age.";
-				next;
-				switch(select("Then why are you here?", "I won't. Thanks for the advice.")) {
-				case 1:
-					mes "[Uwe]";
-					mes "Well, I have some";
-					mes "precious memories of";
-					mes "this place. Once, there was";
-					mes "a man who lived here who";
-					mes "was just like a father to me.";
-					next;
-					mes "[Uwe]";
-					mes "Oh, but I'm sure that";
-					mes "you don't want to hear";
-					mes "about that. Next time you";
-					mes "drop by, we'll talk about";
-					mes "something more fun, 'kay?";
-					mes "Buhbye for now, cutie~";
-					close;
-				case 2:
-					mes "[Uwe]";
-					mes "Oh, that is such";
-					mes "a good decision,";
-					mes "sugar honey! Oh, you";
-					mes "cutie adventurers are";
-					mes "so precious, so lovable.";
-					mes "^333333*Tee hee hee~*^000000";
-					next;
-					mes "[Uwe]";
-					mes "Well, that was";
-					mes "a fun talk. Come";
-					mes "back and visit, 'kay?";
-					mes "I'll miss you until";
-					mes "the next time~";
-					close;
-				}
+				F_AboutEinbroch();
 			case 2:
 				mes "[Uwe]";
 				mes "Ooh, cooking!";
 				mes "So what did you";
 				mes "want to ask me...?";
 				next;
-				switch(select("Heart", "Ingredients", "Skills", "Tools", "Cancel.")) {
+				switch (select("Heart", "Ingredients", "Skills", "Tools", "Cancel.")) {
 				case 1:
-					mes "[Uwe]";
-					mes "Ah, heart. Just like forging,";
-					mes "you need passion and desire";
-					mes "to create something special.";
-					mes "Every smith and cook knows that";
-					mes "you can do anything if you have";
-					mes "the will and the commitment.";
-					next;
-					mes "[Uwe]";
-					mes "Well, that's all";
-					mes "I really have to";
-					mes "say about that. But";
-					mes "come back and chat";
-					mes "whenever you please.";
-					break;
+					F_Heart();
 				case 2:
-					mes "[Uwe]";
-					mes "Now for beginners,";
-					mes "learning to select";
-					mes "and use ingredients";
-					mes "is one of the most";
-					mes "important fundamentals.";
-					next;
-					mes "[Uwe]";
-					mes "Cooking is like forging";
-					mes "since specific ingredients";
-					mes "are needed to make specialty";
-					mes "items or dishes. You can't just";
-					mes "skip them if you really need";
-					mes "them, right? Right!";
-					next;
-					mes "[Uwe]";
-					mes "Once you make up your";
-					mes "mind to do something,";
-					mes "focus on finishing it, 'kay?";
-					mes "Never cut corners and always";
-					mes "dedicate yourself to make the";
-					mes "very best finished product~";
-					next;
-					mes "[Uwe]";
-					mes "Well, that was";
-					mes "a fun talk. Come";
-					mes "back and visit, 'kay?";
-					mes "I'll miss you until";
-					mes "the next time~";
-					break;
+					F_Ingredients();
 				case 3:
-					mes "[Uwe]";
-					mes "When you're beginning to learn";
-					mes "skills, you can't let yourself be discouraged! Practice makes";
-					mes "perfect, you know? But never";
-					mes "use your lack of skills as an";
-					mes "excuse if you happen to fail...";
-					next;
-					mes "[Uwe]";
-					mes "Effort is also an essential";
-					mes "in forging and cooking! Now,";
-					mes "on the other hand, if you put";
-					mes "in all the effort but didn't learn any of the skills, you'll still get nowhere fast, right? Right!";
-					next;
-					mes "[Uwe]";
-					mes "The key is to always";
-					mes "give 100% effort and work";
-					mes "on improving your skills.";
-					mes "Before you know it, you'll";
-					mes "be a respected master!";
-					next;
-					mes "[Uwe]";
-					mes "Well, that was";
-					mes "a fun talk. Come";
-					mes "back and visit, 'kay?";
-					mes "I'll miss you until";
-					mes "the next time~";
-					break;
+					F_Skills();
 				case 4:
-					mes "[Uwe]";
-					mes "Cooking is a little";
-					mes "easier if you have";
-					mes "nicer tools to use,";
-					mes "but that's it. Tools by";
-					mes "themselves can't make";
-					mes "just anybody a master.";
-					next;
-					mes "[Uwe]";
-					mes "In the end, the best";
-					mes "tools are the ones you're";
-					mes "most comfortable with using.";
-					mes "In fact, I still use the old knife I used back when I was just";
-					mes "a little novice chef~";
-					next;
-					mes "[Uwe]";
-					mes "Well, that was";
-					mes "a fun talk. Come";
-					mes "back and visit, 'kay?";
-					mes "I'll miss you until";
-					mes "the next time~";
-					break;
+					F_ToolsWithoutReward();
 				case 5:
-					mes "[Uwe]";
-					mes "Oh...?";
-					mes "Well, feel";
-					mes "free to visit";
-					mes "me whenever";
-					mes "you want, 'kay?";
-					close;
-				}
-				switch(rand(1,3)) {
-				case 1: mes "...Ho ho~"; break;
-				case 2: mes "...*Tee Hee~*"; break;
-				case 3: mes "...Behbie~";
+					F_Cancel();
 				}
-				close;
-
 			case 3:
-				mes "[Uwe]";
-				mes "Oh...?";
-				mes "Well, feel";
-				mes "free to visit";
-				mes "me whenever";
-				mes "you want, 'kay?";
-				close;
+				F_Cancel();
 			}
 		}
 		if (ein_cook > 999) {
-			.@eee = ein_cook-1000;
-			if (.@eee > 199) {
+			if (ein_cook > 1199) {
 				mes "[Uwe]";
 				mes "Ah, hello again,";
 				mes "cutie adventurer.";
 				mes "How can I help you?";
 				next;
-				switch(select("Talk about Einbroch.", "Ask him to forge a Weapon.", "Talk about Cooking.", "Cancel.")) {
+				switch (select("Talk about Einbroch.", "Ask him to forge a Weapon.", "Talk about Cooking.", "Cancel.")) {
 				case 1:
-					mes "[Uwe]";
-					mes "Einbroch was originally";
-					mes "built to support Einbech's";
-					mes "mining efforts. Because it's";
-					mes "small and crowded with people,";
-					mes "there's no room to build the ore refining factories over there.";
-					next;
-					mes "[Uwe]";
-					mes "Since Einbroch used to be";
-					mes "an empty lot, it was perfect";
-					mes "for building factories. That's";
-					mes "what my grandfather told me a";
-					mes "long time ago. Anyway, Einbroch quickly grew into a major city.";
-					next;
-					mes "[Uwe]";
-					mes "Now people think that this";
-					mes "city was never planned to be";
-					mes "just an extension of Einbech.";
-					mes "See that rampart over there?";
-					mes "It doesn't connect to Einbech at all! No protection for them...";
-					next;
-					mes "[Uwe]";
-					mes "It's like the government";
-					mes "lost all interest in Einbech.";
-					mes "Even the miners there have";
-					mes "been moving here to work in ";
-					mes "the factories. But more people hasn't made this city more lively.";
-					next;
-					mes "[Uwe]";
-					mes "Einbroch may look modern";
-					mes "and exciting now, but soon";
-					mes "you'll see that there's no sign";
-					mes "of warmth or life. So... Just don't live here in your old age.";
-					next;
-					switch(select("Then why are you here?", "I won't. Thanks for the advice.")) {
-					case 1:
-						mes "[Uwe]";
-						mes "Well, I have some";
-						mes "precious memories of";
-						mes "this place. Once, there was";
-						mes "a man who lived here who";
-						mes "was just like a father to me.";
-						next;
-						mes "[Uwe]";
-						mes "Oh, but I'm sure that";
-						mes "you don't want to hear";
-						mes "about that. Next time you";
-						mes "drop by, we'll talk about";
-						mes "something more fun, 'kay?";
-						mes "Buhbye for now, cutie~";
-						close;
-					case 2:
-						mes "[Uwe]";
-						mes "Oh, that is such";
-						mes "a good decision,";
-						mes "sugar honey! Oh, you";
-						mes "cutie adventurers are";
-						mes "so precious, so lovable.";
-						mes "^333333*Tee hee hee~*^000000";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						close;
-					}
+					F_AboutEinbroch();
 				case 2:
-					mes "[Uwe]";
-					mes "Well...";
-					mes "I actually just";
-					mes "do smithing work";
-					mes "to create my own";
-					mes "cooking tools.";
-					next;
-					mes "[Uwe]";
-					mes "Oh, I understand";
-					mes "that somebody needs";
-					mes "to fight the monsters,";
-					mes "but I'm the wrong person";
-					mes "to ask for forging weapons.";
-					mes "I... am a strict pacifist~";
-					next;
-					mes "[Uwe]";
-					mes "Just go look";
-					mes "around for a little";
-					mes "bit, I'm sure you'll";
-					mes "find a Blacksmith";
-					mes "who's willing to forge";
-					mes "you a good weapon~";
-					close;
+					F_ForgeWeapon();
 				case 3:
 					mes "[Uwe]";
 					mes "Ooh, cooking!";
 					mes "So what did you";
 					mes "want to ask me...?";
 					next;
-					switch(select("Heart", "Ingredients", "Skills", "Tools", "Cancel.")) {
+					switch (select("Heart", "Ingredients", "Skills", "Tools", "Cancel.")) {
 					case 1:
-						mes "[Uwe]";
-						mes "Ah, heart. Just like forging,";
-						mes "you need passion and desire";
-						mes "to create something special.";
-						mes "Every smith and cook knows that";
-						mes "you can do anything if you have";
-						mes "the will and the commitment.";
-						next;
-						mes "[Uwe]";
-						mes "Well, that's all";
-						mes "I really have to";
-						mes "say about that. But";
-						mes "come back and chat";
-						mes "whenever you please.";
-						break;
+						F_Heart();
 					case 2:
-						mes "[Uwe]";
-						mes "Now for beginners,";
-						mes "learning to select";
-						mes "and use ingredients";
-						mes "is one of the most";
-						mes "important fundamentals.";
-						next;
-						mes "[Uwe]";
-						mes "Cooking is like forging";
-						mes "since specific ingredients";
-						mes "are needed to make specialty";
-						mes "items or dishes. You can't just";
-						mes "skip them if you really need";
-						mes "them, right? Right!";
-						next;
-						mes "[Uwe]";
-						mes "Once you make up your";
-						mes "mind to do something,";
-						mes "focus on finishing it, 'kay?";
-						mes "Never cut corners and always";
-						mes "dedicate yourself to make the";
-						mes "very best finished product~";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						break;
+						F_Ingredients();
 					case 3:
-						mes "[Uwe]";
-						mes "When you're beginning to learn";
-						mes "skills, you can't let yourself be discouraged! Practice makes";
-						mes "perfect, you know? But never";
-						mes "use your lack of skills as an";
-						mes "excuse if you happen to fail...";
-						next;
-						mes "[Uwe]";
-						mes "Effort is also an essential";
-						mes "in forging and cooking! Now,";
-						mes "on the other hand, if you put";
-						mes "in all the effort but didn't learn any of the skills, you'll still get nowhere fast, right? Right!";
-						next;
-						mes "[Uwe]";
-						mes "The key is to always";
-						mes "give 100% effort and work";
-						mes "on improving your skills.";
-						mes "Before you know it, you'll";
-						mes "be a respected master!";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						break;
+						F_Skills();
 					case 4:
-						mes "[Uwe]";
-						mes "Cooking is a little";
-						mes "easier if you have";
-						mes "nicer tools to use,";
-						mes "but that's it. Tools by";
-						mes "themselves can't make";
-						mes "just anybody a master.";
-						next;
-						mes "[Uwe]";
-						mes "In the end, the best";
-						mes "tools are the ones you're";
-						mes "most comfortable with using.";
-						mes "In fact, I still use the old knife I used back when I was just";
-						mes "a little novice chef~";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						break;
+						F_ToolsWithoutReward();
 					case 5:
-						mes "[Uwe]";
-						mes "Oh...?";
-						mes "Well, feel";
-						mes "free to visit";
-						mes "me whenever";
-						mes "you want, 'kay?";
-						close;
-					}
-					switch(rand(1,3)) {
-					case 1: mes "...Ho ho~"; close;
-					case 2: mes "...*Tee Hee~*"; close;
-					case 3: mes "...Behbie~"; close;
+						F_Cancel();
 					}
-
 				case 4:
 					mes "[Uwe]";
 					mes "Alright then,";
@@ -2573,8 +1573,7 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 					mes "Hohohohoho~";
 					close;
 				}
-			}
-			else if (.@eee > 99) {
+			} else if (ein_cook > 1099) {
 				mes "[Uwe]";
 				mes "Oh hello hello~";
 				mes "It's been a long";
@@ -2589,118 +1588,27 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 				mes "Did you already forget";
 				mes "the 6 Large Jellopy?";
 				next;
-				switch(select("Talk about Einbroch.", "Ask him to forge a Weapon.", "Give him the Materials.", "Cancel.")) {
+				switch (select("Talk about Einbroch.", "Ask him to forge a Weapon.", "Give him the Materials.", "Cancel.")) {
 				case 1:
-					mes "[Uwe]";
-					mes "Einbroch was originally";
-					mes "built to support Einbech's";
-					mes "mining efforts. Because it's";
-					mes "small and crowded with people,";
-					mes "there's no room to build the ore refining factories over there.";
-					next;
-					mes "[Uwe]";
-					mes "Since Einbroch used to be";
-					mes "an empty lot, it was perfect";
-					mes "for building factories. That's";
-					mes "what my grandfather told me a";
-					mes "long time ago. Anyway, Einbroch quickly grew into a major city.";
-					next;
-					mes "[Uwe]";
-					mes "Now people think that this";
-					mes "city was never planned to be";
-					mes "just an extension of Einbech.";
-					mes "See that rampart over there?";
-					mes "It doesn't connect to Einbech at all! No protection for them...";
-					next;
-					mes "[Uwe]";
-					mes "It's like the government";
-					mes "lost all interest in Einbech.";
-					mes "Even the miners there have";
-					mes "been moving here to work in ";
-					mes "the factories. But more people hasn't made this city more lively.";
-					next;
-					mes "[Uwe]";
-					mes "Einbroch may look modern";
-					mes "and exciting now, but soon";
-					mes "you'll see that there's no sign";
-					mes "of warmth or life. So... Just don't live here in your old age.";
-					next;
-					switch(select("Then why are you here?", "I won't. Thanks for the advice.")) {
-					case 1:
-						mes "[Uwe]";
-						mes "Well, I have some";
-						mes "precious memories of";
-						mes "this place. Once, there was";
-						mes "a man who lived here who";
-						mes "was just like a father to me.";
-						next;
-						mes "[Uwe]";
-						mes "Oh, but I'm sure that";
-						mes "you don't want to hear";
-						mes "about that. Next time you";
-						mes "drop by, we'll talk about";
-						mes "something more fun, 'kay?";
-						mes "Buhbye for now, cutie~";
-						close;
-					case 2:
-						mes "[Uwe]";
-						mes "Oh, that is such";
-						mes "a good decision,";
-						mes "sugar honey! Oh, you";
-						mes "cutie adventurers are";
-						mes "so precious, so lovable.";
-						mes "^333333*Tee hee hee~*^000000";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						close;
-					}
+					F_AboutEinbroch();
 				case 2:
-					mes "[Uwe]";
-					mes "Well...";
-					mes "I actually just";
-					mes "do smithing work";
-					mes "to create my own";
-					mes "cooking tools.";
-					next;
-					mes "[Uwe]";
-					mes "Oh, I understand";
-					mes "that somebody needs";
-					mes "to fight the monsters,";
-					mes "but I'm the wrong person";
-					mes "to ask for forging weapons.";
-					mes "I... am a strict pacifist~";
-					next;
-					mes "[Uwe]";
-					mes "Just go look";
-					mes "around for a little";
-					mes "bit, I'm sure you'll";
-					mes "find a Blacksmith";
-					mes "who's willing to forge";
-					mes "you a good weapon~";
-					close;
+					F_ForgeWeapon();
 				case 3:
 					if (countitem(Large_Jellopy) > 5) {
 						mes "[Uwe]";
 						mes "Thank you ^EEA9B8so^000000 much!";
 						mes "Here's the Coal I promised~";
-						delitem Large_Jellopy,6;
+						delitem Large_Jellopy, 6;
 						ein_cook += 100;
-						getitem Coal,1;
+						getitem Coal, 1;
 						next;
-					}
-					else {
+					} else {
 						mes "[Uwe]";
 						mes "Huh...?";
 						if (countitem(Large_Jellopy) == 0) {
 							mes "You brought";
 							mes "none at all...?";
-						}
-						else {
+						} else {
 							mes "This isn't enough";
 							mes "Large Jellopy...!";
 						}
@@ -2715,121 +1623,15 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 					mes "honey. Now what would you like";
 					mes "to hear more about? Hmm...?";
 					next;
-					switch(select("Heart", "Materials", "Skills", "Tools", "Cancel.")) {
+					switch (select("Heart", "Materials", "Skills", "Tools", "Cancel.")) {
 					case 1:
-						mes "[Uwe]";
-						mes "Ah, heart. Just like forging,";
-						mes "you need passion and desire";
-						mes "to create something special.";
-						mes "Every smith and cook knows that";
-						mes "you can do anything if you have";
-						mes "the will and the commitment.";
-						next;
-						mes "[Uwe]";
-						mes "Well, that's all";
-						mes "I really have to";
-						mes "say about that. But";
-						mes "come back and chat";
-						mes "whenever you please.";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_Heart();
 					case 2:
-						mes "[Uwe]";
-						mes "Now for beginners,";
-						mes "learning to select";
-						mes "and use ingredients";
-						mes "is one of the most";
-						mes "important fundamentals.";
-						next;
-						mes "[Uwe]";
-						mes "Cooking is like forging";
-						mes "since specific ingredients";
-						mes "are needed to make specialty";
-						mes "items or dishes. You can't just";
-						mes "skip them if you really need";
-						mes "them, right? Right!";
-						next;
-						mes "[Uwe]";
-						mes "Once you make up your";
-						mes "mind to do something,";
-						mes "focus on finishing it, 'kay?";
-						mes "Never cut corners and always";
-						mes "dedicate yourself to make the";
-						mes "very best finished product~";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_Ingredients();
 					case 3:
-						mes "[Uwe]";
-						mes "When you're beginning to learn";
-						mes "skills, you can't let yourself be discouraged! Practice makes";
-						mes "perfect, you know? But never";
-						mes "use your lack of skills as an";
-						mes "excuse if you happen to fail...";
-						next;
-						mes "[Uwe]";
-						mes "Effort is also an essential";
-						mes "in forging and cooking! Now,";
-						mes "on the other hand, if you put";
-						mes "in all the effort but didn't learn any of the skills, you'll still get nowhere fast, right? Right!";
-						next;
-						mes "[Uwe]";
-						mes "The key is to always";
-						mes "give 100% effort and work";
-						mes "on improving your skills.";
-						mes "Before you know it, you'll";
-						mes "be a respected master!";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						switch(rand(1,3)) {
-						case 1: mes "Hohohohoho."; close;
-						case 2: mes "Umhohohoho.*"; close;
-						case 3: mes "Umho."; close;
-						}
+						F_Skills();
 					case 4:
-						mes "[Uwe]";
-						mes "Cooking is a little";
-						mes "easier if you have";
-						mes "nicer tools to use,";
-						mes "but that's it. Tools by";
-						mes "themselves can't make";
-						mes "just anybody a master.";
-						next;
-						mes "[Uwe]";
-						mes "In the end, the best";
-						mes "tools are the ones you're";
-						mes "most comfortable with using.";
-						mes "In fact, I still use the old knife I used back when I was just";
-						mes "a little novice chef~";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						switch(rand(1,3)) {
-						case 1: mes "...Ho ho~"; close;
-						case 2: mes "...*Tee Hee~*"; close;
-						case 3: mes "...Behbie~"; close;
-						}
+						F_ToolsWithoutReward();
 					case 5:
 						mes "[Uwe]";
 						mes "Alright then,";
@@ -2847,160 +1649,18 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 					mes "Hohohohoho~";
 					close;
 				}
-			}
-			else {
+			} else {
 				mes "[Uwe]";
 				mes "Hello, cutie~";
 				mes "How can I help you?";
 				next;
-				switch(select("Talk about Einbroch.", "Ask him to forge a Weapon.", "Master, I want to learn cooking.", "Cancel.")) {
+				switch (select("Talk about Einbroch.", "Ask him to forge a Weapon.", "Master, I want to learn cooking.", "Cancel.")) {
 				case 1:
-					mes "[Uwe]";
-					mes "Einbroch was originally";
-					mes "built to support Einbech's";
-					mes "mining efforts. Because it's";
-					mes "small and crowded with people,";
-					mes "there's no room to build the ore refining factories over there.";
-					next;
-					mes "[Uwe]";
-					mes "Since Einbroch used to be";
-					mes "an empty lot, it was perfect";
-					mes "for building factories. That's";
-					mes "what my grandfather told me a";
-					mes "long time ago. Anyway, Einbroch quickly grew into a major city.";
-					next;
-					mes "[Uwe]";
-					mes "Now people think that this";
-					mes "city was never planned to be";
-					mes "just an extension of Einbech.";
-					mes "See that rampart over there?";
-					mes "It doesn't connect to Einbech at all! No protection for them...";
-					next;
-					mes "[Uwe]";
-					mes "It's like the government";
-					mes "lost all interest in Einbech.";
-					mes "Even the miners there have";
-					mes "been moving here to work in ";
-					mes "the factories. But more people hasn't made this city more lively.";
-					next;
-					mes "[Uwe]";
-					mes "Einbroch may look modern";
-					mes "and exciting now, but soon";
-					mes "you'll see that there's no sign";
-					mes "of warmth or life. So... Just don't live here in your old age.";
-					next;
-					switch(select("Then why are you here?", "I won't. Thanks for the advice.")) {
-					case 1:
-						mes "[Uwe]";
-						mes "Well, I have some";
-						mes "precious memories of";
-						mes "this place. Once, there was";
-						mes "a man who lived here who";
-						mes "was just like a father to me.";
-						next;
-						mes "[Uwe]";
-						mes "Oh, but I'm sure that";
-						mes "you don't want to hear";
-						mes "about that. Next time you";
-						mes "drop by, we'll talk about";
-						mes "something more fun, 'kay?";
-						mes "Buhbye for now, cutie~";
-						close;
-					case 2:
-						mes "[Uwe]";
-						mes "Oh, that is such";
-						mes "a good decision,";
-						mes "sugar honey! Oh, you";
-						mes "cutie adventurers are";
-						mes "so precious, so lovable.";
-						mes "^333333*Tee hee hee~*^000000";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						close;
-					}
+					F_AboutEinbroch();
 				case 2:
-					mes "[Uwe]";
-					mes "Well...";
-					mes "I actually just";
-					mes "do smithing work";
-					mes "to create my own";
-					mes "cooking tools.";
-					next;
-					mes "[Uwe]";
-					mes "Oh, I understand";
-					mes "that somebody needs";
-					mes "to fight the monsters,";
-					mes "but I'm the wrong person";
-					mes "to ask for forging weapons.";
-					mes "I... am a strict pacifist~";
-					next;
-					mes "[Uwe]";
-					mes "Just go look";
-					mes "around for a little";
-					mes "bit, I'm sure you'll";
-					mes "find a Blacksmith";
-					mes "who's willing to forge";
-					mes "you a good weapon~";
-					close;
+					F_ForgeWeapon();
 				case 3:
-					mes "[Uwe]";
-					mes "Mm...?";
-					mes "Did you just";
-					mes "say that you";
-					mes "want to learn";
-					mes "the art of cooking?";
-					next;
-					mes "[Uwe]";
-					mes "I'm sorry, but I can't";
-					mes "really give culinary";
-					mes "lessons. But I will";
-					mes "give good advice for";
-					mes "hopeful beginners.";
-					next;
-					mes "[Uwe]";
-					mes "Now...";
-					mes "For your tuition";
-					mes "I'll need-- Gosh,";
-					mes "there's just so many";
-					mes "things. Get some paper,";
-					mes "and a pen for this list...";
-					next;
-					ein_cook += 100;
-					mes "[Uwe]";
-					mes "Just kidding!";
-					mes "^333333*Titter~*^000000 I don't need";
-					mes "much to make some";
-					mes "cooking utensils. Bring";
-					mes "6 ^0000FFLarge Jellopy^000000. That's it!";
-					next;
-					mes "[Uwe]";
-					mes "In return, I will give you";
-					mes "1 Coal and some useful";
-					mes "cooking advice for novices.";
-					mes "I give this advice for free to";
-					mes "my smithing colleages, though...";
-					next;
-					mes "[Uwe]";
-					mes "Why ^EEA9B8don't^000000 you";
-					mes "become a Blacksmith?";
-					mes "I'm much more confident";
-					mes "in that field. ^333333*Tee hee~*^000000";
-					next;
-					mes "[Uwe]";
-					mes "Well, I'll be";
-					mes "waiting right";
-					mes "here until you";
-					mes "come back.";
-					switch(rand(1,3)) {
-					case 1: mes "...Ho ho~"; close;
-					case 2: mes "...*Tee Hee~*"; close;
-					case 3: mes "...Behbie~"; close;
-					}
+					F_Cooking();
 				case 4:
 					mes "[Uwe]";
 					mes "Take care,";
@@ -3009,13 +1669,12 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 					close;
 				}
 			}
-		}
-		else if (ein_cook == 0) {
+		} else if (ein_cook == 0) {
 			mes "[Uwe]";
 			mes "Cooking is such a joy~!";
 			mes "The scents, the flavors, the sensation of sheer ^EEA9B8satiation^000000...";
 			next;
-			switch(select("Um, isn't this a forge?", "Ignore him.")) {
+			switch (select("Um, isn't this a forge?", "Ignore him.")) {
 			case 1:
 				mes "[Uwe]";
 				ein_cook = 1000;
@@ -3037,159 +1696,17 @@ einbroch,215,180,6	script	Uwe Kleine#ein	4_M_03,{
 				mes "adooooooooorable";
 				if (Sex == SEX_MALE) {
 					mes "hunk of a man?";
-				}
-				else {
+				} else {
 					mes "womanly woman?";
 				}
 				next;
-				switch(select("Talk about Einbroch.", "Ask him to forge a Weapon.", "Master, I want to learn cooking.", "Cancel.")) {
+				switch (select("Talk about Einbroch.", "Ask him to forge a Weapon.", "Master, I want to learn cooking.", "Cancel.")) {
 				case 1:
-					mes "[Uwe]";
-					mes "Einbroch was originally";
-					mes "built to support Einbech's";
-					mes "mining efforts. Because it's";
-					mes "small and crowded with people,";
-					mes "there's no room to build the ore refining factories over there.";
-					next;
-					mes "[Uwe]";
-					mes "Since Einbroch used to be";
-					mes "an empty lot, it was perfect";
-					mes "for building factories. That's";
-					mes "what my grandfather told me a";
-					mes "long time ago. Anyway, Einbroch quickly grew into a major city.";
-					next;
-					mes "[Uwe]";
-					mes "Now people think that this";
-					mes "city was never planned to be";
-					mes "just an extension of Einbech.";
-					mes "See that rampart over there?";
-					mes "It doesn't connect to Einbech at all! No protection for them...";
-					next;
-					mes "[Uwe]";
-					mes "It's like the government";
-					mes "lost all interest in Einbech.";
-					mes "Even the miners there have";
-					mes "been moving here to work in ";
-					mes "the factories. But more people hasn't made this city more lively.";
-					next;
-					mes "[Uwe]";
-					mes "Einbroch may look modern";
-					mes "and exciting now, but soon";
-					mes "you'll see that there's no sign";
-					mes "of warmth or life. So... Just don't live here in your old age.";
-					next;
-					switch(select("Then why are you here?", "I won't. Thanks for the advice.")) {
-					case 1:
-						mes "[Uwe]";
-						mes "Well, I have some";
-						mes "precious memories of";
-						mes "this place. Once, there was";
-						mes "a man who lived here who";
-						mes "was just like a father to me.";
-						next;
-						mes "[Uwe]";
-						mes "Oh, but I'm sure that";
-						mes "you don't want to hear";
-						mes "about that. Next time you";
-						mes "drop by, we'll talk about";
-						mes "something more fun, 'kay?";
-						mes "Buhbye for now, cutie~";
-						close;
-					case 2:
-						mes "[Uwe]";
-						mes "Oh, that is such";
-						mes "a good decision,";
-						mes "sugar honey! Oh, you";
-						mes "cutie adventurers are";
-						mes "so precious, so lovable.";
-						mes "^333333*Tee hee hee~*^000000";
-						next;
-						mes "[Uwe]";
-						mes "Well, that was";
-						mes "a fun talk. Come";
-						mes "back and visit, 'kay?";
-						mes "I'll miss you until";
-						mes "the next time~";
-						close;
-					}
+					F_AboutEinbroch();
 				case 2:
-					mes "[Uwe]";
-					mes "Well...";
-					mes "I actually just";
-					mes "do smithing work";
-					mes "to create my own";
-					mes "cooking tools.";
-					next;
-					mes "[Uwe]";
-					mes "Oh, I understand";
-					mes "that somebody needs";
-					mes "to fight the monsters,";
-					mes "but I'm the wrong person";
-					mes "to ask for forging weapons.";
-					mes "I... am a strict pacifist~";
-					next;
-					mes "[Uwe]";
-					mes "Just go look";
-					mes "around for a little";
-					mes "bit, I'm sure you'll";
-					mes "find a Blacksmith";
-					mes "who's willing to forge";
-					mes "you a good weapon~";
-					close;
+					F_ForgeWeapon();
 				case 3:
-					mes "[Uwe]";
-					mes "Mm...?";
-					mes "Did you just";
-					mes "say that you";
-					mes "want to learn";
-					mes "the art of cooking?";
-					next;
-					mes "[Uwe]";
-					mes "I'm sorry, but I can't";
-					mes "really give culinary";
-					mes "lessons. But I will";
-					mes "give good advice for";
-					mes "hopeful beginners.";
-					next;
-					mes "[Uwe]";
-					mes "Now...";
-					mes "For your tuition";
-					mes "I'll need-- Gosh,";
-					mes "there's just so many";
-					mes "things. Get some paper,";
-					mes "and a pen for this list...";
-					next;
-					ein_cook += 100;
-					mes "[Uwe]";
-					mes "Just kidding!";
-					mes "^333333*Titter~*^000000 I don't need";
-					mes "much to make some";
-					mes "cooking utensils. Bring";
-					mes "6 ^0000FFLarge Jellopy^000000. That's it!";
-					next;
-					mes "[Uwe]";
-					mes "In return, I will give you";
-					mes "1 Coal and some useful";
-					mes "cooking advice for novices.";
-					mes "I give this advice for free to";
-					mes "my smithing colleages, though...";
-					next;
-					mes "[Uwe]";
-					mes "Why ^EEA9B8don't^000000 you";
-					mes "become a Blacksmith?";
-					mes "I'm much more confident";
-					mes "in that field. ^333333*Tee hee~*^000000";
-					next;
-					mes "[Uwe]";
-					mes "Well, I'll be";
-					mes "waiting right";
-					mes "here until you";
-					mes "come back.";
-					switch(rand(1,3)) {
-					case 1: mes "...Ho ho~"; close;
-					case 2: mes "...*Tee Hee~*"; close;
-					case 3: mes "...Behbie~"; close;
-					}
+					F_Cooking();
 				case 4:
 					mes "[Uwe]";
 					mes "Take care,";
@@ -3216,7 +1733,7 @@ einbroch,1,1,0	script	Einbroch Smog Alert	FAKE_NPC,{
 
 OnEnable:
 	$@AlrdEinPoll = 1;
-	mapannounce "einbroch","This is a state of emercency! Harmful smog is reaching high levels of saturation. Residents of Einbroch must find shelter immediately.",bc_map;
+	mapannounce "einbroch","This is a state of emergency! Harmful smog is reaching high levels of saturation. Residents of Einbroch must find shelter immediately.",bc_map;
 	enablenpc "Einbroch Smog Alert";
 	hideonnpc "Centzu#ein";
 	hideonnpc "Khowropher#ein";
@@ -3576,7 +2093,7 @@ ein_in01,67,242,3	script	Zelmeto	4_M_REPAIR,{
 			mes "[Zelmeto]";
 			mes "^333333*Whew*^000000";
 			mes "I haven't given that much";
-			mes "inspriration in a while, but";
+			mes "inspiration in a while, but";
 			mes "your help was well worth it.";
 			mes "I'm going to start the repairs, but once again, I'd like to thank you.";
 			close;
@@ -3616,7 +2133,7 @@ ein_in01,67,242,3	script	Zelmeto	4_M_REPAIR,{
 		mes "^333333*Sigh*^000000";
 		mes "My proposal was rejected";
 		mes "by our superintendant. But";
-		mes "maintainance and repairs";
+		mes "maintenance and repairs";
 		mes "are crucial for peak operating";
 		mes "efficiency and worker safety!";
 		next;
@@ -3791,7 +2308,7 @@ ein_in01,67,242,3	script	Zelmeto	4_M_REPAIR,{
 		mes "[Zelmeto]";
 		mes "Now, the pipe I want";
 		mes "you to inspect is located";
-		mes "near those large caultrons";
+		mes "near those large cauldrons";
 		mes "of molten metal. You should";
 		mes "be able to find it pretty easily.";
 		next;
@@ -4260,7 +2777,7 @@ einbech,165,105,7	script	Buender Hikeman#ein	4_M_EINOLD,{
 		case 1:
 			mes "[Buender Hikeman]";
 			mes "How dare you...";
-			mes "How dare you treat ";
+			mes "How dare you treat me";
 			mes "after destroying all the";
 			mes "happiness in my life!";
 			next;
@@ -4741,7 +3258,6 @@ ein_in01,231,163,7	script	Sick Old Man#ein	4_M_DIEMAN,{
 		close;
 	}
 	else if (Shinokas_Quest == 2) {
-		einbech = 0;
 		mes "[Sick Old Man]";
 		mes "...!";
 		next;
@@ -4787,7 +3303,7 @@ ein_in01,231,163,7	script	Sick Old Man#ein	4_M_DIEMAN,{
 				mes "^3355FFIt doesn't seem";
 				mes "like this old man";
 				mes "is telling the truth...^000000";
-				einbech = 0;
+				.@einbech = 0;
 				next;
 			}
 			else {
@@ -4924,7 +3440,7 @@ ein_in01,231,163,7	script	Sick Old Man#ein	4_M_DIEMAN,{
 		next;
 		mes "[Shinokas]";
 		mes "After I destroyed the tunnel,";
-		mes "they targeted me and I ended";
+		mes "they targeted me and I ended up";
 		mes "spending the rest of my life being pursued and running from place to place. What the hell was that ^3131FFore^000000 and why was it so important?";
 		next;
 		mes "[Shinokas]";
@@ -7131,7 +5647,7 @@ ein_in01,191,102,5	script	Kaijeta#ein	4_F_EINOLD,{
 		mes "[Kaijeta]";
 		mes "I can't bear to see the";
 		mes "petty hatred between our";
-		mes "two towns stop my son from";
+		mes "two towns stopping my son from";
 		mes "seeing the woman he loves...";
 		changequest 8081,8082;
 		close;