TTFIL cz_loc.ttt
1 $DEF CSD_310=CSD_310(4:|[!C][R])
2
3 #$DEF CSD_354_1B=(CSD_354_1_0+>CSD_354_1_1+>CSD_354_1_2+>CSD_354_1_3+/15[>R])
4 #$DEF CSD_354_1=(CSD_354_1_0+>CSD_354_1_1+>CSD_354_1_2+>CSD_354_1_3+/15[<R])
5
6 $DEF CSD_365_0=CSD_365_0A~CD(4:|[!C][R])
7
8 #$DEF CSD_399_0=8:(CSD_399_0_0+>CSD_399_0_1+>CSD_399_0_2+>CSD_399_0_3+/20[<R])|2:(CSD_399_0_0+>CSD_399_0_1+>CSD_399_0_2+>CSD_399_0_3+/20[>R][BT:1,46,220,12][BT:60,45,80,1])
9
10 $DEF CSD_414_0=CSD_414_0~CD(4:|[!C][R])
11
12 $DEF CSD_423=CSD_423~RSL(4:|[!B])
13
14 $DEF CSD_433=CSD_433_0~VST(4:|[!B])
15
16 $DEF CSD_434_1=CSD_434_1(4:|[!B])
17
18 $DEF CSD_434_2A=CSD_434_2A(4:|[!C][R])
19 $DEF CSD_434_2~CD=CSD_434_2(4:|[!C][R])
20
21 $DEF CSD_456_0=CSD_456_0A(4:|[!C][R])
22
23 $DEF CSD_464_2=CSD_464_2~RSL(4:|[!C][R])
24
25 $DEF CSD_475_1~RSL=CSD_475_1~RSL(4:|[!B])
26 $DEF 475_11=CSD_475_11(4:|[!C][R])
27 $DEF CSD_475_1~CD=CSD_475_1~CD(4:|[!C][R])
28
29 $DEF CSD_477B=CSD_477~RSL
30 $DEF CSD_477=CSD_477~RSL(4:|[!C][R])
31
32 $DEF CSD_486_0=CSD_486_0(4:|[!C][R])
33
34 $DEF CSD_498_0~RSL=CSD_498_0~RSL(4:|[!C][R])
35
36 $DEF CSD_498_1~CD=CSD_498_1~CD(4:|[!C][R])
37 $DEF CSD_498_1~RSL=CSD_498_1~RSL(4:|[!C][R])
38
39 $DEF CSD_524_0=CSD_524_0(4:|[!C][R])
40
41 $DEF CSD_524_1=CSD_524_1(4:|[!C][R])
42
43 $DEF CSD_534_03=CSD_534_03(4:|[!C][R])
44
45 $DEF CSD_556~CD=CSD_556~CD(4:|[!C][R])
46 $DEF 556_RSL=CSD_556~RSL(4:|[!C][R])
47 $DEF CSD_556~RSL=CSD_556~RSL(4:|[!C][R])
48
49 #_Obousmerne parni loko bez koure___________________________________________________________
50
51 $DEF 275_0P=CSD_275_0(4:|[R])[!C]
52
53 $DEF 310P=CSD_310(4:|[R])[!C]
54 $DEF CSD_310P=CSD_310(4:|[R])[!C]
55
56 $DEF 313_0P=CSD_313_0(4:|[R])[!C]
57
58 $DEF CSD_354_1P=CSD_354_1~RSL(4:|[R])
59 $DEF 354_1_21_35P=CSD_354_1_2135(4:|[R])[!C]
60 $DEF 354_1_101_219P=CSD_354_1~AM(4:|[!B])
61
62 $DEF CSD_365_0P=CSD_365_0A~CD(4:|[R])[!C]
63 $DEF 365_0P=CSD_365_0~VST(4:|[R])[!C]
64 $DEF 365_4P=CSD_365_4(4:|[R])[!C]
65 $DEF CSD_399_0P=CSD_399_0~CD(4:|[R])[!C]
66 $DEF 386_0AP=CSD_386_0A(4:|[R])[!C]
67 $DEF 386_0BP=CSD_386_0B(4:|[R])[!C]
68 $DEF 386_0CP=CSD_386_0C(4:|[R])[!C]
69 $DEF 387_0P=CSD_387_0~CD(4:|[R])[!C]
70 $DEF 387_0AMP=CSD_387_0~AM(4:|[R])[!C]
71 $DEF 414_0P=CSD_414_0~CD(4:|[R])[!C]
72 $DEF CSD_414_0P=CSD_414_0~CD(4:|[R])[!C]
73 $DEF 422_0P=CSD_422_0~CD(4:|[R])[!C]
74 $DEF 423_0_31_43P=CSD_423_0~CD(4:|[R])[!C]
75 $DEF 423_0_01_30P=CSD_423_001Y(4:|[R])[!C]
76 $DEF CSD_423P=CSD_423~RSL(4:|[R])[!C]
77 #$DEF CSD_433P=8:(CSD_433_0+>CSD_433_1+>CSD_433_2+>CSD_433_3+/11[<R])|2:(CSD_433_0+>CSD_433_1+>CSD_433_2+>CSD_433_3+/11[>R][MP:24,27,11,5])
78 $DEF 433_0P=CSD_433_0A(4:|[R])[!C]
79 $DEF 434_1P=CSD_434_1(4:|[!B])
80 $DEF CSD_434_1P=CSD_434_1(4:|[!B])
81 $DEF 434_2_V1P=CSD_434_2~CD(4:|[R])[!C]
82 $DEF 434_2_V2P=CSD_434_2B(4:|[!B])[!C]
83 $DEF CSD_434_2~CDP=CSD_434_2~CD(4:|[R])[!C]
84 $DEF CSD_434_2AP=CSD_434_2A(4:|[R])[!C]
85 $DEF CSD_456_0P=CSD_456_0A(4:|[R])[!C]
86 $DEF 456_0P=CSD_456_0(4:|[R])[!C]
87 $DEF 464_0P=CSD_464_0(4:|[R])[!C]
88 $DEF 464_0AP=CSD_464_0(4:|[R])[!C]
89 $DEF 464_2P=CSD_464_2~CD(4:|[R])[!C]
90 $DEF 464_2AP=CSD_464_2~CD(4:|[R])[!C]
91 $DEF CSD_464_2P=CSD_464_2~RSL(4:|[R])[!C]
92 $DEF 475_1P=CSD_475_1~CD(4:|[R])[!C]
93 $DEF CSD_475_1~RSLP=CSD_475_1~RSL(4:|[R])[!C]
94 $DEF 475_11P=CSD_475_11(4:|[R])[!C]
95 $DEF CSD_475_1~CDP=CSD_475_1~CD(4:|[R])[!C]
96 $DEF 475_1142P=CSD_475_1142(4:|[R])[!C]
97 $DEF 476_0P=CSD_476_0B(4:|[R])[!C]
98 $DEF 477_0P=CSD_477_0B~CD(4:|[R])[!C]
99 $DEF 477_0LP=CSD_477_0A~CD(4:|[R])[!C]
100 $DEF 477_0SILP=CSD_477~ZEM(4:|[R])[!C]
101 $DEF CSD_477P=CSD_477~RSL(4:|[R])[!C]
102 $DEF CSD_486_0P=CSD_486_0(4:|[R])[!C]
103 $DEF 486_0P=CSD_486_0(4:|[R])[!C]
104 $DEF CSD_498_0~RSLP=CSD_498_0~RSL(4:|[R])[!C]
105 $DEF 498_0SILP=CSD_498_0B(4:|[R])[!C]
106 $DEF 498_0SIL2P=CSD_498_0A(4:|[R])[!C]
107 $DEF 498_1SILP=CSD_498_1A(4:|[R])[!C]
108 $DEF 498_1P=CSD_498_1~CD(4:|[R])[!C]
109 $DEF CSD_498_1~CDP=CSD_498_1~CD(4:|[R])[!C]
110 $DEF CSD_498_1~RSLP=CSD_498_1~RSL(4:|[R])[!C]
111 $DEF 524_0P=CSD_524_0(4:|[R])[!C]
112 $DEF CSD_524_0P=CSD_524_0(4:|[R])[!C]
113 $DEF 524_1P=CSD_524_1(4:|[R])[!C]
114 $DEF CSD_524_1P=CSD_524_1(4:|[R])[!C]
115 $DEF 534_0P=CSD_534_0(4:|[R])[!C]
116 $DEF 534_03P=CSD_534_03(4:|[R])[!C]
117 $DEF CSD_534_03P=CSD_534_03(4:|[R])[!C]
118 $DEF 556_0P=CSD_556~CD(4:|[R])[!C]
119 $DEF CSD_556~CDP=CSD_556~CD(4:|[R])[!C]
120 $DEF 556_RSLP=CSD_556~RSL(4:|[R])[!C]
121 $DEF CSD_556~RSLP=CSD_556~RSL(4:|[R])[!C]
122 $DEF 636_0P=CSD_636_0(4:|[R])[!C]
123
124 #Staticke lokomotivy
125
126
127 $DEF 275_0S=275_0P
128
129 $DEF 310S=310P
130 $DEF CSD_310S=CSD_310P
131
132 $DEF 313_0S=313_0P
133
134 $DEF CSD_354_1S=CSD_354_1P[!C]
135 $DEF 354_1_21_35S=354_1_21_35P
136 $DEF 354_1_101_219S=354_1_101_219P[!C]
137
138 $DEF CSD_365_0S=CSD_365_0P
139 $DEF 365_0S=365_0P
140 $DEF 365_4S=365_4P
141 $DEF CSD_399_0S=CSD_399_0P
142 $DEF 386_0AS=386_0AP
143 $DEF 386_0BS=386_0BP
144 $DEF 386_0CS=386_0CP
145 $DEF 387_0S=387_0P
146 $DEF 387_0AMS=387_0AMP
147 $DEF 414_0S=414_0P
148 $DEF CSD_414_0S=CSD_414_0P
149 $DEF 422_0S=422_0P
150 $DEF 423_0_31_43S=423_0_31_43P
151 $DEF 423_0_01_30S=423_0_01_30P
152 $DEF CSD_423S=CSD_423P
153 #$DEF CSD_433S=8:(CSD_433_0[<R])|2:(CSD_433_0[>R][MP:24,27,11,5])
154 $DEF 433_0S=433_0P[!C]
155 $DEF 434_1S=434_1P
156 $DEF CSD_434_1S=434_1P
157 $DEF 434_2_V1S=434_2_V1P
158 $DEF 434_2_V2S=434_2_V2P
159 $DEF CSD_434_2~CDS=CSD_434_2~CDP
160 $DEF CSD_434_2AS=CSD_434_2AP
161 $DEF CSD_456_0S=CSD_456_0P
162 $DEF 456_0S=456_0P
163 $DEF 464_0S=464_0P
164 $DEF 464_0AS=464_0AP
165 $DEF 464_2S=464_2P
166 $DEF 464_2AS=464_2AP
167 $DEF CSD_464_2S=CSD_464_2P
168 $DEF 475_1S=475_1P
169 $DEF CSD_475_1~RSLS=CSD_475_1~RSLP
170 $DEF 475_11S=475_11P
171 $DEF CSD_475_1~CDS=CSD_475_1~CDP
172 $DEF 475_1142S=475_1142P
173 $DEF 476_0S=476_0P
174 $DEF 477_0S=477_0P
175 $DEF 477_0LS=477_0LP
176 $DEF 477_0SILS=477_0SILP
177 $DEF CSD_477S=CSD_477P
178 $DEF CSD_486_0S=CSD_486_0P
179 $DEF 486_0S=486_0P
180 $DEF CSD_498_0~RSLS=CSD_498_0~RSLP
181 $DEF 498_0SILS=498_0SILP
182 $DEF 498_0SIL2S=498_0SIL2P
183 $DEF 498_1SILS=498_1SILP
184 $DEF 498_1S=498_1P
185 $DEF CSD_498_1~CDS=CSD_498_1~CDP
186 $DEF CSD_498_1~RSLS=CSD_498_1~RSLP
187 $DEF 524_0S=524_0P
188 $DEF CSD_524_0S=CSD_524_0P
189 $DEF 524_1S=CSD_524_1P
190 $DEF CSD_524_1S=CSD_524_1P
191 $DEF 534_0S=534_0P
192 $DEF 534_03S=534_03P
193 $DEF CSD_534_03S=CSD_534_03P
194 $DEF 556_0S=556_0P
195 $DEF CSD_556~CDS=CSD_556~CDP
196 $DEF 556_RSLS=556_RSLP
197 $DEF CSD_556~RSLS=CSD_556~RSLP
198 $DEF 636_0S=636_0P
199
200
201
202 #----------------
203
204 $DEF 275_0=CSD_275_0(4:|[!C][R])
205 $DEF 310_0=CSD_310(4:|[!C][R])
206 $DEF 313_0=CSD_313_0(4:|[!C][R])
207 $DEF 354_1_21_35=CSD_354_1_2135,(4:|[!B])
208 $DEF 354_1_101_219=CSD_354_1~AM(4:|[!B])
209 $DEF 365_0=CSD_365_0~CD(4:|[!C][R])
210
211 $DEF 386_0A=CSD_386_0A(4:|[!B])
212 $DEF 386_0B=CSD_386_0B(4:|[!B])
213 $DEF 386_0C=CSD_386_0C(4:|[!B])
214 $DEF 387_0=CSD_387_0~AM(4:|[!B])
215 $DEF 387_0AM=CSD_387_0~AM(4:|[!C][R])
216 $DEF 414_0=CSD_414_0~CD(4:|[!C][R])
217 $DEF 422_0=CSD_422_0~CD(4:|[!C][R])
218 $DEF 423_0_31_43=CSD_423_0~CD(4:|[!C][R])
219 $DEF 423_0_01_30=CSD_423_001Y(4:|[!C][R])
220 $DEF 433_0=CSD_433_0A(4:|[!C][R])
221 $DEF 434_1=CSD_434_1(4:|[!B])
222 $DEF 434_2_V1=CSD_434_2~CD(4:|[!B])
223 $DEF 434_2_V2=CSD_434_2B(4:|[!B])
224 $DEF 456_0=CSD_456_0B(4:|[!C][R])
225 $DEF 464_0=CSD_464_0(4:|[!C][R])
226 $DEF 464_0A=CSD_464_0(4:|[!C][R])
227 $DEF 464_2=CSD_464_2~CD(4:|[!C][R])
228 $DEF 464_2A=CSD_464_2~CD(4:|[!C][R])
229 $DEF 475_1=CSD_475_1~CD(4:|[!C][R])
230 $DEF 477_0=CSD_477_0B~CD(4:|[!C][R])
231 $DEF 477_0L=CSD_477_0A~CD(4:|[!C][R])
232 $DEF 486_0=CSD_486_0(4:|[!C][R])
233 $DEF 498_1=CSD_498_1~CD(4:|[!C][R])
234 $DEF 524_0=CSD_524_0(4:|[!C][R])
235 $DEF 524_1=CSD_524_1(4:|[!C][R])
236 $DEF 534_0=CSD_534_0(4:|[!C][R])
237 $DEF 534_03=CSD_534_03(4:|[!C][R])
238 $DEF 556_0=CSD_556_0(4:|[!C][R])
239 $DEF 365_4=CSD_365_4(4:|[!C][R])
240 #1940_1964)
241 $DEF 475_1142=CSD_475_1142(4:|[!C][R])
242 $DEF 476_0=CSD_476_0B(4:|[!C][R])
243 #1950_1971)
244 $DEF 477_0SIL=CSD_477~ZEM(4:|[!C][R])
245 $DEF 498_0SIL=CSD_498_0B(4:|[!C][R])
246 $DEF 498_0SIL2=CSD_498_0A(4:|[!C][R])
247 $DEF 498_1SIL=CSD_498_1A(4:|[!C][R])
248 $DEF 636_0=CSD_636_0(4:|[!C][R])
249
250 $DEF M112_0=CSD_M112_0(4:|[!C][R])
251 $DEF M112_0P=CSD_M112_0(4:|[R])[!C]
252 $DEF M112_0S=M112_0P
253
254 $DEF M273_1=CSD_M273_103(4:|[!C][R])
255 $DEF M273_1P=CSD_M273_103(4:|[R])[!C]
256 $DEF M273_1S=M273_1P
257
258 $DEF 1435BN60=CSD_1435BN60(4:|[R])
259 $DEF 1435BN60S=1435BN60
260
261
262 $DEF CS40=CS40(|[R])
263 $DEF CS40S=CS40(|[R])[!C]
264
265 $DEF 310_0A=CSD_310A(2:|[!B])
266 $DEF 310_0AP=CSD_310A(2:|[!B])[!C]
267 $DEF 310_0AS=310_0AP
268
269 $DEF 310_4=CSD_310_4(2:|[!C][R])
270 $DEF 310_4P=CSD_310_4(2:|[R])[!C]
271 $DEF 310_4S=310_4P
272
273 $DEF 320_0=CSD_320_0A(2:|[!C][R])
274 $DEF 320_0P=CSD_320_0A(2:|[R])[!C]
275 $DEF 320_0S=320_0P
276
277
278 $DEF 324_3=CSD_324_3(4:|[!C][R])
279 $DEF 324_3P=CSD_324_3(4:|[R])[!C]
280 $DEF 324_3S=324_3P
281
282 $DEF 331_0=CSD_331_0(4:|[!C][R])
283 $DEF 331_0P=CSD_331_0(4:|[R])[!C]
284 $DEF 331_0S=331_0P
285
286 $DEF 334_1=CSD_334_1(4:|[!C][R])
287 $DEF 334_1P=CSD_334_1(4:|[R])[!C]
288 $DEF 334_1S=331_0P
289
290
291 $DEF 344_0=CSD_344_0(4:|[!C][R])
292 $DEF 344_0P=CSD_344_0(4:|[R])[!C]
293 $DEF 344_0S=344_0P
294
295 $DEF 353_101=CSD_353_101(4:|[!C][R])
296 $DEF 353_101P=CSD_353_101(4:|[R])[!C]
297 $DEF 353_101S=353_101P
298
299 $DEF 354_066=CSD_354_066(4:|[!C][R])
300 $DEF 354_066P=CSD_354_066(4:|[R])[!C]
301 $DEF 354_066S=354_066P
302
303 $DEF 354_1=CSD_354_1~CD(4:|[!C][R])
304 $DEF 354_1P=CSD_354_1~CD(4:|[R])[!C]
305 $DEF 354_1S=354_1P
306
307 $DEF 354_1L=CSD_354_1B
308 #|2:(354_1L_0+<354_1L_1+<354_1L_2+<354_1L_3+/15[<R][BT:0,47,132,11])
309 $DEF 354_1LP=CSD_354_1B(4:|[R])[!C]
310 $DEF 354_1LS=354_1LP
311
312 $DEF 354_1_101_219A=CSD_354_1~AM(4:|[R])
313 $DEF 354_1_101_219AP=354_1_101_219A
314 $DEF 354_1_101_219AS=CSD_354_1~AM(|[R])[!C]
315
316 $DEF 354_1226=CSD_354_1226(4:|[!C][R])
317 $DEF 354_1226P=CSD_354_1226(4:|[R])[!C]
318 $DEF 354_1226S=354_1226P
319
320 $DEF 354_9=CSD_354_9(4:|[!C][R])
321 $DEF 354_9P=CSD_354_9(4:|[R])[!C]
322 $DEF 354_9S=354_9P
323
324 $DEF 365_0A=CSD_365_0~CD(4:|[!C][R])
325 $DEF 365_0AP=CSD_365_0~CD(4:|[R])[!C]
326 $DEF 365_0AS=365_0AP
327
328 $DEF 365_0B=CSD_365_0~CD(4:|[!C][R])
329 $DEF 365_0BP=CSD_365_0~CD(4:|[R])[!C]
330 $DEF 365_0BS=365_0BP
331
332 $DEF 399_0=CSD_399_0~VST(4:|[!C][R])
333 $DEF 399_0P=CSD_399_0~VST(4:|[R])[!C]
334 $DEF 399_0S=399_0P
335
336 $DEF 403_5=CSD_403_5(4:|[!C][R])
337 $DEF 403_5P=CSD_403_5(4:|[R])[!C]
338 $DEF 403_5S=403_5P
339
340 $DEF 404_0=CSD_403_5(4:|[!C][R])
341 $DEF 404_0P=CSD_403_5(4:|[R])[!C]
342 $DEF 404_0S=404_0P
343
344 $DEF 414_2=CSD_414_2(4:|[!C][R])
345 $DEF 414_2P=CSD_414_2(4:|[R])[!C]
346 $DEF 414_2S=414_2P
347
348 $DEF 423_001=CSD_423_001(|[!C][R])
349 $DEF 423_001P=CSD_423_001(|[R])[!C]
350 $DEF 423_001S=423_001P
351
352 $DEF 423_100=CSD_423_100(|[!C][R])
353 $DEF 423_100P=CSD_423_100(|[R])[!C]
354 $DEF 423_100S=423_100P
355
356 $DEF 423_140=CSD_423_140(|[!C][R])
357 $DEF 423_140P=CSD_423_140(|[R])[!C]
358 $DEF 423_140S=423_140P
359
360 $DEF 431_026=CSD_431_026(4:|[!C][R])
361 $DEF 431_026P=CSD_431_026(4:|[R])[!C]
362 $DEF 431_026S=431_026P
363
364 $DEF 433_0A=CSD_433_0~VST(4:|[!B])
365 $DEF 433_0AP=CSD_433_0~VST(4:|[!B])
366 $DEF 433_0AS=433_0AP
367
368 $DEF 456_0A=CSD_456_0(4:|[!C][R])
369 $DEF 456_0AP=CSD_456_0(4:|[R])[!C]
370 $DEF 456_0AS=456_0AP
371
372 $DEF 475_1A=CSD_475_1~CD(4:|[!C][R])
373 $DEF 475_1AP=CSD_475_1~CD(4:|[R])[!C]
374 $DEF 475_1AS=475_1AP
375
376 $DEF 476_0A=CSD_476_0~ZEM(4:|[!C][R])
377 $DEF 476_0AP=CSD_476_0~ZEM(4:|[R])[!C]
378 $DEF 476_0AS=476_0AP
379
380 $DEF 498_1A=CSD_498_1~CD(4:|[!C][R])
381 $DEF 498_1AP=CSD_498_1~CD(4:|[R])[!C]
382 $DEF 498_1AS=498_1AP
383
384 $DEF 524_0A=CSD_524_0A(4:|[!C][R])
385 $DEF 524_0AP=CSD_524_0A(4:|[R])[!C]
386 $DEF 524_0AS=524_0AP
387
388 $DEF 524_1301=CSD_524_1301(4:|[!C][R])
389 $DEF 524_1301P=CSD_524_1301(4:|[R])[!C]
390 $DEF 524_1301S=524_1301P
391
392 $DEF 524_130=CSD_524_1130(4:|[!C][R])
393 $DEF 524_130P=CSD_524_1130(4:|[R])[!C]
394 $DEF 524_130S=524_130P
395
396 $DEF 534_1=CSD_534_1(4:|[!C][R])
397 $DEF 534_1P=CSD_534_1(4:|[R])[!C]
398 $DEF 534_1S=534_1P
399
400 $DEF T426_0=CSD_T426_0(|[R])
401 $DEF T426_0S=T426_0
402
403 $DEF T211posun=CSD_T211_0
404
405 $DEF 353_1=353_101
406 $DEF 354_0=354_066
407 $DEF 431_0=431_026
408
409 $DEF T426_0=2:T426_0|1:(2*T426_0)
410
411
412 $DEF 353_1P=353_101P
413 $DEF 354_0P=354_066P
414 $DEF 431_0P=431_026P
415 $DEF 353_1S=353_101S
416 $DEF 354_0S=354_066S
417 $DEF 431_0S=431_026S
418
419 #Spolecne definice pro JR________________________________________________________________
420
421 $DEF 310_0=310_0|310_0A
422 $DEF 354_1=354_1|354_1_21_35|354_1_101_219A|354_1226
423 $DEF 365_0=365_0A
424 $DEF 386_0=386_0C
425 #$DEF 386_0=386_0A|386_0B|386_0C verze A jen do roku 1940, B do roku 1945
426 #|387_0AM
427 $DEF 423_0=423_001|423_100|423_140
428 #$DEF 423_0=423_0_01_30|423_0_31_43
429 $DEF 433_0=433_0A
430 $DEF 434_1=434_1|CSD_434_1
431 $DEF 434_2=434_2_V1|CSD_434_2~CD
432 $DEF 456_0=456_0|456_0A
433 #$DEF 456_0=456_0|CSD_456_0
434 $DEF 464_0=464_0A
435 $DEF 464_2=464_2|464_2A
436 $DEF 475_1=8:475_1A|2:475_1142
437 $DEF 476_0=476_0A
438 $DEF 477_0=477_0|477_0L
439 #|CSD_477|477_0SIL
440 $DEF 486_0=CSD_486_0|486_0
441 $DEF 498_0=CSD_498_0~RSL|498_0SIL|498_0SIL2
442 $DEF 498_1=498_1A|498_1
443 #|CSD_498_1~CDP|CSD_498_1~RSL|498_1SIL
444 $DEF 524_0=524_0A|524_0|CSD_524_0
445 $DEF 524_1=524_1|524_1301|524_130
446 $DEF 534_03=534_03|CSD_534_03
447 #|556_RSL
448
449 $DEF 310_0P=310P|310_0AP
450 $DEF 354_1P=354_1P|354_1_21_35P|354_1_101_219AP|354_1226P
451 $DEF 365_0P=365_0AP
452 $DEF 386_0P=386_0CP
453 #$DEF 386_0P=386_0AP|386_0BP|386_0CP verze A jen do roku 1942, B do roku 1945
454 #|387_0AMP
455 $DEF 423_0P=423_001P|423_100P|423_140P
456 #$DEF 423_0P=423_0_01_30P|423_0_31_43P
457 $DEF 433_0P=433_0AP
458 $DEF 434_1P=434_1P|CSD_434_1P
459 $DEF 434_2P=434_2_V1P|CSD_434_2~CDP
460 $DEF 456_0P=456_0P|456_0AP
461 #$DEF 456_0P=456_0P|CSD_456_0P
462 $DEF 464_0P=464_0AP
463 $DEF 464_2P=464_2P|464_2AP
464 $DEF 475_1P=6:475_1AP|2:475_1142P
465 $DEF 476_0P=476_0AP
466 $DEF 477_0P=477_0P|477_0LP
467 #|CSD_477P|477_0SILP
468 $DEF 486_0P=CSD_486_0P|486_0P
469 $DEF 498_0P=CSD_498_0~RSLP|498_0SILP|498_0SIL2P
470 $DEF 498_1P=498_1AP|498_1P
471 #|CSD_498_1~CDP|CSD_498_1~RSLP|498_1SILP
472 $DEF 524_0P=524_0AP|524_0P|CSD_524_0P
473 $DEF 524_1P=524_1P|524_1301P|524_130P
474 $DEF 534_03P=534_03P|CSD_534_03P
475 #|556_RSLP
476
477 $DEF 310_0S=310S|310_0AS
478 $DEF 354_1S=354_1S|354_1_21_35S|354_1_101_219AS|354_1226S
479 $DEF 365_0S=365_0AS
480 $DEF 386_0S=386_0CS
481 #$DEF 386_0S=386_0AS|386_0BS|386_0CS verze A jen do roku 1942, B do roku 1945
482 #|387_0AMS
483 $DEF 423_0S=423_001S|423_100S|423_140S
484 #$DEF 423_0S=423_0_01_30S|423_0_31_43S
485 $DEF 433_0S=433_0AS
486 $DEF 434_1S=434_1S|CSD_434_1S
487 $DEF 434_2S=434_2_V1S|CSD_434_2~CDS
488 $DEF 456_0S=456_0S|456_0AS
489 #$DEF 456_0S=456_0S|CSD_456_0S
490 $DEF 464_0S=464_0AS
491 $DEF 464_2S=464_2S|464_2AS
492 $DEF 475_1S=6:475_1AS|2:475_1142S
493 $DEF 476_0S=476_0AS
494 $DEF 477_0S=477_0S|477_0LS
495 #|CSD_477S|477_0SILS
496 $DEF 486_0S=CSD_486_0S|486_0S
497 $DEF 498_0S=CSD_498_0~RSLS|498_0SILS|498_0SIL2S
498 $DEF 498_1S=498_1AS|498_1S
499 #|CSD_498_1~CDS|CSD_498_1~RSLS|498_1SILS
500 $DEF 524_0S=524_0AS|524_0S|CSD_524_0S
501 $DEF 524_1S=524_1S|524_1301S|524_130S
502 $DEF 534_03S=534_03S|CSD_534_03S
503 #|556_RSLS
504
505 #Dreziny--------------------------
506
507 #$DEF M_HAJT=M_HAJT_0+>M_HAJT_1+>M_HAJT_0+>M_HAJT_3+/5[<R][#V:1-2]
508 #$DEF M_HAJT2=M_HAJT2_0+>M_HAJT2_1+>M_HAJT2_2+>M_HAJT2_3+/5[<R][#V:2]
509 #$DEF M_HAJT3=M_HAJT2_0+>M_HAJT2_1+>M_HAJT2_2+>M_HAJT2_3+/5[<R][C:#00FF00,#FFC000][C:#00C000,#FFA000][#V:2]
510 #$DEF SA=SA
511 $DEF KLTK=SA
512
513
514 #Elektricke lokomotivy ------------------
515
516
517 $DEF E423_0_V1=CSD_E423_0(|L)
518 $DEF E423_0_V1S=E423_0_V1
519 #<E423_0_P_SAR
520 #<E423_0_L_SAR
521
522 $DEF E424_0_V1=CSD_E424_0
523 #<E424_0_SAR
524 $DEF E424_0_V1S=E424_0_V1
525
526 $DEF E436_0_V1=CSD_E436_0
527 $DEF E436_0_V1S=E436_0_V1
528
529 $DEF E465_0_V1=CSD_E465_0
530 $DEF E465_0_V1S=CSD_E465_0
531
532 $DEF E467_0_V1=CSD_E467_0
533 $DEF E467_0_V1S=E467_0
534
535 $DEF E666_0_V1=CSD_E666_0(|[M])
536 $DEF E666_0_V1S=E666_0_V1
537
538 #E469.1 -------------------------
539
540 $DEF E469_1_V1=CSD_E469_1
541 $DEF E469_1_V1S=E469_1_V1
542 $DEF E469_1_V2=CSD_E469_2A
543 $DEF E469_1_V2S=E469_1_V2
544
545 #E469.2 -----------------------
546
547 $DEF E469_2_V1=CSD_E469_2A
548 $DEF E469_2_V2=CSD_E469_2B
549 $DEF E469_2_V3=CSD_E469_2A
550 $DEF E469_2_V3S=CSD_E469_2A
551 $DEF E469_2_V4=CSD_E469_2B
552 $DEF E469_2_V4S=CSD_E469_2B
553
554 #E479.0/CD130 ----------------------
555
556 $DEF E479_0_V1=9:CD_130[<R]|1:CD_130[>R]
557 $DEF E479_0_V2=CSD_E479_0|CSD_E479_0[M]
558
559 #E479.1 --------------------------
560
561 $DEF E479_1_062_061=(<CSD_131_062,CSD_131_061)
562 $DEF E479_1_062_061S=E479_1_062_061
563 $DEF E479_1_017_018=(<CSD_E479_1017,CSD_E479_1018)
564 $DEF E479_1_017_018S=E479_1_017_018
565
566 #E499.0/CD140 ---------------------------
567 $DEF E499_0_V1=CSD_E499_0A|CSD_E499_0B
568 $DEF E499_0_V1S=E499_0_V1
569 $DEF E499_0_V2=CSD_E499_0C
570 #stare |CD_140<CD_140_SAR
571 #$DEF E499_0_V3=CSD_E499_0<CSD_E499_0_0_SAR+CSD_E499_0_1+/6|CSD_E499_0<CSD_E499_0_0_SAR+CSD_E499_0_1+/6[M]
572 $DEF E499_0_V3=CSD_E499_0
573 $DEF E499_0_V3S=E499_0_V3
574 $DEF E499_0_V4=CSD_E499_0D
575 $DEF E499_0_V4S=E499_0_V4
576
577 #E499.1/CD141 -----------------------
578 #$DEF E499_1_V1=CSD_E499_1
579 $DEF E499_1_V2=CSD_E499_1
580 $DEF E499_1_V2S=E499_1_V2
581
582 #E499.2/CD150, 151 -----------------------
583
584 $DEF E499_2_V1=CD_150C~JV
585 $DEF E499_2_V2=CD_150AL~JV|CD_150A~JV
586 $DEF E499_2_V3=CD_150C~JV
587
588 $DEF CSD150_002=CSD_150_002
589 $DEF CSD150_011=CSD_150_011
590 $DEF CSD150_024=CSD_150_024
591 $DEF E499_2_017=CSD_E_499_2017
592 $DEF E499_2_019=CSD_E_499_2019
593 $DEF E499_2_022=CSD_E_499_2022
594
595 $DEF CSD150_002S=CSD_150_002
596 $DEF CSD150_011S=CSD_150_011
597 $DEF CSD150_024S=CSD_150_024
598 $DEF E499_2_017S=CSD_E_499_2017
599 $DEF E499_2_019S=CSD_E_499_2019
600 $DEF E499_2_022S=CSD_E_499_2022
601
602 $DEF E499_2_001CEZ_V1=CD_151001_CEZ~CD
603 $DEF E499_2_001CEZ_V2=CD_151001_CEZ1
604 $DEF E499_2_001CEZ_V3=CD_151001_CEZ~IB
605
606 $DEF CD150_001=CD_150_001
607 $DEF CD150_003=CD_150_003
608 $DEF CD150_012=CD_150_012
609 $DEF CD151_014=CD_151_014
610 $DEF CD151_016=CD_151_016
611 $DEF CD151_020=CD_151_020
612 $DEF CD151_027=CD_151_027
613
614 $DEF E499_2_001CEZ_V1S=CD_151001_CEZ~CD
615 $DEF E499_2_001CEZ_V2S=CD_151001_CEZ1
616 $DEF E499_2_001CEZ_V3S=CD_151001_CEZ~IB
617 $DEF CD150_001S=CD_150_001
618 $DEF CD150_003S=CD_150_003
619 $DEF CD150_012S=CD_150_012
620 $DEF CD151_014S=CD_151_014
621 $DEF CD151_016S=CD_151_016
622 $DEF CD151_020S=CD_151_020
623 $DEF CD151_027S=CD_151_027
624
625
626 #E499.3/CD163 ------------------------
627
628 $DEF CSD163_002=CSD_163_002
629 $DEF CSD163_018=CSD_163_018
630 $DEF E499_3_040=CSD_E499_3040
631
632 $DEF CSD163_002S=CSD_163_002
633 $DEF CSD163_018S=CSD_163_018
634 $DEF E499_3_040S=CSD_E499_3040
635
636 $DEF CD_163R=CD_163
637 $DEF CD163_005=CD_163_005
638 $DEF CD163_011=CD_163_011
639 $DEF CD163_021=CD_163_021
640
641 $DEF CD163_005S=CD_163_005
642 $DEF CD163_011S=CD_163_011
643 $DEF CD163_021S=CD_163_021
644
645 $DEF E499_3_V1=CD_163L|CD_163R
646 $DEF E499_3_V2=ZSR_162
647
648 #CD162------------------------
649
650 $DEF CD162_039=CD_162_039
651 $DEF CD162_052=CD_162_052
652 $DEF CD162_039S=CD_162_039
653 $DEF CD162_052S=CD_162_052
654
655 #CD169 ----------------------
656 $DEF CD169_V1=SKODA_85E0ATM|CSD_169_001
657 $DEF CD169_V1S=CD169_V1
658
659
660 #E669.1,2,3/CD180,181,182,183 ------------------------
661 $DEF E669_1_V1=CSD_E669_1
662 $DEF E669_1_V1S=E669_1_V1
663 $DEF E669_1_V2=CSD_E669_1
664 $DEF E669_1_V2S=CSD_E669_1
665 $DEF E669_1_V3=CSD_181
666 $DEF E669_1_V4=CD_181
667 #$DEF E669_3_V1=[C:#000000,#000000]
668 $DEF E669_1_OKD=OKD_E669_1
669
670 $DEF E669_3_V1=CSD_E669_3
671 $DEF E669_3_V1S=E669_3_V1
672 $DEF E669_3_V2=CSD_E669_3G
673 $DEF E669_3_V2S=E669_3_V2
674
675
676 #S479.0 ------------------
677
678 $DEF S479_0_V1=CSD_S479_0
679
680 #S489.0,1,S499.0/CD230 A 240 ------------------------
681
682 $DEF S489_0_V1=CSD_S489_0
683 $DEF S489_0_V1S=CSD_S489_0
684
685 $DEF S499_0_V1=CSD_S499_0R|CSD_S499_0A
686 $DEF S499_0_V1S=S499_0_V1
687 $DEF S499_0_V2=CSD_S499_0R
688 $DEF S499_0_V2S=S499_0_V2
689
690 #S499.02/CD242 -----------------------
691
692 $DEF S499_02_V1=8:CD_242[<R]|2:CD_242[>R]
693 $DEF S499_02_224=CD_242_224
694 $DEF S499_02_248=CD_242_248
695 $DEF S499_02_272=CD_242_272
696 $DEF S499_02_278=CD_242_278
697 $DEF S499_02_100=CD_242A
698 $DEF S499_02_202=CSD_242_202
699
700 $DEF S499_02_224S=CD_242_224
701 $DEF S499_02_248S=CD_242_248
702 $DEF S499_02_272S=CD_242_272
703 $DEF S499_02_278S=CD_242_278
704 $DEF S499_02_100S=CD_242A
705 $DEF S499_02_202S=CSD_242_202
706
707 #S499.2/CD263 ------------------------
708
709 $DEF CSD263_004=CSD_263_004
710 $DEF CSD263_004L=ZSR_263_010
711 $DEF S499_2_001=CSD_S499_2001
712
713 $DEF CSD263_004S=CSD_263_004
714 $DEF CSD263_004LS=ZSR_263_010
715 $DEF S499_2_001S=CSD_S499_2001
716
717 $DEF S499_2_V1=ZSR_362
718 $DEF S499_2_V2=ZSR363B
719 $DEF S499_2_V3=ZSR263
720 $DEF CD263_001=CD_263_001
721 $DEF CD263_001S=CD_263_001
722 $DEF CD263_001L=ZSR_263_010
723 $DEF CD263_001LS=ZSR_263_010
724
725 #S699.0 -------------------
726
727 $DEF S699_0_V1=CSD_S699_0
728 $DEF S699_0_V1S=CSD_S699_0
729
730 #ES499.0/CD350 -----------------------
731
732 $DEF ES499_0001=CSD_ES_499_0001
733 $DEF ES499_0001GR=CSD_ES_499_0001E
734 $DEF CSD350_001_4GR=CSD_350_001E
735 $DEF CSD350_001_4=CSD_350_001
736 $DEF ES499_0002=CSD_ES_499_0002
737 $DEF ES499_0003=CSD_ES_499_0003
738 $DEF ES499_0006=CSD_ES_499_0006
739 $DEF CSD350_009_7=CSD_350_009
740 $DEF ES499_0010=CSD_ES_499_0010
741 $DEF ES499_0012=CSD_ES_499_0012
742 $DEF ES499_0016=CSD_ES_499_0016
743
744 $DEF ES499_0001S=ES499_0001
745 $DEF ES499_0001GRS=ES499_0001GR
746 $DEF CSD350_001_4GRS=CSD350_001_4GR
747 $DEF CSD350_001_4S=CSD350_001_4
748 $DEF ES499_0002S=ES499_0002
749 $DEF ES499_0003S=ES499_0003
750 $DEF ES499_0006S=ES499_0006
751 $DEF CSD350_009_7S=CSD350_009_7
752 $DEF ES499_0010S=ES499_0010
753 $DEF ES499_0012S=ES499_0012
754 $DEF ES499_0016S=ES499_0016
755
756
757
758 $DEF ES499_0_V1=ZSR350B2~CD
759 $DEF ES499_0_V2=ZSR350B2~ZS
760 $DEF ES499_0_V3=ZSR350B1
761 $DEF ES499_0_V4=ZSR350A1
762 $DEF ES499_0_V5=ZSR350A2
763 $DEF ES499_0_V6=CD_150B
764 $DEF ES499_0_V7=ZSR350C1
765 $DEF ES499_0_V8=ZSR350D1
766 $DEF ES499_0_V9=ZSR350E1
767 $DEF ES499_0_V10=ZSR_350_001
768 $DEF ES499_0_V11=ZSR_350_004
769 $DEF ZSR350_001BL=ZSR_350_001B
770 $DEF ZSR350_001=ZSR_350_001
771 $DEF ZSR350_001R=ZSR_350_001R
772 $DEF ZSR350_002R=ZSR_350_002
773 $DEF ZSR350_004R=ZSR_350_004
774 $DEF ZSR350_008=ZSR_350_008
775 $DEF ZSR350_011=ZSR_350_011
776 $DEF ZSR350_013=ZSR_350_013
777 $DEF ZSR350_014R=ZSR_350_014
778 $DEF ZSR350_018=ZSR_350_018
779 $DEF ZSR350_019=ZSR_350_019
780
781 $DEF ZSR350_001BLS=ZSR_350_001B
782 $DEF ZSR350_001S=ZSR_350_001
783 $DEF ZSR350_001RS=ZSR_350_001R
784 $DEF ZSR350_002RS=ZSR_350_002
785 $DEF ZSR350_004RS=ZSR_350_004
786 $DEF ZSR350_008S=ZSR_350_008
787 $DEF ZSR350_011S=ZSR_350_011
788 $DEF ZSR350_013S=ZSR_350_013
789 $DEF ZSR350_014RS=ZSR_350_014
790 $DEF ZSR350_018S=ZSR_350_018
791 $DEF ZSR350_019S=ZSR_350_019
792
793 #CD363/ES499-1 ------------
794
795 $DEF CSD363_002=CSD_363_002
796 $DEF CSD363_011=CSD_363_011
797 $DEF CSD363_047=CSD_363_047
798 $DEF CSD363_060=CSD_363_060
799 $DEF CSD363_088=CSD_363_088
800 $DEF CSD363_170=CSD_363_170
801 $DEF ES499_1_001=CSD_ES499_1001
802 $DEF ES499_1_002=CSD_ES499_1002
803 $DEF ES499_1_012=CSD_ES499_1012
804
805 $DEF CSD363_002S=CSD_363_002
806 $DEF CSD363_011S=CSD_363_011
807 $DEF CSD363_047S=CSD_363_047
808 $DEF CSD363_060S=CSD_363_060
809 $DEF CSD363_088S=CSD_363_088
810 $DEF CSD363_170S=CSD_363_170
811 $DEF ES499_1_001S=CSD_ES499_1001
812 $DEF ES499_1_002S=CSD_ES499_1002
813 $DEF ES499_1_012S=CSD_ES499_1012
814
815
816 $DEF ES499_1_V1=ZSR_363~ZS
817 $DEF ES499_1_V2=ZSR_363~CD
818 $DEF ES499_1_V3=ZSR363_1
819 $DEF CD_363R=CD_363
820 $DEF ES499_1_V4=CD_363L|CD_363R
821 $DEF CD362_122=CD_362_122
822 $DEF CD362_164=CD_362_164
823 $DEF CD363_001=CD_363_001
824 $DEF CD363_009=CD_363_009
825 $DEF CD363_023=CD_363_023
826 $DEF CD363_025=CD_363_025
827 $DEF CD363_037=CD_363_037
828 $DEF CD363_073=CD_363_073
829 $DEF CD363_087=CD_363_087
830 $DEF CD363_160=CD_363_160
831 $DEF CD363_162=CD_363_162
832
833
834 $DEF CD362_122S=CD_362_122
835 $DEF CD362_164S=CD_362_164
836 $DEF CD363_001S=CD_363_001
837 $DEF CD363_009S=CD_363_009
838 $DEF CD363_023S=CD_363_023
839 $DEF CD363_025S=CD_363_025
840 $DEF CD363_037S=CD_363_037
841 $DEF CD363_073S=CD_363_073
842 $DEF CD363_087S=CD_363_087
843 $DEF CD363_160S=CD_363_160
844 $DEF CD363_162S=CD_363_162
845
846 #CD372/ES499-2 ----------------
847
848 $DEF ES499_2_001=CSD_372_001
849 $DEF ES499_2_005=CSD_372_005
850 $DEF ES499_2_011=CSD_372_011
851
852 $DEF ES499_2_001S=CSD_372_001
853 $DEF ES499_2_005S=CSD_372_005
854 $DEF ES499_2_011S=CSD_372_011
855
856 $DEF ES499_2_V1=ZSR_362
857 $DEF ES499_2_V2=ZSR363B
858
859 $DEF CD372_008=CD_372_008
860 $DEF CD372_013=CD_372_013
861
862 $DEF CD372_008S=CD_372_008
863 $DEF CD372_013S=CD_372_013
864
865 #CD371 ------------------------
866
867 $DEF CD371_V1=ZSR263
868
869 $DEF CD371_002=CD_371_002(|L)
870 $DEF CD371_003=CD_371_003(|L)
871
872 $DEF CD371_002S=CD_371_002_7(|L)
873 $DEF CD371_003S=CD_371_003_5(|L)
874
875 $DEF CD371_004=CD_371_004(|L)
876
877 # EM475.1 a 2 --------------------
878
879 $DEF CD_EM475_1=<CD_EM475_1E[!L],2*CD_EM475_1M,CD_EM475_1E
880 $DEF CD_EM475_1O=<CD_EM475_1OE[!L],2*CD_EM475_1OM,CD_EM475_1OE
881 $DEF CD_EM475_1ST=<CD_EM475_1STE[!L],2*CD_EM475_1STM,CD_EM475_1STE
882
883 $DEF EM475_1_V1=<CSD_EM475_1E[!L],1-3*CSD_EM475_1M,CSD_EM475_1E
884 $DEF EM475_1_V1S=EM475_1_V1
885
886 $DEF EM475_1D_V1=CD_EM475_1
887 $DEF EM475_1D_V1S=CD_EM475_1
888 $DEF EM475_1D_V2=CD_EM475_1O
889 $DEF EM475_1D_V2S=CD_EM475_1O
890 $DEF EM475_1A=CD_EM475_1ST
891 $DEF EM475_2D_V1=<CD_452E[!L],2*CD_452M,CD_452E
892
893 # EM488.0 ---------------------------
894 $DEF EM488_0_V1=<CSD_EM488_0L~CD,3*CSD_EM488_0B1~CD,CSD_EM488_0~CD
895 $DEF EM488_0_V2=<CSD_EM488_0BL,3*CSD_EM488_0BB1,CSD_EM488_0B
896 $DEF EM488_0_V3=<(1:[PDU]|2:[POU]|7:[PIU])CSD_EM488_0L~JV,3*(CSD_EM488_0B1~JV|CSD_EM488_0B2~JV),CSD_EM488_0~JV
897
898 $DEF EM488_0_V3S=EM488_0_V3
899 $DEF EM488_0_V4=<CSD_EM488_0L~CD,3*CSD_EM488_0B1~CD,CSD_EM488_0~CD
900 $DEF EM488_0_V5=<CSD_EM488_0BL,3*CSD_EM488_0BB1,CSD_EM488_0B
901 $DEF EM488_0_010=<[PIU]CD_460_010AL,3*CD_460_010B,CD_460_010A
902 $DEF EM488_0_015=<[PIU]CD_460_015AL,3*CD_460_015B,CD_460_015A
903 $DEF EM488_0_023=<CD_460_023AL,3*CD_460_023B,CD_460_023A
904 $DEF EM488_0_070=<[PIU]CD_460_070AL,3*CD_460_070B,CD_460_070A
905
906 # CD471 ----------------------------
907
908 $DEF CD471_V1=<1-2*((CD_471L~CD,|CD_071~CD,CD_971~CD)|(CD_971L~CD,|CD_071~CD,CD_471~CD))
909
910 # SM488.0 ---------------------------
911
912 $DEF SM488_0_V3=<(1:[PDU]|2:[POU]|7:[PIU])CSD_SM488_0L~JV,3*(CSD_SM488_0B1~JV|CSD_SM488_0B2~JV),CSD_SM488_0~JV
913 $DEF SM488_0_V3S=SM488_0_V3
914 $DEF SM488_0_V4=<[PIU]SM488_0L~CD,3*SM488_0B1~CD,SM488_0~CD
915 $DEF SM488_0_V5=<[PIU]SM488_0BL,3*SM488_0BB1,SM488_0B
916
917 # CD680 ----------------------------
918
919
920
921
922
923
924
925
926
927 #_____Start Copyright Kubze 1/2003 853_053 ______________
928
929
930
931 # Nadefinovani rady 852/853 + pripojnych vozu
932 # Rozdeleno na dva typy: 1. s oteviranim dveri, 2. bez otevirani
933
934 #___________________________________________________________________________
935 # Oteviraci dvere k 852/853
936
937 #___________________________________________________________________________
938
939 # Definice dveri _ do Vlaky xx ...S
940
941
942
943 # M 296.1 1969
944 #$DEF CSD_852aa_d1=M296_1_1969A[A:DOOR,DOOR_852_1A,93,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_1B,212,11,10,21,0,0,13,9,10,0]
945 #$DEF CSD_852aa_d2=M296_1_1969A[A:DOOR,DOOR_852_1A,93,11,10,21,0,0,13,9,10,0]
946 #$DEF CSD_852aa_d3=M296_1_1969A[A:DOOR,DOOR_852_1B,212,11,10,21,0,0,13,9,10,0]
947 #$DEF CSD_852aa_d=CSD_852aa_d1|CSD_852aa_d2|CSD_852aa_d3
948
949 #$DEF CSD_852ab_d1=M296_1_1969B[A:DOOR,DOOR_852_1A,23,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_1B,142,11,10,21,0,0,13,9,10,0]
950 #$DEF CSD_852ab_d2=M296_1_1969B[A:DOOR,DOOR_852_1A,23,11,10,21,0,0,13,9,10,0]
951 #$DEF CSD_852ab_d3=M296_1_1969B[A:DOOR,DOOR_852_1B,142,11,10,21,0,0,13,9,10,0]
952 #$DEF CSD_852ab_d=CSD_852ab_d1|CSD_852ab_d2|CSD_852ab_d3
953
954 $DEF CSD_852a=CSD_M296_69(|BL)
955
956
957 # M 296.1011 1969
958 #$DEF CSD_852ba_d1=M296_1011_1969A[A:DOOR,DOOR_852_2A,93,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_2B,212,11,10,21,0,0,5,9,10,0]
959 #$DEF CSD_852ba_d2=M296_1011_1969A[A:DOOR,DOOR_852_2A,93,11,10,21,0,0,13,9,10,0]
960 #$DEF CSD_852ba_d3=M296_1011_1969A[A:DOOR,DOOR_852_2B,212,11,10,21,0,0,13,9,10,0]
961 #$DEF CSD_852ba_d=CSD_852ba_d1|CSD_852ba_d2|CSD_852ba_d3
962
963 #$DEF CSD_852bb_d1=M296_1011_1969B[A:DOOR,DOOR_852_2A,23,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_2B,142,11,10,21,0,0,5,9,10,0]
964 #$DEF CSD_852bb_d2=M296_1011_1969B[A:DOOR,DOOR_852_2A,23,11,10,21,0,0,13,9,10,0]
965 #$DEF CSD_852bb_d3=M296_1011_1969B[A:DOOR,DOOR_852_2B,142,11,10,21,0,0,13,9,10,0]
966 #$DEF CSD_852bb_d=CSD_852bb_d1|CSD_852bb_d2|CSD_852bb_d3
967
968 $DEF CSD_852b=CSD_M296_1011_69(|L)
969
970
971 # M 296.1 1977
972 #$DEF CSD_852ca_d1=M296_1_1977A[A:DOOR,DOOR_852_3A,93,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_3B,212,11,10,21,0,0,5,9,10,0]
973 #$DEF CSD_852ca_d2=M296_1_1977A[A:DOOR,DOOR_852_3A,93,11,10,21,0,0,13,9,10,0]
974 #$DEF CSD_852ca_d3=M296_1_1977A[A:DOOR,DOOR_852_3B,212,11,10,21,0,0,13,9,10,0]
975 #$DEF CSD_852ca_d=CSD_852ca_d1|CSD_852ca_d2|CSD_852ca_d3
976
977 #$DEF CSD_852cb_d1=M296_1_1977B[A:DOOR,DOOR_852_3A,23,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_3B,142,11,10,21,0,0,5,9,10,0]
978 #$DEF CSD_852cb_d2=M296_1_1977B[A:DOOR,DOOR_852_3A,23,11,10,21,0,0,13,9,10,0]
979 #$DEF CSD_852cb_d3=M296_1_1977B[A:DOOR,DOOR_852_3B,142,11,10,21,0,0,13,9,10,0]
980 #$DEF CSD_852cb_d=CSD_852cb_d1|CSD_852cb_d2|CSD_852cb_d3
981
982 $DEF CSD_852c=CSD_M296_77(|L)
983
984
985 # M 296.1 1982 A,B
986 #$DEF CSD_852da_d1=M296_1_1982A[A:DOOR,DOOR_852_3A,93,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_3B,212,11,10,21,0,0,5,9,10,0]
987 #$DEF CSD_852da_d2=M296_1_1982A[A:DOOR,DOOR_852_3A,93,11,10,21,0,0,13,9,10,0]
988 #$DEF CSD_852da_d3=M296_1_1982A[A:DOOR,DOOR_852_3B,212,11,10,21,0,0,13,9,10,0]
989 #$DEF CSD_852da_d=CSD_852da_d1|CSD_852da_d2|CSD_852da_d3
990
991 #$DEF CSD_852db_d1=M296_1_1982B[A:DOOR,DOOR_852_3A,23,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_3B,142,11,10,21,0,0,5,9,10,0]
992 #$DEF CSD_852db_d2=M296_1_1982B[A:DOOR,DOOR_852_3A,23,11,10,21,0,0,13,9,10,0]
993 #$DEF CSD_852db_d3=M296_1_1982B[A:DOOR,DOOR_852_3B,142,11,10,21,0,0,13,9,10,0]
994 #$DEF CSD_852db_d=CSD_852db_d1|CSD_852db_d2|CSD_852db_d3
995
996 $DEF CSD_852d=CSD_M296_82(|L)
997
998
999
1000 # M 296.1 1982 C,D
1001 #$DEF CSD_852ea_d1=M296_1_1982C[A:DOOR,DOOR_852_3A,93,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_3B,212,11,10,21,0,0,5,9,10,0]
1002 #$DEF CSD_852ea_d2=M296_1_1982C[A:DOOR,DOOR_852_3A,93,11,10,21,0,0,13,9,10,0]
1003 #$DEF CSD_852ea_d3=M296_1_1982C[A:DOOR,DOOR_852_3B,212,11,10,21,0,0,13,9,10,0]
1004 #$DEF CSD_852ea_d=CSD_852ea_d1|CSD_852ea_d2|CSD_852ea_d3
1005
1006 #$DEF CSD_852eb_d1=M296_1_1982D[A:DOOR,DOOR_852_3A,23,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_3B,142,11,10,21,0,0,5,9,10,0]
1007 #$DEF CSD_852eb_d2=M296_1_1982D[A:DOOR,DOOR_852_3A,23,11,10,21,0,0,13,9,10,0]
1008 #$DEF CSD_852eb_d3=M296_1_1982D[A:DOOR,DOOR_852_3B,142,11,10,21,0,0,13,9,10,0]
1009 #$DEF CSD_852eb_d=CSD_852eb_d1|CSD_852eb_d2|CSD_852eb_d3
1010
1011 $DEF CSD_852e=CSD_M296_82A(|L)
1012
1013
1014
1015 # M 296.1 1988 A,B
1016 #$DEF CSD_852fa_d1=M296_1_1988A[A:DOOR,DOOR_852_4A,93,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_4B,212,11,10,21,0,0,5,9,10,0]
1017 #$DEF CSD_852fa_d2=M296_1_1988A[A:DOOR,DOOR_852_4A,93,11,10,21,0,0,13,9,10,0]
1018 #$DEF CSD_852fa_d3=M296_1_1988A[A:DOOR,DOOR_852_4B,212,11,10,21,0,0,13,9,10,0]
1019 #$DEF CSD_852fa_d=CSD_852fa_d1|CSD_852fa_d2|CSD_852fa_d3
1020
1021 #$DEF CSD_852fb_d1=M296_1_1988B[A:DOOR,DOOR_852_4A,23,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_4B,142,11,10,21,0,0,5,9,10,0]
1022 #$DEF CSD_852fb_d2=M296_1_1988B[A:DOOR,DOOR_852_4A,23,11,10,21,0,0,13,9,10,0]
1023 #$DEF CSD_852fb_d3=M296_1_1988B[A:DOOR,DOOR_852_4B,142,11,10,21,0,0,13,9,10,0]
1024 #$DEF CSD_852fb_d=CSD_852fb_d1|CSD_852fb_d2|CSD_852fb_d3
1025
1026 $DEF CSD_852f=CSD_M296_88(|L)
1027
1028
1029
1030 # M 296.1 1988 C,D
1031 #$DEF CSD_852ga_d1=M296_1_1988C[A:DOOR,DOOR_852_5A,93,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_5B,212,11,10,21,0,0,5,9,10,0]
1032 #$DEF CSD_852ga_d2=M296_1_1988C[A:DOOR,DOOR_852_5A,93,11,10,21,0,0,13,9,10,0]
1033 #$DEF CSD_852ga_d3=M296_1_1988C[A:DOOR,DOOR_852_5B,212,11,10,21,0,0,13,9,10,0]
1034 #$DEF CSD_852ga_d=CSD_852ga_d1|CSD_852ga_d2|CSD_852ga_d3
1035
1036 #$DEF CSD_852gb_d1=M296_1_1988D[A:DOOR,DOOR_852_5A,23,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_5B,142,11,10,21,0,0,5,9,10,0]
1037 #$DEF CSD_852gb_d2=M296_1_1988D[A:DOOR,DOOR_852_5A,23,11,10,21,0,0,13,9,10,0]
1038 #$DEF CSD_852gb_d3=M296_1_1988D[A:DOOR,DOOR_852_5B,142,11,10,21,0,0,13,9,10,0]
1039 #$DEF CSD_852gb_d=CSD_852gb_d1|CSD_852gb_d2|CSD_852gb_d3
1040
1041 $DEF CSD_852g=CSD_M296_88A(|L)
1042
1043
1044
1045 # M 296.2008 1989
1046 #$DEF CSD_852ha_d1=M296_2008_1989A[A:DOOR,DOOR_852_8A,93,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_8B,212,11,10,21,0,0,13,9,10,0]
1047 #$DEF CSD_852ha_d2=M296_2008_1989A[A:DOOR,DOOR_852_8A,93,11,10,21,0,0,13,9,10,0]
1048 #$DEF CSD_852ha_d3=M296_2008_1989A[A:DOOR,DOOR_852_8B,212,11,10,21,0,0,13,9,10,0]
1049 #$DEF CSD_852ha_d=CSD_852ha_d1|CSD_852ha_d2|CSD_852ha_d3
1050
1051 #$DEF CSD_852hb_d1=M296_2008_1989B[A:DOOR,DOOR_852_8A,23,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_8B,142,11,10,21,0,0,13,9,10,0]
1052 #$DEF CSD_852hb_d2=M296_2008_1989B[A:DOOR,DOOR_852_8A,23,11,10,21,0,0,13,9,10,0]
1053 #$DEF CSD_852hb_d3=M296_2008_1989B[A:DOOR,DOOR_852_8B,142,11,10,21,0,0,13,9,10,0]
1054 #$DEF CSD_852hb_d=CSD_852hb_d1|CSD_852hb_d2|CSD_852hb_d3
1055
1056 $DEF CSD_852h=CSD_M296_2008_89(|L)
1057
1058
1059
1060 # CSD 852 1990
1061 #$DEF CSD_852ia_d1=CSD_852_1990A[A:DOOR,DOOR_852_8A,93,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_8B,212,11,10,21,0,0,13,9,10,0]
1062 #$DEF CSD_852ia_d2=CSD_852_1990A[A:DOOR,DOOR_852_8A,93,11,10,21,0,0,13,9,10,0]
1063 #$DEF CSD_852ia_d3=CSD_852_1990A[A:DOOR,DOOR_852_8B,212,11,10,21,0,0,13,9,10,0]
1064 #$DEF CSD_852ia_d=CSD_852ia_d1|CSD_852ia_d2|CSD_852ia_d3
1065
1066 #$DEF CSD_852ib_d1=CSD_852_1990B[A:DOOR,DOOR_852_8A,23,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_8B,142,11,10,21,0,0,13,9,10,0]
1067 #$DEF CSD_852ib_d2=CSD_852_1990B[A:DOOR,DOOR_852_8A,23,11,10,21,0,0,13,9,10,0]
1068 #$DEF CSD_852ib_d3=CSD_852_1990B[A:DOOR,DOOR_852_8B,142,11,10,21,0,0,13,9,10,0]
1069 #$DEF CSD_852ib_d=CSD_852ib_d1|CSD_852ib_d2|CSD_852ib_d3
1070
1071 $DEF CSD_852i=CSD_852_90(|L)
1072
1073
1074
1075 # CD 852 1993
1076 #$DEF CD_852ja_d1=CD_852_1993A[A:DOOR,DOOR_852_8A,93,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_8B,212,11,10,21,0,0,13,9,10,0]
1077 #$DEF CD_852ja_d2=CD_852_1993A[A:DOOR,DOOR_852_8A,93,11,10,21,0,0,13,9,10,0]
1078 #$DEF CD_852ja_d3=CD_852_1993A[A:DOOR,DOOR_852_8B,212,11,10,21,0,0,13,9,10,0]
1079 #$DEF CD_852ja_d=CD_852ja_d1|CD_852ja_d2|CD_852ja_d3
1080
1081 #$DEF CD_852jb_d1=CD_852_1993B[A:DOOR,DOOR_852_8A,23,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_8B,142,11,10,21,0,0,13,9,10,0]
1082 #$DEF CD_852jb_d2=CD_852_1993B[A:DOOR,DOOR_852_8A,23,11,10,21,0,0,13,9,10,0]
1083 #$DEF CD_852jb_d3=CD_852_1993B[A:DOOR,DOOR_852_8B,142,11,10,21,0,0,13,9,10,0]
1084 #$DEF CD_852jb_d=CD_852jb_d1|CD_852jb_d2|CD_852jb_d3
1085
1086 $DEF CD_852j=CD_852_93(|L)
1087
1088
1089
1090 # CD 852 1997
1091 #$DEF CD_852ka_d1=CD_852_1997A[A:DOOR,DOOR_852_6A,93,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_6B,212,11,10,21,0,0,13,9,10,0]
1092 #$DEF CD_852ka_d2=CD_852_1997A[A:DOOR,DOOR_852_6A,93,11,10,21,0,0,13,9,10,0]
1093 #$DEF CD_852ka_d3=CD_852_1997A[A:DOOR,DOOR_852_6B,212,11,10,21,0,0,13,9,10,0]
1094 #$DEF CD_852ka_d=CD_852ka_d1|CD_852ka_d2|CD_852ka_d3
1095
1096 #$DEF CD_852kb_d1=CD_852_1997B[A:DOOR,DOOR_852_6A,23,11,10,21,0,0,13,9,10,0][A:DOOR,DOOR_852_6B,142,11,10,21,0,0,13,9,10,0]
1097 #$DEF CD_852kb_d2=CD_852_1997B[A:DOOR,DOOR_852_6A,23,11,10,21,0,0,13,9,10,0]
1098 #$DEF CD_852kb_d3=CD_852_1997B[A:DOOR,DOOR_852_6B,142,11,10,21,0,0,13,9,10,0]
1099 #$DEF CD_852kb_d=CD_852kb_d1|CD_852kb_d2|CD_852kb_d3
1100
1101 $DEF CD_852k=CD_852_97(|L)
1102
1103
1104
1105 # CD 854 030 1997
1106 #$DEF CD_854aa_d1=CD_854030_1997A[A:DOOR,DOOR_852_7AA,93,7,19,25,0,0,13,10,19,0][A:DOOR,DOOR_852_7AB,203,7,19,25,0,0,13,10,19,0]
1107 #$DEF CD_854aa_d2=CD_854030_1997A[A:DOOR,DOOR_852_7AA,93,7,19,25,0,0,13,10,19,0]
1108 #$DEF CD_854aa_d3=CD_854030_1997A[A:DOOR,DOOR_852_7AB,203,7,19,25,0,0,13,10,19,0]
1109 #$DEF CD_854aa_d=CD_854aa_d1|CD_854aa_d2|CD_854aa_d3
1110
1111 #$DEF CD_854ab_d1=CD_854030_1997B[A:DOOR,DOOR_852_7BA,23,7,19,25,0,0,13,10,19,0][A:DOOR,DOOR_852_7BB,133,7,19,25,0,0,13,10,19,0]
1112 #$DEF CD_854ab_d2=CD_854030_1997B[A:DOOR,DOOR_852_7BA,23,7,19,25,0,0,13,10,19,0]
1113 #$DEF CD_854ab_d3=CD_854030_1997B[A:DOOR,DOOR_852_7BB,133,7,19,25,0,0,13,10,19,0]
1114 #$DEF CD_854ab_d=CD_854ab_d1|CD_854ab_d2|CD_854ab_d3
1115
1116 $DEF CD_854a=CD_854030_97(|L)
1117
1118
1119
1120 # CD 854 028 2001
1121 #$DEF CD_854ba_d1=CD_854028_2001A[A:DOOR,DOOR_852_7AA,93,7,19,25,0,0,13,10,19,0][A:DOOR,DOOR_852_7AB,203,7,19,25,0,0,13,10,19,0]
1122 #$DEF CD_854ba_d2=CD_854028_2001A[A:DOOR,DOOR_852_7AA,93,7,19,25,0,0,13,10,19,0]
1123 #$DEF CD_854ba_d3=CD_854028_2001A[A:DOOR,DOOR_852_7AB,203,7,19,25,0,0,13,10,19,0]
1124 #$DEF CD_854ba_d=CD_854ba_d1|CD_854ba_d2|CD_854ba_d3
1125
1126 #$DEF CD_854bb_d1=CD_854028_2001B[A:DOOR,DOOR_852_7BA,23,7,19,25,0,0,13,10,19,0][A:DOOR,DOOR_852_7BB,133,7,19,25,0,0,13,10,19,0]
1127 #$DEF CD_854bb_d2=CD_854028_2001B[A:DOOR,DOOR_852_7BA,23,7,19,25,0,0,13,10,19,0]
1128 #$DEF CD_854bb_d3=CD_854028_2001B[A:DOOR,DOOR_852_7BB,133,7,19,25,0,0,13,10,19,0]
1129 #$DEF CD_854bb_d=CD_854bb_d1|CD_854bb_d2|CD_854bb_d3
1130
1131 $DEF CD_854b=CD_854028_01(|L)
1132
1133
1134
1135
1136 #_______________________________________________________________________
1137 #SOUPRAVY
1138
1139
1140 #soupravy dle roku:
1141
1142
1143
1144 # ROK 1966 _ ja osobne bych tyhle soupravy dal sem. A do JR 1976 bych dal soupravy "vzor" 1970 :)
1145 # Deleni souprav hierarchicky
1146 # 852 | 852 + 1x054 | 852 + 2x054 | 852 + 2x054 + 852 |
1147 # 852 + 3x054 + 852 | 852 + 4x054 + 852 | 852 + 852 | jinaci | vse |
1148
1149
1150 #Vindobona
1151
1152 $DEF VINDOBONA_1969d=CSD_852A, CSD_AAM_A, CSD_BAM_A, CSD_BRAM_A, CSD_AAM_A, CSD_852A
1153
1154
1155 $DEF 852_1966_1d=CSD_852A|CSD_852B
1156 $DEF 852_1966_2d=CSD_852A|CSD_852B, CSD_BAIM_A
1157 $DEF 852_1966_3d=CSD_852A|CSD_852B, 2*CSD_BAIM_A
1158 $DEF 852_1966_4d=CSD_852A|CSD_852B, 2*CSD_BAIM_A, CSD_852A|CSD_852B
1159 $DEF 852_1966_5d=CSD_852A|CSD_852B, 3*CSD_BAIM_A, CSD_852A|CSD_852B
1160 $DEF 852_1966_6d=CSD_852A|CSD_852B, 4*CSD_BAIM_A, CSD_852A|CSD_852B
1161 $DEF 852_1966_7d=2*CSD_852A|CSD_852B
1162
1163 #ostatni
1164
1165 $DEF 852_1966_1da=CSD_852A|CSD_852B, CSD_BAM_A, CSD_AAM_A
1166 $DEF 852_1966_1db=CSD_852A|CSD_852B, 2*CSD_BAM_A
1167 $DEF 852_1966_1dc=CSD_852A|CSD_852B, CSD_BAM_A, CSD_AAM_A, CSD_852A|CSD_852B
1168 $DEF 852_1966_1dd=CSD_852A|CSD_852B, CSD_BAM_A, CSD_BRAM_A, CSD_AAM_A, CSD_852A|CSD_852B
1169 $DEF 852_1966_1de=CSD_852A|CSD_852B, CSD_BAM_A, CSD_BRAM_A, CSD_852A|CSD_852B
1170 $DEF 852_1966_1df=CSD_852A|CSD_852B, CSD_BRAM_A, CSD_AAM_A, CSD_852A|CSD_852B
1171 $DEF 852_1966_1dg=CSD_852A|CSD_852B, 2*CSD_BAM_A, CSD_BRAM_A, CSD_AAM_A, CSD_852A|CSD_852B
1172
1173
1174
1175 $DEF 852_1966_vsed=852_1966_1d|852_1966_2d|852_1966_3d|852_1966_4d|852_1966_5d|852_1966_6d|852_1966_7d|VINDOBONA_1969d|852_1966_1da|852_1966_1db|852_1966_1dc|852_1966_1dd|852_1966_1de|852_1966_1df|852_1966_1dg
1176
1177
1178
1179
1180
1181 # ROK 1976
1182
1183 $DEF 852_1976_1d=CSD_852c
1184 $DEF 852_1976_2d=CSD_852c, CSD_BAIM_B
1185 $DEF 852_1976_3d=CSD_852c, 2*CSD_BAIM_B
1186 $DEF 852_1976_4d=CSD_852c, 2*CSD_BAIM_B, CSD_852c
1187 $DEF 852_1976_5d=CSD_852c, 3*CSD_BAIM_B, CSD_852c
1188 $DEF 852_1976_6d=CSD_852c, 4*CSD_BAIM_B, CSD_852c
1189 $DEF 852_1976_7d=2*CSD_852c
1190
1191
1192 #ostatni
1193
1194 $DEF 852_1976_1da=CSD_852c, CSD_BAM_B, CSD_AAM_B
1195 $DEF 852_1976_1db=CSD_852c, 2*CSD_BAM_B
1196 $DEF 852_1976_1dc=CSD_852c, CSD_BAM_B, CSD_AAM_B, CSD_852C
1197 $DEF 852_1976_1dd=CSD_852c, CSD_BAM_B, CSD_BRAM_B, CSD_AAM_B, CSD_852C
1198
1199
1200 $DEF 852_1976_vsed=852_1976_1d|852_1976_2d|852_1976_3d|852_1976_4d|852_1976_5d|852_1976_6d|852_1976_7d|852_1976_1da|852_1976_1db|852_1976_1dc|852_1976_1dd
1201
1202
1203
1204 # ROK 1988
1205
1206 $DEF 852_1988_1d=CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h
1207 $DEF 852_1988_2d=CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h, CSD_BAIM_B
1208 $DEF 852_1988_3d=CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h, 2*CSD_BAIM_B
1209 $DEF 852_1988_4d=CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h, 2*CSD_BAIM_B, CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h
1210 $DEF 852_1988_5d=CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h, 3*CSD_BAIM_B, CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h
1211 $DEF 852_1988_6d=CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h, 4*CSD_BAIM_B, CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h
1212 $DEF 852_1988_7d=2*CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h
1213
1214
1215 #ostatni
1216
1217 $DEF 852_1988_1da=CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h, CSD_BAM_B, CSD_AAM_B
1218 $DEF 852_1988_1db=CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h, 2*CSD_BAM_B
1219 $DEF 852_1988_1dc=CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h, CSD_BAM_B, CSD_AAM_B, CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h
1220 $DEF 852_1988_1dd=CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h, CSD_BAM_B, CSD_BRAM_B, CSD_AAM_B, CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h
1221 $DEF 852_1988_1de=CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h, CSD_BAM_B, CSD_BRAM_B, CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h
1222 $DEF 852_1988_1df=CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h, CSD_BRAM_B, CSD_AAM_B, CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h
1223 $DEF 852_1988_1dg=CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h, 2*CSD_BAM_B, CSD_BRAM_B, CSD_AAM_B, CSD_852d|CSD_852e|CSD_852f|CSD_852g|CSD_852h
1224
1225
1226
1227
1228
1229
1230
1231 $DEF 852_1988_vsed=852_1988_1d|852_1988_2d|852_1988_3d|852_1988_4d|852_1988_5d|852_1988_6d|852_1988_7d|852_1988_1da|852_1988_1db|852_1988_1dc|852_1988_1dd|852_1988_1de|852_1988_1df|852_1988_1dg
1232
1233
1234
1235 # ROK 1995
1236
1237 $DEF 852_1995_1d=CSD_852i|CD_852j
1238 $DEF 852_1995_2d=CSD_852i|CD_852j, CD_053_A
1239 $DEF 852_1995_3d=CSD_852i|CD_852j, 2*CD_053_A
1240 $DEF 852_1995_4d=CSD_852i|CD_852j, 2*CD_053_A, CSD_852i|CD_852j
1241 $DEF 852_1995_5d=CSD_852i|CD_852j, 3*CD_053_A, CSD_852i|CD_852j
1242 $DEF 852_1995_6d=CSD_852i|CD_852j, 4*CD_053_A, CSD_852i|CD_852j
1243 $DEF 852_1995_7d=2*CSD_852i|CD_852j
1244
1245
1246 #ostatni _ zatim nic
1247
1248
1249 $DEF 852_1995_vsed=852_1995_1d|852_1995_2d|852_1995_3d|852_1995_4d|852_1995_5d|852_1995_6d|852_1995_7d
1250
1251
1252
1253 # ROK 2002 _ zde rozdeleni podle nateru.
1254
1255 $DEF 852_2002_1d=CD_852j|CD_852k, CD_053_A|CD_053_B
1256 $DEF 852_2002_3d=CD_852j|CD_852k, 2*CD_053_A|CD_053_B
1257 $DEF 852_2002_4d=CD_852j|CD_852k, 2*CD_053_A|CD_053_B, CD_852j|CD_852k
1258 $DEF 852_2002_5d=CD_852j|CD_852k, 3*CD_053_A|CD_053_B, CD_852j|CD_852k
1259 $DEF 852_2002_6d=CD_852j|CD_852k, 4*CD_053_A|CD_053_B, CD_852j|CD_852k
1260 $DEF 852_2002_7d=2*CD_852j|CD_852k|CD_854a|CD_854b
1261
1262
1263 #ostatni _ "vzory" 852_1993/854 + 053_1997
1264
1265 $DEF 852_2002_1ad=CD_852k|CD_854a|CD_854b
1266 $DEF 852_2002_2ad=CD_852k|CD_854a|CD_854b, CD_053_B
1267 $DEF 852_2002_3ad=CD_852k|CD_854a|CD_854b, 2*CD_053_B
1268 $DEF 852_2002_3abd=CD_852k|CD_854a|CD_854b, CD_053_B, CD_053_B|CD_054_B
1269 $DEF 852_2002_4ad=CD_852k|CD_854a|CD_854b, 2*CD_053_B, CD_852k|CD_854a|CD_854b
1270 $DEF 852_2002_5ad=CD_852k|CD_854a|CD_854b, 3*CD_053_B, CD_852k|CD_854a|CD_854b
1271 $DEF 852_2002_6ad=CD_852k|CD_854a|CD_854b, 4*CD_053_B, CD_852k|CD_854a|CD_854b
1272 $DEF 852_2002_7ad=2*CD_852k|CD_854a|CD_854b
1273
1274
1275 #sem tam zarazen 054 _ POZOR ! U CD nyni uz jenom dva vozy !
1276
1277 $DEF 852_2002_1bd=CD_852j|CD_852k, CD_053_A|CD_053_B, CD_053_A|CD_053_B|CD_054_a|CD_054_b
1278
1279 $DEF 852_2002_2bd=CD_852j|CD_852k, CD_053_A|CD_053_B, CD_053_A|CD_053_B|CD_054_a|CD_054_b, CD_053_A|CD_053_B, CD_852j|CD_852k
1280
1281 $DEF 852_2002_3bd=CD_852j|CD_852k, 2*CD_053_A|CD_053_B, CD_053_A|CD_053_B|CD_054_a|CD_054_b, CD_852j|CD_852k
1282
1283 $DEF 852_2002_4bd=CD_852j|CD_852k, 2*CD_053_A|CD_053_B, CD_053_A|CD_053_B|CD_054_a|CD_054_b, CD_053_A|CD_053_B , CD_852j|CD_852k
1284
1285
1286 $DEF 852_2002_vsed=852_2002_1d|852_2002_2d|852_2002_3d|852_2002_4d|852_2002_5d|852_2002_6d|852_2002_7d|852_2002_1ad|852_2002_2ad|852_2002_3ad|852_2002_3abd|852_2002_4ad|852_2002_5ad|852_2002_6ad|852_2002_7ad|852_2002_1bd|852_2002_2bd|852_2002_3bd|852_2002_4bd
1287
1288
1289 #Demonstrace vseho najednou:
1290 $DEF 852_vsed=852_2002_vsed|852_1995_vsed|852_1988_vsed|852_1976_vsed|852_1966_vsed
1291
1292
1293
1294 #_______________________________________________________________________
1295 #Dale definice bez otevirani dveri
1296
1297 #_______________________________________________________________________
1298 #Definice motorovych vozu bez otevirani dveri. Definice do Vlaku xx
1299
1300 $DEF 852_1969A=M296_1_1969A|M296_1_1969B
1301 $DEF 852_1969=M296_1_1969A|M296_1_1969B|M296_1011_1969A|M296_1011_1969B
1302 $DEF 852_1977=M296_1_1977A|M296_1_1977B
1303 $DEF 852_1982=M296_1_1982A|M296_1_1982B|M296_1_1982C|M296_1_1982D
1304 $DEF 852_1988=M296_1_1988A|M296_1_1988B|M296_1_1988C|M296_1_1988D
1305 $DEF 852_1989=M296_2008_1989A|M296_2008_1989B
1306 $DEF 852_1990=CSD_852_1990A|CSD_852_1990B
1307 $DEF 852_1993=CD_852_1993A|CD_852_1993B
1308 $DEF 852_1997=CD_852_1997A|CD_852_1997B
1309 $DEF 854_2000=CD_854028_2001A|CD_854028_2001B|CD_854030_1997A|CD_854030_1997B
1310
1311
1312
1313
1314
1315 #______________
1316 #soupravy dle roku:
1317
1318
1319
1320 # ROK 1966 _ ja osobne bych tyhle soupravy dal sem. A do JR 1976 bych dal soupravy "vzor" 1970 :)
1321 # Deleni souprav hierarchicky
1322 # 852 | 852 + 1x054 | 852 + 2x054 | 852 + 2x054 + 852 |
1323 # 852 + 3x054 + 852 | 852 + 4x054 + 852 | 852 + 852 | jinaci | vse |
1324
1325
1326 #Vindobona
1327
1328 $DEF VINDOBONA_1969=852_1969A, AAM_1969, BAM_1969, BRAM_1969, AAM_1969, 852_1969A
1329
1330
1331 $DEF 852_1966_1=852_1969
1332 $DEF 852_1966_2=852_1969, BAIM_1970A
1333 $DEF 852_1966_3=852_1969, 2*BAIM_1970A
1334 $DEF 852_1966_4=852_1969, 2*BAIM_1970A, 852_1969
1335 $DEF 852_1966_5=852_1969, 3*BAIM_1970A, 852_1969
1336 $DEF 852_1966_6=852_1969, 4*BAIM_1970A, 852_1969
1337 $DEF 852_1966_7=2*852_1969
1338
1339 #ostatni _ zatim nic
1340
1341
1342
1343 $DEF 852_1966_vse=852_1966_1|852_1966_2|852_1966_3|852_1966_4|852_1966_5|852_1966_6|852_1966_7|VINDOBONA_1969
1344
1345
1346
1347
1348
1349 # ROK 1976
1350
1351 $DEF 852_1976_1=852_1977
1352 $DEF 852_1976_2=852_1977, BAIM_1970B
1353 $DEF 852_1976_3=852_1977, 2*BAIM_1970B
1354 $DEF 852_1976_4=852_1977, 2*BAIM_1970B, 852_1977
1355 $DEF 852_1976_5=852_1977, 3*BAIM_1970B, 852_1977
1356 $DEF 852_1976_6=852_1977, 4*BAIM_1970B, 852_1977
1357 $DEF 852_1976_7=2*852_1977
1358
1359
1360 #ostatni _ zatim nic
1361
1362
1363 $DEF 852_1976_vse=852_1976_1|852_1976_2|852_1976_3|852_1976_4|852_1976_5|852_1976_6|852_1976_7
1364
1365
1366
1367 # ROK 1988
1368
1369 $DEF 852_1988_1=852_1982|852_1988|852_1989
1370 $DEF 852_1988_2=852_1982|852_1988|852_1989, BAIM_1970B
1371 $DEF 852_1988_3=852_1982|852_1988|852_1989, 2*BAIM_1970B
1372 $DEF 852_1988_4=852_1982|852_1988|852_1989, 2*BAIM_1970B, 852_1982|852_1988|852_1989
1373 $DEF 852_1988_5=852_1982|852_1988|852_1989, 3*BAIM_1970B, 852_1982|852_1988|852_1989
1374 $DEF 852_1988_6=852_1982|852_1988|852_1989, 4*BAIM_1970B, 852_1982|852_1988|852_1989
1375 $DEF 852_1988_7=2*852_1982|852_1988|852_1989
1376
1377
1378 #ostatni _ zatim nic
1379
1380
1381 $DEF 852_1988_vse=852_1988_1|852_1988_2|852_1988_3|852_1988_4|852_1988_5|852_1988_6|852_1988_7
1382
1383
1384
1385 # ROK 1995
1386
1387 $DEF 852_1995_1=852_1990|852_1993
1388 $DEF 852_1995_2=852_1990|852_1993, 053_1993
1389 $DEF 852_1995_3=852_1990|852_1993, 2*053_1993
1390 $DEF 852_1995_4=852_1990|852_1993, 2*053_1993, 852_1990|852_1993
1391 $DEF 852_1995_5=852_1990|852_1993, 3*053_1993, 852_1990|852_1993
1392 $DEF 852_1995_6=852_1990|852_1993, 4*053_1993, 852_1990|852_1993
1393 $DEF 852_1995_7=2*852_1990|852_1993
1394
1395
1396 #ostatni _ zatim nic
1397
1398
1399 $DEF 852_1995_vse=852_1995_1|852_1995_2|852_1995_3|852_1995_4|852_1995_5|852_1995_6|852_1995_7
1400
1401
1402
1403 # ROK 2002 _ zde rozdeleni podle nateru.
1404
1405 $DEF 852_2002_1=852_1993|852_1997
1406 $DEF 852_2002_2=852_1993|852_1997, 053_1993|053_1997
1407 $DEF 852_2002_3=852_1993|852_1997, 2*053_1993|053_1997
1408 $DEF 852_2002_4=852_1993|852_1997, 2*053_1993|053_1997, 852_1993|852_1997
1409 $DEF 852_2002_5=852_1993|852_1997, 3*053_1993|053_1997, 852_1993|852_1997
1410 $DEF 852_2002_6=852_1993|852_1997, 4*053_1993|053_1997, 852_1993|852_1997
1411 $DEF 852_2002_7=2*852_1993|852_1997|854_2000
1412
1413
1414 #ostatni _ "vzory" 852_1993/854 + 053_1997
1415
1416 $DEF 852_2002_1a=852_1997|854_2000
1417 $DEF 852_2002_2a=852_1997|854_2000, 053_1997
1418 $DEF 852_2002_3a=852_1997|854_2000, 2*053_1997
1419 $DEF 852_2002_3ab=852_1997|854_2000, 053_1997, 053_1997|054_1997
1420 $DEF 852_2002_4a=852_1997|854_2000, 2*053_1997, 852_1997|854_2000
1421 $DEF 852_2002_5a=852_1997|854_2000, 3*053_1997, 852_1997|854_2000
1422 $DEF 852_2002_6a=852_1997|854_2000, 4*053_1997, 852_1997|854_2000
1423 $DEF 852_2002_7a=2*852_1997|854_2000
1424
1425
1426 #sem tam zarazen 054 _ POZOR ! U CD nyni uz jenom dva vozy !
1427
1428 $DEF 852_2002_1b=852_1993|852_1997, 053_1993|053_1997, 053_1993|053_1997|054_1997|054_1993
1429
1430 $DEF 852_2002_2b=852_1993|852_1997, 053_1993|053_1997,053_1993|053_1997|054_1997|054_1993, 053_1993|053_1997, 852_1993|852_1997
1431
1432 $DEF 852_2002_3b=852_1993|852_1997, 2*053_1993|053_1997, 053_1993|053_1997|054_1997|054_1993, 852_1993|852_1997
1433
1434 $DEF 852_2002_4b=852_1993|852_1997, 2*053_1993|053_1997, 053_1993|053_1997|054_1997|054_1993,053_1993|053_1997 , 852_1993|852_1997
1435
1436 $DEF 852_2002_vse=852_2002_1|852_2002_2|852_2002_3|852_2002_4|852_2002_5|852_2002_6|852_2002_7|852_2002_1a|852_2002_2a|852_2002_3a|852_2002_3ab|852_2002_4a|852_2002_5a|852_2002_6a|852_2002_7a|852_2002_1b|852_2002_2b|852_2002_3b|852_2002_4b
1437
1438
1439 #Demonstrace vseho najednou:
1440 $DEF 852_vse=852_2002_vse|852_1995_vse|852_1988_vse|852_1976_vse|852_1966_vse
1441
1442 # Autobusy ---------------------------
1443 $DEF BUSB=BG_NULL
1444
1445 # Commonly used --------------------------------------------------------------
1446 $DEF M152_0=CD_810|CD_810[M][MP:17,13,2,4][MP:114,13,2,4]