You could do conversions if you want, but you might have to play with it a bit to make sure they work properly.
Code:
sub EVENT_ITEM {
#Convert all coin turn-ins to copper and add them up
my $totalcoin = $platinum * 1000;
my $totalcoin = $totalcoin + $gold * 100;
my $totalcoin = $totalcoin + $silver * 10;
my $totalcoin = $totalcoin + $copper;
if($totalcoin == 10000) # 10 platinum
{
quest::summonitem(1001);
$platinum = undef;
$gold = undef;
$silver = undef;
$copper = undef;
}
else
{
if($platinum || $gold || $silver || $copper) {
$client->AddMoneyToPP($copper, $silver, $gold, $platinum, updateclient);
quest::say ("That is not the required amount!");
$platinum = undef;
$gold = undef;
$silver = undef;
$copper = undef;
}
}
}
Again, I haven't tested this yet, but it should work almost perfectly for what you are wanting to do.