commands/move.c

Go to the documentation of this file.

/************************************************************************
*            Atrinik, a Multiplayer Online Role Playing Game            *
*                                                                       *
*    Copyright (C) 2009-2011 Alex Tokar and Atrinik Development Team    *
*                                                                       *
* Fork from Daimonin (Massive Multiplayer Online Role Playing Game)     *
* and Crossfire (Multiplayer game for X-windows).                       *
*                                                                       *
* 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 2 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, write to the Free Software           *
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.             *
*                                                                       *
* The author can be reached at admin@atrinik.org                        *
************************************************************************/

#include <global.h>

static int move_internal(object *op, char *params, int dir)
{
    if (params)
    {
        if (params[0] == 'f')
        {
            if (!CONTR(op)->fire_on)
            {
                CONTR(op)->fire_on = 1;
                move_player(op, dir);
                CONTR(op)->fire_on = 0;
                return 0;
            }
        }
        else if (params[0] == 'r' && !CONTR(op)->run_on)
        {
            CONTR(op)->run_on = 1;
        }
    }

    move_player(op, dir);
    return 0;
}

int command_east(object *op, char *params)
{
    return move_internal(op, params, 3);
}

int command_north(object *op, char *params)
{
    return move_internal(op, params, 1);
}

int command_northeast(object *op, char *params)
{
    return move_internal(op, params, 2);
}

int command_northwest(object *op, char *params)
{
    return move_internal(op, params, 8);
}

int command_south(object *op, char *params)
{
    return move_internal(op, params, 5);
}

int command_southeast(object *op, char *params)
{
    return move_internal(op, params, 4);
}

int command_southwest(object *op, char *params)
{
    return move_internal(op, params, 6);
}

int command_west(object *op, char *params)
{
    return move_internal(op, params, 7);
}

int command_stay(object *op, char *params)
{
    if (!CONTR(op)->fire_on && (!params || params[0] != 'f'))
    {
        return 0;
    }

    fire(op, 0);
    return 0;
}

int command_turn_right(object *op, char *params)
{
    int dir = absdir(op->facing + 1);

    (void) params;

    op->anim_last_facing = op->anim_last_facing_last = op->facing = dir;
    SET_ANIMATION(op, dir * (NUM_ANIMATIONS(op) / NUM_FACINGS(op)));

    return 1;
}

int command_turn_left(object *op, char *params)
{
    int dir = absdir(op->facing - 1);

    (void) params;

    op->anim_last_facing = op->anim_last_facing_last = op->facing = dir;
    SET_ANIMATION(op, dir * (NUM_ANIMATIONS(op) / NUM_FACINGS(op)));

    return 1;
}

int command_push_object(object *op, char *params)
{
    object *tmp;
    mapstruct *m;
    int xt, yt, dir = op->facing;

    (void) params;

    /* We check for all conditions where player can't push anything. */
    if (dir <= 0 || QUERY_FLAG(op, FLAG_PARALYZED))
    {
        new_draw_info(0, COLOR_WHITE, op, "You are unable to push anything.");
        return 0;
    }

    xt = op->x + freearr_x[dir];
    yt = op->y + freearr_y[dir];

    if (!(m = get_map_from_coord(op->map, &xt, &yt)))
    {
        return 0;
    }

    for (tmp = GET_MAP_OB(m, xt, yt); tmp; tmp = tmp->above)
    {
        if (QUERY_FLAG(tmp, FLAG_CAN_ROLL))
        {
            break;
        }
    }

    if (tmp == NULL || !QUERY_FLAG(tmp, FLAG_CAN_ROLL))
    {
        new_draw_info(0, COLOR_WHITE, op, "You fail to push anything.");
        return 0;
    }

    tmp->direction = dir;

    /* Try to push the object. */
    if (!push_ob(tmp, dir, op))
    {
        new_draw_info_format(0, COLOR_WHITE, op, "You fail to push the %s.", query_name(tmp, NULL));
        return 0;
    }

    /* Now we move the player who was pushing the object. */
    move_ob(op, dir, op);
    new_draw_info_format(0, COLOR_WHITE, op, "You push the %s.", query_name(tmp, NULL));

    return 1;
}