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  * All files in this archive are subject to the GNU General Public License.
  13  * See the file COPYING in the source tree root for full license agreement.
  14  *
  15  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
  16  * KIND, either express or implied.
  17  *
  18  ****************************************************************************/
  19
  20 /*
  21 Snake!
  22
  23 by Itai Shaked
  24
  25 ok, a little explanation -
  26 board holds the snake and apple position - 1+ - snake body (the number
  27 represents the age [1 is the snake's head]).
  28 -1 is an apple, and 0 is a clear spot.
  29 dir is the current direction of the snake - 0=up, 1=right, 2=down, 3=left;
  30
  31 */
  32
  33 #include "plugin.h"
  34 #ifdef HAVE_LCD_BITMAP
  35
  36 PLUGIN_HEADER
  37
  38 /* variable button definitions */
  39 #if CONFIG_KEYPAD == RECORDER_PAD
  40 #define SNAKE_QUIT BUTTON_OFF
  41 #define SNAKE_UP   BUTTON_UP
  42 #define SNAKE_DOWN BUTTON_DOWN
  43 #define SNAKE_PLAYPAUSE BUTTON_PLAY
  44
  45 #elif CONFIG_KEYPAD == ONDIO_PAD
  46 #define SNAKE_QUIT BUTTON_OFF
  47 #define SNAKE_UP   BUTTON_UP
  48 #define SNAKE_DOWN BUTTON_DOWN
  49 #define SNAKE_PLAYPAUSE BUTTON_MENU
  50
  51 #elif (CONFIG_KEYPAD == IRIVER_H100_PAD) || \
  52       (CONFIG_KEYPAD == IRIVER_H300_PAD)
  53 #define SNAKE_QUIT BUTTON_OFF
  54 #define SNAKE_UP   BUTTON_UP
  55 #define SNAKE_DOWN BUTTON_DOWN
  56 #define SNAKE_PLAYPAUSE BUTTON_ON
  57
  58 #elif (CONFIG_KEYPAD == IPOD_4G_PAD) || \
  59       (CONFIG_KEYPAD == IPOD_3G_PAD)
  60 #define SNAKE_QUIT (BUTTON_SELECT|BUTTON_MENU)
  61 #define SNAKE_UP   BUTTON_MENU
  62 #define SNAKE_DOWN BUTTON_PLAY
  63 #define SNAKE_PLAYPAUSE BUTTON_SELECT
  64
  65 #elif (CONFIG_KEYPAD == IAUDIO_X5_PAD)
  66 #define SNAKE_QUIT BUTTON_POWER
  67 #define SNAKE_UP   BUTTON_UP
  68 #define SNAKE_DOWN BUTTON_DOWN
  69 #define SNAKE_PLAYPAUSE BUTTON_PLAY
  70
  71 #elif (CONFIG_KEYPAD == GIGABEAT_PAD)
  72 #define SNAKE_QUIT BUTTON_A
  73 #define SNAKE_UP   BUTTON_UP
  74 #define SNAKE_DOWN BUTTON_DOWN
  75 #define SNAKE_PLAYPAUSE BUTTON_SELECT
  76
  77 #else
  78 #error "lacks keymapping"
  79 #endif
  80
  81 #define BOARD_WIDTH (LCD_WIDTH/4)
  82 #define BOARD_HEIGHT (LCD_HEIGHT/4)
  83
  84 static int board[BOARD_WIDTH][BOARD_HEIGHT],snakelength;
  85 static unsigned int score,hiscore=0;
  86 static short dir,frames,apple,level=1,dead=0;
  87 static struct plugin_api* rb;
  88
  89 void die (void)
  90 {
  91     char pscore[5],hscore[17];
  92     rb->lcd_clear_display();
  93     rb->snprintf(pscore,sizeof(pscore),"%d",score);
  94     rb->lcd_putsxy(3,12,"oops...");
  95     rb->lcd_putsxy(3,22,"Your score :");
  96     rb->lcd_putsxy(3,32, pscore);
  97     if (score>hiscore) {
  98         hiscore=score;
  99         rb->lcd_putsxy(3,42,"New High Score!");
 100     }
 101     else {
 102         rb->snprintf(hscore,sizeof(hscore),"High Score: %d",hiscore);
 103         rb->lcd_putsxy(3,42,hscore);
 104     }
 105     rb->lcd_update();
 106     rb->sleep(3*HZ);
 107     dead=1;
 108 }
 109
 110 void colission (short x, short y)
 111 {
 112     switch (board[x][y]) {
 113         case 0:
 114             break;
 115         case -1:
 116             snakelength+=2;
 117             score+=level;
 118             apple=0;
 119             break;
 120         default:
 121             die();
 122             break;
 123     }
 124     if (x==BOARD_WIDTH || x<0 || y==BOARD_HEIGHT || y<0)
 125         die();
 126 }
 127
 128 void move_head (short x, short y)
 129 {
 130     switch (dir) {
 131         case 0:
 132             y-=1;
 133             break;
 134         case 1:
 135             x+=1;
 136             break;
 137         case 2:
 138             y+=1;
 139             break;
 140         case 3:
 141             x-=1;
 142             break;
 143     }
 144     colission (x,y);
 145     if (dead)
 146         return;
 147     board[x][y]=1;
 148     rb->lcd_fillrect(x*4,y*4,4,4);
 149 }
 150
 151 void frame (void)
 152 {
 153     short x,y,head=0;
 154     for (x=0; x<BOARD_WIDTH; x++) {
 155         for (y=0; y<BOARD_HEIGHT; y++) {
 156             switch (board[x][y]) {
 157                 case 1:
 158                     if (!head) {
 159                         move_head(x,y);
 160                         if (dead)
 161                             return;
 162                         board[x][y]++;
 163                         head=1;
 164                     }
 165                     break;
 166                 case 0:
 167                     break;
 168                 case -1:
 169                     break;
 170                 default:
 171                     if (board[x][y]==snakelength) {
 172                         board[x][y]=0;
 173                         rb->lcd_set_drawmode(DRMODE_SOLID|DRMODE_INVERSEVID);
 174                         rb->lcd_fillrect(x*4,y*4,4,4);
 175                         rb->lcd_set_drawmode(DRMODE_SOLID);
 176                     }
 177                     else
 178                         board[x][y]++;
 179                     break;
 180             }
 181         }
 182     }
 183     rb->lcd_update();
 184 }
 185
 186 void redraw (void)
 187 {
 188     short x,y;
 189     rb->lcd_clear_display();
 190     for (x=0; x<BOARD_WIDTH; x++) {
 191         for (y=0; y<BOARD_HEIGHT; y++) {
 192             switch (board[x][y]) {
 193                 case -1:
 194                     rb->lcd_fillrect((x*4)+1,y*4,2,4);
 195                     rb->lcd_fillrect(x*4,(y*4)+1,4,2);
 196                     break;
 197                 case 0:
 198                     break;
 199                 default:
 200                     rb->lcd_fillrect(x*4,y*4,4,4);
 201                     break;
 202             }
 203         }
 204     }
 205     rb->lcd_update();
 206 }
 207
 208 void game_pause (void) {
 209     int button;
 210     rb->lcd_clear_display();
 211     rb->lcd_putsxy(3,12,"Game Paused");
 212 #if CONFIG_KEYPAD == RECORDER_PAD
 213     rb->lcd_putsxy(3,22,"[Play] to resume");
 214 #elif CONFIG_KEYPAD == ONDIO_PAD
 215     rb->lcd_putsxy(3,22,"[Mode] to resume");
 216 #endif
 217     rb->lcd_putsxy(3,32,"[Off] to quit");
 218     rb->lcd_update();
 219     while (1) {
 220         button=rb->button_get(true);
 221         switch (button) {
 222             case SNAKE_QUIT:
 223                 dead=1;
 224                 return;
 225             case SNAKE_PLAYPAUSE:
 226                 redraw();
 227                 rb->sleep(HZ/2);
 228                 return;
 229             default:
 230                 if (rb->default_event_handler(button)==SYS_USB_CONNECTED) {
 231                     dead=2;
 232                     return;
 233                 }
 234                 break;
 235         }
 236     }
 237 }
 238
 239
 240 void game (void) {
 241     int button;
 242     short x,y;
 243     while (1) {
 244         frame();
 245         if (dead)
 246             return;
 247         frames++;
 248         if (frames==10) {
 249             frames=0;
 250             if (!apple) {
 251                 do {
 252                     x=rb->rand() % BOARD_WIDTH;
 253                     y=rb->rand() % BOARD_HEIGHT;
 254                 } while (board[x][y]);
 255                 apple=1;
 256                 board[x][y]=-1;
 257                 rb->lcd_fillrect((x*4)+1,y*4,2,4);
 258                 rb->lcd_fillrect(x*4,(y*4)+1,4,2);
 259             }
 260         }
 261
 262         rb->sleep(HZ/level);
 263
 264         button=rb->button_get(false);
 265         switch (button) {
 266              case SNAKE_UP:
 267                  if (dir!=2) dir=0;
 268                  break;
 269              case BUTTON_RIGHT:
 270                  if (dir!=3) dir=1;
 271                  break;
 272              case SNAKE_DOWN:
 273                  if (dir!=0) dir=2;
 274                  break;
 275              case BUTTON_LEFT:
 276                  if (dir!=1) dir=3;
 277                  break;
 278              case SNAKE_QUIT:
 279                  dead=1;
 280                  return;
 281              case SNAKE_PLAYPAUSE:
 282                  game_pause();
 283                  break;
 284              default:
 285                  if (rb->default_event_handler(button)==SYS_USB_CONNECTED) {
 286                      dead=2;
 287                      return;
 288                  }
 289                  break;
 290         }
 291     }
 292 }
 293
 294 void game_init(void) {
 295     int button;
 296     short x,y;
 297     char plevel[10],phscore[20];
 298
 299     for (x=0; x<BOARD_WIDTH; x++) {
 300         for (y=0; y<BOARD_HEIGHT; y++) {
 301             board[x][y]=0;
 302         }
 303     }
 304     dead=0;
 305     apple=0;
 306     snakelength=4;
 307     score=0;
 308     board[11][7]=1;
 309
 310
 311     rb->lcd_clear_display();
 312     rb->lcd_setfont(FONT_SYSFIXED);
 313     rb->snprintf(plevel,sizeof(plevel),"Level - %d",level);
 314     rb->snprintf(phscore,sizeof(phscore),"High Score: %d",hiscore);
 315     rb->lcd_puts(0,0, plevel);
 316     rb->lcd_puts(0,1, "(1-slow, 9-fast)");
 317     rb->lcd_puts(0,2, "OFF - quit");
 318 #if CONFIG_KEYPAD == RECORDER_PAD
 319     rb->lcd_puts(0,3, "PLAY - start/pause");
 320 #elif CONFIG_KEYPAD == ONDIO_PAD
 321     rb->lcd_puts(0,3, "MODE - start/pause");
 322 #endif
 323     rb->lcd_puts(0,4, phscore);
 324     rb->lcd_update();
 325
 326     while (1) {
 327         button=rb->button_get(true);
 328         switch (button) {
 329             case BUTTON_RIGHT:
 330             case SNAKE_UP:
 331                 if (level<9)
 332                     level++;
 333                 break;
 334             case BUTTON_LEFT:
 335             case SNAKE_DOWN:
 336                 if (level>1)
 337                     level--;
 338                 break;
 339             case SNAKE_QUIT:
 340                 dead=1;
 341                 return;
 342                 break;
 343             case SNAKE_PLAYPAUSE:
 344                 return;
 345                 break;
 346             default:
 347                 if (rb->default_event_handler(button)==SYS_USB_CONNECTED) {
 348                     dead=2;
 349                     return;
 350                 }
 351                 break;
 352         }
 353         rb->snprintf(plevel,sizeof(plevel),"Level - %d",level);
 354         rb->lcd_puts(0,0, plevel);
 355         rb->lcd_update();
 356     }
 357
 358 }
 359
 360 enum plugin_status plugin_start(struct plugin_api* api, void* parameter)
 361 {
 362     (void)(parameter);
 363     rb = api;
 364
 365     game_init();
 366     rb->lcd_clear_display();
 367     game();
 368     return (dead==1)?PLUGIN_OK:PLUGIN_USB_CONNECTED;
 369 }
 370
 371 #endif