Tetris is now Rockblox, to avoid trademark problems

git-svn-id: svn://svn.rockbox.org/rockbox/trunk@4742 a1c6a512-1295-4272-9138-f99709370657

1 files changed, 418 insertions, 0 deletions

diff --git a/apps/plugins/rockblox.c b/apps/plugins/rockblox.c
new file mode 100644
index 0000000000..f90ced2450
--- /dev/null
+++ b/apps/plugins/rockblox.c
@@ -0,0 +1,418 @@
+/***************************************************************************
+ *             __________               __   ___.
+ *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
+ *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
+ *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
+ *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
+ *                     \/            \/     \/    \/            \/
+ * $Id$
+ *
+ * Copyright (C) 1999 Mattis Wadman (nappe@sudac.org)
+ *
+ * Heavily modified for embedded use by Björn Stenberg (bjorn@haxx.se)
+ *
+ * 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
+
+static const int start_x = 5;
+static const int start_y = 5;
+static const int max_x = 4 * 17;
+static const int max_y = 3 * 10;
+static const short level_speeds[10] = {
+    1000, 900, 800, 700, 600, 500, 400, 300, 250, 200
+};
+static const int blocks = 7;
+static const int block_frames[7] = {1,2,2,2,4,4,4};
+
+static int current_x, current_y, current_f, current_b;
+static int level, score;
+static int next_b, next_f;
+static short lines;
+static char virtual[LCD_WIDTH * LCD_HEIGHT];
+static struct plugin_api* rb;
+
+/*
+ block_data is built up the following way
+
+ first array index specifies the block number
+ second array index specifies the rotation of the block
+ third array index specifies:
+     0: x-coordinates of pixels
+     1: y-coordinates of pixels
+ fourth array index specifies the coordinate of a pixel
+
+ each block consists of four pixels whose relative coordinates are given
+ with block_data
+*/
+
+static const char block_data[7][4][2][4] =
+{
+    {
+        {{0,1,0,1},{0,0,1,1}}
+    },
+    {
+        {{0,1,1,2},{1,1,0,0}},
+        {{0,0,1,1},{0,1,1,2}}
+    },
+    {
+        {{0,1,1,2},{0,0,1,1}},
+        {{1,1,0,0},{0,1,1,2}}
+    },
+    {
+        {{1,1,1,1},{0,1,2,3}},
+        {{0,1,2,3},{2,2,2,2}}
+    },
+    {
+        {{1,1,1,2},{2,1,0,0}},
+        {{0,1,2,2},{1,1,1,2}},
+        {{0,1,1,1},{2,2,1,0}},
+        {{0,0,1,2},{0,1,1,1}}
+    },
+    {
+        {{0,1,1,1},{0,0,1,2}},
+        {{0,1,2,2},{1,1,1,0}},
+        {{1,1,1,2},{0,1,2,2}},
+        {{0,0,1,2},{2,1,1,1}}
+    },
+    {
+        {{1,0,1,2},{0,1,1,1}},
+        {{2,1,1,1},{1,0,1,2}},
+        {{1,0,1,2},{2,1,1,1}},
+        {{0,1,1,1},{1,0,1,2}}
+    }
+};
+
+static int t_rand(int range)
+{
+    return *rb->current_tick % range;
+}
+
+static void draw_frame(int fstart_x,int fstop_x,int fstart_y,int fstop_y)
+{
+    rb->lcd_drawline(fstart_x, fstart_y, fstop_x, fstart_y);
+    rb->lcd_drawline(fstart_x, fstop_y, fstop_x, fstop_y);
+
+    rb->lcd_drawline(fstart_x, fstart_y, fstart_x, fstop_y);
+    rb->lcd_drawline(fstop_x, fstart_y, fstop_x, fstop_y);
+
+    rb->lcd_drawline(fstart_x - 1, fstart_y + 1, fstart_x - 1, fstop_y + 1);
+    rb->lcd_drawline(fstart_x - 1, fstop_y + 1, fstop_x - 1, fstop_y + 1);
+}
+
+static void draw_block(int x, int y, int block, int frame, bool clear)
+{
+    int i, a, b;
+    for(i=0;i < 4;i++) {
+        if (clear)
+        {
+            for (a = 0; a < 3; a++)
+                for (b = 0; b < 4; b++)
+                    rb->lcd_clearpixel(start_x + x + block_data[block][frame][1][i] * 4 - b,
+                                   start_y + y + block_data[block][frame][0][i] * 3 + a);
+        }
+        else
+        {
+            for (a = 0; a < 3; a++)
+                for (b = 0; b < 4; b++)
+                    rb->lcd_drawpixel(start_x+x+block_data[block][frame][1][i] * 4 - b,
+                                  start_y+y+block_data[block][frame][0][i] * 3 + a);
+        }
+    }
+}
+
+static void to_virtual(void)
+{
+    int i, a, b;
+
+    for(i = 0; i < 4; i++)
+        for (a = 0; a < 3; a++)
+            for (b = 0; b < 4; b++)
+                *(virtual + 
+                (current_y + block_data[current_b][current_f][0][i] * 3 + a) * 
+                  max_x + current_x + block_data[current_b][current_f][1][i] * 
+                  4 - b) = current_b + 1;
+}
+
+static bool block_touch (int x, int y)
+{
+    int a,b;
+    for (a = 0; a < 4; a++)
+        for (b = 0; b < 3; b++)
+            if (*(virtual + (y + b) * max_x + (x - a)) != 0)
+                return true;
+    return false;
+}
+
+static bool gameover(void)
+{
+    int i;
+    int frame, block, y, x;
+
+    x = current_x;
+    y = current_y;
+    block = current_b;
+    frame = current_f;
+
+    for(i = 0; i < 4; i++){
+        /* Do we have blocks touching? */
+        if(block_touch(x + block_data[block][frame][1][i] * 4, 
+                       y + block_data[block][frame][0][i] * 3)) 
+        {
+            /* Are we at the top of the frame? */
+            if(x + block_data[block][frame][1][i] * 4 >= max_x - 16)
+            {
+                /* Game over ;) */
+                return true;
+            }
+        }
+    }
+    return false;
+}
+
+static bool valid_position(int x, int y, int block, int frame)
+{
+    int i;
+    for(i=0;i < 4;i++)
+        if ((y + block_data[block][frame][0][i] * 3 > max_y - 3) ||
+            (x + block_data[block][frame][1][i] * 4 > max_x - 4) ||
+            (y + block_data[block][frame][0][i] * 3 < 0) ||
+            (x + block_data[block][frame][1][i] * 4 < 4) ||
+            block_touch (x + block_data[block][frame][1][i] * 4, 
+                         y + block_data[block][frame][0][i] * 3))
+        {
+            return false;
+        }
+    return true;
+}
+
+static void from_virtual(void)
+{
+    int x,y;
+    for(y = 0; y < max_y; y++)
+        for(x = 1; x < max_x - 1; x++)
+            if(*(virtual + (y * max_x) + x) != 0)
+                rb->lcd_drawpixel(start_x + x, start_y + y);
+            else
+                rb->lcd_clearpixel(start_x + x, start_y + y);
+}
+
+static void move_block(int x,int y,int f)
+{
+    int last_frame = current_f;
+    if(f != 0)
+    {
+        current_f += f;
+        if(current_f > block_frames[current_b]-1)
+            current_f = 0;
+        if(current_f < 0)
+            current_f = block_frames[current_b]-1;
+    }
+
+    if(valid_position(current_x + x, current_y + y, current_b, current_f))
+    {
+        draw_block(current_x,current_y,current_b,last_frame,true);
+        current_x += x;
+        current_y += y;
+        draw_block(current_x,current_y,current_b,current_f,false);
+        rb->lcd_update();
+    }
+    else
+        current_f = last_frame;
+}
+
+static void new_block(void)
+{
+    current_b = next_b;
+    current_f = next_f;
+    current_x = max_x - 16;
+    current_y = (int)12;
+    next_b = t_rand(blocks);
+    next_f = t_rand(block_frames[next_b]);
+
+    rb->lcd_drawline (max_x + 7, start_y - 1, max_x + 29, start_y - 1);
+    rb->lcd_drawline (max_x + 29, start_y, max_x + 29, start_y + 14);
+    rb->lcd_drawline (max_x + 29, start_y + 14, max_x + 7, start_y + 14);
+    rb->lcd_drawline (max_x + 7, start_y + 14, max_x + 7, start_y - 1);
+    rb->lcd_drawline (max_x + 6, start_y + 15, max_x + 6, start_y);
+    rb->lcd_drawline (max_x + 6, start_y + 15, max_x + 28, start_y + 15);
+
+    draw_block(max_x + 9, start_y - 4, current_b, current_f, true);
+    draw_block(max_x + 9, start_y - 4, next_b, next_f, false);
+    if(!valid_position(current_x, current_y, current_b, current_f))
+    {
+        draw_block(current_x, current_y, current_b, current_f, false);
+        rb->lcd_update();
+    }
+    else
+        draw_block(current_x, current_y, current_b, current_f, false);
+}
+
+static int check_lines(void)
+{
+    int x,y,i,j;
+    bool line;
+    int lines = 0;
+    for(x = 0; x < max_x; x++)
+    {
+        line = true;
+        for(y = 0; y < max_y; y++)
+        {
+            if(*(virtual + y * max_x + x) == 0)
+            {
+                line = false;
+                break;
+            }
+        }
+
+        if(line)
+        {
+            lines++;
+            /* move rows down */
+            for(i = x; i < max_x - 1; i++)
+                for (j = 0; j < max_y; j++)
+		            *(virtual + j * max_x + i)=*(virtual + j * max_x + (i + 1));
+
+            x--; /* re-check this line */
+        }
+    }
+
+    return lines / 4;
+}
+
+static void move_down(void)
+{
+    int l;
+    char s[25];
+
+    if(!valid_position(current_x - 4, current_y, current_b, current_f))
+    {
+        to_virtual();
+        l = check_lines();
+        if(l)
+        {
+            lines += l;
+            level = (int)lines/10;
+            if(level > 9)
+                level = 9;
+            from_virtual();
+            score += l*l;
+        }
+
+        rb->snprintf(s, sizeof(s), "%d Rows - Level %d", lines, level);
+        rb->lcd_putsxy(2, 42, s);
+
+        new_block();
+        move_block(0,0,0);
+    }
+    else
+        move_block(-4,0,0);
+} 
+
+static int game_loop(void)
+{
+    while(1)
+    {
+        int count = 0;
+        while(count * 300 < level_speeds[level])
+        {
+            switch(rb->button_get_w_tmo(HZ/10))
+            {
+                case BUTTON_OFF:
+                    return PLUGIN_OK;
+                
+                case BUTTON_UP:
+                case BUTTON_UP | BUTTON_REPEAT:
+                    move_block(0,-3,0);
+                    break;
+                
+                case BUTTON_DOWN:
+                case BUTTON_DOWN | BUTTON_REPEAT:
+                    move_block(0,3,0);
+                    break;
+                
+                case BUTTON_RIGHT:
+                case BUTTON_RIGHT | BUTTON_REPEAT:
+                    move_block(0,0,1);
+                    break;
+                
+                case BUTTON_LEFT:
+                case BUTTON_LEFT | BUTTON_REPEAT:
+                    move_down();
+                    break;
+
+                case SYS_USB_CONNECTED:
+                    rb->usb_screen();
+                    return PLUGIN_USB_CONNECTED;
+            }
+            
+            count++;
+        }
+        
+        if(gameover())
+        {
+            rb->lcd_clearrect(0, 52, LCD_WIDTH, LCD_HEIGHT - 52);
+            rb->lcd_putsxy(2, 52, "You lose!");
+            rb->lcd_update();
+            rb->sleep(HZ * 3);
+            return false;
+        }
+
+        move_down();
+    }
+
+    return false;
+}
+
+static void init_rockblox(void)
+{
+    rb->memset(&virtual, 0, sizeof(virtual));
+
+    current_x = 0;
+    current_y = 0;
+    current_f = 0;
+    current_b = 0;
+    level = 0;
+    lines = 0;
+    score = 0;
+    next_b = 0;
+    next_f = 0;
+}
+
+enum plugin_status plugin_start(struct plugin_api* api, void* parameter)
+{
+    int ret;
+
+    TEST_PLUGIN_API(api);
+
+    (void)parameter;
+    rb = api;
+    
+    /* Lets use the default font */
+    rb->lcd_setfont(FONT_SYSFIXED);
+
+    init_rockblox();
+
+    draw_frame(start_x, start_x + max_x - 1, start_y - 1, start_y + max_y);
+    rb->lcd_putsxy(2, 42, "0 Rows - Level 0");
+    rb->lcd_update();
+
+    next_b = t_rand(blocks);
+    next_f = t_rand(block_frames[next_b]);
+    new_block();
+    ret = game_loop();
+
+    rb->lcd_setfont(FONT_UI);
+
+    return ret;
+}
+
+#endif
+