AHDL Counter

SUBDESIGN ahdlcnt

(

clock, sload, cnt_en, aclr, data[15..0] : INPUT;

q[15..0] : OUTPUT;

)

VARIABLE

count[15..0] : DFF;

BEGIN

count[].clk = clock;

count[].clrn = !clr;

IF sload THEN

count[].d = d[];

ELSIF cnt_en THEN

count[].d = count[].q + 1;

ELSE

count[].d = count[].q;

END IF;

q[] = count[];

END;