c_move.c

Go to the documentation of this file.

/*
 * Crossfire -- cooperative multi-player graphical RPG and adventure game
 *
 * Copyright (c) 1999-2014 Mark Wedel and the Crossfire Development Team
 * Copyright (c) 1992 Frank Tore Johansen
 *
 * Crossfire is free software and comes with ABSOLUTELY NO WARRANTY. You are
 * welcome to redistribute it under certain conditions. For details, please
 * see COPYING and LICENSE.
 *
 * The authors can be reached via e-mail at <crossfire@metalforge.org>.
 */
 
#include <global.h>
#ifndef __CEXTRACT__
#include <sproto.h>
#endif
#include <skills.h>
 
static void move_internal(object *op, const char *params, int dir) {
    if (*params != '\0') {
        if (params[0] == 'f') {
            if (!op->contr->fire_on) {
                op->contr->fire_on = 1;
                move_player(op, dir);
                op->contr->fire_on = 0;
                return;
            }
        } else if (params[0] == 'r' && !op->contr->run_on)
            op->contr->run_on = 1;
    }
    move_player(op, dir);
}
 
void command_east(object *op, const char *params) {
    move_internal(op, params, 3);
}
 
void command_north(object *op, const char *params) {
    move_internal(op, params, 1);
}
 
void command_northeast(object *op, const char *params) {
    move_internal(op, params, 2);
}
 
void command_northwest(object *op, const char *params) {
    move_internal(op, params, 8);
}
 
void command_south(object *op, const char *params) {
    move_internal(op, params, 5);
}
 
void command_southeast(object *op, const char *params) {
    move_internal(op, params, 4);
}
 
void command_southwest(object *op, const char *params) {
    move_internal(op, params, 6);
}
 
void command_west(object *op, const char *params) {
    move_internal(op, params, 7);
}
 
void command_stay(object *op, const char *params) {
    if (!op->contr->fire_on && params[0] != 'f')
        return;
    fire(op, 0);
}
 
void do_goto(object *op, const char *name, int x, int y) {
    object *dummy;
    dummy = object_new();
    dummy->map = op->map;
    EXIT_PATH(dummy) = add_string(name);
    EXIT_X(dummy) = x;
    EXIT_Y(dummy) = y;
    dummy->name = add_string(name);
 
    enter_exit(op, dummy);
    object_free(dummy, FREE_OBJ_NO_DESTROY_CALLBACK);
}