From 4b83969a25118fc099d72f043bf8e366ec478d36 Mon Sep 17 00:00:00 2001 From: MasterOfMuppets Date: Fri, 16 Jun 2006 20:29:27 +0000 Subject: Implemented the Lover's quest. git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@7215 54d463be-8e91-2dee-dedb-b68131a5f0ec --- npc/cities/einbech.txt | 491 +++++++++++++++++++++++++++++++++++++- npc/cities/einbroch.txt | 621 +++++++++++++++++++++++++++++++++++++++++++++++- 2 files changed, 1108 insertions(+), 4 deletions(-) (limited to 'npc/cities') diff --git a/npc/cities/einbech.txt b/npc/cities/einbech.txt index b02a139ee..cd9439f84 100644 --- a/npc/cities/einbech.txt +++ b/npc/cities/einbech.txt @@ -3,7 +3,7 @@ //===== By: ================================================== //= Muad_dib //===== Current Version: ===================================== -//= 1.2 +//= 1.3 //===== Compatible With: ===================================== //= eAthena Revision 3000+ //===== Description: ========================================= @@ -20,6 +20,7 @@ //= 1.1 Made some changes according to the Shinokas quest, [MasterOfMuppets] //= thanks to Dj-Yhn for scripting them. //= 1.2 Removed Duplicates [Silent] +//= 1.3 Implemented the Lover's quest. [MasterOfMuppets] //============================================================ @@ -1553,7 +1554,11 @@ einbech.gat,197,139,4 script Young Man#05 855,{ close; } -ein_in01.gat,191,102,4 script Kaijeta 846,{ +ein_in01.gat,191,102,4 script Kaijeta 846,{ + if(EIN_LOVERQ > 13)goto s_Learned; + if(EIN_LOVERQ == 13)goto s_Clothes; + if(EIN_LOVERQ > 6 && EIN_LOVERQ < 13)goto s_Hatred; + if(EIN_LOVERQ == 6)goto s_Helping; mes "[Kaijeta]"; mes "Welcome to my humble"; mes "abode, adventurer. I'm"; @@ -1574,9 +1579,96 @@ ein_in01.gat,191,102,4 script Kaijeta 846,{ mes "land, so we have no choice"; mes "but to endure through this..."; close; + +s_Helping: + mes "[Kaijeta]"; + mes "Thank you for helping my"; + mes "son. He may look like a fool"; + mes "for falling in love with someone"; + mes "from Einbroch, but he's an honest"; + mes "hard working man."; + next; + mes "[Kaijeta]"; + mes "Then again, it was bound to"; + mes "happen sometime. Einbech is"; + mes "a very poor town while Einbroch"; + mes "is a very rich town. I'd understand"; + mes "if you don't agree, but opposites"; + mes "attract sooner of later."; + next; + mes "[Kaijeta]"; + mes "^565656*Sigh...*^000000"; + mes "If my son and Calla can"; + mes "work things out, maybe it"; + mes "would improve relations"; + mes "between our two towns."; + mes "I certainly hope so..."; + next; + mes "[Kaijeta]"; + mes "Still, I'm quite baffled!"; + mes "I raised my son to have more"; + mes "guts than to wallow in misery"; + mes "when his heart's broken. And"; + mes "I still have no idea how he got"; + mes "together with such a rich woman."; + next; + mes "[Kaijeta]"; + mes "Do you have any idea"; + mes "how we can put an end"; + mes "to the hate between our"; + mes "two towns? I don't want to"; + mes "see this couple separated"; + mes "because of such pettiness."; + set EIN_LOVERQ,7; + close; + +s_Hatred: + mes "[Kaijeta]"; + mes "I can't bear to see the"; + mes "petty hatred between our"; + mes "two towns stop my son from"; + mes "seeing the woman he loves..."; + close; + +s_Clothes: + mes "[Kaijeta]"; + mes "Thank you for helping"; + mes "my son Clitzer. Sadly, the"; + mes "little fool doesn't have any"; + mes "clue when it comes to certain"; + mes "things like choosing clothing."; + mes "he gets so nervous about it!"; + next; + mes "[Kaijeta]"; + mes "A man should wear nice"; + mes "clothes, like a Formal Suit"; + mes "or a Tuxedo, for important"; + mes "meetings and special occassions."; + mes "hopefully, he'll learn that soon."; + close; + +s_Learned: + mes "[Kaijeta]"; + mes "My son learned"; + mes "an awful lot from"; + mes "your good example."; + mes "As a mother, I really"; + mes "appreciate everything"; + mes "you've done for him."; + next; + mes "[Kaijeta]"; + mes "Well, adventurer,"; + mes "I will be praying for"; + mes "your safety wherever"; + mes "your journeys may"; + mes "take you."; + close; + } -ein_in01.gat,200,101,4 script Clitzer 854,{ +ein_in01.gat,200,101,4 script Clitzer 854,{ + if(EIN_LOVERQ)goto s_Switches; +s_Back: mes "[Clitzer]"; mes "Is there something"; mes "that you really want"; @@ -1598,6 +1690,399 @@ ein_in01.gat,200,101,4 script Clitzer 854,{ mes "different that it's not"; mes "even possible anymore..."; close; + +s_Switches: + switch(EIN_LOVERQ) + { + + case 1: + mes "[Clitzer]"; + mes "That faintly sweet"; + mes "and pleasant scent..."; + mes "It's just like the fragrance"; + mes "they use in Calla's house."; + next; + mes "[Clitzer]"; + mes "Ah, so you visited"; + mes "Calla in Einbroch?"; + mes "I miss her sooo much!"; + mes "Is she doing alright?"; + next; + mes "[Clitzer]"; + mes "Calla's so beautiful."; + mes "And she's so lovely."; + mes "Every time I close my"; + mes "eyes, I can still see"; + mes "her lovely smile."; + next; + mes "[Clitzer]"; + mes "I'm sorry if I sound"; + mes "silly, but I can't help"; + mes "it. I know I'm acting like"; + mes "a complete idiot. But I'd"; + mes "give anything to see her..."; + next; + mes "[Clitzer]"; + mes "Just..."; + mes "Just don't listen"; + mes "to anything I say."; + mes "I'm just a poor fool"; + mes "in love with the wrong"; + mes "person. That has to be it..."; + set EIN_LOVERQ,2; + close; + break; + + case 2: + mes "[Clitzer]"; + mes "^565656*Sigh*^000000"; + mes "I really appreciate your"; + mes "sympathy, but I'm merely"; + mes "a coward and a fool."; + next; + mes "[Clitzer]"; + mes "Yeah..."; + mes "I'm a coward for doing"; + mes "nothing about my feelings"; + mes "and an idiot for falling in love"; + mes "with such a high class girl in"; + mes "the first place... Oh, Calla..."; + close; + break; + + case 3: + if(!countitem(1901))goto s_Back; + mes "[Clitzer]"; + mes "What brings you here?"; + mes "aren't you tired of hearing"; + mes "me moan and whine about"; + mes "lost love? ^111111*Siiiiigh...*^000000"; + next; + mes "[Clitzer]"; + mes "Hey, this violin..."; + mes "Calla used to play"; + mes "such beautiful music"; + mes "on this for me. Did"; + mes "she give this to you?"; + next; + mes "[Clitzer]"; + mes "I see. Calla must have"; + mes "known that I'm all broken up"; + mes "right now. She's too good to"; + mes "me. How can se consider"; + mes "my feelings before thinking"; + mes "about herself?"; + next; + mes "[Clitzer]"; + mes "I know I'm being"; + mes "shameless, but I have"; + mes "a favor to ask. Adventurer,"; + mes "would you please send"; + mes "Calla a present for me?"; + next; + mes "[Clitzer]"; + mes "All you need to do is"; + mes "just give her ^FF00001 Flower^000000."; + mes "I don't have the zeny and"; + mes "I don't think I'm welcome"; + mes "at Kapellthaine Manor."; + next; + mes "[Clitzer]"; + mes "Here, in return, I'll"; + mes "give you this health"; + mes "massage. It's not a"; + mes "big deal, but when I'm"; + mes "done, your mind and body"; + mes "will be refreshed. Here goes!"; + next; + mes "^3151FF*Knead Knead*"; + mes "*Rub Rub Rub Rub*"; + mes "*Press Press Press*"; + mes "*C-c-c-c-c-c-crakck!*^000000"; + next; + mes "[" + strcharinfo(0) + "]"; + mes "Oh--"; + mes "Hell yeah!"; + mes "That's the stuff!"; + delitem 1901,1; + if(BaseLevel < 41)set BaseExp,BaseExp+3712; + else if(BaseLevel > 40 && BaseLevel < 61)set BaseExp,BaseExp+7425; + else if(BaseLevel > 60 && BaseLevel < 71)set BaseExp,BaseExp+14850; + else if(BaseLevel > 70 && BaseLevel < 81)set BaseExp,BaseExp+29700; + else if(BaseLevel > 80 && BaseLevel < 91)set BaseExp,BaseExp+59400; + else if(BaseLevel > 90)set BaseExp,BaseExp+118800; + set EIN_LOVERQ,4; + next; + mes "[Clitzer]"; + mes "Would you please bring"; + mes "1 Flower to Calla for me?"; + mes "I'm sorry for troubling you..."; + close; + break; + + case 4: + mes "[Clitzer]"; + mes "Would you please bring"; + mes "1 Flower to Calla for me?"; + mes "I'm sorry for troubling you..."; + close; + break; + + case 5: + mes "[Clitzer]"; + mes "You've given her"; + mes "the flower? That's"; + mes "great! Thank you,"; + mes "thank you so mu--"; + next; + mes "[Clitzer]"; + mes "...Oh!"; + mes "Gosh! I was thinking so"; + mes "much about myself that"; + mes "I forgot to ask you for your"; + mes "name! I'm sorry for being"; + mes "so knuckle-headed..."; + next; + mes "[Clitzer]"; + mes "So..."; + mes "What's your name?"; + next; + input @str$; + if(@str$ != strcharinfo(0))goto s_WrongName; + mes "[Clitzer]"; + mes "" + strcharinfo(0) + "..."; + mes "That's very nice. Thank you,"; + mes "I'm really grateful for your help."; + mes "Although I can't see Calla in"; + mes "person, I can at least send"; + mes "my regards if you help me."; + next; + mes "[Clitzer]"; + mes "I feel so much"; + mes "better now. Oh!"; + mes "When you have the"; + mes "time, why don't you talk"; + mes "to my mother? She always"; + mes "likes meeting my friends."; + set EIN_LOVERQ,6; + close; + + s_WrongName: + mes "[Clitzer]"; + mes "Hm...?"; + mes "Oh, don't be"; + mes "so nervous~"; + mes "But would you please"; + mes "tell me your name again?"; + mes "I couldn't hear you..."; + close; + break; + + case 6: + case 7: + case 8: + case 9: + case 10: + case 11: + mes "[Clitzer]"; + mes "^111111*Sigh...*^000000"; + mes "What can I do to"; + mes "get Calla's parents"; + mes "to accept me as her"; + mes "boyfriend? I can't"; + mes "think of anything..."; + close; + break; + + case 12: + mes "[Clitzer]"; + mes "Eh...?"; + mes "What did you just say?"; + mes "You did something for"; + mes "the Kapellthaines?"; + next; + mes "[Clitzer]"; + mes "What...?"; + mes "Did you just say"; + mes "that Calla's mother"; + mes "wants me to have tea"; + mes "with her? Holy moley...!"; + next; + mes "[Clitzer]"; + mes "Okay, okay."; + mes "I-I I'll need something"; + mes "nice to wear, right? Oh."; + mes "Wow. This is so sudden!"; + mes "W-what should I do?"; + next; + mes "[Clitzer]"; + mes "This monkey suit"; + mes "that I've got on just"; + mes "won't do! Arrrgh! But I've"; + mes "already outgrown all of my"; + mes "nice clothes already. Boy,"; + mes "am I in a pickle..."; + set EIN_LOVERQ,13; + close; + break; + + case 13: + if((countitem(2320) || countitem(7170)) || (countitem(2320) && countitem(7170)))goto s_Clothes; + mes "[Clitzer]"; + mes "Noooooo!"; + mes "I've got to find"; + mes "the perfect thing"; + mes "to wear or Calla's"; + mes "mother might ^FF0000hate^000000 me!"; + next; + mes "[Clitzer]"; + mes "Think, Clitzer, think!"; + mes "Okay, no fun colors."; + mes "I don't want her to"; + mes "think I'm not serious"; + mes "about Calla. Stripes"; + mes "might be bad too..."; + close; + break; + + case 14: + case 15: + mes "[Clitzer]"; + mes "Look out, world!"; + mes "I'm gonna become"; + mes "worth of Calla's love!"; + mes "Someday, maybe even her"; + mes "parents will approve me!"; + close; + break; + + } + +s_Clothes: + mes "[Clitzer]"; + mes "Waaah!"; + mes "What should I wear?!"; + mes "I can't for the life of me"; + mes "figure this out! Something,"; + mes "um, formal? I've never worn"; + mes "anything like that before!"; + next; + if(countitem(7170)){ set @clothes,7170; goto s_Tux; } + if(countitem(2320)){ set @clothes,2320; goto s_Formal; } + close; + +s_Tux: + mes "[Clitzer]"; + mes "Wait, " + strcharinfo(0) + "."; + mes "What's that you've got"; + mes "there? I've seen something"; + mes "like that before. It's called"; + mes "a Tuxedo, right? Something"; + mes "like that would be perfect!"; + next; + menu "Give it to him.",s_Giveclothes,"Ignore him.",-; + + mes "[Clitzer]"; + mes "But how can I get"; + mes "a Tuxedo? Ooh, I hope"; + mes "it doesn't cost too much"; + mes "zeny or I won't be able to"; + mes "get one of those soon..."; + close; + +s_Formal: + mes "[Clitzer]"; + mes "Wait, " + strcharinfo(0) + "."; + mes "What's that you've got"; + mes "there? I've seen something"; + mes "like that before. It's called"; + mes "a Formal Suit, right?"; + mes "Something like that would"; + mes "be perfect!"; + next; + menu "Give it to him.",s_Giveclothes,"Ignore him.",-; + + mes "[Clitzer]"; + mes "But how can I get"; + mes "a Formal Suit? I hope"; + mes "it doesn't cost too much"; + mes "zeny or I won't be able to"; + mes "get one of those soon..."; + close; + +s_Giveclothes: + mes "[Clitzer]"; + mes "I can have this?"; + mes "Oh, thank you so much!"; + mes "Finally, I have something"; + mes "nice enough to wear to meet"; + mes "Calla's mom! What a relief!"; + next; + mes "[Clitzer]"; + mes "You've been helping me all"; + mes "this time and I haven't properly"; + mes "expressed my gratitude. I'm sorry"; + mes "if I've been to absorbed in my own"; + mes "problems. I may be poor, but I need"; + mes "to repay you somehow..."; + next; + mes "[Clitzer]"; + mes "Wait..."; + mes "Why don't you have this"; + mes "ore? I don't how"; + mes "valuable it is, but I know"; + mes "that it's pretty rare. It may"; + mes "even be useful to you later~"; + delitem @clothes,1; + set EIN_LOVERQ,14; + switch(rand(1,9)) + { + case 1: + getitem 7289,1; + break; + + case 2: + getitem 7290,1; + break; + + case 3: + getitem 7291,1; + break; + + case 4: + getitem 7292,1; + break; + + case 5: + getitem 7293,1; + break; + + case 6: + getitem 7294,1; + break; + + case 7: + getitem 7295,1; + break; + + case 8: + getitem 7296,1; + break; + + case 9: + getitem 7297,1; + break; + } + next; + mes "[Clitzer]"; + mes "" + strcharinfo(0) + ","; + mes "you've really opened"; + mes "my eyes. From now on,"; + mes "I'll do my best to earn the"; + mes "approval of Calla's parents and"; + mes "become worthy of Calla's love."; + close; + } diff --git a/npc/cities/einbroch.txt b/npc/cities/einbroch.txt index eac1047b9..56d6f6eb9 100644 --- a/npc/cities/einbroch.txt +++ b/npc/cities/einbroch.txt @@ -3,7 +3,7 @@ //===== By: ================================================== //= Nexon //===== Current Version: ===================================== -//= 0.9 +//= 1.0 //===== Compatible With: ===================================== //= eAthena Revision 3000+ //===== Description: ========================================= @@ -21,6 +21,7 @@ //= 0.8 Implemented the Shinokas quest, thanks to [MasterOfMuppets] //= Dj-Yhn for scripting it. //= 0.9 Removed Duplicates [Silent] +//= 1.0 Implemented the Lover's quest. [MasterOfMuppets] //============================================================ @@ -2500,6 +2501,12 @@ OnTouch: } ein_in01.gat,31,151,4 script Satra 850,{ + if(EIN_LOVERQ > 11)goto s_Intimi; + if(EIN_LOVERQ == 11)goto s_Coal4; + if(EIN_LOVERQ == 10)goto s_Coal3; + if(EIN_LOVERQ == 9)goto s_Coal2; + if(EIN_LOVERQ == 8)goto s_Coal1; + if(EIN_LOVERQ == 7)goto s_Advent; mes "[Satra]"; mes "A wandering"; mes "adventurer...?"; @@ -2521,9 +2528,411 @@ ein_in01.gat,31,151,4 script Satra 850,{ mes "than welcome to enjoy the"; mes "furnishings. Ho ho ho ho~"; close; + +s_Advent: + mes "[Satra]"; + mes "A wandering adventurer...?"; + mes "How ravishingly delightful!"; + mes "You must have risked life and"; + mes "limb to sneak past my husband"; + mes "to enjoy the captivating sights"; + mes "of my home. Ho ho ho ho~"; + next; + mes "[Satra]"; + mes "Since you're a very"; + mes "unique quest, I shall"; + mes "give you a unique honor"; + mes "and deign to converse"; + mes "with you, adventurer."; + next; + mes "[Satra]"; + mes "Einbech exists to provide"; + mes "my family with coal and"; + mes "materials from their mines."; + mes "It's a natural law: workers"; + mes "must be led by a chosen few."; + next; + mes "[Satra]"; + mes "It's delightfully"; + mes "ludicrous to see those"; + mes "workers aspire to reach"; + mes "our heights of social"; + mes "prestige. Ho ho ho ho~"; + next; + mes "[Satra]"; + mes "Oh, I haven't spoken to"; + mes "someone from a lower"; + mes "class in ages! It feels"; + mes "so forbiddenly exciting!"; + next; + mes "[Satra]"; + mes "Well adventurer, that's"; + mes "the end of our informal"; + mes "chat. I'll even grant you"; + mes "full permission to boast"; + mes "of the fact that you've"; + mes "spoken to Lady Satra."; + next; + mes "[Satra]"; + mes "If you wish for"; + mes "me to share words with"; + mes "you once more, prove to"; + mes "me that you're worthier"; + mes "than the other peons of"; + mes "my graceful presence."; + next; +s_Coal1: + mes "[Satra]"; + mes "Oh, I have a marvelous"; + mes "idea! Why don't you bring"; + mes "me ^9C0000Coals^000000? It's not impossible"; + mes "for someone like yourself, but"; + mes "this kind of task will require"; + mes "some effort on your part."; + next; + if(EIN_LOVERQ == 8 && countitem(1003) > 9)goto s_GotCoal1; + mes "[Satra]"; + mes "Tah tah,"; + mes "adventurer~"; + if(EIN_LOVERQ == 7)set EIN_LOVERQ,8; + close; + +s_GotCoal1: + mes "[Satra]"; + mes "My, you've already"; + mes "brought the Coal?"; + mes "How charmingly"; + mes "prompt you are~"; + next; + mes "[Satra]"; + mes "On behalf of the"; + mes "Kappellthaine family,"; + mes "I shall ignore your lowly"; + mes "status and graciously"; + mes "accept your small gift."; + mes "Ho ho ho~"; + next; + mes "[Satra]"; + mes "Do you hail from"; + mes "Einbech, adventurer?"; + mes "Ah, the Rune-Midgarts"; + mes "kingdom! I've visited your"; + mes "country. It's quite quaint"; + mes "and Jawaii is very lovely."; + next; + mes "[Satra]"; + mes "Well, I shall try to"; + mes "find some use for these."; + mes "I'm afraid the gift I've asked"; + mes "from you isn't very practical."; + mes "How is coal usually used?"; + mes "Ah, I have a novel idea!"; + next; + mes "[Satra]"; + mes "Wouldn't it be"; + mes "intoxicatingly wild if"; + mes "Megass were to hold one"; + mes "of those social functions that"; + mes "the lower classes are so fond"; + mes "of? A 'barbeque', yes?"; + next; + mes "[Satra]"; + mes "In any case, If you"; + mes "bring me more of that"; + mes "Coal, you would be even"; + mes "more favored by me and"; + mes "you'll become a recipient"; + mes "of my good graces. Ho ho~"; + set EIN_LOVERQ,9; + delitem 1003,10; + close; + +s_Coal2: + mes "[Satra]"; + mes "^111111*Titter~*^000000"; + mes "Why, if it isn't my"; + mes "intrepid adventurer."; + mes "Ho ho ho ho~"; + next; + if(countitem(1003) > 9)goto s_GotCoal2; + mes "[Satra]"; + mes "My apologies, but you"; + mes "must first prove to me"; + mes "that you are worthy of"; + mes "conversation. Why don't"; + mes "you deliver more of those"; + mes "^9C0000Coals^000000, mmm?"; + next; + mes "[Satra]"; + mes "After all, I have no other"; + mes "means of knowing whether"; + mes "or not you appreciate the time"; + mes "I sacrifice by socializing with"; + mes "someone of your status."; + mes "Ho ho ho ho~"; + close; + +s_GotCoal2: + mes "[Satra]"; + mes "My word!"; + mes "Why are you carrying"; + mes "all of that dirty Coal"; + mes "with you? You poor,"; + mes "impoverished thing."; + next; + mes "[Satra]"; + mes "Oh! Dear me,"; + mes "I've nearly forgotten~"; + mes "How divinely silly of me!"; + mes "Once again, I graciously"; + mes "accept your small gift on"; + mes "behalf of the Kappelthaines."; + next; + mes "[Satra]"; + mes "Let me share a little"; + mes "bit of history concerning"; + mes "our lovely Einbroch. At one"; + mes "time, there was only Einbech,"; + mes "the mining village. You can"; + mes "imagine how long ago that was."; + next; + mes "[Satra]"; + mes "However, the minerals"; + mes "and ores mined in Einbech"; + mes "need to be processed and"; + mes "refined in factories that were"; + mes "all built in a nearby industrial"; + mes "comple which became Einbroch."; + next; + mes "[Satra]"; + mes "Now every citizen in"; + mes "Einbroch is wealthy and"; + mes "it's well known that there"; + mes "is a higher standard of"; + mes "living here than in Einbech."; + next; + mes "[Satra]"; + mes "Goodness, I believe"; + mes "it's time for a spot of tea~"; + mes "The next time you wish to have"; + mes "an audience with me, it would"; + mes "behoove you to bring another"; + mes "gift of Coal. Toodles~"; + set EIN_LOVERQ,10; + delitem 1003,10; + close; + +s_Coal3: + mes "[Satra]"; + mes "Why hello~"; + mes "Your visits have"; + mes "recently been quite"; + mes "delightful, fair adventurer."; + next; + mes "[Satra]"; + mes "Oh, my apologies!"; + mes "I supposed you're just"; + mes "here for sight seeing,"; + mes "or perhaps you're running"; + mes "some sort of adventurer's"; + mes "errand. Am I right?"; + next; + if(countitem(1003) > 9)goto s_GotCoal3; + mes "[Satra]"; + mes "I know you well enough"; + mes "to know that you wouldn't"; + mes "be so rude as to stop by"; + mes "and chat without bringing"; + mes "any ^9C0000Coal^000000. Ho ho ho ho~"; + close; + +s_GotCoal3: + mes "[Satra]"; + mes "Continue to show"; + mes "your appreciation"; + mes "and dedication to me"; + mes "and you'll soon be known"; + mes "to be my most favored"; + mes "commoner. Ho ho ho ho~"; + next; + mes "[Satra]"; + mes "I'm sure you've noticed"; + mes "the strained relationship"; + mes "between Einbroch and Einbech"; + mes "by now. It's a shame, really."; + next; + mes "[Satra]"; + mes "As Einbroch grew wealthier"; + mes "and Einbech became more"; + mes "destitude, the affluent began"; + mes "despising the impoverished."; + mes "I supposed it follows that the"; + mes "poor started to resent the rich."; + next; + mes "[Satra]"; + mes "It might be said that"; + mes "both towns have been"; + mes "trying to take advantage"; + mes "of each other, but it's"; + mes "clear that Einbroch has"; + mes "always had the upper hand."; + next; + mes "[Satra]"; + mes "In fact, because of"; + mes "this rift between our"; + mes "cities, our families are"; + mes "taught not to associate"; + mes "with the people of Einbech."; + next; + mes "[Satra]"; + mes "Now, I believe that most"; + mes "people who live in Einbech"; + mes "are peons, but that does not"; + mes "mean I will not give them a"; + mes "chance to prove their worth."; + next; + mes "[Satra]"; + mes "Why should I deprive"; + mes "the lowly of my gracious"; + mes "presence if they prove"; + mes "themselves meritable?"; + mes "Ho ho ho ho~"; + next; + mes "[Satra]"; + mes "Oh, that was scrumptious!"; + mes "If you wish to pay me another"; + mes "visit, don't forget to bring some"; + mes "Coal with you. Tah tah~"; + set EIN_LOVERQ,11; + delitem 1003,10; + close; + +s_Coal4: + mes "[Satra]"; + mes "Ho ho ho ho~"; + mes "Welcome adventurer,"; + mes "I so enjoy our little chats."; + mes "Hors d'oeuvre?"; + next; + if(countitem(1003) > 9)goto s_GotCoal4; + mes "[Satra]"; + mes "Ah..."; + mes "It seems you've"; + mes "forgotten your ^9C0000Coals^000000."; + mes "A silly mistake, but one"; + mes "I'm willing to overlook."; + close; + +s_GotCoal4: + mes "[Satra]"; + mes "Oh! You can't enjoy"; + mes "any food in that state!"; + mes "Your hands are atrociously"; + mes "grimy! May I ask why?"; + next; + mes "[Satra]"; + mes "Ah~"; + mes "In my excitement,"; + mes "I nearly forgot that"; + mes "I asked you to bring"; + mes "Coals to me again!"; + mes "My apologies~"; + next; + mes "[Satra]"; + mes "You've brought so much Coal"; + mes "to me, I'm convinced that you're"; + mes "much more diligent than those"; + mes "languid peasants in Einbech."; + mes "I appreciate that you've labored"; + mes "so much to win my favor."; + next; + mes "[Satra]"; + mes "Hm, what was that?"; + mes "someone else provided"; + mes "these Coals and you were"; + mes "only delivering them? Then"; + mes "who actually gathered these?"; + next; + input @str$; + if(@str$ != "Clitzer")goto s_WrongName; + mes "[Satra]"; + mes "Ah, Clitzer?"; + mes "I must say, that's"; + mes "a very humble name."; + mes "Yet it's so familiar..."; + next; + mes "[Satra]"; + mes "Ah, I recall there"; + mes "was a hooligan that"; + mes "has been pestering my"; + mes "daughter named Clitzer."; + mes "Perhaps they are one"; + mes "and the same. Hmm..."; + next; + mes "[Satra]"; + mes "I remember that he was"; + mes "rather shabby looking and"; + mes "lacked any semblance of"; + mes "etiquette whatsoever. Clearly,"; + mes "he is a fool and a coward, but"; + mes "now I see that he is sincere."; + next; + mes "[Satra]"; + mes "It might not be possible"; + mes "to let him go otu with my"; + mes "daughter straight away, but"; + mes "I will invite him for a spot of"; + mes "tea. And if Calla likes him,"; + mes "well, he must be special."; + next; + mes "[Satra]"; + mes "For a humble peasant,"; + mes "this must be like a dream"; + mes "come true! And to have tea"; + mes "with Clitzer. Oh, what would"; + mes "the girls say? Ah, but I did"; + mes "marry that oafish Megass~"; + next; + mes "[Satra]"; + mes "Anyway, when you next"; + mes "meet Clitzer, please tell"; + mes "him to pay me a visit soon."; + mes "Oh, and remind him to dress"; + mes "appropriately for this special"; + mes "occasion. Ho ho ho ho ho~"; + set EIN_LOVERQ,12; + close; + +s_WrongName: + mes "[Satra]"; + mes "I beg your pardon?"; + mes "" + @str$ + "? Oh my..."; + mes "I believe I may have"; + mes "misheard you. Ho ho ho ho~"; + close; + +s_Intimi: + mes "[Satra]"; + mes "I understand that my"; + mes "home is extravagantly"; + mes "splendid and to approach"; + mes "any Kappelthaine is an"; + mes "honor t most commoners."; + next; + mes "[Satra]"; + mes "However, Clitzer"; + mes "has no reason to feel so"; + mes "intimidated. Tell the poor"; + mes "boy that he's earned the"; + mes "honor of speaking with me."; + close; + } ein_in01.gat,31,138,4 script Calla 90,{ + if(EIN_LOVERQ > 4 && EIN_LOVERQ < 14)goto s_NoSwitch; + if(EIN_LOVERQ > 1)goto s_Switches; +s_NoSwitch: mes "[Calla]"; mes "Hello adventurer."; mes "Our city must just be"; @@ -2546,7 +2955,217 @@ ein_in01.gat,31,138,4 script Calla 90,{ mes "heart's true desire?"; mes "What I would give to"; mes "be able to do that..."; + if(!EIN_LOVERQ)set EIN_LOVERQ,1; close; + +s_Switches: + switch(EIN_LOVERQ) + { + + case 2: + mes "[Calla]"; + mes "You're the adventurer"; + mes "from before, aren't you?"; + mes "Sadly, there isn't much"; + mes "to do around here. This"; + mes "place is basically like"; + mes "a prison to me..."; + next; + mes "[Calla]"; + mes "Oh, you've met Clitzer?"; + mes "Isn't he so kind, such"; + mes "a perfect gentleman?"; + next; + mes "[Calla]"; + mes "I really wish I could"; + mes "see him, but it's almost"; + mes "impossible. My parents think"; + mes "he's not good enough for me,"; + mes "but they're wrong! What am"; + mes "I going to do? Oh, Clitzer..."; + next; + mes "[Calla]"; + mes "Well, maybe I can't see"; + mes "him, but would you give"; + mes "my violin to Clitzer for me?"; + mes "I used to play this for him"; + mes "all the time..."; + next; + mes "[Calla]"; + mes "I'm sorry to trouble you,"; + mes "but please understand"; + mes "that I want to comfort my"; + mes "Clitzer in any way that"; + mes "I possibly can. Thank"; + mes "you so much, adventurer..."; + set EIN_LOVERQ,3; + getitem 1901,1; + close; + break; + + case 3: + s_Regards: + mes "[Calla]"; + mes "Oh, please send my"; + mes "regards to Clitzer for me."; + mes "I wish I could comnfort"; + mes "him in person, but this"; + mes "is the best I can do for now."; + close; + break; + + case 4: + if(!countitem(712))goto s_Regards; + mes "[Calla]"; + mes "You've spoken"; + mes "with Clitzer? How"; + mes "is he? What did he say?"; + next; + mes "[Calla]"; + mes "Oh...?"; + mes "He asked you to"; + mes "deliver this flower"; + mes "to me? How sweet~"; + mes "Thank you very much,"; + mes "kind adventurer~"; + next; + mes "[Calla]"; + mes "Ah, I'm so rude!"; + mes "I've been calling you"; + mes "^111111*adventurer*^000000 this whole"; + mes "time you've been helping"; + mes "me! Would you please"; + mes "tell me your name?"; + next; + input @str$; + if(@str$ != strcharinfo(0))goto s_WrongName; + mes "[Calla]"; + mes "Ah, " + strcharinfo(0) + "!"; + mes "Such a lovely name~"; + mes "I promise that I won't ever"; + mes "forget it. Oh, and if you pass by"; + mes "Einbech, would you thank Clitzer"; + mes "for the flower for me please?"; + next; + mes "[Calla]"; + mes "A-and... And..."; + mes "Please tell him that"; + mes "I really miss him a lot."; + mes "^565656*Sob Sob...*"; + delitem 712,1; + set EIN_LOVERQ,5; + close; + break; + + case 14: + mes "[Calla]"; + mes "I just heard from my mother"; + mes "that she's planning to have"; + mes "tea with Clitzer! I'm sure that"; + mes "I have you to thank for this~"; + next; + mes "[Calla]"; + mes "I never dreamed that"; + mes "something as wonderful"; + mes "as this could happen."; + mes "I'm so happy, I could cry..."; + mes "I'll always be grateful"; + mes "for what you've done."; + next; + mes "[Calla]"; + mes "I feel like such a fool,"; + mes "thinking it was all hopeless."; + mes "I'll be doing my best to have"; + mes "my parents accept Clitzer and"; + mes "someday we'll be married~"; + next; + mes "[Calla]"; + mes "There isn't much that I can"; + mes "give you, but I can show you"; + mes "one of my family's secrets."; + mes "It's an invigorating massage"; + mes "technique that makes you alot"; + mes "healthier in only ten seconds."; + next; + mes "[Calla]"; + mes "Well, please take"; + mes "off your equipment"; + mes "and stand still while"; + mes "I give the massage. It"; + mes "might hurt a bit at first..."; + nude; + next; + mes "^3151FF*Rub Rub Rub*"; + mes "*Knead Knead Knead*"; + mes "*Crrack C-c-c--c-crack*"; + mes "*Crack Crack Crrrrrack*"; + mes "*Rub Crrraaaaaaaaaackk*^000000"; + next; + mes "[" + strcharinfo(0) + "]"; + mes "Ooooooooh..."; + mes "I feel sooo"; + mes "sore and yet"; + mes "soooooo good."; + mes "Wait. Now I just"; + mes "feel goooood~"; + if(BaseLevel < 41)set BaseExp,BaseExp+3712; + else if(BaseLevel > 40 && BaseLevel < 61)set BaseExp,BaseExp+7425; + else if(BaseLevel > 60 && BaseLevel < 71)set BaseExp,BaseExp+14850; + else if(BaseLevel > 70 && BaseLevel < 81)set BaseExp,BaseExp+29700; + else if(BaseLevel > 80 && BaseLevel < 91)set BaseExp,BaseExp+59400; + else if(BaseLevel > 90)set BaseExp,BaseExp+118800; + set EIN_LOVERQ,15; + next; + mes "[Calla]"; + mes "So how was it?"; + mes "I hope it was refreshing."; + mes "Please understand that"; + mes "it's the best thing I can"; + mes "give you to show my gratitude."; + next; + mes "[Calla]"; + mes "Once again,"; + mes "thank you so"; + mes "much, " + strcharinfo(0) + "."; + mes "I'll always pray for"; + mes "your safety on your"; + mes "your adventures~"; + close; + break; + + case 15: + mes "[Calla]"; + mes "Thank you so much!"; + mes "I'll try my best to convince"; + mes "my parents to accept our"; + mes "relationship. It'll be hard,"; + mes "but it's a good first step~"; + next; + mes "[Calla]"; + mes "I hope that we can all"; + mes "work together ti improve"; + mes "relations between Einbech"; + mes "and Einbroch. The hatred"; + mes "between our towns must end..."; + next; + mes "[Calla]"; + mes "I really appreciate"; + mes "what you've done for"; + mes "all of use. I'll be praying"; + mes "for your safety, adventurer."; + close; + break; + + } + +s_WrongName: + mes "[Calla]"; + mes "I'm sorry..."; + mes "I didn't catch that."; + mes "would you please tell"; + mes "me your name again?"; + close; + } ein_in01.gat,32,133,6 script Maid 850,{ -- cgit v1.2.3-70-g09d2