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]