/***********************************************************
 * 自己作成数字フォント画像用ランダム数値表示 by やすっち
 * allegro用C言語サンプルソース
 * このファイルは拡張子を c に変更してください。
 *
 * 注意事項…DJGPP以外でのコンパイル確認はされていません
 * 作者の一言…画像切り出し表示の参考に
 **********************************************************/


#include <stdlib.h>
#include <stdio.h>
#include "allegro.h"

int main()
{
	int x,y,f=0;
	BITMAP *dfont;
	PALETTE pal;
	
	allegro_init();
	install_keyboard();
	install_timer();
	
	set_gfx_mode(GFX_AUTODETECT,400,300,0,0);
	
	dfont=load_bitmap("font.bmp",pal);
	set_pallete(pal);
	clear(screen);
	
	while(1)
	{
		x=0;
		while(x<=80)
		{
			for(y=0;y<=60;y++)
				blit(dfont,screen,(rand()%10)*5,f*7,x*6,y*8,5,7);
			x++;
		}
		while(key[KEY_ENTER]);
		while(!key[KEY_ENTER])
		{
			rand();
			if(key[KEY_ESC])break;
		}
		if(key[KEY_ESC])break;
		f++;
		if(f==5)f=0;
	}	
	
	remove_timer();
	remove_keyboard();
	allegro_exit();
	
	return 0;
}