aiMobState.cpp

/*

Jump'n'Run Engine
http://www.atanaslaskov.com/jnr/

BSD LICENSE
Copyright (c) 2007-2013, Atanas Laskov
All rights reserved.

Redistribution and use in source and binary forms, with or without
modification, are permitted provided that the following conditions are met:
1. Redistributions of source code must retain the above copyright notice,
this list of conditions and the following disclaimer.
2. Redistributions in binary form must reproduce the above copyright notice,
this list of conditions and the following disclaimer in the documentation
and/or other materials provided with the distribution.
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
DISCLAIMED. IN NO EVENT SHALL ATANAS LASKOV BE LIABLE FOR ANY
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

*/

//
// FILE: aiMobState.cpp
//
// Basic monster AI
//
// Copyright (C) 2007-2013 Atanas Laskov, <latanas@gmail.com>
//
#include "stdafx.h"
#include "ai.h"

aiMobState::aiMobState()
{
    _pTouchSound            = NULL;
    _pProximitySound        = NULL;

    _bIsSelected = M_FALSE;
}

void aiMobState::load(laFileParser *fp)
{
    // Load sounds
    //
    _pTouchSound = laSystemIntegrator::getSound()->soundCreate("sound\\mon_die(rattlesnake).mp3");
    _pProximitySound = laSystemIntegrator::getSound()->soundCreate("sound\\mon_proximity(rattlesnake).mp3");
}

// Call the specific percept handlers
//
void aiMobState::perceive(unsigned state, M_BOOL global, unsigned id, aiPerceptData data)
{
    //No special handling for global percepts
    if(global) return;

    //No handling for dead monsters
    if( !( ((laFightingCreature*)self())->isAlive() ) ) return;

    //Recognize local percepts
    switch(id)
    {
    case P__PLAYER_DISTANCE:
        if( (state==PERCEPT_SET) || (state==PERCEPT_HOLD) )
        {
            this->perceive_Distance( data.dData );
            _dPlayerDistance = data.dData;
        }
        break;

    case P__PLAYER_IN_TERRITORY:
        this->perceive_InTerritory(state);
        break;

    case P__PLAYER_IN_RANGE:
        this->perceive_InRange(state);
        break;

    case P__PLAYER_TOUCHED:
        this->perceive_Touched(state);
        break;

    case P__PLAYER_ATTACKS:
        this->perceive_UnderAttack(state);
        break;
    }
}

// The player touched me
//
void aiMobState::perceive_Touched(unsigned state)
{
    laMonster* pMonster = (laMonster*) self();
    laPlayer* pPlayer   = (laPlayer*) player();

    if(! pMonster->isAlive() ) return;

    // Hit him
    //
    // NOTE: it's improtant to reflect() first and hit() second;
    // The hit() method enables immunity and when imunity is enabled reflect() doesn't do anything.
    //
    if(state == PERCEPT_SET)
    {
        pPlayer->reflect( pMonster->boundingRect() );
        pMonster->attack(M_MATTACK_TOUCH, pPlayer);

        //Play tocuh sound
        if(_pTouchSound) _pTouchSound->play();
    }
}

// The player is attacking
//
void aiMobState::perceive_UnderAttack(unsigned state)
{
    laMonster* pMonster = (laMonster*) self();
    laPlayer* pPlayer   = (laPlayer*) player();

    if( ! pMonster->isAlive() ) return;

    if(state == PERCEPT_SET)
    {
        // Hit me
        //
        if( pMonster->isAlive() )
        {
            if(pPlayer->attackIsQuick())
                pPlayer->attack(M_PLAYER_ATTACK_QUICK, pMonster);
            else
                pPlayer->attack(M_PLAYER_ATTACK_BASIC, pMonster);
        }

        // Am I dead?
        //
        if( ! pMonster->isAlive() )
        {
            laElement* ptso = pMonster->getObject();
            laPoint3 bmin = ptso->getModel(M_STATE_DIE)->boundaryMin();
            laPoint3 bmax = ptso->getModel(M_STATE_DIE)->boundaryMax();
            double deadH = bmax.y() - bmin.y();

            _spawn_crystal( pMonster->getPosition() + laPoint3(0,-deadH/2,0) );
        }
    }
}

void aiMobState::_spawn_crystal( laPoint3 pos )
{
    laMonster* pMonster = (laMonster*) self();

    laLevel* pLevel = pMonster->getLevelObject();
    laTileset* pTS = pMonster->getTS();
    laElement* pTSObject = pMonster->getObject();

    // Spawn a crystal
    //
    laCollectable *pBraveryCrystal = new laCollectable();
    unsigned nElementIndex = pTS->getElementIndex("loot crystal");

    pBraveryCrystal->setObject(nElementIndex, (laElement*)pTS->getElement(nElementIndex));
    pBraveryCrystal->setTS(pTS);
    pBraveryCrystal->setLevel(pLevel);
    pBraveryCrystal->create( pos );

    pMonster->nestedAdd( pBraveryCrystal );
    //pMonster->setNestedObject(pBraveryCrystal);
}

void aiMobState::_select_creature(M_BOOL on)
{
    laMonster* pMonster = (laMonster*) self();

    if(! pMonster->isAlive() ) return;

    if(_bIsSelected != on)
    {
        _bIsSelected = on;

        if( on )
        {
            pMonster->setOutline( laOutline(M_TRUE, laColor(255,200,200), 1.5) );
            if(_pProximitySound) _pProximitySound->play();
        }
        else
            pMonster->setOutline( laOutline(M_TRUE, laColor(), 1) );
    }
}

M_BOOL aiMobState::_within_left_range()
{
    laMonster* pMonster = (laMonster*) self();

    if( (pMonster->getOriginalPos().x() - pMonster->getPosition().x() ) > pMonster->getLeftRange() )
        return M_FALSE;
    return M_TRUE;
}

M_BOOL aiMobState::_within_right_range()
{
    laMonster* pMonster = (laMonster*) self();

    if( (pMonster->getPosition().x() - pMonster->getOriginalPos().x() ) > pMonster->getRightRange() )
        return M_FALSE;
    return M_TRUE;
}