CAMLprim value ml_characterColor(value dst,value p,value c,value color)
{
SDL_Surface *sur= SDL_SURFACE(dst);
SDL_Rect rect;
int r;
SDLRect_of_value(&rect,p);
r=characterColor(sur,rect.x,rect.y,(char) c,Int32_val(color));
return Val_bool(r);
}
void draw_lgd(SDL_Surface *ecran)
{
char buff[12];
int i;
memset(buff, '\0', 12);
sprintf(buff, "Probabilite");
for (i = 0; i < 11; i++)
{
characterColor(ecran, 8, (220 + (i * 20)), buff[i], 0xffffffff);
}
i += 4;
stringColor(ecran, 4, (210 + (i * 15)), "(%)", 0xffffffff);
}
