Try this one:
iz_int,92,92,4 script Freebies#rA 100,5,5,{
callsub OnMain;
end;
OnTouch:
OnMain:
set @npc$,"[rAthena]";
if (#freebies == 1) callsub OnDone;
getitem 501,1;
getitem 502,2;
getitem 503,3;
dispbottom "Freebies has been given!";
sleep2 1000;
warp "prontera",150,150;
end;
OnDone:
mes @npc$;
mes "You already have your freebies.";
close;
}
- script Warp#new -1,{
OnPCLoadMapEvent:
if (#freebies == 1) end;
getmapxy(.@map$, .@x, .@y, 0);
savepoint .@map$, .@x, .@y;
dispbottom ""+.@map$+" is your new savepoint!";
set #freebies,1;
end;
}
prontera mapflag loadevent
change this line to whatever freebie item you may want:
getitem 501,1;
getitem 502,2;
getitem 503,3;