prontera,155,181,5	script	Sample	757,{
mes "Select an headgear to trade to other colour ..";
set .@give,select( .menu$ ) - 1;
if( !countitem( .headgear[.@give] ) ){
	mes "You dont have this.";
}else{
	mes "Select exchange to which ?";
	set .@gain,select( .menu$ ) - 1;
	delitem .headgear[.@give],1;
	getitem .headgear[.@gain],1;
	mes "Exchanged "+getitemname( .headgear[.@give] )+" to "+getitemname( .headgear[.@gain] );
}
close;

OnInit:
// headgear list
setarray .headgear,5001,5002,5003;

set .headgear_size,getarraysize( .headgear );
for( set .@i,0; .@i < .headgear_size; set .@i,.@i + 1 )
	set .menu$,.menu$ + getitemname( .headgear[.@i] ) +":";
end;
}