|
- #ifndef CHAPTER_Y_SOURCE
- #define CHAPTER_Y_SOURCE
-
- #include <stdlib.h>
-
- #include "chapter_y.h"
-
- #define UNUSED(variable) (void) variable
-
- static procedure_t generate_full_fill_function (world_t * world, memory_t data, number_t width, number_t height, number_t x, number_t y) {
- UNUSED (width); UNUSED (height); UNUSED (x); UNUSED (y);
-
- for (number_t j = 0; j < world->height; ++j) {
- for (number_t i = 0; i < world->width; ++i) {
- world->block [j * world->width + i] = (block_t *) data;
- }
- }
- }
-
- static procedure_t generate_rectangle_fill_function (world_t * world, memory_t data, number_t width, number_t height, number_t x, number_t y) {
- for (number_t j = 0; j < height; ++j) {
- for (number_t i = 0; i < width; ++i) {
- world->block [(j + y) * world->width + (i + x)] = (block_t *) data;
- }
- }
- }
-
- static procedure_t generate_rectangle_line_function (world_t * world, memory_t data, number_t width, number_t height, number_t x, number_t y) {
- for (number_t offset = 0; offset < width; ++offset) {
- world->block [world->width * y + offset + x] = (block_t *) data;
- world->block [world->width * (height - 1 + y) + offset + x] = (block_t *) data;
- }
-
- for (number_t offset = 0; offset < height; ++offset) {
- world->block [world->width * (y + offset) + x] = (block_t *) data;
- world->block [world->width * (y + offset) + width - 1 + x] = (block_t *) data;
- }
- }
-
- static procedure_t generate_create_bots_function (world_t * world, memory_t data, number_t width, number_t height, number_t x, number_t y) {
- UNUSED (height); UNUSED (x); UNUSED (y);
-
- bot_t * bot = (bot_t *) data;
- number_t count = width;
-
- for (number_t index = 0; index < count; ++index) {
- world->bot_count += 1;
- world->bots = reallocate (world->bots, world->bot_count * (number_t) sizeof (* world->bots));
- memory_copy (& world->bots [world->bot_count - 1], game_bot (bot->name, bot->symbol, NULL, bot->health, bot->mana, bot->stamina), (number_t) sizeof (* world->bots));
- world->bots [world->bot_count - 1].x = randomize (1, 40);
- world->bots [world->bot_count - 1].y = randomize (1, 40);
- }
- }
-
- procedure_t play_game (procedure_t) {
- generator_t * full_fill = game_generator (generate_full_fill_function);
- generator_t * rectangle_fill = game_generator (generate_rectangle_fill_function);
- generator_t * rectangle_line = game_generator (generate_rectangle_line_function);
- generator_t * create_bots = game_generator (generate_create_bots_function);
-
- bot_t * goblin = game_bot ("Goblin", game_symbol ('g', COLOUR_RED, EFFECT_NORMAL), NULL, game_bundle (0, 11, 11), game_bundle (0, 3, 3), game_bundle (0, 23, 23));
- bot_t * hob_goblin = game_bot ("Hob Goblin", game_symbol ('g', COLOUR_RED, EFFECT_BOLD), NULL, game_bundle (0, 17, 17), game_bundle (0, 7, 7), game_bundle (0, 31, 31));
- bot_t * orc = game_bot ("Orc", game_symbol ('G', COLOUR_RED, EFFECT_NORMAL), NULL, game_bundle (0, 23, 23), game_bundle (0, 5, 5), game_bundle (0, 47, 47));
- bot_t * ogre = game_bot ("Ogre", game_symbol ('G', COLOUR_RED, EFFECT_BOLD), NULL, game_bundle (0, 37, 37), game_bundle (0, 2, 2), game_bundle (0, 83, 83));
-
- player_t * player = game_player ("Riri", game_symbol ('@', COLOUR_CYAN, EFFECT_BOLD), NULL, game_bundle (0, 29, 29), game_bundle (0, 3, 3), game_bundle (0, 37, 37),
- game_attribute ("Strength", game_bundle (1, 12, 0), GAME_ACTION_SWING_BLADE, GAME_ACTION_SWING_AXE, -GAME_ACTION_CAMP, 0),
- game_attribute ("Edurance", game_bundle (1, 12, 0), GAME_ACTION_WALK, GAME_ACTION_CAMP, -GAME_ACTION_REST, 0),
- game_attribute ("Wisdom", game_bundle (1, 12, 0), GAME_ACTION_CITE_RUNE, GAME_ACTION_CAST_CHARM, -GAME_ACTION_WALK, 0),
- game_attribute ("Agility", game_bundle (1, 12, 0), GAME_ACTION_SHOOT_ARROW, GAME_ACTION_THROW_SPEAR, -GAME_ACTION_WAIT, 0),
- NULL,
- game_skill ("Blades", game_bundle (10, 120, 0), GAME_ACTION_SWING_BLADE, 0),
- game_skill ("Axes", game_bundle (10, 120, 0), GAME_ACTION_SWING_AXE, 0),
- game_skill ("Bows", game_bundle (10, 120, 0), GAME_ACTION_SHOOT_ARROW, 0),
- game_skill ("Spears", game_bundle (10, 120, 0), GAME_ACTION_THROW_SPEAR, 0),
- game_skill ("Puppet Magic", game_bundle (10, 120, 0), GAME_ACTION_SUMMON_PUPPET, 0),
- game_skill ("Nature Magic", game_bundle (10, 120, 0), GAME_ACTION_CALL_NATURE, 0),
- game_skill ("Rune Magic", game_bundle (10, 120, 0), GAME_ACTION_CITE_RUNE, 0),
- game_skill ("Charm Magic", game_bundle (10, 120, 0), GAME_ACTION_CAST_CHARM, 0),
- NULL);
-
- block_t * grass = game_block ("Grass", game_symbol (',', COLOUR_GREEN, EFFECT_BOLD), NULL, FALSE, FALSE);
- block_t * stone_floor = game_block ("Stone Floor", game_symbol ('.', COLOUR_GREY, EFFECT_BOLD), NULL, FALSE, FALSE);
- block_t * stone_wall = game_block ("Stone Wall", game_symbol ('#', COLOUR_GREY, EFFECT_BOLD), NULL, TRUE, FALSE);
-
- world_t * world = game_world (300, 100, full_fill, grass, 0, 0, 0, 0,
- rectangle_fill, stone_floor, 5, 9, 2, 4,
- rectangle_line, stone_wall, 5, 9, 2, 4,
- create_bots, goblin, 3, 0, 0, 0,
- create_bots, hob_goblin, 3, 0, 0, 0,
- create_bots, orc, 3, 0, 0, 0,
- create_bots, ogre, 3, 0, 0, 0,
- NULL);
-
- player->attributes [0]->points->current = 7;
- player->attributes [1]->points->current = 3;
- player->attributes [2]->points->current = 5;
- player->attributes [3]->points->current = 3;
-
- player->skills [0]->points->current = randomize (1, 10);
- player->skills [1]->points->current = randomize (1, 10);
- player->skills [2]->points->current = randomize (1, 10);
- player->skills [3]->points->current = randomize (1, 10);
- player->skills [4]->points->current = randomize (1, 10);
- player->skills [5]->points->current = randomize (1, 10);
- player->skills [6]->points->current = randomize (1, 10);
- player->skills [7]->points->current = randomize (1, 10);
-
- curses_configure ();
-
- terminal_show_cursor (FALSE);
-
- while (curses_active) {
- number_t game_screen_offset = curses_screen_width - 40;
-
- curses_render_background (' ', COLOUR_WHITE, EFFECT_NORMAL);
-
- game_render_world (world, 0, 0, game_screen_offset, curses_screen_height);
-
- game_render_player (player);
-
- for (number_t attribute = 0; attribute < player->attribute_count; ++attribute) {
- game_render_attribute (player->attributes [attribute], game_screen_offset, 1 + attribute);
- }
-
- for (number_t skill = 0; skill < player->skill_count; ++skill) {
- game_render_skill (player->skills [skill], game_screen_offset, 6 + skill);
- }
-
- switch (curses_character) {
- case SIGNAL_ARROW_UP: player->y -= 1; limit (& player->y, 0, world->height - 1); break;
- case SIGNAL_ARROW_DOWN: player->y += 1; limit (& player->y, 0, world->height - 1); break;
- case SIGNAL_ARROW_LEFT: player->x -= 1; limit (& player->x, 0, world->width - 1); break;
- case SIGNAL_ARROW_RIGHT: player->x += 1; limit (& player->x, 0, world->width - 1); break;
- default: break;
- }
-
- curses_synchronize ();
- }
-
- terminal_show_cursor (TRUE);
-
- game_clean_up ();
- }
-
- #endif
|