player.c

//   Graeber2 - an digger adventure game
//
//   Copyright (C) 2021 Heiko Wolf
//
//   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.,
//   51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
//
//   Contact: projekte@kabelmail.net

#include "player.h"
#include "engine.h"
#include "hud.h"
#include "values.h"
#include "environment.h"
#include "items.h"

///init basic stats
void p_player_init_basic_stats (void) __nonbanked
{	
	o_player.lifepoints = 2;
	o_player.max_lifepoints = 3;
	o_player.amorvalue = c_amor_values [0];
	o_player.v_active_item = 0;
}	

///init inventory
void p_player_init_inventory (void) __nonbanked
{
	o_player.inventory.food = 1;
	o_player.inventory.max_food = 6;
	o_player.inventory.gold = 0;
	o_player.inventory.max_gold = 255;
	o_player.inventory.crystals = 0;
	o_player.inventory.max_crystals = 255;
	o_player.inventory.beer = 0;
	o_player.inventory.max_beer = 0;
	o_player.inventory.v_keys = false;
	
	o_player.inventory.pickaxe = false;
	o_player.inventory.steel_pickaxe = false;
	o_player.inventory.workwear = false;
	o_player.inventory.tabard = false;

	o_player.inventory.barrel = false;
	o_player.inventory.bomb_bag = false;

	o_player.inventory.bombs = 0;
	o_player.inventory.max_bombs = 0;
	o_player.inventory.whetstone = 0;
	o_player.inventory.max_whetstone = 3;
}

///init other player values
void p_player_init_others (void) __nonbanked
{
	o_player.xk = 0;
	o_player.yk = 0;
	o_player.mk = p_engine_calc_map (o_player.xk, o_player.yk);
	o_player.walk = true;
	o_player.v_attacktimer = 255;
	o_player.v_attack = false;
	o_player.v_hitcounter = 0;
	o_player.v_steps = 0;
}

///set player sprite graphics
void p_player_set_sprite_nr (uint8_t l_nr) __nonbanked
{
	set_sprite_tile (PLAYER_SPRITE_ID, l_nr);
}

///set player sprite to x and y on the screen
void p_player_set_sprite_xy (uint8_t l_xk, uint8_t l_yk) __nonbanked
{
	o_player.xk = l_xk;
	o_player.yk = l_yk;
	o_player.mk = p_engine_calc_map (l_xk, l_yk);
	move_sprite (PLAYER_SPRITE_ID, l_xk, l_yk);
	p_hud_show_players_mapK ();
	p_hud_show_players_xk ();
	p_hud_show_players_yk ();
	
} 

///set player weapon sprite graphics
void p_player_set_weapon_sprite (void) __nonbanked
{
	if (o_player.inventory.pickaxe == true) {
		set_sprite_tile (PLAYER_WEAPON_SPRITE_ID, 5);
	}
	else if (o_player.inventory.steel_pickaxe == true) {
		set_sprite_tile (PLAYER_WEAPON_SPRITE_ID, 6);
	}
}

///display weapon sprite of the player
void p_player_set_weapon_sprite_xk (void) __nonbanked
{
	if (o_player.direction == UP) {
		move_sprite (PLAYER_WEAPON_SPRITE_ID, o_player.xk, o_player.yk - 8);
	}
	else if (o_player.direction == DOWN) {
		move_sprite (PLAYER_WEAPON_SPRITE_ID, o_player.xk, o_player.yk + 8);	
	}
	else if (o_player.direction == LEFT) {
		move_sprite (PLAYER_WEAPON_SPRITE_ID, o_player.xk - 8, o_player.yk);	
	}
	else if (o_player.direction == RIGHT) {
		move_sprite (PLAYER_WEAPON_SPRITE_ID, o_player.xk + 8, o_player.yk);	
	}
}

void p_player_hide_weapon_sprite (void) __nonbanked
{
	move_sprite (PLAYER_WEAPON_SPRITE_ID, 0, 0);
}

///player main init
void p_player_init (void) __nonbanked
{
	p_player_init_basic_stats ();
	p_player_init_inventory ();
	p_player_init_others ();
	p_player_set_sprite_nr (0);
	p_player_set_sprite_xy (40, 112);
	p_player_set_weapon_sprite ();
}

///player collisions check on definied tile list
bool p_player_collision_check (void) __nonbanked
{
	if (o_player.direction == UP) {
		o_engine.v_tile [1] = p_engine_get_tile (o_player.mk - 18);
	}
	else if (o_player.direction == DOWN) {
		o_engine.v_tile [1] = p_engine_get_tile (o_player.mk + 18);	
	}
	else if (o_player.direction == LEFT) {
		o_engine.v_tile [1] = p_engine_get_tile (o_player.mk - 1);	
	}
	else if (o_player.direction == RIGHT) {
		o_engine.v_tile [1] = p_engine_get_tile (o_player.mk + 1);	
	}


	for (v_i = 0; v_i != sizeof (c_collision_values_player) + 1; ++v_i) {
		SWITCH_ROM_MBC5 (BANK_4);

		if (c_collision_values_player [v_i] == o_engine.v_tile [1]) return false;

		SWITCH_ROM_MBC5 (BANK_0);
	}	
	return true;
}

///player move to up
void p_player_move_up (void) __nonbanked
{
	o_player.v_move = true;

	if (o_player.yk != 24) {
		o_player.direction = UP;

		o_player.walk = p_player_collision_check ();

		if (o_player.walk == true) {
			o_player.yk -= 8; 
			p_player_set_sprite_xy (o_player.xk, o_player.yk);
			p_environment_collect_item ();
			++o_player.v_steps;
			p_items_use_proviant ();
		}
	}
}

///player move to down
void p_player_move_down (void) __nonbanked
{
	o_player.v_move = true;

	if (o_player.yk != 128) {
		o_player.direction = DOWN;

		o_player.walk = p_player_collision_check ();

		if (o_player.walk == true) {
			o_player.yk += 8; 
			p_player_set_sprite_xy (o_player.xk, o_player.yk);
			p_environment_collect_item ();
			++o_player.v_steps;
			p_items_use_proviant ();
			o_player.v_move = false;
		}
	}
}

///player move to left
void p_player_move_left (void)  __nonbanked
{
	o_player.v_move = true;

	if (o_player.xk != 16) {
		o_player.direction = LEFT;

		o_player.walk = p_player_collision_check ();

		if (o_player.walk == true) {
			o_player.xk -= 8; o_player.direction = LEFT;
			p_player_set_sprite_xy (o_player.xk, o_player.yk);
			p_environment_collect_item ();
			++o_player.v_steps;
			p_items_use_proviant ();
			o_player.v_move = false;
		}
	}
}

///player move to right
void p_player_move_right (void)  __nonbanked
{
	o_player.v_move = true;

	if (o_player.xk != 152) {
		o_player.direction = RIGHT;

		o_player.walk = p_player_collision_check ();

		if (o_player.walk == true) {
			o_player.xk += 8;
			p_player_set_sprite_xy (o_player.xk, o_player.yk);
			p_environment_collect_item ();
			++o_player.v_steps;
			p_items_use_proviant ();
			o_player.v_move = false;
		}
	}
}

///"attack" routine of the player
void p_player_attack (void) __nonbanked
{
	if (v_lvl > 0) {

		if (o_pickaxe.v_status != 0) {

			o_player.v_attack = true;

			if ((o_player.inventory.pickaxe == true) || (o_player.inventory.steel_pickaxe == true)) {
				p_player_set_weapon_sprite_xk ();
				o_player.v_attacktimer = 0;
				p_environment_get_ev ();
				++o_player.v_hitcounter;

				p_items_use_tool ();


			}
			else {
				o_player.v_attack = false;
			}
		}
	}
}

/*void p_player_hide_weapon_sprite (void) __nonbanked
{
	move_sprite (PLAYER_WEAPON_SPRITE_ID, 0, 0);
	v_attacktimer = 255;
}*/