『第 3 楼』:
使用 LLM 解释/回答一下
#include <allegro.h>
int main(void)
{
FONT *f1, *f2, *f3, *f4, *f5;
FONT *tempfont;
char tmp[128];
struct tm *ptr;
BITMAP *b1,*b2,*BCK;
time_t lt;
allegro_init();
install_keyboard();
set_gfx_mode(GFX_AUTODETECT, 640, 480, 0, 0);
set_palette(desktop_palette);
clear_to_color(screen, makecol(255, 255, 255));
f1 = load_font("unifont.dat", NULL, NULL);
f2 = extract_font_range(f1, ' ', 'A'-1);
f3 = extract_font_range(f1, 'A', 'Z');
f4 = extract_font_range(f1, 'Z'+1, 'z');
tempfont = merge_fonts(f4, f5 = merge_fonts(f2, f3));
destroy_font(f1);
destroy_font(f2);
destroy_font(f3);
destroy_font(f4);
destroy_font(f5);
acquire_screen();
b1=load_bitmap("tb1.bmp",NULL);
lt=time(NULL);
ptr=gmtime(<);
ptr=localtime(<);
strftime(tmp,128,"%A",ptr);
textout_centre_ex(screen, font,tmp, SCREEN_W/2, SCREEN_H/2-50,makecol(0,0,0), -1);
strftime(tmp,128,"%b-%d-%Y",ptr);
textout_centre_ex(screen, tempfont,tmp, SCREEN_W/2, SCREEN_H/2 ,makecol(0,0,0), -1);
release_screen();
readkey();
return 0;
}
本來有附上編譯好的可執行檔,可是一直上傳不了。
你如果要的話,我在發mail到你的mail裡。
|