Rev 5310 | Rev 5316 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
5225 | alpine | 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 |
||
20 | #include |
||
21 | #include |
||
22 | |||
23 | #include "rs/rskeyboard.h" |
||
24 | #endif |
||
25 | |||
26 | |||
5243 | alpine | 27 | |
5225 | alpine | 28 | rs_game_t game; |
29 | |||
30 | |||
5291 | alpine | 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 | |||
5225 | alpine | 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 | }; |
||
5291 | alpine | 165 | |
166 | if (x < 0) { |
||
167 | return; |
||
168 | }; |
||
169 | |||
170 | if (x >= tex->w) { |
||
171 | return; |
||
172 | }; |
||
173 | |||
5225 | alpine | 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 | |||
5298 | alpine | 188 | void soundbuf_update(rs_soundbuf_t *snd) { |
189 | rskos_snd_update_buffer(&snd->hbuf, snd->data, snd->length_samples); |
||
190 | }; |
||
191 | |||
5225 | alpine | 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; |
||
5310 | alpine | 207 | int amp = 19000; |
5225 | alpine | 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; |
||
5310 | alpine | 216 | int amp = 19000; |
5225 | alpine | 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 | }; |
||
5243 | alpine | 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 | |||
5225 | alpine | 238 | rskos_snd_update_buffer(&snd->hbuf, snd->data, snd->length_samples); |
239 | }; |
||
240 | |||
5302 | alpine | 241 | void soundbuf_play(rs_soundbuf_t *snd, int mode) { |
242 | rskos_snd_play(&snd->hbuf, mode); |
||
5225 | alpine | 243 | }; |
244 | |||
245 | void soundbuf_stop(rs_soundbuf_t *snd) { |
||
246 | rskos_snd_stop(&snd->hbuf); |
||
247 | }; |
||
248 | |||
5302 | alpine | 249 | void soundbuf_loop_check(rs_soundbuf_t *snd) { |
250 | rskos_snd_check_loop(&snd->hbuf); |
||
251 | }; |
||
5225 | alpine | 252 | |
253 | |||
5302 | alpine | 254 | |
5225 | alpine | 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() { |
||
5291 | alpine | 262 | // game.tx = 0; |
263 | // game.ty = 0; |
||
264 | // game.tz = 0; |
||
265 | |||
266 | game.player_x = 0; |
||
267 | game.player_y = 0; |
||
5225 | alpine | 268 | game.tz = 0; |
5298 | alpine | 269 | |
270 | game.bg_color = COLOR_BLACK; |
||
5225 | alpine | 271 | |
5291 | alpine | 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 ); |
||
5225 | alpine | 280 | |
281 | game.status = STATUS_MENU; |
||
282 | |||
283 | game.window_scale = 2; |
||
5243 | alpine | 284 | #ifndef RS_KOS |
5225 | alpine | 285 | game.window_scale = 3; |
5243 | alpine | 286 | window_scale_str[3] = '3'; |
5225 | alpine | 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 | |||
5291 | alpine | 301 | int seed = 0; |
302 | |||
303 | unsigned short rs_rand() { |
||
304 | seed += 1000; |
||
305 | seed %= 56789; |
||
5225 | alpine | 306 | |
5291 | alpine | 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 | }; |
||
5225 | alpine | 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); |
||
5291 | alpine | 432 | |
5225 | alpine | 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 | |||
5291 | alpine | 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); |
||
5225 | alpine | 465 | |
5291 | alpine | 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 | |||
5243 | alpine | 516 | #ifndef RS_KOS |
5302 | alpine | 517 | rs_audio_init(RS_AUDIO_FMT_MONO16, RS_AUDIO_FREQ_16000, 2); |
5225 | alpine | 518 | #endif |
519 | |||
5315 | alpine | 520 | soundbuf_init(&game.sound_shoot, 1536); |
521 | |||
522 | rs_sgen_init(2, game.sound_shoot.length_samples); |
||
5310 | alpine | 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); |
||
5225 | alpine | 527 | |
5310 | alpine | 528 | rs_sgen_wave_out(0); |
529 | |||
5315 | alpine | 530 | memcpy(game.sound_shoot.data, (unsigned char*) rs_sgen_reg.wave_out, game.sound_shoot.length_samples*2 ); |
5310 | alpine | 531 | |
532 | rs_sgen_term(); |
||
5315 | alpine | 533 | soundbuf_update(&game.sound_shoot); |
5310 | alpine | 534 | |
535 | |||
536 | |||
5315 | alpine | 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); |
||
5310 | alpine | 550 | |
551 | |||
5315 | alpine | 552 | |
5310 | alpine | 553 | |
554 | |||
555 | |||
556 | |||
5315 | alpine | 557 | |
5310 | alpine | 558 | |
5225 | alpine | 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 | |||
5298 | alpine | 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); |
||
5310 | alpine | 587 | rs_sgen_func_normalize(2, 0.5); |
5298 | alpine | 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); |
||
5310 | alpine | 609 | rs_sgen_func_normalize(2, 0.5); |
5298 | alpine | 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(); |
||
5302 | alpine | 617 | |
618 | |||
619 | |||
5298 | alpine | 620 | |
5302 | alpine | 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 | |||
5315 | alpine | 645 | // int d[4] = { 5, 6, 1, 2 }; |
5302 | alpine | 646 | |
647 | |||
5315 | alpine | 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); |
||
5302 | alpine | 681 | |
682 | |||
683 | soundbuf_play( &game.sound_music, SND_MODE_LOOP ); |
||
684 | |||
685 | |||
5225 | alpine | 686 | }; |
687 | |||
688 | |||
689 | void GameTerm() { |
||
690 | |||
691 | |||
5291 | alpine | 692 | DEBUG10("--- Game Term ---"); |
5225 | alpine | 693 | |
5243 | alpine | 694 | #ifndef RS_KOS |
5225 | alpine | 695 | rs_audio_term(); |
696 | #endif |
||
697 | |||
698 | game_font_term(); |
||
699 | |||
700 | free(game.scaled_framebuffer); |
||
701 | |||
5291 | alpine | 702 | free(game.objs); |
703 | |||
5225 | alpine | 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 | |||
5315 | alpine | 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); |
||
5225 | alpine | 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 | |||
5298 | alpine | 739 | void GameKeyDown(int key) { |
5225 | alpine | 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; |
||
5302 | alpine | 758 | |
759 | // soundbuf_loop_check( &game.sound_music ); |
||
760 | |||
5225 | alpine | 761 | break; |
5302 | alpine | 762 | |
763 | |||
764 | |||
5315 | alpine | 765 | case RS_KEY_SPACE: |
766 | soundbuf_play( &game.sound_turret_shoot, 0 ); |
||
767 | break; |
||
5302 | alpine | 768 | |
5310 | alpine | 769 | #ifdef RS_LINUX |
770 | |||
771 | case RS_KEY_Z: |
||
5315 | alpine | 772 | // soundbuf_stop( &game.sound_music ); |
773 | // soundbuf_play( &game.sound_music2, 0 ); |
||
774 | game.stage = 7; |
||
5310 | alpine | 775 | break; |
776 | |||
777 | #endif |
||
5302 | alpine | 778 | |
779 | |||
780 | |||
5225 | alpine | 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); |
||
5243 | alpine | 792 | game_ding(1); |
5225 | alpine | 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); |
||
5243 | alpine | 802 | game_ding(1); |
5225 | alpine | 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: |
||
5310 | alpine | 820 | if (game.menu_index != MENU_PAUSE) { |
821 | menu_open(0); |
||
822 | } |
||
823 | else { |
||
824 | game.status = STATUS_PLAYING; |
||
825 | return; |
||
826 | }; |
||
5225 | alpine | 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; |
||
5310 | alpine | 837 | menu_open(MENU_PAUSE); |
5225 | alpine | 838 | break; |
5291 | alpine | 839 | case RS_KEY_SPACE: |
5225 | alpine | 840 | |
841 | |||
5291 | alpine | 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 | |||
5225 | alpine | 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 | |||
5243 | alpine | 875 | void GameMouseDown(int x, int y) { |
5291 | alpine | 876 | // game.tx = x; |
877 | // game.ty = y; |
||
5243 | alpine | 878 | DEBUG10f("Mouse Down %d, %d \n", x, y); |
879 | }; |
||
5225 | alpine | 880 | |
5243 | alpine | 881 | void GameMouseUp(int x, int y) { |
882 | // |
||
883 | }; |
||
884 | |||
885 | |||
5225 | alpine | 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'; |
||
5243 | alpine | 915 | |
916 | |||
917 | |||
5225 | alpine | 918 | }; |
919 | |||
920 | void game_ding(int i) { |
||
921 | |||
922 | switch (i) { |
||
923 | case 0: |
||
5302 | alpine | 924 | soundbuf_play(&game.sound_test2, 0); |
5225 | alpine | 925 | break; |
926 | case 1: |
||
5302 | alpine | 927 | soundbuf_play(&game.sound_test3, 0); |
5225 | alpine | 928 | break; |
929 | }; |
||
930 | |||
931 | };>>>>>>><>>>>>>><>>>>>>>>>>>>>>>>>>>> |