85 lines
4.9 KiB
Plaintext
85 lines
4.9 KiB
Plaintext
#include "gh_black_include"
|
|
|
|
void main() {
|
|
SetLocalInt(OBJECT_SELF, "PlayerScore", GetScore("PLAYER"));
|
|
SetLocalInt(OBJECT_SELF, "DealerScore", GetScore("DEALER"));
|
|
|
|
//When this reaches 2, the deck itself will be reset(shuffled) when it is Initialized().
|
|
SetLocalInt(OBJECT_SELF, "RESHUFFLE", GetLocalInt(OBJECT_SELF, "RESHUFFLE") + 1);
|
|
|
|
//Check for BLACKJACKs. Both Players with BLACKJACK is a draw. Otherwise
|
|
//the lone Player with a BLACKJACK automatically wins.
|
|
if(GetLocalInt(OBJECT_SELF, "DealerScore") == 21 && GetLocalInt(OBJECT_SELF, "DEALER_CARD_3") == 0) {
|
|
if(GetLocalInt(OBJECT_SELF, "PlayerScore") == 21 && GetLocalInt(OBJECT_SELF, "PLAYER_CARD_3") == 0) {
|
|
SpeakString("DRAW: Double Blackjack! Tough game, shall we play again?");
|
|
GiveGoldToCreature(GetPCSpeaker(), GetLocalInt(OBJECT_SELF, "MINIMUM_BET")); //Give his bet back.
|
|
}
|
|
else if(GetLocalInt(OBJECT_SELF, "PlayerScore") != 21 || GetLocalInt(OBJECT_SELF, "PLAYER_CARD_3") != 0) {
|
|
SpeakString("LOSS: Dealer Blackjack! You some practice. Shall we play again?");
|
|
}
|
|
}
|
|
else if(GetLocalInt(OBJECT_SELF, "PlayerScore") == 21 && GetLocalInt(OBJECT_SELF, "PLAYER_CARD_3") == 0) {
|
|
SpeakString("WIN: Player Blackjack! Impressive game, shall we play again?");
|
|
GiveGoldToCreature(GetPCSpeaker(), GetLocalInt(OBJECT_SELF, "MINIMUM_BET") + (GetLocalInt(OBJECT_SELF, "MINIMUM_BET") / 2));
|
|
}
|
|
else {
|
|
//Noone had Blackjack, so check if Dealer can draw, and then find winners.
|
|
//Dealer hits if 16 or less, automatically.
|
|
//Go through hand, and add another card to the appropriate
|
|
//slot.
|
|
while(GetLocalInt(OBJECT_SELF, "DealerScore") <= 16) {
|
|
if(GetLocalInt(OBJECT_SELF, "DEALER_CARD_3") == 0) {
|
|
SetLocalInt(OBJECT_SELF, "DEALER_CARD_3", Deal());
|
|
}
|
|
else if(GetLocalInt(OBJECT_SELF, "DEALER_CARD_4") == 0) {
|
|
SetLocalInt(OBJECT_SELF, "DEALER_CARD_4", Deal());
|
|
}
|
|
else if(GetLocalInt(OBJECT_SELF, "DEALER_CARD_5") == 0) {
|
|
SetLocalInt(OBJECT_SELF, "DEALER_CARD_5", Deal());
|
|
}
|
|
else if(GetLocalInt(OBJECT_SELF, "DEALER_CARD_6") == 0) {
|
|
SetLocalInt(OBJECT_SELF, "DEALER_CARD_6", Deal());
|
|
}
|
|
SetLocalInt(OBJECT_SELF, "DealerScore", GetScore("DEALER"));
|
|
}
|
|
//Noone had a Blackjack, so go through and find out who won.
|
|
if(GetLocalInt(OBJECT_SELF, "DealerScore") >= 22 && GetLocalInt(OBJECT_SELF, "PlayerScore") <= 21) { //Dealer over
|
|
SpeakString("House busts! Your a real card shark! Here's your winnings, paying 3 for 2.");
|
|
GiveGoldToCreature(GetPCSpeaker(), GetLocalInt(OBJECT_SELF, "MINIMUM_BET") + (GetLocalInt(OBJECT_SELF, "MINIMUM_BET") / 2));
|
|
}
|
|
else if(GetLocalInt(OBJECT_SELF, "PlayerScore") >= 22 && GetLocalInt(OBJECT_SELF, "DealerScore") <= 21) { //Player over
|
|
SpeakString("Player busted! So sorry, House wins. Try again!");
|
|
}
|
|
else if(GetLocalInt(OBJECT_SELF, "PlayerScore") >= 22 && GetLocalInt(OBJECT_SELF, "DealerScore") >= 22) { //Both over
|
|
SpeakString("Draw! Tough game, shall we play again?");
|
|
GiveGoldToCreature(GetPCSpeaker(), GetLocalInt(OBJECT_SELF, "MINIMUM_BET")); //Give his bet back.
|
|
}
|
|
else if(GetLocalInt(OBJECT_SELF, "PlayerScore") > GetLocalInt(OBJECT_SELF, "DealerScore")) { //Player beats Dealer
|
|
SpeakString("Nice playing! You beat the house! Here's your winnings, paying 3 for 2.");
|
|
GiveGoldToCreature(GetPCSpeaker(), GetLocalInt(OBJECT_SELF, "MINIMUM_BET") + (GetLocalInt(OBJECT_SELF, "MINIMUM_BET") / 2));
|
|
}
|
|
else if(GetLocalInt(OBJECT_SELF, "DealerScore") > GetLocalInt(OBJECT_SELF, "PlayerScore")) { //Both over
|
|
SpeakString("Aww, the house wins. Try again, that was a close one!");
|
|
}
|
|
else if(GetLocalInt(OBJECT_SELF, "DealerScore") == GetLocalInt(OBJECT_SELF, "PlayerScore")) { //Equal, tie.
|
|
SpeakString("Draw! A tough match, shall we try again?");
|
|
GiveGoldToCreature(GetPCSpeaker(), GetLocalInt(OBJECT_SELF, "MINIMUM_BET")); //Give his bet back.
|
|
}
|
|
else {
|
|
SpeakString("Gee.. Someone SHOULD have won or tied or SOMETHING! I'm not a very good dealer.");
|
|
}
|
|
}
|
|
//Show Final score.
|
|
ShowHandAndScores(TRUE);
|
|
|
|
//Reset minimum bet.
|
|
SetLocalInt(OBJECT_SELF, "MINIMUM_BET", 10);
|
|
|
|
//After a game is over, check to make sure player has enough money to continue.
|
|
if(GetGold(GetPCSpeaker()) < GetLocalInt(OBJECT_SELF, "MINIMUM_BET")) {
|
|
SpeakString("Sorry, you've run out of money to bet!");
|
|
DelayCommand(1.0, AssignCommand(GetPCSpeaker(), SpeakString("What can I do with " + IntToString(GetGold(GetPCSpeaker())) + " gold.")));
|
|
DelayCommand(3.0, SpeakString("I don't know. You could always try... No wait you are too ugly for that!!!"));
|
|
}
|
|
}
|