main.c

/*===========================================
        Mahjongg Solitaire Wii
        Code     : Justin Wood
 ============================================*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <malloc.h>
#include <math.h>
#include <ogcsys.h>
#include <gccore.h>
#include <wiiuse/wpad.h>
#include <unistd.h>
#include <fat.h>
#include <aesndlib.h>
#include <gcmodplay.h>           // modplayer
#include "GRRLIB/GRRLIB.h"

#include "commons.h"

#include "menu.h"
#include "game.h"
#include "disk.h"

#include "sushi_mod.h"
#include "dojo_dan_oriental_mod.h"
#include "graveyard_mod.h"
#include "egypt_crap_mod.h"
#include "childhood_mod.h"
#include "nebulos_mod.h"

#include "gfx/bigmenuback_jpg.h"
#include "gfx/credits_png.h"

#include "gfx/handpointerred_png.h"
#include "gfx/handpointergreen_png.h"

Mtx GXmodelView2D;
static GXRModeObj *rmode = NULL;

static MODPlay mod_track;

#define STARTUP 2
#define GAME 1
#define MENU 0
#define FILE_CFG "rpmjg.cfg"

static int main_mode=STARTUP;
static int alpha=0;              //,xm=64,xs=255;

bool opt_rumble=true, opt_hoverhint=false, opt_widescreen=false;
int opt_sound=255, opt_music=64, opt_layout=0, opt_lang=-1, opt_tileset=0;

static int evctr = 0;

u8 *layouts[LAYOUTS];            //extern
unsigned long g_scores[LAYOUTS * 2];//extern

static const int languages[] = {JAPANESE,ENGLISH,GERMAN,FRENCH,SPANISH,ITALIAN,DUTCH};
#define MAX_SOUND_SLOT 2
AESNDPB *sound[MAX_SOUND_SLOT];

static int next_voice_idx = 0;
void Init_Voice() {
    for (int i=0; i<MAX_SOUND_SLOT; i++) {
        sound[i] = NULL;
        sound[i] = AESND_AllocateVoice(NULL);
    }
}
void Free_Voice() {
    for (int i=0; i<MAX_SOUND_SLOT; i++) {
        AESND_FreeVoice(sound[i]);
        sound[i] = NULL;
    }
}

static void processMenuOption(int menuopt)
{
    switch(menuopt) {
        case EXIT :
            killMenuLanguages();
            MODPlay_Unload (&mod_track);
            Free_Voice();
            WPAD_Shutdown();
            GRRLIB_Stop();
            saveConfig(FILE_CFG);
            // if we have been launched from a channel then reset to menu
            if (!*((u32*) 0x80001800)) {
                WII_Initialize();
                WII_ReturnToMenu();
            }
            else {               // else the homebrew is launched from a loader so exit back to the loader
                exit(0);
            }
            break;
        case ONE_PLAYER_GAME :
        case TWO_PLAYER_COOP :
        case TWO_PLAYER_VERSUS :
            main_mode=GAME;
            initGame(menuopt);
            break;
    }
    if(menuopt>=MUSIC_BAR && menuopt<=(MUSIC_BAR+64)) {
        MODPlay_SetVolume( &mod_track, opt_music, opt_music);
    }
}


static void countevs(long int chan, const WPADData *data)
{
    evctr++;
}


static void setupLayouts()
{
    layouts[0]=(u8 *)default_mtl;
    layouts[1]=(u8 *)cross_mtl;
    layouts[2]=(u8 *)butterfly_mtl;
    layouts[3]=(u8 *)fortress_mtl;
    layouts[4]=(u8 *)crab_mtl;
    layouts[5]=(u8 *)spider_mtl;
    layouts[6]=(u8 *)fourbridges_mtl;
    layouts[7]=(u8 *)cloud_mtl;
    layouts[8]=(u8 *)arena_mtl;
    layouts[9]=(u8 *)tictactoe_mtl;
    layouts[10]=(u8 *)tale_mtl;
    layouts[11]=(u8 *)tikal_mtl;
}


static u8 HWButton = 0;

/**
 * Callback for the reset button on the Wii.
 */
static void WiiResetPressed()
{
    HWButton = SYS_RETURNTOMENU;
}


/**
 * Callback for the power button on the Wii.
 */
static void WiiPowerPressed()
{
    HWButton = SYS_POWEROFF_STANDBY;
}


/**
 * Callback for the power button on the Wiimote.
 * @param[in] chan The Wiimote that pressed the button
 */
static void WiimotePowerPressed(s32 chan)
{
    HWButton = SYS_POWEROFF_STANDBY;
}


static void initMain()
{

    // try to load a saved config, if none then get Wii language menu
    if(!loadConfig(FILE_CFG)) {
        // get the language of the Wii menu and map this to the Mahjongg Wii languages
        if(CONF_GetLanguage()<7) opt_lang = languages[CONF_GetLanguage()];

        // dirty hack to force English if not German as default
        if (opt_lang != 2) {
            opt_lang = 1;
        }
    }
    GRRLIB_Widescreen(opt_widescreen);

    // setup the layouts array for use in menu and game
    setupLayouts();

    //init scores with 0
    int i;
    for( i = 0; i < LAYOUTS * 2; ++i) {
        g_scores[i] = 0;
    }
    //load scores
    loadHighscores( FILE_HIGHSCORE, g_scores);
}




int main(int argc, char* argv[])
{
    u8 *tex_ptrone=GRRLIB_LoadTexture(handpointerred_png);
    u8 *tex_ptrtwo=GRRLIB_LoadTexture(handpointergreen_png);
    u8 *tex_back=GRRLIB_LoadJPG(bigmenuback_jpg, bigmenuback_jpg_size);
    u8 *tex_fore=GRRLIB_LoadTexture(credits_png);

    fatInitDefault();
    GRRLIB_InitVideo();
    WPAD_Init();

    SYS_SetResetCallback(WiiResetPressed);
    SYS_SetPowerCallback(WiiPowerPressed);
    WPAD_SetPowerButtonCallback(WiimotePowerPressed);
    rmode = VIDEO_GetPreferredMode(NULL);

    AESND_Init(NULL);
    MODPlay_Init(&mod_track);
    Init_Voice();

    AESND_Pause(0);                // the sound loop is running now

                                 // set the MOD song
    if (MODPlay_SetMOD (&mod_track, dojo_dan_oriental_mod) < 0 ) {
        MODPlay_Unload (&mod_track);
    } else {
        // set the music volume to the minimum so we don't hear the music before saved volume is known
        MODPlay_SetVolume( &mod_track, 0,0);
        MODPlay_Start (&mod_track);// Play the MOD
    }

    WPAD_SetDataFormat(WPAD_CHAN_ALL, WPAD_FMT_BTNS_ACC_IR);

    WPAD_SetVRes(WPAD_CHAN_ALL, rmode->fbWidth, rmode->xfbHeight);

    initMain();

    MODPlay_SetVolume( &mod_track, opt_music, opt_music);

    while( HWButton == 0) {
        WPAD_ScanPads();
        u32 wpad_one_down = WPAD_ButtonsDown(0);
        u32 wpad_two_down = WPAD_ButtonsDown(1);

        u32 type;
        WPADData *wd_one, *wd_two;
        WPAD_ReadPending(WPAD_CHAN_ALL, countevs);
        WPAD_Probe(WPAD_CHAN_ALL, &type);

        wd_one = WPAD_Data(0);
        wd_two = WPAD_Data(1);

        switch(main_mode) {
            case STARTUP :
                GRRLIB_FillScreen(0xFF000000);
                GRRLIB_DrawImg(0, 0, 640, 480, tex_back, 0, 1, 1, alpha>255?255:alpha);
                GRRLIB_DrawImg(68,308, 256, 80, tex_fore, 0, 1, 1, alpha>255?255:alpha);
                if(alpha++>394 || wpad_one_down > 0) {
                    main_mode=MENU;
                    if(tex_back) free(tex_back);
                    if(tex_fore) free(tex_fore);
                    initMenu();
                }
                break;
            case MENU :
                GRRLIB_FillScreen(0xFF000000);
                int menuopt = menuWiimote(wd_one,wpad_one_down);
                if(menuopt==EXIT) {
                    if(tex_ptrone) free(tex_ptrone);
                    if(tex_ptrtwo) free(tex_ptrtwo);
                }

                if(menuopt>NOTHING) {
                    processMenuOption(menuopt);
                    if(main_mode==GAME) {
                        MODPlay_Unload (&mod_track);
                        if(opt_tileset==SPOOKY)
                            MODPlay_SetMOD (&mod_track, graveyard_mod);
                        else
                        if(opt_tileset==EGYPTIAN)
                            MODPlay_SetMOD (&mod_track, egypt_crap_mod);
                        else
                        if(opt_tileset==SIMPLE)
                            MODPlay_SetMOD (&mod_track, childhood_mod);
                        else
                        if(opt_tileset==SPACE)
                            MODPlay_SetMOD (&mod_track, nebulos_mod);
                        else
                            MODPlay_SetMOD (&mod_track, sushi_mod);
                        MODPlay_SetVolume( &mod_track, opt_music, opt_music);
                        MODPlay_Start (&mod_track);
                    }
                    else
                        drawMenu(wd_one);
                }
                else
                    drawMenu(wd_one);
                break;
            case GAME :
                if(gameWiimote(wd_one,wpad_one_down,wd_two,wpad_two_down)) {
                    // we are exiting the game back to the menu
                    main_mode=MENU;
                    MODPlay_Unload (&mod_track);
                    MODPlay_SetMOD (&mod_track, dojo_dan_oriental_mod);
                    MODPlay_SetVolume( &mod_track, opt_music, opt_music);
                    MODPlay_Start (&mod_track);
                    killGame();
                    initMenu();
                }
                else {
                    drawGame();
                }
                break;
        }

        // alternate which pointer is on top every frame to not give the advantage to player one in two player mode
        static int ticktock=0;

        ticktock++;

        if(wd_two->ir.valid && ticktock%2==0) {
            if(main_mode==GAME && whatGameMode()==ONE_PLAYER_GAME) {
                // don't display second pointer in one player mode
            }
            else
                GRRLIB_DrawColImg(wd_two->ir.x - 9,wd_two->ir.y - 7,68,80,tex_ptrtwo,0,1,1,0xEEFFFFFF);
        }

        if(wd_one->ir.valid) {
            GRRLIB_DrawColImg(wd_one->ir.x - 9,wd_one->ir.y - 7,68,80,tex_ptrone,0,1,1,0xEEFFFFFF);
        }

        if(wd_two->ir.valid && ticktock%2!=0) {
            if(main_mode==GAME && whatGameMode()==ONE_PLAYER_GAME) {
                // don't display second pointer in one player mode
            }
            else
                GRRLIB_DrawColImg(wd_two->ir.x - 9,wd_two->ir.y - 7,68,80,tex_ptrtwo,0,1,1,0xEEFFFFFF);
        }

        if(wd_one->btns_h & WPAD_BUTTON_1) {
            GRRLIB_ScrShot("MahjonggWii_Screen_%y%m%d_%H%M%S.png",time(NULL));
        }

        GRRLIB_Render();
    }

    // we are exiting, free the mallocs
    switch( main_mode) {
        case GAME:
            killGame();

    }
    if(tex_ptrone) free(tex_ptrone);
    if(tex_ptrtwo) free(tex_ptrtwo);
    killMenuLanguages();
    MODPlay_Unload (&mod_track);
    Free_Voice();
    WPAD_Shutdown();
    GRRLIB_Stop();
    saveConfig(FILE_CFG);
    SYS_ResetSystem(HWButton, 0, 0);

    return 0;
}

#define VOICE_RUNNING 0x40000000 // from aesndlib.c
void playRaw(const void *buf, const u32 len, u32 freq, u16 vol_left, u16 vol_right, u32 delay) {
    int i=next_voice_idx;
    /*
    for (i=0; sound[i] && i < MAX_SOUND_SLOT; i++) {
        u32 *pFlag = (u32 *)&(((char *)(sound[i]))[40]); // offset 40 is flags
        if (!(*pFlag & VOICE_RUNNING))
            break;
    }
    */
    if (i == MAX_SOUND_SLOT)
        i = 0;
    if (i > 0 && sound[i] == NULL)
        i = 0;
    if (sound[i]) {
        AESND_PlayVoice(sound[i], VOICE_MONO16, buf, len, freq, delay, 0);
        AESND_SetVoiceVolume(sound[i], vol_left, vol_right);
        next_voice_idx = i+1;
    } else {
        next_voice_idx = 0;
    }
}
// vim:et sw=4 ts=4 ai