apps/plugins/snake.c

   1 /***************************************************************************
   2  *             __________               __   ___.
   3  *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
   4  *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
   5  *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
   6  *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
   7  *                     \/            \/     \/    \/            \/
   8  * $Id$
   9  *
  10  * Copyright (C) 2002 Itai Shaked
  11  *
  12  * This program is free software; you can redistribute it and/or
  13  * modify it under the terms of the GNU General Public License
  14  * as published by the Free Software Foundation; either version 2
  15  * of the License, or (at your option) any later version.
  16  *
  17  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
  18  * KIND, either express or implied.
  19  *
  20  ****************************************************************************/
  21
  22 /*
  23 Snake!
  24
  25 by Itai Shaked
  26
  27 ok, a little explanation -
  28 board holds the snake and apple position - 1+ - snake body (the number
  29 represents the age [1 is the snake's head]).
  30 -1 is an apple, and 0 is a clear spot.
  31 dir is the current direction of the snake - 0=up, 1=right, 2=down, 3=left;
  32
  33 */
  34
  35 #include "plugin.h"
  36 #ifdef HAVE_LCD_BITMAP
  37
  38 PLUGIN_HEADER
  39
  40 /* variable button definitions */
  41 #if CONFIG_KEYPAD == RECORDER_PAD
  42 #define SNAKE_QUIT BUTTON_OFF
  43 #define SNAKE_LEFT BUTTON_LEFT
  44 #define SNAKE_RIGHT BUTTON_RIGHT
  45 #define SNAKE_UP   BUTTON_UP
  46 #define SNAKE_DOWN BUTTON_DOWN
  47 #define SNAKE_PLAYPAUSE BUTTON_PLAY
  48
  49 #elif CONFIG_KEYPAD == ARCHOS_AV300_PAD
  50 #define SNAKE_QUIT BUTTON_OFF
  51 #define SNAKE_LEFT BUTTON_LEFT
  52 #define SNAKE_RIGHT BUTTON_RIGHT
  53 #define SNAKE_UP   BUTTON_UP
  54 #define SNAKE_DOWN BUTTON_DOWN
  55 #define SNAKE_PLAYPAUSE BUTTON_SELECT
  56
  57 #elif CONFIG_KEYPAD == ONDIO_PAD
  58 #define SNAKE_QUIT BUTTON_OFF
  59 #define SNAKE_LEFT BUTTON_LEFT
  60 #define SNAKE_RIGHT BUTTON_RIGHT
  61 #define SNAKE_UP   BUTTON_UP
  62 #define SNAKE_DOWN BUTTON_DOWN
  63 #define SNAKE_PLAYPAUSE BUTTON_MENU
  64
  65 #elif (CONFIG_KEYPAD == IRIVER_H100_PAD) || \
  66       (CONFIG_KEYPAD == IRIVER_H300_PAD)
  67 #define SNAKE_QUIT BUTTON_OFF
  68 #define SNAKE_LEFT BUTTON_LEFT
  69 #define SNAKE_RIGHT BUTTON_RIGHT
  70 #define SNAKE_UP   BUTTON_UP
  71 #define SNAKE_DOWN BUTTON_DOWN
  72 #define SNAKE_PLAYPAUSE BUTTON_ON
  73
  74 #define SNAKE_RC_QUIT BUTTON_RC_STOP
  75
  76 #elif (CONFIG_KEYPAD == IPOD_4G_PAD) || \
  77       (CONFIG_KEYPAD == IPOD_3G_PAD) || \
  78       (CONFIG_KEYPAD == IPOD_1G2G_PAD)
  79 #define SNAKE_QUIT (BUTTON_SELECT|BUTTON_MENU)
  80 #define SNAKE_LEFT BUTTON_LEFT
  81 #define SNAKE_RIGHT BUTTON_RIGHT
  82 #define SNAKE_UP   BUTTON_MENU
  83 #define SNAKE_DOWN BUTTON_PLAY
  84 #define SNAKE_PLAYPAUSE BUTTON_SELECT
  85
  86 #elif (CONFIG_KEYPAD == IAUDIO_X5M5_PAD)
  87 #define SNAKE_QUIT BUTTON_POWER
  88 #define SNAKE_LEFT BUTTON_LEFT
  89 #define SNAKE_RIGHT BUTTON_RIGHT
  90 #define SNAKE_UP   BUTTON_UP
  91 #define SNAKE_DOWN BUTTON_DOWN
  92 #define SNAKE_PLAYPAUSE BUTTON_PLAY
  93
  94 #elif (CONFIG_KEYPAD == GIGABEAT_PAD)
  95 #define SNAKE_QUIT BUTTON_POWER
  96 #define SNAKE_LEFT BUTTON_LEFT
  97 #define SNAKE_RIGHT BUTTON_RIGHT
  98 #define SNAKE_UP   BUTTON_UP
  99 #define SNAKE_DOWN BUTTON_DOWN
 100 #define SNAKE_PLAYPAUSE BUTTON_SELECT
 101
 102 #elif (CONFIG_KEYPAD == SANSA_E200_PAD) || \
 103     (CONFIG_KEYPAD == SANSA_C200_PAD) || \
 104     (CONFIG_KEYPAD == SANSA_CLIP_PAD) || \
 105     (CONFIG_KEYPAD == SANSA_M200_PAD) || \
 106     (CONFIG_KEYPAD == SANSA_FUZE_PAD)
 107 #define SNAKE_QUIT BUTTON_POWER
 108 #define SNAKE_LEFT BUTTON_LEFT
 109 #define SNAKE_RIGHT BUTTON_RIGHT
 110 #define SNAKE_UP   BUTTON_UP
 111 #define SNAKE_DOWN BUTTON_DOWN
 112 #define SNAKE_PLAYPAUSE BUTTON_SELECT
 113
 114 #elif (CONFIG_KEYPAD == IRIVER_H10_PAD)
 115 #define SNAKE_QUIT BUTTON_POWER
 116 #define SNAKE_LEFT BUTTON_LEFT
 117 #define SNAKE_RIGHT BUTTON_RIGHT
 118 #define SNAKE_UP   BUTTON_SCROLL_UP
 119 #define SNAKE_DOWN BUTTON_SCROLL_DOWN
 120 #define SNAKE_PLAYPAUSE BUTTON_PLAY
 121
 122 #elif (CONFIG_KEYPAD == GIGABEAT_S_PAD)
 123 #define SNAKE_QUIT BUTTON_BACK
 124 #define SNAKE_LEFT BUTTON_LEFT
 125 #define SNAKE_RIGHT BUTTON_RIGHT
 126 #define SNAKE_UP   BUTTON_UP
 127 #define SNAKE_DOWN BUTTON_DOWN
 128 #define SNAKE_PLAYPAUSE BUTTON_SELECT
 129
 130 #elif (CONFIG_KEYPAD == MROBE100_PAD)
 131 #define SNAKE_QUIT BUTTON_POWER
 132 #define SNAKE_LEFT BUTTON_LEFT
 133 #define SNAKE_RIGHT BUTTON_RIGHT
 134 #define SNAKE_UP   BUTTON_UP
 135 #define SNAKE_DOWN BUTTON_DOWN
 136 #define SNAKE_PLAYPAUSE BUTTON_SELECT
 137
 138 #elif CONFIG_KEYPAD == IAUDIO_M3_PAD
 139 #define SNAKE_QUIT BUTTON_RC_REC
 140 #define SNAKE_LEFT BUTTON_RC_REW
 141 #define SNAKE_RIGHT BUTTON_RC_FF
 142 #define SNAKE_UP   BUTTON_RC_VOL_UP
 143 #define SNAKE_DOWN BUTTON_RC_VOL_DOWN
 144 #define SNAKE_PLAYPAUSE BUTTON_RC_PLAY
 145
 146 #define SNAKE_RC_QUIT BUTTON_REC
 147
 148 #elif (CONFIG_KEYPAD == COWOND2_PAD)
 149 #define SNAKE_QUIT BUTTON_POWER
 150
 151 #elif CONFIG_KEYPAD == CREATIVEZVM_PAD
 152 #define SNAKE_QUIT BUTTON_BACK
 153 #define SNAKE_LEFT BUTTON_LEFT
 154 #define SNAKE_RIGHT BUTTON_RIGHT
 155 #define SNAKE_UP   BUTTON_UP
 156 #define SNAKE_DOWN BUTTON_DOWN
 157 #define SNAKE_PLAYPAUSE BUTTON_PLAY
 158
 159 #elif CONFIG_KEYPAD == PHILIPS_HDD1630_PAD
 160 #define SNAKE_QUIT BUTTON_POWER
 161 #define SNAKE_LEFT BUTTON_LEFT
 162 #define SNAKE_RIGHT BUTTON_RIGHT
 163 #define SNAKE_UP   BUTTON_UP
 164 #define SNAKE_DOWN BUTTON_DOWN
 165 #define SNAKE_PLAYPAUSE BUTTON_MENU
 166
 167 #else
 168 #error No keymap defined!
 169 #endif
 170
 171 #ifdef HAVE_TOUCHSCREEN
 172 #ifndef SNAKE_QUIT
 173 #define SNAKE_QUIT      BUTTON_TOPLEFT
 174 #endif
 175 #ifndef SNAKE_LEFT
 176 #define SNAKE_LEFT      BUTTON_MIDLEFT
 177 #endif
 178 #ifndef SNAKE_RIGHT
 179 #define SNAKE_RIGHT     BUTTON_MIDRIGHT
 180 #endif
 181 #ifndef SNAKE_UP
 182 #define SNAKE_UP        BUTTON_TOPMIDDLE
 183 #endif
 184 #ifndef SNAKE_DOWN
 185 #define SNAKE_DOWN      BUTTON_BOTTOMMIDDLE
 186 #endif
 187 #ifndef SNAKE_PLAYPAUSE
 188 #define SNAKE_PLAYPAUSE BUTTON_CENTER
 189 #endif
 190 #endif
 191
 192 #define BOARD_WIDTH (LCD_WIDTH/4)
 193 #define BOARD_HEIGHT (LCD_HEIGHT/4)
 194
 195 static int board[BOARD_WIDTH][BOARD_HEIGHT],snakelength;
 196 static unsigned int score,hiscore=0,level=1;
 197 static int dir,dead=0;
 198 static bool apple;
 199
 200 void die (void)
 201 {
 202     char pscore[17];
 203     rb->lcd_clear_display();
 204     rb->snprintf(pscore,sizeof(pscore),"Your score: %d",score);
 205     rb->lcd_puts(0,0,"Oops...");
 206     rb->lcd_puts(0,1, pscore);
 207     if (score>hiscore) {
 208         hiscore=score;
 209         rb->lcd_puts(0,2,"New High Score!");
 210     }
 211     else {
 212         rb->snprintf(pscore,sizeof(pscore),"High Score: %d",hiscore);
 213         rb->lcd_puts(0,2,pscore);
 214     }
 215     rb->lcd_update();
 216     rb->sleep(3*HZ);
 217     dead=1;
 218 }
 219
 220 void colission (short x, short y)
 221 {
 222     switch (board[x][y]) {
 223         case 0:
 224             break;
 225         case -1:
 226             snakelength+=2;
 227             score+=level;
 228             apple=false;
 229             break;
 230         default:
 231             die();
 232             break;
 233     }
 234     if (x==BOARD_WIDTH || x<0 || y==BOARD_HEIGHT || y<0)
 235         die();
 236 }
 237
 238 void move_head (short x, short y)
 239 {
 240     switch (dir) {
 241         case 0:
 242             y-=1;
 243             break;
 244         case 1:
 245             x+=1;
 246             break;
 247         case 2:
 248             y+=1;
 249             break;
 250         case 3:
 251             x-=1;
 252             break;
 253     }
 254     colission (x,y);
 255     if (dead)
 256         return;
 257     board[x][y]=1;
 258     rb->lcd_fillrect(x*4,y*4,4,4);
 259 }
 260
 261 void frame (void)
 262 {
 263     short x,y,head=0;
 264     for (x=0; x<BOARD_WIDTH; x++) {
 265         for (y=0; y<BOARD_HEIGHT; y++) {
 266             switch (board[x][y]) {
 267                 case 1:
 268                     if (!head) {
 269                         move_head(x,y);
 270                         if (dead)
 271                             return;
 272                         board[x][y]++;
 273                         head=1;
 274                     }
 275                     break;
 276                 case 0:
 277                     break;
 278                 case -1:
 279                     break;
 280                 default:
 281                     if (board[x][y]==snakelength) {
 282                         board[x][y]=0;
 283                         rb->lcd_set_drawmode(DRMODE_SOLID|DRMODE_INVERSEVID);
 284                         rb->lcd_fillrect(x*4,y*4,4,4);
 285                         rb->lcd_set_drawmode(DRMODE_SOLID);
 286                     }
 287                     else
 288                         board[x][y]++;
 289                     break;
 290             }
 291         }
 292     }
 293     rb->lcd_update();
 294 }
 295
 296 void redraw (void)
 297 {
 298     short x,y;
 299     rb->lcd_clear_display();
 300     for (x=0; x<BOARD_WIDTH; x++) {
 301         for (y=0; y<BOARD_HEIGHT; y++) {
 302             switch (board[x][y]) {
 303                 case -1:
 304                     rb->lcd_fillrect((x*4)+1,y*4,2,4);
 305                     rb->lcd_fillrect(x*4,(y*4)+1,4,2);
 306                     break;
 307                 case 0:
 308                     break;
 309                 default:
 310                     rb->lcd_fillrect(x*4,y*4,4,4);
 311                     break;
 312             }
 313         }
 314     }
 315     rb->lcd_update();
 316 }
 317
 318 void game_pause (void) {
 319     int button;
 320     rb->lcd_clear_display();
 321     rb->lcd_putsxy(3,12,"Game Paused");
 322 #if CONFIG_KEYPAD == RECORDER_PAD
 323     rb->lcd_putsxy(3,22,"[Play] to resume");
 324 #elif CONFIG_KEYPAD == ONDIO_PAD
 325     rb->lcd_putsxy(3,22,"[Mode] to resume");
 326 #endif
 327     rb->lcd_putsxy(3,32,"[Off] to quit");
 328     rb->lcd_update();
 329     while (1) {
 330         button=rb->button_get(true);
 331         switch (button) {
 332 #ifdef SNAKE_RC_QUIT
 333             case SNAKE_RC_QUIT:
 334 #endif
 335             case SNAKE_QUIT:
 336                 dead=1;
 337                 return;
 338             case SNAKE_PLAYPAUSE:
 339                 redraw();
 340                 rb->sleep(HZ/2);
 341                 return;
 342             default:
 343                 if (rb->default_event_handler(button)==SYS_USB_CONNECTED) {
 344                     dead=2;
 345                     return;
 346                 }
 347                 break;
 348         }
 349     }
 350 }
 351
 352
 353 void game (void) {
 354     int button;
 355     short x,y;
 356     while (1) {
 357         frame();
 358         if (dead)
 359             return;
 360         if (!apple) {
 361             do {
 362                 x=rb->rand() % BOARD_WIDTH;
 363                 y=rb->rand() % BOARD_HEIGHT;
 364             } while (board[x][y]);
 365             apple=true;
 366             board[x][y]=-1;
 367             rb->lcd_fillrect((x*4)+1,y*4,2,4);
 368             rb->lcd_fillrect(x*4,(y*4)+1,4,2);
 369         }
 370
 371         rb->sleep(HZ/level);
 372
 373         button=rb->button_get(false);
 374
 375 #ifdef HAS_BUTTON_HOLD
 376         if (rb->button_hold())
 377         button = SNAKE_PLAYPAUSE;
 378 #endif
 379
 380         switch (button) {
 381              case SNAKE_UP:
 382                  if (dir!=2) dir=0;
 383                  break;
 384              case SNAKE_RIGHT:
 385                  if (dir!=3) dir=1;
 386                  break;
 387              case SNAKE_DOWN:
 388                  if (dir!=0) dir=2;
 389                  break;
 390              case SNAKE_LEFT:
 391                  if (dir!=1) dir=3;
 392                  break;
 393 #ifdef SNAKE_RC_QUIT
 394              case SNAKE_RC_QUIT:
 395 #endif
 396              case SNAKE_QUIT:
 397                  dead=1;
 398                  return;
 399              case SNAKE_PLAYPAUSE:
 400                  game_pause();
 401                  break;
 402              default:
 403                  if (rb->default_event_handler(button)==SYS_USB_CONNECTED) {
 404                      dead=2;
 405                      return;
 406                  }
 407                  break;
 408         }
 409     }
 410 }
 411
 412 void game_init(void) {
 413     int selection=0;
 414     short x,y;
 415     bool menu_quit = false;
 416
 417     for (x=0; x<BOARD_WIDTH; x++) {
 418         for (y=0; y<BOARD_HEIGHT; y++) {
 419             board[x][y]=0;
 420         }
 421     }
 422     dead=0;
 423     apple=false;
 424     snakelength=4;
 425     score=0;
 426     board[11][7]=1;
 427
 428     MENUITEM_STRINGLIST(menu,"Snake Menu",NULL,"Start New Game","Starting Level",
 429                         "Quit");
 430
 431     while (!menu_quit) {
 432         switch(rb->do_menu(&menu, &selection, NULL, false))
 433         {
 434             case 0:
 435                 menu_quit = true; /* start playing */
 436                 break;
 437
 438             case 1:
 439                 rb->set_int("Starting Level", "", UNIT_INT, &level, NULL,
 440                             1, 1, 9, NULL );
 441                 break;
 442
 443             default:
 444                 dead=1; /* quit program */
 445                 menu_quit = true;
 446                 break;
 447
 448         }
 449     }
 450 }
 451
 452 enum plugin_status plugin_start(const void* parameter)
 453 {
 454     (void)(parameter);
 455
 456     game_init();
 457     rb->lcd_clear_display();
 458     game();
 459     return (dead==1)?PLUGIN_OK:PLUGIN_USB_CONNECTED;
 460 }
 461
 462 #endif