diff options
Diffstat (limited to 'world/map/npc/021-2')
| -rw-r--r-- | world/map/npc/021-2/_import.txt | 17 | ||||
| -rw-r--r-- | world/map/npc/021-2/_mobs.txt | 9 | ||||
| -rw-r--r-- | world/map/npc/021-2/_warps.txt | 29 | ||||
| -rw-r--r-- | world/map/npc/021-2/bakery.txt | 158 | ||||
| -rw-r--r-- | world/map/npc/021-2/barber.txt | 12 | ||||
| -rw-r--r-- | world/map/npc/021-2/forge_shops.txt | 4 | ||||
| -rw-r--r-- | world/map/npc/021-2/government_building.txt | 180 | ||||
| -rw-r--r-- | world/map/npc/021-2/heathin.txt | 360 | ||||
| -rw-r--r-- | world/map/npc/021-2/jhedia.txt | 62 | ||||
| -rw-r--r-- | world/map/npc/021-2/kps.txt | 164 | ||||
| -rw-r--r-- | world/map/npc/021-2/kylian.txt | 424 | ||||
| -rw-r--r-- | world/map/npc/021-2/manakins.txt | 47 | ||||
| -rw-r--r-- | world/map/npc/021-2/mapflags.txt | 2 | ||||
| -rw-r--r-- | world/map/npc/021-2/rebecca.txt | 11 | ||||
| -rw-r--r-- | world/map/npc/021-2/yanis.txt | 41 |
15 files changed, 0 insertions, 1520 deletions
diff --git a/world/map/npc/021-2/_import.txt b/world/map/npc/021-2/_import.txt deleted file mode 100644 index 67974f1a..00000000 --- a/world/map/npc/021-2/_import.txt +++ /dev/null @@ -1,17 +0,0 @@ -// Map 021-2: North Tulimshar Indoor -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 021-2.gat -npc: npc/021-2/_mobs.txt -npc: npc/021-2/_warps.txt -npc: npc/021-2/bakery.txt -npc: npc/021-2/barber.txt -npc: npc/021-2/forge_shops.txt -npc: npc/021-2/government_building.txt -npc: npc/021-2/heathin.txt -npc: npc/021-2/jhedia.txt -npc: npc/021-2/kps.txt -npc: npc/021-2/kylian.txt -npc: npc/021-2/manakins.txt -npc: npc/021-2/mapflags.txt -npc: npc/021-2/rebecca.txt -npc: npc/021-2/yanis.txt diff --git a/world/map/npc/021-2/_mobs.txt b/world/map/npc/021-2/_mobs.txt deleted file mode 100644 index 6feaf1ea..00000000 --- a/world/map/npc/021-2/_mobs.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// North Tulimshar Indoor mobs - - - -021-2.gat,0,0,0|script|Mob021-2|-1 -{ - end; -} diff --git a/world/map/npc/021-2/_warps.txt b/world/map/npc/021-2/_warps.txt deleted file mode 100644 index 9eb18a2a..00000000 --- a/world/map/npc/021-2/_warps.txt +++ /dev/null @@ -1,29 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// North Tulimshar Indoor warps - -021-2.gat,46,97|warp|To Lobby|0,-1,021-2.gat,44,55 -021-2.gat,46,155|warp|To Second Floor|0,-1,021-2.gat,92,62 -021-2.gat,92,64|warp|To Suites|0,-1,021-2.gat,46,158 -021-2.gat,44,53|warp|To Common Beds|0,-1,021-2.gat,46,96 -021-2.gat,46,179|warp|To Common Beds|0,-1,021-2.gat,46,91 -021-2.gat,46,90|warp|To Suites|0,-1,021-2.gat,46,178 -021-2.gat,71,179|warp|To Outside|0,-1,021-1.gat,128,121 -021-2.gat,90,179|warp|To Outside|-1,-1,021-1.gat,135,121 -021-2.gat,27,30|warp|To Outside|-1,-1,021-1.gat,53,135 -021-2.gat,39,30|warp|To Outside|-1,-1,021-1.gat,57,135 -021-2.gat,91,28|warp|To Outside|-1,-1,021-1.gat,103,101 -021-2.gat,122,24|warp|To Roof|-1,-1,021-1.gat,103,97 -021-2.gat,118,24|warp|To First Floor|0,-1,021-2.gat,79,23 -021-2.gat,80,22|warp|To Second Floor|0,-1,021-2.gat,117,23 -021-2.gat,70,64|warp|To Roof|-1,-1,021-1.gat,52,96 -021-2.gat,25,67|warp|To Outside|-1,-1,021-1.gat,53,100 -021-2.gat,46,97|warp|To First Floor|0,-1,021-2.gat,46,58 -021-2.gat,28,130|warp|To Outside|-1,-1,021-1.gat,43,111 -021-2.gat,28,130|warp|To Outside|-1,-1,021-1.gat,43,111 -021-2.gat,84,93|warp|To First Floor|-1,0,021-2.gat,80,125 -021-2.gat,84,123|warp|To Second Floor|-1,0,021-2.gat,81,95 -021-2.gat,79,139|warp|To Outside|-1,-1,021-1.gat,132,32 -021-2.gat,72,139|warp|To Outside|-1,-1,021-1.gat,125,32 -021-2.gat,124,69|warp|To Outside|-1,-1,021-1.gat,125,28 -021-2.gat,75,93|warp|To Outside|-1,-1,021-1.gat,133,25 -021-2.gat,33,30|warp|To Outside|-1,-1,021-1.gat,55,135 diff --git a/world/map/npc/021-2/bakery.txt b/world/map/npc/021-2/bakery.txt deleted file mode 100644 index acde18f2..00000000 --- a/world/map/npc/021-2/bakery.txt +++ /dev/null @@ -1,158 +0,0 @@ -// The bakery - -// The chef -021-2.gat,95,21,0|script|Riskim|148 -{ - mes "[Riskim]"; - mes ""; - mes "\"Welcome to our bakery!\""; - - callfunc "KadiyaSubquestConsts"; - if ((@Q_kadiya_status == @Q_STATUS_WANTS_CHOCOCAKE) - && (countitem ("MopoxCurePotion") > 0)) - goto L_lace_chococake; - - if ((@Q_kadiya_status == @Q_STATUS_WANTS_ORANGECUPCAKE) - && (countitem ("MopoxCurePotion") > 0)) - goto L_lace_cupcake; - - mes "\"Would you mind bringing me 6 acorns please? I need them to make flour for the chocolate cakes. I will be so delicious!\""; - next; - mes "\"Um, I mean, the cakes will be delicious...\""; - emotion EMOTE_BLUSH; - next; - - set @dq_level, 15; - set @dq_cost, 3; - set @dq_count, 6; - set @dq_name$, "Acorn"; - set @dq_friendly_name$, "acorns"; - set @dq_money, 250; - set @dq_exp, 50; - - callfunc "DailyQuest"; - - next; - mes "\"And don't forget, our bakery is the best!\""; - close; - -L_lace_chococake: - next; - menu - "Thanks! Let me have a look around...", L_End, - "Can you put this potion into a Chocolate Cake?", L_Next, - "Goodbye!", L_End; - -L_Next: - mes "[Riskim]"; - mes ""; - mes "As you show Riskim the potion, he leans back, away from it."; - mes "\"Ooooh, I remember that smell...\""; - mes "\"Elanore's Mopox potion, right? She made me drink that, too...\""; - mes "He chuckles."; - mes "\"Yes, well, you do want to hide that somehow.\""; - next; - mes "[Riskim]"; - mes ""; - mes "\"We'll need extra chocolate for that one. If you can give me ten pieces of chocolate and that potion, plus 400 GP, I will bake you a special Chocolate Cake that hides the taste.\""; - next; - menu - "I will get them for you.", L_End, - "Here you are!", L_Continue, - "Maybe later.", L_End; - -L_Continue: - if (countitem("ChocolateBar") < 10) - goto L_lacking_ingredients; - if (countitem("MopoxCurePotion") < 1) - goto L_lacking_ingredients; - if (Zeny < 400) - goto L_lacking_Zeny; - delitem "MopoxCurePotion", 1; - delitem "ChocolateBar", 10; - getitem "LacedChocolateCake", 1; - set Zeny, Zeny - 400; - - mes "[Riskim]"; - mes ""; - mes "\"Please have a seat!\""; - mes "You watch as Riskim melts the chocolate and stirs in the potion, then glazes a cake with the mixture."; - mes "\"It's a bit more chocolatey than your average chocolate cake, of course...\""; - next; - mes "[Riskim]"; - mes ""; - mes "Riskim hands you the cake."; - mes "\"Here you are. I hope that this works.\""; - close; - -L_lacking_Zeny: - mes "[Riskim]"; - mes ""; - mes "\"I'm sorry, but I have to charge 400 GP.\""; - close; - -L_lacking_ingredients: - mes "[Riskim]"; - mes ""; - mes "\"Sorry, but I need ten Chocolate Bars AND your cure potion for this. Please come back later when you have everything.\""; - close; - -L_lace_cupcake: - next; - menu - "Thanks! Let me have a look around...", L_End, - "Can you put this potion into an Orange Cupcake?", L_More, - "Goodbye!", L_End; - -L_More: - mes "[Riskim]"; - mes ""; - mes "\"Orange Cupcakes? Oh dear... I'm sorry, but I have a very bad orange allergy.\""; - next; - mes "[Riskim]"; - mes ""; - mes "\"Perhaps the Chef at Dimond's Cove can help you? We get all our cupcakes from him.\""; - next; - goto L_End; - -L_End: - close; -} - -// Server -021-2.gat,82,23,0|script|Sara|108 -{ - mes "[Sara]"; - mes ""; - mes "\"Hello!\""; - close; -} - -// The cashier -021-2.gat,89,21,0|shop|Drabur|112,WhiteCake:*500,ChocolateCake:*550,OrangeCake:*600,AppleCake:*600,Cake:*30,CherryCake:*100,OrangeCupcake:*270,Milk:*1500,XmasCake:*70 - -// Stockroom boy -021-2.gat,133,21,0|script|Iormo|160 -{ - mes "[Iormo]"; - mes ""; - mes "\"This stock room can get messy.\""; - close; -} - -// An old couple eating at the bakery -021-2.gat,71,22,0|script|Rynoh|159 -{ - mes "[Rynoh]"; - mes ""; - mes "\"The cakes may be expensive, but they sure are delicious!\""; - close; -} - -021-2.gat,73,22,0|script|Ontas|154 -{ - mes "[Ontas]"; - mes ""; - mes "\"We come here every week. This place has some of the best bread I've ever eaten!\""; - close; -} diff --git a/world/map/npc/021-2/barber.txt b/world/map/npc/021-2/barber.txt deleted file mode 100644 index d057786d..00000000 --- a/world/map/npc/021-2/barber.txt +++ /dev/null @@ -1,12 +0,0 @@ -// A barber (later we can make it so certain styles need to come from him, for a price) -021-2.gat,72,101,0|script|Issay|156 -{ - mes "[Issay the Barber]"; - mes "\"Do you need a change of style?\""; - next; - callfunc "Barber"; - mes "[Issay the Barber]"; - mes "\"Come again!\""; - close; -} - diff --git a/world/map/npc/021-2/forge_shops.txt b/world/map/npc/021-2/forge_shops.txt deleted file mode 100644 index 4e30fe50..00000000 --- a/world/map/npc/021-2/forge_shops.txt +++ /dev/null @@ -1,4 +0,0 @@ -// Forge Shops - -021-2.gat,77,134,0|shop|Gungnir|311,SlingShot:*500,SlingBullet:*1,ShortBow:*8000,Arrow:*1,IronArrow:*4 -021-2.gat,71,133,0|shop|Mjolnir|377,Knife:*50,SharpKnife:*100,Dagger:*1000,LeatherShirt:*2000,LeatherShield:*2000 diff --git a/world/map/npc/021-2/government_building.txt b/world/map/npc/021-2/government_building.txt deleted file mode 100644 index 441b77a0..00000000 --- a/world/map/npc/021-2/government_building.txt +++ /dev/null @@ -1,180 +0,0 @@ -// The government builing in the south west - -// A clerk -021-2.gat,27,17,0|script|Estard|107 -{ - mes "[Estard]"; - mes "\"Hello what can I do for you?\""; - next; - if (getpartnerid2()) - goto L_main_married; - - menu - "I'm looking at getting married.", L_marry, - "Nothing, I guess.", L_Close; - -L_main_married: - menu - "I'd like a divorce.", L_divorce, - "Nothing, I guess.", L_Close; - -L_marry: - if (BaseLevel < WEDDING_MIN_LEVEL) - goto L_marry_too_young; - if (Zeny < WEDDING_FEE) - goto L_marry_too_poor; - - mes "[Estard]"; - mes "\"Are you sure you want to get married? It'll cost " + WEDDING_FEE + " GP.\""; - menu - "Yes", L_marry_do, - "No", L_Close; - -L_marry_do: - callsub S_give_rings; - - mes "[Estard]"; - mes "\"Here are your rings. You can get married by standing in one of the designated places (like that small rug over there) with your partner, give them their ring, and say 'marry (their name here)'. You both need to have your rings on.\""; - close; - -L_marry_too_young: - mes "[Estard]"; - mes "\"I'm sorry, but you are too young to get married. You must be atleast " + WEDDING_MIN_LEVEL + " levels old.\""; - next; - - menu - "Can I at least get wedding rings?", L_get_rings, - "Thanks anyways.", L_Close; - -L_marry_too_poor: - mes "[Estard]"; - mes "\"You need " + WEDDING_FEE + " GP to get married. That covers all administrative fees for the marriage and provides two wedding rings.\""; - close; - -L_get_rings: - mes "[Estard]"; - mes "\"Yes. They are " + WEDDING_FEE + " GP. That covers all administrative fees for the marriage.\""; - - if (Zeny < WEDDING_FEE) - menu - "Thanks anyways. I don't have enough with me.", L_Close; - if (Zeny >= WEDDING_FEE) - menu - "I'll buy a pair.", L_get_rings_pay, - "Thanks anyways.", L_Close; - goto L_get_rings_pay; - -L_get_rings_pay: - callsub S_give_rings; - - mes "[Estard]"; - mes "\"There you go. Come again.\""; - close; - -L_divorce: - set @divorce_cost, DIVORCE_FEE_PER_LEVEL * BaseLevel; - - if (Zeny < @divorce_cost) - goto L_divorce_not_enough; - - mes "[Estard]"; - mes "\"If you're sure you want a divorce, it'll cost you " + @divorce_cost + " GP.\""; - next; - menu - "I am sure I want it.", L_do_divorce, - "I don't want it.", L_Close; - -L_do_divorce: - if (Zeny < @divorce_cost) - goto L_not_enough_money; - - if (divorce()) - goto L_divorce_done; - - mes "[Estard]"; - mes "\"I'm having trouble finding the record. \""; - mes "[Server]"; - mes "Try again when your partner is online too."; - close; - -L_divorce_done: - set Zeny, Zeny - @divorce_cost; - - mes "[Estard]"; - mes "\"You have been divorced. Come again.\""; - close; - -L_divorce_not_enough: - mes "[Estard]"; - mes "\"I'm sorry , but you don't have enough money to get a divorce. You need " + @divorce_cost + " GP.\""; - close; - -L_not_enough_money: - mes "[Estard]"; - mes "\"Seems you don't have enough money.\""; - close; - -L_no_room_for_rings: - mes "[Estard]"; - mes "\"You don't have enough room to carry these rings.\""; - close; - -L_Close: - close; - -S_give_rings: - if (Zeny < WEDDING_FEE) - goto L_not_enough_money; - getinventorylist; - if (@inventorylist_count > 98) - goto L_no_room_for_rings; - - set Zeny, Zeny - WEDDING_FEE; - getitem "WeddingRing", 1; - getitem "WeddingRing", 1; - return; -} - -021-2.gat,36,17,0|script|Tathin|107 -{ - mes "[Tathin]"; - mes "\"Hello what Can I do for you?\""; - next; - - set @halloween_npc_id, $@halloween_npc_tathin; - callfunc "TrickOrTreat"; - - goto L_Base_Menu; - -L_Base_Menu: - menu - "I'd like to join a party.", L_Give_Party, - "I'd like to create my own party.", L_Give_Make_Party, - "Nothing, I guess.", L_Close; - -L_Give_Party: - mes "[Tathin]"; - mes "\"You'll need to be invited by an existing member of a party to join it. You may also create your own party.\""; - next; - mes "[Tathin]"; - mes "\"Remember, parties cannot share experience if any members are more than 10 levels apart.\""; - menu - "I'd like to create my own party.", L_Give_Make_Party, - "Goodbye.", L_Close; - -L_Give_Make_Party: - mes "[Tathin]"; - mes "\"You can create parties with the 'new' or 'create' commands on the Party tab in the client. Parties need to have unique names.\""; - close; - -L_Close: - close; -} - -// Guard -021-2.gat,20,19,0|script|Guard#govt_in|123,1,1 -{ - mes "[Guard]"; - mes "\"You can't come back here.\""; - close; -} diff --git a/world/map/npc/021-2/heathin.txt b/world/map/npc/021-2/heathin.txt deleted file mode 100644 index 4bd9aae7..00000000 --- a/world/map/npc/021-2/heathin.txt +++ /dev/null @@ -1,360 +0,0 @@ -//Items for NPC are incomplete. Makes "simple ring" which can be crafted into a useful ring by Inya and terranite armor. - -021-2.gat,70,129,0|script|Heathin|147 -{ - set @TARROW_REQ_TERRA_ORE, 1; - set @TARROW_REQ_COAL, 5; - set @TARROW_REQ_GP, 3000; - set @heathin_xp_bonus, (100 * BaseLevel); - - set @state, ((QUEST_NorthTulimshar & NIBBLE_6_MASK) >> NIBBLE_6_SHIFT); - - if (@state == 14) && (BaseLevel >= 80) goto L_Heathin_Terranite_Arrows_Trade; - if (@state == 13) && (BaseLevel >= 80) goto L_Heathin_Terranite_Arrows_Ready; - if (@state == 12) && (BaseLevel >= 80) goto L_Heathin_Terranite_Arrows_Forge; - if (@state == 11) && (BaseLevel >= 80) goto L_Heathin_Terranite_Arrows; - if (@state == 10) && (BaseLevel >= 80) goto L_Heathin_Terranite_Chest_Armor_Ready; - if (@state == 9) && (BaseLevel >= 80) goto L_Heathin_Terranite_Chest_Armor_Forge; - if (@state == 8) && (BaseLevel >= 80) goto L_Heathin_Terranite_Chest_Armor; - if (@state == 7) && (BaseLevel >= 80) goto L_Heathin_Terranite_Legs_Ready; - if (@state == 6) && (BaseLevel >= 80) goto L_Heathin_Terranite_Legs_Forge; - if (@state == 5) && (BaseLevel >= 80) goto L_Heathin_Terranite_Legs; - if (@state == 4) && (BaseLevel >= 80) goto L_Heathin_Terranite_Hood_Ready; - if (@state == 3) && (BaseLevel >= 80) goto L_Heathin_Terranite_Hood_Forge; - if (@state == 2) && (BaseLevel >= 80) goto L_Heathin_Terranite_Hood; - if (@state == 2) && (BaseLevel >= 60) goto L_Heathin_Forge_Thanks; - if (@state == 1) && (BaseLevel >= 60) goto L_Heathin_Forge_Award; - if (BaseLevel >= 60) goto L_Heathin_Start; - - mes "[Heathin]"; - mes "\"Hello, friend. I am Heathin, a smith of exotic metals. \""; - close; - -L_Heathin_Start: - mes "[Heathin]"; - mes "\"Hello, friend. I am Heathin, a smith of exotic metals. \""; - next; - mes "\"By the order of the Wizard's Council, I've been commissioned to forge armor for the upcoming expediation. However, I am but a simple smith and cannot complete all this effort by myself. I need individuals that can gather Coal to heat my forge.\""; - next; - mes "\"Perhaps you would be interested in helping me out? Would you be willing to help me gather Coal and help me fulfill my commission? I am asking any and all willing souls to get me 50 coal, as that would put a significant dint in my goal.\""; - menu - "Sure, I'll help!", L_Heathin_Help, - "I'd rather keep my Coal for my own purposes, thank you very much.", L_Heathin_No, - "Wait, what kind of award are we talking about?", L_Heathin_Interested; - -L_Heathin_Help: - set @state, 1; - callsub S_Update_Mask; - mes "[Heathin]"; - mes "\"Excellent! I am always glad when someone can be of service not just to me, but to all of Tulimshar. Please get me 50 Coal and you will be compensated for your efforts.\""; - close; - -L_Heathin_No: - mes "[Heathin]"; - mes "\"That is too bad. If you change your mind, I shall still be here, attempting to get my commission done.\""; - close; - -L_Heathin_Interested: - mes "[Heathin]"; - mes "\"Well, I can compensate you from the commision I getting from the council.\""; - next; - mes "\"How does 20,000 GP and I'll offer my smithing services for a discount?\""; - next; - mes "\"Does this sound like something you might be interested in?\""; - menu - "Sure, I'll help!", L_Heathin_Help, - "I'd rather keep my Coal.", L_Heathin_No, - "Can you repeat that again?", L_Heathin_Interested; - -L_Heathin_Forge_Award: - if (countitem ("Coal") < 50) goto L_Heathin_Forge_Wait; - getinventorylist; - set @state, 2; - callsub S_Update_Mask; - delitem "Coal", 50; - getexp @heathin_xp_bonus, 0; - set Zeny, Zeny + 20000; - mes "[Heathin]"; - mes "\"You have brought the Coal. This is most excellent! As promised, I have a reward for you. Hopefully you will find it useful.\""; - next; - mes "\"Time to make some armor. The Council will be pleased. Thank you for your efforts!\""; - close; - -L_Heathin_Forge_Wait: - mes "[Heathin]"; - mes "\"Hello again. Making armor keeps me pretty busy. I certainly hope I can fulfill my commission soon so that I can move on to bigger and better things.\""; - next; - mes "\"The pay is good, certainly, but I am a far better smith than this. If you can bring me 50 Coal, it would surely get me to my goal faster.\""; - next; - mes "\"I will be sure to provide an apt award once you are done.\""; - close; - -L_Heathin_Forge_Thanks: - mes "[Heathin]"; - mes "\"Thank you again for helping me fulfil my commission. It has made a signficant dint in what the Council requires of me. Perhaps I may be of service to you again one day!\""; - close; - -L_Heathin_Terranite_Hood: - mes "[Heathin]"; - mes "\"Hello again friend, I just found out about this great metal called terranite.\""; - next; - mes "\"This metal is almost as strong as steel, but is also very ductile.\""; - next; - mes "\"With some effort, I can make this metal form rings tighter than any chain mail. It isn't the prettiest in hue, but its uses can be many.\""; - next; - mes "\"Unfortunately, it seems to be difficult to gather. Most that have searched for Terranite Ore either cannot find it or have never returned...\""; - next; - mes "\"I may be an excellent smith, but I certainly am no combatant. However, I would enjoy turning this ore into something useful, perhaps some type of armor to help those that may be braver.\""; - next; - mes "\"So, what do you say? Are you interested?\""; - menu - "No, thank you. Maybe later.", L_Heathin_Terranite_No, - "Armor, you say? Definitely!", L_Heathin_Terranite_Yes; - -L_Heathin_Terranite_No: - mes "[Heathin]"; - mes "\"Ah, that is too bad. Come by again anytime.\""; - close; - -L_Heathin_Terranite_Yes: - set @state, 3; - callsub S_Update_Mask; - mes "[Heathin]"; - mes "\"Great, this is going to be fun! As I have not had much practice with this armor, I'd like to get started soon.\""; - next; - mes "Heathin thinks for a moment."; - next; - mes "\"Ah, I know! I will make a helm... Well, more like a hood, since it will be woven.\""; - next; - mes "\"It will require a great amount of heat, if the rumors are to be believed. For this, I will need 100 Coal to keep my forge burning hot. I will also need 10 Terranite Ore to make the armor. Of course, such work does not come cheap. While I may enjoy my work, my time and effort is very valuable. Since you have been a great help I will only need 20,000 gold pieces, well below my going rate. Please come back with the gold, Coal and ore and I'll make this hood for you.\""; - close; - -L_Heathin_Terranite_Hood_Forge: - if ( (Zeny < 20000) - || (countitem("Coal") < 100) - || (countitem("TerraniteOre") < 10) ) - goto L_Heathin_Terranite_Hood_Wait; - set @state, 4; - callsub S_Update_Mask; - delitem "Coal", 100; - delitem "TerraniteOre", 10; - getexp @heathin_xp_bonus, 0; - set Zeny, Zeny - 20000; - mes "[Heathin]"; - mes "\"Great, you brought everything! Come back later and I'll have the helm ready for you.\""; - close; - -L_Heathin_Terranite_Hood_Wait: - mes "[Heathin]"; - mes "\"I am very busy right now. If you could bring me 10 Terranite Ore, 100 Coal and 20,000 gold pieces, I will make that terranite hood for you.\""; - close; - -L_Heathin_Terranite_Hood_Ready: - getinventorylist; - if ((checkweight("TerraniteHelmet", 1) == 0) || (@inventorylist_count == 100)) - goto L_InventoryNoSpace; - set @state, 5; - callsub S_Update_Mask; - getitem "TerraniteHelmet", 1; - mes "[Heathin]"; - mes "\"I am all done with your terranite hood. I hope you enjoy it! I have some work to wrap up for the Council, but come back later and I might be able to assist you again.\""; - close; - -L_Heathin_Terranite_Legs: - set @state, 6; - callsub S_Update_Mask; - mes "[Heathin]"; - mes "\"I am glad you are back! I've just finished up some more of my commission. Now I can get back to making terranite armor for you. This time I will make some pants, but they need more ore, more Coal to heat my forge and of course, more gold for my efforts.\""; - next; - mes "\"To make terranite pants, I need 200 Coal, 30 Terranite Ore and 40,000 gold pieces. The faster you bring this to me, the faster I can have your terranite pants ready.\""; - close; - -L_Heathin_Terranite_Legs_Forge: - if ( (Zeny < 40000) - || (countitem("Coal") < 200) - || (countitem("TerraniteOre") < 30) ) - goto L_Heathin_Terranite_Legs_Wait; - set @state, 7; - callsub S_Update_Mask; - delitem "Coal", 200; - delitem "TerraniteOre", 30; - getexp @heathin_xp_bonus, 0; - set Zeny, Zeny - 40000; - mes "[Heathin]"; - mes "\"Great, you have brought everything! Come back later and I will have those terranite pants ready for you.\""; - close; - -L_Heathin_Terranite_Legs_Wait: - mes "[Heathin]"; - mes "\"I am very busy right now. If you could bring me 30 Terranite Ore, 200 Coal and 40,000 gold pieces, I will make those terranite pants for you.\""; - close; - -L_Heathin_Terranite_Legs_Ready: - getinventorylist; - if ((checkweight("TerraniteLegs", 1) == 0) || (@inventorylist_count == 100)) - goto L_InventoryNoSpace; - set @state, 8; - callsub S_Update_Mask; - getitem "TerraniteLegs", 1; - mes "[Heathin]"; - mes "\"I am all done with your terranite pants. Hope you enjoy them! I have some more work to complete for the Council. Come back later and I might be able to assist you again.\""; - close; - -L_Heathin_Terranite_Chest_Armor: - set @state, 9; - callsub S_Update_Mask; - mes "[Heathin]"; - mes "\"Good to see you again. I have just finished up some more of my commission. Now I can get back to making terranite armor for you. This time, I will make some terranite chest armor, but it needs more ore, more Coal for my forge and of course, more gold to compensate for my efforts.\""; - next; - mes "\"To make terranite chest armor, I need 250 Coal, 40 Terranite Ore and 50,000 gold pieces. The faster you bring this to me, the faster I can have your terranite armor ready.\""; - close; - -L_Heathin_Terranite_Chest_Armor_Forge: - if ( (Zeny < 50000) - || (countitem("Coal") < 250) - || (countitem("TerraniteOre") < 40) ) - goto L_Heathin_Terranite_Chest_Armor_Wait; - set @state, 10; - callsub S_Update_Mask; - delitem "Coal", 250; - delitem "TerraniteOre", 40; - getexp @heathin_xp_bonus, 0; - set Zeny, Zeny - 50000; - mes "[Heathin]"; - mes "\"Splendid, you have brought everything! Come back later and I will have the terranite chest armor ready for you.\""; - close; - -L_Heathin_Terranite_Chest_Armor_Wait: - mes "[Heathin]"; - mes "\"I am very busy right now. If you could bring me 40 Terranite Ore, 250 Coal and 50,000 gold pieces, I will make that chest armor for you.\""; - close; - -L_Heathin_Terranite_Chest_Armor_Ready: - getinventorylist; - if ((checkweight("TerraniteChestArmor", 1) == 0) || (@inventorylist_count == 100)) - goto L_InventoryNoSpace; - set @state, 11; - callsub S_Update_Mask; - getitem "TerraniteChestArmor", 1; - mes "[Heathin]"; - mes "\"I have completed your terranite chest armor. I hope you enjoy it! I have some work to wrap up for the Council again, but come back later and I might be able to assist you once more.\""; - close; - -L_Heathin_Terranite_Arrows: - mes "[Heathin]"; - mes "\"How good to see you. I have experimented a little with Terranite Ore to see what else can be done with it. It seems to have some qualities suitable for weapons, but I have only tested it with arrows. If you would like, I can make Terranite Arrows, but as as with the armor, I need Coal, Terranite Ore and payment for my efforts.\""; - next; - mes "\"Also, it might be a while until I have time to see what else I can make with terranite other than arrows, as right now the Council is keeping me rather busy with my commission. So, would you like some Terranite Arrows?\""; - menu - "No, thank you.", L_Heathin_Terranite_Arrows_No, - "Sure, I could use some arrows.", L_Heathin_Terranite_Arrows_Yes; - -L_Heathin_Terranite_Arrows_No: - mes "[Heathin]"; - mes "\"Well, if you change your mind, I'm not going anywhere.\""; - close; - -L_Heathin_Terranite_Arrows_Yes: - set @state, 12; - callsub S_Update_Mask; - mes "[Heathin]"; - mes "\"Good, good. I shall begin crafting these arrows as soon as you come back. However, I cannot just make small handfuls as it would not be worth my time and effort to have my concentration interrupted for small tasks. I will make 1,000 Terranite Arrows per request, for which I will need "+@TARROW_REQ_TERRA_ORE+" Terranite Ore, "+@TARROW_REQ_COAL+" Coal and "+@TARROW_REQ_GP+" gold pieces.\""; - next; - mes "\"See you soon!\""; - close; - -L_Heathin_Terranite_Arrows_Forge: - if ( (Zeny < @TARROW_REQ_GP) - || (countitem("Coal") < @TARROW_REQ_COAL) - || (countitem("TerraniteOre") < @TARROW_REQ_TERRA_ORE) ) - goto L_Heathin_Terranite_Arrows_Wait; - set @state, 13; - callsub S_Update_Mask; - delitem "Coal", @TARROW_REQ_COAL; - delitem "TerraniteOre", @TARROW_REQ_TERRA_ORE; - getexp @heathin_xp_bonus, 0; - set Zeny, Zeny - @TARROW_REQ_GP; - mes "[Heathin]"; - mes "\"Wonderful! You have everything I asked for. I will start working on the arrows right away.\""; - close; - -L_Heathin_Terranite_Arrows_Wait: - mes "[Heathin]"; - mes "\"If you want Terranite Arrows, please get me "+@TARROW_REQ_TERRA_ORE+" Terranite Ore, "+@TARROW_REQ_COAL+" Coal and "+@TARROW_REQ_GP+" gold pieces.\""; - close; - -L_Heathin_Terranite_Arrows_Ready: - getinventorylist; - if ((checkweight("TerraniteArrow", 1000) == 0) || (@inventorylist_count == 100)) - goto L_InventoryNoSpace; - set @state, 14; - callsub S_Update_Mask; - getitem "TerraniteArrow", 1000; - mes "[Heathin]"; - mes "\"All done, here you go! I hope you like them. I am still working on my commission, but if you ever need any more Terranite Arrows, just come on by with "+@TARROW_REQ_COAL+" Coal, "+@TARROW_REQ_TERRA_ORE+" Terranite Ore and "+@TARROW_REQ_GP+" gold pieces and I will make another 1,000 arrows for you. By now I have enough Terranite Ore in reserve that you can just trade me my requirements to keep my resources up. Thank you for all your efforts!\""; - close; - -L_Heathin_Terranite_Arrows_Trade: - mes "[Heathin]"; - mes "\"Hello, there. If you have "+@TARROW_REQ_COAL+" Coal, "+@TARROW_REQ_TERRA_ORE+" Terranite Ore and "+@TARROW_REQ_GP+" gold pieces, I will trade you 1,000 Terranite Arrows. Would you like some Terranite Arrows?\""; - menu - "No.", L_Heathin_Terranite_Arrows_Trade_No, - "Yes.", L_Heathin_Terranite_Arrows_Trade_Yes; - -L_Heathin_Terranite_Arrows_Trade_No: - mes "[Heathin]"; - mes "\"Come back again if you would like to get Terranite Arrows.\""; - close; - -L_Heathin_Terranite_Arrows_Trade_Yes: - if ( (Zeny < @TARROW_REQ_GP) - || (countitem("Coal") < @TARROW_REQ_COAL) - || (countitem("TerraniteOre") < @TARROW_REQ_TERRA_ORE) ) - goto L_Heathin_Terranite_Arrows_Trade_Wait; - getinventorylist; - if ((checkweight("TerraniteArrow", 1500) == 0) || (@inventorylist_count == 100)) - goto L_InventoryNoSpace; - delitem "Coal", @TARROW_REQ_COAL; - delitem "TerraniteOre", @TARROW_REQ_TERRA_ORE; - set Zeny, Zeny - @TARROW_REQ_GP; - set @lucky, 5 * rand(readparam(bLuk)); - getitem "TerraniteArrow", 1000 + @lucky; - mes "[Heathin]"; - mes "\"Here you go! You are lucky, I could forge "+@lucky+" more arrows than expected. Come back again if you want more Terranite Arrows.\""; - close; - -L_Heathin_Terranite_Arrows_Trade_Wait: - mes "[Heathin]"; - mes "\"It seems that you do not have the necessary resources for me to trade you. Please come back with "+@TARROW_REQ_COAL+" Coal, "+@TARROW_REQ_TERRA_ORE+" Terranite Ore and "+@TARROW_REQ_GP+" gold pieces if you want another 1,000 Terranite Arrows.\""; - close; - -L_InventoryNoSpace: - mes "[Heathin]"; - mes "\"Hm no. You can't carry this right now. Make some room and come back.\""; - close; - -S_Update_Mask: - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_6_MASK)) | (@state << NIBBLE_6_SHIFT); - return; -} -021-2.gat,72,129,0|script|HeathinDebug|147 -{ - mes "[Heathin Debug]"; - mes "Debug Action"; - menu - "Reset", L_Reset, - "Exit", L_End; - -L_Reset: - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_6_MASK) | (0 << NIBBLE_6_SHIFT)); - mes "Reset!"; - goto L_End; - -L_End: - end; - -OnInit: - if (!debug) - disablenpc "HeathinDebug"; - end; -} diff --git a/world/map/npc/021-2/jhedia.txt b/world/map/npc/021-2/jhedia.txt deleted file mode 100644 index cc2f9165..00000000 --- a/world/map/npc/021-2/jhedia.txt +++ /dev/null @@ -1,62 +0,0 @@ -// Ingot maker takes iron ore, gives ingots for future crafting purposes. - -021-2.gat,70,124,0|script|Jhedia|160 -{ - set @Cost_Per_Ingot, 1000; - set @Iron_Ore_Per, 5; - set @Coal_Per, 10; - - mes "[Jhedia]"; - mes "\"I forge Iron Ore into ingots. Ingots are more useful for skilled smiths, like armorers, because the ore is refined and made into useful units which can be worked with. To make ingots, I need " + @Iron_Ore_Per + " Iron Ore and " + @Cost_Per_Ingot + " gp per ingot. I also need " + @Coal_Per + " Coal for my forge.\""; - next; - mes "[Jhedia]"; - mes "\"How many ingots would you like?\""; - input @ingot_count; - - if (@ingot_count == 0) - goto L_Jhedia_Bye; - set @Zeny_cost, @ingot_count * @Cost_Per_Ingot; - if (countitem("IronOre") < @Iron_Ore_Per * @ingot_count) - goto L_Jhedia_NotEnough_Ore; - if (countitem("Coal") < @Coal_Per * @ingot_count) - goto L_Jhedia_NotEnough_Coal; - if (Zeny < @Zeny_cost) - goto L_Jhedia_NotEnough_Zeny; - getinventorylist; - if (@inventorylist_count == 100 - && countitem("IronIngot") == 0 - && countitem("IronOre") > @ingot_count * @Iron_Ore_Per - | countitem("Coal") > @ingot_count * @Coal_Per) - goto L_Jhedia_NotEnoughSlots; - set Zeny, Zeny - @Zeny_cost; - delitem "IronOre", @ingot_count * @Iron_Ore_Per; - delitem "Coal", @ingot_count * @Coal_Per; - getitem "IronIngot", @ingot_count; - close; - -L_Jhedia_Bye: - mes "[Jhedia]"; - mes "\"Goodbye then.\""; - close; - -L_Jhedia_NotEnough_Ore: - mes "[Jhedia]"; - mes "\"You do not seem to have enough Iron Ore.\""; - close; - -L_Jhedia_NotEnough_Coal: - mes "[Jhedia]"; - mes "\"You do not seem to have enough Coal.\""; - close; - -L_Jhedia_NotEnough_Zeny: - mes "[Jhedia]"; - mes "\"You do not seem to have enough gold pieces.\""; - close; - -L_Jhedia_NotEnoughSlots: - mes "[Jhedia]"; - mes "\"You do not seem to have enough room to carry this many ingots.\""; - close; - -} diff --git a/world/map/npc/021-2/kps.txt b/world/map/npc/021-2/kps.txt deleted file mode 100644 index fb6ce235..00000000 --- a/world/map/npc/021-2/kps.txt +++ /dev/null @@ -1,164 +0,0 @@ -// KPS (Killian Parcel Service) -// Author: Wushin -// Kylian_Timer denotes current quest time & holds last completed. -// reuse the 4 bits -// To Mark 4 Different NPCs. -// setarray $@kps_npc_bits, $@knowYanisNT, $@knowLatoyNT, $@knowWeellosNT, $@knowCasinoNT; -021-2.gat,27,124,0|script|KPS Manager|191 -{ - set @state, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); - set @run, ((QUEST_NorthTulimshar & TWOBIT_8_MASK) >> TWOBIT_8_SHIFT); - set @run_cnt, ((QUEST_NorthTulimshar & TWOBIT_9_MASK) >> TWOBIT_9_SHIFT); - if (@state == 15) - goto L_SeeKylian; - if (@state == 14) - goto L_RunComplete; - if (@state == 13) - goto L_RunStarted; - if (@state == 12) - goto L_JobSelect; - if (@state == 11) - goto L_AcceptJob; - if (@state == 10) - goto L_OfferJob; - goto L_Default; - -L_Default: - mes "[KPS Manager]"; - mes "\"Kylian staying at the Inn bought this shop recently.\""; - mes "\"I'm waiting for him to open the shop.\""; - next; - mes "\"I wonder if he needs any help?\""; - goto L_Close; - -L_OfferJob: - mes "[KPS Manager]"; - mes "\"Hello and what how can I help you today?\""; - menu - "My name is " + strcharinfo(0), L_MyName, - "Nothing.", L_Close; - -L_MyName: - set @state, 11; - callfunc "SetKylianQuest"; - mes "\"Ahhh, Kylian said you would be dropping by.\""; - next; - mes "\"I assume you are looking for some work?\""; - menu - "Yes.", L_StartJob, - "No.", L_Close; - -L_AcceptJob: - mes "[KPS Manager]"; - mes "\"Interested in some work?\""; - menu - "Yes.", L_StartJob, - "No.", L_Close; - -L_StartJob: - set @run, 0; - callfunc "SetKylianRun"; - set @run_cnt, 0; - callfunc "SetKylianRunCnt"; - set @state, 12; - callfunc "SetKylianQuest"; - goto L_JobSelect; - -L_StartJobAgain: - set @run, 0; - callfunc "SetKylianRun"; - set @state, 12; - callfunc "SetKylianQuest"; - goto L_JobSelect; - -L_JobSelect: - if ((gettimetick(2) - Kylian_Timer) < 86400) - goto L_NoPackages; - mes "[KPS Manager]"; - mes "\"We have a number of deliveries that need to go all over the world.\""; - next; - goto L_RandJob; - -L_RandJob: - set @rand_quest, rand(1,3); - goto L_JobInfo; - -L_JobInfo: - mes "\"We have a delivery for:* " + $@random_quests$[@rand_quest] + "\""; - menu - "Take It.", L_StartRun, - "Anything Else?", L_RandJob, - "I need a break.", L_Close; - -L_StartRun: - set @state, 13; - callfunc "SetKylianQuest"; - set @run, @rand_quest; - callfunc "SetKylianRun"; - set Kylian_Timer, gettimetick(2); - goto L_Close; - -L_RunStarted: - mes "Deliver this package to:* " + $@random_quests$[@run] + "\""; - goto L_Close; - -L_RunComplete: - set @elapsed_time, (gettimetick(2) - Kylian_Timer); - if (@elapsed_time > 600) - goto L_Failed; - set @run_cnt, (@run_cnt + 1); - callfunc "SetKylianRunCnt"; - // Set Kylian wants to see you reward state - if (@run_cnt > 3) - goto L_KylianReward; - goto L_RunAgain; - -L_SeeKylian: - mes "\"You need to go see Kylian before I can give you any more work.\""; - goto L_Close; - -L_Failed: - mes "\"You need to be faster next time to earn a bonus.\""; - next; - goto L_RunAgain; - -L_KylianReward: - set Zeny, Zeny + $@delivery_money; - getexp ($@delivery_exp_mod * BaseLevel), 0; - callfunc "SetKylianRun"; - set @state, 15; - callfunc "SetKylianQuest"; - mes "[" + $@delivery_money + " money]"; - mes "[" + ($@delivery_exp_mod * BaseLevel) + " experience points]"; - next; - mes "\"I have a message Kylian wants me to send you over right away.\""; - goto L_Close; - -L_RunAgain: - set Zeny, Zeny + $@delivery_money; - getexp ($@delivery_exp_mod * BaseLevel), 0; - callfunc "SetKylianRun"; - mes "[" + $@delivery_money + " money]"; - mes "[" + ($@delivery_exp_mod * BaseLevel) + " experience points]"; - next; - mes "\"Good job, keep up the nice work and I'm sure the bonus will give you a bonus.\""; - next; - goto L_StartJobAgain; - -L_NoPackages: - mes "\"Come back tomorrow, maybe we will have some more work.\""; - goto L_Close; - -L_Close: - close; -} -function|script|SetKylianRun -{ - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(TWOBIT_8_MASK)) | (@run << TWOBIT_8_SHIFT); - return; -} -function|script|SetKylianRunCnt -{ - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(TWOBIT_9_MASK)) | (@run_cnt << TWOBIT_9_SHIFT); - return; -} diff --git a/world/map/npc/021-2/kylian.txt b/world/map/npc/021-2/kylian.txt deleted file mode 100644 index 5a162242..00000000 --- a/world/map/npc/021-2/kylian.txt +++ /dev/null @@ -1,424 +0,0 @@ -// Kylian is a businessman from Argeas who wants to eventually open a shop in Tulimshar -// asks the player for several information about the city -// Quest uses Nibble 4 and 5 of QUEST_NorthTulimshar -// Author: Jenalya - -// Nibble 4 is used as flags to indicate if the player knows certain places/persons -// Bit 0: player talked to Yanis in the government building -// Bit 1: player talked to Latoy on the market in North Tulimshar -// Bit 2: player talked to Weellos as the historic building -// Bit 3: player was in the casino rooms - -// Nibble 5 is used to save the quest progress with Kylian -// state 1: player has the task to get the luggage from the harbor -// state 2: Adrian gave the luggage to the player -// state 3: player gave luggage to Kylian and Kylian asks who to talk to for the shop license -// after the player answered this, @KylianNTLicense is set. -// the player can only continue the quest when logging out and therefore setting that value to 0 again -// state 4: Kylian asks for a historical building to get some cultural knowledge -// state 5: Kylian asks where to get some typical food -// after the player answered this, @KylianNTSightSeeing is set. -// the player can only continue the quest when logging out and therefore setting that value to 0 again -// state 6: Kylian asks where to go to have some fun in the evening (casino) -// state 7: Kylian asks where to get exquisite clothing before going out in the evening -// after the player answered this, @KylianNTSightSeeing is set. -// the player can only continue the quest when logging out and therefore setting that value to 0 again -// state 8: Kylian was in the casino and gives a desert hat as reward -// state 9: Shop approved, go talk Kylian's shopkeeper if you are looking for work. -// state 10: Meet Shop keeper -// state 11: Start Time Trial -// state 12: Return -// state 13: Start Daily Timed -// state 14: Return -// state 15: Completed -// Kylian_Timer is used to denote start time. - -// temporary variables used to check if the player logged out or left the building in the meanwhile -// this is to ensure some 'time in between' different actions of the quest -// @KylianNTLicense -// @KylianNTSightSeeing -// @KylianNTCasino - --|script|#businessmanNTconfig|-1 -{ - end; - -OnInit: - // Nibble 4 - // Used in Random Quest later as a Nibble - set $@knowYanisNT, (1 << 16); - set $@knowLatoyNT, (1 << 17); - set $@knowWeellosNT, (1 << 18); - set $@knowCasinoNT, (1 << 19); - - // Random Quests for Later - setarray $@random_quests$, "None", "Falkurn", "Old Wizard", "Baktar"; - set $@delivery_money, 100; - set $@delivery_exp_mod, 10; - end; -} -021-2.gat,25,67,0|script|#KylianOut|32767,1,1 -{ - set @KylianNTLicense, 0; - set @KylianNTSightSeeing, 0; - set @KylianNTCasino, 0; - end; -} -021-2.gat,89,55,0|script|Kylian|193 -{ - set @state, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); - - set @acorn_amount, 12; - set @suitcase_money, 100; - set @suitcase_exp, 50; - set @license_money, 50; - set @license_exp, 20; - set @sightseeing_money, 50; - set @sightseeing_exp, 20; - set @food_money, 50; - set @food_exp, 20; - set @clothes_money, 50; - set @clothes_exp, 20; - set @fun_money, 50; - set @fun_exp, 20; - - // This NPC previously used the variable TMW_Quest - callfunc "ClearVarTMW_Quest"; - set @bernard, ((QUEST_SouthTulimshar & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT); - - if (@state == 15) goto L_Done; - if (@state >= 11) goto L_Helping; - if (@state == 10) goto L_OfferedJob; - if (@state == 9) goto L_Shop; - if (@KylianNTCasino) goto L_CasinoDone; - if (@state == 8) goto L_DesertHat; - if (@state == 7) goto L_Clothes; - if (@KylianNTSightSeeing) goto L_SightSeeingDone; - if (@state == 6) goto L_Casino; - if (@state == 5) goto L_Food; - if (@KylianNTLicense) goto L_LicenseDone; - if (@state == 4) goto L_SightSeeing; - if (@state == 3) goto L_ShopLicense; - if (@state >= 1) goto L_Suitcase; - - mes "[Kylian]"; - mes "\"Ah, are you the room service? I've some requests.\""; - menu - "Sure, what can I do for you?",L_Luggage, - "No, I'm not!",L_Next; - -L_Next: - mes "[Kylian]"; - mes "\"Too bad. Would you be interested in earning some quick money with some errands regardless?\""; - menu - "I'm a great adventurer! I don't do errands.",L_Close, - "No, I'm busy.",L_Close, - "Mh, ok.",L_Luggage; - -L_Luggage: - mes "[Kylian]"; - mes "\"I need someone to get my luggage from the docks. Show this paper to the sailor who's watching the luggage.\""; - mes "He gives you his ticket which you store in your pocket, separated from your inventory."; - set @state, 1; - callfunc "SetKylianQuest"; - goto L_Close; - -L_Suitcase: // @state >= 1, but below 3 - mes "[Kylian]"; - mes "\"Did you already get my luggage from the docks?\""; - if (@state != 2) - goto L_Close; - menu - "Here it is.",L_Continue, - "I'm on my way, don't worry.",L_Close; - -L_Continue: - if (countitem("LeatherSuitcase") < 1) - goto L_NoItem; - delitem "LeatherSuitcase", 1; - set Zeny, Zeny + @suitcase_money; - getexp @suitcase_exp, 0; - set @state, 3; - callfunc "SetKylianQuest"; - mes "[Kylian]"; - mes "\"Ah, very good. I really need to have a look at some of my papers in there.\""; - mes "He gives you some money."; - next; - mes "[Kylian]"; - mes "\"Oh, and I have some acorns left, I had them with me as travelling fare. You can have them, they're tasty."; - mes "In case you don't like them, you could also bring them to the Tulimshar bakery. I heard they use them to make some special flour.\""; - getitem "Acorn", @acorn_amount; - next; - goto L_ShopLicense; - -L_ShopLicense: // @state == 3 - mes "[Kylian]"; - mes "\"I'm a salesman and came to Tulimshar because I'm thinking about establishing a shop here. While I'm going through my papers, could you find out who I have to talk to about opening a shop in this city?\""; - if (!(QUEST_NorthTulimshar & $@knowYanisNT)) - goto L_Close; - menu - "You need to talk to Yanis in the government building.",L_GovBuild, - "I'll see what I can do.",L_Close; - -L_GovBuild: - set Zeny, Zeny + @license_money; - getexp @license_exp, 0; - set @state, 4; - callfunc "SetKylianQuest"; - set @KylianNTLicense, 1; - mes "[Kylian]"; - mes "\"Ah, excellent. That's very helpful. Could you tell me how to get to that building?\""; - mes "You explain the way to the building."; - next; - goto L_LicenseDone; - -L_LicenseDone: // the player didn't log out yet after telling about Yanis - mes "[Kylian]"; - mes "\"I need to prepare my papers now. I might have some more questions later.\""; - goto L_Close; - -L_SightSeeing: // @state == 4 and logged out sometime between getting to that state and now - mes "[Kylian]"; - mes "\"You just came here the right moment. I have finished my business affairs. I think I should use my time here to also get a bit of cultural knowledge about the area. Can you tell me if there are any historical places to visit?\""; - if (!(QUEST_NorthTulimshar & $@knowWeellosNT)) - goto L_Close; - menu - "There is a very old historic building not far from here.",L_HistBuild, - "I don't know, but will have a look around.",L_Close; - -L_HistBuild: - set Zeny, Zeny + @sightseeing_money; - getexp @sightseeing_exp, 0; - set @state, 5; - callfunc "SetKylianQuest"; - mes "[Kylian]"; - mes "\"This sounds interesting. Please tell me the way.\""; - mes "You tell him how to get to the historic building."; - next; - goto L_Food; - -L_Food: // @state == 5 - mes "[Kylian]"; - mes "\"While I'm out, I could also get something to eat. Maybe some typical dish for this region. Do you have a good suggestion for that?\""; - if (@bernard < 4) // didn't yet help Bernard to make his soup - goto L_Close; - menu - "Bernard on the bazaar makes a great soup.",L_SoupBer, - "No idea, I'll try to find out.",L_Close; - -L_SoupBer: - set Zeny, Zeny + @food_money; - getexp @food_exp, 0; - set @state, 6; - callfunc "SetKylianQuest"; - set @KylianNTSightSeeing, 1; - goto L_SightSeeingDone; - -L_SightSeeingDone: - mes "[Kylian]"; - mes "\"I'm going to see the historic building you told me about and try this local soup on the bazaar. Thank you for the suggestions.\""; - goto L_Close; - -L_Casino: // @state == 6 and logged out sometime between getting to that state and now - mes "[Kylian]"; - mes "\"Hello. I just came back from my sight-seeing tour. And this soup from Bernard really was delicious. I wonder what it's made of...\""; - next; - mes "\"However, I was wondering if you know about a good place to spend the evening? Some place to have fun?\""; - if (!(QUEST_NorthTulimshar & $@knowCasinoNT)) - goto L_Close; - menu - "Of course! The casino!",L_CasinoFound, - "Not really.",L_Close; - -L_CasinoFound: - set Zeny, Zeny + @casino_money; - getexp @casino_exp, 0; - set @state, 7; - callfunc "SetKylianQuest"; - mes "[Kylian]"; - mes "\"Oh, there's a casino in this city? That's a wonderful thing. Where can I find it?\""; - mes "You explain how to get to the casino."; - next; - goto L_Clothes; - -L_Clothes: // @state == 7 - mes "[Kylian]"; - mes "\"I should get proper clothing before I go to the casino tonight. Do you know a reputable shop where clothing of high quality is sold?\""; - if (!(QUEST_NorthTulimshar & $@knowLatoyNT)) - goto L_Close; - menu - "At the market near the harbor district...",L_HarborDistrict, - "Mh, I don't know.",L_Close; - -L_HarborDistrict: - set Zeny, Zeny + @clothes_money; - getexp @clothes_exp, 0; - set @state, 8; - callfunc "SetKylianQuest"; - set @KylianNTCasino, 1; - mes "You explain about Latoy and his high quality shop."; - mes "[Kylian]"; - mes "\"This seems to be exactly what I need. Thanks a lot.\""; - goto L_Close; - -L_CasinoDone: - mes "[Kylian]"; - mes "\"I'm looking forward to going to the casino tonight. See me tomorrow.\""; - goto L_Close; - -L_DesertHat: // @state == 8 - mes "Kylian looks a bit tired."; - mes "[Kylian]"; - mes "\"That was an interesting night. Thanks for your suggestion to visit the casino.\""; - next; - getinventorylist; - mes "\"You helped me a lot, so I bought a souvenir for you while I was shopping.\""; - if ((checkweight("DesertHat", 1) == 0) || (@inventorylist_count == 100)) - goto L_Inventory; - getitem "DesertHat", 1; - set @state, 9; - callfunc "SetKylianQuest"; - next; - goto L_Close; - -L_Shop: - mes "[Kylian]"; - mes "\"The Council of Wizards approved my shop license!\""; - mes "\"I purchased a store just acorss the way from the hotel exit.\""; - next; - mes "\"If you are looking for work, go see the shop keeper I have working for me.\""; - mes "\"Mention your name and he will know I sent you.\""; - set @state, 10; - callfunc "SetKylianQuest"; - goto L_Close; - -L_OfferedJob: - mes "[Kylian]"; - mes "\"I spoke with the shopkeeper, They said you haven't stopped in yet.\""; - next; - mes "\"I wish you would consider working for KPS.\""; - next; - mes "\"KPS needs a well-traveled go getter like you.\""; - goto L_Close; - -L_Helping: - mes "[Kylian]"; - mes "\"I've heard you decided to come work for me. That is great news.\""; - mes "\"Keep up the good work and I might have something a little extra for you.\""; - goto L_Close; - -L_Done: - mes "[Kylian]"; - mes "\"Thanks a bunch, buisness is booming!\""; - mes "\"For your hard work take this.\""; - next; - set Zeny, Zeny + $@delivery_money; - getexp ($@delivery_exp_mod * BaseLevel), 0; - set @run_cnt, 0; - callfunc "SetKylianRunCnt"; - set @state, 12; - callfunc "SetKylianQuest"; - mes "[" + $@delivery_money + " money]"; - mes "[" + ($@delivery_exp_mod * BaseLevel) + " experience points]"; - next; - goto L_Close; - -L_Inventory: - mes "[Kylian]"; - mes "\"Oh, you're carrying a lot of things. Come back when you have more room.\""; - goto L_Close; - -L_NoItem: - mes "[Kylian]"; - mes "\"I don't see it! Are you trying to tease me? This is not funny!\""; - goto L_Close; - -L_Close: - set @acorn_amount, 0; - set @suitcase_money, 0; - set @suitcase_exp, 0; - set @license_money, 0; - set @license_exp, 0; - set @sightseeing_money, 0; - set @sightseeing_exp, 0; - set @food_money, 0; - set @food_exp, 0; - set @clothes_money, 0; - set @clothes_exp, 0; - set @fun_money, 0; - set @fun_exp, 0; - set @inventorylist_count, 0; - set @bernard, 0; - // NOT set to zero: @KylianNTLicense, @KylianNTSightSeeing and @KylianNTCasino - // those are used to check if the player logged out in the meanwhile - close; -} -function|script|SetKylianQuest -{ - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_5_MASK)) | (@state << NIBBLE_5_SHIFT); - return; -} -function|script|KylianDebug -{ - set @state, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); - callfunc "ClearVarTMW_Quest"; - set @bernard, ((QUEST_SouthTulimshar & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT); - set @run, ((QUEST_NorthTulimshar & TWOBIT_8_MASK) >> TWOBIT_8_SHIFT); - set @run_cnt, ((QUEST_NorthTulimshar & TWOBIT_9_MASK) >> TWOBIT_9_SHIFT); - goto L_Menu; - -L_Menu: - mes "[Kylian Debug]"; - menu - "Show Quest State", L_ShowState, - "Set Quest State", L_SetState, - "Reset Timer to now", L_WorkTimer, - "Reset Timer + 24 hours", L_MoreWorkTimer, - "Close.", L_Close; - -L_ShowState: - mes "State: " + @state; - mes "Timer: " + Kylian_Timer; - mes "Time: " + gettimetick(2); - mes "Elapsed Time: " + (gettimetick(2) - Kylian_Timer); - mes "Reset Timer: 86400 > " + (gettimetick(2) - Kylian_Timer); - mes "Run: " + @run; - mes "Run NPC: " + $@random_quests$[@run]; - mes "Run Count: " + @run_cnt; - goto L_Menu; - -L_SetState: - mes "\"Input the quest state desired.\""; - input @state; - callfunc "SetKylianQuest"; - goto L_Menu; - -L_WorkTimer: - set Kylian_Timer, gettimetick(2); - goto L_Menu; - -L_MoreWorkTimer: - set Kylian_Timer, (gettimetick(2) - 86401); - goto L_Menu; - -L_Close: - close; -} -021-2.gat,87,55,0|script|KylianDebug#1|193 -{ - callfunc "KylianDebug"; - end; -OnInit: - if (!debug) - disablenpc "KylianDebug#1"; - end; -} -021-2.gat,29,124,0|script|KylianDebug#2|193 -{ - callfunc "KylianDebug"; - end; -OnInit: - if (!debug) - disablenpc "KylianDebug#2"; - end; -} diff --git a/world/map/npc/021-2/manakins.txt b/world/map/npc/021-2/manakins.txt deleted file mode 100644 index 85f757a5..00000000 --- a/world/map/npc/021-2/manakins.txt +++ /dev/null @@ -1,47 +0,0 @@ -// Display Manakins. - -// Forge -021-2.gat,76,131,0|script|Terranite Armor#Female|401 -{ - mes "Terranite Armor complete set, made to order, inquire with Heathin"; - close; -} - -021-2.gat,81,131,0|script|Terranite Armor#Male|402 -{ - mes "Terranite Armor complete set, made to order, inquire with Heathin"; - close; -} - -021-2.gat,81,136,0|script|Terranite|403 -{ - mes "Ahhh! A Terranite! Wait it appears to just be a display model."; - close; -} - -// Museum - -021-2.gat,71,161,0|script|Talponian#Female|404 -{ - mes "A Female Talponian."; - close; -} - -021-2.gat,77,161,0|script|Talponian#Male|405 -{ - mes "A Male Talponian."; - close; -} - -021-2.gat,83,161,0|script|Gispaan#Female|406 -{ - mes "A Female Gispaan."; - close; -} - -021-2.gat,89,161,0|script|Gispaan#Male|407 -{ - mes "A Male Gispaan."; - close; -} - diff --git a/world/map/npc/021-2/mapflags.txt b/world/map/npc/021-2/mapflags.txt deleted file mode 100644 index d3dd0e16..00000000 --- a/world/map/npc/021-2/mapflags.txt +++ /dev/null @@ -1,2 +0,0 @@ -021-2.gat|mapflag|town -021-2.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/021-2/rebecca.txt b/world/map/npc/021-2/rebecca.txt deleted file mode 100644 index 37df8d65..00000000 --- a/world/map/npc/021-2/rebecca.txt +++ /dev/null @@ -1,11 +0,0 @@ -// - -021-2.gat,26,54,0|script|Rebecca|118 -{ - set @npcname$, "Rebecca the Inn Keeper"; - set @cost, 100; - callfunc "Inn"; - set @npcname$, ""; - set @cost, 0; - close; -} diff --git a/world/map/npc/021-2/yanis.txt b/world/map/npc/021-2/yanis.txt deleted file mode 100644 index 0cc28962..00000000 --- a/world/map/npc/021-2/yanis.txt +++ /dev/null @@ -1,41 +0,0 @@ -// Government official taking care about shop licenses -// involved in quest given by 021-1/imec.txt and 021-2/kylian.txt - -021-2.gat,33,17,0|script|Yanis|107 -{ - set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@knowYanisNT; - set @kylian, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); - set @imec, ((QUEST_NorthTulimshar & TWOBIT_4_MASK) >> TWOBIT_4_SHIFT); - - mes "[Yanis]"; - mes "\"Welcome. I'm handling issues with trading licenses for the shop owners in Tulimshar. Can I help you?\""; - if (@imec != 1) - menu - "Nothing right now.",L_BeforeClose; - menu - "Imec asked me to bring this petition.",L_Next, - "Nothing right now.",L_BeforeClose; - -L_Next: - mes "[Yanis]"; - mes "\"Imec? I see. Give it to me.\""; - mes "Yanis has a disapproving look on his face. He takes the letter and writes something on another paper."; - next; - mes "[Yanis]"; - mes "\"Here you have a letter of acknowledgement. You can bring that back to Imec. We will have a look at his case.\""; - set @imec, 2; - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(TWOBIT_4_MASK)) | (@imec << TWOBIT_4_SHIFT); - goto L_BeforeClose; - -L_BeforeClose: - if (@kylian != 3) - goto L_Close; - next; - mes "You think that this is the person Kylian needs to talk to. You should tell him."; - goto L_Close; - -L_Close: - set @imec, 0; - set @kylian, 0; - close; -} |