diff options
Diffstat (limited to 'npc/custom/events/valentinesdayexp.txt')
| -rw-r--r-- | npc/custom/events/valentinesdayexp.txt | 283 |
1 files changed, 0 insertions, 283 deletions
diff --git a/npc/custom/events/valentinesdayexp.txt b/npc/custom/events/valentinesdayexp.txt deleted file mode 100644 index 4ed24012d..000000000 --- a/npc/custom/events/valentinesdayexp.txt +++ /dev/null @@ -1,283 +0,0 @@ -//===== Hercules Script ====================================== -//= Valentine Event Script + EXP bonus -//===== By: ================================================== -//= Lupus (based on Muad_Dib's work) -//===== Current Version: ===================================== -//= 1.1 -//===== Description: ========================================= -// Close to other official stValentine event (added white chocolate) -// Custom: Handmade choco gives some EXP bonuses to married people -//===== Additional Comments: ================================= -//= WARNING!! To use this event, disable original valentinesday.txt -//= You can use this event from 12 till 16 February 8) [Lupus] -//= 1.1 Removed Duplicates [Silent] -//============================================================ - -// Tine - Valentine Event Chocolate Even Guide ------------------ -prontera,156,172,4 script Tine 1_M_MERCHANT,{ -// Debug info for item effects and tricky conditions 8) -// mes "@dsv: "+@dsv; -// mes "ispartneron()=="+ispartneron(); -// mes "sex == "+Sex; -// if(@dsv == gettime(3)+1) mes "@dsv == gettime(3)+1"; - - mes "[Tine]"; - mes "The legend says that on 14th February... on the Day of Saint Valentine..."; - mes "Only in Run-Midgard kingdom..."; - next; - specialeffect 417; - mes "[Tine]"; - mes "Some married chocolate lovers almost double their experience at trainings!"; - mes "But everything isn't so simply..."; - next; - menu "Wow! Tell me more!",M_INFO,"Marri... what?",-; - - mes "[Tine]"; - mes "Are you a single?"; - mes "Today is a great date to ask your beloved half for marriage!"; - next; - mes "[Tine]"; - mes "The Marriage fee is ridiculous low these days!"; - close; - -M_INFO: - mes "[Tine]"; - mes "The magic effect posesses only handmade chocolate from grand-grand-grand-whoever recipes!"; - next; - mes "[Tine]"; - mes "It being known that Black Handmade Chocolate works on married guys... And the White one on the married girls!"; - mes "If you lose your wedding ring... then alas, it won't work on you."; - next; - mes "[Tine]"; - mes "On having a Chocolate, you should put off your ring then... put it back... And if your partner is online, then magc would last till the next hour!"; - next; - mes "[Tine]"; - mes "Rumors bark that guys and gals have +50% EXP bonuses on FIVE different races of the monsters... Exluding bloody bosses, of course."; - next; - mes "[Tine]"; - mes "There's a fameous confectioner in the Castle of Prontera! He's the one you need."; - close; - -OnInit: - //559,Hand-made_Chocolate - setitemscript 559,"{ itemheal 50,50; if(Sex==0 || @dsv == gettime(3)+1 || ispartneron()==0)end; set @dsv,gettime(3)+1; misceffect 113; }"; - //560,Hand-made_White_Chocolate - setitemscript 560,"{ itemheal 50,50; if(Sex || @dsv == gettime(3)+1 || ispartneron()==0)end; set @dsv,gettime(3)+1; misceffect 113; }"; - - //2634,Wedding_Ring_M,Wedding Ring,5,,10,0,,0,,0,127918079,7,1,136,,0,0,0,{ skill 334,1; skill 335,1; skill 336,1; } - setitemscript 2634,"{ skill 334,1; skill 335,1; skill 336,1; if(@dsv == gettime(3)+1 && ispartneron()){ bonus2 bExpAddRace,5,50; bonus2 bExpAddRace,6,50; bonus2 bExpAddRace,7,50; bonus2 bExpAddRace,8,50; bonus2 bExpAddRace,1,50; } }"; - //2635,Wedding_Ring_F,Wedding Ring,5,,10,0,,0,,0,127918079,7,0,136,,0,0,0,{ skill 334,1; skill 335,1; skill 336,1; } - setitemscript 2635,"{ skill 334,1; skill 335,1; skill 336,1; if(@dsv == gettime(3)+1 && ispartneron()){ bonus2 bExpAddRace,0,50; bonus2 bExpAddRace,9,50; bonus2 bExpAddRace,2,50; bonus2 bExpAddRace,3,50; bonus2 bExpAddRace,4,50; } }"; - end; -} - -// Stephen - Valentine Event Chocolate seller ------------------ -alberta,26,243,4 script Stephen#val1 1_M_MERCHANT,{ - mes "[Stephen]"; - mes "Guess what I've got?"; - mes "A tasty treat not easily found in Rune-Midgard...."; - next; - mes "[Stephen]"; - mes "Chocolate!"; - mes "That's right, don't you love chocolate.... I do."; - mes "And you are in luck, because I'm selling them for only 5,000 zeny a piece!"; - next; - menu "I want some chocolate!",M_CHOCO,"No thanks.",-; - - mes "[Stephen]"; - mes "You don't want any chocolate?"; - mes "I'm telling you! You'll regret it!"; - mes "You better get some now... you won't come across Chocolate like this ever again!"; - mes "Think it over and visit me again sometime."; - close; - -M_CHOCO: - mes "[Stephen]"; - mes "Hah!"; - mes "I knew it!"; - mes "But I can't sell you more then 5 at once....but, if you really need more...."; - mes "you can come back again."; - mes "So how many do you want?"; - next; - set @needmon,0; - input @flag_num; - if (@flag_num <= 0) goto L_NONE; - if (@flag_num > 5) goto L_ERR; - set @needmon,@flag_num*5000; - if (Zeny < @needmon) goto L_NOTENO; - Zeny -= @needmon; - getitem 558,@flag_num; - mes "[Stephen]"; - mes "There you go!"; - mes "You can give that to someone as a gift, or enjoy it yourself!"; - mes "Mmm....sweet chocolate..."; - mes "Visit me anytime...!"; - close; - -L_ERR: - mes "[Stephen]"; - mes "I'm sorry but I can't give you that many."; -L_NONE: - close; - -L_NOTENO: - mes "[Stephen]"; - mes "I'm sorry but it seems you can't afford to buy these of me."; - close; -} - -// Jainie -- Gives information about Valentine Event ------------------------ -alberta,29,243,4 script Jainie#val1 1_M_INNKEEPER,{ - mes "[Jainie]"; - mes "You know what? The chocolate that my boyfriend sells are from me!"; - mes "I made them by myself. Now I need some Milk for my special White Chocolate."; - next; - mes "[Jainie]"; - mes "You know ... In cetain countries, there's a tradition of presenting chocolates to a person that you love..."; - mes "They call it ^3355FFValentine's Day^000000."; - next; - mes "[Jainie]"; - mes "So I gave him my delicious chocolate..."; - mes "And then he made me cook a lot more..."; - mes "And now he is selling them to everyone."; - mes "I guess he really enjoyed it."; - mes "But, I do feel good when people buy something I have made."; - next; - mes "[Jainie]"; - mes "It would be great if you bought some too..."; - mes "I will be making white chocolates for a while so..."; - next; - menu "I want some white chocolate!",M_CHOCO,"No thanks.",-; - - mes "[Jainie]"; - mes "You don't like white chocolate?"; - mes "Then buy some Stephen's black one!"; - close; - -M_CHOCO: - mes "[Jainie]"; - mes "I can't sell you more then 5 at once....but, if you really need more...."; - mes "you can come back again."; - mes "So how many do you want? 1 portion is 4500z + 1 Milk."; - next; - set @needmon,0; - input @flag_num; - if (@flag_num == 0) goto L_NONE; - if (@flag_num > 5) goto L_ERR; - set @needmon,@flag_num*4500; - if (Zeny < @needmon) goto L_NOTENO; - if (countitem(519) < @flag_num) goto L_NOMILK; - Zeny -= @needmon; - delitem 519,@flag_num; - getitem 561,@flag_num; - mes "[Jainie]"; - mes "There you go!"; - mes "You can give that to someone as a gift, or enjoy it yourself!"; - mes "Mmm... sweet chocolate..."; - mes "Visit me anytime...!"; - close; - -L_ERR: - mes "[Jainie]"; - mes "I'm sorry but I can't give you that many."; -L_NONE: - close; - -L_NOTENO: - mes "[Jainie]"; - mes "I'm sorry but it seems you can't afford to buy these of me."; - close; - -L_NOMILK: - mes "[Jainie]"; - mes "You need "+@flag_num+" Milk for "+@flag_num+" portions of my special White Chocolate..."; - close; -} - -// Carl Orleans -- Valentine Event Chocolate maker ------------------ -prt_castle,54,34,4 script Carl Orleans#val1 1_M_01,{ - mes "[Carl Orleans]"; - mes "Yes? What can I cook for you?"; - next; - menu "Black handmade Chocolate, please",-,"I want a White handmade Chocolate...",M_WHITE,"I'm lost, sorry to bother you.",M_End; - - mes "[Carl Orleans]"; - mes "Well, I just might be able to fulfill your needs..."; - next; - if (countitem(558)<3) { - mes "[Carl Orleans]"; - mes "I'm sorry you do not have enough Chocolate Bars to do this."; - if(rand(2))mes "They say Stephen from Alberta used to sell good Chocolate."; - close; - } - delitem 558,3; - mes "[Carl Orleans]"; - mes "You got 3 pieces of pure chocolate I see."; - mes "Give them to me..."; - next; - mes "[Carl Orleans]"; - mes "Ok, now I will only create my special handmade chocolates if you promise to use it wisely."; - next; - mes "[Carl Orleans]"; - mes "....Hmmmmmm....."; - mes "Well..."; - next; - getitem 559,1; - mes "[Carl Orleans]"; - mes "Here."; - if(rand(2))close; - mes "I hope you give it to someone special, because its a special chocolate."; - mes "As you know... only I can create this."; - next; - mes "[Carl Orleans]"; - mes "Enjoy."; - close; - -M_WHITE: - mes "[Carl Orleans]"; - mes "Well, I just might be able to fulfill your needs..."; - next; - if (countitem(561)<3) { - mes "[Carl Orleans]"; - mes "I'm sorry you do not have enough White Chocolate Bars to do this."; - if(rand(2))mes "They say Jainie from Alberta used to sell good White Chocolate."; - close; - } - delitem 561,3; - mes "[Carl Orleans]"; - mes "You got 3 pieces of pure white chocolate I see."; - mes "Give them to me..."; - next; - mes "[Carl Orleans]"; - mes "Ok, now I will only create my special handmade chocolates if you promise to use it wisely."; - next; - mes "[Carl Orleans]"; - mes "....Hmmmmmm....."; - mes "Well..."; - next; - getitem 560,1; - mes "[Carl Orleans]"; - mes "Here."; - if(rand(2))close; - mes "I hope you give it to someone special, because its a special chocolate."; - mes "As you know... only I can create this."; - next; - mes "[Carl Orleans]"; - mes "Enjoy."; - close; - -M_End: - mes "[Carl Orleans]"; - mes "Oh.. well, if you want me to make some of my special handmade Chocolate...."; - mes "You will need to give me at least ^0000FF 3 Chocolates^000000 or ^0000FF 3 White Chocolates^000000."; - if(rand(2))close; - next; - mes "[Carl Orleans]"; - mes "That's right, only ^0000FF 3 Chocolates^000000 or ^0000FF 3 White Chocolates^000000."; - mes "Bring them to me and you'll get what you came for."; - if(rand(2))close; - next; - mes "[Carl Orleans]"; - mes "See You."; - close; -} |