//===== rAthena Script =======================================
//= Blacksmith Skills Quests
//===== By: ==================================================
//= Lupus, Reddozen, Samuray22
//===== Current Version: =====================================
//= 1.6
//===== Compatible With: =====================================
//= rAthena SVN
//===== Description: =========================================
//= [Aegis Conversion]
//= Quests for skills: Dubious Salesmanship, Greed
//===== Additional Comments: =================================
//= 1.6 Rescripted to Aegis 10.3 stadards. [L0ne_W0lf]
//============================================================
geffen,178,72,3 script Akkie#qsk_bs 726,{
if (BaseJob == Job_Blacksmith) {
if (BLACK_SK == 7 && getskilllv("BS_UNFAIRLYTRICK") == 0) {
mes "[Akkie]";
mes "I see that you've";
mes "transcended since the";
mes "last time we've met. Oh...";
mes "You must have forgotten";
mes "everything I've taught you.";
mes "Well, let me teach you again~";
next;
mes "[Akkie]";
mes "Actually, let me jog your";
mes "memory with this counterfeit";
mes "zeny that we made the last time.^FFFFFF ^000000 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,0;
close;
}
else if (BLACK_SK == 8) {
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 > 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,0;
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;
}
}
}
else {
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;
}
}
else {
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;
}
}
geffen,172,52,1 script Goodman#qsk_bs 826,{
if (BaseJob == Job_Blacksmith) {
if (BLACK_SK2 == 2 && Upper == 1 && getskilllv("BS_GREED") == 0) {
mes "[Goodman]";
mes "Ah, I see that you have";
mes "transcended. It gladdens me";
mes "to see Blacksmiths become";
mes "Master Smiths for the sake";
mes "of improving their craft.";
next;
mes "[Goodman]";
mes "Hm? You've forgotten the";
mes "Greed skill? You should";
mes "remember how to use it now:";
mes "just looking at me should";
mes "jog the memories you require";
mes "to use this skill once again~";
skill "BS_GREED",1,0;
set BLACK_SK2,3;
close;
}
else if (BLACK_SK2 == 3) {
mes "[Goodman]";
mes "How is your forging";
mes "technique coming along?";
mes "When the craft frustrates you,";
mes "traveling will offer a good";
mes "opportunity to relax, think,";
mes "and collect materials.";
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^FFFFFF ^000000 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) {
set .@now_weight,MaxWeight-Weight;
if (.@now_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... ^FFFFFF ^000000";
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^FFFFFF ^000000 value is in the craftsmanship...";
else
mes "Honorable Blacksmiths know^FFFFFF ^000000 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,0;
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. ^FFFFFF ^000000";
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;
}
}
}
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;
}
//============================================================
// Old changelog
//============================================================
//= 1.0 for fully working skills only [Lupus]
//= 1.1 Added more new skill quests for more classes [Lupus]
//= Somehow eA engine doesn't let you keep learn't skill V_V'
//= 1.2 Added to correct locations, correct NPC's, fixed
//= some of the items required and made them into real
//= quests. [Reddozen]
//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
//= 1.3b Splitted into different files [DracoRPG]
//= 1.3c Inverted the weight check for Greed [DracoRPG]
//= 1.4 Updated to the official One [Samuray22]
//= 1.5 replaced item "names" with item id. Fixed a bug with
//= item deletion [Lupus]
//============================================================