Subversion Repositories Kolibri OS

Rev

Rev 5310 | Rev 5316 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. #include "rsgame.h"
  2.  
  3. #include "rsgametext.h"
  4.  
  5. #include "rsgamemenu.h"
  6.  
  7. #include "rsgamedraw.h"
  8.  
  9. #include "rskos.h"
  10.  
  11. #include "rsgentex.h"
  12. #include "rssoundgen.h"
  13. #include "rsnoise.h"
  14.  
  15. #include "rs/rsplatform.h"
  16.  
  17.  
  18. #ifdef RS_USE_C_LIBS // linux version
  19.     #include <math.h>
  20.     #include <stdlib.h>
  21.     #include <string.h>
  22.    
  23.     #include "rs/rskeyboard.h"
  24. #endif
  25.  
  26.  
  27.  
  28. rs_game_t game;
  29.  
  30.  
  31. game_obj_t game_obj(int obj_type, int flags, int tag, int radius, float x, float y, int t, float f) {
  32.     game_obj_t obj;
  33.     obj.obj_type = obj_type;
  34.     obj.flags = flags;
  35.     obj.tag = tag;
  36.     obj.radius = radius;
  37.     obj.x = x;
  38.     obj.y = y;
  39.     obj.t = t;
  40.     obj.f = f;
  41.     return obj;
  42. };
  43.  
  44. int game_obj_add(game_obj_t obj) {
  45.     if (game.objs_count < GAME_OBJS_MAX_COUNT) {
  46.         game.objs[game.objs_count++] = obj;
  47.         return game.objs_count-1;    
  48.     };
  49.     #ifdef RS_LINUX
  50.         DEBUG10("Error, max objects count is reached");
  51.     #endif
  52.     return 0; // Max objects count is reached
  53. };
  54.  
  55. void game_obj_remove(int index) {
  56.     if (index == game.objs_count - 1) {
  57.         game.objs_count--;
  58.         return;
  59.     };
  60.     game.objs[index] = game.objs[ game.objs_count-1 ];
  61.     game.objs_count--;
  62. };
  63.  
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70.  
  71.  
  72. void texture_init(rs_texture_t *tex, int w, int h) {
  73.     tex->status = 1;
  74.     tex->w = w;
  75.     tex->h = h;
  76.     tex->data = malloc(w*h*4); // BGRA BGRA
  77. };
  78.  
  79. void texture_free(rs_texture_t *tex) {
  80.     free(tex->data);
  81.     tex->status = 0;
  82. };
  83.  
  84. void texture_clear(rs_texture_t *tex, unsigned int color) {
  85.     int i;
  86.     for (i = 0; i < tex->w * tex->h; i++) {
  87.         *((unsigned int*)(&tex->data[i*4])) = color;
  88.     };
  89. };
  90.  
  91. void texture_draw(rs_texture_t *dest, rs_texture_t *src, int x, int y, int mode) {
  92.    
  93.     int i; // y
  94.     int j; // x
  95.     int k; // color component
  96.    
  97.     int istart = (y < 0) ? -y : 0;
  98.     int iend = src->h - (( (y + src->h) > dest->h) ? (y + src->h - dest->h) : 0);
  99.    
  100.     int jstart = (x < 0) ? -x : 0;
  101.     int jend = src->w - (( (x + src->w) > dest->w) ? (x + src->w - dest->w) : 0);
  102.    
  103.     int ishift = 0;
  104.     int jshift = 0;
  105.    
  106.     float a; // alpha value
  107.    
  108.     if (mode & DRAW_TILED_FLAG) {
  109.         jshift = x;
  110.         ishift = y;
  111.         x = y = istart = jstart = 0;
  112.         iend = dest->h;
  113.         jend = dest->w;
  114.     };
  115.    
  116.     mode = mode & DRAW_MODE_MASK;
  117.    
  118.     int modvalue = (src->w*src->h*4);
  119.    
  120.     if (mode == DRAW_MODE_REPLACE) {
  121.         for (i = istart; i < iend; i++) {
  122.             for (j = jstart; j < jend; j++) {
  123.                 for (k = 0; k < 4; k++) {
  124.                     dest->data[ 4 * ( (y+i)*dest->w + (x+j) ) + k ] = src->data[ (4*(i*src->w + j) + k) % modvalue ];
  125.                 };
  126.             };
  127.         };
  128.     }
  129.     else if (mode == DRAW_MODE_ADDITIVE) {
  130.         for (i = istart; i < iend; i++) {
  131.             for (j = jstart; j < jend; j++) {
  132.                 for (k = 0; k < 3; k++) { // Alpha channel is not added
  133.                     dest->data[ 4 * ( (y+i)*dest->w + (x+j) ) + k ] =
  134.                         clamp_byte( dest->data[ 4 * ( (y+i)*dest->w + (x+j) ) + k ] + src->data[ (4*((i+ishift)*src->w + j + jshift) + k) % modvalue] );
  135.                 };
  136.             };
  137.         };
  138.     }
  139.     else if (mode == DRAW_MODE_ALPHA) {
  140.         for (i = istart; i < iend; i++) {
  141.             for (j = jstart; j < jend; j++) {
  142.                 for (k = 0; k < 3; k++) {
  143.                     a = (1.0 * src->data[ (4*(i*src->w + j) + 3) % modvalue ] / 255.0);
  144.                     dest->data[ 4 * ( (y+i)*dest->w + (x+j) ) + k ] =
  145.                          (unsigned char) ( (1.0-a) * dest->data[ 4 * ( (y+i)*dest->w + (x+j) ) + k ]
  146.                                           + a*src->data[ (4*((i+ishift)*src->w + j + jshift) + k) % modvalue] );
  147.                 };
  148.             };
  149.         };
  150.     };
  151.    
  152. };
  153.  
  154.  
  155.  
  156. void texture_set_pixel(rs_texture_t *tex, int x, int y, unsigned int color) {
  157.     *((unsigned int*) &tex->data[ 4 * ( (y)*tex->w + (x) ) + 0 ]) = color;
  158. };
  159.  
  160. void texture_draw_vline(rs_texture_t *tex, int x, int y, int l, unsigned int color) {
  161.     int i;
  162.     if (y+l >= tex->h) {
  163.         l = tex->h - y;
  164.     };
  165.    
  166.     if (x < 0) {
  167.         return;
  168.     };
  169.    
  170.     if (x >= tex->w) {
  171.         return;
  172.     };
  173.    
  174.     for (i = 0; i < l; i++) {
  175.         *((unsigned int*) &tex->data[ 4 * ( (y+i)*tex->w + (x) ) + 0 ]) = color;
  176.     };    
  177. };
  178.  
  179.  
  180.  
  181. void soundbuf_init(rs_soundbuf_t *snd, int length_samples) {
  182.     snd->status = 1;
  183.     snd->length_samples = length_samples;
  184.     snd->data = malloc(length_samples*2);
  185.     rskos_snd_create_buffer(&snd->hbuf, snd->data, length_samples);
  186. };
  187.  
  188. void soundbuf_update(rs_soundbuf_t *snd) {
  189.     rskos_snd_update_buffer(&snd->hbuf, snd->data, snd->length_samples);
  190. };
  191.  
  192. void soundbuf_free(rs_soundbuf_t *snd) {
  193.     snd->status = 0;
  194.     free(snd->data);
  195. };
  196.  
  197. void soundbuf_fill(rs_soundbuf_t *snd, int amp, int freq_div) {
  198.     int i;
  199.     for (i = 0; i < snd->length_samples; i++) {
  200.                 snd->data[i] = -amp/2 + amp/2*( ( (i % freq_div) > freq_div/2 ) ? 1 : 0 );
  201.         };
  202.         rskos_snd_update_buffer(&snd->hbuf, snd->data, snd->length_samples);
  203. };
  204.  
  205. void soundbuf_sin(rs_soundbuf_t *snd, float freq) {
  206.     int i;
  207.     int amp = 19000;
  208.     for (i = 0; i < snd->length_samples; i++) {
  209.                 snd->data[i] = ( 1.0 - 1.0*i/snd->length_samples ) * sin(freq*i) * amp;
  210.         };
  211.         rskos_snd_update_buffer(&snd->hbuf, snd->data, snd->length_samples);
  212. };
  213.  
  214. void soundbuf_sin_fade(rs_soundbuf_t *snd, float freq) {
  215.     int i;
  216.     int amp = 19000;
  217.     for (i = 0; i < snd->length_samples; i++) {
  218.                 snd->data[i] = ( 1.0 - 1.0*i/snd->length_samples ) * sin( ( (1.0 - 0.48*i/snd->length_samples) * freq ) *i) * amp;
  219.         };
  220.        
  221.        
  222.         /*
  223.        
  224.         // ok
  225.        
  226.         rs_sgen_init(2, snd->length_samples);
  227.         rs_sgen_func_pm(1, 880.0, 21.0, 0.3, 110.0, 0.3);
  228.         rs_sgen_func_normalize(1, 1.0);
  229.         rs_sgen_func_lowpass(0, 1, 1.0, 0.0, 1.0);
  230.         rs_sgen_wave_out(0);
  231.        
  232.         memcpy(snd->data, rs_sgen_reg.wave_out, snd->length_samples*2 );
  233.        
  234.         rs_sgen_term();
  235.        
  236.         */
  237.        
  238.         rskos_snd_update_buffer(&snd->hbuf, snd->data, snd->length_samples);
  239. };
  240.  
  241. void soundbuf_play(rs_soundbuf_t *snd, int mode) {
  242.     rskos_snd_play(&snd->hbuf, mode);
  243. };
  244.  
  245. void soundbuf_stop(rs_soundbuf_t *snd) {
  246.     rskos_snd_stop(&snd->hbuf);
  247. };
  248.  
  249. void soundbuf_loop_check(rs_soundbuf_t *snd) {
  250.     rskos_snd_check_loop(&snd->hbuf);
  251. };
  252.  
  253.  
  254.  
  255. unsigned char clamp_byte(int value) {
  256.     value = value * (1 - (value >> 31)); // negative to zero
  257.     return (value > 255) ? 255 : value;
  258. };
  259.  
  260.  
  261. void game_reg_init() {
  262. //    game.tx = 0;
  263. //    game.ty = 0;
  264. //    game.tz = 0;
  265.    
  266.     game.player_x = 0;
  267.     game.player_y = 0;
  268.     game.tz = 0;
  269.    
  270.     game.bg_color = COLOR_BLACK;
  271.  
  272. //    int i;
  273. //    for (i = 0; i < BULLETS_COUNT; i++) {
  274. //        game.bullet_x[i] = 0;
  275. //        game.bullet_y[i] = 0;
  276. //    };
  277. //    game.bullet_index = 0;
  278.  
  279.     game.objs = malloc( sizeof(game_obj_t) * GAME_OBJS_MAX_COUNT );
  280.    
  281.     game.status = STATUS_MENU;
  282.    
  283.     game.window_scale = 2;
  284.     #ifndef RS_KOS
  285.         game.window_scale = 3;
  286.         window_scale_str[3] = '3';
  287.     #endif
  288.    
  289.     game.keyboard_state = 0;
  290.    
  291.     game.menu_index = 0;
  292.     game.menu_item_index = 0;
  293. };
  294.  
  295.  
  296. int is_key_pressed(int mask) {
  297.     return IS_BIT_SET(game.keyboard_state, mask) ? 1 : 0;
  298. };
  299.  
  300.  
  301. int seed = 0;
  302.  
  303. unsigned short rs_rand() {
  304.     seed += 1000;
  305.     seed %= 56789;
  306.    
  307.     // from here, http://www.cplusplus.com/forum/general/85758/
  308.     // koef. changed
  309.     int n = rskos_get_time() + seed * 57 * 5; // no *2
  310.     n = (n << 13) ^ n;
  311.     return (n * (n * n * 15731 + 789221) + 1376312589) & 0xFFFF;
  312.    
  313. };
  314.  
  315.  
  316.  
  317.  
  318. void GameInit() {
  319.  
  320.     game_reg_init();
  321.    
  322.     game.scaled_framebuffer = malloc(GAME_WIDTH*game.window_scale * GAME_HEIGHT*game.window_scale * 3);
  323.     DEBUG10f("scaled framebuffer: %d (window_scale = %d) \n", game.window_scale * GAME_WIDTH * GAME_HEIGHT * 3, game.window_scale);
  324.    
  325.     game_font_init();
  326.    
  327.     texture_init(&game.framebuffer, GAME_WIDTH, GAME_HEIGHT);
  328.    
  329.     texture_init(&game.tex, 64, 64);
  330.     rs_gen_init(1, 64);
  331.     rs_gen_func_set(0, 0.0);
  332.     rs_gen_func_cell(0, 1200, 10, NULL, 1.0, 1.0, 1.0, 1.0, 0.0, 1.0);
  333.     rs_gen_func_normalize(0, 0.0, 1.0);
  334.     rs_gen_func_posterize(0, 5);
  335.     rs_gen_tex_out_rgba(0, 0, 0, -1, 1.0, 1.0, 1.0, 1.0);
  336.     memcpy(game.tex.data, rs_gen_reg.tex_out, 64*64*4 );
  337.     rs_gen_term();
  338.    
  339.     texture_init(&game.tex_clouds, 128, 128);
  340.     rs_gen_init(1, 128);
  341.     rs_gen_func_perlin(0, 8, 5, 0.5, 1100);
  342.     rs_gen_func_normalize(0, 0.0, 1.0);
  343.     rs_gen_func_posterize(0, 4);
  344.     rs_gen_func_normalize(0, 0.0, 0.50);
  345.     rs_gen_tex_out_rgba(0, 0, 0, -1, 0.9, 0.7, 0.5, 1.0);
  346.     memcpy(game.tex_clouds.data, rs_gen_reg.tex_out, 128*128*4 );
  347.     rs_gen_term();
  348.    
  349.     texture_init(&game.tex_ground, GAME_WIDTH, 50);
  350.    
  351.    
  352.    
  353.     int ship_size = 8;
  354.    
  355.     // 16x8
  356.    
  357.     unsigned char tex_ship1_mask[] = { 0x10, 0x58, 0x7C, 0x7C, 0x3E, 0x1E, 0xBE, 0xFE };
  358.     unsigned char tex_ship2_mask[] = { 0x7C, 0x7C, 0x7E, 0x7E, 0x3C, 0x3C, 0x1C, 0x18 };
  359.     unsigned char tex_ship1_overlay_mask[] = { 0x10, 0x18, 0x1C, 0x1C, 0x1C, 0x1C, 0x8C, 0x84 };
  360.     unsigned char tex_ship2_overlay_mask[] = { 0x00, 0x00, 0x20, 0x20, 0x30, 0x30, 0x10, 0x10 };
  361.    
  362.     texture_init(&game.tex_ship[0], ship_size, ship_size);
  363.     rs_gen_init(2, ship_size);
  364.     rs_gen_func_perlin(0, 8, 5, 0.5, 111);
  365.     rs_gen_func_normalize(0, 0.0, 1.0);
  366.     rs_gen_func_posterize(0, 2);
  367.     rs_gen_func_mult_add_value(0, 0, 0.3, 0.7);
  368.  
  369.     rs_gen_func_set(1, 1.0);
  370.     rs_gen_func_apply_mask(1, tex_ship1_mask);
  371. //    rs_gen_func_mult_add_value(1, 1, 0.8, 0.2);
  372.     rs_gen_tex_out_rgba(0, 0, 0, 1, 0.8, 0.65, 0.66, 1.0);
  373.     memcpy(game.tex_ship[0].data, rs_gen_reg.tex_out, ship_size*ship_size*4 );
  374.     rs_gen_term();
  375.    
  376.     texture_init(&game.tex_ship[1], ship_size, ship_size);
  377.     rs_gen_init(2, ship_size);
  378.     rs_gen_func_perlin(0, 8, 5, 0.5, 1100);
  379.     rs_gen_func_normalize(0, 0.0, 1.0);
  380.     rs_gen_func_posterize(0, 2);
  381.     rs_gen_func_mult_add_value(0, 0, 0.1, 0.9);
  382.  
  383.     rs_gen_func_set(1, 1.0);
  384.     rs_gen_func_apply_mask(1, tex_ship1_overlay_mask);
  385. //    rs_gen_func_mult_add_value(1, 1, 0.8, 0.2);
  386.     rs_gen_tex_out_rgba(0, 0, 0, 1, 0.4, 0.3, 0.3, 1.0);
  387.     memcpy(game.tex_ship[1].data, rs_gen_reg.tex_out, ship_size*ship_size*4 );
  388.     rs_gen_term();
  389.    
  390.    
  391.     texture_init(&game.tex_ship[2], ship_size, ship_size);
  392.     rs_gen_init(2, ship_size);
  393.     rs_gen_func_perlin(0, 8, 5, 0.5, 111);
  394.     rs_gen_func_normalize(0, 0.0, 1.0);
  395.     rs_gen_func_posterize(0, 2);
  396.     rs_gen_func_mult_add_value(0, 0, 0.3, 0.7);
  397. //    rs_gen_func_set(0, 1.0);
  398.     rs_gen_func_set(1, 1.0);
  399.     rs_gen_func_apply_mask(1, tex_ship2_mask);
  400. //    rs_gen_func_mult_add_value(1, 1, 0.8, 0.2);
  401.     rs_gen_tex_out_rgba(0, 0, 0, 1, 0.8, 0.65, 0.66, 1.0);
  402.     memcpy(game.tex_ship[2].data, rs_gen_reg.tex_out, ship_size*ship_size*4 );
  403.     rs_gen_term();
  404.    
  405.     texture_init(&game.tex_ship[3], ship_size, ship_size);
  406.     rs_gen_init(2, ship_size);
  407.     rs_gen_func_perlin(0, 8, 5, 0.5, 1100);
  408.     rs_gen_func_normalize(0, 0.0, 1.0);
  409.     rs_gen_func_posterize(0, 2);
  410.     rs_gen_func_mult_add_value(0, 0, 0.1, 0.9);
  411.  
  412.     rs_gen_func_set(1, 1.0);
  413.     rs_gen_func_apply_mask(1, tex_ship2_overlay_mask);
  414. //    rs_gen_func_mult_add_value(1, 1, 0.8, 0.2);
  415.     rs_gen_tex_out_rgba(0, 0, 0, 1, 0.4, 0.3, 0.2, 1.0);
  416.     memcpy(game.tex_ship[3].data, rs_gen_reg.tex_out, ship_size*ship_size*4 );
  417.     rs_gen_term();
  418.    
  419.    
  420.     texture_init(&game.tex_gui_line, GAME_WIDTH, 13);
  421.     int i;
  422.     for (i = 0; i < GAME_WIDTH*13; i++) {
  423.         ( (unsigned int*) (game.tex_gui_line.data)) [i] = 0x668899AA;
  424.     };
  425.    
  426.    
  427.     int rock_size = 32;
  428.     rs_gen_init(3, rock_size);
  429.     for (i = 0; i < ROCKS_COUNT; i++) {
  430.    
  431.         texture_init(&(game.tex_rocks[i]), rock_size, rock_size);
  432.  
  433.         rs_gen_func_set(0, 0.0);
  434.         rs_gen_func_radial(0, 0.5, 0.5, 0.5, 0.75, 2.5 + i%5);
  435.  
  436.         rs_gen_func_perlin(2, 33, 4, 0.5, 350+i);
  437.         rs_gen_func_normalize(2, 0.0, 1.0);
  438.         rs_gen_func_posterize(2, 4);
  439.        
  440.         rs_gen_func_cell(1, 410+i, 50, NULL, -2.0, 1.0, 1.0, 1.0, 0.0, 1.0);
  441.         rs_gen_func_posterize(1, 2);
  442.         rs_gen_func_normalize(1, 0.0, 1.0);
  443.         rs_gen_func_add(1, 1, 2, 1.0, 0.5);
  444.         rs_gen_func_normalize(1, 0.0, 1.0);
  445.         rs_gen_func_posterize(1, 4);
  446.  
  447.         rs_gen_func_add(1, 0, 1, 1.0, 1.0);
  448.         rs_gen_func_normalize(1, 0.0, 1.0);
  449.         rs_gen_func_mult(1, 0, 1);
  450.         rs_gen_func_normalize(1, 0.0, 1.0);
  451.         rs_gen_func_posterize(1, 4);
  452.         rs_gen_tex_out_rgba_set(0.0, 0.0, 0.0, 0.0);
  453.         rs_gen_tex_out_rgba(1, 1, 1, -1, 0.5+ 0.03*(i%2), 0.7+ 0.03*(i%3) , 0.9, 1.0);
  454.  
  455.         memcpy(game.tex_rocks[i].data, rs_gen_reg.tex_out, rock_size*rock_size*4 );
  456.     };
  457.     rs_gen_term();
  458.    
  459.    
  460.     rock_size = 16;
  461.     rs_gen_init(3, rock_size);
  462.     for (i = 0; i < MINIROCKS_COUNT; i++) {
  463.    
  464.         texture_init(&(game.tex_minirocks[i]), rock_size, rock_size);
  465.  
  466.         rs_gen_func_set(0, 0.0);
  467.         rs_gen_func_radial(0, 0.5, 0.5, 0.5, 0.75, 2.5 + i%5);
  468.  
  469.         rs_gen_func_perlin(2, 33, 4, 0.5, 350+i);
  470.         rs_gen_func_normalize(2, 0.0, 1.0);
  471.         rs_gen_func_posterize(2, 4);
  472.        
  473.         rs_gen_func_cell(1, 410+i, 50, NULL, -2.0, 1.0, 1.0, 1.0, 0.0, 1.0);
  474.         rs_gen_func_posterize(1, 2);
  475.         rs_gen_func_normalize(1, 0.0, 1.0);
  476.         rs_gen_func_add(1, 1, 2, 1.0, 0.5);
  477.         rs_gen_func_normalize(1, 0.0, 1.0);
  478.         rs_gen_func_posterize(1, 4);
  479.  
  480.         rs_gen_func_add(1, 0, 1, 1.0, 1.0);
  481.         rs_gen_func_normalize(1, 0.0, 1.0);
  482.         rs_gen_func_mult(1, 0, 1);
  483.         rs_gen_func_normalize(1, 0.0, 1.0);
  484.         rs_gen_func_posterize(1, 4);
  485.         rs_gen_tex_out_rgba_set(0.0, 0.0, 0.0, 0.0);
  486.         rs_gen_tex_out_rgba(1, 1, 1, -1, 0.7+ 0.01*(i%2), 0.7+ 0.01*(i%3) , 0.65, 1.0);
  487.  
  488.         memcpy(game.tex_minirocks[i].data, rs_gen_reg.tex_out, rock_size*rock_size*4 );
  489.     };
  490.     rs_gen_term();
  491.    
  492.    
  493.    
  494.    
  495.     rs_gen_init(3, EXPLOSION_RADIUS*2);
  496.     for (i = 0; i < EXPLOSIONS_COUNT; i++) {
  497.            
  498.         texture_init(&(game.tex_explosions[i]), EXPLOSION_RADIUS*2, EXPLOSION_RADIUS*2);
  499.  
  500.         rs_gen_func_set(0, 1.0);
  501. //        rs_gen_func_radial(0, 0.5, 0.5, 0.3 + 0.5*i/EXPLOSION_FRAMES_COUNT, 0.975, 4.0);
  502. //        rs_gen_func_set(0, 1.0);
  503.  
  504.         rs_gen_func_set(1, 0.0);
  505.         rs_gen_func_radial(1, 0.5, 0.5, 0.1 + 0.4*i/EXPLOSIONS_COUNT, 1.0 - 1.0*i/EXPLOSIONS_COUNT, 2.5 + i%5);
  506.  
  507.         rs_gen_tex_out_rgba_set( 0.0, 0.0, 0.0, 0.0);
  508.         rs_gen_tex_out_rgba(0, 0, 0, 1, 1.0, 1.0, 1.0, 1.0);
  509.  
  510.         memcpy(game.tex_explosions[i].data, rs_gen_reg.tex_out, EXPLOSION_RADIUS*2*EXPLOSION_RADIUS*2*4 );
  511.     };
  512.     rs_gen_term();
  513.    
  514.    
  515.  
  516.     #ifndef RS_KOS
  517.         rs_audio_init(RS_AUDIO_FMT_MONO16, RS_AUDIO_FREQ_16000, 2);
  518.     #endif
  519.  
  520.     soundbuf_init(&game.sound_shoot, 1536);
  521.  
  522.         rs_sgen_init(2, game.sound_shoot.length_samples);
  523.         rs_sgen_func_pm(1, 2900.0, 1.70, 65.0, 17.0, 1.0);
  524.         rs_sgen_func_normalize(1, 0.6);
  525. //      rs_sgen_func_lowpass(0, 1, 1.0, 0.0, 4.0);
  526.         rs_sgen_func_highpass(0, 1, 1.0, 0.0, 3.0);
  527.  
  528.         rs_sgen_wave_out(0);
  529.        
  530.         memcpy(game.sound_shoot.data, (unsigned char*) rs_sgen_reg.wave_out, game.sound_shoot.length_samples*2 );
  531.        
  532.         rs_sgen_term();
  533.     soundbuf_update(&game.sound_shoot);
  534.    
  535.    
  536.    
  537.     soundbuf_init(&game.sound_turret_shoot, 4096);
  538.         rs_sgen_init(2, game.sound_turret_shoot.length_samples);
  539.         rs_sgen_func_pm(1, 227.0, 4.70, 555.0, 150.0, 0.01);
  540.         rs_sgen_func_normalize(1, 0.6);
  541. //      rs_sgen_func_highpass(0, 1, 1.0, 0.0, 3.0);
  542.         rs_sgen_func_lowpass(0, 1, 1.0, 0.0, 3.0);
  543.  
  544.         rs_sgen_wave_out(0);
  545.        
  546.         memcpy(game.sound_turret_shoot.data, (unsigned char*) rs_sgen_reg.wave_out, game.sound_turret_shoot.length_samples*2 );
  547.        
  548.         rs_sgen_term();
  549.     soundbuf_update(&game.sound_turret_shoot);
  550.    
  551.    
  552.      
  553.    
  554.    
  555.    
  556.    
  557.    
  558.  
  559.     soundbuf_init(&game.sound_test2, 1024);
  560.     //soundbuf_fill(&game.sound_test2, 8, 40);
  561.     soundbuf_sin(&game.sound_test2, 0.48);
  562.  
  563.     soundbuf_init(&game.sound_test3, 1024);
  564.     //soundbuf_fill(&game.sound_test3, 12, 60);
  565.     soundbuf_sin(&game.sound_test3, 0.24);
  566.  
  567.  
  568.  
  569.    
  570.    
  571.     int soundlen = 55000;
  572.            
  573. //    int freqs[SOUND_EXPLOSIONS_COUNT] = { 440, 523, 587, 698, 783, 880, 1046, 1174 };
  574.    
  575.     for (i = 0; i < SOUND_EXPLOSIONS_COUNT; i++) {
  576.  
  577.         soundbuf_init(&game.sound_explosions[i], soundlen);
  578.  
  579.         rs_sgen_init(3, soundlen);
  580.  
  581.         rs_sgen_func_noise(2, 1000);
  582.         //rs_sgen_func_phaser(0, 2, 0.9, 15.2 + 1.0*i/SOUND_EXPLOSIONS_COUNT, 6.0, 3.0, 2000.0, 1.73);
  583.         rs_sgen_func_phaser(0, 2, 0.9, 16.2 + 0.5*i/SOUND_EXPLOSIONS_COUNT, 6.0, 3.0, 900.0, 0.93);
  584.         rs_sgen_func_normalize(0, 1.0);
  585.  
  586.         rs_sgen_func_lowpass(2, 0, 0.6, 0.0, 20.0);
  587.         rs_sgen_func_normalize(2, 0.5);
  588.  
  589.         rs_sgen_wave_out(2);
  590.  
  591.         memcpy(game.sound_explosions[i].data, (unsigned char*) rs_sgen_reg.wave_out, soundlen*2);
  592.         soundbuf_update(&game.sound_explosions[i]);
  593.  
  594.         rs_sgen_term();
  595.    
  596.     };
  597.  
  598.     soundlen = 17888;
  599.  
  600.     soundbuf_init(&game.sound_hit, soundlen);
  601.  
  602.     rs_sgen_init(3, soundlen);
  603.  
  604.     rs_sgen_func_noise(2, 1000);
  605.     rs_sgen_func_phaser(0, 2, 0.9, 11.5, 16.0, 13.0, 1300.0, 1.93);
  606.     rs_sgen_func_normalize(0, 1.0);
  607.  
  608.     rs_sgen_func_highpass(2, 0, 1.0, 0.3, 20.0);
  609.     rs_sgen_func_normalize(2, 0.5);
  610.  
  611.     rs_sgen_wave_out(2);
  612.  
  613.     memcpy(game.sound_hit.data, (unsigned char*) rs_sgen_reg.wave_out, soundlen*2);
  614.     soundbuf_update(&game.sound_hit);
  615.  
  616.     rs_sgen_term();
  617.    
  618.    
  619.    
  620.  
  621.     #define NOTE(i) ( 3 << ( (i)/12) ) / ( 24 - ( (i) % 12) )
  622.     int amp = 70;
  623.     int t_shift = 0;
  624.     int t;
  625.  
  626.     soundlen = 128 * 1024;
  627.    
  628.  
  629.  
  630.     soundbuf_init(&game.sound_music, soundlen);
  631.    
  632.     for (t = t_shift; t < soundlen+t_shift; t++) {
  633.         game.sound_music.data[t-t_shift] = (0xFF &
  634.             (                                        
  635.                 ((t>>11) | (t>>7) | ( t>>5) | (t))
  636.  
  637.             )                                  
  638.         ) * amp;
  639.     };
  640.    
  641.     soundbuf_update(&game.sound_music);
  642.    
  643.    
  644.    
  645. //    int d[4] = { 5, 6, 1, 2 };
  646.    
  647.    
  648. //    soundbuf_init(&game.sound_music2, soundlen);
  649. //    
  650. //    for (t = t_shift; t < soundlen+t_shift; t++) {
  651. //            
  652. ////        y = 1 + (t & 16383);
  653. ////        x = (t * c[ (t>>13) & 3 ] / 24) & 127;
  654. //            
  655. //        game.sound_music2.data[t-t_shift] = (0xFF &
  656. //            (                                        
  657. //           //( t*5 & t >> 7 ) | ( t*2 & t >> 10 )
  658. //                                                    
  659. //           // ( ((t*t*t/1000000 + t) % 127) | t>>4 | t>>5 | (t%127) ) + ( (t>>16) | t )
  660. //          
  661. ////           ((t>>11) | (t>>7) | ( t>>5) | (t))
  662. ////           //+
  663. ////           //(( (t*5) >>12) & ( (t*3)>>19))
  664. //            
  665. ////                (3000 / y) * 35
  666. ////             + x*y*40000
  667. ////             + ( ( ((t>>8) & (t>>10)) | (t >> 14) | x) & 63 )
  668. //                                
  669. //                 // (  ((6 * t / d[ (t>>13) & 15 ] ) & 127) * 10000 )
  670. //                 //|( ( t>>3 ) )                
  671. //            
  672. //                    (t*NOTE( d[ (t>>13) & 3 ] )*10000)
  673. //                    | ((t>>6)*20000)
  674. //            
  675. //             )
  676. //                                                    
  677. //        ) * amp;
  678. //    };
  679. //    
  680. //    soundbuf_update(&game.sound_music2);
  681.    
  682.    
  683.     soundbuf_play( &game.sound_music, SND_MODE_LOOP );    
  684.    
  685.  
  686. };
  687.  
  688.  
  689. void GameTerm() {
  690.  
  691.  
  692.     DEBUG10("--- Game Term ---");
  693.  
  694.     #ifndef RS_KOS
  695.         rs_audio_term();
  696.     #endif
  697.  
  698.     game_font_term();
  699.    
  700.     free(game.scaled_framebuffer);
  701.    
  702.     free(game.objs);
  703.    
  704.     texture_free(&game.framebuffer);
  705.     texture_free(&game.tex);
  706.     texture_free(&game.tex_clouds);
  707.     texture_free(&game.tex_ground);
  708.    
  709.     texture_free(&game.tex_gui_line);
  710.    
  711.     int i;
  712.     for (i = 0; i < ROCKS_COUNT; i++) {
  713.         texture_free(&game.tex_rocks[i]);
  714.     };
  715.    
  716.     soundbuf_free(&game.sound_hit);
  717.     soundbuf_free(&game.sound_music);
  718.    
  719.     for (i = 0; i < SOUND_EXPLOSIONS_COUNT; i++) {
  720.         soundbuf_free(&game.sound_explosions[i]);
  721.     };
  722.    
  723.    
  724.     soundbuf_free(&game.sound_shoot);
  725.     soundbuf_free(&game.sound_turret_shoot);
  726.     soundbuf_free(&game.sound_test2);
  727.     soundbuf_free(&game.sound_test3);
  728.    
  729.  
  730. };
  731.  
  732. // ------------ #Event Functions ------------
  733.  
  734.  
  735.  
  736.  
  737.  
  738.  
  739. void GameKeyDown(int key) {
  740.    
  741.    
  742.     switch (key) {
  743.         case RS_KEY_LEFT:
  744.             BIT_SET(game.keyboard_state, RS_ARROW_LEFT_MASK);
  745.             break;
  746.         case RS_KEY_RIGHT:
  747.             BIT_SET(game.keyboard_state, RS_ARROW_RIGHT_MASK);
  748.             break;
  749.         case RS_KEY_UP:
  750.             BIT_SET(game.keyboard_state, RS_ARROW_UP_MASK);
  751.             break;
  752.         case RS_KEY_DOWN:
  753.             BIT_SET(game.keyboard_state, RS_ARROW_DOWN_MASK);
  754.             break;
  755.         case RS_KEY_A:
  756.             BIT_SET(game.keyboard_state, RS_ATTACK_KEY_MASK);
  757.             game.shoot_keypressed = 1;
  758.            
  759. //            soundbuf_loop_check( &game.sound_music );
  760.            
  761.             break;
  762.            
  763.        
  764.        
  765.         case RS_KEY_SPACE:
  766.                 soundbuf_play( &game.sound_turret_shoot, 0 );
  767.             break;
  768.        
  769.         #ifdef RS_LINUX
  770.            
  771.         case RS_KEY_Z:
  772. //                soundbuf_stop( &game.sound_music );
  773. //                soundbuf_play( &game.sound_music2, 0 );
  774.                 game.stage = 7;
  775.                 break;
  776.            
  777.         #endif
  778.        
  779.  
  780.            
  781.     };
  782.    
  783.    
  784.     if (game.status == STATUS_MENU) {
  785.    
  786.         switch (key) {
  787.             case RS_KEY_LEFT:
  788.                 BIT_SET(game.keyboard_state, RS_ARROW_LEFT_MASK);
  789.  
  790.                 if ( (game.menu_index == MENU_SETTINGS) && (game.menu_item_index == MENU_ITEM_WINDOW_SCALE) ) {
  791.                     game_change_window_scale(-1);
  792.                     game_ding(1);
  793.                 };
  794.  
  795.                 //PlayBuffer(hBuff, 0);
  796.                 break;
  797.             case RS_KEY_RIGHT:
  798.                 BIT_SET(game.keyboard_state, RS_ARROW_RIGHT_MASK);
  799.                
  800.                 if ( (game.menu_index == MENU_SETTINGS) && (game.menu_item_index == MENU_ITEM_WINDOW_SCALE) ) {
  801.                     game_change_window_scale(1);
  802.                     game_ding(1);
  803.                 };
  804.  
  805.                 //StopBuffer(hBuff);
  806.                 break;
  807.             case RS_KEY_UP:
  808.                 BIT_SET(game.keyboard_state, RS_ARROW_UP_MASK);
  809.                 menu_cursor_up();
  810.                 //ResetBuffer(hBuff, 0);
  811.                 break;
  812.             case RS_KEY_DOWN:
  813.                 BIT_SET(game.keyboard_state, RS_ARROW_DOWN_MASK);
  814.                 menu_cursor_down();
  815.                 break;
  816.             case RS_KEY_RETURN:
  817.                 menu_cursor_click();
  818.                 break;
  819.             case RS_KEY_ESCAPE:
  820.                 if (game.menu_index != MENU_PAUSE) {
  821.                     menu_open(0);
  822.                 }
  823.                 else {
  824.                     game.status = STATUS_PLAYING;
  825.                     return;
  826.                 };
  827.                 break;
  828.         };
  829.  
  830.     };
  831.    
  832.     if (game.status == STATUS_PLAYING) {
  833.         switch (key) {
  834.            
  835.             case RS_KEY_ESCAPE:
  836.                 game.status = STATUS_MENU;
  837.                 menu_open(MENU_PAUSE);
  838.                 break;
  839.             case RS_KEY_SPACE:
  840.                
  841.                
  842.                 //game_obj_add( game_obj( OBJ_EXPLOSION, 0, 0, 0, game.tx + 80, game.ty - 10, 0, 0.0 ) );
  843.                
  844. //                game_obj_add( game_obj( OBJ_ROCK, 0, 0, 32, game.tx + 80, game.ty - 10, 0, 0.0 ) );
  845.                
  846.                 break;
  847.            
  848.         };
  849.     };
  850.  
  851. };
  852.  
  853. void GameKeyUp(int key) {
  854.  
  855.     switch (key) {
  856.         case RS_KEY_LEFT:
  857.             BIT_CLEAR(game.keyboard_state, RS_ARROW_LEFT_MASK);
  858.             break;
  859.         case RS_KEY_RIGHT:
  860.             BIT_CLEAR(game.keyboard_state, RS_ARROW_RIGHT_MASK);
  861.             break;
  862.         case RS_KEY_UP:
  863.             BIT_CLEAR(game.keyboard_state, RS_ARROW_UP_MASK);
  864.             break;
  865.         case RS_KEY_DOWN:
  866.             BIT_CLEAR(game.keyboard_state, RS_ARROW_DOWN_MASK);
  867.             break;
  868.         case RS_KEY_A:
  869.             BIT_CLEAR(game.keyboard_state, RS_ATTACK_KEY_MASK);
  870.             break;
  871.     };
  872.  
  873. };
  874.  
  875. void GameMouseDown(int x, int y) {
  876. //    game.tx = x;
  877. //    game.ty = y;
  878.     DEBUG10f("Mouse Down %d, %d \n", x, y);
  879. };
  880.  
  881. void GameMouseUp(int x, int y) {
  882.     //
  883. };
  884.  
  885.  
  886. void game_change_window_scale(int d) {
  887.     int scale = window_scale_str[3] - '0';
  888.    
  889.     unsigned int w;
  890.     unsigned int h;
  891.     rskos_get_screen_size(&w, &h);
  892.    
  893.     int max_scale = (w-20)/GAME_WIDTH;
  894.     if ( (h-20)/GAME_HEIGHT < max_scale ) {
  895.         max_scale = (h-20)/GAME_HEIGHT;
  896.     };
  897.    
  898.     scale += d;
  899.     if ( scale > max_scale) {
  900.         scale = 1;
  901.     }
  902.     else if (scale < 1) {
  903.         scale = max_scale;
  904.     };
  905.    
  906.     game.window_scale = scale;
  907.    
  908.     free(game.scaled_framebuffer);
  909.     game.scaled_framebuffer = malloc(GAME_WIDTH*game.window_scale * GAME_HEIGHT*game.window_scale * 3);
  910.    
  911.    
  912.     rskos_resize_window( GAME_WIDTH * scale, GAME_HEIGHT * scale );
  913.  
  914.     window_scale_str[3] = scale + '0';
  915.    
  916.    
  917.    
  918. };
  919.  
  920. void game_ding(int i) {
  921.    
  922.     switch (i) {
  923.         case 0:
  924.             soundbuf_play(&game.sound_test2, 0);
  925.             break;
  926.         case 1:
  927.             soundbuf_play(&game.sound_test3, 0);
  928.             break;
  929.     };
  930.    
  931. };
  932.