aboutsummaryrefslogtreecommitdiffstats
path: root/tests/999-projects/trafficlights_1.awl
blob: 4c545bd82981b990c670af39897a731626ba20b5 (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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
	// Taktgeber
	U	M 0.0
	=	L 0.0

	UN	T 0
	UN	L 0.0
	U	E 0.1		// S1 (ein)
	S	M 0.0
	UN	T 0
	U	L 0.0
	R	M 0.0

	U	E 0.1		// S1 (ein)
	UN	T 0
	L	S5T#1S
	SV	T 0

	// Tag/Nacht Abfrage
	U	E 0.0		// S0 (Nacht)
	SPB	n8

	// Status hochzählen
	U	M 0.0
	ZV	Z 0

	// Status Sprungleiste
spl:	L	Z 0
	SPL	def
	SPA	_0
	SPA	ende
	SPA	ende
	SPA	ende
	SPA	ende
	SPA	ende
	SPA	ende
	SPA	_7
	SPA	ende
	SPA	_9
	SPA	_10
	SPA	ende
	SPA	ende
	SPA	ende
	SPA	_14
	SPA	_15
def:	SPA	zrst

_0:	SET
	R	A 0.0		// Auto Rot
	R	A 0.1		// Auto Gelb
	S	A 0.2		// Auto Gruen
	S	A 1.0		// FG Rot
	R	A 1.1		// FG Gruen
	SPA	ende

_7:	SET
	R	A 0.0		// Auto Rot
	S	A 0.1		// Auto Gelb
	R	A 0.2		// Auto Gruen
	S	A 1.0		// FG Rot
	R	A 1.1		// FG Gruen
	SPA	ende

_9:	SET
	S	A 0.0		// Auto Rot
	R	A 0.1		// Auto Gelb
	R	A 0.2		// Auto Gruen
	S	A 1.0		// FG Rot
	R	A 1.1		// FG Gruen
	SPA	ende

_10:	SET
	S	A 0.0		// Auto Rot
	R	A 0.1		// Auto Gelb
	R	A 0.2		// Auto Gruen
	R	A 1.0		// FG Rot
	S	A 1.1		// FG Gruen
	SPA	ende

_14:	SET
	S	A 0.0		// Auto Rot
	R	A 0.1		// Auto Gelb
	R	A 0.2		// Auto Gruen
	S	A 1.0		// FG Rot
	R	A 1.1		// FG Gruen
	SPA	ende

_15:	SET
	S	A 0.0		// Auto Rot
	S	A 0.1		// Auto Gelb
	R	A 0.2		// Auto Gruen
	S	A 1.0		// FG Rot
	R	A 1.1		// FG Gruen
	SPA	ende

zrst:	SET
	R	Z 0
	SPA	spl

	// Nachtbetrieb
n8:	CLR
	=	A 1.0		// FG Rot
	=	A 1.1		// FG Gruen
	=	A 0.0		// Auto Rot
	=	A 0.2		// Auto Gruen
	U	M 0.0		// Takt
	=	A 0.1		// Auto Gelb
	R	Z 0		// Zaehler ruecksetzen

ende:	BE
bues.ch cgit interface