able语言编程（硬件方向）

                可编程原理计算机组成设计实验

实验原理就是使用一片PLD芯片设计运算器部件，替代系统（ALU）单元，与实验板上其他单元电路相结合，构成一个完整的模型计算机。

原理图过于复杂，这里略过！

我这里主要说一下用able语言实现相应功能的程序清单：

MODULE ALU_UNIT

TITLE 'THIS IS A NEW ALU!'

"INPUT

I0,I1,I2,I3,I4,I5,I6,I7 PIN 15,16,17,18,19,20,21,22 ISTYPE 'COM'; S0,S1,S2,S3,M,CN    PIN 25,26,27,28,29,30   ISTYPE 'COM'; T4    PIN 40   ISTYPE 'COM'; LDDR1,LDDR2         PIN 31,32 ISTYPE 'COM'; ALU_BUS    PIN 37   ISTYPE 'COM';

"OUTPUT

F0,F1,F2,F3,F4,F5,F6,F7 PIN 3,4,5,6,7,8,9,10 ISTYPE 'COM';

"NODE

A0,A1,A2,A3,A4,A5,A6,A7 NODE ISTYPE   'REG'; B0,B1,B2,B3,B4,B5,B6,B7 NODE ISTYPE   'REG'; DR1T,DR2T   NODE; OE    NODE;

"VAR

A=[A7,A6,A5,A4,A3,A2,A1,A0]; B=[B7,B6,B5,B4,B3,B2,B1,B0]; I=[I7,I6,I5,I4,I3,I2,I1,I0]; OUT=[F7,F6,F5,F4,F3,F2,F1,F0]; EQUATIONS

DR1T=T4&LDDR1; DR2T=T4&LDDR2; A.C=DR1T; B.C=DR2T; OUT.OE=OE;

A:=I;B:=I;

WHEN (ALU_BUS==1) THEN OE=0; ELSE OE=1;

WHEN ((S3==0)&(S2==0)&(S1==0)&(S0==0)&(M==0)&(CN==0))THEN OUT=A; WHEN ((S3==1)&(S2==0)&(S1==0)&(S0==1)&(M==0)&(CN==1))THEN OUT=A+B;

END

文件后缀名是XX.abl的