SoftLK-lib/examples/performance/main.c

#include "../../include/SLK/SLK.h"

typedef struct
{
    int x;
    int y;
    int type;
    int frame;
    int flip;
}Dino;

typedef struct
{
    Dino *dinos;
    int used;
    int space;
}Dino_army;

Dino_army world;
SLK_Sprite *dino_sprites[4][24];
int frame = 0;
char time_stat[48];

void add_dino();

int main(int argc, char *argv[])
{
   SLK_setup(320,240,"SLK Engine",1,1);
   SLK_set_FPS(30);
   SLK_show_cursor(1);
   SLK_set_clear_color(1);
   SLK_clear_screen();

   srand(time(NULL));

   SLK_load_palette("../assets/performance.pal");
   SLK_Sprite *tileset = SLK_load_sprite("../assets/dino_sprites_doux.slk");
   for(int x = 0;x<24;x++)
   {
      dino_sprites[0][x] = SLK_create_sprite(24,24);
      SLK_copy_partial_sprite(dino_sprites[0][x],tileset,0,0,x*24,0,24,24);
   }
   SLK_destroy_sprite(tileset);

   tileset = SLK_load_sprite("../assets/dino_sprites_mort.slk");
   for(int x = 0;x<24;x++)
   {
      dino_sprites[1][x] = SLK_create_sprite(24,24);
      SLK_copy_partial_sprite(dino_sprites[1][x],tileset,0,0,x*24,0,24,24);
   }
   SLK_destroy_sprite(tileset);

   tileset = SLK_load_sprite("../assets/dino_sprites_tard.slk");
   for(int x = 0;x<24;x++)
   {
      dino_sprites[2][x] = SLK_create_sprite(24,24);
      SLK_copy_partial_sprite(dino_sprites[2][x],tileset,0,0,x*24,0,24,24);
   }
   SLK_destroy_sprite(tileset);

   tileset = SLK_load_sprite("../assets/dino_sprites_vita.slk");
   for(int x = 0;x<24;x++)
   {
      dino_sprites[3][x] = SLK_create_sprite(24,24);
      SLK_copy_partial_sprite(dino_sprites[3][x],tileset,0,0,x*24,0,24,24);
   }
   SLK_destroy_sprite(tileset);

   world.space = 100;
   world.used = 0;
   world.dinos = malloc(sizeof(Dino)*world.space);
   double time = 0;
   
   while(world.used<1000)
      add_dino();
      
   while(SLK_running())
   {
      SLK_update();
      SLK_clear_screen();
      frame++;
      int next_frame = frame%4==0;
      
      clock_t start = clock();
      for(int i = 0;i<world.used;i++)
      {
         if(next_frame)
         {
            world.dinos[i].frame++;
            if(world.dinos[i].frame>3)
               world.dinos[i].frame = 0;
         }
         
         SLK_draw_sprite(dino_sprites[world.dinos[i].type][world.dinos[i].frame],world.dinos[i].x,world.dinos[i].y);
      }
      time+=((double)(clock()-start)/CLOCKS_PER_SEC);
      if(next_frame)
         sprintf(time_stat,"%04lf %04d",time/((double)frame)/*/world.used*10.0f*/,world.used);
 
      if(SLK_key_down(SLK_KEY_SPACE))
         add_dino();
      
      SLK_fill_rectangle(0,0,104,8,SLK_create_paxel(2,SLK_OPAQUE));
      SLK_draw_string(0,0,1,time_stat,SLK_create_paxel(3,SLK_OPAQUE));

      SLK_update_screen();
   }

   return 0;
}

void add_dino()
{
   world.dinos[world.used].frame = rand()%4;
   world.dinos[world.used].x = rand()%320-12;
   world.dinos[world.used].y = rand()%240-12;
   world.dinos[world.used].type = rand()%4;
   world.dinos[world.used].flip = rand()%2;

   world.used++;

   if(world.used>=world.space)
   {
      world.space+=100;
      world.dinos = realloc(world.dinos,sizeof(Dino)*world.space);
   }
}