/*
 * xrick/e_bomb.c
 *
 * Copyright (C) 1998-2002 BigOrno (bigorno@bigorno.net).
 * Copyright (C) 2008-2014 Pierluigi Vicinanza.
 * All rights reserved.
 *
 * The use and distribution terms for this software are contained in the file
 * named README, which can be found in the root of this distribution. By
 * using this software in any fashion, you are agreeing to be bound by the
 * terms of this license.
 *
 * You must not remove this notice, or any other, from this software.
 */

#include "xrick/e_bomb.h"

#include "xrick/game.h"
#include "xrick/ents.h"
#include "xrick/e_rick.h"
#include "xrick/system/system.h"
#ifdef ENABLE_SOUND
#include "xrick/data/sounds.h"
#endif

/*
 * public vars (for performance reasons)
 */
bool e_bomb_lethal;
U8 e_bomb_xc;
U16 e_bomb_yc;

/*
 * private vars
 */
U8 e_bomb_ticker;

/*
 * Bomb hit test
 *
 * ASM 11CD
 * returns: true/hit, false/not
 */
bool e_bomb_hit(U8 e)
{
    if (ent_ents[e].x > (E_BOMB_ENT.x >= 0xE0 ? 0xFF : E_BOMB_ENT.x + 0x20))
            return false;
    if (ent_ents[e].x + ent_ents[e].w < (E_BOMB_ENT.x > 0x04 ? E_BOMB_ENT.x - 0x04 : 0))
            return false;
    if (ent_ents[e].y > (E_BOMB_ENT.y + 0x1D))
            return false;
    if (ent_ents[e].y + ent_ents[e].h < (E_BOMB_ENT.y > 0x0004 ? E_BOMB_ENT.y - 0x0004 : 0))
            return false;
    return true;
}

/*
 * Initialize bomb
 */
void e_bomb_init(U16 x, U16 y)
{
    E_BOMB_ENT.n = 0x03;
    E_BOMB_ENT.x = x;
    E_BOMB_ENT.y = y;
    e_bomb_ticker = E_BOMB_TICKER;
    e_bomb_lethal = false;

    /*
     * Atari ST dynamite sprites are not centered the
     * way IBM PC sprites were ... need to adjust things a little bit
     */
#ifdef GFXST
    E_BOMB_ENT.x += 4;
    E_BOMB_ENT.y += 5;
#endif

}


/*
 * Entity action
 *
 * ASM 18CA
 */
void
e_bomb_action(U8 e/*unused*/)
{
    (void)e;

    /* tick */
    e_bomb_ticker--;

    if (e_bomb_ticker == 0)
    {
        /*
         * end: deactivate
         */
        E_BOMB_ENT.n = 0;
        e_bomb_lethal = false;
    }
    else if (e_bomb_ticker >= 0x0A)
    {
        /*
         * ticking
         */
#ifdef ENABLE_SOUND
        if ((e_bomb_ticker & 0x03) == 0x02)
            syssnd_play(soundBombshht, 1);
#endif
#ifdef GFXST
        /* ST bomb sprites sequence is longer */
        if (e_bomb_ticker < 40)
            E_BOMB_ENT.sprite = 0x99 + 19 - (e_bomb_ticker >> 1);
        else
#endif
        E_BOMB_ENT.sprite = (e_bomb_ticker & 0x01) ? 0x23 : 0x22;
    }
    else if (e_bomb_ticker == 0x09)
    {
        /*
         * explode
         */
#ifdef ENABLE_SOUND
        syssnd_play(soundExplode, 1);
#endif
#ifdef GFXPC
        E_BOMB_ENT.sprite = 0x24 + 4 - (e_bomb_ticker >> 1);
#endif
#ifdef GFXST
        /* See above: fixing alignment */
        E_BOMB_ENT.x -= 4;
        E_BOMB_ENT.y -= 5;
        E_BOMB_ENT.sprite = 0xa8 + 4 - (e_bomb_ticker >> 1);
#endif
        e_bomb_xc = E_BOMB_ENT.x + 0x0C;
        e_bomb_yc = E_BOMB_ENT.y + 0x000A;
        e_bomb_lethal = true;
        if (e_bomb_hit(E_RICK_NO))
            e_rick_gozombie();
    }
    else
    {
        /*
         * exploding
         */
#ifdef GFXPC
        E_BOMB_ENT.sprite = 0x24 + 4 - (e_bomb_ticker >> 1);
#endif
#ifdef GFXST
        E_BOMB_ENT.sprite = 0xa8 + 4 - (e_bomb_ticker >> 1);
#endif
        /* exploding, hence lethal */
        if (e_bomb_hit(E_RICK_NO))
            e_rick_gozombie();
    }
}

/* eof */