I forgot to mention double points for the Ace of Spades.
Anyway, I had inteded to post my silly little perl script for simulating the original game: (beware potential line wrap)
#!/usr/bin/perl -w
sub shuffle {
{
# print('$rn/',$#discard+1,' : $discard[$rn]n'

;
}
my $game=0; my $wins=0; my $losses=0; while($game<4000) { ++$game; shuffle();
my $period=0; my $stalesize=52; my %stales=();
my $rounds=0;
{ ++$rounds;
{
# print('Deal: $a $b $c $dn'

; my $change=0; if($a