path: root/arm9/source/main.c

/*
   ds81 - Nintendo DS ZX81 emulator.

   Copyright (C) 2006  Ian Cowburn <ianc@noddybox.co.uk>
   
   This program is free software; you can redistribute it and/or
   modify it under the terms of the GNU General Public License
   as published by the Free Software Foundation; either version 2
   of the License, or (at your option) any later version.
   
   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.
   
   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  
   $Id$
*/

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <nds.h>
#include <fat.h>

#include "framebuffer.h"
#include "gui.h"
#include "keyboard.h"
#include "z80.h"
#include "zx81.h"
#include "tapes.h"

#include "splashimg_bin.h"
#include "rom_font_bin.h"

/* ---------------------------------------- STATIC DATA
*/
static const char *main_menu[]=
	{
	    "Reset ZX81",
	    "Select Tape",
	    "Sticky Shift On",
	    "Sticky Shift Off",
	    "Map Joypad to Keys",
	    "Cancel",
	    NULL
	};

typedef enum
{
    MenuReset,
    MenuSelectTape,
    MenuStickyOn,
    MenuStickyOff,
    MenuMapJoypad
} MenuOpt;


/* ---------------------------------------- DISPLAY FUNCS
*/
static void VBlankFunc(void)
{
    scanKeys();
}

static void Splash(void)
{
    static const char *text[]=
    {
    	"DS81 \177 2006 Ian C",
	" ",
	"ZX81 ROM \177 1981",
	"Nine Tiles Networks LTD",
	" ",
	"PRESS A TO CONTINUE",
	" ",
	"http://www.noddybox.co.uk/",
	" ",
	" ",
	" ",
	" ",
	"Checking for FAT device...",
	NULL
    };

    sImage img;
    int f;
    int y;
    int res=FALSE;

    ZX81DisplayString("10 print '%the zx81 is ace%'\n20 goto 10");

    FB_Clear();

    loadPCX(splashimg_bin,&img);
    image8to16(&img);

    FB_Blit(&img,0,0);

    y = 10;

    for(f=0;text[f];f++)
    {
	FB_Centre(text[f],y,FB_RGB(31,31,31),-1);
	y += 8;
    }

    y += 8;

#ifdef DS81_USE_FAT
    res = fatInitialise(32,true);
#endif

    if (res)
    {
	ZX81EnableFileSystem(TRUE);

	FB_Centre("Found a FAT device.",y,FB_RGB(31,31,31),-1);
	y += 8;

	FB_Centre("If you place .P tape files in",y,FB_RGB(31,31,31),-1);
	y += 8;

	FB_Centre("the top directory or ZX81TAPE",y,FB_RGB(31,31,31),-1);
	y += 8;

	FB_Centre("then you should be able to load",y,FB_RGB(31,31,31),-1);
	y += 8;

	FB_Centre("GAME.P with the command",y,FB_RGB(31,31,31),-1);
	y += 8;

	FB_Centre("LOAD \"GAME\"",y,FB_RGB(31,31,31),-1);
	y += 8;
    }
    else
    {
	ZX81EnableFileSystem(FALSE);

	FB_Centre("Sorry, but you don't have a",y,FB_RGB(31,31,31),-1);
	y += 8;

	FB_Centre("supported FAT device.",y,FB_RGB(31,31,31),-1);
	y += 8;

	FB_Centre("Only the internal tape",y,FB_RGB(31,31,31),-1);
	y += 8;

	FB_Centre("files can be used.",y,FB_RGB(31,31,31),-1);
	y += 8;
    }

    while(!(keysDown() & KEY_A))
    {
	swiWaitForVBlank();
    }
}


/* ---------------------------------------- JOYPAD MAPPING
*/
static void MapJoypad(void)
{
    SoftKeyEvent ev;
    SoftKey pad = NUM_SOFT_KEYS;
    int done = FALSE;
    char text[256];

    SK_DisplayKeyboard(BG_GFX_SUB);

    ZX81DisplayString("press the joypad button you want\n"
		      "to define and then the ZX81 key\n"
		      "you want to use.\n\n"
		      "press on the config banner to\n"
		      "finish.");

    while(!done)
    {
	while(SK_GetBareEvent(&ev))
	{
	    if (ev.pressed)
	    {
	    	if (ev.key==SK_ABOUT || ev.key==SK_CONFIG)
		{
		    done = true;
		}
	    }
	    else
	    {
		if (ev.key>=SK_PAD_UP && ev.key<=SK_PAD_SELECT)
		{
		    pad = ev.key;

		    /* Now, just how dumb was making % the inverse on/off...
		    */
		    sprintf(text,"defining\n  %%%s%%",SK_KeyName(pad));
		    ZX81DisplayString(text);
		}

		if (ev.key<=SK_SPACE && pad!=NUM_SOFT_KEYS)
		{
		    sprintf(text,"mapped\n  %%%s%%\nto\n  %%%s%%",
		    			SK_KeyName(pad),SK_KeyName(ev.key));
		    ZX81DisplayString(text);

		    SK_DefinePad(pad,ev.key);

		    pad = NUM_SOFT_KEYS;
		}
	    }
	}

	swiWaitForVBlank();
    }
}


/* ---------------------------------------- MAIN
*/
int main(int argc, char *argv[])
{
    Z80 *z80;

    powerON(POWER_ALL_2D);

    /* Set up main text screen and grab the ROM character data
    */
    videoSetMode(MODE_0_2D | DISPLAY_BG0_ACTIVE);

    vramSetBankA(VRAM_A_MAIN_BG_0x6000000);
    vramSetBankB(VRAM_B_MAIN_BG_0x6020000);

    BG0_CR = BG_COLOR_256|BG_MAP_BASE(0)|BG_TILE_BASE(1);
    BG0_X0 = 0;
    BG0_Y0 = 0;

    BG_PALETTE[0] = RGB15(31,31,31);
    BG_PALETTE[1] = RGB15(0,0,0);

    dmaCopy(rom_font_bin,(void *)BG_TILE_RAM(1),rom_font_bin_size);

    /* Set up the sub-screen for rotation (basically for use as a framebuffer)
    */
    videoSetModeSub(MODE_5_2D | DISPLAY_BG2_ACTIVE);
    vramSetBankC(VRAM_C_SUB_BG_0x6200000);

    SUB_BG2_CR = BG_BMP16_256x256;
    SUB_BG2_XDX = 0x100;
    SUB_BG2_XDY = 0;
    SUB_BG2_YDX = 0;
    SUB_BG2_YDY = 0x100;
    SUB_BG2_CX = 0;
    SUB_BG2_CY = 0;

    irqInit();
    irqSet(IRQ_VBLANK,VBlankFunc);

    keysSetRepeat(30,15);

    FB_Init(BG_GFX_SUB);

    z80 = Z80Init(ZX81ReadMem,
		  ZX81WriteMem,
		  ZX81ReadPort,
		  ZX81WritePort,
		  NULL);

    if (!z80)
    {
	GUI_Alert(TRUE,"Failed to initialise\nthe Z80 CPU emulation!");
    }

    ZX81Init((uint16*)SCREEN_BASE_BLOCK(0), z80);

    Splash();

    SK_DisplayKeyboard(BG_GFX_SUB);

    SK_SetSticky(SK_SHIFT,1);

    while(1)
    {
	SoftKeyEvent ev;

    	Z80Exec(z80);

	while(SK_GetEvent(&ev))
	{
	    switch(ev.key)
	    {
	    	case SK_ABOUT:
	    	case SK_CONFIG:
		    if (ev.pressed)
		    {
			switch(GUI_Menu(main_menu))
			{
			    case MenuReset:
				ZX81Reset(z80);
				break;

			    case MenuSelectTape:
			    	SelectTape();
				break;

			    case MenuStickyOn:
				SK_SetSticky(SK_SHIFT,1);
				break;

			    case MenuStickyOff:
				SK_SetSticky(SK_SHIFT,0);
				break;

			    case MenuMapJoypad:
				MapJoypad();
			    	break;
			}

			SK_DisplayKeyboard(BG_GFX_SUB);
		    }
		    break;

	    	default:
		    ZX81HandleKey(ev.key,ev.pressed);
		    break;
	    }
	}
    }

    return 0;
}