void update_clamp(SPRITESPTR clamp)
{
int nflags = 0;
SIMAGEPTR arm = search_image_list_for_element(&(clamp->ifirstptr), "ARM");
if(clamp->sdata.x <= 200)
{
if(clamp->sdata.y+clamp->sdata.currentimg->height >= 470)
clamp->shape->body->v = cpv(-180, 0);
else
clamp->shape->body->v = cpv(-180, 500);
}
else
clamp->shape->body->v = cpv(-180, 0);
if((clamp->sdata.animflags & MATTACK))
clamp->sdata.currentimg = search_image_list_for_element(&clamp->ifirstptr, "CLAMP_CLOSE");
add_element_to_render_queue(clamp->sdata.currentimg->image, clamp->sdata.x, clamp->sdata.y, nflags,
RCOLOR(255, 255, 255, 255), NULL);
add_element_to_render_queue(arm->image, clamp->sdata.x, clamp->sdata.y-arm->height, nflags,
RCOLOR(255, 255, 255, 255), NULL);
add_element_to_render_queue(arm->image, clamp->sdata.x, clamp->sdata.y-arm->height-arm->height, nflags,
RCOLOR(255, 255, 255, 255), NULL);
clamp->sdata.x = clamp->shape->body->p.x-clamp->sdata.currentimg->width/2;
clamp->sdata.y = clamp->shape->body->p.y-clamp->sdata.currentimg->height/2;
if(clamp->sdata.x+clamp->sdata.currentimg->width <= 0)
cpSpaceAddPostStepCallback(get_global_cpSpace(), &remove_enemy, clamp, NULL);
}
void update_plant(SPRITESPTR plant)
{
int nflags = 0;
SIMAGEPTR stem = search_image_list_for_element(&(plant->ifirstptr), "STEM");
if(plant->sdata.x <= res_width/4)
{
if(plant->sdata.y+plant->sdata.currentimg->height <= 440)
{
plant->shape->body->v = cpv(-180, 0);
plant->sdata.currentimg = search_image_list_for_element(&(plant->ifirstptr), "PLANT_1");
}
else
plant->shape->body->v = cpv(-180, -200);
}
else
plant->shape->body->v = cpv(-180, 0);
add_element_to_render_queue(plant->sdata.currentimg->image, plant->sdata.x, plant->sdata.y, nflags,
RCOLOR(255, 255, 255, 255), NULL);
add_element_to_render_queue(stem->image, plant->sdata.x, plant->sdata.y+plant->sdata.currentimg->height, nflags,
RCOLOR(255, 255, 255, 255), NULL);
plant->sdata.x = plant->shape->body->p.x-plant->sdata.currentimg->width/2;
plant->sdata.y = plant->shape->body->p.y-plant->sdata.currentimg->height/2;
if(plant->sdata.x+plant->sdata.currentimg->width <= 0)
cpSpaceAddPostStepCallback(get_global_cpSpace(), &remove_enemy, plant, NULL);
}
void update_raw(SPRITESPTR raw)
{
int nflags = 0;
raw->shape->body->v = cpv(-180, 0);
if(raw->sdata.x <= 600 && raw->sdata.x >= 550)
{
set_anim_flags_on_sprite(raw, MATTACK);
}
add_element_to_render_queue(raw->sdata.currentimg->image, raw->sdata.x, raw->sdata.y, nflags,
RCOLOR(255, 255, 255, 255), NULL);
if((raw->sdata.animflags & MATTACK))
{
int x = raw->sdata.x-5*raw->sdata.anim_counter;
int y = raw->sdata.y+30;
SIMAGEPTR lazer = search_image_list_for_element(&(raw->ifirstptr), "LAZER");
raw->sdata.anim_counter++;
raw->sdata.currentimg = search_image_list_for_element(&(raw->ifirstptr), "RAW_2");
if(x+lazer->width <= raw->sdata.x)
{
raw->sdata.currentimg = search_image_list_for_element(&(raw->ifirstptr), "RAW_1");
}
if(x+lazer->width <= 0)
{
raw->sdata.anim_counter = 0;
remove_anim_flags_on_sprite(raw, MATTACK);
}
SPRITESPTR stman = search_sprite_list_for_element("STICKMAN");
if((x >= stman->sdata.x && x <= stman->sdata.x+stman->sdata.currentimg->width) &&
(y >= stman->sdata.y && y <= stman->sdata.y+stman->sdata.currentimg->height) &&
!(stman->sdata.animflags & MDAMAGED) && !(stman->sdata.animflags & MRECOVER))
{
lives--;
set_anim_flags_on_sprite(stman, MDAMAGED);
raw->sdata.anim_counter = 0;
remove_anim_flags_on_sprite(raw, MATTACK);
}
add_element_to_render_queue(lazer->image, x, y, nflags,
RCOLOR(255, 255, 255, 255), NULL);
}
raw->sdata.x = raw->shape->body->p.x-raw->sdata.currentimg->width/2;
raw->sdata.y = raw->shape->body->p.y-raw->sdata.currentimg->height/2;
if(raw->sdata.x+raw->sdata.currentimg->width <= 0)
cpSpaceAddPostStepCallback(get_global_cpSpace(), &remove_enemy, raw, NULL);
}
void update_brickwall(SPRITESPTR brickwall)
{
int nflags = 0;
brickwall->shape->body->v = cpv(-180, 0);
add_element_to_render_queue(brickwall->sdata.currentimg->image, brickwall->sdata.x, brickwall->sdata.y, nflags,
RCOLOR(255, 255, 255, 255), NULL);
brickwall->sdata.x = brickwall->shape->body->p.x-brickwall->sdata.currentimg->width/2;
brickwall->sdata.y = brickwall->shape->body->p.y-brickwall->sdata.currentimg->height/2;
if((brickwall->sdata.animflags & MDOWN))
{
ALLEGRO_MOUSE_STATE mouse;
al_get_mouse_state(&mouse);
float x = brickwall->sdata.x;
float y = brickwall->sdata.y;
float width = brickwall->sdata.currentimg->width;
float height = brickwall->sdata.currentimg->height;
if((mouse.x >= x && mouse.x <= x+width) && (mouse.y >= y && mouse.y <= y+height))
{
cpSpaceAddPostStepCallback(get_global_cpSpace(), &remove_enemy, brickwall, NULL);
score += 2;
}
remove_anim_flags_on_sprite(brickwall, MDOWN);
}
if(brickwall->sdata.x+brickwall->sdata.currentimg->width <= 0)
cpSpaceAddPostStepCallback(get_global_cpSpace(), &remove_enemy, brickwall, NULL);
}
void update_ameans(SPRITESPTR amean)
{
int nflags = 0;
amean->shape->body->v = cpv(-180, 0);
amean->sdata.anim_counter++;
if(amean->sdata.anim_counter < 7)
{
amean->sdata.currentimg = search_image_list_for_element(&amean->ifirstptr, "AMEAN_1");
}
else if(amean->sdata.anim_counter > 7 && amean->sdata.anim_counter < 14)
{
amean->sdata.currentimg = search_image_list_for_element(&amean->ifirstptr, "AMEAN_2");
}
else if(amean->sdata.anim_counter > 14 && amean->sdata.anim_counter < 21)
{
amean->sdata.currentimg = search_image_list_for_element(&amean->ifirstptr, "AMEAN_3");
}
else if(amean->sdata.anim_counter > 21 && amean->sdata.anim_counter < 28)
{
amean->sdata.currentimg = search_image_list_for_element(&amean->ifirstptr, "AMEAN_2");
}
else if(amean->sdata.anim_counter > 28)
amean->sdata.anim_counter = 0;
add_element_to_render_queue(amean->sdata.currentimg->image, amean->sdata.x, amean->sdata.y, nflags,
RCOLOR(255, 255, 255, 255), NULL);
amean->sdata.x = amean->shape->body->p.x-amean->sdata.currentimg->width/2;
amean->sdata.y = amean->shape->body->p.y-amean->sdata.currentimg->height/2;
if(amean->sdata.x+amean->sdata.currentimg->width <= 0)
cpSpaceAddPostStepCallback(get_global_cpSpace(), &remove_enemy, amean, NULL);
}
void update_ground(void)
{
SPRITESPTR ground = search_sprite_list_for_element("GROUND");
if(start)
{
ground->sdata.x -= ground->sdata.dx;
add_element_to_render_queue(ground->sdata.currentimg->image, ground->sdata.x, ground->sdata.y, 0,
RCOLOR(255, 255, 255, 255), NULL);
add_element_to_render_queue(ground->sdata.currentimg->image, ground->sdata.x+ground->sdata.currentimg->width,
ground->sdata.y, 0, RCOLOR(255, 255, 255, 255), NULL);
if(ground->sdata.x+ground->sdata.currentimg->width < 0)
ground->sdata.x = 0;
}
else
add_element_to_render_queue(ground->sdata.currentimg->image, ground->sdata.x, ground->sdata.y, 0,
RCOLOR(255, 255, 255, 255), NULL);
}
// Updates all nescessary sprites, images, buttons etc.
void update(void)
{
static _Bool called = false;
GDATAPTR game = get_game_data();
update_background();
if(game->gamestarted && game->paused)
{
paused(score, survival_time, lives);
}
else if(lives == 0)
{
gameover(score, survival_time);
}
else if(game->gamestarted)
{
if(!called)
{
//cpSpaceResizeStaticHash(get_global_cpSpace(), 700.0, 4*10);
cpSpaceAddCollisionHandler(get_global_cpSpace(), 1, 2, collision_begin, NULL, NULL, NULL, NULL);
cpSpaceAddCollisionHandler(get_global_cpSpace(), 0, 2, collision_static_begin, NULL, NULL, NULL, NULL);
cpSpaceAddCollisionHandler(get_global_cpSpace(), 0, 1, collision_static_begin, NULL, NULL, NULL, NULL);
called = false;
}
logic();
update_clouds();
cpSpaceStep(get_global_cpSpace(), 1.0f/60.0f);
cpSpaceEachBody(get_global_cpSpace(), &update_sprites, NULL);
update_ground();
update_lives();
add_element_to_render_queue(NULL, 0, 0, 0, RCOLOR(0, 0, 0, 255), update_score);
add_element_to_render_queue(NULL, 290, 0, 0, RCOLOR(0, 0, 0, 255), update_survivaltime);
}
else if(game->options)
{
options();
}
else if(game->howtoplay)
{
howtoplay();
}
else if(game->highscores)
{
highscores();
}
}
void update_spikes(SPRITESPTR spikes)
{
int nflags = 0;
spikes->shape->body->v = cpv(-180, 0);
add_element_to_render_queue(spikes->sdata.currentimg->image, spikes->sdata.x, spikes->sdata.y, nflags,
RCOLOR(255, 255, 255, 255), NULL);
spikes->sdata.x = spikes->shape->body->p.x-spikes->sdata.currentimg->width/2;
spikes->sdata.y = spikes->shape->body->p.y-spikes->sdata.currentimg->height/2;
if(spikes->sdata.x+spikes->sdata.currentimg->width <= 0)
cpSpaceAddPostStepCallback(get_global_cpSpace(), &remove_enemy, spikes, NULL);
}
void update_fist(SPRITESPTR fist)
{
int nflags = 0;
fist->shape->body->v = cpv(-180, 0);
add_element_to_render_queue(fist->sdata.currentimg->image, fist->sdata.x, fist->sdata.y, nflags,
RCOLOR(255, 255, 255, 255), NULL);
fist->sdata.x = fist->shape->body->p.x-fist->sdata.currentimg->width/2;
fist->sdata.y = fist->shape->body->p.y-fist->sdata.currentimg->height/2;
if(fist->sdata.x+fist->sdata.currentimg->width <= 0)
cpSpaceAddPostStepCallback(get_global_cpSpace(), &remove_enemy, fist, NULL);
}
void update_lives(void)
{
SPRITESPTR sprite = search_sprite_list_for_element("STICKMAN");
SIMAGEPTR life = search_image_list_for_element(&(sprite->ifirstptr), "STICKFIGURE_LIVES");
int x = res_width-life->width;
int y = 0;
for(int i = 0; i < lives; i++)
{
add_element_to_render_queue(life->image, x, y, 0, RCOLOR(255, 255, 255, 255), NULL);
x -= life->width+10;
}
}
void gameover(int score, char *survival_time)
{
GDATAPTR game = get_game_data();
if(quit == NULL)
{
quit = create_new_button("QUITTOMENUGO",
"DEFAULT",
"QUIT TO MENU",
game->b_font,
BCOLOR(255, 255, 255, 255), //80, 112/122, 255
BCOLOR(65, 105, 255, 191),
-280, //263
500, //225
50,
BRIGHT,
BVISIBLE,
true
);
}
add_element_to_render_queue(NULL, 280, 250, 0, RCOLOR(0, 0, 0, 255), update_score);
add_element_to_render_queue(NULL, 280, 300, 0, RCOLOR(0, 0, 0, 255), update_survivaltime);
}
void update_clouds(void)
{
SPRITESPTR clouds = search_sprite_list_for_element("CLOUD");
int nflags = 0;
static int m = -1;
clouds->sdata.x += m*clouds->sdata.dx;
if(clouds->sdata.x+clouds->sdata.currentimg->width < 0)
{
clouds->sdata.y = rand_int(res_height-90-clouds->sdata.currentimg->height);
m *= -1;
}
if(clouds->sdata.x > res_width)
{
clouds->sdata.y = rand_int(res_height-90-clouds->sdata.currentimg->height);
m *= -1;
}
add_element_to_render_queue(clouds->sdata.currentimg->image, clouds->sdata.x, clouds->sdata.y, nflags,
RCOLOR(255, 255, 255, 255), NULL);
}
R_API void r_cons_pal_init() {
RCons *cons = r_cons_singleton ();
memset (&cons->cpal, 0, sizeof (cons->cpal));
memset (&cons->pal, 0, sizeof (cons->pal));
cons->cpal.b0x00 = (RColor) RColor_GREEN;
cons->cpal.b0x7f = (RColor) RColor_CYAN;
cons->cpal.b0xff = (RColor) RColor_RED;
cons->cpal.args = (RColor) RColor_YELLOW;
cons->cpal.bin = (RColor) RColor_CYAN;
cons->cpal.btext = (RColor) RColor_YELLOW;
cons->cpal.call = (RColor) RColor_GREEN;
cons->cpal.call.attr = R_CONS_ATTR_BOLD;
cons->cpal.cjmp = (RColor) RColor_GREEN;
cons->cpal.cmp = (RColor) RColor_CYAN;
cons->cpal.comment = (RColor) RColor_RED;
cons->cpal.usercomment = (RColor) RColor_WHITE;
cons->cpal.creg = (RColor) RColor_CYAN;
cons->cpal.flag = (RColor) RColor_CYAN;
cons->cpal.fline = (RColor) RColor_CYAN;
cons->cpal.floc = (RColor) RColor_CYAN;
cons->cpal.flow = (RColor) RColor_CYAN;
cons->cpal.flow2 = (RColor) RColor_BLUE;
cons->cpal.fname = (RColor) RColor_RED;
cons->cpal.help = (RColor) RColor_GREEN;
cons->cpal.input = (RColor) RColor_WHITE;
cons->cpal.invalid = (RColor) RColor_RED;
cons->cpal.invalid.attr = R_CONS_ATTR_BOLD;
cons->cpal.jmp = (RColor) RColor_GREEN;
cons->cpal.label = (RColor) RColor_CYAN;
cons->cpal.math = (RColor) RColor_YELLOW;
cons->cpal.mov = (RColor) RColor_WHITE;
cons->cpal.nop = (RColor) RColor_BLUE;
cons->cpal.num = (RColor) RColor_YELLOW;
cons->cpal.offset = (RColor) RColor_GREEN;
cons->cpal.other = (RColor) RColor_WHITE;
cons->cpal.pop = (RColor) RColor_MAGENTA;
cons->cpal.pop.attr = R_CONS_ATTR_BOLD;
cons->cpal.prompt = (RColor) RColor_YELLOW;
cons->cpal.push = (RColor) RColor_MAGENTA;
cons->cpal.crypto = (RColor) RColor_BGBLUE;
cons->cpal.reg = (RColor) RColor_CYAN;
cons->cpal.ret = (RColor) RColor_RED;
cons->cpal.swi = (RColor) RColor_MAGENTA;
cons->cpal.trap = (RColor) RColor_RED;
cons->cpal.trap.attr = R_CONS_ATTR_BOLD;
cons->cpal.ai_read = (RColor) RColor_GREEN;
cons->cpal.ai_write = (RColor) RColor_BLUE;
cons->cpal.ai_exec = (RColor) RColor_RED;
cons->cpal.ai_seq = (RColor) RColor_MAGENTA;
cons->cpal.ai_ascii = (RColor) RColor_YELLOW;
cons->cpal.gui_cflow = (RColor) RColor_YELLOW;
cons->cpal.gui_dataoffset = (RColor) RColor_YELLOW;
cons->cpal.gui_background = (RColor) RColor_BLACK;
cons->cpal.gui_alt_background = (RColor) RColor_WHITE;
cons->cpal.gui_border = (RColor) RColor_BLACK;
cons->cpal.wordhl = (RColor) RColor_BGRED;
cons->cpal.linehl = (RColor) RCOLOR (ALPHA_BG, 0x00, 0x00, 0x7f, 0x00, 0x00, 0x00);
cons->cpal.func_var = (RColor) RColor_WHITE;
cons->cpal.func_var_type = (RColor) RColor_BLUE;
cons->cpal.func_var_addr = (RColor) RColor_CYAN;
cons->cpal.widget_bg = (RColor) RCOLOR (ALPHA_BG, 0x30, 0x30, 0x30, 0x00, 0x00, 0x00);
cons->cpal.widget_sel = (RColor) RColor_BGRED;
cons->cpal.graph_box = (RColor) RColor_NULL;
cons->cpal.graph_box2 = (RColor) RColor_BLUE;
cons->cpal.graph_box3 = (RColor) RColor_MAGENTA;
cons->cpal.graph_box4 = (RColor) RColor_GRAY;
cons->cpal.graph_true = (RColor) RColor_GREEN;
cons->cpal.graph_false = (RColor) RColor_RED;
cons->cpal.graph_trufae = (RColor) RColor_BLUE; // single jump
cons->cpal.graph_traced = (RColor) RColor_YELLOW;
cons->cpal.graph_current = (RColor) RColor_BLUE;
cons->pal.rainbow = NULL;
cons->pal.rainbow_sz = 0;
r_cons_pal_free ();
cons->pal.reset = Color_RESET; // reset is not user accessible, const char* is ok
r_cons_pal_update_event ();
}
// Performs animations for the stickman and adds the sprites to the render queue
void update_stickman(void)
{
SPRITESPTR stman = search_sprite_list_for_element("STICKMAN");
SPRITESPTR ground = search_sprite_list_for_element("GROUND");
float height = (search_image_list_for_element(&stman->ifirstptr, "STICKFIGURE_MOVE_1"))->height;
float y = stman->shape->body->p.y-height/2;
int cx = 0, cy = 0, nflags = 0;
static _Bool up = false, down = false;
ALLEGRO_COLOR color = RCOLOR(255, 255, 255, 255);
if(!start)
{
//static int sx = 0;
//static int sy = 0;
if(y+height >= ground->sdata.y)
stman->sdata.anim_counter++;
stman->sdata.currentimg = search_image_list_for_element(&stman->ifirstptr, "STICKFIGURE_MOVE_1");
if(stman->sdata.anim_counter >= 20)
{
stman->sdata.anim_counter = 0;
stman->shape->e = 0.1;
stman->shape->u = 0.9;
//sx = stman->shape->body->p.x;
//sy = stman->shape->body->p.y;
start = true;
}
}
else if((stman->sdata.animflags & MUP) && !down)
{
if(y+height >= ground->sdata.y && !up)
{
cpVect currentvel = stman->shape->body->v;
stman->shape->body->v = cpv(0, -stman->sdata.dy);
cpVect newvel = stman->shape->body->v;
stman->shape->body->v = cpvadd(currentvel, newvel);
up = true;
}
else if(y+height >= ground->sdata.y && up)
{
remove_anim_flags_on_sprite(stman, MUP);
up = false;
}
stman->sdata.currentimg = search_image_list_for_element(&stman->ifirstptr, "STICKFIGURE_MOVE_1");
}
else if((stman->sdata.animflags & MDOWN))
{
down = true;
static int dcounter = 0;
dcounter++;
if(dcounter > 65)
{
down = false;
remove_anim_flags_on_sprite(stman, MDOWN);
dcounter = 0;
}
stman->sdata.currentimg = search_image_list_for_element(&stman->ifirstptr, "STICKFIGURE_SLIDE");
cy = 15;
}
else
{
stman->sdata.anim_counter++;
if(stman->sdata.anim_counter < 5)
stman->sdata.currentimg = search_image_list_for_element(&stman->ifirstptr, "STICKFIGURE_MOVE_1");
else if(stman->sdata.anim_counter > 5 && stman->sdata.anim_counter < 10)
stman->sdata.currentimg = search_image_list_for_element(&stman->ifirstptr, "STICKFIGURE_MOVE_2");
else if(stman->sdata.anim_counter > 10)
stman->sdata.anim_counter = 0;
}
if((stman->sdata.animflags & MATTACK))
{
static int counter = 0;
counter++;
if(counter > 44)
{
remove_anim_flags_on_sprite(stman, MATTACK);
counter = 0;
}
if(up)
{
stman->sdata.currentimg = search_image_list_for_element(&stman->ifirstptr, "STICKFIGURE_ATTACK_JUMP");
}
else if(down)
{
stman->sdata.currentimg = search_image_list_for_element(&stman->ifirstptr, "STICKFIGURE_ATTACK_SLIDE");
cy = 20;
}
else
stman->sdata.currentimg = search_image_list_for_element(&stman->ifirstptr, "STICKFIGURE_ATTACK_RUN");
}
if ((stman->sdata.animflags & MDAMAGED))
{
static int counter = 0;
counter++;
stman->sdata.currentimg = search_image_list_for_element(&stman->ifirstptr, "STICKFIGURE_DEAD");
if(stman->sdata.x+stman->sdata.currentimg->width <= 0 || counter >= 60)
{
remove_anim_flags_on_sprite(stman, MDAMAGED);
set_anim_flags_on_sprite(stman, MRECOVER);
stman->shape->body->p.x = 70;
stman->shape->body->v = cpvzero;
counter = 0;
}
}
if((stman->sdata.animflags & MRECOVER))
{
static int counter = 0;
counter++;
if(counter >= 15 && counter <= 30)
color = RCOLOR(255, 255, 255, 105);
else if(counter >= 45 && counter <= 60)
color = RCOLOR(255, 255, 255, 105);
else if(counter >= 75 && counter <= 90)
color = RCOLOR(255, 255, 255, 105);
else if(counter >= 105 && counter <= 120)
color = RCOLOR(255, 255, 255, 105);
if(counter >= 120)
{
counter = 0;
remove_anim_flags_on_sprite(stman, MRECOVER);
}
}
if((int)stman->shape->body->p.x != 50 && start && y+height >= ground->sdata.y && !(stman->sdata.animflags & MDAMAGED))
{
stman->shape->body->p.x = 70;
}
add_element_to_render_queue(stman->sdata.currentimg->image, stman->sdata.x+cx, stman->sdata.y+cy, nflags,
color, NULL);
stman->sdata.x = stman->shape->body->p.x-stman->sdata.currentimg->width/2;
stman->sdata.y = stman->shape->body->p.y-stman->sdata.currentimg->height/2;
}
