# 數位電子乙級第一題 ```csharp module no1(a,b,c,d,e,f,g,dp,cc,ck); input ck; output [1:4] cc; output a,b,c,d,e,f,g,dp; reg [13:0] div_f; //除蘋電路 reg [1:4] cc; reg a,b,c,d,e,f,g,dp; //七段顯示器輸出 always @(posedge ck) div_f <= div_f + 1; //除蘋電路 always @(posedge div_f[13]) case(cc) 4'b0001: begin cc<=4'b1000; {a,b,c,d,e,f,g,dp}<=8'b11111100; //顯示0 end 4'b1000: begin cc<=4'b0100; {a,b,c,d,e,f,g,dp}<=8'b11111111; //顯示8. end 4'b0100: begin cc<=4'b0010; {a,b,c,d,e,f,g,dp}<=8'b01100000; //顯示1 end default: begin cc<=4'b0001; {a,b,c,d,e,f,g,dp}<=8'b01100110; //顯示4 end endcase endmodule ``` # 數位電子乙級第二題 ```csharp module no2(ck,a,b,c,d,e,f,g,col,row); input ck; input [2:0] col; //行 output a,b,c,d,e,f,g; output[3:0] row; //列 reg a,b,c,d,e,f,g; reg [3:0] row; reg [13:0] div_f; always @(posedge ck) //除頻電路 div_f<=div_f+1; always @(posedge div_f[13]) case(row) 4'b1110: //掃描第一列 begin row<=4'b1101; if(col==3'b110) {a,b,c,d,e,f,g}<=7'b1001111; //1 if(col==3'b101) {a,b,c,d,e,f,g}<=7'b0010010; //2 if(col==3'b011) {a,b,c,d,e,f,g}<=7'b0000110; //3 end 4'b1101: //掃描第二行 begin row<=4'b1011; if(col==3'b110) {a,b,c,d,e,f,g}<=7'b1001100; // 4 if(col==3'b101) {a,b,c,d,e,f,g}<=7'b0100100; // 5 if(col==3'b011) {a,b,c,d,e,f,g}<=7'b0100000; // 6 end 4'b1011: //掃描第三行 begin row<=4'b0111; if(col==3'b110) {a,b,c,d,e,f,g}<=7'b0001111; // 7 if(col==3'b101) {a,b,c,d,e,f,g}<=7'b0000000; // 8 if(col==3'b011) {a,b,c,d,e,f,g}<=7'b0001100; // 9 end default: begin row<=4'b1110; if(col==3'b110) {a,b,c,d,e,f,g}<=7'b1110010; //* 修改此處 if(col==3'b101) {a,b,c,d,e,f,g}<=7'b0000001; //0 if(col==3'b011) {a,b,c,d,e,f,g}<=7'b1100110; //# 修改此處 end endcase endmodule ``` ███████╗███████╗ █████╗ ██╗ ██╗ ██╔════╝██╔════╝██╔══██╗╚██╗ ██╔╝ █████╗ ███████╗███████║ ╚████╔╝ ██╔══╝ ╚════██║██╔══██║ ╚██╔╝ ███████╗███████║██║ ██║ ██║ ╚══════╝╚══════╝╚═╝ ╚═╝ ╚═╝