Corrected BlackSmith quest skills (#6951)

After reborn players that have quest skills before cant learn it after reborn or if player use Neuralizer/reset skills.

Thanks to @Balferian !

npc/quests/skills/blacksmith_skills.txt

@@ -14,8 +14,18 @@
 //============================================================
 
 geffen,178,72,3	script	Akkie#qsk_bs	726,{
-	if (BaseJob == Job_Blacksmith) {
-		if (BLACK_SK == 7 && getskilllv("BS_UNFAIRLYTRICK") == 0) {
+	if (BaseJob != Job_Blacksmith) {
+		mes "[Akkie]";
+		mes "Ah, today seems like";
+		mes "a perfect day for forging.";
+		mes "I just feel like going behind";
+		mes "a beautiful waterfall, getting";
+		mes "some high quality materials,";
+		mes "and just hammering things.";
+		close;
+	}
+	if (Upper == 1) {
+		if (BLACK_SK == 7) {
 			mes "[Akkie]";
 			mes "I see that you've";
 			mes "transcended since the";
@@ -30,11 +40,12 @@ geffen,178,72,3	script	Akkie#qsk_bs	726,{
 			mes "zeny that we made the last time. Do you remember how to perform";
 			mes "Dubious Salesmanship? You";
 			mes "should be able to use it now...";
-			set BLACK_SK,8;
-			skill "BS_UNFAIRLYTRICK",1,SKILL_PERM;
+			BLACK_SK = 8;
+			if (getskilllv("BS_UNFAIRLYTRICK") == 0)
+				skill "BS_UNFAIRLYTRICK",1,SKILL_PERM;
 			close;
 		}
-		else if (BLACK_SK == 8) {
+		if (BLACK_SK == 8) {
 			mes "[Akkie]";
 			mes "Hi again~";
 			mes "How has the smithing";
@@ -47,435 +58,429 @@ geffen,178,72,3	script	Akkie#qsk_bs	726,{
 			mes "teaching Dubious Salesmanship";
 			mes "to Blacksmiths and Master Smiths, but somebody from our guild has";
 			mes "to do this job. Anyway, farewell and be safe in your travels, okay?";
+			if (getskilllv("BS_UNFAIRLYTRICK") == 0)	// debug
+				skill "BS_UNFAIRLYTRICK",1,SKILL_PERM;
 			close;
 		}
-		if (JobLevel > 29) {
-			if (BLACK_SK == 0) {
-				mes "[Akkie]";
-				mes "Hello there~";
-				mes "Isn't it such a";
-				mes "wonderful day today?";
-				mes "It's perfect for hunting!";
-				next;
-				mes "[Akkie]";
-				mes "Um, let me introduce myself.";
-				mes "I'm Akkie, a representative of";
-				mes "the Blacksmith Guild that has";
-				mes "been dispatched to teach the";
-				mes "Dubious Salesmanship skill to";
-				mes "Blacksmiths and Master Smiths.";
-				next;
-				mes "[Akkie]";
-				mes "This additional class";
-				mes "skill enables you to reduce";
-				mes "the amount of zeny spent to";
-				mes "cast Mammonite by 10%. This";
-				mes "Passive skill might come in";
-				mes "handy for you, "+ strcharinfo(0) +".";
-				next;
-				mes "[Akkie]";
-				mes "Although I'm new at";
-				mes "this, would you like";
-				mes "for me to teach you";
-				mes "Dubious Salesmanship?";
-				next;
-				if (select("Sure.:No, thanks.") == 1) {
-					mes "["+ strcharinfo(0) +"]";
-					mes "Sure. I'll try learning this";
-					mes "new skill. Who knows?";
-					mes "It might be really useful.";
-					next;
-					mes "[Akkie]";
-					mes "Oh, that's great!";
-					mes "You won't regret this!";
-					mes "Now, let me explain how";
-					mes "this skill works. Um, now";
-					mes "where did I put that-- Ah.";
-					mes "Let me read these guidelines.";
-					next;
-					mes "[Akkie]";
-					mes "Using Dubious Salesmanship,";
-					mes "we can reduce Mammonite's";
-					mes "zeny cost by 10% by forging";
-					mes "fake zeny to use in the skill.";
-					mes "Since it's against enemies,";
-					mes "we can let the forgery slide.";
-					next;
-					mes "[Akkie]";
-					mes "Now, I need you to bring";
-					mes "some materials so that I can";
-					mes "demonstrate the forging of";
-					mes "counterfeit zeny. Please";
-					mes "bring me 1 Steel, 5 Coal,";
-					mes "1 Iron Hammer and... and...";
-					next;
-					mes "[Akkie]";
-					mes "Um, would you give";
-					mes "me a minute to look";
-					mes "up the information?";
-					mes "I'm sorry about th-this...";
-					mes "^333333(I thought I highlighted this";
-					mes "in the manual. Where is it?)^000000";
-					next;
-					mes "[Akkie]";
-					mes "Oh! Oh, I found it!";
-					mes "L-let me start all";
-					mes "over again. Uh...";
-					next;
-					mes "["+ strcharinfo(0) +"]";
-					mes "............";
-					next;
-					mes "[Akkie]";
-					mes "^0000FF1 Steel^000000,";
-					mes "^0000FF5 Coal^000000,";
-					mes "^0000FF1 Iron Hammer^000000,";
-					mes "^0000FF500 zeny^000000 and";
-					mes "^0000FF1 Detrimindexta^000000. Would";
-					mes "you bring those, please?";
-					next;
-					mes "["+ strcharinfo(0) +"]";
-					mes "Sure, sure.";
-					mes "But are you actually";
-					mes "able to teach me this";
-					mes "skill? I mean...";
-					next;
-					mes "[Akkie]";
-					mes "Oh no, I knew this was going to";
-					mes "happen! I mean, um, it should";
-					mes "be fine! I've been working here";
-					mes "for 3 months a-and-- Just bring";
-					mes "me the materials and I'll prove";
-					mes "you can learn it e-easily!";
-					next;
-					mes "[Akkie]";
-					mes "You've gotta trust me!";
-					mes "You won't be disappointed,";
-					mes "I promise! This skill is sooo";
-					mes "useful! So just bring me those";
-					mes "materials soon, alright?";
-					set BLACK_SK,1;
-					close;
-				}
-				mes "[Akkie]";
-				mes "Wh-what?! But why not?";
-				mes "A-am I not good enough";
-				mes "for you? Please, I promise";
-				mes "to do my best to teach you.";
-				mes "Besides, I've got to reach";
-				mes "my quota for the guild...";
-				close;
-			}
-			else if (BLACK_SK == 1) {
-				if (countitem(999) > 0 && countitem(1003) > 4 && countitem(971) > 0 && countitem(613) > 0) {
-					if (Zeny >= 500) {
-						mes "[Akkie]";
-						mes "Oh, you came back~";
-						mes "Now let me see if you";
-						mes "brought everything we";
-						mes "need to make counterfeit";
-						mes "zeny so that I can teach";
-						mes "you Dubious Salesmanship.";
-						next;
-						mes "[Akkie]";
-						mes "Good job, it looks like";
-						mes "you've got what we need.";
-						mes "Alright, now please wait";
-						mes "while I get these materials";
-						mes "ready for forging, okay?";
-						delitem 1003,5; //Coal
-						delitem 999,1; //Steel
-						delitem 971,1; //Detrimindexta
-						delitem 613,1; //Iron_Hammer
-						set Zeny, Zeny-500;
-						set BLACK_SK,2;
-						close;
-					}
-					else {
-						mes "[Akkie]";
-						mes "Hmm, you have all the";
-						mes "forging materials, but";
-						mes "I still need 500 zeny.";
-						mes "We need that zeny to copy,";
-						mes "or we won't be able to make";
-						mes "convincing counterfeit money.";
-						close;
-					}
-				}
-				else {
-					mes "[Akkie]";
-					mes "Oh, you came back~";
-					mes "Now let me see if you";
-					mes "brought everything we";
-					mes "need to make counterfeit";
-					mes "zeny so that I can teach";
-					mes "you Dubious Salesmanship.";
-					next;
-					mes "[Akkie]";
-					mes "Hmm, you're still";
-					mes "missing a few things.";
-					mes "Let me tell you what you";
-					mes "need to bring me once again";
-					mes "so that we can start training";
-					mes "you in the skill right away.";
-					next;
-					mes "[Akkie]";
-					mes "^0000FF1 Steel^000000,";
-					mes "^0000FF5 Coal^000000,";
-					mes "^0000FF1 Iron Hammer^000000,";
-					mes "^0000FF500 zeny^000000 and";
-					mes "^0000FF1 Detrimindexta^000000.";
-					mes "Don't forget, okay?";
-					close;
-				}
-			}
-			else if (BLACK_SK == 2) {
-				mes "[Akkie]";
-				mes "A-ah! You came";
-				mes "back sooner than";
-				mes "I thought. Um, gee.";
-				mes "Hmm. How should";
-				mes "I tell you this?";
-				next;
-				mes "["+ strcharinfo(0) +"]";
-				mes "...";
-				mes "......";
-				mes ".........";
-				next;
-				mes "[Akkie]";
-				mes "I'm so sorry! I messed";
-				mes "something up while I was";
-				mes "making a counterfeit sample!";
-				mes "I'm so sorry, please d-don't";
-				mes "report me to the Blacksmith";
-				mes "Guild! Give me one more chance!";
-				next;
-				mes "[Akkie]";
-				mes "I promise that next time";
-				mes "I won't mess up! All I need";
-				mes "is 1 Steel and 3 more Coals!";
-				mes "Please d-don't be angry with";
-				mes "me, it was just an accident!";
-				next;
-				mes "["+ strcharinfo(0) +"]";
-				mes "Okay, okay...";
-				mes "Are you sure that's";
-				mes "all you need me to get?";
-				next;
-				mes "[Akkie]";
-				mes "Yes, yes! Oh, thank";
-				mes "you for being so generous!";
-				mes "Just bring me ^FF00001 Steel^000000 and";
-				mes "^FF00003 Coals^000000 and we'll try again!";
-				set BLACK_SK,3;
-				close;
-			}
-			else if (BLACK_SK == 3) {
-				if (countitem(999) > 0 && countitem(1003) > 2) {
-					mes "[Akkie]";
-					mes "Oh, thank you so";
-					mes "much for bringing these";
-					mes "materials. Alright, I'll try";
-					mes "really hard to succeed";
-					mes "this time. Just give me";
-					mes "a minute to prepare...";
-					delitem 999,1; //Steel
-					delitem 1003,3; //Coal
-					set BLACK_SK,4;
-					close;
-				}
-				else {
-					mes "[Akkie]";
-					mes "All I need you to do";
-					mes "is bring me 1 Steel and";
-					mes "3 Coals. Then I should";
-					mes "be able to teach you the";
-					mes "Dubious Salesmanship skill~";
-					close;
-				}
-			}
-			else if (BLACK_SK == 4) {
-				mes "[Akkie]";
-				mes "......";
-				mes ".........";
-				mes "............";
-				next;
-				mes "["+ strcharinfo(0) +"]";
-				mes "...?";
-				next;
-				mes "["+ strcharinfo(0) +"]";
-				mes "Oh no...";
-				mes "Did... Did you...";
-				mes "Did something happen?";
-				next;
-				mes "[Akkie]";
-				mes "*Sniff* I b-broke the";
-				mes "Iron Hammer you gave";
-				mes "me! I c-can't finish forging";
-				mes "this without one! Waaah~";
-				next;
-				mes "["+ strcharinfo(0) +"]";
-				mes "^333333(I guess I should";
-				mes "really bring her a new";
-				mes "^FF0000Iron Hammer^333333, or else";
-				mes "I'll never learn this skill!)^000000";
-				set BLACK_SK,5;
-				close;
-			}
-			else if (BLACK_SK == 5) {
-				if (countitem(613) > 0) {
-					mes "[Akkie]";
-					mes "^333333*Sniff*^000000 Did you";
-					mes "r-really bring this";
-					mes "Iron Hammer for me?";
-					mes "Th-thank you for being so";
-					mes "patient with my screwups...";
-					next;
-					mes "[Akkie]";
-					mes "Okay, would you";
-					mes "give me a moment?";
-					mes "I'm going to try";
-					mes "one more time.";
-					delitem 613,1; //Iron_Hammer
-					set BLACK_SK,6;
-					close;
-				}
-				else {
-					mes "[Akkie]";
-					mes "Waah~! I can't believe";
-					mes "I broke the Iron Hammer!";
-					mes "Would you please bring me";
-					mes "another one so that I can";
-					mes "finish this counterfeit zeny and teach you Dubious Salesmanship?";
-					close;
-				}
-			}
-			else if (BLACK_SK == 6) {
-				mes "[Akkie]";
-				mes "Oh, you're back!";
-				mes "Yaaaay, I finally did it!";
-				mes "I finished making a sample";
-				mes "of counterfeit zeny and even";
-				mes "tested it with Mammonite!";
-				next;
-				mes "[Akkie]";
-				mes "Oh, before you learn my";
-				mes "skill, I'm supposed to tell you";
-				mes "that my colleague, Goodman,";
-				mes "can teach you another additional skill known as Greed. So you";
-				mes "may want to look for him later.";
-				next;
-				mes "[Akkie]";
-				mes "Okay, now the first part to";
-				mes "learning Dubious Salesmanship";
-				mes "is making this fake zeny. Watch";
-				mes "this... Isn't it easy? Of course, you can only use this in battle to";
-				mes "reduce Mammonite's zeny cost...";
-				set BLACK_SK,7;
-				skill "BS_UNFAIRLYTRICK",1,SKILL_PERM;
-				next;
-				mes "[Akkie]";
-				mes "Also, 90% of the cost of";
-				mes "Mammonite has to be real";
-				mes "zeny or the skill will begin";
-				mes "to lose effectiveness. Well,";
-				mes "that's all for the lesson. Now you can use Dubious Salesmanship!";
-				next;
-				mes "[Akkie]";
-				mes "Thanks once again for";
-				mes "putting up with my mistakes,";
-				mes "I know it must have been really";
-				mes "annoying. Anyway, I hope this";
-				mes "skill is really useful for you.";
-				mes "Drop again sometime, okay?";
-				close;
-			}
-			else {
-				if (rand(1,2) == 1) {
-					mes "[Akkie]";
-					mes "Oh, have you spoken with";
-					//mes "Goodman in Einbroch yet?";
-					mes "Goodman in Geffen yet?";
-					mes "He's the representative of";
-					mes "the Blacksmith Guild that";
-					mes "teaches the Greed skill.";
-					next;
-					mes "[Akkie]";
-					mes "If you're serious about";
-					mes "smithing goods, the Greed";
-					mes "skill might be very convenient.";
-					mes "Though, I have to say that the";
-					mes "skill's name is a little... Um.";
-					mes "Hmm... It sounds pretty bad~";
-					close;
-				}
-				else {
-					mes "[Akkie]";
-					mes "Hi again~";
-					mes "How has the smithing";
-					mes "been coming along? Anyway,";
-					mes "it was really nice of you to";
-					mes "drop by and talk to me~";
-					next;
-					mes "[Akkie]";
-					mes "It can get a little boring";
-					mes "teaching Dubious Salesmanship";
-					mes "to Blacksmiths and Master Smiths, but somebody from our guild has";
-					mes "to do this job. Anyway, farewell and be safe in your travels, okay?";
-					close;
-				}
-			}
+	}
+	if (JobLevel < 30) {
+		mes "[Akkie]";
+		if (Upper == 1) {
+			mes "Hello, "+ strcharinfo(0) +",";
+			mes "I'm here on behalf of the";
+			mes "Blacksmith Guild to teach you";
+			mes "a new skill. However, your Job";
+			mes "Level is a little low right now";
+			mes "for me to teach you anything...";
+			next;
+			mes "[Akkie]";
+			mes "But practice smithing";
+			mes "a little bit more, and";
+			mes "once you qualify, I'll be";
+			mes "sure to teach you my skill!";
+			mes "Goodbye and good luck~";
 		}
 		else {
+			mes "Hello, I'm Akkie from";
+			mes "the Blacksmith Guild. I'm";
+			mes "here to teach this new skill";
+			mes "to all interested Blacksmiths";
+			mes "and Master Smiths, but it looks";
+			mes "like your Job Level is too low...";
+			next;
+			mes "[Akkie]";
+			mes "I'm sorry, "+ strcharinfo(0) +",";
+			mes "But you'll qualify for the";
+			mes "skill I teach after you";
+			mes "raise your Job Level.";
+			mes "In the meantime, keep";
+			mes "training, alright?";
+		}
+		close;
+	}
+	if (BLACK_SK == 0) {
+		mes "[Akkie]";
+		mes "Hello there~";
+		mes "Isn't it such a";
+		mes "wonderful day today?";
+		mes "It's perfect for hunting!";
+		next;
+		mes "[Akkie]";
+		mes "Um, let me introduce myself.";
+		mes "I'm Akkie, a representative of";
+		mes "the Blacksmith Guild that has";
+		mes "been dispatched to teach the";
+		mes "Dubious Salesmanship skill to";
+		mes "Blacksmiths and Master Smiths.";
+		next;
+		mes "[Akkie]";
+		mes "This additional class";
+		mes "skill enables you to reduce";
+		mes "the amount of zeny spent to";
+		mes "cast Mammonite by 10%. This";
+		mes "Passive skill might come in";
+		mes "handy for you, "+ strcharinfo(0) +".";
+		next;
+		mes "[Akkie]";
+		mes "Although I'm new at";
+		mes "this, would you like";
+		mes "for me to teach you";
+		mes "Dubious Salesmanship?";
+		next;
+		if (select("Sure.:No, thanks.") == 1) {
+			mes "["+ strcharinfo(0) +"]";
+			mes "Sure. I'll try learning this";
+			mes "new skill. Who knows?";
+			mes "It might be really useful.";
+			next;
+			mes "[Akkie]";
+			mes "Oh, that's great!";
+			mes "You won't regret this!";
+			mes "Now, let me explain how";
+			mes "this skill works. Um, now";
+			mes "where did I put that-- Ah.";
+			mes "Let me read these guidelines.";
+			next;
+			mes "[Akkie]";
+			mes "Using Dubious Salesmanship,";
+			mes "we can reduce Mammonite's";
+			mes "zeny cost by 10% by forging";
+			mes "fake zeny to use in the skill.";
+			mes "Since it's against enemies,";
+			mes "we can let the forgery slide.";
+			next;
+			mes "[Akkie]";
+			mes "Now, I need you to bring";
+			mes "some materials so that I can";
+			mes "demonstrate the forging of";
+			mes "counterfeit zeny. Please";
+			mes "bring me 1 Steel, 5 Coal,";
+			mes "1 Iron Hammer and... and...";
+			next;
+			mes "[Akkie]";
+			mes "Um, would you give";
+			mes "me a minute to look";
+			mes "up the information?";
+			mes "I'm sorry about th-this...";
+			mes "^333333(I thought I highlighted this";
+			mes "in the manual. Where is it?)^000000";
+			next;
+			mes "[Akkie]";
+			mes "Oh! Oh, I found it!";
+			mes "L-let me start all";
+			mes "over again. Uh...";
+			next;
+			mes "["+ strcharinfo(0) +"]";
+			mes "............";
+			next;
 			mes "[Akkie]";
-			if (Upper == 1) {
-				mes "Hello, "+ strcharinfo(0) +",";
-				mes "I'm here on behalf of the";
-				mes "Blacksmith Guild to teach you";
-				mes "a new skill. However, your Job";
-				mes "Level is a little low right now";
-				mes "for me to teach you anything...";
-				next;
-				mes "[Akkie]";
-				mes "But practice smithing";
-				mes "a little bit more, and";
-				mes "once you qualify, I'll be";
-				mes "sure to teach you my skill!";
-				mes "Goodbye and good luck~";
-			}
-			else {
-				mes "Hello, I'm Akkie from";
-				mes "the Blacksmith Guild. I'm";
-				mes "here to teach this new skill";
-				mes "to all interested Blacksmiths";
-				mes "and Master Smiths, but it looks";
-				mes "like your Job Level is too low...";
-				next;
-				mes "[Akkie]";
-				mes "I'm sorry, "+ strcharinfo(0) +",";
-				mes "But you'll qualify for the";
-				mes "skill I teach after you";
-				mes "raise your Job Level.";
-				mes "In the meantime, keep";
-				mes "training, alright?";
-			}
+			mes "^0000FF1 Steel^000000,";
+			mes "^0000FF5 Coal^000000,";
+			mes "^0000FF1 Iron Hammer^000000,";
+			mes "^0000FF500 zeny^000000 and";
+			mes "^0000FF1 Detrimindexta^000000. Would";
+			mes "you bring those, please?";
+			next;
+			mes "["+ strcharinfo(0) +"]";
+			mes "Sure, sure.";
+			mes "But are you actually";
+			mes "able to teach me this";
+			mes "skill? I mean...";
+			next;
+			mes "[Akkie]";
+			mes "Oh no, I knew this was going to";
+			mes "happen! I mean, um, it should";
+			mes "be fine! I've been working here";
+			mes "for 3 months a-and-- Just bring";
+			mes "me the materials and I'll prove";
+			mes "you can learn it e-easily!";
+			next;
+			mes "[Akkie]";
+			mes "You've gotta trust me!";
+			mes "You won't be disappointed,";
+			mes "I promise! This skill is sooo";
+			mes "useful! So just bring me those";
+			mes "materials soon, alright?";
+			BLACK_SK = 1;
 			close;
 		}
+		mes "[Akkie]";
+		mes "Wh-what?! But why not?";
+		mes "A-am I not good enough";
+		mes "for you? Please, I promise";
+		mes "to do my best to teach you.";
+		mes "Besides, I've got to reach";
+		mes "my quota for the guild...";
+		close;
 	}
-	else {
+	if (BLACK_SK == 1) {
+		if (countitem(999) < 1 || countitem(1003) < 5 || countitem(971) < 1 || countitem(613) < 1) {
+			mes "[Akkie]";
+			mes "Oh, you came back~";
+			mes "Now let me see if you";
+			mes "brought everything we";
+			mes "need to make counterfeit";
+			mes "zeny so that I can teach";
+			mes "you Dubious Salesmanship.";
+			next;
+			mes "[Akkie]";
+			mes "Hmm, you're still";
+			mes "missing a few things.";
+			mes "Let me tell you what you";
+			mes "need to bring me once again";
+			mes "so that we can start training";
+			mes "you in the skill right away.";
+			next;
+			mes "[Akkie]";
+			mes "^0000FF1 Steel^000000,";
+			mes "^0000FF5 Coal^000000,";
+			mes "^0000FF1 Iron Hammer^000000,";
+			mes "^0000FF500 zeny^000000 and";
+			mes "^0000FF1 Detrimindexta^000000.";
+			mes "Don't forget, okay?";
+			close;
+		}
+		if (Zeny < 500) {
+			mes "[Akkie]";
+			mes "Hmm, you have all the";
+			mes "forging materials, but";
+			mes "I still need 500 zeny.";
+			mes "We need that zeny to copy,";
+			mes "or we won't be able to make";
+			mes "convincing counterfeit money.";
+			close;
+		}
 		mes "[Akkie]";
-		mes "Ah, today seems like";
-		mes "a perfect day for forging.";
-		mes "I just feel like going behind";
-		mes "a beautiful waterfall, getting";
-		mes "some high quality materials,";
-		mes "and just hammering things.";
+		mes "Oh, you came back~";
+		mes "Now let me see if you";
+		mes "brought everything we";
+		mes "need to make counterfeit";
+		mes "zeny so that I can teach";
+		mes "you Dubious Salesmanship.";
+		next;
+		mes "[Akkie]";
+		mes "Good job, it looks like";
+		mes "you've got what we need.";
+		mes "Alright, now please wait";
+		mes "while I get these materials";
+		mes "ready for forging, okay?";
+		delitem 1003,5; //Coal
+		delitem 999,1; //Steel
+		delitem 971,1; //Detrimindexta
+		delitem 613,1; //Iron_Hammer
+		Zeny -= 500;
+		BLACK_SK = 2;
+		close;
+	}
+	if (BLACK_SK == 2) {
+		mes "[Akkie]";
+		mes "A-ah! You came";
+		mes "back sooner than";
+		mes "I thought. Um, gee.";
+		mes "Hmm. How should";
+		mes "I tell you this?";
+		next;
+		mes "["+ strcharinfo(0) +"]";
+		mes "...";
+		mes "......";
+		mes ".........";
+		next;
+		mes "[Akkie]";
+		mes "I'm so sorry! I messed";
+		mes "something up while I was";
+		mes "making a counterfeit sample!";
+		mes "I'm so sorry, please d-don't";
+		mes "report me to the Blacksmith";
+		mes "Guild! Give me one more chance!";
+		next;
+		mes "[Akkie]";
+		mes "I promise that next time";
+		mes "I won't mess up! All I need";
+		mes "is 1 Steel and 3 more Coals!";
+		mes "Please d-don't be angry with";
+		mes "me, it was just an accident!";
+		next;
+		mes "["+ strcharinfo(0) +"]";
+		mes "Okay, okay...";
+		mes "Are you sure that's";
+		mes "all you need me to get?";
+		next;
+		mes "[Akkie]";
+		mes "Yes, yes! Oh, thank";
+		mes "you for being so generous!";
+		mes "Just bring me ^FF00001 Steel^000000 and";
+		mes "^FF00003 Coals^000000 and we'll try again!";
+		BLACK_SK = 3;
+		close;
+	}
+	if (BLACK_SK == 3) {
+		if (countitem(999) < 1 || countitem(1003) < 3) {
+			mes "[Akkie]";
+			mes "All I need you to do";
+			mes "is bring me 1 Steel and";
+			mes "3 Coals. Then I should";
+			mes "be able to teach you the";
+			mes "Dubious Salesmanship skill~";
+			close;
+		}
+		mes "[Akkie]";
+		mes "Oh, thank you so";
+		mes "much for bringing these";
+		mes "materials. Alright, I'll try";
+		mes "really hard to succeed";
+		mes "this time. Just give me";
+		mes "a minute to prepare...";
+		delitem 999,1; //Steel
+		delitem 1003,3; //Coal
+		BLACK_SK = 4;
+		close;
+	}
+	if (BLACK_SK == 4) {
+		mes "[Akkie]";
+		mes "......";
+		mes ".........";
+		mes "............";
+		next;
+		mes "["+ strcharinfo(0) +"]";
+		mes "...?";
+		next;
+		mes "["+ strcharinfo(0) +"]";
+		mes "Oh no...";
+		mes "Did... Did you...";
+		mes "Did something happen?";
+		next;
+		mes "[Akkie]";
+		mes "*Sniff* I b-broke the";
+		mes "Iron Hammer you gave";
+		mes "me! I c-can't finish forging";
+		mes "this without one! Waaah~";
+		next;
+		mes "["+ strcharinfo(0) +"]";
+		mes "^333333(I guess I should";
+		mes "really bring her a new";
+		mes "^FF0000Iron Hammer^333333, or else";
+		mes "I'll never learn this skill!)^000000";
+		BLACK_SK = 5;
 		close;
 	}
+	if (BLACK_SK == 5) {
+		if (countitem(613) < 1) {
+			mes "[Akkie]";
+			mes "Waah~! I can't believe";
+			mes "I broke the Iron Hammer!";
+			mes "Would you please bring me";
+			mes "another one so that I can";
+			mes "finish this counterfeit zeny and teach you Dubious Salesmanship?";
+			close;
+		}
+		mes "[Akkie]";
+		mes "^333333*Sniff*^000000 Did you";
+		mes "r-really bring this";
+		mes "Iron Hammer for me?";
+		mes "Th-thank you for being so";
+		mes "patient with my screwups...";
+		next;
+		mes "[Akkie]";
+		mes "Okay, would you";
+		mes "give me a moment?";
+		mes "I'm going to try";
+		mes "one more time.";
+		delitem 613,1; //Iron_Hammer
+		BLACK_SK = 6;
+		close;
+	}
+	if (BLACK_SK == 6) {
+		mes "[Akkie]";
+		mes "Oh, you're back!";
+		mes "Yaaaay, I finally did it!";
+		mes "I finished making a sample";
+		mes "of counterfeit zeny and even";
+		mes "tested it with Mammonite!";
+		next;
+		mes "[Akkie]";
+		mes "Oh, before you learn my";
+		mes "skill, I'm supposed to tell you";
+		mes "that my colleague, Goodman,";
+		mes "can teach you another additional skill known as Greed. So you";
+		mes "may want to look for him later.";
+		next;
+		mes "[Akkie]";
+		mes "Okay, now the first part to";
+		mes "learning Dubious Salesmanship";
+		mes "is making this fake zeny. Watch";
+		mes "this... Isn't it easy? Of course, you can only use this in battle to";
+		mes "reduce Mammonite's zeny cost...";
+		if (Upper == 1)
+			BLACK_SK = 9;	// note: official script is using another variable when a transcendent character is doing the quest for the first time
+		else
+			BLACK_SK = 7;
+		skill "BS_UNFAIRLYTRICK",1,SKILL_PERM;
+		next;
+		mes "[Akkie]";
+		mes "Also, 90% of the cost of";
+		mes "Mammonite has to be real";
+		mes "zeny or the skill will begin";
+		mes "to lose effectiveness. Well,";
+		mes "that's all for the lesson. Now you can use Dubious Salesmanship!";
+		next;
+		mes "[Akkie]";
+		mes "Thanks once again for";
+		mes "putting up with my mistakes,";
+		mes "I know it must have been really";
+		mes "annoying. Anyway, I hope this";
+		mes "skill is really useful for you.";
+		mes "Drop again sometime, okay?";
+		close;
+	}
+	if (rand(1,2) == 1) {
+		mes "[Akkie]";
+		mes "Oh, have you spoken with";
+		mes "Goodman in Einbroch yet?";
+		mes "He's the representative of";
+		mes "the Blacksmith Guild that";
+		mes "teaches the Greed skill.";
+		next;
+		mes "[Akkie]";
+		mes "If you're serious about";
+		mes "smithing goods, the Greed";
+		mes "skill might be very convenient.";
+		mes "Though, I have to say that the";
+		mes "skill's name is a little... Um.";
+		mes "Hmm... It sounds pretty bad~";
+		if (getskilllv("BS_UNFAIRLYTRICK") == 0)	// debug
+			skill "BS_UNFAIRLYTRICK",1,SKILL_PERM;
+		close;
+	}
+	mes "[Akkie]";
+	mes "Hi again~";
+	mes "How has the smithing";
+	mes "been coming along? Anyway,";
+	mes "it was really nice of you to";
+	mes "drop by and talk to me~";
+	next;
+	mes "[Akkie]";
+	mes "It can get a little boring";
+	mes "teaching Dubious Salesmanship";
+	mes "to Blacksmiths, Master Smiths and Mechanics, but somebody from our guild has";
+	mes "to do this job. Anyway, farewell and be safe in your travels, okay?";
+	if (getskilllv("BS_UNFAIRLYTRICK") == 0)	// debug
+		skill "BS_UNFAIRLYTRICK",1,SKILL_PERM;
+	close;
 }
 
 geffen,172,52,1	script	Goodman#qsk_bs	826,{
-	if (BaseJob == Job_Blacksmith) {
-		if (BLACK_SK2 == 2 && Upper == 1 && getskilllv("BS_GREED") == 0) {
+	if (BaseJob != Job_Blacksmith) {
+		mes "[Goodman]";
+		mes "I feel like exploring";
+		mes "the mountains to look for";
+		mes "rare and interesting items";
+		mes "that I can use in forging.";
+		mes "For me, that's the greatest";
+		mes "pleasure of being a Blacksmith.";
+		close;
+	}
+	if (Upper == 1) {
+		if (BLACK_SK2 == 2) {
 			mes "[Goodman]";
 			mes "Ah, I see that you have";
 			mes "transcended. It gladdens me";
@@ -490,11 +495,12 @@ geffen,172,52,1	script	Goodman#qsk_bs	826,{
 			mes "just looking at me should";
 			mes "jog the memories you require";
 			mes "to use this skill once again~";
-			skill "BS_GREED",1,SKILL_PERM;
-			set BLACK_SK2,3;
+			if (getskilllv("BS_GREED") == 0)
+				skill "BS_GREED",1,SKILL_PERM;
+			BLACK_SK2 = 3;
 			close;
 		}
-		else if (BLACK_SK2 == 3) {
+		if (BLACK_SK2 == 3) {
 			mes "[Goodman]";
 			mes "How is your forging";
 			mes "technique coming along?";
@@ -502,152 +508,145 @@ geffen,172,52,1	script	Goodman#qsk_bs	826,{
 			mes "traveling will offer a good";
 			mes "opportunity to relax, think,";
 			mes "and collect materials.";
+			if (getskilllv("BS_GREED") == 0)	// debug
+				skill "BS_GREED",1,SKILL_PERM;
 			close;
 		}
-		else {
-			if (BLACK_SK2 == 0) {
-				mes "[Goodman]";
-				mes "Hey. I'm a Blacksmith";
-				mes "skill master sent from the";
-				mes "Blacksmith Guild. Everyone";
-				mes "calls me Goodman. You're";
-				if (Upper == 1)
-					mes "a Master Smith, aren't you?";
-				else
-					mes "a Blackmith, aren't you?";
-				mes "Pffft, rhetorical question.";
-				next;
-				mes "[Goodman]";
-				mes "Good news. I'm in charge of";
-				mes "teaching the skill, developed";
-				mes "by the Blacksmith and Merchant";
-				mes "Guilds, called ^FF0000Greed^000000. It's your";
-				mes "choice whether you learn it,";
-				mes "but I recommend that you do.";
-				next;
-				mes "[Goodman]";
-				mes "If you want, I can start";
-				mes "teaching you the Greed";
-				mes "skill right now. So what";
-				mes "do you say, kid?";
-				next;
-				if (select("Sounds good!:Maybe later~") == 1) {
-					mes "[Goodman]";
-					mes "Heh! Good choice. Now,";
-					mes "the Greed skill automatically";
-					mes "picks up all items in a 5*5";
-					mes "cell area around the caster.";
-					mes "It's handy for picking up clumps of goods from looting monsters.";
-					next;
-					mes "[Goodman]";
-					mes "First thing's first. I need to";
-					mes "test you and see if you qualify";
-					mes "to learn this skill. Go fill your Inventory with any items until";
-					mes "it's so full, you can't put an";
-					mes "item of 500 Weight in it.";
-					next;
-					mes "[Goodman]";
-					mes "When you finish that";
-					mes "task, come back and";
-					mes "talk to me. Alright";
-						mes "then, good luck~";
-					set BLACK_SK2,1;
-					close;
-				}
-				mes "[Goodman]";
-				mes "I see. It's good to be";
-				mes "busy with other things,";
-				mes "but remember that time is ";
-				mes "a commodity, and you should";
-				mes "always spend it doing the most";
-				mes "worthwhile stuff. Understand?";
-				close;
-			}
-			else if (BLACK_SK2 == 1) {
-				if (MaxWeight - Weight < 5000) {
-					mes "[Goodman]";
-					mes "Back already, eh?";
-					mes "Alright, let me check";
-					mes "the things you're carrying.";
-					mes "Let's see, Inventory, Inventory...";
-					next;
-					mes "[Goodman]";
-					mes "Good work: you pass.";
-					mes "Do you realize now that the";
-					mes "time and experience spent in";
-					mes "gathering these items is worth";
-					mes "more than their prices in zeny?";
-					next;
-					mes "[Goodman]";
-					if (Upper == 1)
-						mes "I believe that Master Smiths";
-					else
-						mes "I believe that Blacksmiths";
-					mes "should first and foremost be";
-					mes "artisans. Being rich and famous";
-					mes "is merely a side effect of that.";
-					if (Upper == 1)
-						mes "Honorable Master Smiths know value is in the craftsmanship...";
-					else
-						mes "Honorable Blacksmiths know value is in the craftsmanship...";
-					next;
-					if (Upper == 1) {
-						mes "[Goodman]";
-						mes "Now, if you don't place too";
-						mes "much importance on an item's";
-						mes "worth in terms of zeny, you'll";
-						mes "be able to let go of them much";
-						mes "more easily. Watch me do this.";
-						mes "See? Now you can do it too.";
-						next;
-					}
-					mes "[Goodman]";
-					mes "The skill you learned is";
-					mes "called Greed, but I hope";
-					mes "you use it in a manner that";
-					mes "is different than its name.";
-					mes "Don't forget that, and I hope";
-					mes "you craft true masterpieces.";
-					skill "BS_GREED",1,SKILL_PERM;
-					set BLACK_SK2,2;
-					close;
-				}
-				else {
-					mes "[Goodman]";
-					mes "Hm. You've come back";
-					mes "too early. And you didn't";
-					mes "complete the objective that";
-					mes "I set for you. Listen carefully.";
-					next;
-					mes "[Goodman]";
-					mes "Go fill your Inventory";
-					mes "with any items until it";
-					mes "becomes too full to place";
-					mes "an item of 500 weight into it.";
-					mes "When you finish this task,";
-					mes "come back and report to me.";
-					close;
-				}
-			}
-			else {
-				mes "[Goodman]";
-				mes "How have you been using";
-				mes "the Greed skill? Hopefully,";
-				mes "it has been convenient in";
-				mes "your efforts to forge goods";
-				mes "of greater quality for all";
-				mes "of your comrades.";
-				close;
-			}
+	}
+	if (BLACK_SK2 == 0) {
+		mes "[Goodman]";
+		mes "Hey. I'm a Blacksmith";
+		mes "skill master sent from the";
+		mes "Blacksmith Guild. Everyone";
+		mes "calls me Goodman. You're";
+		if (Upper == 1)
+			mes "a Master Smith, aren't you?";
+		else
+			mes "a Blackmith, aren't you?";
+		mes "Pffft, rhetorical question.";
+		next;
+		mes "[Goodman]";
+		mes "Good news. I'm in charge of";
+		mes "teaching the skill, developed";
+		mes "by the Blacksmith and Merchant";
+		mes "Guilds, called ^FF0000Greed^000000. It's your";
+		mes "choice whether you learn it,";
+		mes "but I recommend that you do.";
+		next;
+		mes "[Goodman]";
+		mes "If you want, I can start";
+		mes "teaching you the Greed";
+		mes "skill right now. So what";
+		mes "do you say, kid?";
+		next;
+		if (select("Sounds good!:Maybe later~") == 1) {
+			mes "[Goodman]";
+			mes "Heh! Good choice. Now,";
+			mes "the Greed skill automatically";
+			mes "picks up all items in a 5*5";
+			mes "cell area around the caster.";
+			mes "It's handy for picking up clumps of goods from looting monsters.";
+			next;
+			mes "[Goodman]";
+			mes "First thing's first. I need to";
+			mes "test you and see if you qualify";
+			mes "to learn this skill. Go fill your Inventory with any items until";
+			mes "it's so full, you can't put an";
+			mes "item of 500 Weight in it.";
+			next;
+			mes "[Goodman]";
+			mes "When you finish that";
+			mes "task, come back and";
+			mes "talk to me. Alright";
+			mes "then, good luck~";
+			BLACK_SK2 = 1;
+			close;
+		}
+		mes "[Goodman]";
+		mes "I see. It's good to be";
+		mes "busy with other things,";
+		mes "but remember that time is ";
+		mes "a commodity, and you should";
+		mes "always spend it doing the most";
+		mes "worthwhile stuff. Understand?";
+		close;
+	}
+	if (BLACK_SK2 == 1) {
+		if (MaxWeight - Weight >= 5000) {
+			mes "[Goodman]";
+			mes "Hm. You've come back";
+			mes "too early. And you didn't";
+			mes "complete the objective that";
+			mes "I set for you. Listen carefully.";
+			next;
+			mes "[Goodman]";
+			mes "Go fill your Inventory";
+			mes "with any items until it";
+			mes "becomes too full to place";
+			mes "an item of 500 weight into it.";
+			mes "When you finish this task,";
+			mes "come back and report to me.";
+			close;
 		}
+		mes "[Goodman]";
+		mes "Back already, eh?";
+		mes "Alright, let me check";
+		mes "the things you're carrying.";
+		mes "Let's see, Inventory, Inventory...";
+		next;
+		mes "[Goodman]";
+		mes "Good work: you pass.";
+		mes "Do you realize now that the";
+		mes "time and experience spent in";
+		mes "gathering these items is worth";
+		mes "more than their prices in zeny?";
+		next;
+		mes "[Goodman]";
+		if (Upper == 1)
+			mes "I believe that Master Smiths";
+		else
+			mes "I believe that Blacksmiths";
+		mes "should first and foremost be";
+		mes "artisans. Being rich and famous";
+		mes "is merely a side effect of that.";
+		if (Upper == 1)
+			mes "Honorable Master Smiths know value is in the craftsmanship...";
+		else
+			mes "Honorable Blacksmiths know value is in the craftsmanship...";
+		next;
+		if (Upper == 1) {
+			mes "[Goodman]";
+			mes "Now, if you don't place too";
+			mes "much importance on an item's";
+			mes "worth in terms of zeny, you'll";
+			mes "be able to let go of them much";
+			mes "more easily. Watch me do this.";
+			mes "See? Now you can do it too.";
+			next;
+		}
+		mes "[Goodman]";
+		mes "The skill you learned is";
+		mes "called Greed, but I hope";
+		mes "you use it in a manner that";
+		mes "is different than its name.";
+		mes "Don't forget that, and I hope";
+		mes "you craft true masterpieces.";
+		skill "BS_GREED",1,SKILL_PERM;
+		if (Upper == 1)
+			BLACK_SK2 = 4;	// note: official script is using another variable when a transcendent character is doing the quest for the first time
+		else
+			BLACK_SK2 = 2;
+		close;
 	}
 	mes "[Goodman]";
-	mes "I feel like exploring";
-	mes "the mountains to look for";
-	mes "rare and interesting items";
-	mes "that I can use in forging.";
-	mes "For me, that's the greatest";
-	mes "pleasure of being a Blacksmith.";
+	mes "How have you been using";
+	mes "the Greed skill? Hopefully,";
+	mes "it has been convenient in";
+	mes "your efforts to forge goods";
+	mes "of greater quality for all";
+	mes "of your comrades.";
+	if (getskilllv("BS_GREED") == 0)	// debug
+		skill "BS_GREED",1,SKILL_PERM;
 	close;
 }