shveik_shkatulka.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_SHVEIK_SHKATULKA_H
#define QDENGINE_MINIGAMES_SHVEIK_SHKATULKA_H

#include "common/debug.h"

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

namespace QDEngine {

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

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

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

        _stones[0] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x31"); // "камень1"
        _stones[1] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x32"); // "камень2"
        _stones[2] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x33"); // "камень3"
        _stones[3] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x34"); // "камень4"
        _stones[4] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x35"); // "камень5"
        _stones[5] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x36"); // "камень6"
        _stones[6] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x37"); // "камень7"
        _stones[7] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x38"); // "камень8"
        _stones[8] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x39"); // "камень9"
        _stones[9] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x31\x30"); // "камень10"
        _stones[10] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x31\x31"); // "камень11"
        _stones[11] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x31\x32"); // "камень12"
        _stones[12] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x31\x33"); // "камень13"
        _stones[13] = _scene->object_interface("\xea\xe0\xec\xe5\xed\xfc\x31\x34"); // "камень14"

        _cursorObj = _scene->object_interface("\xea\xf3\xf0\xf1\xee\xf0"); // "курсор"
        _doneObj = _scene->object_interface("$done");
        _startObj = _scene->object_interface("\x24\xe7\xe0\xef\xf3\xf1\xea"); // "$запуск"
        _jumpSoundObj = _scene->object_interface("\xe7\xe2\xf3\xea\x20\xef\xe5\xf0\xe5\xf1\xea\xee\xea\xe0"); // "звук перескока"

        _direction = kDirNone;
        _cursorTakenFlag = 0;
        _someVar3 = 0;
        _needSnap = false;

        if (_startObj->is_state_active("\xed\xe5\x20\xe1\xfb\xeb")) { // "не был"
            resetStones();
            _startObj->set_state("\xe1\xfb\xeb"); // "был"
        }

        return true;
    }

    enum {
        kDirNone,
        kDirUp,
        kDirRight,
        kDirDown,
        kDirLeft
    };

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

        if (checkSolution()) {
            _doneObj->set_state("\xe4\xe0");    // "да"
            _cursorObj->set_state("nottaken");
            _draggedStone = 0;
            _direction = kDirNone;
            _cursorTakenFlag = 0;
            _someVar3 = 0;
            _needSnap = 0;

            return true;
        }

        if (_engine->is_mouse_event_active(qdmg::qdEngineInterfaceImpl::MOUSE_EV_LEFT_DOWN)
                && _scene->mouse_click_object_interface()) {
            const char *state = _scene->mouse_click_object_interface()->current_state_name();

            if (state[0] == '1' || state[0] == '2') {
                _draggedStone = _scene->mouse_click_object_interface();

                _mousePos = _engine->mouse_cursor_position();
                _cursorTakenFlag = 1;
                _someVar3 = 1;
            } else if (state[0] == '0') {
                resetStones();
            }
        }

        if (_engine->is_mouse_event_active(qdmg::qdEngineInterfaceImpl::MOUSE_EV_LEFT_UP) && _cursorTakenFlag) {
            _draggedStone = 0;
            _cursorTakenFlag = 0;
            _someVar3 = 0;
            _needSnap = false;
            _direction = kDirNone;
        }

        mgVect2i curPos = _engine->mouse_cursor_position();

        if (_cursorTakenFlag) {
            if (!_needSnap) {
                _mouseDelta.x = curPos.x - _mousePos.x;
                _mouseDelta.y = curPos.y - _mousePos.y;

                if (ABS(_mouseDelta.x) <= ABS(_mouseDelta.y)) { // Going down
                    const char *state = _draggedStone->current_state_name();
                    int draggedStonePos;

                    if (state[2] == '\0')
                        draggedStonePos = state[1] - '0';
                    else if (state[2] == '0')
                        draggedStonePos = 10;
                    else
                        draggedStonePos = 11;

                    int off = 60;
                    if (draggedStonePos == 3 || draggedStonePos == 8) {
                        int delta = 0;

                        if (curPos.y <= _mousePos.y) {
                            if (draggedStonePos == 3)
                                delta = 186;
                            else
                                delta = 0;
                        } else {
                            if (draggedStonePos == 8)
                                delta = 196;
                            else
                                delta = 0;
                        }
                        off = delta + 150;
                    }

                    if (ABS(_mouseDelta.y) > off) {
                        if (curPos.y <= _mousePos.y)
                            _direction = kDirUp;
                        else
                            _direction = kDirDown;

                        _needSnap = true;
                    }
                } else if (ABS(_mouseDelta.x) > 60) {
                    if (curPos.x <= _mousePos.x)
                        _direction = kDirLeft;
                    else
                        _direction = kDirRight;

                    _needSnap = true;
                }
            }

            if (_cursorTakenFlag && _needSnap) {
                const char *state = _draggedStone->current_state_name();
                int draggedStonePos;

                if (state[2] == '\0')
                    draggedStonePos = state[1] - '0';
                else if (state[2] == '0')
                    draggedStonePos = 10;
                else
                    draggedStonePos = 11;

                int side = state[0] - '0';
                int pos = -1;

                if (side == 1) {
                    switch (_direction) {
                    case kDirUp:
                        if (draggedStonePos != 8 || checkStonePosition(3, 1) || checkStonePosition(8, 2))
                            break;

                        pos = 3;
                        break;
                    case kDirRight:
                        if (draggedStonePos == 4
                                || draggedStonePos == 11
                                || checkStonePosition(draggedStonePos + 1, 1)
                                || checkStonePosition(draggedStonePos, 2))
                            break;

                        pos = draggedStonePos + 1;
                        break;
                    case kDirDown:
                        if (draggedStonePos != 3 || checkStonePosition(8, 1) || checkStonePosition(8, 2))
                            break;

                        pos = 8;
                        break;
                    case kDirLeft:
                        if (draggedStonePos == 1
                                || draggedStonePos == 5
                                || checkStonePosition(draggedStonePos - 1, 1)
                                || checkStonePosition(draggedStonePos - 1, 2))
                            break;

                        pos = draggedStonePos - 1;
                        break;

                    default:
                        break;
                    }
                } else {
                    switch (_direction) {
                    case kDirUp:
                        if (draggedStonePos != 8 || checkStonePosition(3, 1) || checkStonePosition(3, 2))
                            break;

                        pos = 3;
                        break;

                    case kDirRight:
                        if (draggedStonePos == 4
                                || draggedStonePos == 11
                                || checkStonePosition(draggedStonePos + 1, 1)
                                || checkStonePosition(draggedStonePos + 1, 2))
                            break;

                        pos = draggedStonePos + 1;
                        break;

                    case kDirDown:
                        if (draggedStonePos != 3 || checkStonePosition(8, 2) || checkStonePosition(3, 1))
                            break;

                        pos = 8;
                        break;

                    case kDirLeft:
                        if (draggedStonePos == 1
                                || draggedStonePos == 5
                                || checkStonePosition(draggedStonePos, 1)
                                || checkStonePosition(draggedStonePos - 1, 2))
                            break;

                        pos = draggedStonePos - 1;
                        break;

                    default:
                        break;
                    }
                }

                if (pos == -1) {
                    _cursorTakenFlag = 0;
                    _someVar3 = 0;
                } else {
                    _draggedStone->set_state(Common::String::format("%d%d", side, pos).c_str());
                    _mousePos = curPos;
                    _jumpSoundObj->set_state("\xe4\xe0");   // "да"
                }

                _direction = kDirNone;
                _needSnap = false;
            }
        }

        if (_cursorTakenFlag)
            _cursorObj->set_state("taken");
        else
            _cursorObj->set_state("nottaken");

        return true;
    }

    bool finit() {
        debugC(1, kDebugMinigames, "ShveikShkatulka::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 = 112 };
    int version() const {
        return INTERFACE_VERSION;
    }

private:
    void resetStones() {
        _stones[0]->set_state("15");
        _stones[1]->set_state("16");
        _stones[2]->set_state("17");
        _stones[3]->set_state("110");
        _stones[4]->set_state("11");
        _stones[5]->set_state("12");
        _stones[6]->set_state("14");
        _stones[7]->set_state("26");
        _stones[8]->set_state("27");
        _stones[9]->set_state("210");
        _stones[10]->set_state("211");
        _stones[11]->set_state("21");
        _stones[12]->set_state("22");
        _stones[13]->set_state("24");
    }

    bool checkSolution() {
        return
               _stones[0]->is_state_active("110")
            && _stones[1]->is_state_active("16")
            && _stones[2]->is_state_active("17")
            && _stones[3]->is_state_active("18")
            && _stones[4]->is_state_active("15")
            && _stones[5]->is_state_active("111")
            && _stones[6]->is_state_active("19")
            && _stones[7]->is_state_active("26")
            && _stones[8]->is_state_active("28")
            && _stones[9]->is_state_active("210")
            && _stones[10]->is_state_active("211")
            && _stones[11]->is_state_active("29")
            && _stones[12]->is_state_active("27")
            && _stones[13]->is_state_active("25");
    }

    bool checkStonePosition(int targetPos, int leftStones) {
        int n = leftStones == 1 ? 0 : 7;

        for (int i = 0; i < 7; i++) {
            const char *state = _stones[n + i]->current_state_name();
            int pos;

            if (state[2] == '\0')
                pos = state[1] - '0';
            else if (state[2] == '0')
                pos = 10;
            else
                pos = 11;

            if (pos == targetPos)
                return true;
        }

        return false;
    }

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

    int _direction = kDirNone;
    bool _cursorTakenFlag = false;

    mgVect2i _mousePos;
    mgVect2i _mouseDelta;
    int _someVar3 = 0;
    bool _needSnap = false;

    qdMinigameObjectInterface *_stones[14] = { nullptr };
    qdMinigameObjectInterface *_draggedStone = nullptr;
    qdMinigameObjectInterface *_cursorObj = nullptr;
    qdMinigameObjectInterface *_doneObj = nullptr;
    qdMinigameObjectInterface *_startObj = nullptr;
    qdMinigameObjectInterface *_jumpSoundObj = nullptr;
};

} // namespace QDEngine

#endif // QDENGINE_MINIGAMES_SHVEIK_SHKATULKA_H