summaryrefslogtreecommitdiffstats
path: root/Bachelor/Digitaltechnik 2/SS07/P6/abel_samples.zip_FILES/count4b1.abl
blob: 257cd943bf3f3aa82e9fa44123db3b762e764b62 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
MODULE Counter_4_bit

TITLE '0 ... 9, version with equations'

DEClARATIONS
	clk pin 15;  " I/O 0, Eingang f�r den Takt
	rst pin 16;  " I/O 1, Eingang f�r das Reset Signal
	ce  pin 17;  " I/O 2, Eingang f�r das Enable Signal
	q3,q2,q1,q0 pin 29,30,31,32 istype 'reg'; " I/O 12, 13, 14, 15, Ausgang: Bits des Z�hlers, 15: 2^0
	carry pin 44 istype 'reg'; // I/O 23, Ausgang f�r Carry

" bus definition, vector, register
	counter = [q3,q2,q1,q0];

EQUATIONS
	counter.clk = clk;
	counter.ar  = rst;
	carry.clk   = clk;
	when (ce & (counter < 9)) then counter := counter + 1;
	else when (ce & (counter >= 9)) then {counter := 0; carry := 1;}
	else counter := counter;


END