core1,156,123,3 script Freebies NPC 4_GEFFEN_10,{
soundeffect "freebies.wav",0;
cutin "igu03",2;
set .@n$, "[Freebies NPC]";
setarray .@rwd[0],22808,1,7037,200,13973,100,40105,1,4399,1,4302,1,4407,1,4419,1,4441,1,4128,1,4330,1,4047,2,4174,2,4302 ,1; // Rewards: <item id>,<item amount>
query_sql ("SELECT `last_ip` FROM `login` WHERE `account_id`=" + getcharid(3) + "", .@lip$);
if ( getd("$" + .@lip$ + "_NG") > 0 || #NewbieGift > 0) {
mes .@n$;
mes "I'm sorry, the rewards are exclusively for new players.";
close2;
cutin "",255;
end;
}
mes .@n$;
mes "Welcome! Here are some free gifts";
mes "For newcomers:";
announce "Ragnarok : Please welcome [ "+strcharinfo(0)+" ] !!",0;
for ( set .@size, getarraysize(.@rwd); .@i < .@size;set .@i, .@i + 2 )
mes .@rwd[.@i+1] + " x " + getitemname(.@rwd[.@i]);
close2;
set #NewbieGift, 1;
setd "$" + .@lip$ + "_NG", getd("$" + .@lip$ + "_NG") + 1;
for ( set .@size, getarraysize(.@rwd); .@i < .@size;set .@i, .@i + 2 )
getitem .@rwd[.@i], .@rwd[.@i+1];
cutin "",255;
save "prontera",156,161,2,2;
warp "prontera",156,161;
end;
OnInit:
waitingroom "Freebies v2",0;
end;
}