2-4解碼器測試驗証程式編譯錯誤

ultraman

剛接觸,看不懂,希望先進們可以解說一下程式,還有一直編譯錯誤,我不懂為什麼錯誤,如果可以也想請教一下
/ g9 `' N, H( }* X; x, V
6 X7 }$ F# M9 v; U'timescale 1ns/1ns

2 H8 H( o7 v$ x: }" Hmodule the_2-4_decoder_testing_and_certification_program;
) c' i, ?1 K1 x, j4 t4 s
wire[3:0]y;
  i/ j5 |& q( T/ v9 i, [) W; Sreg a;
7 {1 A$ }2 f+ G, r% ]% P3 rreg b;

deco2_4g UUT(
        .y(y),
' t( R, ]: M: m- X2 I) F, r$ g; u        .a(a),
        .b(b));
       
. W7 Q$ o0 I' j; Xinteger TX_FILE;
integer TX_ERROR;

initial
$ ^4 _. h, ?* C* U( D  Sbegin
        TX_ERROR=0;
        TX_FILE=$fopen("result.txt");
       
/ [1 w+ k& {0 `) i% R! o0 z        a=1'b0;
2 p4 m# Q8 v. a0 _7 N2 g        b=1'b0;
       
        #100
        a=1'b1;
$ s. r6 n7 j) L# w' k7 H! K       
        #100
        a=1'b0;                
        b=1'b1;
       
+ M, G3 F: j! C9 ^8 d- E        #100
        b=1'b1;
       
        #150
        if(TX_ERROR==0)
        begin
                $display("No errors or warning");
                $display(TX_FILE,"No errors or warning");
# f0 D1 _( Z1 X* Z2 S) ?        end else begin
                $display("%d errors found in simulation",TX_ERROR);
                $display(TX_FILE,"%d errors found in simulation",TX_ERROR);
% B0 }' [* m0 J/ ]( Y        end
7 [7 k9 \: c& K4 Y                $fclose(TX_FILE);
                $stop;
        end
       
1 l3 z& k( C* H4 t1 o        task CHECK_y;
6 }6 F& @8 j$ \        input[3:0]NEXT_y;
        #0 begin
7 O2 |+ Z8 g3 C- }                if(NEXT_y!==y)begin
! M5 h2 B; q; F9 v  @                        $display("Error at time=%dns y=%b,expected=%b",
                        $time,y,NEXT_y);
( g3 g6 T3 x: i0 w( ~                        $fdisplay(TX_FILE,"Error at time=%dns y=%b,expected=%b",                               
7 w3 r$ f$ l) z) b8 }. ~                        $time,y,NEXT_y);
" E, i  p6 z' O3 M                        TX_ERROR=TX_ERROR+1;
                end
        end
endtask
endmodule