<perl>
get "MID==$MID sort=-Date range=0,1","bets";
$s2=1;
$BetCountA1=$BetCountA+$s2;
$BetCountB1=$BetCountB+$s2;
$BetCountDraw1=$BetCountDraw+$s2;

mod "MID==$MID",["BetCountA","$BetCountA1"],"matches";
}

mod "MID==$MID",["BetCountB","$BetCountB1"],"matches";
}
elseif ( $Bet eq "TeamDraw" ){
mod "MID==$MID",["BetCountDraw","$BetCountDraw1"],"matches";
}
else
{
out"No $Bet";
}
</perl>