actor.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 NUVIE_ACTORS_ACTOR_H
#define NUVIE_ACTORS_ACTOR_H

#include "ultima/shared/std/containers.h"
#include "common/str.h"
#include "ultima/nuvie/misc/actor_list.h"
#include "ultima/nuvie/core/map.h"
#include "ultima/nuvie/core/obj_manager.h"

namespace Ultima {
namespace Nuvie {

#define ACTOR_NO_READIABLE_LOCATION -1
#define ACTOR_HEAD   0
#define ACTOR_NECK   1
#define ACTOR_BODY   2
#define ACTOR_ARM    3
#define ACTOR_ARM_2  4
#define ACTOR_HAND   5
#define ACTOR_HAND_2 6
#define ACTOR_FOOT   7
#define ACTOR_NOT_READIABLE 8

// actor alignment
enum ActorAlignment {
    ACTOR_ALIGNMENT_DEFAULT = 0,
    ACTOR_ALIGNMENT_NEUTRAL = 1,
    ACTOR_ALIGNMENT_EVIL    = 2,
    ACTOR_ALIGNMENT_GOOD    = 3,
    ACTOR_ALIGNMENT_CHAOTIC = 4,
};

// move-flags
#define ACTOR_FORCE_MOVE    1
#define ACTOR_IGNORE_OTHERS 2
#define ACTOR_OPEN_DOORS    4
#define ACTOR_IGNORE_DANGER 8
#define ACTOR_IGNORE_MOVES 0x10
#define ACTOR_IGNORE_PARTY_MEMBERS 0x20 // only used in Actor::check_move. In U6, player diagonal movement
// between two blocked tiles isn't allowed (non-party actors block)

// push-flags (exclusive)
#define ACTOR_PUSH_ANYWHERE 0
#define ACTOR_PUSH_HERE     1
#define ACTOR_PUSH_FORWARD  2

#define ACTOR_SHOW_BLOOD true
#define ACTOR_FORCE_HIT true

#define ACTOR_STATUS_PROTECTED 0x1
#define ACTOR_STATUS_PARALYZED 0x2
#define ACTOR_STATUS_ASLEEP    0x4
#define ACTOR_STATUS_POISONED  0x8
#define ACTOR_STATUS_DEAD      0x10
#define ACTOR_STATUS_ATTACK_EVIL 0x20
#define ACTOR_STATUS_ATTACK_GOOD 0x40
#define ACTOR_STATUS_IN_PARTY  0x80
#define ACTOR_STATUS_ALIGNMENT_MASK 0x60

#define ACTOR_MOVEMENT_HIT_FLAG 0x8
#define ACTOR_MOVEMENT_FLAGS_OLD_ALIGNMENT_MASK 0x60

#define ACTOR_OBJ_FLAG_
#define ACTOR_NO_ERROR 0
#define ACTOR_OUT_OF_MOVES 1
#define ACTOR_BLOCKED 2
#define ACTOR_BLOCKED_BY_OBJECT 3
#define ACTOR_BLOCKED_BY_ACTOR 4

#define ACTOR_MAX_READIED_OBJECTS 8

#define ACTOR_WT_FOLLOW 1
#define ACTOR_WT_PLAYER 2
#define ACTOR_WT_RANGED 4
#define ACTOR_WT_RETREAT 7
#define ACTOR_WT_ASSAULT 8

#define ACTOR_CHANGE_BASE_OBJ_N true

#define ACTOR_VEHICLE_ID_N 0
#define ACTOR_AVATAR_ID_N  1

#define INV_EXCLUDE_READIED_OBJECTS false
#define INV_INCLUDE_READIED_OBJECTS true

#define ACTOR_MD_OBJ_FLAG_HYPOXIA 6
#define ACTOR_MD_OBJ_FLAG_FRENZY  7

#define ACTOR_MD_STATUS_FLAG_COLD 0

class Map;
class MapCoord;
class UseCode;
class ActorPathFinder;
class U6LList;
class GameClock;
class Path;

typedef struct {
    uint16 x;
    uint16 y;
    uint8 z;
    uint8 hour;
    uint8 day_of_week; // 0 = any day 1..7
    uint8 worktype;
} Schedule;

typedef enum { ATTACK_TYPE_NONE, ATTACK_TYPE_HAND, ATTACK_TYPE_THROWN, ATTACK_TYPE_MISSLE } AttackType;

typedef struct {
    uint16 obj_n;

    union {
        uint8 defence;
        uint8 defense;
    };
    union {
        uint8 attack;
        uint8 damage;
    };

    uint16 hit_range;
    AttackType attack_type;

    uint16 missle_tile_num;
    uint16 thrown_obj_n;

    bool breaks_on_contact;
} CombatType;

typedef struct {
    Obj *obj;
    const CombatType *combat_type;
    bool double_handed;
} ReadiedObj;

typedef uint8 ActorErrorCode;
typedef struct {
    ActorErrorCode err;
    Obj *blocking_obj;
    Actor *blocking_actor;
} ActorError;

typedef uint8 ActorMoveFlags;

typedef enum {
    ACTOR_ST, // single tile
    ACTOR_DT, // double tile
    ACTOR_QT, // quad tile
    ACTOR_MT  // multi tile
} ActorTileType;

class Actor {
    friend class ActorManager;
    friend class MapWindow;
    friend class Party;
    friend class Player;
    friend class U6UseCode;

public:
    struct cmp_level {
        bool operator()(Actor *a1, Actor *a2) const {
            return (a1->level > a2->level);
        }
    };

    struct cmp_dex {
        bool operator()(Actor *a1, Actor *a2) const {
            return (a1->dex > a2->dex);
        }
    };

    struct cmp_moves {
        bool operator()(Actor *a1, Actor *a2) const {
            return (a1->moves > a2->moves);
        }
    };

    struct cmp_move_fraction {
        bool operator()(Actor *a1, Actor *a2) const {
            if (a1->dex == 0) {
                a1->dex = 1;
                DEBUG(0, LEVEL_WARNING, "%s (%d) has 0 dex!\n", a1->get_name(), a1->id_n);
            }
            if (a2->dex == 0) {
                a2->dex = 1;
                DEBUG(0, LEVEL_WARNING, "%s (%d) has 0 dex!\n", a2->get_name(), a2->id_n);
            }
            return (a1->moves / a1->dex > a2->moves / a2->dex);
        }
    };

    struct cmp_distance_to_loc {
        MapCoord cmp_loc;
        void operator()(const MapCoord &cmp_loc2) {
            cmp_loc = cmp_loc2;
        }
        bool operator()(Actor *a1, Actor *a2) {
            MapCoord loc1(a1->x, a1->y, a1->z);
            MapCoord loc2(a2->x, a2->y, a2->z);
            return (loc1.distance(cmp_loc) < loc2.distance(cmp_loc));
        }
    };

protected:

    uint8 id_n;

    Map *map;
    ObjManager *obj_manager;
    GameClock *_clock;
    UseCode *usecode;
    ActorPathFinder *pathfinder;

    uint16 x;
    uint16 y;
    uint16 z;

    uint8 worktype;
    MapCoord work_location;
    uint32 move_time; // time (in clock ticks) of last update() (for display)
    // FIXME: replace with animation
    uint16 obj_n;
    uint16 frame_n;
    uint16 base_obj_n;
    uint16 old_frame_n;

    NuvieDir direction;
    uint8 walk_frame;

    uint8 obj_flags;
    uint8 status_flags;
    uint8 talk_flags;
    uint8 movement_flags; //0x19f1

    bool ethereal;
    bool can_move;
    bool temp_actor;
    bool met_player;

    bool visible_flag;
// bool active; // "cached in"

    sint8 moves; // number of moves actor has this turn
    uint8 light; // level of light around actor (normally 0)
    Common::Array<uint8> light_source;

    ActorError error_struct; // error/status; result of previous action

    uint8 strength;
    uint8 dex;
    uint8 intelligence;
    uint8 hp;
    uint8 level;
    uint16 exp;
    uint8 magic;
    uint8 combat_mode;
    ActorAlignment alignment;

    uint8 body_armor_class;
    uint8 readied_armor_class;

    Common::String name;

    ReadiedObj *readied_objects[ACTOR_MAX_READIED_OBJECTS];

    Schedule **sched;
    int num_schedules;

    U6LList *obj_inventory;

//current schedule pos;
    uint16 sched_pos;

    Common::List<Obj *> surrounding_objects; //used for multi-tile actors.
    Common::HashMap<uint16, uint16> *custom_tile_tbl;

public:

    Actor(Map *m, ObjManager *om, GameClock *c);
    virtual ~Actor();

    virtual bool init(uint8 obj_status = NO_OBJ_STATUS);
    void init_from_obj(Obj *obj, bool change_base_obj = false);

    bool is_avatar() const {
        return id_n == ACTOR_AVATAR_ID_N;
    }
    bool is_onscreen() const {
        return MapCoord(x, y, z).is_visible();
    }
    bool is_in_party() const {
        return ((status_flags & ACTOR_STATUS_IN_PARTY) == ACTOR_STATUS_IN_PARTY);
    }
    bool is_in_vehicle() const;
    bool is_visible() const {
        return visible_flag;
    }
    bool is_alive() const {
        return (status_flags & ACTOR_STATUS_DEAD) ? false : true;
    }
    bool is_nearby(const Actor *other) const;
    bool is_nearby(uint8 actor_num) const;
    bool is_nearby(const MapCoord &where, uint8 thresh = 5) const;
    bool is_at_position(const Obj *obj) const;
    virtual bool is_passable() const;
    bool is_temp() const {
        return temp_actor;
    }
    virtual bool isFlying() const {
        return false;
    }
    virtual bool isNonBlocking() const {
        return false;
    }
    virtual bool doesOccupyLocation(uint16 lx, uint16 ly, uint8 lz, bool incDoubleTile = true, bool incSurroundingObjs = true) const;

//for lack of a better name:
    bool is_met() const {
        return talk_flags & 0x01;
    }
    bool is_poisoned() const {
        return status_flags & ACTOR_STATUS_POISONED;
    }
    bool is_invisible() const {
        return obj_flags & OBJ_STATUS_INVISIBLE;
    }
    virtual bool is_immobile() const; // frozen by worktype or status
    virtual bool is_sleeping() const {
        return status_flags & ACTOR_STATUS_ASLEEP;
    }
    virtual bool is_paralyzed() const {
        return status_flags & ACTOR_STATUS_PARALYZED;
    }
    virtual bool is_protected() const {
        return status_flags & ACTOR_STATUS_PROTECTED;
    }
    virtual bool is_charmed() const {
        return obj_flags & OBJ_STATUS_CHARMED;
    }
    virtual bool is_cursed() const {
        return obj_flags & OBJ_STATUS_CURSED;
    }
    virtual bool get_corpser_flag() const {
        return false;
    }
    bool is_hit() const {
        return movement_flags & ACTOR_MOVEMENT_HIT_FLAG;
    }

    void set_name(const char *actor_name) {
        name = actor_name;
    }
    const char *get_name(bool force_real_name = false);

    void get_location(uint16 *ret_x, uint16 *ret_y, uint8 *ret_level) const;
    MapCoord get_location() const;

    uint16 get_tile_num() const;
    Tile *get_tile() const;
    virtual uint16 get_downward_facing_tile_num() const;
    uint8 get_actor_num() const {
        return id_n;
    }
    uint8 get_talk_flags() const {
        return talk_flags;
    }
    virtual ActorTileType get_tile_type() const {
        return ACTOR_ST;
    }

    uint16 get_frame_n() const {
        return frame_n;
    }
    uint16 get_old_frame_n() const {
        return old_frame_n;
    }
    uint16 get_x() const {
        return x;
    }
    uint16 get_y() const {
        return y;
    }
    uint8  get_z() const {
        return z;
    }

    uint8 get_strength() const {
        return strength;
    }
    uint8 get_dexterity() const {
        return dex;
    }
    uint8 get_intelligence() const {
        return intelligence;
    }
    uint8 get_hp() const {
        return hp;
    }
    virtual uint8 get_hp_text_color() const {
        return 0;
    }
    virtual uint8 get_str_text_color() const {
        return 0;
    }
    virtual uint8 get_dex_text_color() const {
        return 0;
    }

    uint8 get_level() const {
        return level;
    }
    uint16 get_exp() const {
        return exp;
    }
    uint8 get_magic() const {
        return magic;
    }
    ActorAlignment get_alignment() const {
        return alignment;
    }
    uint8 get_old_alignment() const {
        return ((movement_flags & ACTOR_MOVEMENT_FLAGS_OLD_ALIGNMENT_MASK) >> 5) + 1;
    }
    sint8 get_moves_left() const {
        return moves;
    }
    virtual uint8 get_maxhp() const {
        return 0;
    }
    virtual uint8 get_maxmagic() const {
        return 0;
    }
    bool get_obj_flag(uint8 bitFlag) const {
        return bitFlag < 8 ? (obj_flags & (1 << bitFlag)) : false;
    }
    bool get_status_flag(uint8 bitFlag) const {
        return bitFlag < 8 ? (status_flags & (1 << bitFlag)) : false;
    }

    uint16 get_base_obj_n() const {
        return base_obj_n;
    }
    virtual void change_base_obj_n(uint16 val) {
        base_obj_n = obj_n = val;
        frame_n = 0;
    }
    void set_obj_n(uint16 val) {
        obj_n = val;
    }
    void set_frame_n(uint16 val) {
        frame_n = val;
    }
    void set_strength(uint8 val) {
        strength = val;
    }
    void set_dexterity(uint8 val) {
        dex = val;
    }
    void set_intelligence(uint8 val) {
        intelligence = val;
    }
    void set_hp(uint8 val);
    void set_level(uint8 val) {
        level = val;
    }
    void set_exp(uint16 val) {
        exp = clamp_max(val, 9999);
    }
    void set_magic(uint8 val) {
        magic = val;
    }
    void set_alignment(ActorAlignment a) {
        alignment = a;
    }
    void set_old_alignment(ActorAlignment a) {
        if (a > 0 && a < 5) {
            movement_flags |= (a - 1) << 5;
        }
    }
    uint8 get_light_level() const;
    void add_light(uint8 val);
    void subtract_light(uint8 val);
    void heal() {
        set_hp(get_maxhp());
    }
    void cure();
    void set_moves_left(sint8 val);
    void set_dead_flag(bool value);
    virtual void update_time() {
        set_moves_left(get_moves_left() + get_dexterity());
    }
    void set_poisoned(bool poisoned);
    virtual void set_paralyzed(bool paralyzed) {
        return;
    }
    virtual void set_protected(bool val) {
        return;
    }
    virtual void set_charmed(bool val) {
        return;
    }
    virtual void set_corpser_flag(bool val) {
        return;
    }
    virtual void set_cursed(bool val) {
        return;
    }
    virtual void set_asleep(bool val) {
        return;
    }
    void set_obj_flag(uint8 bitFlag, bool value);
    void set_status_flag(uint8 bitFlag, bool value);
    void set_hit_flag(bool val);

    void set_invisible(bool invisible);
    void set_custom_tile_num(uint16 obj_num, uint16 tile_num);

    uint8 get_worktype();
    uint8 get_sched_worktype();
    virtual void set_worktype(uint8 new_worktype, bool init = false);
    uint8 get_combat_mode() const {
        return combat_mode;
    }
    void set_combat_mode(uint8 new_mode);
    virtual void revert_worktype() { }

    NuvieDir get_direction() const {
        return direction;
    }
    void set_direction(sint16 rel_x, sint16 rel_y);
    virtual void set_direction(NuvieDir d);
    void face_location(const MapCoord &loc);
    virtual void face_location(uint16 lx, uint16 ly);
    void face_actor(Actor *a);

    void set_talk_flags(uint8 newflags) {
        talk_flags = newflags;
    }
    uint8 get_flag(uint8 bitflag);
    void set_flag(uint8 bitflag);
    void clear_flag(uint8 bitflag);
    void show();
    void hide();
    void set_error(ActorErrorCode err);
    void clear_error();
    ActorError *get_error();

    const Common::List<Obj *> &get_surrounding_obj_list() const {
        return surrounding_objects;
    }
    void add_surrounding_obj(Obj *obj);
    void unlink_surrounding_objects(bool make_objects_temporary = false);

    bool moveRelative(sint16 rel_x, sint16 rel_y, ActorMoveFlags flags = 0);
    virtual bool move(uint16 new_x, uint16 new_y, uint8 new_z, ActorMoveFlags flags = 0);
    virtual bool check_move(uint16 new_x, uint16 new_y, uint8 new_z, ActorMoveFlags flags = 0);
    bool check_moveRelative(sint16 rel_x, sint16 rel_y, ActorMoveFlags flags = 0);

    virtual bool can_be_moved();
    virtual bool can_be_passed(const Actor *other, bool ignoreParty = false) const;
    virtual void update();
    void set_in_party(bool state);
    void set_pathfinder(ActorPathFinder *new_pf, Path *path_type = 0);
    ActorPathFinder *get_pathfinder() {
        return pathfinder;
    }
    void delete_pathfinder();
    virtual void pathfind_to(const MapCoord &d);
    void pathfind_to(uint16 gx, uint16 gy, uint8 gz = 255);
    bool walk_path();
    virtual void preform_worktype() {
        return;
    }

// combat methods
    //void attack(const MapCoord &pos); // attack at a given map location
    Obj *get_weapon_obj(sint8 readied_obj_location);
    void attack(sint8 readied_obj_location, MapCoord target, Actor *foe = nullptr);
    const CombatType *get_weapon(sint8 readied_obj_location);
    void attract_to(Actor *target);
    void repel_from(Actor *target);

    void hit(uint8 dmg, bool force_hit = false);
    void reduce_hp(uint8 amount);
    virtual void die(bool create_body = true);
    void resurrect(const MapCoord &new_position, Obj *body_obj = nullptr);
    uint8 get_range(uint16 target_x, uint16 target_y);
    bool weapon_can_hit(const CombatType *weapon, uint16 target_x, uint16 target_y);
    virtual bool weapon_can_hit(const CombatType *weapon, Actor *target, uint16 *hit_x, uint16 *hit_y) {
        *hit_x = target->get_x();
        *hit_y = target->get_y();
        return true;
    }
    void display_condition();
    ActorList *find_enemies(); // returns list or 0 if no enemies nearby

    U6LList *get_inventory_list();
    const U6LList *get_inventory_list() const;
    bool inventory_has_object(uint16 obj_n, uint8 qual = 0, bool match_quality = OBJ_MATCH_QUALITY, uint8 frame_n = 0, bool match_frame_n = OBJ_NOMATCH_FRAME_N);
    uint32 inventory_count_objects(bool inc_readied_objects) const;
    uint32 inventory_count_object(uint16 obj_n);
    Obj *inventory_get_object(uint16 obj_n, uint8 qual = 0, bool match_quality = OBJ_MATCH_QUALITY, uint8 frame_n = 0, bool match_frame_n = OBJ_NOMATCH_FRAME_N);
    bool is_double_handed_obj_readied();
    Obj *inventory_get_readied_object(uint8 location);
    sint16 inventory_get_readied_obj_n(uint8 location) {
        return (inventory_get_readied_object(location) == nullptr ? -1 : inventory_get_readied_object(location)->obj_n);
    }
    virtual Obj *inventory_get_food(Obj *container = 0) {
        return 0;
    }
    const CombatType *inventory_get_readied_object_combat_type(uint8 location);
    bool inventory_add_object(Obj *obj, Obj *container = 0, bool stack = true);
    bool inventory_add_object_nostack(Obj *obj, Obj *container = 0) {
        return inventory_add_object(obj, container, false);
    }
    void inventory_del_all_objs();
    bool inventory_remove_obj(Obj *obj, bool run_usecode = true);
    Obj *inventory_new_object(uint16 obj_n, uint32 qty, uint8 quality = 0);
    uint32 inventory_del_object(uint16 obj_n, uint32 qty, uint8 quality);
    float inventory_get_max_weight() const {
        return strength * 2;
    }
    float get_inventory_weight() const;
    float get_inventory_equip_weight();
    void inventory_drop_all();
    void all_items_to_container(Obj *container_obj, bool stack);
    bool can_carry_weight(Obj *obj) const;
    bool can_carry_weight(float obj_weight) const; // return from get_obj_weight()
    virtual bool can_carry_object(uint16 obj_n, uint32 qty = 0) const;
    virtual bool can_carry_object(Obj *obj) const;

    virtual uint8 get_object_readiable_location(Obj *obj);
    virtual const CombatType *get_object_combat_type(uint16 objN) {
        return nullptr;
    }

    bool can_ready_obj(Obj *obj);
    bool add_readied_object(Obj *obj);
    void remove_readied_object(Obj *obj, bool run_usecode = true); // run_usecode to stop from running usecode twice or an infinite loop
    void remove_readied_object(uint8 location, bool run_usecode = true);

    void remove_all_readied_objects();
    bool has_readied_objects();
    sint8 count_readied_objects(sint32 obj_n = -1, sint16 frame_n = -1, sint16 quality = -1);

    virtual void twitch() {
        return;
    }
    bool push(Actor *pusher, uint8 where = ACTOR_PUSH_ANYWHERE);

    Obj *make_obj();
    uint16 get_obj_n() const {
        return obj_n;
    }
    virtual void clear();
    virtual bool morph(uint16 obj_n); // change actor type

    bool get_schedule_location(MapCoord *loc) const;
    bool is_at_scheduled_location() const;
    int get_number_of_schedules() const {
        return num_schedules;
    }
    Schedule *get_schedule(uint8 index);
    virtual bool will_not_talk() const {
        return false;
    }
    uint16 get_custom_tile_num(uint16 obj_num) const;
protected:

    void loadSchedule(const unsigned char *schedule_data, uint16 num);
    virtual bool updateSchedule(uint8 hour, bool teleport = false);
    uint16 getSchedulePos(uint8 hour);
// uint16 getSchedulePos(uint8 hour, uint8 day_of_week);
// inline uint16 Actor::getSchedulePos(uint8 hour);

    void inventory_parse_readied_objects(); //this is used to initialise the readied_objects array on load.

    virtual const CombatType *get_hand_combat_type() const {
        return nullptr;
    }

    virtual void set_ethereal(bool val) {
        ethereal = val;
    }
    virtual void print();
    virtual void handle_lightsource(uint8 hour) {
        return;
    }
    virtual const char *get_worktype_string(uint32 wt) const {
        return nullptr;
    }

    Obj *find_body();
    uint16 get_tile_num(uint16 obj_num) const;
    uint8 get_num_light_sources() const {
        return light_source.size();
    }

private:

};

const char *get_actor_alignment_str(ActorAlignment alignment);

} // End of namespace Nuvie
} // End of namespace Ultima

#endif