//led.v
/*---------------------------------------------------------------
LED顯示模塊：led(CLK,AF,ADDR,DATA);
功能：		顯示
注意事項：	8位LED
參數：		CLK:	掃妙時鐘輸入，推薦1kHz	
			AF:		數碼管輸出，a～h
			ADDR:	數碼管選擇位數出，0~2
			DATA:	顯示數據輸入0~9999 9999

編寫人：	黃道斌
編寫日期：	2006/07/13
----------------------------------------------------------------*/



module	led(CLK,AF,ADDR,DATA);
	input		CLK;			//掃描時鐘輸入(推薦1K)
	output[7:0]	AF;				//數碼管a~h
	output[2:0]	ADDR;			//數碼管選擇位，0~7
	input[31:0]	DATA;			//顯示數據輸入0~9999 9999
	
	reg[7:0]	AF;
	reg[2:0]	ADDR,addr;
	
	reg[3:0]	d;
	integer		temp;
	
	always	@	(posedge	CLK)
	begin
		d=temp%10;
		case(d)
			4'D0:	AF=8'H3f;
			4'D1:	AF=8'H06;
			4'D2:	AF=8'H5b;
			4'D3:	AF=8'H4f;
			4'D4:	AF=8'H66;
			4'D5:	AF=8'H6d;
			4'D6:	AF=8'H7d;
			4'D7:	AF=8'H27;
			4'D8:	AF=8'H7f;
			4'D9:	AF=8'H6f;
		endcase

		begin
			temp=temp/10;
			ADDR=addr;
			addr=addr+3'b001;
		end
		
		if(ADDR==3'b111)
		begin
			temp=DATA;
			addr=3'b000;
		end
	end
endmodule