diff options
Diffstat (limited to 'npc/013-2')
-rw-r--r-- | npc/013-2/_import.txt | 7 | ||||
-rw-r--r-- | npc/013-2/_warps.txt | 5 | ||||
-rw-r--r-- | npc/013-2/apprentice.txt | 98 | ||||
-rw-r--r-- | npc/013-2/mapflags.txt | 1 | ||||
-rw-r--r-- | npc/013-2/notes.txt | 204 | ||||
-rw-r--r-- | npc/013-2/wizard.txt | 218 |
6 files changed, 533 insertions, 0 deletions
diff --git a/npc/013-2/_import.txt b/npc/013-2/_import.txt new file mode 100644 index 00000000..63b87c91 --- /dev/null +++ b/npc/013-2/_import.txt @@ -0,0 +1,7 @@ +// Map 013-2: Magic House +// This file is generated automatically. All manually added changes will be removed when running the Converter. +"npc/013-2/_warps.txt", +"npc/013-2/apprentice.txt", +"npc/013-2/mapflags.txt", +"npc/013-2/notes.txt", +"npc/013-2/wizard.txt", diff --git a/npc/013-2/_warps.txt b/npc/013-2/_warps.txt new file mode 100644 index 00000000..c649c3b5 --- /dev/null +++ b/npc/013-2/_warps.txt @@ -0,0 +1,5 @@ +// This file is generated automatically. All manually added changes will be removed when running the Converter. +// Map 013-2: Magic House warps +013-2,63,42,0 warp #013-2_63_42 0,0,013-1,42,91 +013-2,67,36,0 warp #013-2_67_36 0,0,013-2,21,40 +013-2,21,41,0 warp #013-2_21_41 0,0,013-2,67,37 diff --git a/npc/013-2/apprentice.txt b/npc/013-2/apprentice.txt new file mode 100644 index 00000000..9c17e99c --- /dev/null +++ b/npc/013-2/apprentice.txt @@ -0,0 +1,98 @@ +013-2,25,37,0 script Fabius NPC115,{ + mes "[Fabius]"; + mes "\"Hey! Wanna have a drink or something? High quality, low cost. A poor fella like me needs a bit of extra cash, ye know.\""; + next; + menu + "Yes please!", L_Yes, + "No thanks.", L_No, + "No way, I thought it was for free!", L_Not_Free; + +L_Yes: + mes "[Fabius]"; + mes "\"So what would ya like, then?\""; + next; + menu + "A beer", L_Beer, + "A milk", L_Milk, + "Nevermind", L_No; + +L_No: + mes "[Fabius]"; + mes "\"Suit yourself.\""; + next; + goto L_Finish; + +L_Not_Free: + mes "[Fabius]"; + mes "\"Oh, you stupid git! ... But hey, let me tell ya something...\""; + next; + mes "[Fabius]"; + mes "\"There's notes flying around in the room up there. Did ya try reading some?\""; + close; + +L_Beer: + mes "[Fabius]"; + mes "\"That'll be 175 GP.\""; + next; + menu + "Here you are", L_Beer_yes, + "No thanks", L_Beer_no; + +L_Beer_yes: + if (Zeny < 175) + goto L_Low_money; + getinventorylist; + if (@inventorylist_count == 100 + && countitem("Beer") == 0) + goto L_TooMany; + getitem "Beer", 1; + Zeny = Zeny - 175; + goto L_Finish; + +L_Beer_no: + mes "[Fabius]"; + mes "\"No beer, no civilization!\""; + next; + goto L_Finish; + +L_Milk: + mes "[Fabius]"; + mes "\"That'll be 300 GP.\""; + next; + menu + "Here you are", L_Milk_yes, + "No thanks", L_Milk_no; + +L_Milk_yes: + if (Zeny < 300) + goto L_Low_money; + getinventorylist; + if (@inventorylist_count == 100 + && countitem("Milk") == 0) + goto L_TooMany; + getitem "Milk", 1; + Zeny = Zeny - 300; + goto L_Finish; + +L_Milk_no: + mes "[Fabius]"; + mes "\"Oh alright. Milk is a deadly poison anyway...\""; + next; + goto L_Finish; + +L_Low_money: + mes "[Fabius]"; + mes "\"Aw, you don't have enough gold on you!\""; + next; + goto L_Finish; + +L_Finish: + mes "[Fabius]"; + mes "\"By the way, have you seen those flying notes and the mirror in the room next door? They're WAY COOL! Try reading some of the notes!\""; + close; + +L_TooMany: + mes "[Fabius]"; + mes "\"You don't have room for it.\""; + close; +} diff --git a/npc/013-2/mapflags.txt b/npc/013-2/mapflags.txt new file mode 100644 index 00000000..42e54a1e --- /dev/null +++ b/npc/013-2/mapflags.txt @@ -0,0 +1 @@ +//013-2 mapflag resave 013-1,126,99 diff --git a/npc/013-2/notes.txt b/npc/013-2/notes.txt new file mode 100644 index 00000000..8c2cf9fa --- /dev/null +++ b/npc/013-2/notes.txt @@ -0,0 +1,204 @@ + +013-2,23,32,0 script Motto#wiz NPC400,{ + mes "Mid pleasures and palaces though we may roam,"; + mes "Be it ever so humble, there's no place like home."; + close; +} + +013-2,30,32,0 script Note#wiz NPC400,{ + mes "Please do not open."; + close; +} + +013-2,38,20,0 script Saying#wiz NPC400,{ + mes "The early bird catcheth the worm."; + if (!getvaultid()) close; // Close this mirror lake + if (get_nibble(##03_TMWQUEST, 0) < 2) close; // Not yet authorized + mesc l("Should we recite this backward to travel to a different world? If yes, thinking on what?"); + select + l("Leave it be."), + rif(get_nibble(##03_TMWQUEST, 0) >= 2, l("Think on Mouboos and Cindy problems")); + mes ""; + switch (@menu) { + case 2: MirrorLakeSendTo(MLP_MOUBOOTAUR, 0); break; + } + close; +} + +013-2,27,21,0 script Mirror#wiz NPC400,{ + mes "You say: \"Mirror mirror on the wall, who has the nicest haircut of them all?\""; + next; + mes "\"Oh fair adventurer, your hair indeed looks nice. But wouldn't it look much better, after I have rolled my dice?\""; + next; + mes "Your looks suddenly change..."; + next; + @fixedMirror = 1; + callfunc "useMirror"; + close; +} + +013-2,25,23,0 script Spell#wiz1 NPC400,{ + mes "You read: \"I see trees of green, red roses too. I see them bloom for me and you. And I think to myself: \'What a wonderful world\'\""; + next; + mes "You think: \"Huh?\""; + next; + mes "The spell fulfills its inevitable purpose..."; + next; + @dest = rand(BaseLevel); + if (@dest < 10) + goto L_PlaceOne; + if ((@dest >= 10) && (@dest <= 50)) + goto L_PlaceTwo; + goto L_PlaceThree; + +L_PlaceOne: + warp "013-1",128,28; + goto L_close; + +L_PlaceTwo: + warp "016-1",62,89; + goto L_close; + +L_PlaceThree: + warp "014-1",33,35; + goto L_close; + +L_close: + @dest = 0; + close; +} + +013-2,27,24,0 script Spell#wiz2 NPC400,{ + mes "You read: \"You must not fear, for it is the mind-killer. That and sharp pointy things.\""; + next; + mes "You feel the floor disappear below your feet..."; + next; + callfunc "MiriamCheat"; + @dest = rand(BaseLevel); + if (@dest < 10) + goto L_PlaceOne; + if ((@dest >= 10) && (@dest <= 50)) + goto L_PlaceTwo; + goto L_PlaceThree; + +L_PlaceOne: + warp "006-1",83,60; + goto L_close; + +L_PlaceTwo: + warp "006-1",77,22; + goto L_close; + +L_PlaceThree: + warp "006-1",33,93; + goto L_close; + +L_close: + @dest = 0; + close; +} + +013-2,25,27,0 script Spell#wiz3 NPC400,{ + mes "You read: \"Snow-white flakes and eminent frost - I'll go there, whatever the cost!\""; + next; + mes "You feel yourself getting lighter..."; + next; + @dest = rand(BaseLevel); + if (@dest < 10) + goto L_FriendlyPlace; + if ((@dest >= 10) && (@dest <= 50)) + goto L_DeepCave; + goto L_Cave; + +L_FriendlyPlace: + warp "019-3",102,77; + goto L_close; + +L_DeepCave: + warp "031-3",135,163; + goto L_close; + +L_Cave: + warp "031-3",37,213; + goto L_close; + +L_close: + @dest = 0; + close; +} + +013-2,27,27,0 script Spell#wiz4 NPC400,{ + mes "You read: \"People and cosiness, lively and fun - that's where I've gone!\""; + next; + mes "The world around you slowly dissolves..."; + next; + @dest = rand(BaseLevel); + if (@dest < 10) + goto L_PlaceOne; + if ((@dest >= 10) && (@dest <= 50)) + goto L_PlaceTwo; + goto L_PlaceThree; + +L_PlaceOne: + warp "030-2",88,24; + goto L_close; + +L_PlaceTwo: + warp "001-2",30,29; + goto L_close; + +L_PlaceThree: + warp "010-2",34,42; + goto L_close; + +L_close: + @dest = 0; + close; +} + +013-2,26,28,0 script Spell#wiz5 NPC400,{ + mes "You read: \"Darkness and legs, eight of them each - I'd rather not go there, but now it's too late...\""; + next; + mes "For a moment everything turns black..."; + next; + @dest = rand(BaseLevel); + if (@dest < 10) + goto L_PlaceOne; + if ((@dest >= 10) && (@dest <= 50)) + goto L_PlaceTwo; + goto L_PlaceThree; + +L_PlaceOne: + warp "012-4",431,36; + goto L_close; + +L_PlaceTwo: + warp "013-3",134,54; + goto L_close; + +L_PlaceThree: + warp "013-3",178,67; + goto L_close; + +L_close: + @dest = 0; + close; +} + +013-2,21,29,0 script Spell#wiz6 NPC400,{ + mes "You read: \"Heart stops pumping, breath begone - life is stopping, death has come!\""; + next; + mes "You're losing control of your body... everything turns black... while slipping to the floor, you hear a faraway scream... suddenly, you see THE LIGHT!"; + next; + heal -Hp, 0; + close; +} + +013-2,28,29,0 script Spell#wiz7 NPC400,{ + mes "You read: \"Cotton, steel, leather and wool - have I ever seen a greater fool?\""; + next; + mes "You suddenly feel naked; you ARE naked!"; + next; + nude; + close; +} diff --git a/npc/013-2/wizard.txt b/npc/013-2/wizard.txt new file mode 100644 index 00000000..5bef35a4 --- /dev/null +++ b/npc/013-2/wizard.txt @@ -0,0 +1,218 @@ +013-2,66,39,0 script Old Wizard#_W NPC116,{ + @has_magic = getskilllv(SKILL_MAGIC); + MAGIC_FLAGS = MAGIC_FLAGS | MFLAG_KNOWS_OLD_WIZARD; + + @run = ((QUEST_NorthTulimshar & TWOBIT_8_MASK) >> TWOBIT_8_SHIFT); + if ((@run == 2) && (QL_KYLIAN == 13)) + goto L_Deliver; + goto L_Start; + +L_Deliver: + menu + "I have a delivery for you", L_Delivery; + +L_Delivery: + mesn; + mes "\"Good now I can get to work on some stronger brew..\""; + QL_KYLIAN = 14; + goto L_close; + +L_Start: + mesn; + mes "\"Welcome, dear wanderer! Come into my humble home. Take a rest, eat and drink.\""; + next; + menu + "Thanks, that's very kind of you!", L_Thanks, + "Can you teach me magic?", L_TeachRude, + rif(get_nibble(##03_TMWQUEST, 0), l("Actually, have you ever heard of Yeti's kidnapping little girls?")), L_VaultQuest, + "Oh, shut up!", L_ShutUp; + +L_TeachRude: + mesn; + mes "\"I certainly could, but I already have an apprentice.\""; + goto L_close; + +L_ShutUp: + mesn; + mes "\"That attitude isn't going to get you very far, my dear.\""; + goto L_close; + +L_Thanks: + mesn; + mes "\"Behind this door, my apprentice will serve you.\""; + next; + if (@has_magic) + menu + "Alright.", L_Agree, + "I am studying magic, can you help?", L_NewStudent, + "Your apprentice? ... No thanks.", L_Decline; + menu + "Alright.", L_Agree, + "Your apprentice? ... No thanks.", L_Decline; + +L_Decline: + mesn; + mes "\"Goodbye, then!\""; + goto L_close; + +L_NewStudent: + mesn; + mes "\"Studying is always an excellent use of one's mind! I fear that I can't offer too much assistance to you, however. But if you are interested, I could perhaps teach you a simple spell?\""; + next; + + // check if the player has the knowledge of any skill + if (getskilllv(SKILL_POOL) && (getskilllv(SKILL_MAGIC_ASTRAL) < 1) || (getskilllv(SKILL_ASTRAL_SOUL) == 0)) + menu + "That would be very kind of you!", L_TeachSpell, + "Actually I am looking for someone teaching me some more magic skills.", L_AstralSoul, + "No, but thank you!", L_Decline; + menu + "That would be very kind of you!", L_TeachSpell, + "No, but thank you!", L_Decline; + +L_TeachSpell: + mesn; + mes "\"This one may not seem too powerful, but it can be quite handy; it's the 'hide' spell. It will shield you from some forms of detection magic.\""; + next; + mesn; + mes "\"Put a piece of cotton cloth on your head, and speak out '" + get(.invocation$, "spell-hide") + "', loudly and clearly. The protection lasts quite long, but you may have to renew it on occasion.\""; + next; + mesn; + mes "\"You can also cast it on others, of course. Just speak their name after you pronounce the invocation.\""; + next; + mesn; + mes "\"You may find it useful for getting a little peace and quiet at times, but it can also get in the way of friends trying to find you, so use it with care.\""; + next; + if (getskilllv(SKILL_MAGIC_ASTRAL) >= 2) + goto L_close; + mesn; + mes "\"I'm not sure if you are experienced enough to cast it yet, though. You may need to first learn astral magic.\""; + goto L_close; + +L_AstralSoul: + mesn; + mes "\"Oh yes, there are lots of ways to improve your magic. Skills -some people say mental focus for that- are another way to improve your magic. Of course learning more and more spells is also a need for good mages.\""; + next; + mes "\"I can teach you the ability to focus on magical stuff.\""; + next; + mes "\"To do so, I am in need of a pearl and about 100 acorns.\""; + menu + "Here we go.", L_Next, + "Ok be right back. I'll get them", L_Decline; + +L_Next: + if (countitem("Pearl") < 1 || countitem("Acorn") < 100) goto L_NotEnough; + delitem "Pearl", 1; + delitem "Acorn", 100; + mesn; + mes "\"Okay, listen:\""; + next; + mes "\"Some parts of your brain is still unused. These parts will now get the ability to get focused to magic.\""; + next; + mes "\"To do so, think of a magic spell!\""; + next; + mes "The old wizard mumbles some invocations"; + next; + @SUP_lvl = 1; + @SUP_id = SKILL_ASTRAL_SOUL; + @SUP_name$ = "Astral Soul"; + @SUP_xp = 2500; + callfunc "SkillUp"; + mes "\"Now go and try to find someone who can actually activate that focus.\""; + next; + mes "\"You have the powers to focus on magic, but you need to get magic focused now.\""; + goto L_close; + +L_NotEnough: + mesn; + mes "\"Please learn to count.\""; + next; + mes "\"When you are done with that, come back again.\""; + goto L_close; + +L_Agree: + mesn; + mes "\"Beware the flying notes though, some of them are really dangerous. I haven't been able to persuade them to get back into their book. And avoid the mirror, it's been acting strange lately.\""; + next; + mes "\"Oh, and please don't take my apprentice too seriously. He still has a lot to learn.\""; + goto L_close; + +L_VaultQuest: + .@q = get_nibble(##03_TMWQUEST, 0); + mes ""; + mesc l("%s raises an eyebrow at you.", strnpcinfo(1)); + if (.@q == 1) { + mesn; + mesq l("Are you being serious?"); + next; + //if (askyesno() == ASK_NO) close; + mesn; + mesq l("Have you at least asked Celestia about it? She is very knowledgeable about Yetis."); + next; + select + l("Who is Celestia?"), + l("Yes I did."), + l("No I didn't, I'll ask her."); + mes ""; + switch (@menu) { + case 1: + mesn; + mesq l("Ah, Celestia... She is a good woman who lives in Hurnscald. Go find her, come back to me after."); + close; + case 3: + close; + } + mesn; + mesq l("And what did she say?"); + next; + mesc l("You explain to the wizard about the situation."); + next; + mesn; + mesq l("If she said Yetis doesn't do it, then they doesn't do it... In this world, at least."); + if (!getvaultid()) close; // Duplicate code, for double safety + next; + select + l("\"this world\"?"); + mes ""; + mesn; + mesq l("Oh yes, there are worlds like this one where you can find even Yetis involved in politics. Really impressing."); + next; + set_nibble(##03_TMWQUEST, 0, 2); + .@q = 2; + } + if (.@q == 2) { + mesn; + mesq l("It was a long time since the last time I visited a different world... But you're young. Maybe you can do it. However, keep it a secret."); + next; + mesn; + mesq l("So, lemme think. There was this world, \"Moubootaur Lake\" or something, don't recall how they call themselves."); // Typo on purpose + next; + mesn; + mesq l("You could ask the %s of that world about it. Come back to me if she doesn't know anything, and I'll think on another world.", b("Celestia")); + next; + mesn; + mesq l("Now, %s. The worlds are all different. The one you're going to may be similar but is far from a carbon copy of this one.", b(l("pay attention"))); + next; + mesn; + mesq l("That world's Celestia is %s but not necessarily on the same house, or with the exact same name, nor with the exact same clothes.", b(l("likely on the same town"))); + next; + mesn; + mesq l("Now, if my memory serves me right, after visiting that world, you'll appear near a lake. %s, and then %s.", + b(l("Go south until you see a big road")), + b(l("Head east until you see the town"))); + next; + mesn; + mesq l("If you know a native citizen of the world, all the better. Worlds tend to impose their own rules, after all."); + next; + mesn; + mesq col(l("*cough cough*"), 9)+" "+l("Anyway, I don't teach this spell to everyone. Near my bed is a saying. Recite it backwards, think on the world you want to go, and let it be."); + next; + } + mesn; + mesq l("Good luck, and come back to me if you need help."); + close; + +L_close: + @has_magic = 0; + close; +} |