Verifying The Output

Coddy'nin Verilog Journey'sinin Temeller bölümünün bir parçası. Ders 83 / 90.

Görev

Bu derste, dalga biçimi döküm komutlarını ekleyecek ve trafik ışığı denetleyicisinin doğru çalıştığını doğrulayacaksın.

Yapılacaklar:

testbench'i şu şekilde güncelle:

$dumpfile ekleyerek traffic.vcd adlı bir dalga biçimi dosyası oluştur
$dumpvars ekleyerek testbench içindeki tüm signals değerlerini dök
Simülasyonu çalıştır ve dalga biçimini kontrol et

Kendin dene

module traffic_light (
  input clk,
  input reset,
  output reg red,
  output reg yellow,
  output reg green
);
  // Durumlar: 0=Yeşil, 1=Sarı, 2=Kırmızı
  reg [1:0] state;
  reg [5:0] counter;
  
  always @(posedge clk or posedge reset) begin
    if (reset) begin
      state <= 2;      // Kırmızıda başla
      counter <= 0;
    end else begin
      if (counter == 0) begin
        // Durumu değiştir
        if (state == 0) begin  // Yeşil -> Sarı
          state <= 1;
          counter <= 10;       // Sarı 10 saniye sürer
        end else if (state == 1) begin  // Sarı -> Kırmızı
          state <= 2;
          counter <= 40;       // Kırmızı 40 saniye sürer
        end else begin  // Kırmızı -> Yeşil
          state <= 0;
          counter <= 30;       // Yeşil 30 saniye sürer
        end
      end else begin
        counter <= counter - 1;
      end
    end
  end
  
  // Çıkış mantığı
  always @(*) begin
    red = (state == 2);
    yellow = (state == 1);
    green = (state == 0);
  end
  
endmodule

module testbench;
  reg clk, reset;
  wire red, yellow, green;
  
  traffic_light uut (
    .clk(clk),
    .reset(reset),
    .red(red),
    .yellow(yellow),
    .green(green)
  );
  
  always #1 clk = ~clk;
  
  initial begin
    // TODO: "traffic.vcd" oluşturmak için $dumpfile ekle
    
    // TODO: Tüm sinyalleri dökmek için $dumpvars ekle (0, testbench)
    
    $display("Traffic Light Test");
    $monitor("Time %0t: red=%b, yellow=%b, green=%b", $time, red, yellow, green);
    
    clk = 0;
    reset = 1;
    #2 reset = 0;
    
    #90;
    $finish;
  end
endmodule