sanjiaobo.abl

这是一个用abel语言编写的三角波发生器

MODULE SANJIAOBO
Q5,Q4,Q3,Q2,Q1,Q0,control  PIN ISTYPE'REG';
CP PIN;
S=[Q5,Q4,Q3,Q2,Q1,Q0];
S1=^B000001;
S2=^B000010;
S3=^B000100;
S4=^B001000;
S5=^B010000;
S6=^B100000;

S0=^B000000;

C,X=.C.,.X.;

EQUATIONS
S.CLK=CP;
STATE_DIAGRAM S

STATE S0:GOTO S1;


STATE S1:if control then S2 else S6;
STATE S2:if control then S3 else S1;
STATE S3:if control then S4 else S2;
STATE S4:if control then S5 else S3;
STATE S5:if control then S6 else S4;
STATE S6:if control then S1 else S5;

TEST_VECTORS
([CP,control]->[S])
@REPEAT 7{[C,0]->X;}
END