for(set @i,0; !compare(getarg(@i+1),"Zeny"); set @i,@i+2) delitem getarg(@i),getarg(@i+1);
set Zeny,Zeny-getarg(@i);
for(set @i,@i+2; getarg(@i); set @i,@i+2) {
getitem getarg(@i),getarg(@i+1);
announce ""+strcharinfo(0)+" has bought a "+getarg(@i)+"!",bc_all,0x00FF00;
}
close;