CustomDetector.cpp

#include "stdafx.h"
#include "customdetector.h"
#include "hudmanager.h"
#include "artifact.h"

CCustomDetector::CCustomDetector(void) {
//  m_belt = true;
}

CCustomDetector::~CCustomDetector(void) {
}

BOOL CCustomDetector::net_Spawn(LPVOID DC) {
    BOOL res = inherited::net_Spawn(DC);

    CKinematics* V = PKinematics(Visual());
    if(V) V->PlayCycle("idle");

    if (0==m_pPhysicsShell) {
        // Physics (Box)
        Fobb obb; Visual()->vis.box.get_CD(obb.m_translate,obb.m_halfsize); obb.m_rotate.identity();
        // Physics (Elements)
        CPhysicsElement* E = P_create_Element(); R_ASSERT(E); E->add_Box(obb);
        // Physics (Shell)
        m_pPhysicsShell = P_create_Shell(); R_ASSERT(m_pPhysicsShell);
        m_pPhysicsShell->add_Element(E);
        m_pPhysicsShell->setDensity(2000.f);
        if(!H_Parent())m_pPhysicsShell->Activate(svXFORM(),0,svXFORM());
        m_pPhysicsShell->mDesired.identity();
        m_pPhysicsShell->fDesiredStrength = 0.f;
    }
//  CCF_Shape*  shape           = xr_new<CCF_Shape> (this);
//  cfModel                     = shape;
//  Fsphere S;  S.P.set         (0,1.f,0); S.R = m_buzzer_radius;
//  shape->add_sphere           (S);
//  shape->ComputeBounds                        ();
//#pragma todo("@@@ WT: Check if detector will work w/o registration.")
//  pCreator->ObjectSpace.Object_Register       (this);
//  cfModel->OnMove                             ();

    setVisible(true);
    setEnabled(true);

    return res;
}

void CCustomDetector::Load(LPCSTR section) {
    // verify class
    LPCSTR Class = pSettings->r_string(section,"class");
    CLASS_ID load_cls = TEXT2CLSID(Class);
    R_ASSERT(load_cls==SUB_CLS_ID);

    inherited::Load(section);

    m_radius = pSettings->r_float(section,"radius");
    m_buzzer_radius = pSettings->r_float(section,"buzzer_radius");

    LPCSTR l_soundName = pSettings->r_string(section,"noise");
    SoundCreate(m_noise, l_soundName);
    l_soundName = pSettings->r_string(section,"buzzer");
    SoundCreate(m_buzzer, l_soundName);
    u32 i = 1;
    string256 temp;
    do {
        sprintf(temp, "zone_class_%d", i);
        if(pSettings->line_exist(section,temp)) {
            LPCSTR z_Class = pSettings->r_string(section,temp);
            CLASS_ID zone_cls = TEXT2CLSID(pSettings->r_string(z_Class,"class"));
            sprintf(temp, "zone_sound_%d", i);
            l_soundName = pSettings->r_string(section,temp);
            sound *l_pSound = xr_new<sound>();
            SoundCreate(*l_pSound, l_soundName);
            m_sounds[zone_cls] = l_pSound;
            i++;
        } else break;
    } while(true);

}

void CCustomDetector::net_Destroy() {
    if(m_pPhysicsShell) m_pPhysicsShell->Deactivate();
    xr_delete(m_pPhysicsShell);
    inherited::net_Destroy();
    SoundDestroy(m_noise);
    xr_map<CLASS_ID, sound*>::iterator l_it;
    for(l_it = m_sounds.begin(); l_it != m_sounds.end(); l_it++) SoundDestroy(*l_it->second);
}

void CCustomDetector::Update(u32 dt) {
    inherited::Update   (dt);

    if(!H_Parent()) return;

    vPosition.set(H_Parent()->Position());
    UpdateTransform();

    //const Fsphere& s      = cfModel->getSphere();
    Fvector                 P; P.set(H_Parent()->Position());
    //H_Parent()->clXFORM().transform_tiny(P,P);
    feel_touch_update       (P,m_radius);

    if(H_Parent()) {
        f32 l_maxPow = 0;
        BOOL l_buzzer = false;
        xr_list<CCustomZone*>::iterator l_it;
        for(l_it = m_zones.begin(); l_it != m_zones.end(); l_it++) {
            CCustomZone *l_pZ = *l_it;
            u32 &l_time = m_times[l_pZ];
            //Fvector ZP; ZP.set(0,0,0); l_pZ->clXFORM().transform_tiny(ZP,ZP);
            f32 l_dst = P.distance_to(l_pZ->Position()); if(l_dst > m_radius) l_dst -= m_radius; else l_dst = 0;
            f32 l_relPow = l_pZ->Power(l_dst) / l_pZ->m_maxPower;
            if(l_relPow > 0 && l_pZ->feel_touch_contact(this)) l_buzzer = true;
            l_maxPow = _max(l_maxPow, l_relPow); l_relPow = 1.f - l_relPow;
            if((f32)l_time > 5000.f * (l_relPow/**l_relPow*l_relPow*l_relPow*/)) {
                l_time = 0;
                if(m_sounds.find(l_pZ->SUB_CLS_ID) != m_sounds.end()) {
                    sound *l_pSound = m_sounds[l_pZ->SUB_CLS_ID];
                    Sound->play_at_pos(*l_pSound, this, P);
                }
            } else l_time += dt;
        }
        if(l_buzzer) {
            if(!m_buzzer.feedback) m_buzzer.play_at_pos(this, P, true);
            if(m_buzzer.feedback) m_buzzer.set_position(P);
        } else m_buzzer.stop();
        if(l_maxPow > 0) {
            if(!m_noise.feedback) Sound->play_at_pos(m_noise, this, P, true);
            if(m_noise.feedback) {
                //l_maxPow = _max(logf(l_maxPow) / 10.f + 1.f, .0f);
                m_noise.set_volume  (l_maxPow);
                m_noise.set_position(P);
            }
        } else if(m_noise.feedback) m_noise.stop();
        xr_set<CArtifact*>::iterator l_it2;
        for(l_it2 = CArtifact::m_all.begin(); l_it2 != CArtifact::m_all.end(); l_it2++) {
            CArtifact &l_af = **l_it2;
            float l_dst = P.distance_to(l_af.Position());
            if(!l_af.H_Parent() && l_dst < l_af.m_detectorDist) {
                if(!l_af.m_detectorSound.feedback) Sound->play_at_pos(l_af.m_detectorSound, this, P, true);
                if(l_af.m_detectorSound.feedback) {
                    //l_af.m_detectorSound.set_volume(_max(logf((l_af.m_detectorDist-l_dst)/l_af.m_detectorDist) / 10.f + 1.f, .0f));
                    l_af.m_detectorSound.set_volume((l_af.m_detectorDist-l_dst)/l_af.m_detectorDist);
                    l_af.m_detectorSound.set_position(P);
                }
            } else if(l_af.m_detectorSound.feedback) l_af.m_detectorSound.stop();
        }
    }
}

void CCustomDetector::UpdateCL() {
    inherited::UpdateCL();
    /*
    f32 l_zonePow = 0;
    xr_list<CCustomZone*>::iterator l_it;
    for(l_it = m_zones.begin(); l_it != m_zones.end(); l_it++) l_zonePow = _max(l_zonePow, (*l_it)->Power((*l_it)->Position().distance_to(vPosition)));
    CGameFont* H        = HUD().pFontMedium;
    H->SetColor         (0xf0ffffff);
    H->Out              (550,500,"Anomaly force: %.0f", l_zonePow);
    */
    if(getVisible() && m_pPhysicsShell) {
        m_pPhysicsShell->Update ();
        svTransform.set         (m_pPhysicsShell->mXFORM);
        vPosition.set           (svTransform.c);
    }
}

void CCustomDetector::feel_touch_new(CObject* O) {
    CCustomZone *l_pZ = dynamic_cast<CCustomZone*>(O);
    if(l_pZ) {
        if(bDebug) HUD().outMessage(0xffffffff,cName(),"started to feel a zone.");
        m_zones.push_back(l_pZ);
        m_times[l_pZ] = 0;
    }
}

void CCustomDetector::feel_touch_delete(CObject* O) {
    CCustomZone *l_pZ = dynamic_cast<CCustomZone*>(O);
    if(l_pZ) {
        if(bDebug) HUD().outMessage(0xffffffff,cName(),"stoped to feel a zone.");
        m_zones.erase(std::find(m_zones.begin(), m_zones.end(), l_pZ));
    }
}

BOOL CCustomDetector::feel_touch_contact(CObject* O) {
    return dynamic_cast<CCustomZone*>(O) != NULL;
}

void CCustomDetector::SoundCreate(sound& dest, LPCSTR s_name, int iType, BOOL bCtrlFreq) {
    string256 temp;
    if (FS.exist(temp,"$game_sounds$",s_name)) {
        Sound->create(dest,TRUE,s_name,iType);
        return;
    }
    Debug.fatal ("Can't find sound '%s'",s_name,cName());
}

void CCustomDetector::SoundDestroy(sound& dest) {
    ::Sound->destroy            (dest);
}

void CCustomDetector::OnH_A_Chield() {
    inherited::OnH_A_Chield     ();
    setVisible                  (false);
    setEnabled                  (false);
}

void CCustomDetector::OnH_B_Independent() {
    inherited::OnH_B_Independent();
    setVisible                  (true);
    setEnabled                  (true);
    m_buzzer.stop               ();
    m_noise.stop                ();
    //NET_Packet            P;
    //u_EventGen            (P,GE_DESTROY,ID());
    //u_EventSend           (P);
}

void CCustomDetector::OnRender() {
    if(!bDebug) return;
    RCache.OnFrameEnd();
    Fmatrix l_ball;
    l_ball.scale(m_buzzer_radius, m_buzzer_radius, m_buzzer_radius);
    Fvector l_p; l_p.set(0, 1.f, 0); clTransform.transform(l_p, l_p);
    l_ball.translate_add(l_p);
    RCache.dbg_DrawEllipse(l_ball, D3DCOLOR_XRGB(255,0,255));
}

void CCustomDetector::OnVisible() {
    if(getVisible() && !H_Parent()) {
        ::Render->set_Transform     (&clTransform);
        ::Render->add_Visual        (Visual());
    }
}