/*************************************************************************** * __________ __ ___. * Open \______ \ ____ ____ | | _\_ |__ _______ ___ * Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ / * Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < < * Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \ * \/ \/ \/ \/ \/ * $Id: $ * * Copyright (C) 2006 Tom Ross * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License * as published by the Free Software Foundation; either version 2 * of the License, or (at your option) any later version. * * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY * KIND, either express or implied. * ****************************************************************************/ #include "plugin.h" #include "card_deck.h" #include "card_back.h" PLUGIN_HEADER /* save files */ #define SCORE_FILE PLUGIN_GAMES_DIR "/blackjack.score" #define SAVE_FILE PLUGIN_GAMES_DIR "/blackjack.save" #define NUM_SCORES LCD_HEIGHT/8-2 /* final game return status */ #define BJ_END 3 #define BJ_USB 2 #define BJ_QUIT 1 #define BJ_LOSE 0 #if CONFIG_KEYPAD == RECORDER_PAD #define BJACK_START BUTTON_ON #define BJACK_QUIT BUTTON_OFF #define BJACK_MAX (BUTTON_ON|BUTTON_UP) #define BJACK_MIN (BUTTON_ON|BUTTON_DOWN) #define BJACK_HIT BUTTON_F1 #define BJACK_STAY BUTTON_F2 #define BJACK_DOUBLEDOWN BUTTON_F3 #define BJACK_SCORES BUTTON_RIGHT #define BJACK_RESUME BUTTON_PLAY #define BJACK_UP BUTTON_UP #define BJACK_DOWN BUTTON_DOWN #define BJACK_RIGHT BUTTON_RIGHT #define BJACK_LEFT BUTTON_LEFT #elif CONFIG_KEYPAD == ONDIO_PAD #define BJACK_START BUTTON_MENU #define BJACK_QUIT BUTTON_OFF #define BJACK_MAX (BUTTON_MENU|BUTTON_UP) #define BJACK_MIN (BUTTON_MENU|BUTTON_DOWN) #define BJACK_HIT BUTTON_LEFT #define BJACK_STAY BUTTON_RIGHT #define BJACK_DOUBLEDOWN BUTTON_UP #define BJACK_SCORES BUTTON_UP #define BJACK_RESUME BUTTON_DOWN #define BJACK_UP BUTTON_UP #define BJACK_DOWN BUTTON_DOWN #define BJACK_RIGHT BUTTON_RIGHT #define BJACK_LEFT BUTTON_LEFT #elif CONFIG_KEYPAD == IRIVER_H10_PAD #define BJACK_START BUTTON_PLAY #define BJACK_QUIT BUTTON_POWER #define BJACK_MAX (BUTTON_PLAY|BUTTON_SCROLL_UP) #define BJACK_MIN (BUTTON_PLAY|BUTTON_SCROLL_DOWN) #define BJACK_HIT BUTTON_PLAY #define BJACK_STAY BUTTON_FF #define BJACK_DOUBLEDOWN BUTTON_REW #define BJACK_SCORES BUTTON_LEFT #define BJACK_RESUME BUTTON_RIGHT #define BJACK_UP BUTTON_SCROLL_UP #define BJACK_DOWN BUTTON_SCROLL_DOWN #define BJACK_RIGHT BUTTON_RIGHT #define BJACK_LEFT BUTTON_LEFT #elif (CONFIG_KEYPAD == IRIVER_H100_PAD) || \ (CONFIG_KEYPAD == IRIVER_H300_PAD) #define BJACK_START BUTTON_ON #define BJACK_QUIT BUTTON_OFF #define BJACK_MAX (BUTTON_ON|BUTTON_UP) #define BJACK_MIN (BUTTON_ON|BUTTON_DOWN) #define BJACK_HIT BUTTON_ON #define BJACK_STAY BUTTON_REC #define BJACK_DOUBLEDOWN BUTTON_SELECT #define BJACK_SCORES BUTTON_SELECT #define BJACK_RESUME BUTTON_MODE #define BJACK_UP BUTTON_UP #define BJACK_DOWN BUTTON_DOWN #define BJACK_RIGHT BUTTON_RIGHT #define BJACK_LEFT BUTTON_LEFT #elif (CONFIG_KEYPAD == IPOD_4G_PAD) || \ (CONFIG_KEYPAD == IPOD_3G_PAD) || \ (CONFIG_KEYPAD == IPOD_1G2G_PAD) #define BJACK_START BUTTON_SELECT #define BJACK_QUIT BUTTON_MENU #define BJACK_MAX (BUTTON_SELECT|BUTTON_SCROLL_FWD) #define BJACK_MIN (BUTTON_SELECT|BUTTON_SCROLL_BACK) #define BJACK_HIT BUTTON_SELECT #define BJACK_STAY BUTTON_RIGHT #define BJACK_DOUBLEDOWN BUTTON_LEFT #define BJACK_SCORES BUTTON_RIGHT #define BJACK_RESUME BUTTON_PLAY #define BJACK_UP BUTTON_SCROLL_FWD #define BJACK_DOWN BUTTON_SCROLL_BACK #define BJACK_RIGHT BUTTON_RIGHT #define BJACK_LEFT BUTTON_LEFT #elif CONFIG_KEYPAD == IAUDIO_X5M5_PAD #define BJACK_START BUTTON_PLAY #define BJACK_QUIT BUTTON_POWER #define BJACK_MAX (BUTTON_PLAY|BUTTON_UP) #define BJACK_MIN (BUTTON_PLAY|BUTTON_DOWN) #define BJACK_HIT BUTTON_SELECT #define BJACK_STAY BUTTON_REC #define BJACK_DOUBLEDOWN BUTTON_PLAY #define BJACK_SCORES BUTTON_RIGHT #define BJACK_RESUME BUTTON_DOWN #define BJACK_UP BUTTON_UP #define BJACK_DOWN BUTTON_DOWN #define BJACK_RIGHT BUTTON_RIGHT #define BJACK_LEFT BUTTON_LEFT #elif CONFIG_KEYPAD == IRIVER_IFP7XX_PAD #define BJACK_START BUTTON_MODE #define BJACK_QUIT BUTTON_PLAY #define BJACK_MAX (BUTTON_EQ|BUTTON_UP) #define BJACK_MIN (BUTTON_EQ|BUTTON_DOWN) #define BJACK_HIT BUTTON_EQ #define BJACK_STAY BUTTON_MODE #define BJACK_DOUBLEDOWN BUTTON_SELECT #define BJACK_SCORES BUTTON_SELECT #define BJACK_RESUME (BUTTON_EQ|BUTTON_MODE) #define BJACK_UP BUTTON_UP #define BJACK_DOWN BUTTON_DOWN #define BJACK_RIGHT BUTTON_RIGHT #define BJACK_LEFT BUTTON_LEFT #elif CONFIG_KEYPAD == GIGABEAT_PAD #define BJACK_START BUTTON_POWER #define BJACK_QUIT BUTTON_A #define BJACK_MAX BUTTON_VOL_UP #define BJACK_MIN BUTTON_VOL_DOWN #define BJACK_HIT BUTTON_VOL_UP #define BJACK_STAY BUTTON_VOL_DOWN #define BJACK_DOUBLEDOWN BUTTON_SELECT #define BJACK_SCORES BUTTON_RIGHT #define BJACK_RESUME BUTTON_MENU #define BJACK_UP BUTTON_UP #define BJACK_DOWN BUTTON_DOWN #define BJACK_RIGHT BUTTON_RIGHT #define BJACK_LEFT BUTTON_LEFT #elif CONFIG_KEYPAD == SANSA_E200_PAD #define BJACK_START BUTTON_SELECT #define BJACK_QUIT BUTTON_POWER #define BJACK_MAX (BUTTON_REC|BUTTON_UP) #define BJACK_MIN (BUTTON_REC|BUTTON_DOWN) #define BJACK_HIT BUTTON_SELECT #define BJACK_STAY BUTTON_RIGHT #define BJACK_DOUBLEDOWN BUTTON_LEFT #define BJACK_SCORES BUTTON_UP #define BJACK_RESUME BUTTON_REC #define BJACK_UP BUTTON_SCROLL_FWD #define BJACK_DOWN BUTTON_SCROLL_BACK #define BJACK_RIGHT BUTTON_RIGHT #define BJACK_LEFT BUTTON_LEFT #elif CONFIG_KEYPAD == SANSA_C200_PAD #define BJACK_START BUTTON_SELECT #define BJACK_QUIT BUTTON_POWER #define BJACK_MAX BUTTON_VOL_UP #define BJACK_MIN BUTTON_VOL_DOWN #define BJACK_HIT BUTTON_SELECT #define BJACK_STAY BUTTON_RIGHT #define BJACK_DOUBLEDOWN BUTTON_LEFT #define BJACK_SCORES BUTTON_REC #define BJACK_RESUME BUTTON_DOWN #define BJACK_UP BUTTON_UP #define BJACK_DOWN BUTTON_DOWN #define BJACK_RIGHT BUTTON_RIGHT #define BJACK_LEFT BUTTON_LEFT #elif CONFIG_KEYPAD == ELIO_TPJ1022_PAD #define BJACK_START BUTTON_MAIN #define BJACK_QUIT BUTTON_POWER #define BJACK_MAX (BUTTON_REC|BUTTON_UP) #define BJACK_MIN (BUTTON_REC|BUTTON_DOWN) #define BJACK_HIT BUTTON_MAIN #define BJACK_STAY BUTTON_MENU #define BJACK_DOUBLEDOWN BUTTON_DOWN #define BJACK_SCORES BUTTON_UP #define BJACK_RESUME BUTTON_FF #define BJACK_UP BUTTON_UP #define BJACK_DOWN BUTTON_DOWN #define BJACK_RIGHT BUTTON_RIGHT #define BJACK_LEFT BUTTON_LEFT #elif CONFIG_KEYPAD == GIGABEAT_S_PAD #define BJACK_START BUTTON_PLAY #define BJACK_QUIT BUTTON_BACK #define BJACK_MAX BUTTON_VOL_UP #define BJACK_MIN BUTTON_VOL_DOWN #define BJACK_HIT BUTTON_VOL_UP #define BJACK_STAY BUTTON_VOL_DOWN #define BJACK_DOUBLEDOWN BUTTON_SELECT #define BJACK_SCORES BUTTON_RIGHT #define BJACK_RESUME BUTTON_MENU #define BJACK_UP BUTTON_UP #define BJACK_DOWN BUTTON_DOWN #define BJACK_RIGHT BUTTON_RIGHT #define BJACK_LEFT BUTTON_LEFT #elif CONFIG_KEYPAD == MROBE100_PAD #define BJACK_START BUTTON_SELECT #define BJACK_QUIT BUTTON_POWER #define BJACK_MAX BUTTON_MENU #define BJACK_MIN BUTTON_DISPLAY #define BJACK_HIT BUTTON_MENU #define BJACK_STAY BUTTON_DISPLAY #define BJACK_DOUBLEDOWN BUTTON_SELECT #define BJACK_SCORES BUTTON_RIGHT #define BJACK_RESUME BUTTON_PLAY #define BJACK_UP BUTTON_UP #define BJACK_DOWN BUTTON_DOWN #define BJACK_RIGHT BUTTON_RIGHT #define BJACK_LEFT BUTTON_LEFT #elif CONFIG_KEYPAD == IAUDIO_M3_PAD #define BJACK_START BUTTON_RC_PLAY #define BJACK_QUIT BUTTON_RC_REC #define BJACK_MAX (BUTTON_RC_PLAY|BUTTON_RC_VOL_UP) #define BJACK_MIN (BUTTON_RC_PLAY|BUTTON_RC_VOL_DOWN) #define BJACK_HIT BUTTON_RC_PLAY #define BJACK_STAY BUTTON_RC_FF #define BJACK_DOUBLEDOWN BUTTON_RC_REW #define BJACK_SCORES BUTTON_RC_MENU #define BJACK_RESUME BUTTON_RC_MODE #define BJACK_UP BUTTON_RC_VOL_UP #define BJACK_DOWN BUTTON_RC_VOL_DOWN #define BJACK_RIGHT BUTTON_RC_FF #define BJACK_LEFT BUTTON_RC_REW #elif CONFIG_KEYPAD == COWOND2_PAD #define BJACK_QUIT BUTTON_POWER #define BJACK_DOUBLEDOWN BUTTON_MINUS #define BJACK_SCORES BUTTON_MENU #else #error No keymap defined! #endif #ifdef HAVE_TOUCHPAD #ifndef BJACK_START #define BJACK_START BUTTON_CENTER #endif #ifndef BJACK_HIT #define BJACK_HIT BUTTON_CENTER #endif #ifndef BJACK_MAX #define BJACK_MAX BUTTON_TOPRIGHT #endif #ifndef BJACK_MIN #define BJACK_MIN BUTTON_TOPLEFT #endif #ifndef BJACK_RESUME #define BJACK_RESUME BUTTON_BOTTOMRIGHT #endif #ifndef BJACK_STAY #define BJACK_STAY BUTTON_BOTTOMLEFT #endif #ifndef BJACK_UP #define BJACK_UP BUTTON_TOPMIDDLE #endif #ifndef BJACK_DOWN #define BJACK_DOWN BUTTON_BOTTOMMIDDLE #endif #ifndef BJACK_RIGHT #define BJACK_RIGHT BUTTON_MIDRIGHT #endif #ifndef BJACK_LEFT #define BJACK_LEFT BUTTON_MIDLEFT #endif #endif #ifdef HAVE_LCD_COLOR #define BG_COLOR LCD_RGBPACK(0,157,0) #define FG_COLOR LCD_WHITE #elif LCD_DEPTH > 1 #define BG_COLOR LCD_WHITE #define FG_COLOR LCD_BLACK #endif #define CARD_WIDTH BMPWIDTH_card_back #define CARD_HEIGHT BMPHEIGHT_card_back /* This is the max amount of cards onscreen before condensing */ #define MAX_CARDS LCD_WIDTH/(CARD_WIDTH+4) extern const fb_data card_deck[]; extern const fb_data card_back[]; #define NEXT_CARD bj->player_cards[done][bj->num_player_cards[done]] /* global rockbox api */ static const struct plugin_api* rb; MEM_FUNCTION_WRAPPERS(rb); /* dealer and player card positions */ unsigned int dealer_x, dealer_y, player_x, player_y; typedef struct card { unsigned int value; /* Card's value in Blackjack */ unsigned int num; /* Value on card face 0-12 (0=Ace, 1=2, 11=Q) */ unsigned int suit; /* 0:Spades, 1:Hearts, 2: Clubs; 3: Diamonds */ bool is_soft_ace; } card; typedef struct game_context { struct card player_cards[2][22]; /* 22 Cards means the deal was all aces */ struct card dealer_cards[22]; /* That is the worst-case scenario */ unsigned int player_total; unsigned int dealer_total; signed int player_money; unsigned int num_player_cards[2]; unsigned int num_dealer_cards; unsigned int current_bet; unsigned int split_status; /* 0 = split hasn't been asked, * * 1 = split did not occur * * 2 = split occurred * * 3 = split occurred and 1st hand done */ bool is_blackjack; bool end_hand; bool asked_insurance; signed short highscores[NUM_SCORES]; bool resume; bool dirty; } game_context; /***************************************************************************** * blackjack_init() initializes blackjack data structures. ******************************************************************************/ static void blackjack_init(struct game_context* bj) { /* seed the rand generator */ rb->srand(*rb->current_tick); /* reset card positions */ dealer_x = 4; dealer_y = LCD_HEIGHT/4 - CARD_HEIGHT/2; player_x = 4; player_y = LCD_HEIGHT - LCD_HEIGHT/4 - CARD_HEIGHT/2; /* check for resumed game */ if(bj->resume) return; /* reset scoring */ bj->player_total = 0; bj->dealer_total = 0; bj->num_player_cards[0] = 2; bj->num_player_cards[1] = 0; bj->num_dealer_cards = 2; bj->end_hand = false; bj->split_status = 0; bj->is_blackjack = false; bj->asked_insurance = false; } /***************************************************************************** * blackjack_drawtable() draws the table and some text. ******************************************************************************/ static void blackjack_drawtable(struct game_context* bj) { unsigned int w, h, y_loc; char str[10]; #if LCD_HEIGHT <= 64 rb->lcd_getstringsize("Bet", &w, &h); rb->lcd_putsxy(LCD_WIDTH - w, 2*h + 1, "Bet"); rb->snprintf(str, 9, "$%d", bj->current_bet); rb->lcd_getstringsize(str, &w, &h); rb->lcd_putsxy(LCD_WIDTH - w, 3*h + 1, str); y_loc = LCD_HEIGHT/2; #else rb->lcd_getstringsize("Bet", &w, &h); rb->lcd_putsxy(LCD_WIDTH - w, 5*h / 2, "Bet"); rb->snprintf(str, 9, "$%d", bj->current_bet); rb->lcd_getstringsize(str, &w, &h); rb->lcd_putsxy(LCD_WIDTH - w, 7*h / 2, str); rb->lcd_hline(0, LCD_WIDTH, LCD_HEIGHT/2); y_loc = LCD_HEIGHT/2 + h; #endif rb->lcd_putsxy(0,0, "Dealer"); rb->lcd_getstringsize("Player", &w, &h); rb->lcd_putsxy(0, y_loc, "Player"); rb->lcd_getstringsize("Total", &w, &h); rb->lcd_putsxy(LCD_WIDTH - w, y_loc, "Total"); rb->lcd_getstringsize("Money", &w, &h); rb->lcd_putsxy(LCD_WIDTH - w, 0, "Money"); rb->snprintf(str, 9, "$%d", bj->player_money - bj->current_bet); rb->lcd_getstringsize(str, &w, &h); rb->lcd_putsxy(LCD_WIDTH - w, h + 1, str); rb->snprintf(str, 3, "%d", bj->player_total); rb->lcd_getstringsize(str, &w, &h); rb->lcd_putsxy(LCD_WIDTH - w, y_loc + h, str); } /***************************************************************************** * find_value() is passed a card and returns its blackjack value. ******************************************************************************/ static unsigned int find_value(unsigned int number) { unsigned int thisValue; if (number == 0) thisValue = 11; /* Aces get a value of 11 at first */ else if (number < 10) thisValue = number + 1; else thisValue = 10; /* Anything 10 or higher gets a value of 10 */ return thisValue; } /***************************************************************************** * draw_card() draws a card to the screen. ******************************************************************************/ static void draw_card(struct card temp_card, bool shown, unsigned int x, unsigned int y) { if(shown) rb->lcd_bitmap_part(card_deck, CARD_WIDTH*temp_card.num, CARD_HEIGHT*temp_card.suit, BMPWIDTH_card_deck, x+1, y+1, CARD_WIDTH, CARD_HEIGHT); else rb->lcd_bitmap(card_back, x+1, y+1,CARD_WIDTH, CARD_HEIGHT); #if LCD_DEPTH > 1 rb->lcd_set_foreground(LCD_BLACK); #endif /* Print outlines */ #if CARD_WIDTH >= 26 rb->lcd_hline(x+2, x+CARD_WIDTH-1, y); rb->lcd_hline(x+2, x+CARD_WIDTH-1, y+CARD_HEIGHT+1); rb->lcd_vline(x, y+2, y+CARD_HEIGHT-3); rb->lcd_vline(x+CARD_WIDTH+1, y+2, y+CARD_HEIGHT-1); rb->lcd_drawpixel(x+1, y+1); rb->lcd_drawpixel(x+1, y+CARD_HEIGHT); rb->lcd_drawpixel(x+CARD_WIDTH, y+1); rb->lcd_drawpixel(x+CARD_WIDTH, y+CARD_HEIGHT); #else rb->lcd_hline(x+1, x+CARD_WIDTH, y); rb->lcd_hline(x+1, x+CARD_WIDTH, y+CARD_HEIGHT+1); rb->lcd_vline(x, y+1, y+CARD_HEIGHT); rb->lcd_vline(x+CARD_WIDTH+1, y+1, y+CARD_HEIGHT); #endif #if LCD_DEPTH > 1 rb->lcd_set_foreground(FG_COLOR); #endif } /***************************************************************************** * new_card() initializes a new card and gives it values. ******************************************************************************/ static struct card new_card(void) { struct card new_card; new_card.suit = rb->rand()%4; /* Random number 0-3 */ new_card.num = rb->rand()%13; /* Random number 0-12 */ new_card.value = find_value(new_card.num); new_card.is_soft_ace = new_card.num == 0 ? true : false; return new_card; } /***************************************************************************** * deal_init_card() deals and draws to the screen the player's and dealer's * initial cards. ******************************************************************************/ static void deal_init_cards(struct game_context* bj) { bj->dealer_cards[0] = new_card(); bj->dealer_total += bj->dealer_cards[0].value; draw_card(bj->dealer_cards[0], false, dealer_x, dealer_y); bj->dealer_cards[1] = new_card(); bj->dealer_total += bj->dealer_cards[1].value; draw_card(bj->dealer_cards[1], true, dealer_x + CARD_WIDTH + 4, dealer_y); bj->player_cards[0][0] = new_card(); bj->player_total += bj->player_cards[0][0].value; draw_card(bj->player_cards[0][0], true, player_x, player_y); player_x += CARD_WIDTH + 4; bj->player_cards[0][1] = new_card(); bj->player_total += bj->player_cards[0][1].value; draw_card(bj->player_cards[0][1], true, player_x, player_y); player_x += CARD_WIDTH + 4; } /***************************************************************************** * redraw_board() redraws all the cards and the board ******************************************************************************/ static void redraw_board(struct game_context* bj) { unsigned int i, n, upper_bound; rb->lcd_clear_display(); blackjack_drawtable(bj); player_x = 4; dealer_x = 4; upper_bound = bj->split_status > 1 ? 2 : 1; for (i = 0; i < bj->num_dealer_cards; i++) { if (!bj->end_hand) { draw_card(bj->dealer_cards[0], false, dealer_x, dealer_y); /* increment i so the dealer's first card isn't displayed */ i++; dealer_x += CARD_WIDTH + 4; } draw_card(bj->dealer_cards[i], true, dealer_x, dealer_y); if (bj->num_dealer_cards > MAX_CARDS-1) dealer_x += 10; else dealer_x += CARD_WIDTH + 4; } for (n = 0; n < upper_bound; n++) { for (i = 0; i < bj->num_player_cards[n]; i++) { draw_card(bj->player_cards[n][i], true, player_x, player_y); if (bj->split_status>1 || bj->num_player_cards[n]>MAX_CARDS) player_x += 10; else player_x += CARD_WIDTH + 4; } if (bj->split_status > 1) player_x = LCD_WIDTH/2 + 4; } } /***************************************************************************** * update_total updates the player's total ******************************************************************************/ static void update_total(struct game_context* bj) { char total[3]; unsigned int w, h; rb->snprintf(total, 3, "%d", bj->player_total); rb->lcd_getstringsize(total, &w, &h); #if LCD_HEIGHT > 64 h *= 2; #endif rb->lcd_putsxy(LCD_WIDTH - w, LCD_HEIGHT/2 + h, total); rb->lcd_update_rect(LCD_WIDTH - w, LCD_HEIGHT/2 + h, w, h); } /***************************************************************************** * check_for_aces() is passed an array of cards and returns where an ace is * located. Otherwise, returns -1. ******************************************************************************/ static signed int check_for_aces(struct card temp_cards[], unsigned int size) { unsigned int i; for(i = 0; i < size; i++) { if (temp_cards[i].is_soft_ace == true) return i; } return -1; } /***************************************************************************** * check_totals() compares player and dealer totals. * 0: bust 1: loss, 2: push, 3: win, 4: blackjack, 5: something's not right... ******************************************************************************/ static unsigned int check_totals(struct game_context* bj) { unsigned int temp; if (bj->player_total > 21) temp = 0; else if (bj->player_total == 21 && bj->is_blackjack) if (bj->dealer_total == 21 && bj->num_dealer_cards == 2) temp = 2; else temp = 4; else if (bj->player_total == bj->dealer_total) temp = 2; else if (bj->dealer_total > 21 && bj->player_total < 22) temp = 3; else if (bj->dealer_total > bj->player_total) temp = 1; else if (bj->player_total > bj->dealer_total) temp = 3; else temp = 5; return temp; } /***************************************************************************** * finish_dealer() draws cards for the dealer until he has 17 or more. ******************************************************************************/ static void finish_dealer(struct game_context* bj) { signed int temp = 0; if (bj->dealer_total > 16 && bj->dealer_total < 22) return; while (bj->dealer_total < 17) { bj->dealer_cards[bj->num_dealer_cards] = new_card(); bj->dealer_total += bj->dealer_cards[bj->num_dealer_cards].value; bj->num_dealer_cards++; } while (bj->dealer_total > 21) { temp = check_for_aces(bj->dealer_cards, bj->num_dealer_cards); if(temp != -1) { bj->dealer_cards[temp].is_soft_ace = false; bj->dealer_total -= 10; } else return; } } /***************************************************************************** * finish_game() completes the game once player's turn is over. ******************************************************************************/ static void finish_game(struct game_context* bj) { unsigned int rValue, w, h; char str[19]; do { finish_dealer(bj); } while (bj->dealer_total < 17); redraw_board(bj); rValue = check_totals(bj); if (rValue == 0) { rb->snprintf(str, sizeof(str), " Bust! "); bj->player_money -= bj->current_bet; } else if (rValue == 1) { rb->snprintf(str, sizeof(str), " Sorry, you lost. "); bj->player_money -= bj->current_bet; } else if (rValue == 2) { rb->snprintf(str, sizeof(str), " Push "); } else if (rValue == 3) { rb->snprintf(str, sizeof(str), " You won! "); bj->player_money+= bj->current_bet; } else { rb->snprintf(str, sizeof(str), " Blackjack! "); bj->player_money += bj->current_bet * 3 / 2; } rb->lcd_getstringsize(str, &w, &h); #if LCD_HEIGHT <= 64 rb->lcd_set_drawmode(DRMODE_BG+DRMODE_INVERSEVID); rb->lcd_fillrect(0, LCD_HEIGHT/2, LCD_WIDTH, LCD_HEIGHT/2); rb->lcd_set_drawmode(DRMODE_SOLID); rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 + h, str); rb->snprintf(str, 12, "You have %d", bj->player_total); rb->lcd_getstringsize(str, &w, &h); rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2, str); #else rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 - h/2, str); #endif rb->lcd_update(); } /***************************************************************************** * blackjack_recordscore() inserts a high score into the high scores list and * returns the high score position. ******************************************************************************/ static unsigned int blackjack_recordscore(struct game_context* bj) { unsigned int i; unsigned int position = 0; signed short current, temp; /* calculate total score */ current = bj->player_money; if(current <= 10) return 0; /* insert the current score into the high scores */ for(i=0; i= bj->highscores[i]) { if(!position) { position = i+1; bj->dirty = true; } temp = bj->highscores[i]; bj->highscores[i] = current; current = temp; } } return position; } /***************************************************************************** * blackjack_loadscores() loads the high scores saved file. ******************************************************************************/ static void blackjack_loadscores(struct game_context* bj) { signed int fd; bj->dirty = false; /* clear high scores */ rb->memset(bj->highscores, 0, sizeof(bj->highscores)); /* open scores file */ fd = rb->open(SCORE_FILE, O_RDONLY); if(fd < 0) return; /* read in high scores */ if(rb->read(fd, bj->highscores, sizeof(bj->highscores)) <= 0) { /* scores are bad, reset */ rb->memset(bj->highscores, 0, sizeof(bj->highscores)); } rb->close(fd); } /***************************************************************************** * blackjack_savescores() saves the high scores saved file. ******************************************************************************/ static void blackjack_savescores(struct game_context* bj) { unsigned int fd; /* write out the high scores to the save file */ fd = rb->open(SCORE_FILE, O_WRONLY|O_CREAT); rb->write(fd, bj->highscores, sizeof(bj->highscores)); rb->close(fd); bj->dirty = false; } /***************************************************************************** * blackjack_loadgame() loads the saved game and returns load success. ******************************************************************************/ static bool blackjack_loadgame(struct game_context* bj) { signed int fd; bool loaded = false; /* open game file */ fd = rb->open(SAVE_FILE, O_RDONLY); if(fd < 0) return loaded; /* read in saved game */ while(true) { if(rb->read(fd, &bj->player_money, sizeof(bj->player_money)) <= 0) break; if(rb->read(fd, &bj->player_total, sizeof(bj->player_total)) <= 0) break; if(rb->read(fd, &bj->dealer_total, sizeof(bj->dealer_total)) <= 0) break; if(rb->read(fd, &bj->num_player_cards, sizeof(bj->num_player_cards))<=0) break; if(rb->read(fd, &bj->num_dealer_cards, sizeof(bj->num_dealer_cards))<=0) break; if(rb->read(fd, &bj->current_bet, sizeof(bj->current_bet)) <= 0) break; if(rb->read(fd, &bj->is_blackjack, sizeof(bj->is_blackjack)) <= 0) break; if(rb->read(fd, &bj->split_status, sizeof(bj->split_status)) <= 0) break; if(rb->read(fd, &bj->asked_insurance, sizeof(bj->asked_insurance)) <= 0) break; if(rb->read(fd, &bj->end_hand, sizeof(bj->end_hand)) <= 0) break; if(rb->read(fd, &bj->player_cards, sizeof(bj->player_cards)) <= 0) break; if(rb->read(fd, &bj->dealer_cards, sizeof(bj->dealer_cards)) <= 0) break; bj->resume = true; loaded = true; break; } rb->close(fd); /* delete saved file */ rb->remove(SAVE_FILE); return loaded; } /***************************************************************************** * blackjack_savegame() saves the current game state. ******************************************************************************/ static void blackjack_savegame(struct game_context* bj) { unsigned int fd; /* write out the game state to the save file */ fd = rb->open(SAVE_FILE, O_WRONLY|O_CREAT); rb->write(fd, &bj->player_money, sizeof(bj->player_money)); rb->write(fd, &bj->player_total, sizeof(bj->player_total)); rb->write(fd, &bj->dealer_total, sizeof(bj->dealer_total)); rb->write(fd, &bj->num_player_cards, sizeof(bj->num_player_cards)); rb->write(fd, &bj->num_dealer_cards, sizeof(bj->num_dealer_cards)); rb->write(fd, &bj->current_bet, sizeof(bj->current_bet)); rb->write(fd, &bj->is_blackjack, sizeof(bj->is_blackjack)); rb->write(fd, &bj->split_status, sizeof(bj->split_status)); rb->write(fd, &bj->asked_insurance, sizeof(bj->asked_insurance)); rb->write(fd, &bj->end_hand, sizeof(bj->end_hand)); rb->write(fd, &bj->player_cards, sizeof(bj->player_cards)); rb->write(fd, &bj->dealer_cards, sizeof(bj->dealer_cards)); rb->close(fd); bj->resume = true; } /***************************************************************************** * blackjack_callback() is the default event handler callback which is called * on usb connect and shutdown. ******************************************************************************/ static void blackjack_callback(void* param) { struct game_context* bj = (struct game_context*) param; if(bj->dirty) { rb->splash(HZ, "Saving high scores..."); blackjack_savescores(bj); } } /***************************************************************************** * blackjack_get_yes_no() gets a yes/no answer from the user ******************************************************************************/ static unsigned int blackjack_get_yes_no(char message[20]) { int button; unsigned int w, h, b, choice = 0; bool breakout = false; char message_yes[24], message_no[24]; rb->strcpy(message_yes, message); rb->strcpy(message_no, message); rb->strcat(message_yes, " Yes"); rb->strcat(message_no, " No"); rb->lcd_getstringsize(message_yes, &w, &h); const char *stg[] = {message_yes, message_no}; #if LCD_HEIGHT <= 64 b = 2*h+1; #else b = h-1; #endif #ifdef HAVE_LCD_COLOR rb->lcd_fillrect(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 + b, w+1, h+3); rb->lcd_set_foreground(LCD_BLACK); rb->lcd_set_background(LCD_WHITE); #else rb->lcd_set_drawmode(DRMODE_BG+DRMODE_INVERSEVID); rb->lcd_fillrect(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 + b, w+1, h+3); rb->lcd_set_drawmode(DRMODE_SOLID); #endif rb->lcd_drawrect(LCD_WIDTH/2 - w/2 - 1, LCD_HEIGHT/2 + b - 1, w+3, h+4); while(!breakout) { rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 + b +1, stg[choice]); rb->lcd_update_rect(LCD_WIDTH/2 - w/2 - 1, LCD_HEIGHT/2 + b -1, w+3, h+4); button = rb->button_get(true); switch(button) { case BJACK_LEFT: case (BJACK_LEFT|BUTTON_REPEAT): case BJACK_RIGHT: case (BJACK_RIGHT|BUTTON_REPEAT): choice ^= 1; break; case BJACK_START: breakout = true; break; case BJACK_QUIT: breakout = true; choice = BJ_QUIT; break; } } #if LCD_DEPTH > 1 rb->lcd_set_foreground(FG_COLOR); rb->lcd_set_background(BG_COLOR); #endif return choice; } /***************************************************************************** * blackjack_get_amount() gets an amount from the player to be used ******************************************************************************/ static signed int blackjack_get_amount(char message[20], signed int lower_limit, signed int upper_limit, signed int start) { int button; char str[6]; bool changed = false; unsigned int w, h; signed int amount; rb->lcd_getstringsize("A", &w, &h); /* find the size of one character */ if (start > upper_limit) amount = upper_limit; else if (start < lower_limit) amount = lower_limit; else amount = start; #if LCD_DEPTH > 1 rb->lcd_set_background(LCD_WHITE); rb->lcd_set_foreground(LCD_BLACK); #endif #if LCD_HEIGHT <= 64 rb->lcd_clear_display(); rb->lcd_puts(0, 1, message); rb->snprintf(str, 9, "$%d", amount); rb->lcd_puts(0, 2, str); rb->lcd_puts(0, 3, "RIGHT: +1"); rb->lcd_puts(0, 4, "LEFT: -1"); rb->lcd_puts(0, 5, "UP: +10"); rb->lcd_puts(0, 6, "DOWN: -10"); rb->lcd_update(); #else rb->lcd_set_drawmode(DRMODE_BG+DRMODE_INVERSEVID); rb->lcd_fillrect(LCD_WIDTH/2 - 9*w - 1, LCD_HEIGHT/2 - 4*h - 3, 37*w / 2, 8*h -3); rb->lcd_set_drawmode(DRMODE_SOLID); rb->lcd_drawrect(LCD_WIDTH/2 - 9*w - 1, LCD_HEIGHT/2 - 4*h - 3, 37*w / 2, 8*h -3); rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 - 4*h - 1, message); rb->snprintf(str, 9, "$%d", amount); rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 - 3*h, str); #if (CONFIG_KEYPAD == IPOD_4G_PAD) || \ (CONFIG_KEYPAD == IPOD_3G_PAD) || \ (CONFIG_KEYPAD == IPOD_1G2G_PAD) rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 - h-2, " >>|: +1"); rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 - 1, " |<<: -1"); rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 + h, "SCROLL+: +10"); rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 + 2*h + 1, "SCROLL-: -10"); #elif CONFIG_KEYPAD == IRIVER_H10_PAD rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 - h-2, "RIGHT: +1"); rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 - 1, "LEFT: -1"); rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 + h, "SCROLL+: +10"); rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 + 2*h + 1, "SCROLL-: -10"); #else rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 - h-2, "RIGHT: +1"); rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 - 1, "LEFT: -1"); rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 + h, "UP: +10"); rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 + 2*h + 1, "DOWN: -10"); #endif rb->lcd_update_rect(LCD_WIDTH/2 - 9*w - 2, LCD_HEIGHT/2 - 9*h/2, 37*w/2 + 1, 8*h-2); #endif while(true) { button = rb->button_get(true); switch(button) { case BJACK_UP: case (BJACK_UP|BUTTON_REPEAT): if (amount + 10 < upper_limit + 1) { amount += 10; changed = true; } break; case BJACK_DOWN: case (BJACK_DOWN|BUTTON_REPEAT): if (amount - 10 > lower_limit - 1) { amount -= 10; changed = true; } break; case BJACK_RIGHT: case (BJACK_RIGHT|BUTTON_REPEAT): if (amount + 1 < upper_limit + 1) { amount++; changed = true; } break; case BJACK_LEFT: case (BJACK_LEFT|BUTTON_REPEAT): if (amount - 1 > lower_limit - 1) { amount--; changed = true; } break; case BJACK_MAX : amount = upper_limit; changed = true; break; case BJACK_MIN : amount = lower_limit; changed = true; break; case BJACK_QUIT: return 0; case BJACK_START: #if LCD_DEPTH > 1 rb->lcd_set_foreground(FG_COLOR); rb->lcd_set_background(BG_COLOR); #endif rb->lcd_clear_display(); return amount; } if(changed) { rb->snprintf(str, 9, "$%d", amount); #if LCD_HEIGHT <= 64 rb->lcd_puts(0, 2, str); rb->lcd_update(); #else rb->lcd_set_drawmode(DRMODE_BG+DRMODE_INVERSEVID); rb->lcd_fillrect(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 - 3*h, 5*w, h); rb->lcd_set_drawmode(DRMODE_SOLID); rb->lcd_putsxy(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 - 3*h, str); rb->lcd_update_rect(LCD_WIDTH/2 - 9*w, LCD_HEIGHT/2 - 3*h, 5*w, h); #endif changed = false; } } } /***************************************************************************** * blackjack_get_bet() gets the player's bet. ******************************************************************************/ static void blackjack_get_bet(struct game_context* bj) { bj->current_bet = blackjack_get_amount("Please enter a bet", 10, bj->player_money, bj->current_bet); } /***************************************************************************** * double_down() returns one final card then finishes the game ******************************************************************************/ static void double_down(struct game_context* bj) { bj->current_bet *= 2; bj->player_cards[0][bj->num_player_cards[0]] = new_card(); bj->player_total += bj->player_cards[0][bj->num_player_cards[0]].value; bj->num_player_cards[0]++; } /***************************************************************************** * split() checks if the player wants to split and acts accordingly. * When bj->split_status is 1, no split occurred. 2 means the player split and 3 * means a split has already occurred and the first hand is done. ******************************************************************************/ static void split(struct game_context* bj) { if (blackjack_get_yes_no("Split?") == 1) bj->split_status = 1; else { bj->split_status = 2; bj->current_bet *= 2; bj->num_player_cards[0] = 1; bj->num_player_cards[1] = 1; bj->player_cards[1][0] = bj->player_cards[0][1]; bj->player_total = bj->player_cards[0][0].value; } } /***************************************************************************** * insurance() see if the player wants to buy insurance and how much. ******************************************************************************/ static unsigned int insurance(struct game_context* bj) { unsigned int insurance, max_amount; insurance = blackjack_get_yes_no("Buy Insurance?"); bj->asked_insurance = true; max_amount = bj->current_bet < (unsigned int)bj->player_money ? bj->current_bet/2 : (unsigned int)bj->player_money; if (insurance == 1) return 0; insurance = blackjack_get_amount("How much?", 0, max_amount, 0); redraw_board(bj); return insurance; } /***************************************************************************** * play_again() checks to see if the player wants to keep playing. ******************************************************************************/ static unsigned int play_again(void) { return blackjack_get_yes_no("Play Again?"); } /***************************************************************************** * blackjack_menu() is the initial menu at the start of the game. ******************************************************************************/ static unsigned int blackjack_menu(struct game_context* bj) { int button; char *title = "Blackjack"; char str[18]; unsigned int i, w, h; bool breakout = false; bool showscores = false; while(true){ #if LCD_DEPTH > 1 rb->lcd_set_background(BG_COLOR); rb->lcd_set_foreground(FG_COLOR); #endif rb->lcd_clear_display(); if(!showscores) { /* welcome screen to display key bindings */ rb->lcd_getstringsize(title, &w, &h); rb->lcd_putsxy((LCD_WIDTH-w)/2, 0, title); #if CONFIG_KEYPAD == RECORDER_PAD rb->lcd_puts(0, 1, "ON: start"); rb->lcd_puts(0, 2, "OFF: exit"); rb->lcd_puts(0, 3, "F1: hit"); rb->lcd_puts(0, 4, "F2: stay"); rb->lcd_puts(0, 5, "F3: double down"); rb->lcd_puts(0, 6, "PLAY: save/resume"); rb->snprintf(str, 21, "High Score: $%d", bj->highscores[0]); rb->lcd_puts(0, 7, str); #elif CONFIG_KEYPAD == ONDIO_PAD rb->lcd_puts(0, 1, "MENU: start"); rb->lcd_puts(0, 2, "OFF: exit"); rb->lcd_puts(0, 3, "LEFT: hit"); rb->lcd_puts(0, 4, "RIGHT: stay"); rb->lcd_puts(0, 5, "UP: double down"); rb->lcd_puts(0, 6, "DOWN: save/resume"); rb->snprintf(str, 21, "High Score: $%d", bj->highscores[0]); rb->lcd_puts(0, 7, str); #elif (CONFIG_KEYPAD == IRIVER_H100_PAD) || (CONFIG_KEYPAD == IRIVER_H300_PAD) rb->lcd_puts(0, 2, "PLAY to start & to hit"); rb->lcd_puts(0, 3, "STOP to exit"); rb->lcd_puts(0, 4, "REC to stay"); rb->lcd_puts(0, 5, "NAVI to double down "); rb->lcd_puts(0, 6, " & to view highscores"); rb->lcd_puts(0, 7, "AB to save/resume"); rb->snprintf(str, 21, "High Score: $%d", bj->highscores[0]); rb->lcd_puts(0, 8, str); #elif CONFIG_KEYPAD == IRIVER_H10_PAD rb->lcd_puts(0, 2, "PLAY to start & hit"); rb->lcd_puts(0, 3, "POWER to exit"); rb->lcd_puts(0, 4, ">>| to stay"); rb->lcd_puts(0, 5, "|<< to double down"); rb->lcd_puts(0, 6, "LEFT to view scores"); rb->lcd_puts(0, 7, "RIGHT to save/resume"); rb->snprintf(str, 21, "High Score: $%d", bj->highscores[0]); rb->lcd_puts(0, 8, str); #elif (CONFIG_KEYPAD == IPOD_4G_PAD) || \ (CONFIG_KEYPAD == IPOD_3G_PAD) || \ (CONFIG_KEYPAD == IPOD_1G2G_PAD) #if LCD_WIDTH >=176 rb->lcd_puts(0, 2, "SELECT to start & to hit"); rb->lcd_puts(0, 3, "MENU to exit"); rb->lcd_puts(0, 4, ">>| to stay & to view highscores"); rb->lcd_puts(0, 5, "|<< to double down"); rb->lcd_puts(0, 6, "PLAY to save/resume"); rb->snprintf(str, 21, "High Score: $%d", bj->highscores[0]); rb->lcd_puts(0, 7, str); #else rb->lcd_puts(0, 2, "SELECT to start & to "); rb->lcd_puts(0, 3, " hit"); rb->lcd_puts(0, 4, "MENU to exit"); rb->lcd_puts(0, 5, ">>| to stay & to view "); rb->lcd_puts(0, 6, " highscores"); rb->lcd_puts(0, 7, "|<< to double down"); rb->lcd_puts(0, 8, "PLAY to save/resume"); rb->snprintf(str, 21, "High Score: $%d", bj->highscores[0]); rb->lcd_puts(0, 9, str); #endif #elif CONFIG_KEYPAD == IAUDIO_X5M5_PAD rb->lcd_puts(0, 2, "PLAY to start to hit"); rb->lcd_puts(0, 3, "POWER to exit"); rb->lcd_puts(0, 4, "SELECT to hit"); rb->lcd_puts(0, 5, "REC to stay"); rb->lcd_puts(0, 6, "PLAY to double down"); rb->lcd_puts(0, 7, "RIGHT to view highscores "); rb->lcd_puts(0, 8, "DOWN to save/resume"); rb->snprintf(str, 21, "High Score: $%d", bj->highscores[0]); rb->lcd_puts(0, 9, str); #elif CONFIG_KEYPAD == IRIVER_IFP7XX_PAD rb->lcd_puts(0, 2, "AB to start & to"); rb->lcd_puts(0, 3, " stay"); rb->lcd_puts(0, 4, "EQ to hit"); rb->lcd_puts(0, 5, "PLAY to exit"); rb->lcd_puts(0, 6, "CLICK to double down"); rb->lcd_puts(0, 7, "& to view highscores"); rb->lcd_puts(0, 8, "AB+EQ to save/resume"); rb->snprintf(str, 21, "High Score: $%d", bj->highscores[0]); rb->lcd_puts(0, 9, str); #elif CONFIG_KEYPAD == GIGABEAT_PAD rb->lcd_puts(0, 2, "POWER to start"); rb->lcd_puts(0, 3, "A to exit"); rb->lcd_puts(0, 4, "VOL+ to hit"); rb->lcd_puts(0, 5, "VOL- to stay"); rb->lcd_puts(0, 6, "CENTER to double down"); rb->lcd_puts(0, 6, "RIGHT to view highscores "); rb->lcd_puts(0, 8, "MENU to save/resume"); rb->snprintf(str, 21, "High Score: $%d", bj->highscores[0]); rb->lcd_puts(0, 9, str); #elif (CONFIG_KEYPAD == SANSA_E200_PAD) rb->lcd_puts(0, 2, "SELECT to start & to hit"); rb->lcd_puts(0, 3, "POWER to exit"); rb->lcd_puts(0, 4, "RIGHT to stay"); rb->lcd_puts(0, 5, "LEFT to double down"); rb->lcd_puts(0, 6, "REC to save/resume"); rb->lcd_puts(0, 7, "UP to view scores"); rb->snprintf(str, 21, "High Score: $%d", bj->highscores[0]); rb->lcd_puts(0, 8, str); #elif (CONFIG_KEYPAD == SANSA_C200_PAD) rb->lcd_puts(0, 2, "SELECT to start & to hit"); rb->lcd_puts(0, 3, "POWER to exit"); rb->lcd_puts(0, 4, "RIGHT to stay"); rb->lcd_puts(0, 5, "LEFT to double down"); rb->lcd_puts(0, 6, "DOWN to save/resume"); rb->lcd_puts(0, 7, "REC to view scores"); rb->snprintf(str, 21, "High Score: $%d", bj->highscores[0]); rb->lcd_puts(0, 9, str); #elif CONFIG_KEYPAD == IAUDIO_M3_PAD rb->lcd_puts(0, 2, "PLAY to start & to"); rb->lcd_puts(0, 3, " hit"); rb->lcd_puts(0, 4, "REC to exit"); rb->lcd_puts(0, 5, "FF to stay"); rb->lcd_puts(0, 6, "REW to double down"); rb->lcd_puts(0, 7, "MODE to save/resume"); rb->lcd_puts(0, 8, "MENU to view scores"); rb->snprintf(str, 21, "High Score: $%d", bj->highscores[0]); rb->lcd_puts(0, 10, str); #elif CONFIG_KEYPAD == COWOND2_PAD rb->lcd_puts(0, 6, "POWER to exit"); rb->lcd_puts(0, 7, "MINUS to double down"); rb->lcd_puts(0, 8, "MENU to view scores"); rb->snprintf(str, 21, "High Score: $%d", bj->highscores[0]); rb->lcd_puts(0, 10, str); #endif #ifdef HAVE_TOUCHPAD rb->lcd_puts(0, 2, "LCD CENTRE to start & to hit"); rb->lcd_puts(0, 3, "LCD BOTTOMLEFT to stay"); rb->lcd_puts(0, 4, "LCD BOTTOMRIGHT to save/resume"); #endif } else { rb->snprintf(str, 12, "%s", "High Scores"); rb->lcd_getstringsize(str, &w, &h); rb->lcd_putsxy((LCD_WIDTH-w)/2, 0, str); /* print high scores */ for(i=0; isnprintf(str, 14, "#%02d: $%d", i+1, bj->highscores[i]); rb->lcd_puts(0, i+1, str); } } rb->lcd_update(); /* handle menu button presses */ button = rb->button_get(true); switch(button) { case BJACK_START: /* start playing */ breakout = true; break; case BJACK_QUIT: /* quit program */ if(showscores) { showscores = 0; break; } return BJ_QUIT; case BJACK_RESUME:/* resume game */ if(!blackjack_loadgame(bj)) { rb->splash(HZ*2, "Nothing to resume"); } else { rb->splash(HZ*2, "Loading..."); breakout = true; } break; case BJACK_SCORES:/* toggle high scores */ showscores = !showscores; break; default: if(rb->default_event_handler_ex(button, blackjack_callback, (void*) bj) == SYS_USB_CONNECTED) return BJ_USB; break; } if(breakout) break; } return(0); } /***************************************************************************** * blackjack() is the main game subroutine, it returns the final game status. ******************************************************************************/ static int blackjack(struct game_context* bj) { int button; unsigned int w, h, temp_var, done = 0, todo = 1; signed int temp; bool breakout = false; bool dbl_down = false; /* don't resume by default */ bj->resume = false; /******************** * menu * ********************/ temp_var = blackjack_menu(bj); if (temp_var == BJ_QUIT || temp_var == BJ_USB) return temp_var; /******************** * init * ********************/ blackjack_init(bj); bj->current_bet=10; /******************** * play * ********************/ /* check for resumed game */ if(bj->resume) { bj->resume = false; redraw_board(bj); if (bj->split_status == 2) { todo=2; player_x = bj->num_player_cards[0] * 10 + 4; } else if (bj->split_status == 3) { player_x = bj->num_player_cards[1] * 10 + LCD_WIDTH/2 + 4; todo=2; done=1; } } else { bj->player_money = 1000; blackjack_get_bet(bj); if (bj->current_bet == 0) return BJ_QUIT; rb->lcd_clear_display(); deal_init_cards(bj); blackjack_drawtable(bj); } rb->lcd_update(); breakout = false; while(true){ if(bj->player_total == 21 && bj->num_player_cards[0] == 2) { bj->is_blackjack = true; bj->end_hand = true; finish_game(bj); } else if(bj->dealer_cards[1].is_soft_ace && !breakout && !bj->asked_insurance) { temp_var = insurance(bj); if (bj->dealer_total == 21) { rb->splash(HZ, "Dealer has blackjack"); bj->player_money += temp_var; bj->end_hand = true; breakout = true; redraw_board(bj); finish_game(bj); } else { rb->splash(HZ, "Dealer does not have blackjack"); bj->player_money -= temp_var; breakout = true; redraw_board(bj); rb->lcd_update(); } } if(bj->split_status == 0 && bj->player_cards[0][0].num == bj->player_cards[0][1].num) { split(bj); redraw_board(bj); rb->lcd_update_rect(0, LCD_HEIGHT/2, LCD_WIDTH, LCD_HEIGHT/2); if (bj->split_status == 2) { todo++; player_x = bj->num_player_cards[0] * 10 + 4; } } while(done < todo) { button = rb->button_get(true); switch(button) { case BJACK_HIT: NEXT_CARD = new_card(); bj->player_total += NEXT_CARD.value; draw_card(NEXT_CARD, true, player_x, player_y); bj->num_player_cards[done]++; if (bj->num_player_cards[done] == MAX_CARDS + 1) { redraw_board(bj); rb->lcd_update_rect(0, LCD_HEIGHT/2, LCD_WIDTH, LCD_HEIGHT/2); } else if (bj->num_player_cards[done]>MAX_CARDS || todo > 1) { rb->lcd_update_rect(player_x, player_y, CARD_WIDTH+2, CARD_HEIGHT+2); player_x += 10; } else { rb->lcd_update_rect(player_x, player_y, CARD_WIDTH+2, CARD_HEIGHT+2); player_x += CARD_WIDTH + 4; } update_total(bj); break; case BJACK_STAY: bj->end_hand = true; break; case BJACK_DOUBLEDOWN: if ((signed int)bj->current_bet * 2 < bj->player_money + 1 && bj->num_player_cards[0]==2 && todo==1) { double_down(bj); dbl_down = true; if (bj->player_total < 22) { bj->end_hand = true; finish_game(bj); } } else if((signed int)bj->current_bet * 2 > bj->player_money) { rb->splash(HZ, "Not enough money to double down."); redraw_board(bj); rb->lcd_update(); } break; case BJACK_RESUME: /* save and end game */ rb->splash(HZ, "Saving game..."); blackjack_savegame(bj); /* fall through to BJACK_QUIT */ case BJACK_QUIT: return BJ_END; } while (bj->player_total > 21 && !bj->end_hand) { temp = check_for_aces(bj->player_cards[done], bj->num_player_cards[done]); if(temp != -1) { bj->player_cards[done][temp].is_soft_ace = false; bj->player_total -= 10; update_total(bj); if (dbl_down) { bj->end_hand = true; finish_game(bj); } } else bj->end_hand = true; } if (bj->end_hand) { done++; if(todo > 1) { if (done == 2) { temp = bj->player_total; bj->player_total = temp_var; temp_var = temp; finish_game(bj); rb->lcd_getstringsize(" Split 1 ", &w, &h); rb->lcd_putsxy(LCD_WIDTH/2-w/2, LCD_HEIGHT/2-3*h/2, " Split 1 "); rb->lcd_update_rect(LCD_WIDTH/2-w/2, LCD_HEIGHT/2-3*h/2, w,h); bj->current_bet /= 2; rb->lcd_update_rect(LCD_WIDTH/2-w/2, LCD_HEIGHT/2-3*h/2, w,h); rb->sleep(HZ*2); bj->player_total = temp_var; finish_game(bj); rb->lcd_getstringsize(" Split 2 ", &w, &h); rb->lcd_putsxy(LCD_WIDTH/2-w/2, LCD_HEIGHT/2-3*h/2, " Split 2 "); rb->lcd_update_rect(LCD_WIDTH/2-w/2, LCD_HEIGHT/2-3*h/2, w,h); rb->sleep(HZ*2); } else { bj->end_hand = false; bj->split_status = 3; temp_var = bj->player_total; bj->player_total = bj->player_cards[1][0].value; update_total(bj); redraw_board(bj); player_x += 10; rb->lcd_update(); } } else finish_game(bj); } } if (bj->player_money < 10) { rb->sleep(HZ); return BJ_LOSE; } if (bj->end_hand) { /* If hand is over */ if (play_again() != 0) /* User wants to quit */ return BJ_END; else { /* User keeps playing */ breakout = false; redraw_board(bj); if(dbl_down) { bj->current_bet /= 2; dbl_down = false; } done = 0; todo = 1; blackjack_init(bj); blackjack_get_bet(bj); if (bj->current_bet == 0) return BJ_END; deal_init_cards(bj); blackjack_drawtable(bj); rb->lcd_update(); } } } /* Never reached */ return PLUGIN_OK; } /***************************************************************************** * plugin entry point. ******************************************************************************/ enum plugin_status plugin_start(const struct plugin_api* api, const void* parameter) { struct game_context bj; bool exit = false; unsigned int position; char str[19]; (void)parameter; rb = api; #if LCD_DEPTH > 1 rb->lcd_set_backdrop(NULL); #endif /* load high scores */ blackjack_loadscores(&bj); rb->lcd_setfont(FONT_SYSFIXED); while(!exit) { switch(blackjack(&bj)){ case BJ_LOSE: rb->splash(HZ, "Not enough money to continue"); /* fall through to BJ_END */ case BJ_END: if(!bj.resume) { if((position = blackjack_recordscore(&bj))) { rb->snprintf(str, 19, "New high score #%d!", position); rb->splash(HZ*2, str); } } break; case BJ_USB: rb->lcd_setfont(FONT_UI); return PLUGIN_USB_CONNECTED; case BJ_QUIT: if(bj.dirty) { rb->splash(HZ, "Saving high scores..."); blackjack_savescores(&bj); } exit = true; break; default: break; } } rb->lcd_setfont(FONT_UI); return PLUGIN_OK; }