viewing paste Unknown #15957 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86
prontera,160,178,3      script  Kris Kringle    714,{
        mes "[Kris Kringle]";
        mes " ";
        mes "Do you know what Christmas is all about?";
        select("^0000ff~^000000 Sharing, Caring and Love?");
        next;
        mes "[Kris Kringle]";
        mes " ";
        mes "No Silly! It's all about the gifts!";
        select("^0000ff~^000000 Oh.....");
        next;
        mes "[Kris Kringle]";
        mes " ";
        mes "And speaking of gifts, I'm handling the Exchange Gift Program for all Woonies! To participate, you have to give me a Wrapped Gift and you'll get one in return. The exciting part is finding out what the gift you'll get contains!";
        next;
        switch(select("^0000ff~^000000 Exchange Gift","^0000ff~^000000 Wrap Gift")) {
                case 1:
                        if (countitem(12355) >= 1) {
                                mes "[Kris Kringle]";
                                mes " ";
                                mes "Here's a gift in Return. Pray you won't get socks!";
                                next;
                                delitem 12355,1; //Wrapped Gift
                                getitem 12256,1; //Christmas Gift
                                mes "[Kris Kringle]";
                                mes " ";
                                mes "Have A Woonie Christmas :3";
                                close;
                        } else {
                                mes "[Kris Kringle]";
                                mes " ";
                                mes "Heyyy,";
                                mes "You're not getting a gift unless you give one too";
                                mes "~ ^0000ffWrap Gift^000000";
                                next;
                                mes "[Kris Kringle]";
                                mes " ";
                                mes "Dont be greedy and make sure you got a gift to give back Next Time.";
                                close;
                        }
 
                case 2:
                        mes "[Kris Kringle]";
                        mes " ";
                        mes "Hmmm, No gift yet huh? I'll wrap one up for you...  I just need a few Materials to make it for you!";
                        next;
                        mes "[Kris Kringle]";
                        mes " ";
                        mes "I'll need these Materials:";
                        mes " ";
                        mes "^0000ff~^000000 (6) ^0000ffGift Box^000000";
                        mes "^0000ff~^000000 (6) ^0000ffWrapping Paper^000000";
                        mes "^0000ff~^000000 (6) ^0000ffWrapping Lace^000000";
                        next;
                        switch(select("^0000ff~^000000 I have all the Materials","^0000ff~^000000 Where am i getting those?")) {
                                case 1:
                                if (countitem(644) >= 6 && countitem(7175) >= 6 && countitem(7174) >= 6) {
                                        mes "[Kris Kringle]";
                                        mes " ";
                                        mes "Great! Here you go!";
                                        next;
                                        delitem 644,6//Gift Boc
                                        delitem 7175,6; //Wrapping Paper
                                        delitem 7174,6; //Wrapping Lace
                                        getitem 12354,1; //Wrapped Gift
                                        mes "[Kris Kringle]";
                                        mes " ";
                                        mes "Have A Woonie Christmas :3";
                                        close;
                                } else {
                                        mes "[Kris Kringle]";
                                        mes " ";
                                        mes "Hmmmm,";
                                        mes "You dont have all the Materials@";
                                        close;
                                }
 
                                case 2:
                                        mes "[Kris Kringle]";
                                        mes " ";
                                        mes "Well...all stores are out of stock because some nasty monsters disguised as Daddy Nick's helpers have been raiding Lutie. They attack the town every hour. If you defeat them and take them down, you can take those items from them.";
                                        close;
                                }
        }
}
 
Viewed 304 times, submitted by unknown.