diff options
Diffstat (limited to 'npc')
| -rw-r--r-- | npc/scripts.conf | 3 | ||||
| -rw-r--r-- | npc/xmas/2009/event.txt | 131 |
2 files changed, 134 insertions, 0 deletions
diff --git a/npc/scripts.conf b/npc/scripts.conf index b26a889c..06b7c1d7 100644 --- a/npc/scripts.conf +++ b/npc/scripts.conf @@ -63,3 +63,6 @@ import: npc/_import.txt // Halloween 2009 // npc: npc/halloween/2009/Candyman.txt + +// Christmas 2009 +// npc: npc/xmas/2009/event.txt diff --git a/npc/xmas/2009/event.txt b/npc/xmas/2009/event.txt new file mode 100644 index 00000000..4e78b38a --- /dev/null +++ b/npc/xmas/2009/event.txt @@ -0,0 +1,131 @@ +020-1.gat,78,85,0 script Santa 105,{ + if (QUEST_Christmas09_state > 0) goto L_Finished; + + set @cond, 0; + if (countitem(1234) > 0) set @cond, @cond + 1; + if (countitem(1235) > 0) set @cond, @cond + 1; + if (countitem(1236) > 0) set @cond, @cond + 1; + if (countitem(1237) > 0) set @cond, @cond + 1; + if (countitem(1238) > 0) set @cond, @cond + 1; + if (countitem(1239) > 0) set @cond, @cond + 1; + + if (@cond == 6) goto L_Give; + + if ((strcharinfo(0) == "xxDimondXX")) goto L_LUMP_OF_COAL; + if (SANTA == 0 && BaseLevel <= 30) goto L_SANTA_TOO_YOUNG; + +L_SANTA_Start: + if (Sex) + set @honorific$, "Young Hero"; + if (!Sex) + set @honorific$, "Young Heroine"; + + mes "[Santa Claus]"; + mes "\"ho-hum ho-hum ho-hum, I'm sorry, " + @honorific$ + " Not really in the Christmas spirit."; + mes "That Evil Jack Frost has stolen all the Christmas ornaments!"; + mes "He will never get off the Naughty List!"; + mes "How can we have Christmas without a proper Christmas tree?\""; + mes "\"The Elves are too depressed to work"; + mes "Christmas will be ruined!\""; + next; + menu + "Christmas is all about money anyway!, Bah-Humbug!.", L_SANTA_DISAPPOINTED, + "There must be something that can be done!", L_SANTA_DESCRIBE_QUEST; + close; + + + +L_Message: + mes "[Santa Claus]"; + mes "\"Say, Why don't you help me?"; + mes "In fact, You are just the " + @honorific$ + " I am looking for!\""; + mes "\"What do you say, will you help save Christmas?\""; + next; + menu + "No way, you should have had elves guarding the tree!.", L_SANTA_DISAPPOINTED, + "Of course I will help save Christmas", L_SANTA_DESCRIBE_QUEST; + close; + +L_SANTA_DESCRIBE_QUEST: + mes "[Santa Claus]"; + mes "\"Jack Frost hid the ornaments with monsters all over the world.\""; + mes "\"When you recover 6 different kinds of ornaments I will"; + mes "give you some special gifts!\""; + if (@cond > 0) mes "You already have found "+@cond+" different ornaments!"; + close; + +L_Give: + getinventorylist; + set @freeslots, 100 - @inventorylist_count; + if (countitem(1234) <= 1) set @freeslots, @freeslots + 1; + if (countitem(1235) <= 1) set @freeslots, @freeslots + 1; + if (countitem(1236) <= 1) set @freeslots, @freeslots + 1; + if (countitem(1237) <= 1) set @freeslots, @freeslots + 1; + if (countitem(1238) <= 1) set @freeslots, @freeslots + 1; + if (countitem(1239) <= 1) set @freeslots, @freeslots + 1; + if (@freeslots < 3) goto L_NoRoom; + delitem 1234, 1; + delitem 1235, 1; + delitem 1236, 1; + delitem 1237, 1; + delitem 1238, 1; + delitem 1239, 1; + mes "[Santa Claus]"; + mes "\"I knew I could count on you!:"; + mes "Please accept these small gifts:"; + mes "The official Christmas 2009 headgear!"; + mes "And a little something from the elves to say Thank You!"; + mes "Ho Ho Ho Merry Christmas!\""; + getitem 1242, 1; + setarray @snowglob$, "SantaSnowGlobe", "SnowmanSnowGlobe"; + getitem @snowglob$[rand(getarraysize(@snowglob$))], 1; + setarray @oldstock$, "SantaBeardHat", "ChristmasTreeHat", "Goggles", "LeatherGoggles", "AntlerHat"; + getitem @oldstock$[rand(getarraysize(@oldstock$))], 1; + mes ""; + mes "[You received 20,000 experience points!]"; + mes "[You received 20,000 gold!]"; + getexp 20000, 0; + set zeny, zeny + 20000; + set QUEST_Christmas09_state, 1; + close; + +L_NoRoom: + mes "[Santa Claus]"; + mes ""; + mes "\"Oh dear, it seem you don't have enough space for everything. If you can make space for"; + mes "a few more things, I'll have some goodies for you...\""; + close; + +L_Finished: + mes "[Santa Claus]"; + mes "\"You already completed the quest."; + mes "But maybe you are feeling the Christmas Spirit,"; + mes "And would like to help others complete it too?\""; + close; + +L_LUMP_OF_COAL: + mes "[Santa Claus]"; + mes "\"Hi "+strcharinfo(0)+",You are on the Naughty list."; + mes "Maybe you teased developers too much in IRC?,"; + mes "Maybe at the quests end you will only get a lump of coal?\""; + close; + next; + menu + "No way I'm doing this quest for a lump of coal!", close, + "I Dimond D. Stone promise to be nice in IRC.", L_SANTA_DESCRIBE_QUEST; + close; + +L_SANTA_TOO_YOUNG: + mes "[Santa Claus]"; + mes "\"You are just too young for such a heroic quest, off with you now...\""; + close; + +L_SANTA_DISAPPOINTED: + mes "[Santa Claus]"; + mes "\"Too bad, " + @honorific$ + " , you've been on the NICE LIST since you were 3.\""; + close; + +} + + + |