arkada_avtomat.h

/* ScummVM - Graphic Adventure Engine
 *
 * ScummVM is the legal property of its developers, whose names
 * are too numerous to list here. Please refer to the COPYRIGHT
 * file distributed with this source distribution.
 *
 * 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 3 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, see <http://www.gnu.org/licenses/>.
 *
 */

#ifndef QDENGINE_MINIGAMES_ARKADA_AVTOMAT_H
#define QDENGINE_MINIGAMES_ARKADA_AVTOMAT_H

#include "common/debug.h"

#include "qdengine/qd_fwd.h"
#include "qdengine/qdcore/qd_minigame_interface.h"

namespace QDEngine {

class qdArkadaAvtomatMiniGame : public qdMiniGameInterface {
public:
    qdArkadaAvtomatMiniGame() {}
    ~qdArkadaAvtomatMiniGame() {}

    bool init(const qdEngineInterface *engine_interface) {
        debugC(1, kDebugMinigames, "ArkadaAvtomat::init()");

        _engine = engine_interface;
        _scene = engine_interface->current_scene_interface();
        if (!_scene)
            return false;

        _patronMouseObj  = _scene->object_interface(_scene->minigame_parameter("patron_mouse"));
        _patronTomatoObj = _scene->object_interface(_scene->minigame_parameter("patron_tomato"));
        _killObj         = _scene->object_interface(_scene->minigame_parameter("kill"));
        _fazaObj         = _scene->object_interface(_scene->minigame_parameter("faza"));
        _menObj          = _scene->object_interface(_scene->minigame_parameter("men"));
        _bloodObj        = _scene->object_interface(_scene->minigame_parameter("blood"));
        _shotsEggObj     = _scene->object_interface(_scene->minigame_parameter("shots_egg"));
        _shotsTomatoObj  = _scene->object_interface(_scene->minigame_parameter("shots_tomato"));
        _shotsBananObj   = _scene->object_interface(_scene->minigame_parameter("shots_banan"));
        _doneObj         = _scene->object_interface(_scene->minigame_parameter("done"));
        _livesObj        = _scene->object_interface(_scene->minigame_parameter("lives"));
        _bublObj         = _scene->object_interface(_scene->minigame_parameter("bubl"));
        _walkFlagObj     = _scene->object_interface(_scene->minigame_parameter("walk_flag"));
        _jumpFlagObj     = _scene->object_interface(_scene->minigame_parameter("jump_flag"));

        _goingLeft = false;
        _goingRight = false;
        _manSpeed = 2;
        _doingJump = false;
        _stepsToJump = -1;

        // stand(time(0));

        _jumpNextPhase = -1;
        _shotsTomatoCounter = 9;
        _shotsBananaCounter = 10;
        _shoteEggCounter = 10;
        _livesCounter = 5;
        _isFinal = false;
        _jumpPhase = 2;
        _doingWalk = false;
        _jumpFlag = false;

        return true;
    }

    bool quant(float dt) {
        debugC(3, kDebugMinigames, "ArkadaAvtomat::quant(%f)", dt);

        mgVect2i menCoords;
        int randomCond = 0;

        menCoords = _scene->world2screen_coords(_menObj->R());
        _bublObj->set_R(_scene->screen2world_coords(menCoords, -5000.0));

        if (_isFinal) {
            updateWalkState();
            return true;
        }

        if (!_shotsTomatoCounter && !_shotsBananaCounter && !_shoteEggCounter) {
            _shotsTomatoCounter = 9;
            _shotsBananaCounter = 10;
            _shoteEggCounter = 10;
            _livesCounter = 5;

            _patronMouseObj->set_state("\xef\xee\xec\xe8\xe4\xee\xf0"); // "помидор"

            updateStats();

            _manSpeed = 2;
        }

        if (!_doingJump) {
            if (_scene->world2screen_coords(_menObj->R()).x < _jumpingPhase3Y
                    && _menObj->is_state_active("\xf1\xf2\xee\xe8\xf2")) { // "стоит"
                _menObj->set_R(_menCoords);

                _bloodObj->set_R(_scene->screen2world_coords(_scene->world2screen_coords(_menCoords), 0.0)); // check 0.0 v96
                _stepsToJump = -1;
            }
        }

        if (_menObj->is_state_active("\xf1\xf2\xee\xe8\xf2")) { // "стоит"
            _goingLeft = false;
            _goingRight = false;
            _doingJump = false;
        }

        if (!_goingRight) {
            if (_goingLeft || _doingJump || _menObj->is_state_active("\xf1\xf2\xee\xe8\xf2")) { // "стоит"
LABEL_44:
                if (!_goingRight)
                    goto LABEL_47;
                goto LABEL_45;
            }
            _stepsToLeft = -1;
            _stepsToRight = -1;

            switch (qd_rnd(5)) {
            case 0:
            case 3: {
                    _goingRight = true;
                    int maxSteps = (500 - _menObj->screen_R().x) / _manSpeed;

                    if (maxSteps < 10)
                        maxSteps = 10;

                    _stepsToRight = qd_rnd(maxSteps);
                    _menObj->set_state("\xe8\xe4\xe5\xf2 \xe2\xef\xf0\xe0\xe2\xee"); // "идет вправо"
                    goto LABEL_44;
                }
            case 1:
            case 4: {
                    _goingLeft = true;
                    int maxSteps = (_menObj->screen_R().x - 300) / _manSpeed;
                    if (maxSteps < 10)
                        maxSteps = 10;

                    _stepsToLeft = qd_rnd(maxSteps);
                    _menObj->set_state("\xe8\xe4\xe5\xf2 \xe2\xeb\xe5\xe2\xee"); // "идет влево"
                    goto LABEL_44;
            }
            case 2:
                _doingJump = true;
                _stepsToJump = 30;
                _menCoords = _menObj->R();
                {
                    int y = _scene->world2screen_coords(_menObj->R()).y;

                    _manOrigPosY = y;
                    _jumpingPhase3Y = y;
                    _jumpHeight = y - 60;
                }

                randomCond = qd_rnd(3);

                switch (_jumpPhase) {
                case 1:
                    if (!randomCond) {
                        _jumpingPhase3Y = _manOrigPosY;
                        goto LABEL_43;
                    }
                    if (randomCond == 1)
                        goto LABEL_29;
                    if (randomCond != 2)
                        goto LABEL_43;
                    break;
                case 2:
                    if (!randomCond) {
                        _jumpingPhase3Y = _manOrigPosY;
                        goto LABEL_43;
                    }
                    if (randomCond == 1) {
                        _jumpingPhase3Y = 307;
                        _jumpNextPhase = 1;
                        goto LABEL_43;
                    }
                    if (randomCond != 2)
                        goto LABEL_43;
                    break;
                case 3:
                    if (!randomCond) {
                        _jumpingPhase3Y = _manOrigPosY;
                        goto LABEL_43;
                    }
                    if (randomCond != 1) {
                        if (randomCond == 2) {
                            _jumpingPhase3Y = 307;
                            _jumpNextPhase = 1;
                        }
                        goto LABEL_43;
                    }
        LABEL_29:
                    _jumpingPhase3Y = 332;
                    _jumpNextPhase = 2;
                    goto LABEL_43;
                default:
        LABEL_43:
                    _jumpPhaseIsGoingDown = false;
                    goto LABEL_44;
                }

                _jumpingPhase3Y = 357;
                _jumpNextPhase = 3;
                goto LABEL_43;
            default:
                goto LABEL_44;
            }
        }

LABEL_45:
        {
            mgVect2i pos = _scene->world2screen_coords(_menObj->R());
            pos.x += _manSpeed;
            _menObj->set_R(_scene->screen2world_coords(pos, 0.0));
        }
        _stepsToRight--;

        if (_stepsToRight <= 0)
            _goingRight = false;

LABEL_47:
        if (_goingLeft) {
            mgVect2i pos = _scene->world2screen_coords(_menObj->R());
            pos.x -= _manSpeed;
            _menObj->set_R(_scene->screen2world_coords(pos, 0.0));
            _stepsToLeft--;

            if (_stepsToLeft <= 0)
                _goingLeft = false;
        }

        if (_doingJump) {
            mgVect2i pos = _scene->world2screen_coords(_menObj->R());

            if (pos.y >= _manOrigPosY - 10) {
                if (!_menObj->is_state_active("\xef\xf0\xfb\xe3\xe0\xe5\xf2\x31") && !_jumpPhaseIsGoingDown)        // "прыгает1"
                    _menObj->set_state("\xef\xf0\xfb\xe3\xe0\xe5\xf2\x31"); // "прыгает1"
            }

            if (pos.y <= _manOrigPosY - 10) {
                if (_menObj->is_state_active("\xef\xf0\xfb\xe3\xe0\xe5\xf2\x31") && !_jumpPhaseIsGoingDown)     // "прыгает1"
                    _menObj->set_state("\xef\xf0\xfb\xe3\xe0\xe5\xf2\x32");                         // "прыгает2"
            }

            if (pos.y >= _jumpingPhase3Y - 10) {
                if (_menObj->is_state_active("\xef\xf0\xfb\xe3\xe0\xe5\xf2\x32") && _jumpPhaseIsGoingDown)          // "прыгает2"
                    _menObj->set_state("\xef\xf0\xfb\xe3\xe0\xe5\xf2\x33");                         // "прыгает3"
            }

            if (pos.y <= _jumpHeight)
                goto LABEL_176;

            if (!_jumpPhaseIsGoingDown) {
                pos.y -= 4;
LABEL_75:
LABEL_76:
                if (pos.y < _jumpingPhase3Y) {
LABEL_79:
                    _menObj->set_R(_scene->screen2world_coords(pos, 0.0));
                    goto LABEL_80;
                }
LABEL_77:
                if (_jumpPhaseIsGoingDown) {
                    _doingJump = false;
                    _jumpPhase = _jumpNextPhase;
                }
                goto LABEL_79;
            }
            if (pos.y > _jumpHeight) {
                if (!_jumpPhaseIsGoingDown)
                    goto LABEL_76;
                } else {
LABEL_176:
                if (!_jumpPhaseIsGoingDown) {
                    _jumpPhaseIsGoingDown = true;
                    goto LABEL_76;
                }
            }
            if (pos.y > _jumpingPhase3Y)
                goto LABEL_77;

            pos.y += 4;
            goto LABEL_75;
        }
LABEL_80:

        _patronMouseObj->set_R(_scene->screen2world_coords(_engine->mouse_cursor_position(), -5000.0));

        if (_engine->is_mouse_event_active(qdmg::qdEngineInterfaceImpl::MOUSE_EV_RIGHT_DOWN)) {
            if (_patronMouseObj->is_state_active("\xef\xee\xec\xe8\xe4\xee\xf0")) {     // "помидор"
                if (_shoteEggCounter <= 0) {
                    if (_shotsBananaCounter > 0) {
                        _patronMouseObj->set_state("\xe1\xe0\xed\xe0\xed");             // "банан"

                        if (_shotsTomatoCounter > 0)
                            _shotsTomatoCounter++;

                        --_shotsBananaCounter;
                    }
                    goto LABEL_107;
                }
                _patronMouseObj->set_state("\xff\xe9\xf6\xee");     // "яйцо"

                if (_shotsTomatoCounter > 0)
                    _shotsTomatoCounter++;
            } else {
                if (_patronMouseObj->is_state_active("\xff\xe9\xf6\xee")) {             // "яйцо"
                    if (_shotsBananaCounter <= 0) {
                        if (_shotsTomatoCounter > 0) {
                            _patronMouseObj->set_state("\xef\xee\xec\xe8\xe4\xee\xf0"); // "помидор"

                            if (_shoteEggCounter > 0)
                                _shoteEggCounter++;

                            --_shotsTomatoCounter;
                        }
                    } else {
                        _patronMouseObj->set_state("\xe1\xe0\xed\xe0\xed");     // "банан"

                        if (_shoteEggCounter > 0)
                            _shoteEggCounter++;

                        --_shotsBananaCounter;
                    }
                    goto LABEL_107;
                }

                if (!_patronMouseObj->is_state_active("\xe1\xe0\xed\xe0\xed"))      // "банан"
                    goto LABEL_107;

                if (_shotsTomatoCounter > 0) {
                    _patronMouseObj->set_state("\xef\xee\xec\xe8\xe4\xee\xf0"); // "помидор"

                    if (_shotsBananaCounter > 0)
                        _shotsBananaCounter++;

                    --_shotsTomatoCounter;
                    goto LABEL_107;
                }
                if (_shoteEggCounter <= 0) {
LABEL_107:
                    updateStats();
                    goto LABEL_108;
                }
                _patronMouseObj->set_state("\xff\xe9\xf6\xee");     // "яйцо"

                if (_shotsBananaCounter > 0)
                    _shotsBananaCounter = _shotsBananaCounter + 1;
            }
            --_shoteEggCounter;
            goto LABEL_107;
        }
LABEL_108:
        if (_engine->is_mouse_event_active(qdmg::qdEngineInterfaceImpl::MOUSE_EV_LEFT_DOWN)
                && !_bloodObj->is_state_active("\xe5\xf1\xf2\xfc")                      // "есть"
                && !_patronTomatoObj->is_state_active("\xef\xee\xec\xe8\xe4\xee\xf0")   // "помидор"
                && !_patronTomatoObj->is_state_active("\xff\xe9\xf6\xee")               // "яйцо"
                && !_patronTomatoObj->is_state_active("\xe1\xe0\xed\xe0\xed")) {        // "банан"
            _cursorPos = _engine->mouse_cursor_position();

            _patronTomatoObj->set_R(_patronMouseObj->R());

            if (_patronMouseObj->is_state_active("\xef\xee\xec\xe8\xe4\xee\xf0")) {     // "помидор"
                _patronTomatoObj->set_state("\xef\xee\xec\xe8\xe4\xee\xf0");            // "помидор"
                --_shotsTomatoCounter;
            } else if (_patronMouseObj->is_state_active("\xff\xe9\xf6\xee")) {      // "яйцо"
                _patronTomatoObj->set_state("\xff\xe9\xf6\xee");                    // "яйцо"
                --_shoteEggCounter;
            } else if (_patronMouseObj->is_state_active("\xe1\xe0\xed\xe0\xed")) {      // "банан"
                _patronTomatoObj->set_state("\xe1\xe0\xed\xe0\xed");                    // "банан"
                --_shotsBananaCounter;
            }

            _bloodObj->set_R(_patronMouseObj->R());
            updateStats();

            if (_shotsTomatoCounter <= 0
                    && _patronTomatoObj->is_state_active("\xef\xee\xec\xe8\xe4\xee\xf0")) { // "помидор"
                if (_shoteEggCounter <= 0) {
                    if (_shotsBananaCounter <= 0)
                        _patronMouseObj->set_state("\xed\xe8\xf7\xe5\xe3\xee");         // "ничего"
                    else
                        _patronMouseObj->set_state("\xe1\xe0\xed\xe0\xed");                 // "банан"
                } else {
                    _patronMouseObj->set_state("\xff\xe9\xf6\xee");                         // "яйцо"
                }
            }
            if (_shoteEggCounter <= 0 && _patronTomatoObj->is_state_active("\xff\xe9\xf6\xee")) {   // "яйцо"
                if (_shotsBananaCounter <= 0) {
                    if (_shotsTomatoCounter <= 0)
                        _patronMouseObj->set_state("\xed\xe8\xf7\xe5\xe3\xee");     // "ничего"
                    else
                        _patronMouseObj->set_state("\xef\xee\xec\xe8\xe4\xee\xf0"); // "помидор"
                } else {
                    _patronMouseObj->set_state("\xe1\xe0\xed\xe0\xed");             // "банан"
                }
            }
            if (_shotsBananaCounter <= 0 && _patronTomatoObj->is_state_active("\xe1\xe0\xed\xe0\xed")) {    // "банан"
                if (_shotsTomatoCounter <= 0) {
                    if (_shoteEggCounter <= 0)
                        _patronMouseObj->set_state("\xed\xe8\xf7\xe5\xe3\xee"); // "ничего"
                    else
                        _patronMouseObj->set_state("\xff\xe9\xf6\xee");         // "яйцо"
                } else {
                    _patronMouseObj->set_state("\xef\xee\xec\xe8\xe4\xee\xf0"); // "помидор"
                }
            }
        }

        // Hit check
        if (_fazaObj->is_state_active("\xe4\xe0")       // "да"
                && !_bloodObj->is_state_active("\xe5\xf1\xf2\xfc")) {   // "есть"
            mgVect2i pos = _menObj->screen_R();

            if (ABS(pos.x - _cursorPos.x) <= 15 && ABS(pos.y - _cursorPos.y) <= 35) {
                _killObj->set_state("\xe4\xe0");        // "да"
                --_livesCounter;

                updateStats();

                _doingJump = false;
                _manSpeed = 7 - _livesCounter;

                if (_manSpeed > 4)
                    _manSpeed = 4;
            }
        }

        if (!_livesCounter) {
            _isFinal = true;
            _doneObj->set_state("\xe4\xe0");        // "да"
            _goingLeft = false;
            _goingRight = false;
            _doingJump = false;
        }

        updateWalkState();

        return true;
    }

    void updateWalkState() {
        if ((_goingLeft || _goingRight) && !_doingWalk) {
            _doingWalk = true;
            _walkFlagObj->set_state("\xe4\xe0");        // "да"

            _jumpFlag = false;
            _jumpFlagObj->set_state("\xed\xe5\xf2");    // "нет"

            return;
        }

        if (_doingJump) {
            _doingWalk = false;
            _walkFlagObj->set_state("\xed\xe5\xf2");    // "нет"

            _jumpFlag = true;
            _jumpFlagObj->set_state("\xe4\xe0");        // "да"

            return;
        }


        _doingWalk = false;
        _walkFlagObj->set_state("\xed\xe5\xf2");    // "нет"

        _jumpFlag = false;
        _jumpFlagObj->set_state("\xed\xe5\xf2");    // "нет"
    }

    bool finit() {
        debugC(1, kDebugMinigames, "ArkadaAvtomat::finit()");

        if (_scene)  {
            _engine->release_scene_interface(_scene);
            _scene = 0;
        }

        return true;
    }

    bool new_game(const qdEngineInterface *engine_interface) {
        return true;
    }

    int save_game(const qdEngineInterface *engine_interface, const qdMinigameSceneInterface *scene_interface, char *buffer, int buffer_size) {
        return 0;
    }

    int load_game(const qdEngineInterface *engine_interface, const qdMinigameSceneInterface *scene_interface, const char *buffer, int buffer_size) {
        return 0;
    }

    enum { INTERFACE_VERSION = 99 };
    int version() const {
        return INTERFACE_VERSION;
    }

private:
    void  updateStats() {
        _shotsEggObj->set_state(Common::String::format("%i", _shoteEggCounter).c_str());
        _shotsBananObj->set_state(Common::String::format("%i", _shotsBananaCounter).c_str());
        _shotsTomatoObj->set_state(Common::String::format("%d", _shotsTomatoCounter).c_str());
        _livesObj->set_state(Common::String::format("%d", _livesCounter).c_str());
    }

private:
    const qdEngineInterface *_engine = nullptr;
    qdMinigameSceneInterface *_scene = nullptr;

    qdMinigameObjectInterface *_patronMouseObj = nullptr;
    qdMinigameObjectInterface *_patronTomatoObj = nullptr;
    qdMinigameObjectInterface *_killObj = nullptr;
    qdMinigameObjectInterface *_fazaObj = nullptr;
    qdMinigameObjectInterface *_menObj = nullptr;
    qdMinigameObjectInterface *_bloodObj = nullptr;
    qdMinigameObjectInterface *_shotsEggObj = nullptr;
    qdMinigameObjectInterface *_shotsTomatoObj = nullptr;
    qdMinigameObjectInterface *_shotsBananObj = nullptr;
    qdMinigameObjectInterface *_doneObj = nullptr;
    qdMinigameObjectInterface *_livesObj = nullptr;
    qdMinigameObjectInterface *_bublObj = nullptr;
    qdMinigameObjectInterface *_walkFlagObj = nullptr;
    qdMinigameObjectInterface *_jumpFlagObj = nullptr;

    bool _goingLeft = false;
    bool _goingRight = false;
    bool _doingJump = false;
    bool _doingWalk = false;
    bool _jumpFlag = false;

    int _stepsToLeft = 0;
    int _stepsToRight = 0;
    int _stepsToJump = -1;

    mgVect3f _menCoords;
    int _manSpeed = 2;

    int _shotsTomatoCounter = 9;
    int _shotsBananaCounter = 10;
    int _shoteEggCounter = 10;
    int _livesCounter = 5;

    bool _isFinal = false;

    mgVect2i _cursorPos;

    int _manOrigPosY = 0;
    int _jumpHeight = 0;
    int _jumpingPhase3Y = 0;

    bool _jumpPhaseIsGoingDown = false;

    int _jumpPhase = 2;
    int _jumpNextPhase = -1;
};

} // namespace QDEngine

#endif // QDENGINE_MINIGAMES_ARKADA_AVTOMAT_H