v4k-git-backup/demos/ports/doom/game.c

// PureDOOM port based on existing SDL port by @daivuk
// - rlyeh, public domain.

#include "v4k.h"

#define DOOM_IMPLEMENTATION
#include "PureDOOM.h"

// Resolution DOOM renders at
enum { DOOM_WIDTH = 320, DOOM_HEIGHT = 200 };

// ----------------------------------------------------------------------------

doom_key_t scancode_to_doom_key(int scancode) {
    switch (scancode) {
        case KEY_TAB: return DOOM_KEY_TAB;
        case KEY_ENTER: return DOOM_KEY_ENTER;
        case KEY_ESC: return DOOM_KEY_ESCAPE;
        case KEY_SPACE: return DOOM_KEY_SPACE;
        case KEY_COMMA: return DOOM_KEY_COMMA;
        case KEY_MINUS: return DOOM_KEY_MINUS;
        case KEY_SLASH: return DOOM_KEY_SLASH;
        case KEY_0: return DOOM_KEY_0;
        case KEY_1: return DOOM_KEY_1;
        case KEY_2: return DOOM_KEY_2;
        case KEY_3: return DOOM_KEY_3;
        case KEY_4: return DOOM_KEY_4;
        case KEY_5: return DOOM_KEY_5;
        case KEY_6: return DOOM_KEY_6;
        case KEY_7: return DOOM_KEY_7;
        case KEY_8: return DOOM_KEY_8;
        case KEY_9: return DOOM_KEY_9;
        case KEY_SEMICOLON: return DOOM_KEY_SEMICOLON;
        case KEY_A: return DOOM_KEY_A;
        case KEY_B: return DOOM_KEY_B;
        case KEY_C: return DOOM_KEY_C;
        case KEY_D: return DOOM_KEY_D;
        case KEY_E: return DOOM_KEY_E;
        case KEY_F: return DOOM_KEY_F;
        case KEY_G: return DOOM_KEY_G;
        case KEY_H: return DOOM_KEY_H;
        case KEY_I: return DOOM_KEY_I;
        case KEY_J: return DOOM_KEY_J;
        case KEY_K: return DOOM_KEY_K;
        case KEY_L: return DOOM_KEY_L;
        case KEY_M: return DOOM_KEY_M;
        case KEY_N: return DOOM_KEY_N;
        case KEY_O: return DOOM_KEY_O;
        case KEY_P: return DOOM_KEY_P;
        case KEY_Q: return DOOM_KEY_Q;
        case KEY_R: return DOOM_KEY_R;
        case KEY_S: return DOOM_KEY_S;
        case KEY_T: return DOOM_KEY_T;
        case KEY_U: return DOOM_KEY_U;
        case KEY_V: return DOOM_KEY_V;
        case KEY_W: return DOOM_KEY_W;
        case KEY_X: return DOOM_KEY_X;
        case KEY_Y: return DOOM_KEY_Y;
        case KEY_Z: return DOOM_KEY_Z;
        case KEY_BS: return DOOM_KEY_BACKSPACE;
        case KEY_LCTRL:
        case KEY_RCTRL: return DOOM_KEY_CTRL;
        case KEY_LEFT: return DOOM_KEY_LEFT_ARROW;
        case KEY_UP: return DOOM_KEY_UP_ARROW;
        case KEY_RIGHT: return DOOM_KEY_RIGHT_ARROW;
        case KEY_DOWN: return DOOM_KEY_DOWN_ARROW;
        case KEY_LSHIFT:
        case KEY_RSHIFT: return DOOM_KEY_SHIFT;
        case KEY_LALT:
        case KEY_RALT: return DOOM_KEY_ALT;
        case KEY_F1: return DOOM_KEY_F1;
        case KEY_F2: return DOOM_KEY_F2;
        case KEY_F3: return DOOM_KEY_F3;
        case KEY_F4: return DOOM_KEY_F4;
        case KEY_F5: return DOOM_KEY_F5;
        case KEY_F6: return DOOM_KEY_F6;
        case KEY_F7: return DOOM_KEY_F7;
        case KEY_F8: return DOOM_KEY_F8;
        case KEY_F9: return DOOM_KEY_F9;
        case KEY_F10: return DOOM_KEY_F10;
        case KEY_F11: return DOOM_KEY_F11;
        case KEY_F12: return DOOM_KEY_F12;
        case KEY_PAUSE: return DOOM_KEY_PAUSE;
        case MOUSE_L: return DOOM_LEFT_BUTTON;
        case MOUSE_R: return DOOM_RIGHT_BUTTON;
        case MOUSE_M: return DOOM_MIDDLE_BUTTON;
        default: return DOOM_KEY_UNKNOWN;
    }
    return DOOM_KEY_UNKNOWN;
}

void keyboard() {
    int keys[] = {
        KEY_ESC,
        KEY_TICK, KEY_1,KEY_2,KEY_3,KEY_4,KEY_5,KEY_6,KEY_7,KEY_8,KEY_9,KEY_0,  KEY_BS,
        KEY_TAB,   KEY_Q,KEY_W,KEY_E,KEY_R,KEY_T,KEY_Y,KEY_U,KEY_I,KEY_O,KEY_P,
        KEY_CAPS,     KEY_A,KEY_S,KEY_D,KEY_F,KEY_G,KEY_H,KEY_J,KEY_K,KEY_L, KEY_ENTER,
        KEY_LSHIFT,       KEY_Z,KEY_X,KEY_C,KEY_V,KEY_B,KEY_N,KEY_M,        KEY_RSHIFT,            KEY_UP,
        KEY_LCTRL,KEY_LALT,               KEY_SPACE,                KEY_RALT,KEY_RCTRL,  KEY_LEFT,KEY_DOWN,KEY_RIGHT,
    };
    for( int i = 0; i < countof(keys); ++i ) {
        int doom_vk = scancode_to_doom_key(keys[i]);
        if( doom_vk != DOOM_KEY_UNKNOWN ) {
        /**/ if( input_down(keys[i]) ) doom_key_down(doom_vk);
        else if( input_up(keys[i]) )   doom_key_up(doom_vk);
        }
    }
}

void mouse() {
    if( !window_has_cursor() ) { // Dev allow us to take mouse out of window
        int motion_x = input_diff(MOUSE_X);
        int motion_y = input_diff(MOUSE_Y);            

        const float MOUSE_SENSITIVITY = 3.0f;
        doom_mouse_move(motion_x * MOUSE_SENSITIVITY, motion_y * MOUSE_SENSITIVITY);            

        /**/ if( input_down(MOUSE_L) ) doom_button_down(scancode_to_doom_key(MOUSE_L));
        else if( input_up(MOUSE_L) )   doom_button_up(scancode_to_doom_key(MOUSE_L));
        /**/ if( input_down(MOUSE_R) ) doom_button_down(scancode_to_doom_key(MOUSE_R));
        else if( input_up(MOUSE_R) )   doom_button_up(scancode_to_doom_key(MOUSE_R));
    }
}

void logic() {
    doom_update();
}

void blit() {
    static texture_t screen; do_once screen = texture_checker();
    texture_update(&screen, DOOM_WIDTH, DOOM_HEIGHT, 4, doom_get_framebuffer(4), TEXTURE_RGBA/*|TEXTURE_LINEAR*/);
    fullscreen_quad_rgb(screen); // gamma(1)
}

void audio() {
    // doom_get_sound_buffer() is always 2048 bytes sized, 11khz 16bit stereo, 512 samples
    static int target_frame = 60.0 * ( 512. / 11025 );
    static int curr_frame = 0; if( curr_frame++ >= target_frame ) { curr_frame = 0;
    audio_queue(doom_get_sound_buffer(), 512, 0|AUDIO_16|AUDIO_2CH|AUDIO_11KHZ);
    }
}

unsigned midi(unsigned interval, void *param) { // this is async called every interval, via timer
    unsigned midi_msg;
    while( (midi_msg = doom_tick_midi()) != 0 ) midi_send(midi_msg);
    return 1000 / DOOM_MIDI_RATE ifdef(osx, -1); // Weirdly, on Apple music is too slow
}

// ----------------------------------------------------------------------------

int main(int argc, char** argv) {
    // install signal handlers
    signal_hooks();

    // Change default bindings to modern
    doom_set_default_int("key_up", DOOM_KEY_W);
    doom_set_default_int("key_down", DOOM_KEY_S);
    doom_set_default_int("key_strafeleft", DOOM_KEY_A);
    doom_set_default_int("key_straferight", DOOM_KEY_D);
    doom_set_default_int("key_use", DOOM_KEY_E);
    doom_set_default_int("mouse_move", 0); // Mouse will not move forward

    // Change resolution
    doom_set_resolution(DOOM_WIDTH, DOOM_HEIGHT);

    // Initialize doom
    doom_init(argc, argv, DOOM_FLAG_MENU_DARKEN_BG);

    // Init app
    window_create(0.45, WINDOW_SQUARE);
    window_aspect_lock(DOOM_WIDTH, DOOM_HEIGHT);
    window_title("Pure DOOM");
    window_cursor(false);
    timer(0, midi, 0);
    
    // Loop app
    while( window_swap() ) {
        if( input_down(KEY_F10) ) tty_attach();
        if( input_down(KEY_F11) ) window_fullscreen(!window_has_fullscreen());

        keyboard();
        mouse();
        logic();
        blit();
        audio();
    }
}