dipl/code/textadv/src/game.c

/* Copyright © 2020 tyrolyean
 *
 * 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/>.
 */

#include "game.h"
#include "structures.h"
#include "16550.h"

#include <string.h>
#include <stdio.h>
#include <ctype.h>

char command_buffer[100];
uint8_t command_buffer_pointer = 0x00;

uint8_t current_room = ROOM_LONELYROAD;


void routine_game(){
	
	if(command_buffer_pointer >= sizeof(command_buffer)){
		
		command_buffer_pointer = 0x00;
		memset(command_buffer, 0, sizeof(command_buffer));
		
		println("\nToo much input!");
		return;
	}

	if(command_buffer[command_buffer_pointer-1] == '\n' || 
			command_buffer[command_buffer_pointer-1] == '\r'){
		/* A command from the user has been received, we are ready to 
		 * do something!*/

		int8_t action_id = -1;
		for(size_t i = 0; i < sizeof(action_table)/sizeof(const char*);
			i++){
			if(strncasecmp(action_table[i], command_buffer, 
				strlen(action_table[i])) == 0){
				action_id = i;
				break;
			}
			
		}
		if(action_id < 0){
			println(info_table[1]);
		}else{
			perform_action(action_id);
			
		}
		
		command_buffer_pointer = 0x00;
		memset(command_buffer, 0, sizeof(command_buffer));
	}

	return;
}

void ingest_user_char(char in){
	if(in == 0x7F /* DELETE CHAR */){
		command_buffer[command_buffer_pointer--] = 0x00;
		
	}else{
		command_buffer[command_buffer_pointer++] = in;
	}
	return;
}

void perform_action(uint8_t action_id){
	putchar_16550('\n', NULL);
	switch(action_id){
		default:
		case ACTION_HELP:
			println("You can:");
			for(size_t i = 0; i < NUM_ACTIONS; i++){
				println("    %s",action_table[i]);
			}
			break;
		
		case ACTION_DESCRIBE:
			describe_room(current_room, false);
			break;

		case ACTION_NORTH:
		case ACTION_SOUTH:
		case ACTION_WEST:
		case ACTION_EAST:
			move_direction(action_id -1);
			break;
		case ACTION_INVENTORY:
			print_inventory();
			break;
		case ACTION_SEARCH:
			print_room_item();
			break;
		case ACTION_TAKE:
			consume_room_item();
			break;
		case ACTION_USE:
			use_item(command_buffer+
				strlen(action_table[ACTION_USE])+1);
			break;
		
	};
	println(info_table[3]);

	return;
}

void move_direction(uint8_t direction){
	if(!room_map_table[current_room][direction]){
		println(info_table[4]);
		return;
	}
	println("Moving towards %s",action_table[direction+1]);
	current_room = room_map_table[current_room][direction];
	describe_room(current_room,true);
	current_track = room_track_map[current_room];
	return;
}

void describe_room(uint8_t room, bool auto_desc){
	
	println(room_table[room]);
	if(room_visited_table[room] && auto_desc){
		room_visited_table[room] = true;
		return;
	}
	room_visited_table[room] = true;
	putchar_16550('\n', NULL);
	println(room_description_table[room]);
	
	return;
}

void print_inventory(){
	bool found_item = false;
	for(size_t i = 0; i < NUM_ITEMS; i++){
		if(inventory[i]){
			found_item = true;
			break;
		}
	}
	if(found_item){
		println("You have:");
		for(size_t i = 0; i < NUM_ITEMS; i++){
			if(inventory[i]){
				println("    %s",item_table[i]);
			}
		}

	}else{
		println("Your inventory is empty");
	}
	
	return;
}

void print_room_item(){
	if(item_room_map[current_room] < 0){
		println(info_table[6]);
	}else{
		println("You found a %s", 
			item_table[item_room_map[current_room]]);
	}
	return;
}

void consume_room_item(){
	if(item_room_map[current_room] < 0){
		println(info_table[6]);
	}else{
		println("You took the %s", 
			item_table[item_room_map[current_room]]);
		
		inventory[item_room_map[current_room]] = true;
		item_room_map[current_room] = -1;
	}
	return;
}
void use_item(const char* item_name){
		
	for(size_t i = 0; i < NUM_ITEMS; i++){
		if(strncasecmp(item_table[i], item_name, 
			strlen(item_table[i])) == 0){
			use_item_id(i);
			return;
		}
		
	}
	println(info_table[2]);
	return;
	
}

void use_item_id(uint8_t item_id){
	if(!inventory[item_id]){
		println(info_table[2]);
		return;
	}
	
	
	switch(item_id){
		case ITEM_SAUSAGE:
			if(current_room == ROOM_SNDIRTROAD){
				inventory[ITEM_SAUSAGE] = false;
				room_map_table[current_room][DIRECTION_NORTH] =
					ROOM_FIREPLACE;
				println(info_table[10]);
				return;
			}
			break;
	};
	println(info_table[2]);

	return;
}