進程(時鐘)
變量計數:自然範圍0到24:= 24；
開始
如果clk事件和clk = '1 '則
如果計數=24，則
計數:= 0；
scl & lt=不是scl
其他
計數:=計數+1；
結束if；
結束進程；