2002-06-16 23:24:22 +00:00
|
|
|
/***************************************************************************
|
|
|
|
* __________ __ ___.
|
|
|
|
* Open \______ \ ____ ____ | | _\_ |__ _______ ___
|
|
|
|
* Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
|
|
|
|
* Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
|
|
|
|
* Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
|
|
|
|
* \/ \/ \/ \/ \/
|
2002-06-20 10:49:15 +00:00
|
|
|
* $Id$
|
2002-06-16 23:24:22 +00:00
|
|
|
*
|
|
|
|
* Copyright (C) 2002 Eric Linenberg
|
|
|
|
*
|
|
|
|
* 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.
|
|
|
|
*
|
|
|
|
****************************************************************************/
|
|
|
|
|
2002-06-17 12:07:30 +00:00
|
|
|
#include <sprintf.h>
|
2002-06-16 23:24:22 +00:00
|
|
|
#include "config.h"
|
|
|
|
#include "sokoban.h"
|
|
|
|
#include "lcd.h"
|
|
|
|
#include "button.h"
|
|
|
|
#include "kernel.h"
|
|
|
|
|
|
|
|
#ifdef SIMULATOR
|
|
|
|
#include <stdio.h>
|
|
|
|
#endif
|
|
|
|
#include <string.h>
|
|
|
|
|
|
|
|
#define SOKOBAN_TITLE "Sokoban"
|
|
|
|
#define SOKOBAN_TITLE_FONT 2
|
2002-06-20 10:49:15 +00:00
|
|
|
#define NUM_LEVELS sizeof(levels)/320
|
2002-06-16 23:24:22 +00:00
|
|
|
|
2002-06-20 10:49:15 +00:00
|
|
|
static char board[16][20];
|
|
|
|
static int current_level=0;
|
|
|
|
static int moves=0;
|
|
|
|
static int row=0;
|
|
|
|
static int col=0;
|
|
|
|
static int boxes_to_go=0;
|
|
|
|
static int current_spot=1;
|
2002-06-16 23:24:22 +00:00
|
|
|
|
|
|
|
/* 320 boxes per level */
|
2002-06-20 10:49:15 +00:00
|
|
|
static const char levels[][320] = {
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000222000000000"
|
|
|
|
"00000000232000000000"
|
|
|
|
"00000000212222000000"
|
|
|
|
"00000022241432000000"
|
|
|
|
"00000023145222000000"
|
|
|
|
"00000022224200000000"
|
|
|
|
"00000000023200000000"
|
|
|
|
"00000000022200000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000222220000000000"
|
|
|
|
"00000211120000000000"
|
|
|
|
"00000254420222000000"
|
|
|
|
"00000214120232000000"
|
|
|
|
"00000222122232000000"
|
|
|
|
"00000022111132000000"
|
|
|
|
"00000021112112000000"
|
|
|
|
"00000021112222000000"
|
|
|
|
"00000022222000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000022222220000000"
|
|
|
|
"00000021111122200000"
|
|
|
|
"00000224222111200000"
|
|
|
|
"00000215141141200000"
|
|
|
|
"00000213321412200000"
|
|
|
|
"00000223321112000000"
|
|
|
|
"00000022222222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000022222000000"
|
|
|
|
"00000022221132000000"
|
|
|
|
"00000021114112000000"
|
|
|
|
"00000021441432000000"
|
|
|
|
"00000022522332000000"
|
|
|
|
"00000002222222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000002222000000000"
|
|
|
|
"00000002512220000000"
|
|
|
|
"00000002141120000000"
|
|
|
|
"00000022212122000000"
|
|
|
|
"00000023212112000000"
|
|
|
|
"00000023411212000000"
|
|
|
|
"00000023111412000000"
|
|
|
|
"00000022222222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000222222200000"
|
|
|
|
"00000002211215200000"
|
|
|
|
"00000002111211200000"
|
|
|
|
"00000002414141200000"
|
|
|
|
"00000002142211200000"
|
|
|
|
"00000222141212200000"
|
|
|
|
"00000233333112000000"
|
|
|
|
"00000222222222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000222222000000"
|
|
|
|
"00000022211112000000"
|
|
|
|
"00000223142212200000"
|
|
|
|
"00000233414115200000"
|
|
|
|
"00000233141412200000"
|
|
|
|
"00000222222112000000"
|
|
|
|
"00000000002222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000222222000000"
|
|
|
|
"00000000211112000000"
|
|
|
|
"00000022244412000000"
|
|
|
|
"00000025143312000000"
|
|
|
|
"00000021433322000000"
|
|
|
|
"00000022221120000000"
|
|
|
|
"00000000022220000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000222200000000"
|
|
|
|
"00000000233200000000"
|
|
|
|
"00000002213220000000"
|
|
|
|
"00000002114320000000"
|
|
|
|
"00000022141122000000"
|
|
|
|
"00000021124412000000"
|
|
|
|
"00000021151112000000"
|
|
|
|
"00000022222222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000222220000000"
|
|
|
|
"00000022211520000000"
|
|
|
|
"00000021143122000000"
|
|
|
|
"00000021134312000000"
|
|
|
|
"00000022211412000000"
|
|
|
|
"00000000211122000000"
|
|
|
|
"00000000222220000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000022222222000000"
|
|
|
|
"00000021121112000000"
|
|
|
|
"00000021433412000000"
|
|
|
|
"00000025431122000000"
|
|
|
|
"00000021433412000000"
|
|
|
|
"00000021121112000000"
|
|
|
|
"00000022222222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000002222220000000"
|
|
|
|
"00000002111122200000"
|
|
|
|
"00000002141111200000"
|
|
|
|
"00000222141221200000"
|
|
|
|
"00000233314111200000"
|
|
|
|
"00000233342412200000"
|
|
|
|
"00000222212141200000"
|
|
|
|
"00000000211511200000"
|
|
|
|
"00000000222222200000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000022222200000000"
|
|
|
|
"00000021111200000000"
|
|
|
|
"00000021444220000000"
|
|
|
|
"00000021123322200000"
|
|
|
|
"00000022113341200000"
|
|
|
|
"00000002151111200000"
|
|
|
|
"00000002222222200000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000002222222200000"
|
|
|
|
"00000002111231200000"
|
|
|
|
"00000022114333200000"
|
|
|
|
"00000021141213200000"
|
|
|
|
"00000221224212200000"
|
|
|
|
"00000211141141200000"
|
|
|
|
"00000211121111200000"
|
|
|
|
"00000222222251200000"
|
|
|
|
"00000000000222200000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000022222220000000"
|
|
|
|
"00000023333120000000"
|
|
|
|
"00000222333422200000"
|
|
|
|
"00000211424141200000"
|
|
|
|
"00000214411241200000"
|
|
|
|
"00000211112111200000"
|
|
|
|
"00000222215122200000"
|
|
|
|
"00000000222220000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000022222222000000"
|
|
|
|
"00000023311112000000"
|
|
|
|
"00000023341452000000"
|
|
|
|
"00000024244422000000"
|
|
|
|
"00000023341412000000"
|
|
|
|
"00000023311112000000"
|
|
|
|
"00000022222222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000222222220000000"
|
|
|
|
"00000211111120000000"
|
|
|
|
"00000212441120000000"
|
|
|
|
"00000213332120000000"
|
|
|
|
"00000223334122000000"
|
|
|
|
"00000021221412000000"
|
|
|
|
"00000024114112000000"
|
|
|
|
"00000021121152000000"
|
|
|
|
"00000022222222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000002222200000000"
|
|
|
|
"00000222111222200000"
|
|
|
|
"00000211141411200000"
|
|
|
|
"00000214111415200000"
|
|
|
|
"00000222442222200000"
|
|
|
|
"00000002113320000000"
|
|
|
|
"00000002333320000000"
|
|
|
|
"00000002222220000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000222222222000000"
|
|
|
|
"00000211111112000000"
|
|
|
|
"00000214343152000000"
|
|
|
|
"00000213434312000000"
|
|
|
|
"00000214343412000000"
|
|
|
|
"00000211111112000000"
|
|
|
|
"00000222222222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000022222222200000"
|
|
|
|
"00000221111111200000"
|
|
|
|
"00000211124241200000"
|
|
|
|
"00000214411343200000"
|
|
|
|
"00000215222333200000"
|
|
|
|
"00000222202222200000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000002222220000000"
|
|
|
|
"00000002313320000000"
|
|
|
|
"00000002314320000000"
|
|
|
|
"00000022211422000000"
|
|
|
|
"00000021411412000000"
|
|
|
|
"00000021242212000000"
|
|
|
|
"00000021115112000000"
|
|
|
|
"00000022222222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000022222000000000"
|
|
|
|
"00000021112222000000"
|
|
|
|
"00000221241112000000"
|
|
|
|
"00000214114412000000"
|
|
|
|
"00000212423132000000"
|
|
|
|
"00000211153332000000"
|
|
|
|
"00000222222222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000022222000000"
|
|
|
|
"00000022221112200000"
|
|
|
|
"00000021414111200000"
|
|
|
|
"00000025231321200000"
|
|
|
|
"00000021231321200000"
|
|
|
|
"00000021114141200000"
|
|
|
|
"00000022111222200000"
|
|
|
|
"00000002222200000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000222220000000"
|
|
|
|
"00000222231122000000"
|
|
|
|
"00000214343112000000"
|
|
|
|
"00000254212412000000"
|
|
|
|
"00000214313112000000"
|
|
|
|
"00000222242412000000"
|
|
|
|
"00000002313112000000"
|
|
|
|
"00000002222222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000",
|
|
|
|
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000222222220000"
|
|
|
|
"00000222211113120000"
|
|
|
|
"00000211414143120000"
|
|
|
|
"00000211322223220000"
|
|
|
|
"00000214341415200000"
|
|
|
|
"00000211311112200000"
|
|
|
|
"00000222222222000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
"00000000000000000000"
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
|
void load_level (int level_to_load) {
|
2002-06-16 23:24:22 +00:00
|
|
|
int a = 0;
|
|
|
|
int b = 0;
|
|
|
|
int c = 0;
|
2002-06-20 03:35:35 +00:00
|
|
|
current_spot=1;
|
2002-06-19 14:26:41 +00:00
|
|
|
boxes_to_go = 0;
|
2002-06-16 23:24:22 +00:00
|
|
|
/* load level into board */
|
|
|
|
/* get to the current level in the level array */
|
|
|
|
|
|
|
|
for(b=0 ; b<16 ; b++) {
|
|
|
|
for (c=0 ; c<20 ; c++) {
|
2002-06-20 10:49:15 +00:00
|
|
|
board[b][c] = levels[level_to_load][a] - '0';
|
2002-06-16 23:24:22 +00:00
|
|
|
a++;
|
|
|
|
if (board[b][c]==5) {
|
|
|
|
row = b;
|
|
|
|
col = c;
|
|
|
|
}
|
|
|
|
if (board[b][c]==3)
|
|
|
|
boxes_to_go++;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
void update_screen(void) {
|
|
|
|
int b = 0;
|
|
|
|
int c = 0;
|
|
|
|
char s[25];
|
|
|
|
|
|
|
|
/* load the board to the screen */
|
|
|
|
for(b=0 ; b<16 ; b++) {
|
|
|
|
for (c=0 ; c<20 ; c++) {
|
2002-06-20 10:49:15 +00:00
|
|
|
switch ( board[b][c] ) {
|
|
|
|
case 0: /* this is a black space */
|
|
|
|
lcd_drawrect (c*4, b*4, c*4+3, b*4+3);
|
|
|
|
lcd_drawrect (c*4+1, b*4+1, c*4+2, b*4+2);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 2: /* this is a wall */
|
|
|
|
lcd_drawpixel (c*4, b*4);
|
|
|
|
lcd_drawpixel (c*4+2, b*4);
|
|
|
|
lcd_drawpixel (c*4+1, b*4+1);
|
|
|
|
lcd_drawpixel (c*4+3, b*4+1);
|
|
|
|
lcd_drawpixel (c*4, b*4+2);
|
|
|
|
lcd_drawpixel (c*4+2, b*4+2);
|
|
|
|
lcd_drawpixel (c*4+1, b*4+3);
|
|
|
|
lcd_drawpixel (c*4+3, b*4+3);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 3: /* this is a home location */
|
|
|
|
lcd_drawrect (c*4+1, b*4+1, c*4+2, b*4+2);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 4: /* this is a box */
|
|
|
|
lcd_drawrect (c*4, b*4, c*4+3, b*4+3);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 5: /* this is you */
|
|
|
|
lcd_drawline (c*4+1, b*4, c*4+2, b*4);
|
|
|
|
lcd_drawline (c*4, b*4+1, c*4+3, b*4+1);
|
|
|
|
lcd_drawline (c*4+1, b*4+2, c*4+2, b*4+2);
|
|
|
|
lcd_drawpixel (c*4, b*4+3);
|
|
|
|
lcd_drawpixel (c*4+3, b*4+3);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 7: /* this is a box on a home spot */
|
|
|
|
lcd_drawrect (c*4, b*4, c*4+3, b*4+3);
|
|
|
|
lcd_drawrect (c*4+1, b*4+1, c*4+2, b*4+2);
|
|
|
|
break;
|
2002-06-16 23:24:22 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
snprintf (s, sizeof(s), "%d", current_level+1);
|
|
|
|
lcd_putsxy (86, 20, s, 0);
|
|
|
|
snprintf (s, sizeof(s), "%d", moves);
|
|
|
|
lcd_putsxy (86, 52, s, 0);
|
|
|
|
|
|
|
|
lcd_drawrect (80,0,111,31);
|
|
|
|
lcd_drawrect (80,32,111,63);
|
|
|
|
lcd_putsxy (81, 10, "Level", 0);
|
|
|
|
lcd_putsxy (81, 42, "Moves", 0);
|
|
|
|
/* print out the screen */
|
|
|
|
lcd_update();
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
void sokoban_loop(void) {
|
|
|
|
int ii = 0;
|
|
|
|
moves = 0;
|
|
|
|
current_level = 0;
|
|
|
|
load_level(current_level);
|
|
|
|
update_screen();
|
|
|
|
|
|
|
|
while(1) {
|
2002-06-20 10:49:15 +00:00
|
|
|
switch ( button_get(true) ) {
|
|
|
|
|
|
|
|
case BUTTON_OFF:
|
|
|
|
/* get out of here */
|
|
|
|
return;
|
|
|
|
|
|
|
|
case BUTTON_F3:
|
|
|
|
/* increase level */
|
|
|
|
boxes_to_go=0;
|
|
|
|
break;
|
|
|
|
|
|
|
|
case BUTTON_F2:
|
|
|
|
/* same level */
|
|
|
|
load_level(current_level);
|
|
|
|
lcd_clear_display();
|
|
|
|
update_screen();
|
|
|
|
moves=0;
|
|
|
|
break;
|
2002-06-19 14:26:41 +00:00
|
|
|
|
2002-06-20 10:49:15 +00:00
|
|
|
case BUTTON_F1:
|
|
|
|
/* previous level */
|
|
|
|
if (current_level==0) {
|
|
|
|
current_level=0;
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
current_level--;
|
|
|
|
}
|
|
|
|
load_level(current_level);
|
|
|
|
lcd_clear_display();
|
|
|
|
update_screen();
|
|
|
|
moves=0;
|
|
|
|
break;
|
|
|
|
|
|
|
|
case BUTTON_LEFT:
|
|
|
|
switch ( board[row][col-1] ) {
|
|
|
|
case 1: /* if it is a blank spot */
|
|
|
|
board[row][col-1]=5;
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=1;
|
|
|
|
col--;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 3: /* if it is a home spot */
|
|
|
|
board[row][col-1]=5;
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=3;
|
|
|
|
col--;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 4:
|
|
|
|
switch ( board[row][col-2] ) {
|
|
|
|
case 1: /* if we are going from blank to blank */
|
|
|
|
board[row][col-2]=board[row][col-1];
|
|
|
|
board[row][col-1]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=1;
|
|
|
|
col--;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
/* if there is a wall then do not move the box */
|
|
|
|
case 2:
|
|
|
|
/* do nothing */
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 3: /* if we are going from a blank to home */
|
|
|
|
board[row][col-2]=7;
|
|
|
|
board[row][col-1]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=1;
|
|
|
|
col--;
|
|
|
|
boxes_to_go--;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 7:
|
|
|
|
switch ( board[row][col-2] ) {
|
|
|
|
case 1: /* we are going from a home to a blank */
|
|
|
|
board[row][col-2]=4;
|
|
|
|
board[row][col-1]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=3;
|
|
|
|
col--;
|
|
|
|
boxes_to_go++;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
/* if there is a wall then do not move the box */
|
|
|
|
case 2:
|
|
|
|
/* do nothing */
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 3: /* if we are going from a home to home */
|
|
|
|
board[row][col-2]=7;
|
|
|
|
board[row][col-1]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=3;
|
|
|
|
col--;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
lcd_clear_display();
|
|
|
|
update_screen();
|
|
|
|
break;
|
|
|
|
|
|
|
|
case BUTTON_RIGHT: /* if it is a blank spot */
|
|
|
|
switch ( board[row][col+1] ) {
|
|
|
|
case 1:
|
|
|
|
board[row][col+1]=5;
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=1;
|
|
|
|
col++;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 3: /* if it is a home spot */
|
|
|
|
board[row][col+1]=5;
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=3;
|
|
|
|
col++;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 4:
|
|
|
|
switch ( board[row][col+2] ) {
|
|
|
|
case 1: /* if we are going from blank to blank */
|
|
|
|
board[row][col+2]=board[row][col+1];
|
|
|
|
board[row][col+1]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=1;
|
|
|
|
col++;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
/* if there is a wall then do not move the box */
|
|
|
|
case 2:
|
|
|
|
/* do nothing */
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 3: /* if we are going from a blank to home */
|
|
|
|
board[row][col+2]=7;
|
|
|
|
board[row][col+1]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=1;
|
|
|
|
col++;
|
|
|
|
boxes_to_go--;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 7:
|
|
|
|
switch ( board[row][col+2] ) {
|
|
|
|
case 1: /* we are going from a home to a blank */
|
|
|
|
board[row][col+2]=4;
|
|
|
|
board[row][col+1]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=3;
|
|
|
|
col++;
|
|
|
|
boxes_to_go++;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
/* if there is a wall then do not move the box */
|
|
|
|
case 2:
|
|
|
|
/* do nothing */
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 3:
|
|
|
|
board[row][col+2]=7;
|
|
|
|
board[row][col+1]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=3;
|
|
|
|
col++;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
lcd_clear_display();
|
|
|
|
update_screen();
|
|
|
|
break;
|
|
|
|
|
|
|
|
case BUTTON_UP:
|
|
|
|
switch ( board[row-1][col] ) {
|
|
|
|
case 1: /* if it is a blank spot */
|
|
|
|
board[row-1][col]=5;
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=1;
|
|
|
|
row--;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 3: /* if it is a home spot */
|
|
|
|
board[row-1][col]=5;
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=3;
|
|
|
|
row--;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 4:
|
|
|
|
switch ( board[row-2][col] ) {
|
|
|
|
case 1: /* if we are going from blank to blank */
|
|
|
|
board[row-2][col]=board[row-1][col];
|
|
|
|
board[row-1][col]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=1;
|
|
|
|
row--;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
/* if there is a wall then do not move the box */
|
|
|
|
case 2:
|
|
|
|
/* do nothing */
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 3: /* if we are going from a blank to home */
|
|
|
|
board[row-2][col]=7;
|
|
|
|
board[row-1][col]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=1;
|
|
|
|
row--;
|
|
|
|
boxes_to_go--;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 7:
|
|
|
|
switch ( board[row-2][col] ) {
|
|
|
|
case 1: /* we are going from a home to a blank */
|
|
|
|
board[row-2][col]=4;
|
|
|
|
board[row-1][col]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=3;
|
|
|
|
row--;
|
|
|
|
boxes_to_go++;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
/* if there is a wall then do not move the box */
|
|
|
|
case 2:
|
|
|
|
/* do nothing */
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 3: /* if we are going from a home to home */
|
|
|
|
board[row-2][col]=7;
|
|
|
|
board[row-1][col]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=3;
|
|
|
|
row--;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
lcd_clear_display();
|
|
|
|
update_screen();
|
|
|
|
break;
|
|
|
|
|
|
|
|
case BUTTON_DOWN:
|
|
|
|
switch ( board[row+1][col] ) {
|
|
|
|
case 1: /* if it is a blank spot */
|
|
|
|
board[row+1][col]=5;
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=1;
|
|
|
|
row++;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 3: /* if it is a home spot */
|
|
|
|
board[row+1][col]=5;
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=3;
|
|
|
|
row++;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 4:
|
|
|
|
switch ( board[row+2][col] ) {
|
|
|
|
case 1: /* if we are going from blank to blank */
|
|
|
|
board[row+2][col]=board[row+1][col];
|
|
|
|
board[row+1][col]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=1;
|
|
|
|
row++;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
/* if there is a wall then do not move the box */
|
|
|
|
case 2:
|
|
|
|
/* do nothing */
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 3: /* if we are going from a blank to home */
|
|
|
|
board[row+2][col]=7;
|
|
|
|
board[row+1][col]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=1;
|
|
|
|
row++;
|
|
|
|
boxes_to_go--;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 7:
|
|
|
|
switch ( board[row+2][col] ) {
|
|
|
|
case 1: /* we are going from a home to a blank */
|
|
|
|
board[row+2][col]=4;
|
|
|
|
board[row+1][col]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=3;
|
|
|
|
row++;
|
|
|
|
boxes_to_go++;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
|
|
|
|
/* if there is a wall then do not move the box */
|
|
|
|
case 2:
|
|
|
|
/* do nothing */
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 3: /* if we are going from a home to home */
|
|
|
|
board[row+2][col]=7;
|
|
|
|
board[row+1][col]=board[row][col];
|
|
|
|
board[row][col]=current_spot;
|
|
|
|
current_spot=3;
|
|
|
|
row++;
|
|
|
|
moves++;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
lcd_clear_display();
|
|
|
|
update_screen();
|
|
|
|
break;
|
2002-06-19 14:26:41 +00:00
|
|
|
}
|
|
|
|
|
2002-06-16 23:24:22 +00:00
|
|
|
if (boxes_to_go==0) {
|
|
|
|
moves=0;
|
|
|
|
current_level++;
|
|
|
|
if (current_level == NUM_LEVELS) {
|
2002-06-19 14:26:41 +00:00
|
|
|
for(ii=0; ii<30 ; ii++) {
|
|
|
|
lcd_clear_display();
|
|
|
|
lcd_putsxy(10, 20, "YOU WIN!!", 2);
|
2002-06-16 23:24:22 +00:00
|
|
|
lcd_update();
|
2002-06-19 14:26:41 +00:00
|
|
|
lcd_invertrect(0,0,111,63);
|
2002-06-19 14:29:01 +00:00
|
|
|
lcd_update();
|
2002-06-20 10:49:15 +00:00
|
|
|
if ( button_get(false) )
|
|
|
|
return;
|
2002-06-16 23:24:22 +00:00
|
|
|
}
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
load_level(current_level);
|
|
|
|
lcd_clear_display();
|
|
|
|
update_screen();
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
void sokoban(void)
|
|
|
|
{
|
|
|
|
int w, h;
|
|
|
|
int len = strlen(SOKOBAN_TITLE);
|
|
|
|
|
|
|
|
lcd_getfontsize(SOKOBAN_TITLE_FONT, &w, &h);
|
|
|
|
|
|
|
|
/* Get horizontel centering for text */
|
|
|
|
len *= w;
|
|
|
|
if (len%2 != 0)
|
|
|
|
len = ((len+1)/2)+(w/2);
|
|
|
|
else
|
|
|
|
len /= 2;
|
|
|
|
|
|
|
|
if (h%2 != 0)
|
|
|
|
h = (h/2)+1;
|
|
|
|
else
|
|
|
|
h /= 2;
|
|
|
|
|
|
|
|
lcd_clear_display();
|
|
|
|
lcd_putsxy(LCD_WIDTH/2-len, (LCD_HEIGHT/2)-h, SOKOBAN_TITLE,
|
|
|
|
SOKOBAN_TITLE_FONT);
|
2002-06-19 14:26:41 +00:00
|
|
|
|
|
|
|
lcd_update();
|
|
|
|
sleep(HZ*2);
|
|
|
|
|
|
|
|
lcd_clear_display();
|
|
|
|
|
|
|
|
lcd_putsxy( 3,12, "[Off] to stop", 0);
|
|
|
|
lcd_putsxy( 3,22, "[F1] - level",0);
|
|
|
|
lcd_putsxy( 3,32, "[F2] same level",0);
|
|
|
|
lcd_putsxy( 3,42, "[F3] + level",0);
|
2002-06-16 23:24:22 +00:00
|
|
|
|
|
|
|
lcd_update();
|
|
|
|
sleep(HZ*2);
|
|
|
|
lcd_clear_display();
|
|
|
|
sokoban_loop();
|
|
|
|
}
|