mirror of
https://github.com/coding-horror/basic-computer-games.git
synced 2025-12-25 12:25:10 -08:00
612 lines
18 KiB
C#
612 lines
18 KiB
C#
using Poker.Resources;
|
|
using static System.StringComparison;
|
|
using static Poker.Rank;
|
|
|
|
namespace Poker;
|
|
|
|
internal class Game
|
|
{
|
|
private readonly IReadWrite _io;
|
|
private readonly IRandom _random;
|
|
|
|
private class CardArray
|
|
{
|
|
private Card[] _values;
|
|
|
|
public CardArray(Card[] values)
|
|
{
|
|
_values = values;
|
|
}
|
|
|
|
public Card this[float index]
|
|
{
|
|
get => _values[(int)index];
|
|
set => _values[(int)index] = value;
|
|
}
|
|
}
|
|
|
|
private readonly CardArray _cards = new(new Card[51]);
|
|
private bool _hasWatch;
|
|
private float _computerBalance;
|
|
private float _playerBalance;
|
|
private float _pot;
|
|
|
|
private float B;
|
|
private Card _computerHighCard;
|
|
private float T;
|
|
private Card _playerHighCard;
|
|
private float G;
|
|
private float I;
|
|
private float U;
|
|
private float Z;
|
|
private float X;
|
|
private float K;
|
|
private float V;
|
|
private float Q;
|
|
|
|
private string JS;
|
|
private string KS;
|
|
private string HS;
|
|
private string IS;
|
|
|
|
public Game(IReadWrite io, IRandom random)
|
|
{
|
|
_io = io;
|
|
_random = random;
|
|
}
|
|
|
|
private int Get0To9() => _random.Next(10);
|
|
|
|
internal void Play()
|
|
{
|
|
var deck = new Deck();
|
|
|
|
_io.Write(Resource.Streams.Title);
|
|
_io.Write(Resource.Streams.Instructions);
|
|
|
|
_hasWatch = true;
|
|
_computerBalance = 200;
|
|
_playerBalance = 200;
|
|
|
|
do
|
|
{
|
|
deck.Shuffle(_random);
|
|
} while (PlayHand(deck));
|
|
}
|
|
|
|
internal bool PlayHand(Deck deck)
|
|
{
|
|
_pot=0;
|
|
while(true)
|
|
{
|
|
_io.WriteLine();
|
|
if (_computerBalance<=5)
|
|
{
|
|
CongratulatePlayer();
|
|
return false;
|
|
}
|
|
_io.WriteLine("The ante is $5. I will deal:");
|
|
_io.WriteLine();
|
|
if (_playerBalance <= 5 && PlayerCantRaiseFunds()) { return false; }
|
|
_pot += 10;
|
|
_playerBalance -= 5;
|
|
_computerBalance -= 5;
|
|
for (Z=1; Z <= 10; Z++)
|
|
{
|
|
DealCard((int)Z);
|
|
}
|
|
_io.WriteLine("Your hand:");
|
|
DisplayHand(1);
|
|
I=2;
|
|
(B, JS, KS, _computerHighCard, X) = AnalyzeHand(6);
|
|
_io.WriteLine();
|
|
_330: if (I!=6) { goto _470; }
|
|
_340: if (Get0To9()<=7) { goto _370; }
|
|
_350: X=11100;
|
|
_360: goto _420;
|
|
_370: if (Get0To9()<=7) { goto _400; }
|
|
_380: X=11110;
|
|
_390: goto _420;
|
|
_400: if (Get0To9()>=1) { goto _450; }
|
|
_410: X=11111;
|
|
_420: I=7;
|
|
_430: Z=23;
|
|
_440: goto _580;
|
|
_450: Z=1;
|
|
_460: goto _510;
|
|
_470: if (B >= 13) { goto _540; }
|
|
_480: if (Get0To9()>=2) { goto _500; }
|
|
_490: goto _420;
|
|
_500: Z=0;
|
|
_510: K=0;
|
|
_520: _io.WriteLine("I check.");
|
|
_530: goto _620;
|
|
_540: Z = B <= 16 || Get0To9() < 1 ? 35 : 2;
|
|
_580: V=Z+Get0To9();
|
|
_590: if (CopmuterCantContinue()) { return false; }
|
|
_600: _io.WriteLine($"I'll open with ${V}");
|
|
_610: K=V;
|
|
G = 0;
|
|
_620: if (GetWager()) { return false; }
|
|
_630: var response = IsThereAWinner();
|
|
if (response.HasValue) { return response.Value; }
|
|
|
|
_io.WriteLine();
|
|
T = _io.ReadNumber("Now we draw -- How many cards do you want", 3, "You can't draw more than three cards.");
|
|
if (T != 0)
|
|
{
|
|
Z=10;
|
|
_io.WriteLine("What are their numbers:");
|
|
for (Q=1; Q <= T; Q++)
|
|
{
|
|
U = _io.ReadNumber("");
|
|
DealCard((int)++Z, (int)U);
|
|
}
|
|
_io.WriteLine("Your new hand:");
|
|
DisplayHand(1);
|
|
}
|
|
Z=10+T;
|
|
for (U=6; U <= 10; U++)
|
|
{
|
|
if ((int)(X/Math.Pow(10, U-6)) == 10*(int)(X/Math.Pow(10, U-5)))
|
|
{
|
|
DealCard((int)++Z, (int)U);
|
|
}
|
|
}
|
|
_io.WriteLine();
|
|
_io.Write($"I am taking{Z-10-T}card");
|
|
if (Z != 11 + T)
|
|
{
|
|
_io.WriteLine("s");
|
|
}
|
|
_io.WriteLine();
|
|
V=I;
|
|
I=1;
|
|
(B, JS, KS, _computerHighCard, X) = AnalyzeHand(6);
|
|
if (V == 7)
|
|
{
|
|
Z = 28;
|
|
}
|
|
else if (I == 6)
|
|
{
|
|
Z = 1;
|
|
}
|
|
else if (B < 13)
|
|
{
|
|
Z = Get0To9() == 6 ? 19 : 2;
|
|
}
|
|
else
|
|
{
|
|
if (B >= 16)
|
|
{
|
|
Z = 2;
|
|
}
|
|
else
|
|
{
|
|
Z = Get0To9() == 8 ? 11 : 19;
|
|
}
|
|
}
|
|
_1330: K=0;
|
|
G=0;
|
|
_1340: if (GetWager()) { return false; }
|
|
_1350: if (T!=.5) { goto _1450; }
|
|
_1360: if (V==7) { goto _1400; }
|
|
_1370: if (I!=6) { goto _1400; }
|
|
_1380: _io.WriteLine("I'll check");
|
|
_1390: goto _1460;
|
|
_1400: V=Z+Get0To9();
|
|
_1410: if (CopmuterCantContinue()) { return false; }
|
|
_1420: _io.WriteLine($"I'll bet ${V}");
|
|
_1430: K=V;
|
|
_1440: if (GetWager()) { return false; }
|
|
_1450: response = IsThereAWinner();
|
|
if (response.HasValue) { return response.Value; }
|
|
_1460: _io.WriteLine();
|
|
_io.WriteLine("Now we compare hands:");
|
|
_io.WriteLine("My hand:");
|
|
DisplayHand(6);
|
|
(U, HS, IS, _playerHighCard, X) = AnalyzeHand(1);
|
|
_io.WriteLine();
|
|
_io.Write("You have ");
|
|
DisplayHandRank(HS, IS, _playerHighCard);
|
|
_io.Write("and I have ");
|
|
DisplayHandRank(JS, KS, _computerHighCard);
|
|
if (B > U || _computerHighCard > _playerHighCard) { return ComputerWins().Value; }
|
|
if (U > B || _playerHighCard > _computerHighCard) { return PlayerWins().Value; }
|
|
_io.WriteLine("The hand is drawn.");
|
|
_io.WriteLine($"All ${_pot}remains in the pot.");
|
|
}
|
|
|
|
bool? IsThereAWinner()
|
|
{
|
|
if (I!=3)
|
|
{
|
|
if (I!=4) { return null; }
|
|
_io.WriteLine();
|
|
return PlayerWins();
|
|
}
|
|
_io.WriteLine();
|
|
return ComputerWins();
|
|
}
|
|
|
|
bool? ComputerWins()
|
|
{
|
|
_io.WriteLine("I win.");
|
|
_computerBalance += _pot;
|
|
return ShouldContinue();
|
|
}
|
|
|
|
bool? ShouldContinue()
|
|
{
|
|
_io.WriteLine($"Now I have ${_computerBalance}and you have ${_playerBalance}");
|
|
return _io.ReadYesNo("Do you wish to continue");
|
|
}
|
|
|
|
bool? PlayerWins()
|
|
{
|
|
_io.WriteLine("You win.");
|
|
_playerBalance += _pot;
|
|
return ShouldContinue();
|
|
}
|
|
|
|
void DealCard(int index, int indexToReplace = 0)
|
|
{
|
|
_cards[index] = deck.Deal();
|
|
if (index > 10)
|
|
{
|
|
(_cards[indexToReplace], _cards[index]) = (_cards[index], _cards[indexToReplace]);
|
|
}
|
|
return;
|
|
}
|
|
|
|
void DisplayHand(int firstCard)
|
|
{
|
|
for (Z = firstCard; Z <= firstCard+4; Z++)
|
|
{
|
|
_io.Write($"{Z}-- {_cards[Z]}");
|
|
if (Z % 2 == 0)
|
|
{
|
|
_io.WriteLine();
|
|
}
|
|
}
|
|
_io.WriteLine();
|
|
return;
|
|
}
|
|
|
|
(int, string, string, Card, int) AnalyzeHand(int firstCard)
|
|
{
|
|
var suitMatchCount = 0;
|
|
for (var i = firstCard; i <= firstCard+4; i++)
|
|
{
|
|
if (i < firstCard+4 && _cards[i].Suit == _cards[i+1].Suit)
|
|
{
|
|
suitMatchCount++;
|
|
}
|
|
}
|
|
if (suitMatchCount == 4)
|
|
{
|
|
return (15, "A Flus", "h in", _cards[firstCard], 11111);
|
|
}
|
|
for (var i = firstCard; i <= firstCard+3; i++)
|
|
{
|
|
for (var j = i+1; j <= firstCard+4; j++)
|
|
{
|
|
if (_cards[i].Rank > _cards[j].Rank)
|
|
{
|
|
(_cards[i], _cards[j]) = (_cards[j], _cards[i]);
|
|
}
|
|
}
|
|
}
|
|
var handRank = 0;
|
|
var keepMask = 0;
|
|
Card highCard = default;
|
|
var handName1 = "";
|
|
var handName2 = "";
|
|
for (var i = firstCard; i <= firstCard+3; i++)
|
|
{
|
|
if (_cards[i].Rank == _cards[i+1].Rank)
|
|
{
|
|
keepMask += 11*(int)Math.Pow(10, i-firstCard);
|
|
highCard = _cards[i];
|
|
(handRank, handName1, handName2) = AnalyzeMultiples(handRank, i);
|
|
}
|
|
}
|
|
if (keepMask == 0)
|
|
{
|
|
if (_cards[firstCard+3] - _cards[firstCard] == 3)
|
|
{
|
|
keepMask=1111;
|
|
handRank=10;
|
|
}
|
|
if (_cards[firstCard+4] - _cards[firstCard+1] == 3)
|
|
{
|
|
if (handRank == 10)
|
|
{
|
|
return (14, "Straig", "ht", _cards[firstCard+4], 11111);
|
|
}
|
|
handRank=10;
|
|
keepMask=11110;
|
|
}
|
|
}
|
|
if (handRank < 10)
|
|
{
|
|
I = 6;
|
|
return (9, "Schmal", "tz, ", _cards[firstCard+4], 11000);
|
|
}
|
|
else if (handRank == 10)
|
|
{
|
|
if (I == 1) { I = 6; }
|
|
}
|
|
else if (handRank <= 12 && highCard.Rank <= 6)
|
|
{
|
|
I = 6;
|
|
}
|
|
return (handRank, handName1, handName2, highCard, keepMask);
|
|
}
|
|
|
|
(int, string, string) AnalyzeMultiples(int handStrength, int index) =>
|
|
(handStrength, _cards[index].Rank == _cards[index - 1].Rank) switch
|
|
{
|
|
(<11, _) => (11, "A Pair", " of "),
|
|
(11, true) => (13, "Three", " "),
|
|
(11, _) => (12, "Two P", "air, "),
|
|
(12, _) => (16, "Full H", "ouse, "),
|
|
(_, true) => (17, "Four", " "),
|
|
_ => (16, "Full H", "ouse, ")
|
|
};
|
|
|
|
bool GetWager()
|
|
{
|
|
_3060: _io.WriteLine();
|
|
T = _io.ReadNumber("What is your bet");
|
|
_3080: if ((T-(int)T)==0) { goto _3140; }
|
|
_3090: if (K!=0) { goto _3120; }
|
|
_3100: if (G!=0) { goto _3120; }
|
|
_3110: if (T==.5) { return false; }
|
|
_3120: _io.WriteLine("No small change, please.");
|
|
_3130: goto _3060;
|
|
_3140: if (_playerBalance-G-T>=0) { goto _3170; }
|
|
_3150: if (PlayerCantRaiseFunds()) { return true; }
|
|
_3160: goto _3060;
|
|
_3170: if (T!=0) { goto _3200; }
|
|
_3180: I=3;
|
|
_3190: return Line_3380();
|
|
_3200: if (G+T>=K) { goto _3230; }
|
|
_3210: _io.WriteLine("If you can't see my bet, then fold.");
|
|
_3220: goto _3060;
|
|
_3230: G += T;
|
|
_3240: if (G==K) { return Line_3380(); }
|
|
_3250: if (Z!=1) { return Line_3420(); }
|
|
_3260: if (G>5) { goto _3300; }
|
|
_3270: if (Z>=2) { return Line_3350(); }
|
|
_3280: V=5;
|
|
_3290: return Line_3420();
|
|
_3300: if (Z==1) { goto _3320; }
|
|
_3310: if (T<=25) { return Line_3350(); }
|
|
_3320: I=4;
|
|
_3330: _io.WriteLine("I fold.");
|
|
_3340: return false;
|
|
}
|
|
|
|
bool Line_3350()
|
|
{
|
|
if (Z==2) { return Line_3430(); }
|
|
return Line_3360();
|
|
}
|
|
|
|
bool Line_3360()
|
|
{
|
|
_io.WriteLine("I'll see you.");
|
|
K=G;
|
|
return Line_3380();
|
|
}
|
|
|
|
bool Line_3380()
|
|
{
|
|
_playerBalance -= G;
|
|
_computerBalance -= K;
|
|
_pot += G+K;
|
|
return false;
|
|
}
|
|
|
|
bool Line_3420()
|
|
{
|
|
if (G>3*Z) { return Line_3350(); }
|
|
return Line_3430();
|
|
}
|
|
|
|
bool Line_3430()
|
|
{
|
|
V=G-K+Get0To9();
|
|
if (CopmuterCantContinue()) { return true; }
|
|
_io.WriteLine($"I'll see you, and raise you{V}");
|
|
K=G+V;
|
|
return GetWager();
|
|
}
|
|
|
|
bool CopmuterCantContinue()
|
|
{
|
|
if (_computerBalance - G - V >= 0) { return false; }
|
|
if (G == 0)
|
|
{
|
|
V = _computerBalance;
|
|
}
|
|
else if (_computerBalance - G >= 0)
|
|
{
|
|
return Line_3360();
|
|
}
|
|
else if (!_hasWatch)
|
|
{
|
|
var response = _io.ReadString("Would you like to buy back your watch for $50");
|
|
if (!response.StartsWith("N", InvariantCultureIgnoreCase))
|
|
{
|
|
// The original code did not deduct $50 from the player
|
|
_computerBalance += 50;
|
|
_hasWatch = true;
|
|
}
|
|
}
|
|
return false;
|
|
}
|
|
|
|
bool CongratulatePlayer()
|
|
{
|
|
_io.WriteLine("I'm busted. Congratulations!");
|
|
return true;
|
|
}
|
|
|
|
void DisplayHandRank(string part1, string part2, Card highCard)
|
|
{
|
|
_io.Write($"{part1}{part2}");
|
|
if (part1 == "A Flus")
|
|
{
|
|
_io.Write(highCard.Suit);
|
|
_io.WriteLine();
|
|
}
|
|
else
|
|
{
|
|
_io.Write(highCard.Rank);
|
|
_io.WriteLine(part1 == "Schmal" || part1 == "Straig" ? " High" : "'s");
|
|
}
|
|
}
|
|
|
|
bool PlayerCantRaiseFunds()
|
|
{
|
|
_io.WriteLine();
|
|
_io.WriteLine("You can't bet with what you haven't got.");
|
|
|
|
if (_hasWatch)
|
|
{
|
|
var response = _io.ReadString("Would you like to sell your watch");
|
|
if (!response.StartsWith("N", InvariantCultureIgnoreCase))
|
|
{
|
|
if (Get0To9() < 7)
|
|
{
|
|
_io.WriteLine("I'll give you $75 for it.");
|
|
_playerBalance += 75;
|
|
}
|
|
else
|
|
{
|
|
_io.WriteLine("That's a pretty crummy watch - I'll give you $25.");
|
|
_playerBalance += 25;
|
|
}
|
|
_hasWatch = false;
|
|
return false;
|
|
}
|
|
}
|
|
|
|
// The original program had some code about selling a tie tack, but due to a fault
|
|
// in the logic the code was unreachable. I've omitted it in this port.
|
|
|
|
_io.WriteLine("Your wad is shot. So long, sucker!");
|
|
return true;
|
|
}
|
|
}
|
|
}
|
|
|
|
internal enum Suit
|
|
{
|
|
Clubs,
|
|
Diamonds,
|
|
Hearts,
|
|
Spades
|
|
}
|
|
|
|
internal class Deck
|
|
{
|
|
private readonly Card[] _cards;
|
|
private int _nextCard;
|
|
|
|
public Deck()
|
|
{
|
|
_cards = Ranks.SelectMany(r => Enum.GetValues<Suit>().Select(s => new Card(r, s))).ToArray();
|
|
}
|
|
|
|
public void Shuffle(IRandom _random)
|
|
{
|
|
for (int i = 0; i < _cards.Length; i++)
|
|
{
|
|
var j = _random.Next(_cards.Length);
|
|
(_cards[i], _cards[j]) = (_cards[j], _cards[i]);
|
|
}
|
|
}
|
|
|
|
public Card Deal() => _cards[_nextCard++];
|
|
}
|
|
|
|
internal record struct Card (Rank Rank, Suit Suit)
|
|
{
|
|
public override string ToString() => $"{Rank} of {Suit}";
|
|
|
|
public static bool operator <(Card x, Card y) => x.Rank < y.Rank;
|
|
public static bool operator >(Card x, Card y) => x.Rank > y.Rank;
|
|
|
|
public static int operator -(Card x, Card y) => x.Rank - y.Rank;
|
|
}
|
|
|
|
internal struct Rank
|
|
{
|
|
public static IEnumerable<Rank> Ranks => new[]
|
|
{
|
|
Two, Three, Four, Five, Six, Seven, Eight, Nine, Ten, Jack, Queen, King, Ace
|
|
};
|
|
|
|
public static Rank Two = new Rank(2);
|
|
public static Rank Three = new Rank(3);
|
|
public static Rank Four = new Rank(4);
|
|
public static Rank Five = new Rank(5);
|
|
public static Rank Six = new Rank(6);
|
|
public static Rank Seven = new Rank(7);
|
|
public static Rank Eight = new Rank(8);
|
|
public static Rank Nine = new Rank(9);
|
|
public static Rank Ten = new Rank(10);
|
|
public static Rank Jack = new Rank(11, "Jack");
|
|
public static Rank Queen = new Rank(12, "Queen");
|
|
public static Rank King = new Rank(13, "King");
|
|
public static Rank Ace = new Rank(14, "Ace");
|
|
|
|
private readonly int _value;
|
|
private readonly string _name;
|
|
|
|
private Rank(int value, string? name = null)
|
|
{
|
|
_value = value;
|
|
_name = name ?? $" {value} ";
|
|
}
|
|
|
|
public override string ToString() => _name;
|
|
|
|
public static bool operator <(Rank x, Rank y) => x._value < y._value;
|
|
public static bool operator >(Rank x, Rank y) => x._value > y._value;
|
|
public static bool operator ==(Rank x, Rank y) => x._value == y._value;
|
|
public static bool operator !=(Rank x, Rank y) => x._value != y._value;
|
|
|
|
public static int operator -(Rank x, Rank y) => x._value - y._value;
|
|
|
|
public static bool operator <=(Rank rank, int value) => rank._value <= value;
|
|
public static bool operator >=(Rank rank, int value) => rank._value >= value;
|
|
}
|
|
|
|
internal static class IReadWriteExtensions
|
|
{
|
|
internal static bool ReadYesNo(this IReadWrite io, string prompt)
|
|
{
|
|
while (true)
|
|
{
|
|
var response = io.ReadString(prompt);
|
|
if (response.Equals("YES", InvariantCultureIgnoreCase)) { return true; }
|
|
if (response.Equals("NO", InvariantCultureIgnoreCase)) { return false; }
|
|
io.WriteLine("Answer Yes or No, please.");
|
|
}
|
|
}
|
|
|
|
internal static int ReadNumber(this IReadWrite io, string prompt, int max, string maxPrompt)
|
|
{
|
|
io.Write(prompt);
|
|
while (true)
|
|
{
|
|
var response = io.ReadNumber("");
|
|
if (response <= max) { return (int)response; }
|
|
io.WriteLine(maxPrompt);
|
|
}
|
|
}
|
|
} |