/*************************************************************************** * __________ __ ___. * Open \______ \ ____ ____ | | _\_ |__ _______ ___ * Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ / * Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < < * Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \ * \/ \/ \/ \/ \/ * $Id$ * * Copyright (C) 2002 Eric Linenberg * February 2003: Robert Hak performs a cleanup/rewrite/feature addition. * Eric smiles. Bjorn cries. Linus say 'huh?'. * * All files in this archive are subject to the GNU General Public License. * See the file COPYING in the source tree root for full license agreement. * * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY * KIND, either express or implied. * ****************************************************************************/ #include "plugin.h" #ifdef HAVE_LCD_BITMAP PLUGIN_HEADER #if LCD_DEPTH >= 2 extern const fb_data sokoban_tiles[]; #endif #define SOKOBAN_TITLE "Sokoban" #define LEVELS_FILE PLUGIN_DIR "/sokoban.levels" #define ROWS 16 #define COLS 20 #define SOKOBAN_LEVEL_SIZE (ROWS*COLS) #define MAX_BUFFERED_BOARDS 500 /* Use either all but 12k of the plugin buffer for board data or just enough for MAX_BUFFERED_BOARDS, which ever is less */ #if (PLUGIN_BUFFER_SIZE - 0x3000)/SOKOBAN_LEVEL_SIZE < MAX_BUFFERED_BOARDS #define NUM_BUFFERED_BOARDS (PLUGIN_BUFFER_SIZE - 0x3000)/SOKOBAN_LEVEL_SIZE #else #define NUM_BUFFERED_BOARDS MAX_BUFFERED_BOARDS #endif /* Use 4k plus remaining plugin buffer (-8k for prog) for undo, up to 32k */ #if PLUGIN_BUFFER_SIZE - NUM_BUFFERED_BOARDS*SOKOBAN_LEVEL_SIZE - 0x2000 > \ 0x7FFF #define MAX_UNDOS 0x7FFF #else #define MAX_UNDOS PLUGIN_BUFFER_SIZE - \ NUM_BUFFERED_BOARDS*SOKOBAN_LEVEL_SIZE - 0x2000 #endif /* Move/push definitions for undo */ enum { SOKOBAN_PUSH_LEFT, SOKOBAN_PUSH_RIGHT, SOKOBAN_PUSH_UP, SOKOBAN_PUSH_DOWN, SOKOBAN_MOVE_LEFT, SOKOBAN_MOVE_RIGHT, SOKOBAN_MOVE_UP, SOKOBAN_MOVE_DOWN }; #define SOKOBAN_MOVE_DIFF (SOKOBAN_MOVE_LEFT-SOKOBAN_PUSH_LEFT) #define SOKOBAN_MOVE_MIN SOKOBAN_MOVE_LEFT /* variable button definitions */ #if CONFIG_KEYPAD == RECORDER_PAD #define SOKOBAN_UP BUTTON_UP #define SOKOBAN_DOWN BUTTON_DOWN #define SOKOBAN_QUIT BUTTON_OFF #define SOKOBAN_UNDO BUTTON_ON #define SOKOBAN_REDO BUTTON_PLAY #define SOKOBAN_LEVEL_UP BUTTON_F3 #define SOKOBAN_LEVEL_DOWN BUTTON_F1 #define SOKOBAN_LEVEL_REPEAT BUTTON_F2 #elif CONFIG_KEYPAD == ARCHOS_AV300_PAD #define SOKOBAN_UP BUTTON_UP #define SOKOBAN_DOWN BUTTON_DOWN #define SOKOBAN_QUIT BUTTON_OFF #define SOKOBAN_UNDO BUTTON_ON #define SOKOBAN_REDO BUTTON_PLAY #define SOKOBAN_LEVEL_UP BUTTON_F3 #define SOKOBAN_LEVEL_DOWN BUTTON_F1 #define SOKOBAN_LEVEL_REPEAT BUTTON_F2 #elif CONFIG_KEYPAD == ONDIO_PAD #define SOKOBAN_UP BUTTON_UP #define SOKOBAN_DOWN BUTTON_DOWN #define SOKOBAN_QUIT BUTTON_OFF #define SOKOBAN_UNDO_PRE BUTTON_MENU #define SOKOBAN_UNDO (BUTTON_MENU | BUTTON_REL) #define SOKOBAN_REDO (BUTTON_MENU | BUTTON_DOWN) #define SOKOBAN_LEVEL_UP (BUTTON_MENU | BUTTON_RIGHT) #define SOKOBAN_LEVEL_DOWN (BUTTON_MENU | BUTTON_LEFT) #define SOKOBAN_LEVEL_REPEAT (BUTTON_MENU | BUTTON_UP) #elif (CONFIG_KEYPAD == IRIVER_H100_PAD) || \ (CONFIG_KEYPAD == IRIVER_H300_PAD) #define SOKOBAN_UP BUTTON_UP #define SOKOBAN_DOWN BUTTON_DOWN #define SOKOBAN_QUIT BUTTON_OFF #define SOKOBAN_UNDO BUTTON_REC #define SOKOBAN_REDO BUTTON_MODE #define SOKOBAN_LEVEL_UP (BUTTON_ON | BUTTON_UP) #define SOKOBAN_LEVEL_DOWN (BUTTON_ON | BUTTON_DOWN) #define SOKOBAN_LEVEL_REPEAT BUTTON_ON #define SOKOBAN_RC_QUIT BUTTON_RC_STOP #elif (CONFIG_KEYPAD == IPOD_4G_PAD) || \ (CONFIG_KEYPAD == IPOD_3G_PAD) #define SOKOBAN_UP BUTTON_MENU #define SOKOBAN_DOWN BUTTON_PLAY #define SOKOBAN_QUIT (BUTTON_SELECT | BUTTON_MENU) #define SOKOBAN_UNDO_PRE BUTTON_SELECT #define SOKOBAN_UNDO (BUTTON_SELECT | BUTTON_REL) #define SOKOBAN_REDO (BUTTON_SELECT | BUTTON_PLAY) #define SOKOBAN_LEVEL_UP (BUTTON_SELECT | BUTTON_RIGHT) #define SOKOBAN_LEVEL_DOWN (BUTTON_SELECT | BUTTON_LEFT) /* fixme: if/when simultaneous button presses work for X5, add redo & level repeat */ #elif (CONFIG_KEYPAD == IAUDIO_X5M5_PAD) #define SOKOBAN_UP BUTTON_UP #define SOKOBAN_DOWN BUTTON_DOWN #define SOKOBAN_QUIT BUTTON_POWER #define SOKOBAN_UNDO_PRE BUTTON_SELECT #define SOKOBAN_UNDO (BUTTON_SELECT | BUTTON_REL) #define SOKOBAN_LEVEL_UP BUTTON_PLAY #define SOKOBAN_LEVEL_DOWN BUTTON_REC #elif (CONFIG_KEYPAD == GIGABEAT_PAD) #define SOKOBAN_UP BUTTON_UP #define SOKOBAN_DOWN BUTTON_DOWN #define SOKOBAN_QUIT BUTTON_A #define SOKOBAN_UNDO BUTTON_SELECT #define SOKOBAN_REDO BUTTON_POWER #define SOKOBAN_LEVEL_UP (BUTTON_MENU | BUTTON_UP) #define SOKOBAN_LEVEL_DOWN (BUTTON_MENU | BUTTON_DOWN) #define SOKOBAN_LEVEL_REPEAT BUTTON_MENU #elif (CONFIG_KEYPAD == SANSA_E200_PAD) #define SOKOBAN_UP BUTTON_UP #define SOKOBAN_DOWN BUTTON_DOWN #define SOKOBAN_QUIT BUTTON_POWER #define SOKOBAN_UNDO_PRE BUTTON_SELECT #define SOKOBAN_UNDO (BUTTON_SELECT | BUTTON_REL) #define SOKOBAN_REDO BUTTON_REC #define SOKOBAN_LEVEL_UP (BUTTON_SELECT | BUTTON_UP) #define SOKOBAN_LEVEL_DOWN (BUTTON_SELECT | BUTTON_DOWN) #define SOKOBAN_LEVEL_REPEAT (BUTTON_SELECT | BUTTON_RIGHT) #elif (CONFIG_KEYPAD == IRIVER_H10_PAD) #define SOKOBAN_UP BUTTON_SCROLL_UP #define SOKOBAN_DOWN BUTTON_SCROLL_DOWN #define SOKOBAN_QUIT BUTTON_POWER #define SOKOBAN_UNDO_PRE BUTTON_REW #define SOKOBAN_UNDO (BUTTON_REW | BUTTON_REL) #define SOKOBAN_REDO BUTTON_FF #define SOKOBAN_LEVEL_UP (BUTTON_PLAY | BUTTON_SCROLL_UP) #define SOKOBAN_LEVEL_DOWN (BUTTON_PLAY | BUTTON_SCROLL_DOWN) #define SOKOBAN_LEVEL_REPEAT (BUTTON_PLAY | BUTTON_RIGHT) #endif #ifdef HAVE_LCD_COLOR /* Background color. Default Rockbox light blue. */ #define BG_COLOR LCD_RGBPACK(181, 199, 231) #elif LCD_DEPTH >= 2 #define MEDIUM_GRAY LCD_BRIGHTNESS(127) #endif /* The Location, Undo and LevelInfo structs are OO-flavored. * (oooh!-flavored as Schnueff puts it.) It makes more you have to know, * but the overall data layout becomes more manageable. */ /* Level data & stats */ struct LevelInfo { short level; short moves; short pushes; short boxes_to_go; }; struct Location { short row; short col; }; struct Board { char spaces[ROWS][COLS]; }; /* Our full undo history */ static struct UndoInfo { short count; /* How many undos are left */ short current; /* Which history is the current undo */ short max; /* Which history is the max redoable */ char history[MAX_UNDOS]; } undo_info; /* Our playing board */ static struct BoardInfo { char board[ROWS][COLS]; struct LevelInfo level; struct Location player; int max_level; /* How many levels do we have? */ int loaded_level; /* Which level is in memory */ } current_info; static struct BufferedBoards { struct Board levels[NUM_BUFFERED_BOARDS]; int low; } buffered_boards; static struct plugin_api* rb; static void init_undo(void) { undo_info.count = 0; undo_info.current = -1; undo_info.max = -1; } static void get_delta(char direction, short *d_r, short *d_c) { switch (direction) { case SOKOBAN_PUSH_LEFT: case SOKOBAN_MOVE_LEFT: *d_r = 0; *d_c = -1; break; case SOKOBAN_PUSH_RIGHT: case SOKOBAN_MOVE_RIGHT: *d_r = 0; *d_c = 1; break; case SOKOBAN_PUSH_UP: case SOKOBAN_MOVE_UP: *d_r = -1; *d_c = 0; break; case SOKOBAN_PUSH_DOWN: case SOKOBAN_MOVE_DOWN: *d_r = 1; *d_c = 0; } } static void undo(void) { char undo; short r, c; short d_r = 0, d_c = 0; /* delta row & delta col */ char *space_cur, *space_next, *space_prev; bool undo_push = false; /* If no more undos or we've wrapped all the way around, quit */ if (undo_info.count == 0 || undo_info.current-1 == undo_info.max) return; undo = undo_info.history[undo_info.current]; if (undo < SOKOBAN_MOVE_MIN) undo_push = true; get_delta(undo, &d_r, &d_c); r = current_info.player.row; c = current_info.player.col; /* Give the 3 spaces we're going to use better names */ space_cur = ¤t_info.board[r][c]; space_next = ¤t_info.board[r + d_r][c + d_c]; space_prev = ¤t_info.board[r - d_r][c - d_c]; /* Update board info */ if (undo_push) { /* Moving box from goal to blank */ if (*space_next == '%' && *space_cur == '@') current_info.level.boxes_to_go++; /* Moving box from blank to goal */ else if (*space_next == '$' && *space_cur == '+') current_info.level.boxes_to_go--; /* Move box off of next space... */ *space_next = (*space_next == '%' ? '.' : ' '); /* ...and on to current space */ *space_cur = (*space_cur == '+' ? '%' : '$'); current_info.level.pushes--; } else /* Just move player off of current space */ *space_cur = (*space_cur == '+' ? '.' : ' '); /* Move player back to previous space */ *space_prev = (*space_prev == '.' ? '+' : '@'); /* Update position */ current_info.player.row -= d_r; current_info.player.col -= d_c; current_info.level.moves--; /* Move to previous undo in the list */ if (undo_info.current == 0 && undo_info.count > 1) undo_info.current = MAX_UNDOS - 1; else undo_info.current--; undo_info.count--; return; } static void add_undo(char undo) { /* Wrap around if MAX_UNDOS exceeded */ if (undo_info.current < (MAX_UNDOS - 1)) undo_info.current++; else undo_info.current = 0; undo_info.history[undo_info.current] = undo; if (undo_info.count < MAX_UNDOS) undo_info.count++; } static bool move(char direction, bool redo) { short r, c; short d_r = 0, d_c = 0; /* delta row & delta col */ char *space_cur, *space_next, *space_beyond; bool push = false; get_delta(direction, &d_r, &d_c); r = current_info.player.row; c = current_info.player.col; /* Check for out-of-bounds */ if (r + 2*d_r < 0 || r + 2*d_r >= ROWS || c + 2*d_c < 0 || c + 2*d_c >= COLS) return false; /* Give the 3 spaces we're going to use better names */ space_cur = ¤t_info.board[r][c]; space_next = ¤t_info.board[r + d_r][c + d_c]; space_beyond = ¤t_info.board[r + 2*d_r][c + 2*d_c]; if (*space_next == '$' || *space_next == '%') { /* Change direction from move to push for undo */ if (direction >= SOKOBAN_MOVE_MIN) direction -= SOKOBAN_MOVE_DIFF; push = true; } /* Update board info */ if (push) { /* Moving box from goal to blank */ if (*space_next == '%' && *space_beyond == ' ') current_info.level.boxes_to_go++; /* Moving box from blank to goal */ else if (*space_next == '$' && *space_beyond == '.') current_info.level.boxes_to_go--; /* Check for illegal move */ else if (*space_beyond != '.' && *space_beyond != ' ') return false; /* Move player onto next space */ *space_next = (*space_next == '%' ? '+' : '@'); /* Move box onto space beyond next */ *space_beyond = (*space_beyond == '.' ? '%' : '$'); current_info.level.pushes++; } else { /* Check for illegal move */ if (*space_next == '#' || *space_next == 'X') return false; /* Move player onto next space */ *space_next = (*space_next == '.' ? '+' : '@'); } /* Move player off of current space */ *space_cur = (*space_cur == '+' ? '.' : ' '); /* Update position */ current_info.player.row += d_r; current_info.player.col += d_c; current_info.level.moves++; /* Update undo_info.max to current on every normal move, except if it's the same as a redo. */ /* normal move */ if (!redo && /* moves have been undone */ ((undo_info.max != undo_info.current && /* and the current move is NOT the same as the one in history */ undo_info.history[undo_info.current+1] != direction) || /* or moves have not been undone */ undo_info.max == undo_info.current)) { add_undo(direction); undo_info.max = undo_info.current; } else /* redo move or move was same as redo */ add_undo(direction); /* (just to update current) */ return true; } #ifdef SOKOBAN_REDO static bool redo(void) { /* If no moves have been undone, quit */ if (undo_info.current == undo_info.max) return false; return move(undo_info.history[(undo_info.current+1 < MAX_UNDOS ? undo_info.current+1 : 0)], true); } #endif static void init_boards(void) { current_info.level.level = 0; current_info.level.moves = 0; current_info.level.pushes = 0; current_info.level.boxes_to_go = 0; current_info.player.row = 0; current_info.player.col = 0; current_info.max_level = 0; current_info.loaded_level = 0; buffered_boards.low = 0; init_undo(); } static int read_levels(int initialize_count) { int fd = 0; int len; int lastlen = 0; int row = 0; int level_count = 0; char buffer[COLS + 3]; /* COLS plus CR/LF and \0 */ int endpoint = current_info.level.level-1; if (endpoint < buffered_boards.low) endpoint = current_info.level.level - NUM_BUFFERED_BOARDS; if (endpoint < 0) endpoint = 0; buffered_boards.low = endpoint; endpoint += NUM_BUFFERED_BOARDS; if ((fd = rb->open(LEVELS_FILE, O_RDONLY)) < 0) { rb->splash(HZ*2, "Unable to open %s", LEVELS_FILE); return -1; } do { len = rb->read_line(fd, buffer, sizeof(buffer)); if (len >= 3) { /* This finds lines that are more than 1 or 2 characters * shorter than they should be. Due to the possibility of * a mixed unix and dos CR/LF file format, I'm not going to * do a precise check */ if (len < COLS) { rb->splash(HZ*2, "Error in levels file: short line"); return -1; } if (level_count >= buffered_boards.low && level_count < endpoint) { int index = level_count - buffered_boards.low; rb->memcpy( buffered_boards.levels[index].spaces[row], buffer, COLS); } row++; } else if (len) { if (lastlen < 3) { /* Two short lines in a row means new level */ level_count++; if (level_count >= endpoint && !initialize_count) break; if (level_count && row != ROWS) { rb->splash(HZ*2, "Error in levels file: short board"); return -1; } row = 0; } } } while ((lastlen=len)); rb->close(fd); if (initialize_count) { /* Plus one because there aren't trailing short lines in the file */ current_info.max_level = level_count + 1; } return 0; } /* return non-zero on error */ static void load_level(void) { int c = 0; int r = 0; int index = current_info.level.level - buffered_boards.low - 1; struct Board *level; if (index < 0 || index >= NUM_BUFFERED_BOARDS) { read_levels(false); index = index < 0 ? NUM_BUFFERED_BOARDS-1 : 0; } level = &buffered_boards.levels[index]; current_info.level.boxes_to_go = 0; current_info.level.moves = 0; current_info.level.pushes = 0; current_info.loaded_level = current_info.level.level; for (r = 0; r < ROWS; r++) { for (c = 0; c < COLS; c++) { current_info.board[r][c] = level->spaces[r][c]; if (current_info.board[r][c] == '.' || current_info.board[r][c] == '+') current_info.level.boxes_to_go++; if (current_info.board[r][c] == '@' || current_info.board[r][c] == '+') { current_info.player.row = r; current_info.player.col = c; } } } } static void update_screen(void) { int b = 0, c = 0; int rows = 0, cols = 0; char s[25]; /* magnify is the number of pixels for each block */ #if (LCD_HEIGHT >= 224) && (LCD_WIDTH >= 312) || \ (LCD_HEIGHT >= 249) && (LCD_WIDTH >= 280) /* ipod 5g */ #define MAGNIFY 14 #elif (LCD_HEIGHT >= 144) && (LCD_WIDTH >= 212) || \ (LCD_HEIGHT >= 169) && (LCD_WIDTH >= 180-4) /* h3x0, ipod color/photo */ #define MAGNIFY 9 #elif (LCD_HEIGHT >= 96) && (LCD_WIDTH >= 152) || \ (LCD_HEIGHT >= 121) && (LCD_WIDTH >= 120) /* h1x0, ipod nano/mini */ #define MAGNIFY 6 #else /* other */ #define MAGNIFY 4 #endif #if LCD_DEPTH < 2 int i, j; int max = MAGNIFY - 1; int middle = max / 2; int ldelta = (middle + 1) / 2; #endif /* load the board to the screen */ for (rows=0; rows < ROWS; rows++) { for (cols = 0; cols < COLS; cols++) { c = cols * MAGNIFY; b = rows * MAGNIFY; switch(current_info.board[rows][cols]) { case 'X': /* black space */ break; case '#': /* this is a wall */ #if LCD_DEPTH >= 2 rb->lcd_bitmap_part(sokoban_tiles, 0, 1*MAGNIFY, MAGNIFY, c, b, MAGNIFY, MAGNIFY); #else for (i = c; i < c + MAGNIFY; i++) for (j = b; j < b + MAGNIFY; j++) if ((i ^ j) & 1) rb->lcd_drawpixel(i, j); #endif break; case '$': /* this is a box */ #if LCD_DEPTH >= 2 rb->lcd_bitmap_part(sokoban_tiles, 0, 2*MAGNIFY, MAGNIFY, c, b, MAGNIFY, MAGNIFY); #else /* Free boxes are not filled in */ rb->lcd_drawrect(c, b, MAGNIFY, MAGNIFY); #endif break; case '*': case '%': /* this is a box on a goal */ #if LCD_DEPTH >= 2 rb->lcd_bitmap_part(sokoban_tiles, 0, 3*MAGNIFY, MAGNIFY, c, b, MAGNIFY, MAGNIFY ); #else rb->lcd_drawrect(c, b, MAGNIFY, MAGNIFY); rb->lcd_drawrect(c+(MAGNIFY/2)-1, b+(MAGNIFY/2)-1, MAGNIFY/2, MAGNIFY/2); #endif break; case '.': /* this is a goal */ #if LCD_DEPTH >= 2 rb->lcd_bitmap_part(sokoban_tiles, 0, 4*MAGNIFY, MAGNIFY, c, b, MAGNIFY, MAGNIFY); #else rb->lcd_drawrect(c+(MAGNIFY/2)-1, b+(MAGNIFY/2)-1, MAGNIFY/2, MAGNIFY/2); #endif break; case '@': /* this is you */ #if LCD_DEPTH >= 2 rb->lcd_bitmap_part(sokoban_tiles, 0, 5*MAGNIFY, MAGNIFY, c, b, MAGNIFY, MAGNIFY); #else rb->lcd_drawline(c, b+middle, c+max, b+middle); rb->lcd_drawline(c+middle, b, c+middle, b+max-ldelta); rb->lcd_drawline(c+max-middle, b, c+max-middle, b+max-ldelta); rb->lcd_drawline(c+middle, b+max-ldelta, c+middle-ldelta, b+max); rb->lcd_drawline(c+max-middle, b+max-ldelta, c+max-middle+ldelta, b+max); #endif break; case '+': /* this is you on drugs, erm, on a goal */ #if LCD_DEPTH >= 2 rb->lcd_bitmap_part(sokoban_tiles, 0, 6*MAGNIFY, MAGNIFY, c, b, MAGNIFY, MAGNIFY ); #else rb->lcd_drawline(c, b+middle, c+max, b+middle); rb->lcd_drawline(c+middle, b, c+middle, b+max-ldelta); rb->lcd_drawline(c+max-middle, b, c+max-middle, b+max-ldelta); rb->lcd_drawline(c+middle, b+max-ldelta, c+middle-ldelta, b+max); rb->lcd_drawline(c+max-middle, b+max-ldelta, c+max-middle+ldelta, b+max); rb->lcd_drawline(c+middle-1, b+middle+1, c+max-middle+1, b+middle+1); #endif break; #if LCD_DEPTH >= 2 default: rb->lcd_bitmap_part(sokoban_tiles, 0, 0*MAGNIFY, MAGNIFY, c, b, MAGNIFY, MAGNIFY ); #endif } } } #if LCD_WIDTH-(COLS*MAGNIFY) < 32 #define STAT_SIZE 25 #define STAT_POS LCD_HEIGHT-STAT_SIZE #define STAT_CENTER (LCD_WIDTH-120)/2 rb->lcd_putsxy(4+STAT_CENTER, STAT_POS+4, "Level"); rb->snprintf(s, sizeof(s), "%d", current_info.level.level); rb->lcd_putsxy(7+STAT_CENTER, STAT_POS+14, s); rb->lcd_putsxy(41+STAT_CENTER, STAT_POS+4, "Moves"); rb->snprintf(s, sizeof(s), "%d", current_info.level.moves); rb->lcd_putsxy(44+STAT_CENTER, STAT_POS+14, s); rb->lcd_putsxy(79+STAT_CENTER, STAT_POS+4, "Pushes"); rb->snprintf(s, sizeof(s), "%d", current_info.level.pushes); rb->lcd_putsxy(82+STAT_CENTER, STAT_POS+14, s); rb->lcd_drawrect(STAT_CENTER, STAT_POS, 38, STAT_SIZE); rb->lcd_drawrect(37+STAT_CENTER, STAT_POS, 39, STAT_SIZE); rb->lcd_drawrect(75+STAT_CENTER, STAT_POS, 45, STAT_SIZE); #else #define STAT_POS COLS*MAGNIFY #define STAT_SIZE LCD_WIDTH-STAT_POS rb->lcd_putsxy(STAT_POS+1, 3, "Level"); rb->snprintf(s, sizeof(s), "%d", current_info.level.level); rb->lcd_putsxy(STAT_POS+4, 13, s); rb->lcd_putsxy(STAT_POS+1, 26, "Moves"); rb->snprintf(s, sizeof(s), "%d", current_info.level.moves); rb->lcd_putsxy(STAT_POS+4, 36, s); rb->lcd_drawrect(STAT_POS, 0, STAT_SIZE, 24); rb->lcd_drawrect(STAT_POS, 23, STAT_SIZE, 24); #if LCD_HEIGHT >= 70 rb->lcd_putsxy(STAT_POS+1, 49, "Pushes"); rb->snprintf(s, sizeof(s), "%d", current_info.level.pushes); rb->lcd_putsxy(STAT_POS+4, 59, s); rb->lcd_drawrect(STAT_POS, 46, STAT_SIZE, 24); #endif #endif /* print out the screen */ rb->lcd_update(); } static void draw_level(void) { load_level(); rb->lcd_clear_display(); update_screen(); } static bool sokoban_loop(void) { bool moved = true; int i = 0, button = 0, lastbutton = 0; short r = 0, c = 0; int w, h; char s[25]; current_info.level.level = 1; load_level(); update_screen(); while (1) { moved = true; r = current_info.player.row; c = current_info.player.col; button = rb->button_get(true); switch(button) { #ifdef SOKOBAN_RC_QUIT case SOKOBAN_RC_QUIT: #endif case SOKOBAN_QUIT: /* get out of here */ #ifdef HAVE_LCD_COLOR /* reset background color */ rb->lcd_set_background(rb->global_settings->bg_color); #endif return PLUGIN_OK; case SOKOBAN_UNDO: #ifdef SOKOBAN_UNDO_PRE if (lastbutton != SOKOBAN_UNDO_PRE) break; #else /* repeat can't work here for Ondio et al */ case SOKOBAN_UNDO | BUTTON_REPEAT: #endif undo(); rb->lcd_clear_display(); update_screen(); moved = false; break; #ifdef SOKOBAN_REDO case SOKOBAN_REDO: case SOKOBAN_REDO | BUTTON_REPEAT: moved = redo(); rb->lcd_clear_display(); update_screen(); break; #endif case SOKOBAN_LEVEL_UP: case SOKOBAN_LEVEL_UP | BUTTON_REPEAT: /* next level */ init_undo(); if (current_info.level.level < current_info.max_level) current_info.level.level++; draw_level(); moved = false; break; case SOKOBAN_LEVEL_DOWN: case SOKOBAN_LEVEL_DOWN | BUTTON_REPEAT: /* previous level */ init_undo(); if (current_info.level.level > 1) current_info.level.level--; draw_level(); moved = false; break; #ifdef SOKOBAN_LEVEL_REPEAT case SOKOBAN_LEVEL_REPEAT: case SOKOBAN_LEVEL_REPEAT | BUTTON_REPEAT: /* same level */ init_undo(); draw_level(); moved = false; break; #endif case BUTTON_LEFT: case BUTTON_LEFT | BUTTON_REPEAT: moved = move(SOKOBAN_MOVE_LEFT, false); break; case BUTTON_RIGHT: case BUTTON_RIGHT | BUTTON_REPEAT: moved = move(SOKOBAN_MOVE_RIGHT, false); break; case SOKOBAN_UP: case SOKOBAN_UP | BUTTON_REPEAT: moved = move(SOKOBAN_MOVE_UP, false); break; case SOKOBAN_DOWN: case SOKOBAN_DOWN | BUTTON_REPEAT: moved = move(SOKOBAN_MOVE_DOWN, false); break; default: if (rb->default_event_handler(button) == SYS_USB_CONNECTED) return PLUGIN_USB_CONNECTED; moved = false; break; } if (button != BUTTON_NONE) lastbutton = button; if (moved) { rb->lcd_clear_display(); update_screen(); } /* We have completed this level */ if (current_info.level.boxes_to_go == 0) { if (moved) { rb->lcd_clear_display(); /* Center level completed message */ rb->snprintf(s, sizeof(s), "Level %d Complete!", current_info.level.level); rb->lcd_getstringsize(s, &w, &h); rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 - 16 , s); rb->snprintf(s, sizeof(s), "%4d Moves ", current_info.level.moves); rb->lcd_getstringsize(s, &w, &h); rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 + 0 , s); rb->snprintf(s, sizeof(s), "%4d Pushes", current_info.level.pushes); rb->lcd_getstringsize(s, &w, &h); rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 + 8 , s); rb->lcd_update(); rb->button_get(false); rb->sleep(HZ/2); for (i = 0; i < 30; i++) { rb->sleep(HZ/20); button = rb->button_get(false); if (button && ((button & BUTTON_REL) != BUTTON_REL)) break; } } current_info.level.level++; /* clear undo stats */ init_undo(); rb->lcd_clear_display(); if (current_info.level.level > current_info.max_level) { /* Center "You WIN!!" on all screen sizes */ rb->snprintf(s, sizeof(s), "You WIN!!"); rb->lcd_getstringsize(s, &w, &h); rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 - h/2, s); rb->lcd_set_drawmode(DRMODE_COMPLEMENT); /* Display for 10 seconds or until keypress */ for (i = 0; i < 200; i++) { rb->lcd_fillrect(0, 0, LCD_WIDTH, LCD_HEIGHT); rb->lcd_update(); rb->sleep(HZ/20); button = rb->button_get(false); if (button && ((button & BUTTON_REL) != BUTTON_REL)) break; } rb->lcd_set_drawmode(DRMODE_SOLID); return PLUGIN_OK; } load_level(); update_screen(); } } /* end while */ return PLUGIN_OK; } enum plugin_status plugin_start(struct plugin_api* api, void* parameter) { int w, h; int i; int button = 0; (void)(parameter); rb = api; rb->lcd_setfont(FONT_SYSFIXED); #ifdef HAVE_LCD_COLOR rb->lcd_set_background(BG_COLOR); #endif rb->lcd_clear_display(); rb->lcd_getstringsize(SOKOBAN_TITLE, &w, &h); rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 - h/2, SOKOBAN_TITLE); rb->lcd_update(); rb->sleep(HZ); rb->lcd_clear_display(); #if (CONFIG_KEYPAD == RECORDER_PAD) || \ (CONFIG_KEYPAD == ARCHOS_AV300_PAD) rb->lcd_putsxy(3, 6, "[OFF] Quit"); rb->lcd_putsxy(3, 16, "[ON] Undo"); rb->lcd_putsxy(3, 26, "[PLAY] Redo"); rb->lcd_putsxy(3, 36, "[F1] Down a Level"); rb->lcd_putsxy(3, 46, "[F2] Restart Level"); rb->lcd_putsxy(3, 56, "[F3] Up a Level"); #elif CONFIG_KEYPAD == ONDIO_PAD rb->lcd_putsxy(3, 6, "[OFF] Quit"); rb->lcd_putsxy(3, 16, "[MODE] Undo"); rb->lcd_putsxy(3, 26, "[MODE+DOWN] Redo"); rb->lcd_putsxy(3, 36, "[MODE+LEFT] Down a Level"); rb->lcd_putsxy(3, 46, "[MODE+UP] Restart Level"); rb->lcd_putsxy(3, 56, "[MODE+RIGHT] Up Level"); #elif (CONFIG_KEYPAD == IRIVER_H100_PAD) || \ (CONFIG_KEYPAD == IRIVER_H300_PAD) rb->lcd_putsxy(3, 6, "[STOP] Quit"); rb->lcd_putsxy(3, 16, "[REC] Undo"); rb->lcd_putsxy(3, 26, "[MODE] Redo"); rb->lcd_putsxy(3, 36, "[PLAY+DOWN] Down a Level"); rb->lcd_putsxy(3, 46, "[PLAY] Restart Level"); rb->lcd_putsxy(3, 56, "[PLAY+UP] Up a Level"); #elif (CONFIG_KEYPAD == IPOD_4G_PAD) || \ (CONFIG_KEYPAD == IPOD_3G_PAD) rb->lcd_putsxy(3, 6, "[SELECT+MENU] Quit"); rb->lcd_putsxy(3, 16, "[SELECT] Undo"); rb->lcd_putsxy(3, 26, "[SELECT+PLAY] Redo"); rb->lcd_putsxy(3, 36, "[SELECT+LEFT] Down a Level"); rb->lcd_putsxy(3, 46, "[SELECT+RIGHT] Up a Level"); #elif CONFIG_KEYPAD == IAUDIO_X5M5_PAD rb->lcd_putsxy(3, 6, "[POWER] Quit"); rb->lcd_putsxy(3, 16, "[SELECT] Undo"); rb->lcd_putsxy(3, 26, "[REC] Down a Level"); rb->lcd_putsxy(3, 36, "[PLAY] Up Level"); #elif CONFIG_KEYPAD == GIGABEAT_PAD rb->lcd_putsxy(3, 6, "[A] Quit"); rb->lcd_putsxy(3, 16, "[SELECT] Undo"); rb->lcd_putsxy(3, 26, "[POWER] Redo"); rb->lcd_putsxy(3, 36, "[MENU+DOWN] Down a Level"); rb->lcd_putsxy(3, 46, "[MENU] Restart Level"); rb->lcd_putsxy(3, 56, "[MENU+UP] Up Level"); #elif CONFIG_KEYPAD == SANSA_E200_PAD rb->lcd_putsxy(3, 6, "[POWER] Quit"); rb->lcd_putsxy(3, 16, "[SELECT] Undo"); rb->lcd_putsxy(3, 26, "[REC] Redo"); rb->lcd_putsxy(3, 36, "[SELECT+DOWN] Down a Level"); rb->lcd_putsxy(3, 46, "[SELECT+RIGHT] Restart Level"); rb->lcd_putsxy(3, 56, "[SELECT+UP] Up Level"); #elif CONFIG_KEYPAD == IRIVER_H10_PAD rb->lcd_putsxy(3, 6, "[POWER] Quit"); rb->lcd_putsxy(3, 16, "[REW] Undo"); rb->lcd_putsxy(3, 26, "[FF] Redo"); rb->lcd_putsxy(3, 36, "[PLAY+DOWN] Down a Level"); rb->lcd_putsxy(3, 46, "[PLAY+RIGHT] Restart Level"); rb->lcd_putsxy(3, 56, "[PLAY+UP] Up Level"); #endif rb->lcd_update(); rb->button_get(false); /* Display for 3 seconds or until keypress */ for (i = 0; i < 60; i++) { rb->sleep(HZ/20); button = rb->button_get(false); if (button && ((button & BUTTON_REL) != BUTTON_REL)) break; } rb->lcd_clear_display(); init_boards(); if (read_levels(1) != 0) return PLUGIN_OK; return sokoban_loop(); } #endif