readad.tdf

DEMO2 数码管扫描显示电路/DEMO4 计数时钟 DEMO5 键盘扫描设计/DEMO6 波形发生器/DEMO7 用DAC实现电压信号检测/DEMO8 ADC电压测量/DEMO9 液晶驱动电路设计

SUBDESIGN readAD
(
   clk,reset		:INPUT;
   rdn	:OUTPUT;
)

VARIABLE
   enout[6..0],rdn:				DFF;
BEGIN
   rdn.clk=clk;
   rdn.prn=reset;
   enout[].clrn=reset;
   enout[].clk=clk;

   IF(enout[].q<100) THEN
     enout[].d=enout[].q+1;
	 rdn.d=GND;
   ELSE
     enout[].d=0;
     rdn.d=VCC;
   END IF;
END;