new_11-1.gat,90,83,0 script Xmas19 105,{
        if(XMASQUEST19 == 1) goto L_only_once;
        mes "[Helper Santa]";
        mes "It's Christmas.";
        mes "The time for gifts and family reunions";
        next;

        mes "[Helper Santa]";
        mes "You get a gift from me.";
	mes "The kind will depend on whether";
	mes "you've been nice or naughty.";
        next;

        menu "Want one?",L_nicenaughty,"No thanks.",L_no;

L_nicenaughty:
	set XMASQUEST19,1;
	mes "[Helper Santa]";
	mes "In my book you're marked as...";
        next;
	set @TEMP,rand(9);
	if(@TEMP == 6) goto L_naughty;
	goto L_nice;

L_nice:
	mes "[Helper Santa]";
	mes "...nice!";
        set @TEMP,rand(17);
	next;
        if(@TEMP == 0) goto L_nice_0;
        if(@TEMP == 1) goto L_nice_1;
	if(@TEMP == 2) goto L_nice_2;
	if(@TEMP == 3) goto L_nice_3;
	if(@TEMP == 4) goto L_nice_4;
	if(@TEMP == 5) goto L_nice_5;
	if(@TEMP == 6) goto L_nice_6;
	if(@TEMP == 7) goto L_nice_7;
	if(@TEMP == 8) goto L_nice_8;
	if(@TEMP == 9) goto L_nice_9;
        if(@TEMP == 10) goto L_nice_10;
        if(@TEMP == 11) goto L_nice_11;
        if(@TEMP == 12) goto L_nice_12;
        if(@TEMP == 13) goto L_nice_13;
        if(@TEMP == 14) goto L_nice_14;
        if(@TEMP == 15) goto L_nice_15;
        if(@TEMP == 16) goto L_nice_16;
        if(@TEMP == 17) goto L_nice_17;

L_naughty:
	mes "[Helper Santa]";
	mes "...naughty!";
	set @TEMP,rand(6);
	next;
	if(@TEMP == 0) goto L_naughty_0;
	if(@TEMP == 1) goto L_naughty_1;
	if(@TEMP == 2) goto L_naughty_2;
	if(@TEMP == 3) goto L_naughty_3;
	if(@TEMP == 4) goto L_naughty_4;
	if(@TEMP == 5) goto L_naughty_5;
	if(@TEMP == 6) goto L_naughty_6;

L_naughty_0:
	mes "[Helper Santa]";
	mes "Ho ho ho!";
	mes "I borrowed some of your money for";
	mes "my present budget this year.";
	set Zeny,Zeny-rand(500,1500);
	close;

L_naughty_1:
	mes "[Helper Santa]";
	mes "You will get a spanking";
	next;
	mes "[Helper Santa]";
	mes "Remember to be nice to people!";
	gmcommand strcharinfo(0)+":@die ";
	close;

L_naughty_2:
	mes "[Helper Santa]";
	mes "But I won't mind!";
	mes "Have a char reset as a present."
	next;
	mes "[Helper Santa]";
	mes "Abracadabra!";
	gmcommand strcharinfo(0)+":@charstreset "+strcharinfo(0);
	gmcommand strcharinfo(0)+":@charskreset "+strcharinfo(0);
	close;

L_naughty_3:
	mes "[Helper Santa]";
	mes "You will now get randomly warped!";
	next;
	gmcommand strcharinfo(0)+":@jump ";
	mes "[Helper Santa]";
	mes "Merry Christmas!";
	close;

L_naughty_4:
	mes "[Helper Santa]";
	mes "Your sex will now change!";
	mes "You always get naughty things for naughty things.";
	mes "It's karma!";
	next;
	mes "[Helper Santa]";
	mes "Ho ho ho!";
	gmcommand strcharinfo(0)+":@charchangesex "+strcharinfo(0);
	close;

L_naughty_5:
	mes "[Helper Santa]";
	mes "I'll now kill all monsters on this map.";
	next;
	mes "[Helper Santa]";
	mes "Done!";
	gmcommand strcharinfo(0)+":@killmonster2 ";
	close;

L_naughty_6:
	mes "[Helper Santa]";
	mes "I'll diss you around the server.";
	next;
	mes "[Helper Santa]";
	mes "Ho ho ho!";
	gmcommand strcharinfo(0)+":@kami "+strcharinfo(0)+" is not in the holiday mood.";
	close;

L_nice_0:
	mes "[Helper Santa]";
	mes "So you wanted money?.";
	set Zeny,Zeny+rand(1,1000000);
	close;

L_nice_1:
	mes "[Helper Santa]";
	mes "These hats are really hot now!";
	getitem 1205,1;
	close;

L_nice_2:
	mes "[Helper Santa]";
	mes "Axe Hats are always on the cutting edge!";
	getitem 616,1;
	close;

L_nice_3:
        mes "[Helper Santa]";
	mes "You just won a Pirate Hat!";
	getitem 617,1;
	close;

L_nice_4:
        mes "[Helper Santa]";
	mes "Now you can Goggle all you want.";
	getitem 618,1;
	close;

L_nice_5:
        mes "[Helper Santa]";
	mes "Let's Goggle all night long!";
	getitem 619,1;
	close;

L_nice_6:
        mes "[Helper Santa]";
	mes "You just won a Circlet!";
	getitem 620,1;
	close;

L_nice_7:
        mes "[Helper Santa]";
	mes "This patch is not an eyesore.";
	getitem 621,1;
	close;

L_nice_8:
        mes "[Helper Santa]";
	mes "Bandana time!";
	getitem 622,1;
	close;

L_nice_9:
        mes "[Helper Santa]";
	mes "5000 exp!";
	getexp 5000,0;
	close;

L_nice_10:
        mes "[Helper Santa]";
	mes "Soft packages are always nice.";
	getitem 1202,1;
	close;

L_nice_11:
        mes "[Helper Santa]";
	mes "Chuck Norris style!";
	getitem 1203,1;
	close;

L_nice_12:
        mes "[Helper Santa]";
	mes "Even Rudolph would be envious now.";
	getitem 1204,1;
        close;

L_nice_13:
        mes "[Helper Santa]";
	mes "Now you can become a Santa too!";
	getitem 1206,1;
	close;

L_nice_14:
        mes "[Helper Santa]";
	mes "Now you can became a Santa too!";
	getitem 511,1;
	close;

L_nice_15:
        mes "[Helper Santa]";
	mes "These gloves should keep you warm.";
	getitem 564,1;
	close;

L_nice_16:
        mes "[Helper Santa]";
	mes "This should keep you warm.";
	getitem 624,1;
	close;

L_nice_17:
        mes "[Helper Santa]";
	mes "This should keep you warm.";
	getitem 564,1;
	close;

L_only_once:
        mes "[Helper Santa]";
        mes "You already got one from me.";
        close;

L_no:
	mes "[Helper Santa]";
	mes "You're not in the Christmas spirit?";
	mes "I hope you get into this gift extravaganza soon.";
	close;
}