//===== eAthena Script ======================================= //= Archer Skill Quest //===== By: ================================================== //= eAthena dev team //===== Current Version: ===================================== //= 1.4b //===== Compatible With: ===================================== //= eAthena 7.15 + //===== Description: ========================================= //= Arrow crafting, Arrow Repel skills //===== Additional Comments: ================================= //= v1.0 Roberto message text is based off RO npc. Jason message //= text is custom from old version. //= All items are from official quests though.[kobra_k88] //= v1.0a Now using functions found in "Global_Functions.txt" //= for class checks.[kobra_k88] //= 1.2 Added Baby Class Support [Lupus] //= 1.3 Removed callfunc Is_####_Class in favor of baseClass [Silentdragon] //= 1.4 Fixed exploits [Lupus] //= 1.4a Fixed some typos [IVBela] //= 1.4b changed perm. variables to temp ones [Lupus] //============================================================ //<======================== Roberto: Arrow crafting =========================>\\ morocc,121,109,5 script Roberto 88,{ mes "[Roberto]"; if(baseClass == Job_Archer) goto L_Start; L_Other: mes "Eh?... First time seeing an archer or something? Why don't you just"; mes "go about your business and leave me be. I only talk to high level"; mes "Archer types........"; emotion e_what; close; L_Start: if(BaseJob==Job_Archer && JobLevel<30) goto L_LowLvl; if(getskilllv(147)>0) goto L_GotSkill; if(@ARWCRFT) goto L_GetSkill; mes "Hmmm?.... Oh you seem to be a high level Archer type. Why don't we"; mes "converse for a while, eh? Let me start off by talking about my"; mes "childhood.... . . . . . . . . . . ."; next; mes "[Roberto]"; mes "When I turned 15, I decided I'd work for a Blacksmith........"; next; mes "[Roberto]"; mes "............... ~(blah blah blah)~..................."; next; mes "[Roberto]"; mes ".... man was my Junior Prom a mess..........."; next; mes "[Roberto]"; mes "..~(blah blah)~........ ~(blah blah)~........."; next; mes "(many grueling hours later.....)"; next; mes "[Roberto]"; mes "So that's how I found out how to create all of these different"; mes "kinds of arrows for myself. It definitely comes in handy."; next; mes "[Roberto]"; mes "Say, would you like me to teach you? We've had such a nice talk"; mes "that I feel like can trust you with this knowledge......."; next; menu "Zzz... Eh!! Uh, Arrows... making... yes, teach.",M_0, "Zzzzz... Eh! Uh... where am I????",M_1; M_0: mes "[Roberto]"; mes "Alright then! In order for me to teach you the art of ^5533FF'Arrow"; mes "Crafting'^000000, you must first bring me these items:"; mes "^FF335520 Resin,"; mes "7 Poison Spores,"; mes "41 Pointed Scales,"; mes "13 Trunks,"; mes "1 Red potion^000000"; set @ARWCRFT, 1; emotion e_ic; close; M_1: mes "[Roberto]"; mes "................................................................"; emotion e_ag; next; mes "[Roberto]"; mes "Let me teach you this special skill.... It's called, my boot up"; mes "your A........"; emotion e_pif; next; mes "!!!!SMACK!!!!"; percentheal -5,0; close; L_GetSkill: if((countitem(907)<20) || (countitem(7033)<7) || (countitem(906)<41) || (countitem(1019)<13) || (countitem(501)<1)) goto L_NotEnuf; delitem 907, 20; delitem 7033, 7; delitem 906, 41; delitem 1019, 13; delitem 501, 1; mes "You've brought all of the items... very good. Lets begin....."; next; mes "~ hands you a very long list of ingredients ~"; next; mes "[Roberto]"; mes "There you are. You're all set."; next; mes "......................."; next; mes "[Roberto]"; mes "Hmm?...... What do you mean 'that's it'?....... What else were you"; mes "expecting...... With that list you will be able to make any kind of"; mes "arrows you want......."; next; mes "[Roberto]"; mes "I hope you didn't expect some kind of elaborate ceremony or some"; mes "kind of unique and lengthy training......."; next; skill 147,1,0; set @ARWCRFT, 0; mes "[Roberto]"; mes "...... Well good luck and have fun making arrows. I've got other"; mes "things to do if you don't mind......."; close; L_NotEnuf: mes "You don't have everything I need."; next; goto M_0; L_GotSkill: mes "Hmmm?.... Sorry but I've got nothing left to teach you. Just keep"; mes "on making those arrows..... For us Archer types there can never be"; mes "too many arrows....."; close; L_LowLvl: mes "Hmm?... Do you have something to say to me? Unfortunately I have"; mes "nothing to say to you....."; emotion e_what; next; mes "[Roberto]"; mes "It's sad but conversations with people who have ^5533FFlow job levels^000000 such"; mes "as yourself always seem to end abruptly..... Maybe if you trained a"; mes "little bit longer we would have more to talk about............"; close; } //<============================== Arrow Repel ===============================>\\ payon,103,63,5 script Jason 88,{ mes "[Jason]"; if(baseClass == Job_Archer) goto L_Start; L_Other: mes "What does life need from a lonely lad like me?"; close; L_Start: if(getskilllv(148)>0) goto L_GotSkill; if(BaseJob == Job_Archer && JobLevel < 35) goto L_LowLvl; if(@ARWREP) goto L_Check; mes "Hi, I'm the master of the skill ^0033FFArrow Repel^000000. I might be able to"; mes "teach you the skill, but only if you help me get the ingredients"; mes "for my Grandma's soup."; next; mes "[Jason]"; mes "Arrow Repel allows you to use your arrows to repel, push back, an"; mes "enemy and keep them at a distance. This is a great skill for us"; mes "Archer types."; next; L_List: mes "[Jason]"; mes "I need the following:"; mes "- 2 ^FF0000Emeralds^000000"; mes "- 3 ^FF0000Yoyo tails^000000"; mes "- 10 ^FF0000Tentacles^000000"; mes "- 10 ^FF0000Bill of birds^000000"; mes "- 36 ^FF0000Banana Juices^000000"; next; mes "[Jason]"; mes "Hurry hurry!"; set @ARWREP, 1; close; L_LowLvl: mes "Oh I think you're a bit inexperienced to learn anything from me,"; mes "come back later! Maybe around ^5533FFjob level 35^000000 or so....."; close; L_Check: if((countitem(721)<2) || (countitem(942)<3) || (countitem(962)<10) || (countitem(925)<10) || (countitem(532)<36)) goto L_NotEnuf; delitem 721,2; delitem 942,3; delitem 962,10; delitem 925,10; delitem 532,36; mes "OH! Marvelous you brought me all the ingredients!"; mes "Now it'll be my pleasure to teach you the skill ^0033FFArrow Repel^000000"; next; skill 148,1,0; set @ARWREP, 0; mes "[Jason]"; mes "There you go! Happy hunting in the future."; close; L_NotEnuf: mes "You don't have everything I need."; next; goto L_List; L_GotSkill: mes "Hey! It's you again? I'm afraid I've taught you everything I know."; close; }