BEGIN: A_COUNT:=0, ERROR:=0,E1:=INBUS(Xe); 00000 {c0}
M:=INBUS(Xm); 00001 {c1}
E2:=INBUS(Ye); 00010 {c2}
A:=INBUS(Ym); 00011 {c3}
COMPARE:E=E1-E2; 00100 {c4}
ALIGN:if E < 0 then 00101
A:=right-shift(A) 00110 {c5}
E:=E+1; 00111 {c6}
Go to ALIGN; 01000
If E > 0 then 01001
M:right-shift(M); 01010 {c7}
E:+E-1; 01011 {c6c8}
Go to ALIGN; 01100
ADD/SUBSTRACT: A:=A+M,E:=max(E1,E2); 01101 {c9}
OVERFLOW: if A_COUNT = 1 then begin 01110
If E = Emax then go to ERROR 01111
A:=right-shift(A) 10000 {c5}
E:=E+1; 10001 {c6}
Go to END; end10010
ZERO: if A = 0 then; 10011
E:=0; 10100 {c10}
Go to END; 10101
NORMALIZE: if A is normalized then go to END; 10110
UNDERFLOW: if E > Emin then 10111
A:=left-shift(A); 11000 {c11}
E:=E-1; 11001 {c6c8}
Go to NORMALIZED; 11010
ERROR: ERROR:=1; 11011{c11}
END: go to END; 11100 END
CS Meaning
0000 No branching
0001 Branch if E < 0
0010 Branch if E > 0
0011 Branch if A_CONT = 1
0100 Branch if E = Emax
0101 Branch if A = 0
0110 Branch if A is normalized
0111 Branch if E > Emin
1000 Unconditional Branching
MAX ENCODING
MCC = {c0,c1,c2,c3,c4,c5,c6,c7} ∪ {c8,c9,c10,c11,END}
C0 0000
C1 0001
C2 0010
C3 0011
C4 0100
C5 0101
C6 0110
C7 0111
nop 1111
C8 000
C9 001
C10 010
C11 011
END 100
nop 111
Address in CM CS BA or CF
0000000 0000 0000 111
0000001 0000 0001 111
0000010 0000 0010 111
0000011 0000 0011 111
0000100 0000 0100 111
0000101 0001 0000 110
0000110 0000 0101 111
0000111 0000 0110 111
0001000 1000 0000 101
0001001 0010 0001 010
0001010 0000 0111 111
0001011 0000 0110 000
0001100 1000 0000 101
0001101 0000 1111 001
0001110 0011 0001 111
0001111 0100 0010 000
0010000 0000 0101 111
0010001 0000 0110 111
0010010 1000 0011 100
0010011 0101 0010 100
0010100 0000 1111 010
0010101 1000 0011 100
0010110 0110 0011 100
0010111 0111 0011 000
0011000 0000 1111 011
0011001 0000 0110 000
0011010 1000 0010 110
0011011 0000 1111 011
0011100 1000 0011 100
CAND CS = 0000 ATUNCI BA ESTE LA FEL CA SI ADDRESS IN CM,
DACA CS != 000 ATUNCI BA SE SCHIMB, IAR CF RAMANE PE NOP, ADICA 1111
111(NEFIIND NICIUN SEMNAL ACTIV
