the title says "event script" attracts me, but the idea quite lame ...
prt_fild01,0,0,0,0 monster Poring 1002, 100, 0,0,papa_jakk::On_kill
prt_fild05,0,0,0,0 monster Poring 1002, 100, 0,0,papa_jakk::On_kill
prt_fild06,0,0,0,0 monster Poring 1002, 100, 0,0,papa_jakk::On_kill
prt_fild08,0,0,0,0 monster Poring 1002, 100, 0,0,papa_jakk::On_kill
prontera,155,188,5 script papa_jakk 100,{
if ( merrychristmas != 14 ) {
mes "go to prt_fild to hunt poring";
close;
}
mes "M E R R Y C H R I S T M A S";
getitem 2236, 1; // Santa_Hat
merrychristmas = 0;
close;
On_kill:
if ( rand(2) ) { // 50% chance
if ( merrychristmas < 14 )
merrychristmas++;
for ( .@i = 0; .@i < merrychristmas; .@i++ )
.@form$ = .@form$ + .word$[.@i] +" ";
for ( .@i = merrychristmas; .@i < 14; .@i++ )
.@form$ = .@form$ +"_ ";
message strcharinfo(0), "words formed : "+ .@form$;
}
end;
OnInit:
setarray .word$, "M", "E", "R", "R", "Y", "C", "H", "R", "I", "S", "T", "M", "A", "S";
end;
}simple script