Sour-'s post in Rental Item Shop npc? was marked as the answer
prontera,152,180,4 script Sample 93,{
.@pods = 7179; //Item needed for rental
.@amount = 1; //Amount of the item needed for the rental
.@item = 512; //Item to for rent
.@hours = 3; //Hours of rental
if (countitem(.@pods) < .@amount) end;
if (Rental > gettimetick(2)) {
mes "[Sample]";
mes "Please wait for " + callfunc("Time2Str",Rental) + ".";
close;
}
set Rental, gettimetick(2) + (.@hours * 60 * 60);
rentitem .@item,(.@hours * 60 * 60);
delitem .@pods,.@amount;
end;
}