kolibrios-fun/programs/games/marblematch3/game/rsgamedraw.c
alpine 93fccad3ca Marble Match-3 Game update:
- added saving highscores



git-svn-id: svn://kolibrios.org@5260 a494cfbc-eb01-0410-851d-a64ba20cac60
2014-12-23 15:39:58 +00:00

433 lines
16 KiB
C

#include "rsgamedraw.h"
#include "rsgametext.h"
#include "rsgamemenu.h"
#include "rsgentex.h"
#include "rs/rsplatform.h"
#include "rskos.h"
#include "rsnoise.h"
#include "strings.h"
void game_draw() {
int w = GAME_WIDTH;
int h = GAME_HEIGHT;
int continue_need_redraw = 0;
if (game.need_redraw) {
// if (1) {
if ( (game.status == STATUS_MENU) || (game.status == STATUS_LOADING) ) {
texture_draw(&game.framebuffer, &game.tex_bg, 0, 0, DRAW_MODE_REPLACE);
if (game.status == STATUS_LOADING) {
game_textout_at_center( 0, 240, 0, L_LOADING );
game_textout_at_center( -3, 240-2, 3, L_LOADING );
}
else {
texture_draw( &game.framebuffer, &game.tex_logo, 0, 50, DRAW_MODE_ALPHA );
if (game.score) {
game_textout_at_center( 0, 230, 0, L_GAME_OVER );
game_textout_at_center( -3, 230-2, 3, L_GAME_OVER );
char s[] = L_SCORE;
char *str_num;
str_num = strchr(s, 'x');
str_num[0] = '0' + ( (game.score / 100) % 10);
str_num[1] = '0' + ( (game.score / 10) % 10);
str_num[2] = '0' + ( (game.score / 1) % 10);
game_textout_at_center( 0, 260, 0, s );
game_textout_at_center( -3, 260-2, 3, s );
if (game.score == game.hiscore) {
game_textout_at_center( 0, 290, 0, L_NEW_HISCORE);
game_textout_at_center( -3, 290-2, 3, L_NEW_HISCORE );
}
else {
char hs[] = L_HISCORE;
str_num = strchr(hs, 'x');
str_num[0] = '0' + ( (game.hiscore / 100) % 10);
str_num[1] = '0' + ( (game.hiscore / 10) % 10);
str_num[2] = '0' + ( (game.hiscore / 1) % 10);
game_textout_at_center( 0, 290, 0, hs);
game_textout_at_center( -3, 290-2, 3, hs );
};
}
else {
if (game.hiscore) {
char *str_num;
char hs[] = L_HISCORE;
str_num = strchr(hs, 'x');
str_num[0] = '0' + ( (game.hiscore / 100) % 10);
str_num[1] = '0' + ( (game.hiscore / 10) % 10);
str_num[2] = '0' + ( (game.hiscore / 1) % 10);
game_textout_at_center( 0, 230, 0, hs);
game_textout_at_center( -3, 230-2, 3, hs );
};
};
if (!game.menu_replay_timeout) {
game_textout_at_center( 0, 400, 0, L_START );
game_textout_at_center( -3, 400-2, 3, L_START );
};
};
game_textout( 2, GAME_HEIGHT-10, 2, L_BOTTOM_LINE_DEVELOPER_INFO);
}
else {
texture_draw(&game.framebuffer, &game.tex_bg_gameplay, 0, 0, DRAW_MODE_REPLACE);
int i, j, y_shift;
for (i = 0; i < FIELD_HEIGHT; i++) {
for (j = 0; j < FIELD_WIDTH; j++) {
if ( IS_BIT_SET( game.field[i*FIELD_WIDTH + j], CRYSTAL_VISIBLE_BIT )) {
y_shift = 0;
if ( IS_BIT_SET( game.field[i*FIELD_WIDTH + j], CRYSTAL_MOVING_BIT ) ) {
y_shift = -CRYSTAL_SIZE + CRYSTAL_SIZE*(game.process_timer+1)/(ANIMATION_PROCESS_TIMER_LIMIT+1);
continue_need_redraw = 1;
};
texture_draw( &game.framebuffer, &game.tex_crystals[ game.field[i*FIELD_WIDTH + j] & CRYSTAL_INDEX_MASK ], FIELD_X0+ j*CRYSTAL_SIZE, y_shift + FIELD_Y0+ i*CRYSTAL_SIZE, DRAW_MODE_ALPHA );
};
};
};
if (game.selected) {
texture_draw( &game.framebuffer, &game.tex_cursor, FIELD_X0+ game.selected_x*CRYSTAL_SIZE, FIELD_Y0+ game.selected_y*CRYSTAL_SIZE, DRAW_MODE_ALPHA );
};
for (i = 0; i < game.explosions_count; i++) {
texture_draw( &game.framebuffer, &(game.tex_explosion[ (game.explosions[i]>>16) & 0xFF ]),
FIELD_X0 + CRYSTAL_SIZE*( game.explosions[i] & 0xFF) - (EXPLOSION_SIZE-CRYSTAL_SIZE)/2 ,
FIELD_Y0 + CRYSTAL_SIZE*( (game.explosions[i]>>8) & 0xFF) - (EXPLOSION_SIZE-CRYSTAL_SIZE)/2 ,
DRAW_MODE_ALPHA);
};
int blink_visible = 0;
if (game.time > 10*25) {
blink_visible = 1;
}
else if (game.time > 5*25) {
blink_visible = (game.time / 8) & 1;
continue_need_redraw = 1;
}
else {
blink_visible = (game.time / 4) & 1;
continue_need_redraw = 1;
};
char *str_num;
if (blink_visible) {
char str[] = L_TIME;
int time_sec = game.time / 25;
str_num = strchr(str, 'x');
str_num[0] = '0' + ( (time_sec / 10) % 10);
str_num[1] = '0' + ( (time_sec / 1) % 10);
// str_num[2] = '0' + ( (time_sec / 1) % 10);
game_textout( 56+3, 32+2, 0, str );
game_textout( 56, 32, 3, str );
};
char sstr[] = L_SCORE;
str_num = strchr(sstr, 'x');
str_num[0] = '0' + ( (game.score / 100) % 10);
str_num[1] = '0' + ( (game.score / 10) % 10);
str_num[2] = '0' + ( (game.score / 1) % 10);
game_textout( 56+3, 64+2, 0, sstr );
game_textout( 56, 64, 3, sstr );
};
// rskos_draw_area(0, 0, w, h, game.window_scale, game.framebuffer.data, NULL, RSKOS_BGRA);
rskos_draw_area(0, 0, w, h, 1, game.framebuffer.data, game.bgr_framebuffer, 0);
};
if (!continue_need_redraw) {
game.need_redraw = 0;
};
};
void game_textures_init_stage1() {
int i;
texture_init(&game.framebuffer, GAME_WIDTH, GAME_HEIGHT);
// texture_init(&game.tex, 64, 64);
// rs_gen_init(1, 64);
// rs_gen_func_set(0, 0.0);
// rs_gen_func_cell(0, 1200, 10, NULL, 1.0, 1.0, 1.0, 1.0, 0.0, 1.0);
// rs_gen_func_normalize(0, 0.0, 1.0);
// rs_gen_func_posterize(0, 5);
// rs_gen_tex_out_rgba(0, 0, 0, -1, 1.0, 1.0, 1.0, 1.0);
// memcpy(game.tex.data, rs_gen_reg.tex_out, 64*64*4 );
// rs_gen_term();
texture_init(&game.tex_clouds, 128, 128);
rs_gen_init(1, 128);
rs_gen_func_perlin(0, 8, 5, 0.5, 1100);
rs_gen_func_normalize(0, 0.0, 1.0);
rs_gen_func_posterize(0, 6);
rs_gen_func_mult_add_value(0, 0, 0.6, 0.4);
// rs_gen_func_set(0, 1.0);
rs_gen_tex_out_rgba(0, 0, 0, -1, 1.0, 1.0, 1.0, 1.0);
memcpy(game.tex_clouds.data, rs_gen_reg.tex_out, 128*128*4 );
rs_gen_term();
rs_texture_t tex_shadow;
texture_init(&tex_shadow, 64, 64);
rs_gen_init(1, 64);
rs_gen_func_perlin(0, 21, 6, 0.5, 1000);
rs_gen_func_normalize(0, 0.0, 0.5);
rs_gen_tex_out_rgba(0, 0, 0, -1, 1.0, 1.0, 1.0, 1.0);
memcpy(tex_shadow.data, rs_gen_reg.tex_out, 64*64*4 );
rs_gen_term();
texture_init(&game.tex_logo, GAME_WIDTH, 128);
texture_clear(&game.tex_logo, COLOR_TRANSPARENT);
game_textout_adv( &game.tex_logo, GAME_WIDTH/2 - 192, 4, 1, DRAW_MODE_REPLACE, "MARBLE");
game_textout_adv( &game.tex_logo, GAME_WIDTH/2 - 192, 63, 1, DRAW_MODE_REPLACE, "MATCH3");
texture_draw(&game.tex_logo, &tex_shadow, 0, 0, DRAW_MODE_MULT | DRAW_TILED_FLAG);
game_textout_adv( &game.tex_logo, GAME_WIDTH/2 - 192 - 5, 0, 1, DRAW_MODE_ALPHA, "MARBLE");
game_textout_adv( &game.tex_logo, GAME_WIDTH/2 - 192 - 4, 60, 1, DRAW_MODE_ALPHA, "MATCH3");
texture_draw(&game.tex_logo, &game.tex_clouds, 0, 0, DRAW_MODE_MULT | DRAW_TILED_FLAG);
texture_free(&tex_shadow);
texture_init(&game.tex_bg, 512, 512);
texture_clear(&game.tex_bg, COLOR_SILVER);
texture_init(&game.tex_bg_gameplay, 512, 512);
texture_clear(&game.tex_bg_gameplay, COLOR_SILVER);
texture_init(&game.tex_cursor, CRYSTAL_SIZE, CRYSTAL_SIZE);
rs_gen_init(2, CRYSTAL_SIZE);
rs_gen_func_set(0, 0.0); // inner
rs_gen_func_radial(0, 0.5, 0.5, 0.5, 1.0, 2.0);
rs_gen_func_clamp(0, 0.1, 0.5);
rs_gen_func_normalize(0, 0.0, 1.0);
rs_gen_func_mult_add_value(0, 0, -1.0, 1.0);
rs_gen_func_set(1, 0.0); // outer
rs_gen_func_radial(1, 0.5, 0.5, 0.5, 1.0, 2.0);
rs_gen_func_clamp(1, 0.0, 0.2);
rs_gen_func_normalize(1, 0.0, 1.0);
rs_gen_func_mult(0, 0, 1);
rs_gen_func_set(1, 1.0);
// rs_gen_tex_out_rgba_set(0.0, 0.0, 0.0, 0.0);
rs_gen_tex_out_rgba(1, 1, 1, 0, 1.0, 1.0, 1.0, 1.0);
memcpy(game.tex_cursor.data, rs_gen_reg.tex_out, CRYSTAL_SIZE*CRYSTAL_SIZE*4 );
rs_gen_term();
texture_init(&game.tex_field, FIELD_WIDTH*CRYSTAL_SIZE + 7, FIELD_HEIGHT*CRYSTAL_SIZE + 7);
texture_clear(&game.tex_field, 0xAABBBBBB); // 0x66404060 // 0xAACCCCCC
// float cr_r[CRYSTALS_COUNT] = { 0.8, 0.2, 0.1, 0.6, 0.7, 0.0, 0.7 };
// float cr_g[CRYSTALS_COUNT] = { 0.1, 0.6, 0.4, 0.0, 0.6, 0.0, 0.8 };
// float cr_b[CRYSTALS_COUNT] = { 0.1, 0.1, 0.7, 0.7, 0.0, 0.3, 0.9 };
// float cr_r[CRYSTALS_COUNT] = { 0.9, 0.3, 0.1, 0.7, 0.8, 0.0, 0.8 };
// float cr_g[CRYSTALS_COUNT] = { 0.1, 0.8, 0.5, 0.0, 0.7, 0.0, 0.8 };
// float cr_b[CRYSTALS_COUNT] = { 0.0, 0.1, 0.9, 0.8, 0.0, 0.5, 0.9 };
float cr_r[CRYSTALS_COUNT] = { 1.0, 0.4, 0.10, 0.9, 1.0, 0.2, 0.8 };
float cr_g[CRYSTALS_COUNT] = { 0.1, 1.0, 0.75, 0.1, 0.9, 0.2, 0.8 };
float cr_b[CRYSTALS_COUNT] = { 0.0, 0.1, 1.00, 1.0, 0.1, 0.9, 0.9 };
// rs_gen_init(5, CRYSTAL_SIZE);
// for (i = 0; i < CRYSTALS_COUNT; i++) {
// texture_init(&(game.tex_crystals[i]), CRYSTAL_SIZE, CRYSTAL_SIZE);
//
// rs_gen_func_set(0, 0.0);
// rs_gen_func_radial(0, 0.5, 0.5, 0.5, 0.75, 10.0);
//
// rs_gen_func_set(1, 0.0);
// rs_gen_func_cell(1, 110+100*i, 7+i, NULL, 1.0, 1.0, 0.0, 1.0, 0.0, 1.0);
// rs_gen_func_normalize(1, 0.0, 1.0);
//
// rs_gen_tex_out_rgba_set(0.0, 0.0, 0.0, 0.0);
// rs_gen_tex_out_rgba(1, 1, 1, 0, cr_b[i], cr_g[i], cr_r[i], 1.0);
//
// memcpy(game.tex_crystals[i].data, rs_gen_reg.tex_out, CRYSTAL_SIZE*CRYSTAL_SIZE*4 );
// };
// rs_gen_term();
rs_gen_init(5, CRYSTAL_SIZE);
for (i = 0; i < CRYSTALS_COUNT; i++) {
texture_init(&(game.tex_crystals[i]), CRYSTAL_SIZE, CRYSTAL_SIZE);
rs_gen_func_set(0, 0.0);
rs_gen_func_radial(0, 0.5, 0.5, 0.5, 0.75, 10.0);
rs_gen_func_set(1, 1.0);
rs_gen_func_cell(1, 310+100*i, 5, NULL, -0.5, 1.0, 1.0, 0.0, -2.0, 2.0);
rs_gen_func_normalize(1, 0.0, 1.0);
rs_gen_func_normalmap(2, 3, 4, 1, 1.0);
rs_gen_func_mult_add_value(3, 3, -1.0, 1.0);
rs_gen_func_clamp(2, 0.5, 1.0);
rs_gen_func_normalize(2, 0.0, 1.0);
rs_gen_func_clamp(3, 0.5, 1.0);
rs_gen_func_normalize(3, 0.0, 1.0);
rs_gen_func_add(4, 2, 3, 0.5, 0.5);
rs_gen_func_mult(1, 1, 4);
rs_gen_func_normalize(1, 0.0, 1.0);
rs_gen_tex_out_rgba_set(0.0, 0.0, 0.0, 0.0);
rs_gen_tex_out_rgba(1, 1, 1, 0, cr_b[i], cr_g[i], cr_r[i], 1.0);
// rs_gen_tex_out_rgba(4, 4, 4, 0, 0.8-0.8*cr_b[i], 0.8-0.8*cr_g[i], 0.8-0.8*cr_r[i], 0.0);
// rs_gen_tex_out_rgba(1, 1, 1, 0, 1.0, 1.0, 1.0, 1.0);
memcpy(game.tex_crystals[i].data, rs_gen_reg.tex_out, CRYSTAL_SIZE*CRYSTAL_SIZE*4 );
};
rs_gen_term();
rs_gen_init(3, EXPLOSION_SIZE);
for (i = 0; i < EXPLOSION_FRAMES_COUNT; i++) {
texture_init(&(game.tex_explosion[i]), EXPLOSION_SIZE, EXPLOSION_SIZE);
rs_gen_func_set(0, 1.0);
// rs_gen_func_radial(0, 0.5, 0.5, 0.3 + 0.5*i/EXPLOSION_FRAMES_COUNT, 0.975, 4.0);
// rs_gen_func_set(0, 1.0);
rs_gen_func_set(1, 0.0);
rs_gen_func_radial(1, 0.5, 0.5, 0.1 + 0.4*i/EXPLOSION_FRAMES_COUNT, 1.0 - 1.0*i/EXPLOSION_FRAMES_COUNT, 2.5 + i%5);
rs_gen_tex_out_rgba_set( 0.0, 0.0, 0.0, 0.0);
rs_gen_tex_out_rgba(0, 0, 0, 1, 1.0, 1.0, 1.0, 1.0);
memcpy(game.tex_explosion[i].data, rs_gen_reg.tex_out, EXPLOSION_SIZE*EXPLOSION_SIZE*4 );
};
rs_gen_term();
};
void game_textures_init_stage2() {
// texture_clear(&game.tex_bg, COLOR_SILVER);
// /*
rs_gen_init(6, 512);
rs_gen_func_perlin(0, 8, 5, 0.5, 1100);
rs_gen_func_normalize(0, 0.0, 1.0);
rs_gen_func_perlin(1, 8, 5, 0.5, 1700);
rs_gen_func_normalize(1, 0.0, 1.0);
rs_gen_func_cell(2, 1118, 50, NULL, 1.0, 0.887, -0.333, 1.0, 0.0, 4.0); // 1360
rs_gen_func_normalize(2, 0.0, 0.5);
rs_gen_func_adr(3, 2, 0, 1, 1.0, 0.3);
rs_gen_func_inv(3, 3, 7.5);
rs_gen_func_normalize(3, 0.0, 1.0);
// signed short c[] = { 0, 250, 250, 0, 500, 250, 250, 500};
signed short c[] = { 0, 0, 0, 512, 512, 0, 512, 512};
// signed short c[] = { 128, 128, 128, 384, 384, 128, 384, 384};
//rs_gen_func_cell(4, 0, 4, c, 0.0, 0.3, 1.0, 0.5, 0.0, 0.30);
rs_gen_func_cell(4, 0, 4, c, 1.0, 0.3, 0.0, 0.95, 0.0, 0.30);
rs_gen_func_normalize(4, 0.0, 1.0);
// rs_gen_func_radial(5, 0.5, 0.5, 0.60, 1.0, 4.0);
// rs_gen_func_add(4, 4, 5, 0.5, 0.5);
//
rs_gen_func_mult(4, 4, 3);
// coloring...
rs_gen_func_mult_add_value(0, 4, 0.8, 0.0);
rs_gen_func_add(0, 4, 1, 0.95, 0.05);
rs_gen_func_add(3, 4, 2, 0.95, 0.05);
rs_gen_tex_out_rgba(4, 0, 3, -1, 0.9, 0.9, 0.9, 1.0);
memcpy(game.tex_bg.data, rs_gen_reg.tex_out, 512*512*4 );
rs_gen_term();
// */
// Background for gameplay
texture_draw( &game.tex_bg_gameplay, &game.tex_bg, 256, 256, DRAW_MODE_REPLACE | DRAW_TILED_FLAG );
// Bevel
texture_draw_vline( &game.tex_bg_gameplay, FIELD_X0 - 5, FIELD_Y0 - 5, FIELD_HEIGHT*CRYSTAL_SIZE + 10, 0xFF404060 );
texture_draw_hline( &game.tex_bg_gameplay, FIELD_X0 - 5, FIELD_Y0 - 5, FIELD_WIDTH*CRYSTAL_SIZE + 10, 0xFF404060 );
texture_draw_vline( &game.tex_bg_gameplay, FIELD_X0 - 4, FIELD_Y0 - 4, FIELD_HEIGHT*CRYSTAL_SIZE + 8, 0xFF606080 );
texture_draw_hline( &game.tex_bg_gameplay, FIELD_X0 - 4, FIELD_Y0 - 4, FIELD_WIDTH*CRYSTAL_SIZE + 8, 0xFF606080 );
texture_draw_vline( &game.tex_bg_gameplay, FIELD_X0 + 4 + FIELD_WIDTH*CRYSTAL_SIZE, FIELD_Y0 - 4, FIELD_HEIGHT*CRYSTAL_SIZE + 8, 0xFFC0C0C0 );
texture_draw_hline( &game.tex_bg_gameplay, FIELD_X0 - 4, FIELD_Y0 + 4 + FIELD_HEIGHT*CRYSTAL_SIZE, FIELD_WIDTH*CRYSTAL_SIZE + 9, 0xFFC0C0C0 );
texture_draw_vline( &game.tex_bg_gameplay, FIELD_X0 + 5 + FIELD_WIDTH*CRYSTAL_SIZE, FIELD_Y0 - 5, FIELD_HEIGHT*CRYSTAL_SIZE + 10, 0xFFE0E0E0 );
texture_draw_hline( &game.tex_bg_gameplay, FIELD_X0 - 5, FIELD_Y0 + 5 + FIELD_HEIGHT*CRYSTAL_SIZE, FIELD_WIDTH*CRYSTAL_SIZE + 11, 0xFFE0E0E0 );
texture_draw( &game.tex_bg_gameplay, &game.tex_field, FIELD_X0 - 3, FIELD_Y0 - 3, DRAW_MODE_ALPHA );
};
void game_textures_free() {
free(game.bgr_framebuffer);
// texture_free(&game.tex_gui_line);
int i;
for (i = 0; i < CRYSTALS_COUNT; i++) {
texture_free(&game.tex_crystals[i]);
};
for (i = 0; i < EXPLOSION_FRAMES_COUNT; i++) {
texture_free(&game.tex_explosion[i]);
};
texture_free(&game.framebuffer);
texture_free(&game.tex_logo);
texture_free(&game.tex_clouds);
texture_free(&game.tex_bg);
texture_free(&game.tex_bg_gameplay);
};