//Warper for key item.
prontera,123,123,4 script Warper#Key 123,{
//Item ID for key.
.@key_id = 512;
if(countitem(.@key_id)) warp "prontera",123,123;
else message strcharinfo(0),"You need a "+ getitemname(.@key_id) +" to be warped!";
end;
}
//Item trader
prontera,124,124,4 script Trader#Key 123,{
//Item ID for key
.@key_id = 512;
mes "[^0000FFKey Trader^000000]";
mes "I can give you a "+ getitemname(.@key_id)+" for ^FF000010 jellopy^000000 and ^FF000010 apples^000000!";
select("Trade items for a key");
if(countitem(909) >= 10 && countitem(512) >= 10) {
mes "Here you go!";
delitem 909,10;
delitem 512,10;
getitem .@key_id,1;
} else mes "You don't have enough of the items I need!";
close;
}
Edit: Aww beat to it