LCOM1920-T5G03

#include <lcom/lcf.h>

#include <lcom/proj.h>

#include <lcom/liblm.h>

#include <math.h>

#include "proj_macros.h"

#include "proj_func.h"

#include "kbc.h"

#include "timer.h"

#include "keyboard.h"

#include "mouse.h"

#include "graph.h"

#include "menu.h"

#include "rtc.h"

#include "hltp.h"

#include "interrupts_func.h"

#include "makecode_map.h"

#include "graph.h"

#include "rectangle.h"

#include "font.h"

#include "ent.h"

#include "crosshair.h"

#include "shooter.h"

#include "zombie.h"

#include "pistol.h"

#include "nothing.h"

#include "bullet.h"

#include "map1.h"

#include "errors.h"

#include "list.h"

int main(int argc, char* argv[]) {

    lcf_set_language("EN-US");

    lcf_trace_calls("/home/lcom/labs/proj/trace.txt");

    lcf_log_output("/home/lcom/labs/proj/output.txt");

    if (lcf_start(argc, argv)) return 1;

    lcf_cleanup();

    return 0;

}

static basic_sprite_t       *bsp_crosshair = NULL;

static basic_sprite_t       *bsp_shooter   = NULL;

static basic_sprite_t       *bsp_zombie    = NULL;

static basic_sprite_t       *bsp_pistol    = NULL;

static basic_sprite_t       *bsp_nothing   = NULL;

static basic_sprite_t       *bsp_bullet    = NULL;

static map_t                *map1          = NULL;

static sprite_t             *sp_crosshair  = NULL;

static int (singleplayer)(void);

static int (multiplayer)(void);

static int (chat)(void);

int(proj_main_loop)(int argc, char *argv[]) {

    (void)argc; (void)argv;

    int r;

    if(font_init()){ printf("Failed to initialize fonts\n"); return 1; }

    /// subscribe interrupts

    if (subscribe_all()) { return 1; }

    /// initialize graphics

    if(graph_init(GRAPH_MODE)){

        printf("%s: failed to initalize graphics.\n", __func__);

        if (cleanup()) printf("%s: failed to cleanup.\n", __func__);

        return 1;

    }

    /// Load stuff

    {

        graph_clear_screen();

        text_t *txt = text_ctor(font_get_default(), "Loading...");

        text_set_pos(txt, graph_get_XRes()/2, graph_get_YRes()/2);

        text_set_valign(txt, text_valign_center);

        text_set_halign(txt, text_halign_center);

        text_set_color(txt, TEXT_COLOR);

        text_draw(txt);

        text_dtor(txt);

        graph_draw();

        bsp_crosshair = get_crosshair(); if(bsp_crosshair == NULL) printf("Failed to get crosshair\n");

        bsp_shooter   = get_shooter  (); if(bsp_shooter   == NULL) printf("Failed to get shooter\n");

        bsp_zombie    = get_zombie   (); if(bsp_zombie    == NULL) printf("Failed to get zombie\n");

        bsp_pistol    = get_pistol   (); if(bsp_pistol    == NULL) printf("Failed to get pistol\n");

        bsp_nothing   = get_nothing  (); if(bsp_nothing   == NULL) printf("Failed to get nothing\n");

        bsp_bullet    = get_bullet   (); if(bsp_bullet    == NULL) printf("Failed to get bullet\n");

        map1          = get_map1     (); if(map1          == NULL) printf("Failed to get map1\n");

        sp_crosshair = sprite_ctor(bsp_crosshair); if(sp_crosshair == NULL) printf("Failed to get crosshair sprite\n");

    }

    menu_t *main_menu = menu_ctor(font_get_default());

    menu_add_item(main_menu, "Single player");

    menu_add_item(main_menu, "Multiplayer");

    menu_add_item(main_menu, "Chat");

    menu_add_item(main_menu, "Exit");

    //uint32_t refresh_count_value = sys_hz() / REFRESH_RATE;

    uint8_t last_lb = 0;

    struct packet pp;

    keys_t *keys = get_key_presses();

    /// loop stuff

    int click = 0;

    uint64_t int_vector = 0;

    int good = true;

    while (good) {

        /* Get a request message. */

        if((r = get_interrupts_vector(&int_vector))) return r;

        uint32_t n = 1;

        for (uint8_t i = 0; i < 32; i++, n <<= 1) {

            if (int_vector & n) {

                interrupt_handler(i);

                switch (i) {

                    case TIMER0_IRQ:

                    graph_clear_screen();

                    switch(menu_update_state(main_menu, click)){

                        case -1: break;

                        case  0: singleplayer(); break; //campaign(); break;

                        case  1: multiplayer() ; break;

                        case  2: chat(); break;

                        case  3: good = false; break;

                    }

                    menu_draw(main_menu);

                    click = 0;

                    sprite_set_pos(sp_crosshair, *get_mouse_X(), *get_mouse_Y());

                    sprite_draw(sp_crosshair);

                    graph_draw();

                    break;

                    case KBC_IRQ:

                    if (keyboard_get_scancode()[0] == ESC_BREAK_CODE) good = false;

                    case MOUSE_IRQ:

                    if (mouse_get_counter_mouse_ih() >= 3) {

                        mouse_parse_packet(mouse_get_packet_mouse_ih(), &pp);

                        update_mouse(&pp);

                        if (!click) click = last_lb ^ keys->lb_pressed && keys->lb_pressed;

                        last_lb = keys->lb_pressed;

                        mouse_set_counter_mouse_ih(0);

                    }

                    break;

                    case COM1_IRQ: nctp_ih(); break;

                }

            }

        }

    }

    basic_sprite_dtor      (bsp_crosshair); bsp_crosshair = NULL;

    basic_sprite_dtor      (bsp_shooter  ); bsp_shooter   = NULL;

    basic_sprite_dtor      (bsp_zombie   ); bsp_zombie    = NULL;

    sprite_dtor            (sp_crosshair ); sp_crosshair  = NULL;

    basic_sprite_dtor      (bsp_pistol   ); bsp_pistol    = NULL;

    basic_sprite_dtor      (bsp_nothing  ); bsp_nothing   = NULL;

    map_dtor               (map1         ); map1          = NULL;

    font_free();

    // Unsubscribe interrupts

    if (unsubscribe_all()) {

        if (cleanup())

        printf("%s: failed to cleanup.\n", __func__);

        return 1;

    }

    if (cleanup()) {

        printf("%s: failed to cleanup.\n", __func__);

        return 1;

    }

    return 0;

}

static host_info_t     *host_info   = NULL;

static remote_info_t   *remote_info = NULL;

static bullet_info_t   *bullet_info = NULL;

static void multiplayer_process(const uint8_t *p, const size_t sz) {

    void *dest = NULL;

    hltp_type tp = hltp_interpret(p, sz, &dest);

    switch(tp){

        case hltp_type_host:

            host_info_dtor(host_info);

            host_info = (host_info_t*)dest;

            break;

        case hltp_type_remote:

            remote_info_dtor(remote_info);

            remote_info = (remote_info_t*)dest;

            break;

        case hltp_type_bullet:

            bullet_info_dtor(bullet_info);

            bullet_info = (bullet_info_t*)dest;

            break;

        case hltp_type_invalid: break;

        case hltp_type_string : break;

    }

}

static int (multiplayer_host)(void);

static int (multiplayer_remote)(void);

static int (multiplayer)(void) {

    int r;

    menu_t *main_menu = menu_ctor(font_get_default());

    menu_add_item(main_menu, "Create");

    menu_add_item(main_menu, "Connect");

    menu_add_item(main_menu, "Back");

    //uint32_t refresh_count_value = sys_hz() / REFRESH_RATE;

    uint8_t last_lb = 0;

    struct packet pp;

    keys_t *keys = get_key_presses();

    /// loop stuff

    int click = 0;

    uint64_t int_vector = 0;

    int good = true;

    while (good) {

        /* Get a request message. */

        if((r = get_interrupts_vector(&int_vector))) return r;

        uint32_t n = 1;

        for (uint8_t i = 0; i < 32; i++, n <<= 1) {

            if (int_vector & n) {

                interrupt_handler(i);

                switch (i) {

                    case TIMER0_IRQ:

                    graph_clear_screen();

                    switch(menu_update_state(main_menu, click)){

                        case -1: break;

                        case  0: multiplayer_host(); break;

                        case  1: multiplayer_remote(); break;

                        case  2: good = false; break;

                    }

                    menu_draw(main_menu);

                    click = 0;

                    sprite_set_pos(sp_crosshair, *get_mouse_X(), *get_mouse_Y());

                    sprite_draw(sp_crosshair);

                    graph_draw();

                    break;

                    case KBC_IRQ:

                    if (keyboard_get_scancode()[0] == ESC_BREAK_CODE) good = false;

                    case MOUSE_IRQ:

                    if (mouse_get_counter_mouse_ih() >= 3) {

                        mouse_parse_packet(mouse_get_packet_mouse_ih(), &pp);

                        update_mouse(&pp);

                        if (!click) click = last_lb ^ keys->lb_pressed && keys->lb_pressed;

                        last_lb = keys->lb_pressed;

                        mouse_set_counter_mouse_ih(0);

                    }

                    break;

                    case COM1_IRQ: nctp_ih(); break;

                }

            }

        }

    }

    return 0;

}

static int (multiplayer_host)(void) {

    int r;

    nctp_dump();

    nctp_set_processor(multiplayer_process);

    ent_set_scale(DEFAULT_SCALE);

    text_timer_t *in_game_timer = timer_ctor(font_get_default());

    list_t *shooter_list = list_ctor();

    gunner_t *shooter1 = gunner_ctor(bsp_shooter, bsp_pistol, GUNNER_PLAYER, 1); if(shooter1 == NULL) printf("Failed to get shooter1\n");

    gunner_set_spawn(shooter1, 75, 75);

    gunner_t *shooter2 = gunner_ctor(bsp_shooter, bsp_pistol, GUNNER_PLAYER, 2); if(shooter2 == NULL) printf("Failed to get shooter2\n");

    gunner_set_spawn(shooter2, 975, 75);

    list_insert(shooter_list, list_end(shooter_list), shooter1);

    list_insert(shooter_list, list_end(shooter_list), shooter2);

    do {

        get_random_spawn(map1, shooter1, shooter_list);

        get_random_spawn(map1, shooter2, shooter_list);

    } while (distance_gunners(shooter1, shooter2) < 500);

    host_info = host_info_ctor(shooter1, shooter2);

    remote_info = remote_info_ctor();

    bullet_info = bullet_info_ctor();

    list_t *bullet_list  = list_ctor();

    ent_set_origin(gunner_get_x(shooter1)-ent_get_XLength()/2.0,

    gunner_get_y(shooter1)-ent_get_YLength()/2.0);

    //uint32_t refresh_count_value = sys_hz() / REFRESH_RATE;

    uint8_t last_lb = 0;

    struct packet pp;

    keys_t *keys = get_key_presses();

    /// loop stuff

    uint64_t int_vector = 0;

    int good = true;

    int state = 0; // -1 for remote win, 0 for draw, 1 for host win

    list_node_t *p1, *p2; // player states

    int state_1, state_2;

    while (good) {

        if ((r = get_interrupts_vector(&int_vector))) return r;

        uint32_t n = 1;

        for (uint8_t i = 0; i < 32; i++, n <<= 1) {

            if (int_vector & n) {

                interrupt_handler(i);

                switch (i) {

                    case TIMER0_IRQ:

                    if (timer_get_no_interrupts() % 60 == 0) timer_update(in_game_timer);

                    update_movement(map1, shooter1, keys, shooter_list);

                    update_movement(map1, shooter2, &(remote_info->remote_keys_pressed), shooter_list);

                    update_game_state(map1, shooter_list, bullet_list);

                    p1 = list_find(shooter_list, shooter1);

                    p2 = list_find(shooter_list, shooter2);

                    if ((state_1 = (p1 == list_end(shooter_list))) || (state_2 = (p2 == list_end(shooter_list)))) {

                        state = state_1 - state_2;

                        good = false;

                        break;

                    }

                    double angle = get_mouse_angle(shooter1);

                    gunner_set_angle(shooter1, angle - M_PI_2);

                    ent_set_origin(gunner_get_x(shooter1)-ent_get_XLength()/2.0,

                                   gunner_get_y(shooter1)-ent_get_YLength()/2.0);

                    gunner_set_angle(shooter2, remote_info->remote_angle);

                    build_host_structure(host_info, shooter1, shooter2, bullet_list);

                    hltp_send_host_info(host_info);

                    graph_clear_screen();

                    map_draw   (map1);

                    bullet_draw_list(bullet_list);

                    gunner_draw_list(shooter_list);

                    text_draw(in_game_timer->text);

                    sprite_set_pos(sp_crosshair, *get_mouse_X(), *get_mouse_Y());

                    sprite_draw(sp_crosshair);

                    graph_draw();

                    break;

                    case KBC_IRQ:

                    if (keyboard_get_scancode()[0] == ESC_BREAK_CODE) {

                        good = false;

                    }

                    break;

                    case MOUSE_IRQ:

                    if (mouse_get_counter_mouse_ih() >= 3) {

                        mouse_parse_packet(mouse_get_packet_mouse_ih(), &pp);

                        update_mouse(&pp);

                        if (last_lb ^ keys->lb_pressed && keys->lb_pressed)

                        shoot_bullet(shooter1, bullet_list, bsp_bullet);

                        last_lb = keys->lb_pressed;

                        mouse_set_counter_mouse_ih(0);

                    }

                    break;

                    case COM1_IRQ:

                        nctp_ih();

                        if (bullet_info->new_bullet) {

                            shoot_bullet(shooter2, bullet_list, bsp_bullet);

                            bullet_info->new_bullet = false;

                        }

                        break;

                }

            }

        }

    }

    while(list_size(shooter_list) > 0){

        gunner_t *p = list_erase(shooter_list, list_begin(shooter_list));

        gunner_dtor(p);

    }

    if(list_dtor(shooter_list)) printf("COULD NOT DESTRUCT SHOOTER LIST\n");

    while(list_size(bullet_list) > 0){

        bullet_t *p = (bullet_t*)list_erase(bullet_list, list_begin(bullet_list));

        bullet_dtor(p);

    }

    if(list_dtor(bullet_list)) printf("COULD NOT DESTRUCT BULLET LIST\n");

    host_info_dtor(host_info);

    remote_info_dtor(remote_info);

    bullet_info_dtor(bullet_info);

    nctp_set_processor(NULL);

    timer_dtor(in_game_timer); in_game_timer = NULL;

    return 0;

}

static int (multiplayer_remote)(void) {

    int r;

    nctp_dump();

    nctp_set_processor(multiplayer_process);

    ent_set_scale(DEFAULT_SCALE);

    text_timer_t *in_game_timer = timer_ctor(font_get_default());

    list_t *shooter_list = list_ctor();

    gunner_t *shooter1 = gunner_ctor(bsp_shooter, bsp_pistol, GUNNER_PLAYER, 2); if(shooter1 == NULL) printf("Failed to get shooter1\n");

    gunner_set_spawn(shooter1, 75, 75);

    gunner_t *shooter2 = gunner_ctor(bsp_shooter, bsp_pistol, GUNNER_PLAYER, 1); if(shooter2 == NULL) printf("Failed to get shooter2\n");

    gunner_set_spawn(shooter2, 975, 75);

    list_insert(shooter_list, list_end(shooter_list), shooter1);

    list_insert(shooter_list, list_end(shooter_list), shooter2);

    host_info = host_info_ctor(shooter2, shooter1);

    remote_info = remote_info_ctor();

    bullet_info = bullet_info_ctor();

    list_t *bullet_list  = list_ctor();

    ent_set_origin(gunner_get_x(shooter1)-ent_get_XLength()/2.0,

    gunner_get_y(shooter1)-ent_get_YLength()/2.0);

    //uint32_t refresh_count_value = sys_hz() / REFRESH_RATE;

    uint8_t last_lb = 0;

    struct packet pp;

    keys_t *keys = get_key_presses();

    /// loop stuff

    uint64_t int_vector = 0;

    int good = true;

    while (good) {

        if ((r = get_interrupts_vector(&int_vector))) return r;

        uint32_t n = 1;

        for (uint8_t i = 0; i < 32; i++, n <<= 1) {

            if (int_vector & n) {

                interrupt_handler(i);

                switch (i) {

                    case TIMER0_IRQ:

                    if (timer_get_no_interrupts() % 60 == 0) timer_update(in_game_timer);

                    double angle = get_mouse_angle(shooter1) - M_PI_2;

                    build_remote_structure(remote_info, keys, angle);

                    //hltp_send_remote_info(remote_info);

                    gunner_set_pos(shooter1, (double)host_info->remote_x, (double)host_info->remote_y);

                    gunner_set_angle(shooter1, (double)host_info->remote_angle);

                    gunner_set_health(shooter1, (double)host_info->remote_health);

                    gunner_set_curr_health(shooter1, (double)host_info->remote_current_health);

                    gunner_set_pos(shooter2, (double)host_info->host_x, (double)host_info->host_y);

                    gunner_set_angle(shooter2, (double)host_info->host_angle);

                    gunner_set_health(shooter2, (double)host_info->host_health);

                    gunner_set_curr_health(shooter2, (double)host_info->host_current_health);

                    ent_set_origin(gunner_get_x(shooter1)-ent_get_XLength()/2.0,

                                   gunner_get_y(shooter1)-ent_get_YLength()/2.0);

                    for (size_t j = 0; j < host_info->no_bullets; j++) {

                        if (host_info->bullets_shooter[j]) { // remote

                            bullet_t *bullet = bullet_ctor(shooter1, bsp_bullet, (double)host_info->bullets_x[j], (double)host_info->bullets_y[j], (double)host_info->bullets_vx[j], (double)host_info->bullets_vy[j]);

                            list_insert(bullet_list, list_end(bullet_list), bullet);

                        } else { // host

                            bullet_t *bullet = bullet_ctor(shooter2, bsp_bullet, (double)host_info->bullets_x[j], (double)host_info->bullets_y[j], (double)host_info->bullets_vx[j], (double)host_info->bullets_vy[j]);

                            list_insert(bullet_list, list_end(bullet_list), bullet);

                        }

                    }

                    graph_clear_screen();

                    map_draw   (map1);

                    bullet_draw_list(bullet_list);

                    gunner_draw_list(shooter_list);

                    text_draw(in_game_timer->text);

                    sprite_set_pos(sp_crosshair, *get_mouse_X(), *get_mouse_Y());

                    sprite_draw(sp_crosshair);

                    graph_draw();

                    while(list_size(bullet_list) > 0){

                        bullet_t *p = (bullet_t*)list_erase(bullet_list, list_begin(bullet_list));

                        bullet_dtor(p);

                    }

                    break;

                    case KBC_IRQ:

                    if (keyboard_get_scancode()[0] == ESC_BREAK_CODE) {

                        good = false;

                    }

                    break;

                    case MOUSE_IRQ:

                    if (mouse_get_counter_mouse_ih() >= 3) {

                        mouse_parse_packet(mouse_get_packet_mouse_ih(), &pp);

                        update_mouse(&pp);

                        if (last_lb ^ keys->lb_pressed && keys->lb_pressed) {

                            bullet_info->new_bullet = true;

                            //hltp_send_bullet_info(bullet_info);

                        }

                        last_lb = keys->lb_pressed;

                        mouse_set_counter_mouse_ih(0);

                    }

                    break;

                    case COM1_IRQ: nctp_ih(); break;

                }

            }

        }

    }

    while(list_size(shooter_list) > 0){

        gunner_t *p = list_erase(shooter_list, list_begin(shooter_list));

        gunner_dtor(p);

    }

    if(list_dtor(shooter_list)) printf("COULD NOT DESTRUCT SHOOTER LIST\n");

    while(list_size(bullet_list) > 0){

        bullet_t *p = (bullet_t*)list_erase(bullet_list, list_begin(bullet_list));

        bullet_dtor(p);

    }

    if(list_dtor(bullet_list)) printf("COULD NOT DESTRUCT BULLET LIST\n");

    host_info_dtor(host_info);

    remote_info_dtor(remote_info);

    bullet_info_dtor(bullet_info);

    nctp_set_processor(NULL);

    timer_dtor(in_game_timer); in_game_timer = NULL;

    return 0;

}

static int (campaign)(void);

static int (zombies)(void);

static int (singleplayer)(void) {

    int r;

    menu_t *main_menu = menu_ctor(font_get_default());

    menu_add_item(main_menu, "Campaign");

    menu_add_item(main_menu, "Zombies");

    menu_add_item(main_menu, "Back");

    //uint32_t refresh_count_value = sys_hz() / REFRESH_RATE;

    uint8_t last_lb = 0;

    struct packet pp;

    keys_t *keys = get_key_presses();

    /// loop stuff

    int click = 0;

    uint64_t int_vector = 0;

    int good = true;

    while (good) {

        /* Get a request message. */

        if((r = get_interrupts_vector(&int_vector))) return r;

        uint32_t n = 1;

        for (uint8_t i = 0; i < 32; i++, n <<= 1) {

            if (int_vector & n) {

                interrupt_handler(i);

                switch (i) {

                    case TIMER0_IRQ:

                    graph_clear_screen();

                    switch(menu_update_state(main_menu, click)){

                        case -1: break;

                        case  0: campaign(); break;

                        case  1: zombies(); break;

                        case  2: good = false; break;

                    }

                    menu_draw(main_menu);

                    click = 0;

                    sprite_set_pos(sp_crosshair, *get_mouse_X(), *get_mouse_Y());

                    sprite_draw(sp_crosshair);

                    graph_draw();

                    break;

                    case KBC_IRQ:

                    if (keyboard_get_scancode()[0] == ESC_BREAK_CODE) good = false;

                    case MOUSE_IRQ:

                    if (mouse_get_counter_mouse_ih() >= 3) {

                        mouse_parse_packet(mouse_get_packet_mouse_ih(), &pp);

                        update_mouse(&pp);

                        if (!click) click = last_lb ^ keys->lb_pressed && keys->lb_pressed;

                        last_lb = keys->lb_pressed;

                        mouse_set_counter_mouse_ih(0);

                    }

                    break;

                    case COM1_IRQ: nctp_ih(); break;

                }

            }

        }

    }

    return 0;

}

static int (campaign)(void){

    int r;

    ent_set_scale(DEFAULT_SCALE);

    text_timer_t *in_game_timer = timer_ctor(font_get_default());

    list_t *shooter_list = list_ctor();

    gunner_t *shooter1 = gunner_ctor(bsp_shooter, bsp_pistol, GUNNER_PLAYER, 1); if(shooter1 == NULL) printf("Failed to get shooter1\n");

    gunner_set_spawn(shooter1, 75, 75);

    gunner_set_pos(shooter1, 75, 75);

    gunner_t *shooter2 = gunner_ctor(bsp_shooter, bsp_nothing, GUNNER_PLAYER, 2);

    gunner_set_spawn(shooter2, 975, 75);

    gunner_set_pos(shooter2, 775, 75);

    list_insert(shooter_list, list_end(shooter_list), shooter1);

    list_insert(shooter_list, list_end(shooter_list), shooter2);

    list_t *bullet_list  = list_ctor();

    ent_set_origin(gunner_get_x(shooter1)-ent_get_XLength()/2.0,

    gunner_get_y(shooter1)-ent_get_YLength()/2.0);

    //uint32_t refresh_count_value = sys_hz() / REFRESH_RATE;

    uint8_t last_lb = 0;

    struct packet pp;

    keys_t *keys = get_key_presses();

    /// loop stuff

    uint64_t int_vector = 0;

    int good = true;

    while (good) {

        /* Get a request message. */

        if((r = get_interrupts_vector(&int_vector))) return r;

        uint32_t n = 1;

        for (uint8_t i = 0; i < 32; i++, n <<= 1) {

            if(!good) break;

            if (int_vector & n) {

                interrupt_handler(i);

                switch (i) {

                    case TIMER0_IRQ:

                    if (timer_get_no_interrupts() % 60 == 0) timer_update(in_game_timer);

                    update_movement(map1, shooter1, keys, shooter_list);

                    update_game_state(map1, shooter_list, bullet_list);

                    //update_scale();

                    double angle = get_mouse_angle(shooter1);

                    gunner_set_angle(shooter1, angle - M_PI_2);

                    ent_set_origin(gunner_get_x(shooter1)-ent_get_XLength()/2.0,

                    gunner_get_y(shooter1)-ent_get_YLength()/2.0);

                    graph_clear_screen();

                    map_draw   (map1);

                    bullet_draw_list(bullet_list);

                    gunner_draw_list(shooter_list);

                    text_draw(in_game_timer->text);

                    sprite_set_pos(sp_crosshair, *get_mouse_X(), *get_mouse_Y());

                    sprite_draw(sp_crosshair);

                    graph_draw();

                    break;

                    case KBC_IRQ:

                    if (keyboard_get_scancode()[0] == ESC_BREAK_CODE) {

                        good = false;

                    }

                    break;

                    case MOUSE_IRQ:

                    if (mouse_get_counter_mouse_ih() >= 3) {

                        mouse_parse_packet(mouse_get_packet_mouse_ih(), &pp);

                        update_mouse(&pp);

                        if (last_lb ^ keys->lb_pressed && keys->lb_pressed)

                        shoot_bullet(shooter1, bullet_list, bsp_bullet);

                        last_lb = keys->lb_pressed;

                        mouse_set_counter_mouse_ih(0);

                    }

                    break;

                    case COM1_IRQ: nctp_ih(); break;

                }

            }

        }

    }

    while(list_size(shooter_list) > 0){

        gunner_t *p = list_erase(shooter_list, list_begin(shooter_list));

        gunner_dtor(p);

    }

    if(list_dtor(shooter_list)) printf("COULD NOT DESTRUCT SHOOTER LIST\n");

    while(list_size(bullet_list) > 0){

        bullet_t *p = (bullet_t*)list_erase(bullet_list, list_begin(bullet_list));

        bullet_dtor(p);

    }

    if(list_dtor(bullet_list)) printf("COULD NOT DESTRUCT BULLET LIST\n");

    timer_dtor(in_game_timer); in_game_timer = NULL;

    return SUCCESS;

}

#define ZOMBIES_NUM             5

#define ZOMBIE_HEALTH_FACTOR    1.1

static int (zombies)(void){

    int r;

    ent_set_scale(DEFAULT_SCALE);

    text_timer_t *in_game_timer = timer_ctor(font_get_default());

    list_t *shooter_list = list_ctor();

    gunner_t *shooter1 = gunner_ctor(bsp_shooter, bsp_pistol, GUNNER_PLAYER, 1); if(shooter1 == NULL) printf("Failed to get shooter1\n");

    gunner_set_spawn(shooter1, 980, 790);

    gunner_set_pos(shooter1, 980, 790);

    list_insert(shooter_list, list_end(shooter_list), shooter1);

    list_t *bullet_list  = list_ctor();

    ent_set_origin(gunner_get_x(shooter1)-ent_get_XLength()/2.0,

    gunner_get_y(shooter1)-ent_get_YLength()/2.0);

    //uint32_t refresh_count_value = sys_hz() / REFRESH_RATE;

    uint8_t last_lb = 0;

    struct packet pp;

    keys_t *keys = get_key_presses();

    /// loop stuff

    uint64_t int_vector = 0;

    int good = true;

    int dead = false;

    int health = 50;

    map_make_dijkstra(map1, gunner_get_x(shooter1), gunner_get_y(shooter1));

    while (good && !dead) {

        /* Get a request message. */

        if((r = get_interrupts_vector(&int_vector))) return r;

        uint32_t n = 1;

        for (uint8_t i = 0; i < 32; i++, n <<= 1) {

            if(!good || dead) break;

            if (int_vector & n) {

                interrupt_handler(i);

                switch (i) {

                    case TIMER0_IRQ:

                    if (timer_get_no_interrupts() % 60 == 0) timer_update(in_game_timer);

                    if (timer_get_no_interrupts() %  6 == 0){

                        map_make_dijkstra(map1, gunner_get_x(shooter1), gunner_get_y(shooter1));

                    }

                    update_movement(map1, shooter1, keys, shooter_list);

                    update_game_state(map1, shooter_list, bullet_list);

                    if(list_find(shooter_list, shooter1) == list_end(shooter_list)){

                        good = false;

                        dead = true;

                        break;

                    }

                    double angle = get_mouse_angle(shooter1);

                    gunner_set_angle(shooter1, angle - M_PI_2);

                    ent_set_origin(gunner_get_x(shooter1)-ent_get_XLength()/2.0,

                                   gunner_get_y(shooter1)-ent_get_YLength()/2.0);

                    while(list_size(shooter_list) < ZOMBIES_NUM+1){

                        gunner_t *zombie = gunner_ctor(bsp_zombie, bsp_nothing, GUNNER_MELEE | GUNNER_FOLLOW, 3);

                        gunner_set_health(zombie, health);

                        gunner_set_curr_health(zombie, health);

                        health *= ZOMBIE_HEALTH_FACTOR;

                        get_random_spawn(map1, zombie, shooter_list);

                        list_push_back(shooter_list, zombie);

                    }

                    graph_clear_screen();

                    map_draw   (map1);

                    bullet_draw_list(bullet_list);

                    gunner_draw_list(shooter_list);

                    text_draw(in_game_timer->text);

                    sprite_set_pos(sp_crosshair, *get_mouse_X(), *get_mouse_Y());

                    sprite_draw(sp_crosshair);

                    graph_draw();

                    break;

                    case KBC_IRQ:

                    if (keyboard_get_scancode()[0] == ESC_BREAK_CODE) {

                        good = false;

                    }

                    break;

                    case MOUSE_IRQ:

                    if (mouse_get_counter_mouse_ih() >= 3) {

                        mouse_parse_packet(mouse_get_packet_mouse_ih(), &pp);

                        update_mouse(&pp);

                        if (last_lb ^ keys->lb_pressed && keys->lb_pressed)

                        shoot_bullet(shooter1, bullet_list, bsp_bullet);

                        last_lb = keys->lb_pressed;

                        mouse_set_counter_mouse_ih(0);

                    }

                    break;

                    case COM1_IRQ: nctp_ih(); break;

                }

            }

        }

    }

    while(list_size(shooter_list) > 0){

        gunner_t *p = list_erase(shooter_list, list_begin(shooter_list));

        gunner_dtor(p);

    }

    if(list_dtor(shooter_list)) printf("COULD NOT DESTRUCT SHOOTER LIST\n");

    while(list_size(bullet_list) > 0){

        bullet_t *p = (bullet_t*)list_erase(bullet_list, list_begin(bullet_list));

        bullet_dtor(p);

    }

    if(list_dtor(bullet_list)) printf("COULD NOT DESTRUCT BULLET LIST\n");

    if(dead){

        printf("YOU DIED\n");

    }

    timer_dtor(in_game_timer); in_game_timer = NULL;

    return SUCCESS;

}

#define CHAT_MAX_SIZE   75

#define CHAT_MAX_NUM    19

static text_t      *t_text[CHAT_MAX_NUM] = {NULL};

static rectangle_t *r_text               =  NULL;

static void chat_process(const uint8_t *p, const size_t sz){

    char buffer2[CHAT_MAX_NUM+3];

    void *dest = NULL;

    hltp_type tp = hltp_interpret(p, sz, &dest);

    switch(tp){

        case hltp_type_string:

        strcpy(buffer2, dest);

        strncat(buffer2, " <", 2);

        for(size_t i = CHAT_MAX_NUM-1; i; --i)

        text_set_string(t_text[i], text_get_string(t_text[i-1]));

        text_set_string(t_text[0], buffer2);

        for(size_t i = 0; i < CHAT_MAX_NUM; ++i){

            if(text_get_string(t_text[i])[0] == '>'){

                text_set_pos(t_text[i], rectangle_get_x(r_text)+50, text_get_y(t_text[i]));

                text_set_halign(t_text[i], text_halign_left);

            }else{

                text_set_pos(t_text[i], rectangle_get_x(r_text)+rectangle_get_w(r_text)-50, text_get_y(t_text[i]));

                text_set_halign(t_text[i], text_halign_right);

            }

        }

        break;

        case hltp_type_invalid: break;

        case hltp_type_bullet : break;

        case hltp_type_host   : break;

        case hltp_type_remote : break;

    }

}

static int (chat)(void){

    int r;

    nctp_dump();

    nctp_set_processor(chat_process);

    struct packet pp;

    char buffer[CHAT_MAX_SIZE] = "";

    rectangle_t *r_buffer = NULL; {

        r_buffer = rectangle_ctor(0,0,900,70);

        rectangle_set_pos(r_buffer, graph_get_XRes()/2  -rectangle_get_w(r_buffer)/2,

        (int16_t)(graph_get_YRes()*0.87-rectangle_get_h(r_buffer)/2));

        rectangle_set_fill_color   (r_buffer, GRAPH_BLACK);

        rectangle_set_outline_width(r_buffer, 2);

        rectangle_set_outline_color(r_buffer, GRAPH_WHITE);

        rectangle_set_fill_trans(r_buffer, GRAPH_TRANSPARENT);

    }

    text_t      *t_buffer = NULL; {

        t_buffer = text_ctor(font_get_default(), "");

        text_set_pos(t_buffer, rectangle_get_x(r_buffer)+50,

        rectangle_get_y(r_buffer)+rectangle_get_h(r_buffer)/2);

        text_set_halign(t_buffer, text_halign_left);

        text_set_valign(t_buffer, text_valign_center);

        text_set_color (t_buffer, TEXT_COLOR);

    }

    text_t      *t_size   = NULL; {

        t_size = text_ctor(font_get_default(), "");

        text_set_pos(t_size, rectangle_get_x(r_buffer)+rectangle_get_w(r_buffer)-5,

        rectangle_get_y(r_buffer)+rectangle_get_h(r_buffer)-5);

        text_set_halign(t_size, text_halign_right);

        text_set_valign(t_size, text_valign_bottom);

        text_set_color (t_size, TEXT_COLOR);

        text_set_size  (t_size, 18);

        char buffer2[20];

        sprintf(buffer2, "%d/%d", strlen(buffer), CHAT_MAX_SIZE);

        text_set_string(t_size, buffer2);

    }

    /** r_text */ {

    r_text = rectangle_ctor(0,0,900,550);

    rectangle_set_pos(r_text, graph_get_XRes()/2  -rectangle_get_w(r_buffer)/2,