TTFIL traindef.ttt
1 # { [ (
2
3 $REQUIRE REPLACE.TTT
4 $REQUIRE STREETDEF.TTT
5 $REQUIRE ZSZ_DEF.TTT
6 $REQUIRE JMD_DEF.TTT
7 #------------------------------------------------------------------------------
8 #
9 # Semitrailer
10 #
11 $DEF AUFLIEGER=STRR|STRL
12
13 $DEF SEMITR6R=STRAIL_B3[BC:-10,10]|STRAIL_K1[BC:-10,10]|STRAIL_DUVENBECK1[BC:-10,10]| \
14 STRAIL_GIRTEKA1[BC:-10,10]|STRAIL_GIRTEKA_R1[BC:-10,10]|STRAIL_BARILLA|STRAIL_BAS1| \
15 STRAIL_BLUECARGO|STRAIL_BURGERKING|STRAIL_CALBERSON1|STRAIL_CARLSBERG|STRAIL_COMBIPLANT| \
16 STRAIL_CONTINENTAL|STRAIL_CRAFTRANSPORT|STRAIL_EBG|STRAIL_ENGEMANN|STRAIL_ESTRELLA|STRAIL_FM1| \
17 STRAIL_GAMMA1|STRAIL_GARTNER|STRAIL_GRUBER|STRAIL_GRUBER2|STRAIL_GRUBER4|STRAIL_GRUBER5| \
18 STRAIL_GRUBER7|STRAIL_GRUBER8|STRAIL_GRUBER9|STRAIL_GWG|STRAIL_H_ESSERS|STRAIL_HARTMANN| \
19 STRAIL_HEIJBOER|STRAIL_HSDF2|STRAIL_HUELKENBERG|STRAIL_KLINE|STRAIL_KUEHNE|STRAIL_KUIPERS| \
20 STRAIL_LA_REVOLUTION|STRAIL_LEMAN|STRAIL_LILLBACKA2|STRAIL_LUCCINI|STRAIL_MAINSPED3| \
21 STRAIL_MAINSPED5|STRAIL_MAINSPED6|STRAIL_NORFOLKLINE|STRAIL_PANEUROPA1|STRAIL_PANEUROPA2| \
22 STRAIL_POWERCORE2|STRAIL_REINBOLD|STRAIL_ROXY|STRAIL_SATRAS1|STRAIL_SATRAS2|STRAIL_SCHONI2| \
23 STRAIL_SCHONI3|STRAIL_SCHONI4|STRAIL_SCHWEITZER|STRAIL_SPAIN|STRAIL_TERRATRANS|STRAIL_TRANSCO2| \
24 STRAIL_TRANSPORTE|STRAIL_VANDIEREN1|STRAIL_VANDIEREN2|STRAIL_VANDIEREN5|STRAIL_VANDIEREN6| \
25 STRAIL_VANDIEREN8|STRAIL_VANDIEREN10|STRAIL_VELFAC|STRAIL_VERMEIJ|STRAIL_WALTER|STRAIL_WALTER1| \
26 STRAIL_ZIEGLER
27
28 $DEF SEMITR6L=STRAIL_B1|STRAIL_B2[BC:-10,10]|STRAIL_R1[BC:-10,10]|STRAIL_A1|STRAIL_B3L|STRAIL_K1L| \
29 STRAIL_BARILLAL|STRAIL_BAS2|STRAIL_BERGER|STRAIL_CALBERSON1L|STRAIL_CARLSBERGL|STRAIL_COMBIPLANTL| \
30 STRAIL_CONTINENTALL|STRAIL_CRAFTRANSPORTL|STRAIL_DANZASL|STRAIL_DUVENBECK1L[BC:-10,10]| \
31 STRAIL_ESTRELLAL|STRAIL_FM2|STRAIL_GAMMA2|STRAIL_GARTNERL|STRAIL_GIRTEKA1L[BC:-10,10]| \
32 STRAIL_GIRTEKA_R1L[BC:-10,10]|STRAIL_GRUBERGL|STRAIL_GRUBER3|STRAIL_GRUBER6|STRAIL_GWGL| \
33 STRAIL_H_ESSERSL|STRAIL_H_ERRERS1|STRAIL_HEIJBOERL|STRAIL_HSDF1|STRAIL_HUELKENBERGL|STRAIL_KLINEL| \
34 STRAIL_KOPPENHOEFERFL|STRAIL_LA_REVOLUTIONL|STRAIL_LAGERMAXL|STRAIL_LANGNESEFL|STRAIL_LEMANL| \
35 STRAIL_MAINSPED4|STRAIL_NORFOLKLINEL|STRAIL_PANEUROPA2L|STRAIL_PNO|STRAIL_POSSOZL| \
36 STRAIL_POWERCORE1|STRAIL_SAGF|STRAIL_SAN_MIGUEL|STRAIL_SCHONI1|STRAIL_SCHONI2L|STRAIL_SCHONI3L| \
37 STRAIL_SCHONI4L|STRAIL_SEVERIN_KOLSCHL|STRAIL_SPAINL|STRAIL_STEFFENS|STRAIL_THYSSENKRUPP| \
38 STRAIL_TRANSLOG|STRAIL_TRANSPED|STRAIL_VANDIEREN3|STRAIL_VANDIEREN4|STRAIL_VELFACL|STRAIL_WALTERL| \
39 STRAIL_WALTER2|STRAIL_WEYAND|STRAIL_ZIEGLERL|STRAIL_ZINGG
40 #------------------------------------------------------------------------------
41 #
42 # Aggregates
43 #
44 $DEF AG40D=(CA_002_N0|FR_KO36|GRAV|FR_KO38|FR_HACK05|FR_SCH06|FR_SZ11|FR_SZ12|SOIL3|BRIQUETTE|CLAY16| \
45 SOIL4|FR09|FR_KO39|SOIL1|SOIL6)(|[M])
46 $DEF AG45D=(FR_HACK03|FR_KO18|FR_HACK08|FR_SAND2|SOIL2|SOIL5|BALLAST05|COAL36|FR_KO16|CLAY15|FEAR_A_C1) \
47 (|[M])
48 $DEF AG50D=(FR_HACK02|FR_KO17|FR_KO8|SAND14|FTP_NL251_N0|FR28|FR_ORE02|FR_HACK04|FR_HACK06|FR_KO9| \
49 CLAY14)(|[M])
50 $DEF AG55D=(FR_KO28|FR_KO29|STONE2|FTP_NP151_N0|FR_KO07|FR_KO15|FR_ORE03|BALLAST45|BALLAST46|FR_KO46| \
51 FAP_L_N1|FR_KO10|FR_KO11|FR_KO43|FVS_V2012_N0)(|[M])
52 $DEF AG60D=(FR_ORE01|BALLAST18|FR_KO42|FR_REPA1|SOIL22|FR_ERZ02|FR_KO27|BALLAST19|BALLAST43|FR_ERZ06| \
53 FR_KO44|FR_ERZ21|FR_SAND1)(|[M])
54 $DEF AG65D=(FR_AG03|FR_REPA2|FR_KO12|FR_KO13|FR_PO01|FAP_L_N2|FAP_L_N0|FTP_P101_N1|FR_KO23|FR_ERZ22| \
55 SAND15|FVS_V2012_N2|BALLAST11|FR_KO14|FS_L3R_N1|FS_L3R_N2|SAND5|FR_BRAM|BALLAST16|FR_PISEK1| \
56 FR_KO20|FR_KO21|FR_KO22|FR_KO34|FR_GRAVEL1|BALLAST01|BALLAST02|FVS_V2012_N1)(|[M])
57 $DEF AG70D=(FR_ERZ20|BALLAST12|FR_PISEK2|COAL20|FR_SKLPISEK|FVB_V401_N2|FVB_V401_N1|FVB_V401_N0| \
58 FR_ERZ19|FR_RIZKY|FTP_NF131_N1|FR_SUTR|FR_PALIVO)(|[M])
59 $DEF AG75D=(BALLAST14|FR_KO19|BEET1|FR_KO30|SOIL7|SOIL8|FER4|FER3|FR_ERZ18|FR_PISEK|FR_KO33|FR_KO35| \
60 FR_UHLI|FR_ERZ17|FR_ERZ05|BALLAST13|BALLAST15|BETTERAVES_2E1|BETTERAVES_2E2|FR_KO45)(|[M])
61 $DEF AG80D=(FR06|COAL23|FR_ERZ04|FR_ERZ10|FR_KO31|COAL9|FR_ERZ09|FR_SAND3|FR07|FR_AG05|FR_KO32|FR_KO37) \
62 (|[M])
63 $DEF AG85D=(JR_HOKI9500BS|BALLAST20|BALLAST17|BALLAST50|FER1|FER2|FR_COAL1|BALLAST48|BALLAST49| \
64 FR_COAL2|FP_P614N0|BALLAST23)(|[M])
65 $DEF COAL100=GRAVEL10|COAL27|COAL28|FR_UH3|FR_UH1|BALLAST09|COAL30|FR10|FR25|COAL29|FR_UH4|COAL31|COAL32
66 $DEF SAND100=SAND(10|11|12|6|7|9)
67 $DEF AG120D=(FR20|COAL21|BALLAST27|BALLAST29|BALLAST32|BALLAST34|BALLAST35|FR02|FR22|COAL1|BALLAST26| \
68 BALLAST28|BALLAST33|BALLAST04)(|[M])
69
70 $DEF AG50=AG50D|3:AG45D|AG40D
71 $DEF AG55=AG55D|3:AG50D|AG45D
72 $DEF AG60=AG60D|3:AG55D|AG50D
73 $DEF AG65=AG65D|3:AG60D|AG55D
74 $DEF AG70=AG70D|3:AG65D|AG60D
75 $DEF AG75=AG75D|3:AG70D|AG65D
76 $DEF AG80=AG80D|3:AG75D|AG70D
77 $DEF AG85=AG85D|3:AG80D|AG75D
78 $DEF AG120=AG120D
79 #------------------------------------------------------------------------------
80 #
81 # Wood
82 #
83 $DEF W125=WOOD16|WOOD54|WOOD57|WOOD55|WOOD56|WOOD24|FR_WOOD9|WOOD127
84 #------------------------------------------------------------------------------
85 #
86 # Other loads
87 #
88 $DEF LD100D=SQUAREPIPE|PIPE16|PIPE21|PIPE23|PIPE43|PIPE22|PIPE26|FR_CP2|FR_SP|FR_CP|PIPE52|PIPE32| \
89 PIPE3|PIPE2|BOX_BMW|BOX33|MOTOR5|MOTOR4|BOILER1|BOILER4|BOILER5|TANK1|TANK2|HIPRES_BURNER| \
90 LORRYCHASSIS1|BOILER2|SILO1|TARP11|TARP9
91 $DEF LD125D=CHIMNEY2|CHIMNEY1|PIPE8|PIPE5|PIPE4|PIPE7|PIPE13|PIPE_HES_HALBERG|PIPE6|CABLE12| \
92 (CABLE1,15,CABLE1)|(CABLE17,3*(10,CABLE17))|(CABLE18,15,CABLE18,15,CABLE18)|ROPEDRUM| \
93 SHIPMOTORAXLE|BOILERRINGS|BOILER3|SOFFIT
94 $DEF LD180D=PIPE40|PIPE19|PIPE17|PIPE18|PIPE39|STEEL12|STEEL9|TANK3|MACHINE1|MACHINE2|MACHINE3|REACTOR1
95
96 $DEF LD125=5:LD125D|3:LD100D
97 $DEF LD180=5:LD180D|3:LD125D|LD100D
98 #------------------------------------------------------------------------------
99 #
100 # General Europe
101 #
102 $DEF G_SHIM1=DB_SHIMMNS_TU718(_3|_4|B3|B4|B7)(|L)
103 $DEF G_SHIM2=DB_SHIMMNS_TU720_(1|2|3|4|5|6)(|L)
104 $DEF G_SHIM3=DB_SHIMMNS_TTU722_(6|7|8|9|10|11)(|L)
105 $DEF G_SHIM4=DB_SHIMMNS_TTU723(_1|_2|_3|_4|G1|B2|B4|B6|BG1|BG3)(|L)
106 $DEF G_SHIM=G_SHIM(1|2|3|4)
107
108 $DEF G_HBIS=2:DB_HBIS_T297(A|B|C)(|L)|DB_HBIS_WW299A(|L)|4:DB_HBIS299(|A|B|C|D|E|F|G|GL|H|HL)| \
109 3:DB_HBBIS306(A|B|C|D)(|L)
110
111 $DEF G_OIL1=ERMEWA_7837302|VTG_Z1|SIESS_1|SIESS_2|VTG_7|VTG_3|MINOL_7967200|VTG_8|VTG_Z2| \
112 MINOL_7845444|DB_KW4_1|ONRAIL_8|ONRAIL_8L|ONRAIL_2|ONRAIL_2L|NACCO_6|NACCO_6L|NACCO_5|NACCO_5L| \
113 NACCO_1|NACCO_1L|NACCO_4|NACCO_4L|NACCO_3L|NACCO_2|NACCO_2L|WASC_19|WASC_19L|WASC_18|WASC_18L| \
114 WASC_17|WASC_17L
115
116 # Extrem kurze Containerwagen
117 $DEF C_EXTREMKURZ=DB_3BT10[O:C20B|CT61|C20SP|C30A|C30A|WB70|WB70|WB70|WB70,,12]
118
119 # Kurze Containerwagen
120 $DEF CKURZW=4:SJ_LGNS2| \
121 1:(G_LGS1|M_443LGS|M_LGS|GO43|G055|GO44|GO57|SNCF_LGS_NV|SNCF_LGS_NC|RF_LFGSS|SNCB_LGNSS1| \
122 RF_LGNSS1L|RF_LGNSS1|RF_LGNSS2L|RF_LGNSS2|RF_LGNSS3L|RF_LGNSS3|RF_LGSS1L|RF_LGSS1|RF_LGSS2L| \
123 RF_LGSS2|DB_LGNS570|SJ_LGNS2)
124 $DEF C_KURZ=CKURZW[O:C20B|C20B|CT61|C20SP|C30A|C30A|C40B|C40B|C40B|C40B|WB70|WB70]
125
126 # Kurze Containerwagen, differenziert beladen
127 $DEF C_KURZ_DIFF=CKURZW[O:2@C20B]|CKURZW[O:2*C20B]
128
129 # Lange Containerwagen
130 $DEF CLANGW=4:SJ_SDGMS|AAE_SGSS_Y703|EVB_SGNS4558A|G_SGNS10|G_SGNS11|G_SGNS12|G_SGNS13|G_SGNS14| \
131 G_SGNGS18|G_SGNGS19|G_SGNGS20|G_SGNGS21|G_SGNGS22|G_SGNGS23|SBB_SGNS|GO48HUPAC|GO48FRET|GO48SNCF| \
132 GO48SEGI|GO48MAV1|GO48MAV2|GO48MAV3|SJ_SDGMS|G_SGNS3|G_SGNS8|G_SGNS7|G_SGNS1|G_SGNS4|G_SGNS5| \
133 G_SGNS6|G_SGNS9|G_SGNS2|G_SGNS15|G_SGNS16|M_457SGNS1|M_457SGNS2|M_457SGNS3|M_457SGNS4|M_457SGNS5| \
134 M_457SGNS6|AAE_SGNSS60|HUPAC_2|HUPAC_196|SBB_SGNS1L|SBB_SGNS1|G_SGS1|G_SGS2|G_SGS3|G_SGS4| \
135 M_454SGS|M_454SGS4|M_SGNSSL|M_SGNSS|M_454SGS2|M_454SGS3|CFL_SLPS1L
136 $DEF C_LANG=CLANGW[O:C40B|C40B|C40B|C40B|CL45_C48|WB90|WB90]
137
138 # Lange Containerwagen, differenziert beladen
139 $DEF C_LANG_DIFF=CLANGW[O:2@CT61|C30A|C30A|C30A|C30A|WB70|WB70|WB70|WB70]| \
140 CLANGW[O:2*CT61|C30A|C30A|C30A|C30A|WB70|WB70|WB70|WB70]|CLANGW[O:3@C20B|C20B]|CLANGW[O:3*C20B]| \
141 CLANGW[O:(C20B,C4)]|CLANGW[O:(C4,C20B)]
142
143 $DEF EUR6FCONW=C_EXTREMKURZ|C_KURZ|C_KURZ_DIFF|C_LANG|C_LANG_DIFF
144
145 # Intermodal-Kombiverkehr
146
147 # Doppeleinheit
148 $DEF F6DOPPEL=(<DB_SDGGMRSSL[OB:AUFLIEGER,,5]| \
149 DB_SDGGMRSSL[O:C30A|C30A|C40B|C40B|C40B|C40B|CL45_C48|WB90|WB90|WB90|WB90,,12]| \
150 DB_SDGGMRSSL[O:2@C20B|C20B|CT61|C20SP|WB70|WB70|WB70|WB70,,12]| \
151 DB_SDGGMRSSL[O:2*C20B|C20B|CT61|C20SP|WB70|WB70|WB70|WB70,,12], \
152 DB_SDGGMRSS[OB:AUFLIEGER,,5]| \
153 DB_SDGGMRSS[O:C30A|C30A|C40B|C40B|C40B|C40B|CL45_C48|WB90|WB90|WB90|WB90,,12]| \
154 DB_SDGGMRSS[O:2@C20B|C20B|CT61|C20SP|WB70|WB70|WB70|WB70,,12]| \
155 DB_SDGGMRSS[O:2*C20B|C20B|CT61|C20SP|WB70|WB70|WB70|WB70,,12])
156
157 # Taschenwagen
158 $DEF F6TASCHENW=4:(SJ_SDGMS833L|SJ_SDGMS833)| \
159 1:(DB_SDKMS707L|DB_SDKMS707|DBAG_SDKMS707L|DBAG_SDKMS707|DBC_SDKMS707L|DBC_SDKMS707|OBB_SDGKKLMS| \
160 OBB_SDGKKMSSL|OBB_SDGKKMSS|SBB_SDGKKLMS|HUPAC_4SGGNOSL|HUPAC_4SGGNOS|HUPAC_5SGGNOSL|HUPAC_5SGGNOS| \
161 SNCF_SDKMMSL|SNCF_SDKMMS|SNCF_KANGB_SEGI|SEGI_K67L|SEGI_K67|SEGI_KBL|SEGI_KB|SEGI_KML|SEGI_KM| \
162 SNCF_SDKMMS_NOVATRANSML|SNCF_SDKMMS_NOVATRANSM|SNCF_KANGB_NOVATRANS|SNCF_SDKMMS_CNCL| \
163 SNCF_SDKMMS_CNC|SNCF_KANGB_CNC_VI|SNCB_SDKMSS_EL|SNCB_SDKMSS_E|SNCB_SDKMSS_OL|SNCB_SDKMSS_O| \
164 BCAR_SDKMSL|BCAR_SDKMS|NS_SDKMMSS_TRAILSTARL|NS_SDKMMSS_TRAILSTAR|DSB_SDKMSL|DSB_SDKMS| \
165 SJ_SDGMS833L|SJ_SDGMS833|FS_SDGKKMMSL|FS_SDGKKMMS|GO47_CNC|SNCF_S73)
166
167 # Intermodal-Kombiverkehr mix
168 $DEF EUR6FKOMBIW=F6DOPPEL|F6TASCHENW[OB:AUFLIEGER,,5]| \
169 CLANGW[O:C30A|C40B|C40B|C40B|C40B|CL45_C48|WB90|WB90|WB90|WB90,,12]| \
170 CLANGW[O:2@C20B|C20B|CT61|C20SP|WB70|WB70|WB70|WB70,,12]| \
171 F6DOPPEL[O:2*C20B|C20B|CT61|C20SP|WB70|WB70|WB70|WB70,,12]
172
173 # Container train EP 6 Freight
174 $DEF EUR6FKOMBI=6-9*(EUR6FCONW|EUR6FKOMBIW|EUR6FCONW|EUR6FCONW)
175
176 #----------------------------------------------------------------------------------------------------
177 #
178 #Middle Europe Freight
179
180 # Container
181
182 # EP 6 Freight long Container 1
183 $DEF Z_D_E6_C1=(<DBC_LGNS570_0L[O:C4I_PO3|C4I_MOL1,21,12], \
184 DBC_LGNS570_0L[O:C4R_CHY|C4R_CHINA3|C4I_LATEXA2|C4I_HANJIN1|C4R_BERTSCHI_DSM|C4S_FEHRING,21,12], \
185 DBAG_SGGMRS715[O:C4R_HAMBURG2|C4R_GEEST1|C4R_DHL1|C4R_COSCO|C4R_CMACGM,17,11] \
186 [O:C4R_KLINE2|C4R_HYUNDAI3|C4R_HAR_VAESSEN,199,11], \
187 DB_SDGGMRS744[O:C4I_CMA1|C4I_CMA_CGM5|C4I_CHINA3|C4R_PO5|C4R_PONED2|C4R_NORFOLK,17,11] \
188 [O:C4I_COSCO3|C4I_BERTSCHI|C4RF_MAERSK1|C4RH_EG2|C4R_PONED2,199,11], \
189 AAE_SGGMRSS104[O:C4S_DANZAS|C4R_ECS1|C4R_HANJIN2|C4R_CAT,197,11] \
190 [O:C4S_KEHRLI|C4R_EG1|C4R_CMACGM1|C4R_HATSU|C4R_CNC,17,11], \
191 AAE_SGGMRSS(90L|90AL|90A|90L|90B)[O:C3B_BERTSCHI|C3B_HOYER3|C3B_BUZZ2|C3B_BERTSCHI1,25,11] \
192 [O:C3T_BUZZ|C3B_EUROPOOL1|C3B_ITALCOMBI2|C3B_NB|C3B_VANDENBOSCH1,180,11], \
193 HUPAC_4[O:C4R_MARUBA|C4R_MITSUI1|C4R_MITSUI2|C4R_NYKL|C4R_PONED1|C4R_U45|C4R_UNIGLORY2|C4R_YANG3| \
194 C4RH_HAPAG|C4RH_NYK2|C4RH_KLINE,,11], \
195 HUPAC_3[O:CT_GRUBER|CT_BERTSCHI12|CT_BERTSCHI14|CT_BERTSCHI13|CT_CAMPIONI|CT_BERTSCHI8,20,11] \
196 [O:CT_HOYER2|CT_HOYER5|CT_CONSERT1|CT_GRUBER|CT_HSFOOD2|CT_HARTOGH2,103,11], \
197 AAE_SGNS_S1[O:C2IT01|CT01|CT31|CT07|CT17|CT12|CT_BERTSCHI7|CT_EUROTAINER2|CT_HARTOGH1|CT_HOYER3| \
198 CT_HSFOOD1|CT_OMYA|CT_RINNEN6|CT_RINNEN7,103,11] \
199 [O:CT04|CT11|CT18|CT10|CT_BERTSCHI|CT_BERTSCHI1|CT_BERTSCHI2|CT_BERTSCHI5,20,11], \
200 SNCB_LGNSS2[O:(C138_29|CL45_C48|C138_26),,12],AAE_LGNSS443[O:(C138_29|CL45_C48|C138_26),,11], \
201 AAE_SGGMRSS(90L|90AL|90A|90L|90B) \
202 [O:C4_SADLEIRS|C4_COSCO|C4_HANJIN|C4_HAPAG3|C4_IBC|C4_KLINE1|C4007|C4_CHOYANG|C4_SADLEIRS,158,11] \
203 [O:C4_FCL|C4I_PO5|C4I_SENATOR1|C4I_YANG_MING2|C4IH_PO1|C4I_SBBC|C4IT_BERTSCHI2|C4IT_SIMONS5| \
204 C4_CAPITAL2,11,11], \
205 AAE_SGGMRSS(90L|90AL|90A|90L|90B) \
206 [O:C4I_HAMBURG1|C4I_HANJIN6|C4I_HAPAG1|C4I_HYUNDAI3|C4I_ITALIA2|C4I_LATEXA1|C4I_MOL4|C4I_MOL1| \
207 C4I_PO2|C4I_SAMSKIP1,158,11] \
208 [O:C4I_CHINA3|C4I_CHINA2|C4I_CHO_YANG2|C4I_CMACGM1|C4I_COSCO1|C4I_COSCO2|C4I_DE_RIJKE1|C4I_DHL1| \
209 C4I_EG5|C4I_GEBRWEISS1,11,11], \
210 AAE_SGGMRSS(90L|90AL|90A|90L|90B) \
211 [O:C4I13|C4I_APL|C4I_CAPITAL1|C4I_CAST2|C4I_CHINA1|C4I_CMACGM3|C4I_COSCO3|C4I_DELMAS1|C4I_EG6| \
212 C4I_GFOK1,158,11] \
213 [O:C4I_HANJIN3|C4I_HANJIN4|C4I_HAPAG|C4I_HYUNDAI1|C4I_IRISL1|C4I_KLINE2|C4I_MOL2|C4I_PO1|C4I_PO3| \
214 C4I_UNIGLORY1,11,11], \
215 AAE_SGGMRSS(90L|90AL|90A|90L|90B) \
216 [O:C4I_SAFMARINE1|C4I_SANARA1|C4I_ZIM1|C4I_ZIM3|C4IH_CDS1|C4IH_CONTAINERSHIPS1|C4IH_EG1| \
217 C4I_NEDLLOYD|C4IR_SKIPPERS1,11,11])
218
219 # EP 6 Freight long Container 2
220 $DEF Z_D_E6_C2=2-3*(AAE_SGGMRSS(90L|90AL|90A|90L|90B) \
221 [O:C4T_02|C4T_RAILROADS|C4T_05|C4T_SIMONS|C4T_SIMONS4,20,11] \
222 [O:C4T_BERTSCHI4|C4RT_BRUHN|C4T_BERTSCHI3|C4T_BERTSCHI1|C4T_SIMONS3,158,11]), \
223 6*((WASC_SGGRSS80L|WASC_SGGRSS80) \
224 [O:C4R_KLINE3|C4R_HAPAG6|C4R_HYUNDAI1|C4R_IFF|C4R_MAERSK2|C4R_MSC4|C4R_OEBB|C4RH_NYK1|C4RO_EG| \
225 C4RO_SEASTAR,10,11] \
226 [O:C4R_HAMBURG3|C4S_DANZASL|C4R12|C4R_BRAUN|C4R_CHY1|C4R_ECS|C4R_UNIGLORY1|C4RH_HAMBURG| \
227 C4RH_KLINE1,138,11])
228
229 # EP 6 Freight long Container 3
230 $DEF Z_D_E6_C3=4-5*(WASC_T2000(|L)|WASC_T5S)[O:WASC_T2000K,82,6][O:WASC_T2000K,259,6] \
231 [O:BOX7_SCHENKER|BOX745_ANSORGE1|BOX745_BAS1|BOX745_BERGMANN1|BOX745_BERTSCHI1|BOX745_BIPA| \
232 BOX745_CARGOFITTT1|BOX745_CARGOFITTT4|BOX745_HANGARTNER5|BOX745_CROSSRAIL2|BOX745_CROSSRAIL4| \
233 BOX745_CROSSRAIL7|BOX745_DANZAS6|BOX745_DHL1|BOX745_DHL6|BOX745_EXEL2|BOX745_FAXION| \
234 BOX745_FERCAM2|BOX745_FRANS2|BOX745_GEBWEISS1|BOX745_GEBWEISS4|BOX745_GESEACO2|BOX745_HANGARTNER3| \
235 BOX745_HANGARTNER7|BOX745_HELLMANN3L|BOX745_HUPAC1|BOX745_MAGETRA2|BOX745_NORFOLKLINE6| \
236 BOX745_PLANZER1|BOX745_REXWAL1P|BOX745_SAIMA|BOX745_SEACO3|BOX745_SIFTE_BERTI1|BOX745_SKANDI2| \
237 BOX745_TIP|BOX745_VANDERGRAAF|BOX745_WALTER2|BOX745_WEYAND1|BOX745_WINNER2|BOX745_HANGARTNER15| \
238 BOX745_HANGARTNER16|BOX745_HELLMANN2|BOX745_LEMAN|BOX745_NORFOLKLINE5|BOX745_PANEUROPA1| \
239 BOX745_PENNY,12,12] \
240 [O:BOX745_ANSORGE2|BOX745_BAS3|BOX745_BERGMANN2|BOX745_BILLA1|BOX745_CARGO_DOMINO1| \
241 BOX745_CARGOFITTT6|BOX745_CONFERN|BOX745_CROSSRAIL3|BOX745_DANZAS5|BOX745_DHL4|BOX745_DREIER3| \
242 BOX745_FERCAM1|BOX745_GEBWEISS3|BOX745_GEBWEISS6|BOX745_GEBWEISS8|BOX745_GEBWEISS10| \
243 BOX745_GEBWEISS13|BOX745_GEBWEISS16|BOX745_GESEACO3|BOX745_HANGARTNER1|BOX745_HANGARTNER13| \
244 BOX745_HELLMANN2|BOX745_HUPAC3|BOX745_NORFOLKLINE7|BOX745_REXWAL1T|BOX745_REXWAL2P|BOX745_SAE5| \
245 BOX745_SEACO2|BOX745_TRANSVERBA2|BOX745_WINNER4|BOX745_SAE3|BOX745_GEBWEISS9|BOX745_GEBWEISS11| \
246 BOX745_GEBWEISS14|BOX745_HANGARTNER17|BOX745_HANGARTNER18|BOX745_HELLMANN1L|BOX745_HELLMANN3| \
247 BOX745_HUPAC4|BOX745_LAGERMAX|BOX745_GRT1|BOX745_SKANDI3|BOX745_TERRATRANS1,91,12] \
248 [O:BOX745_02|BOX745_05|BOX745_ARCESE|BOX745_BERGMANN3|BOX745_BILLA3|BOX745_CARGO_DOMINO2| \
249 BOX745_CARGOFITTT3|BOX745_CONFERNL|BOX745_CROSSRAIL5|BOX745_DENNINGHAUS1|BOX745_DHL7| \
250 BOX745_EVOLA2|BOX745_FORY|BOX745_GEBWEISS2|BOX745_GEBWEISS15|BOX745_GESEACO1|BOX745_GRT2| \
251 BOX745_HANGARTNER7|BOX745_HANGARTNER14|BOX745_HELLMANN1|BOX745_HUPAC2|BOX745_LARLO| \
252 BOX745_MAGETRA1|BOX745_NORFOLKLINE4|BOX745_NORFOLKLINE8|BOX745_PANEUROPA2|BOX745_POST2| \
253 BOX745_REXWAL2|BOX745_ROMERQUELLE|BOX745_SAE4|BOX745_SEACO1|BOX745_SPEDIRAIL|BOX745_TIPES| \
254 BOX745_WINNER5|BOX745_SIFTE_BERTI1|BOX745_REXWAL2L|BOX745_REXWAL2PL|BOX745_SAE3L|BOX745_SAE3| \
255 BOX745_SCHONIL|BOX745_SIFTE_BERTI2|BOX745_SITTAM2|BOX745_TRANSVERBA1|BOX745_VAILLANT| \
256 BOX745_WALTER5,178,12] \
257 [O:BOX745_04|BOX745_ARMANDO_VIDALE|BOX745_BAS4|BOX745_BENNTRANS|BOX745_BERGMANN4|BOX745_BERTSCHI2| \
258 BOX745_BILLA2|BOX745_BR|BOX745_CARGEX|BOX745_CARGOFITTT2|BOX745_CARGOFITTT5|BOX745_CRETSCHMAR| \
259 BOX745_CROSSRAIL1|BOX745_CROSSRAIL6|BOX7_DANZAS3|BOX745_DANZAS8|BOX745_DENNINGHAUS2|BOX745_DHL2| \
260 BOX745_DHL5|BOX745_DPOST2|BOX745_DREIER1|BOX745_ESPERIA|BOX745_EVOLA1|BOX7_FERCAM|BOX745_FORSTER| \
261 BOX745_FRANS1|BOX745_GEBWEISS7|BOX745_GEBWEISS12|BOX745_GEBWEISS17|BOX745_GESEACO5| \
262 BOX745_NORFOLKLINE3|BOX745_NORFOLKLINE9|BOX745_OPTIMUS1|BOX745_OPTIMUS2|BOX745_PANEUROPA1L| \
263 BOX745_REXWAL1|BOX745_REXWAL2TL|BOX745_SAE2|BOX745_SCHONI|BOX745_SIGGI|BOX745_TERRATRANS1| \
264 BOX745_WALTER3|BOX745_WALTER4|BOX745_WINNER1|BOX745_SENN|BOX745_SITTAM1|BOX745_SKANDI1| \
265 BOX745_TERRATRANS2,257,12],2-3*WASC_T5L[O:WASC_T5K,136,5][O:(C138_29|CL45_C48|C138_26),9,11], \
266 2-3*WASC_T5[O:WASC_T5K,61,5] \
267 [O:C4IT_BACHMANN1|C4IT_BERTSCHI3|C4IT_RAILROADS|C4IT_SCHMIDT1|C4IT_SIMONS1|C4IT_SIMONS2| \
268 C4IT_SIMONS3|C4IT_SIMONS4|C4IT_SIMONS6|C4IT_SIMONS1,61,11], \
269 2-3*AAE_SGNS_S1L[O:C4I_LINEAMEX1|C4I16|C4I07|C4I_APL1|C4I_APL3|C4I_AWS1|C4I_BACO1|C4I_CAI2| \
270 C4I_CAPITAL2|C4I_CHINA|C4I_CMA2|C4I_CMA_CGM6|C4I_CMA_CGM4|C4I_CNC1|C4I_DELMAS2|C4I_EG3|C4I_EG4| \
271 C4I_GEBRWEISS1L|C4I_HANJIN2|C4I_HANJIN5|C4I_IRISL3|C4I_KLINE3|C4I_KLINE|C4I_LINEAMEX2|C4I_MOL3| \
272 C4I_MSC1|C4I_MSC2|C4I_OOCL,38,11]
273
274 # EP 6 Freight long Container 4
275 $DEF Z_D_E6_C4=10*(6:(BTS_SGGMRS714_(5|4|3|2|1|2L|1L)[O:(C75|WB74|WB74|CT74),11,11] \
276 [O:(C75|WB74|WB74|CT74),91,11][O:(C75|WB74|WB74|CT74),174,11][O:(C75|WB74|WB74|CT74),254,11])| \
277 1:(BTS_SGGMRS714_(5|4|3|2|1|2L|1L)[O:(C75|WB74|WB74|CT74),11,11][O:(C75|WB74|WB74|CT74),91,11])| \
278 1:(BTS_SGGMRS714_(5|4|3|2|1|2L|1L)[O:(C75|WB74|WB74|CT74),174,11][O:(C75|WB74|WB74|CT74),254,11]))
279
280 # EP 6 Freight long Container 5
281 $DEF Z_D_E6_C5=(<(3*((G_SGNGS5|G_SGNGS7|G_SGNGS9|G_SGNGS8) \
282 [O:(CM_HAMBURG1|CM_HAMBURG2|BOX14_MEGACOMBI01|BOX14_MEGACOMBI02|BOX14_MEGACOMBI03| \
283 BOX14_MEGACOMBI04|BOX14_MEGACOMBI05|BOX14_MEGACOMBI06|BOX14_MEGACOMBI07|BOX14_MEGACOMBI08| \
284 BOX14_MEGACOMBI09|BOX14_MEGACOMBI10|BOX14_MEGACOMBI11|BOX14_MEGACOMBI12|BOX14_MEGACOMBI13| \
285 BOX14_MEGACOMBI14|BOX14_MEGACOMBI15|BOX14_MEGACOMBI16|BOX14_MEGACOMBI17|BOX14_MEGACOMBI18| \
286 BOX14_MEGACOMBI19|BOX14_MEGACOMBI20|CM_FORD),,11])), \
287 3*((ERR_SGS|ERR_SGSL) \
288 [O:(BOX745I_BERGMANN3|BOX745I_CARGODOMINO5L|BOX745I_CARGODOMINO5|BOX745I_CARGODOMINO6L| \
289 BOX745I_CARGODOMINO6|BOX745I_DE_WAARD2|BOX745I_FERCAM1|BOX745I_GESEACO1|BOX745I_CARGODOMINO6L),9, \
290 11] \
291 [O:(BOX745I_CARGOLINE1|BOX745I_02|BOX745I_03|BOX745I_GESEACO2|BOX745I_GESEACO3|BOX745I_GESEACO4| \
292 BOX745I_LUCA1|BOX745I_PANEUROPA1|BOX745H_GRANVOLUME|BOX745H_GRT|BOX745I_05),114,11]), \
293 5*((BTS_SGGMRS714_2L|BTS_SGGMRS714_1L|BTS_SGGMRS714_1|BTS_SGGMRS714_2|BTS_SGGMRS714_4| \
294 BTS_SGGMRS714_5) \
295 [O:(BOX14_AMBROGIO04|BOX14_AMBROGIO03|BOX14_AMBROGIO06|BOX14_AMBROGIO07|BOX14_AMBROGIO08| \
296 BOX14_AMBROGIO09|BOX14_AMBROGIO01|BOX14_AMBROGIO22|BOX14_AMBROGIO23|BOX14_AMBROGIO24|BOX14_02| \
297 BOX14_04|BOX14_05|BOX14_ALBERTI_SPANTI2|BOX14_CROSSRAIL4|BOX14_DACHSER1|BOX14_AMBROGIO25| \
298 BOX14_AMBROGIO26),22,11] \
299 [O:(BOX14_AMBROGIO04|BOX14_AMBROGIO11|BOX14_AMBROGIO12|BOX14_AMBROGIO13|BOX14_AMBROGIO14| \
300 BOX14_AMBROGIO15|BOX14_AMBROGIO16|BOX14_AMBROGIO17|BOX14_AMBROGIO21|BOX14_GEEST3|BOX14_MVT1| \
301 BOX14_SAMSKIP|BOX14_BAS|BOX14_CONTAINERLEASING|BOX14_AMBROGIO18),184,11]), \
302 4*((PCCR_SGS2|G_SGS5|PCCR_SGS) \
303 [O:(BOX745I_CARGODOMINO6L|BOX745I_CARGOLINE2|BOX745I_CAWA_TRANS1|BOX745I_DE_WAARD1|BOX745I_BAS3| \
304 BOX745I_BAS4|BOX745I_HELLERMANN1|BOX745I_HELLERMANN2|BOX745I_HELLERMANN4|BOX745I_REXWAL1| \
305 BOX745I_REXWAL2|BOX745I_REXWAL3|BOX745I_REXWAL4|BOX745I_REXWAL5|BOX745I_REXWAL6|BOX745I_REXWAL9| \
306 BOX745I_06L|BOX745I_04|BOX745I_06|BOX745I_07|BOX745I_08|BOX745I_BAS1|BOX745I_BAS2|BOX745I_01| \
307 BOX745I_BERGMANN5|BOX745I_BILLA1|BOX745I_BILLA2|BOX745I_BILLA3|BOX745I_CARGO_FITTT1| \
308 BOX745I_SEACO2|BOX745I_SEACO3|BOX745I_SIFTE_BERTI1|BOX745I_SIFTE_BERTI2|BOX745I_SIGGI1| \
309 BOX745I_WETRON1|BOX745IF_PIPE1|BOX745IF_PIPE2|BOX745IR_CARGODOMINO1L|BOX745IR_CARGODOMINO1| \
310 BOX745IR_CARGODOMINO2L|BOX745IR_CARGODOMINO2),16,12] \
311 [O:(BOX745I_CARGOLINE1|BOX745I_BIPA1|BOX745I_CARGO_FITTT7|BOX745I_CARGODOMINO1L| \
312 BOX745I_CARGODOMINO1|BOX745I_CARGODOMINO3L|BOX745I_CARGODOMINO3|BOX745I_CARGODOMINO4L| \
313 BOX745I_CARGO_FITTT6|BOX745I_CARGODOMINO2L|BOX745I_CARGODOMINO2|BOX745I_HELLERMANN5| \
314 BOX745I_KOESTER_HAPKE1|BOX745I_LARLOEXPRESS1|BOX745I_PANEUROPA2|BOX745I_PENNY1| \
315 BOX745I_CARGO_FITTT2|BOX745I_CARGO_FITTT3|BOX745I_CARGO_FITTT4|BOX745I_CARGO_FITTT5| \
316 BOX745I_CARGODOMINO4|BOX745I_ESPERIA1|BOX745I_FERCAM2|BOX745I_GESEACO5|BOX745I_HELLERMANN3| \
317 BOX745I_RCA_AUTOTEILE1|BOX745I_RCA_AUTOTEILE2|BOX745I_REXWAL7|BOX745I_REXWAL8|BOX745I_SAE2| \
318 BOX745I_SAE3|BOX745I_SCHOENI1|BOX745I_SCHOENI2|BOX745I_SEACO1),104,12]))
319
320 # EP 6 Freight long Container 6
321 $DEF Z_D_E6_C6=10-12*((KOMBI_T2000(A|B)(|L)[O:C2I_MSC(4|5|6|7|8|9),17,12][O:C2I_MSC(4|5|6|8|9),81,12] \
322 [O:C2I_MSC(4|5|6|8|9),197,12][O:C2I_MSC(4|5|6|8|9),261,12])| \
323 (CGN_T2000B(|L)[O:C4I_MSC(4|5|6|8|9),17,12][O:C4I_MSC(4|5|6|8|9),200,12])| \
324 (AT_T2000(B|RBS)(|L) \
325 [O:C4IH_(SEACO|SEAWHEEL|POWER|OOCL(|2|3|4)|NORFOLKLINE|HYUNDAI|UASC|NYK2|WANHAI2|TURKON(|2)| \
326 OOCL(|2|3|4)),17,12] \
327 [O:C4IH_(MOL|LLOYD(|2|3)|HORIZON(1|2|3)|MARUBA|SAMSKIP|SAFMARINE|NAMSUNG|NEDLLOYD2|YANGMING),200, \
328 12])| \
329 (KOMBI_T2000(A|B)[OB:STRAILST1,34,11][OB:STRAIL_VANDIEREN(2|3|4|5|6|7|8|9|10)[!L],20,4] \
330 [OB:STRAIL_(TRANSCO1|WETRON|TRANSLOG|TRANSCO2|SCHONI(4|3|1|2)|PNO|MAINSPED(3|4)),188,4] \
331 [OB:STRAILST1,305,11])| \
332 (WASC_SGNSS(|L)[O:(C3I_(ZIM(1|2)|IFF(3|4)|GRP|INTERBULK)|C3IO_01),9,11] \
333 [O:C3I_(TIPES|SIMONS|NIJHOF(1|2)|BRUHN|SETTI),101,11])| \
334 (AAE_SGGMRSS(90L|90AL|90A|90L|90B)[O:C4IT_(08|05|06|07|09|10),10,11][O:C4IT_EUROPOOL(1|2),163,11])| \
335 (G_SGGMRSG2(|L)[O:C4IF_(NEDLLOYD3|NYK3|WANHAI1)|(C4I_(TROPICAL|WANHAI|NORFOLKLINE)),9,11] \
336 [O:C4IH_(NORDEX|SEACARGO|SEACO2|SINOTRANS|SEA2RAIL|ZIM(|2)),164,11]))
337
338 # EP 6 Freight long Container 7
339 $DEF Z_D_E6_C7=11-13*((KOMBI_SDGGMRS(|4|2|3)[OB:STRAILST1,35,8][OB:STRAILST1,300,8][OB:(STRR),188,3] \
340 [OB:(STRL),18,3])| \
341 (KOMBI_T2000(B|A)(|L) \
342 [O:C4I_MSC7|C4I_JINJANG|C4IH_CARU|C4IH_HEUNG|C4IO_HAPAG1|C4IO_MSC|C4IO_YANGMING|C4IH_PONED| \
343 C4IH_SITC|C4IH_MSC|C4IH_HORIZON1|C4IH_CROWLEY|C4IH_GESEACO|C4IH_GVC,19,12] \
344 [O:C4I_MSC7|C4IO_EG2|C4IO_MAERSK|C4IO_PO|C4IH_KLINE|C4IH_2XL|C4IH_CROWLEY2|C4IH_GEEST|C4IH_PO4| \
345 C4IH_GVC|C4IH_ABX|C4IH_HATSU,202,12])| \
346 (G_SGNGS7[O:(BOX745_09|BOX745_ASSOCARGO|BOX745_GHP),23,11][O:(BOX745_09|BOX745_REXWAL2T),99,11])| \
347 ((PCCR_SGS2|G_SGS5) \
348 [O:(CT_RINNEN(8|9)|CT_EXSIF|CT_TRANSAMERICA(1|2|3)|CT_RODELLA(1|2|3|4)|CT_RMI(2|3|5)|CT_MEURER| \
349 CT_ALFRED_TALKE),18,12] \
350 [O:(CT_HARTOGH|BOX745_08|BOX745_CARGOFITTT7|BOX745_HORNBACH|BOX745_DANZAS4|BOX745_CERES_STRONGALE| \
351 CT_ITC(2|3)),105,12])|(2*DB_SGJKKMMS(1|2|3)[O:CL45_C48,,12])| \
352 (2*DBC_SGKKMS698A(|L)[O:CL45_C48,,8])| \
353 (WASC_SGGRSS80(|L)[O:(C2I_CARU|C2I_DELMAS2|C2I_HEUNG_A|C2I_KTS|C2I_TURKON|(C2I_UNIT20(|L))),8,11] \
354 [O:(C2IO_COSCO|C2IO_TIPES|(C2IO_GTM(3|2|1))|C2IO_TIPES|(C2IO_EBERHARD(1L|2L|1|1L))),69,11] \
355 [O:(C4RS_2XL|C4R_SF|C4RH_GARTNER1|C4I_GOLD2|C4IS_TFG|C4IH_NYK1|C4R_2XL|C4RH01),137,11])| \
356 (G_SGGMRS1[O:WBGALL,15,11][O:WBGALL,>323,11])), \
357 (2*(DB_LGJNS576KM|DB_LGJNS576VRM|DBC_LGS579M|DBS_LGS579M)[O:C20A,11,12][O:C20A,73,12]), \
358 (2*(DB_LGS580M|DBC_LGS580M|DBS_LGS580M)[O:C40B,,12])
359
360 # EP 6 Freight Container 8
361 $DEF Z_D_E6_C8=15-18*(((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[OT:C30A,7,11] \
362 [OT:C30A,99,11])|(AAE_SGNSS10A(|L)[O:(2*C30A|3*C20B|C40B),,11])| \
363 ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[OT:C20A,7,11][OT:C20A,68,11] \
364 [OT:C20A,128,11])|(AAE_SGNS4553467[O:WBGA75,9,12][O:WBGA75,>188,12])| \
365 ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[OT:C40B,7,11][OT:C20A,128,11])| \
366 ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[OT:C40B,7,11])| \
367 ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L)) \
368 [O:CT_BERTSCHI11|CT_CHIMICAL_EXPRESS|CT_CONSERT2|CT_CONTAINERDIENST|CT_HOYER1|CT_MILKA|CT_REXWAL| \
369 CT_TANKCT|CT_TIPHOOK,112,11][OT:C30A,99,11])| \
370 ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[O:C20B,7,11][O:C20B,68,11] \
371 [O:C20B,129,11])| \
372 ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[O:C2I_EXTE_WOOD(1|2|3|4|5|6),7,11] \
373 [O:C2I_EXTE_WOOD(1|2|3|4|5|6),68,11][O:C2I_EXTE_WOOD(1|2|3|4|5|6),129,11])| \
374 (G_SGGMRSG(|2|3|4|5|6|7|8|9|10|11|12)[OT:C40B,160,11][OT:C40B,15,11])| \
375 (CEMAT_SGNSS[O:C30A,9,11][O:C30A,100,11])|(CEMAT_SGNSS[O:C40B,9,11]))
376
377 # EP 6 Freight Container 9
378 $DEF Z_D_E6_C9=15-18*(((WASC|HUPAC)_T5(|L)[O:WB71,12,11][O:WB71,117,11])| \
379 ((WASC|HUPAC)_T5(|L)[O:(WB72|WB73),11,11][O:(WB72|WB73),116,11])| \
380 ((WASC|HUPAC)_T5(|L)[O:(WB74|WB75),10,11][O:(WB74|WB75),115,11])| \
381 ((WASC|HUPAC)_T5(|L)[O:(WB76|WB77),9,11][O:(WB76|WB77),114,11])| \
382 ((WASC|HUPAC)_T5L[O:(WB74|WB75),10,11][O:C3P_EWALS05,92,11])| \
383 ((WASC|HUPAC)_T5(|L)[O:WB90,17,11][O:WB71,115,11])|((WASC|HUPAC)_T5[O:WB90,17,11][O:WB71,115,11])| \
384 (AAE_SGNNS1(|L)[O:(CT_STAR|CT_BERTSCHI16(|L)|CT21|CT_HARTOGH4|CT_HOYER7|CT_STAR),12,11] \
385 [O:(CT_BERTSCHI16(|L)|CT21|CT_HARTOGH4|CT_HOYER7),102,11])| \
386 ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[OT:C40B,7,11][OT:C20A,128,11])| \
387 (G_SGGMRSG(|2|3|4|5)(|L)[O:C40B,164,11])|(CBR_SGGMRSS1(|L)[O:C40A,10,12][O:C40A,159,12])| \
388 (WASC_SGGMRSS90L[O:BOX745I_REXWAL8,13,11][O:BOX745I_REXWAL8,207,11])| \
389 ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[OT:C7(7|9),9,11][OT:C7(7|9),111,11])| \
390 (G_SGGMRSS2(|L)[O:(C4_SEALAND|C4_GREENC01|C4_GREENC02L|C4_GREENC02),9,12] \
391 [O:(C4_SEALAND|C4_GREENC01|C4_GREENC02L|C4_GREENC02),172,12][OT:C7(7|9),9,11][OT:C7(7|9),111,11]))
392
393 # EP 6 Freight Container 10
394 $DEF Z_D_E6_C10=15*((G_SGNGS(18|20|21|22|23|19) \
395 [O:((C20(A|B),C20(A|B),C20(A|B))|(C40B,C20(A|B))|(C20(A|B),C40B)|(C30A,C30A)),,11])| \
396 (G_SGNS(24|25|26|26L|27|27L|22L) \
397 [O:((C20(A|B),C20(A|B),C20(A|B))|(C40B,C20(A|B))|(C20(A|B),C40B)|(C30A,C30A)),,11])| \
398 (ERR_SG(S|S1|NS_S_FBRPCC|NS_SFBR|NS_S|NS_SPCC)(|L) \
399 [O:((C20(A|B),C20(A|B),C20(A|B))|(C40B,C20(A|B))|(C20(A|B),C40B)|(C30A,C30A)),,11])| \
400 (G_SGGMRS1 (([O:(C40B),7,11][O:(C40B),209,11])| \
401 ([O:(C20(A|B),30,C20(A|B)),7,11][O:(C20(A|B),30,C20(A|B)),179,11]))))
402
403 # EP 6 Freight Container 11
404 $DEF Z_D_E6_C11=5-8*NOVATRANS_K(UM|CM|1ML|1M)[O:(C40A),,13], \
405 7-11*(RAI_SGNS691M(|L)|DB_SGNS691VRM(|L)|DBC_SGNS691M(|L)|DB_SGNSS704M(|L)|DBS_SGNSS704M(|L)| \
406 ERR_SGNSS3_60M|EVB_SGNS4558AM|KOMBI_SGSS703M)[O:C60(A|B),7,12]
407
408 # EP 6 Freight long Container MiX
409 $DEF D6FCM=Z_D_E6_C(1|2|3|4|5|6|7|8|9|10|11)
410
411 # Tank ------------------------------------------------------------
412
413 # EP 4 Freight tank cars mixed
414 $DEF D4FZ1=22*((DB_LBSEAG36_BP1M|DB_S24_ESSO2M|DB_S24_ESSO3M|DB_LBUE30_ESSO2M|DB_LBUE30_ESSO3M| \
415 VTG_S26_2M|VTG_LBUE30_2M|VTG_LBLHB40_2M|VTG_LBLHB40_1SHELLM|VTG_Z_LBLHB40_2SHELLM)(|L))
416
417 # EP 5 Freight tank cars mixed
418 $DEF D5FZ1=22*((VTG_ZACNS(1|2|3)|VTG_2(A|B)(|L)|VTG_ZANS(1|2|3|4)(|L)| \
419 (VTG_ZAS1|DB_KW4_1|VTG_ZAS807849695(|L)|VTG_ZAS857862487(|L))))
420
421 # EP 6 Freight short tank cars 1
422 $DEF Z_D_E6_G_KK1=5*(NACCO_1L|NACCO_1|NACCO_3L|NACCO_3|NACCO_5|NACCO_5L|NACCO_6|NACCO_6L|GATX_ZAS1| \
423 MINOL_7845444|DB_KW4_1|GATX_7|WASC_11|VTG_10|ERMEWA_7956102|KVG_Z1|WASC_6L|VTG_2A|ONRAIL_3L| \
424 GATX_1L|GATX_DHL1L|ERMEWA_1|DEC_KVG_1L|MINOL_7967200|VTG_7|VTG_Z1|KVG_ZAS1|KEG_ZAS1|VTG_ZAS1|GT32| \
425 KVG_7956310|VTG_7957043|NACCO_7956673)
426
427 # EP 6 Freight short tank cars 2
428 $DEF Z_D_E6_G_KK2=ERMEWA_OMV_Z01L,VTG_KEWA_01L,WASC_OMV_01L,WASC_OMV_01,G_Z1
429
430 # EP 6 Freight short tank cars 3
431 $DEF Z_D_E6_G_KK3=7-9*(KVG_ZAGS(|L)|NACCO_ZAG(|N)S(|L)|DB_ZAG(|N)S_WESTFALENGAS(|L)| \
432 DB_ZAG(|N)S_LANGEGAS(|L)|DB_ZAGS_LOTTER(|L))|PANGAS_ZS7416005(|L)
433
434 # EP 6 Freight short tank cars mixed
435 $DEF D6FZKM=Z_D_E6_G_KK(3|2|1)
436
437 # EP 6 Freight long tank cars 1
438 $DEF Z_D_E6_G_Kessel=GT16,VTG_Z2,VTG_859823,NSB_UADHS,M_ZAES_11,GATX_11,VTG_16,GT29,VR_ZAGS_Y25, \
439 GT_CO2,DB_Z5CHLOR2,ERMEWA_5_ZAEFS7899L|ERMEWA_5_ZAEFS7899,WASC_4L,VTG_2A, \
440 GATX_DHL1L|GATX_DHL2L|GATX_DHL2|GATX_DHL1,ERMEWA_1L,ONRAIL_2
441
442 # EP 6 Freight long tank cars 2
443 $DEF Z_D_E6_G_Kessel2=3*((5*(GATX_ZAS1|GATX_1L|GATX_1|GATX_DHL1L|GATX_DHL1|GATX_DHL2L|GATX_DHL2))| \
444 (5*(BASF_(4|5|6)(|L)))|(5*(WASC_2(1|2|0)(|L)))| \
445 (5*(EVS_GPS|DEC_5_ZAESRT500A1(|L)|DEC_5_ZAGKKS406RU(|L)|KVG_5_ZAGKKS406RU(|L))))| \
446 (4-5*(VTG_Z12L|VTG_Z5L|G_6_Z4_02|ERMEWA_4|VTG_4_ZAFS7899004))|(4*Z_D_E6_G_KK(1|3|2))
447
448 # EP 6 Freight long tank cars 3
449 $DEF Z_D_E6_G_Kessel3=4-5*((4-5*(G_46552_1|WASC_(15|10|14|8|9|11)|WASC_OMV_01(|L)| \
450 WASC_(1|2|3|4|5|7|6)(|L)|WASC_STE1))|(4-5*(VTG_(11|8|Z2)|VTG_KEWA_01(|L)))| \
451 (4-5*(GATX_(8|2|6|7)|GATX_ZANS(3|2|1)(|L)|DEC_(GATX|KVG)_1(|L)))| \
452 (4-5*(DB_ZAGNS_(LANGEGAS|WESTFALENGAS)(|L)|DB_ZAGS_(LOTTER|WESTFALENGAS(|2))(|L)| \
453 (NACCO|KVG)_ZAGS(|L)|NACCO_ZAGNS(|L)))| \
454 (4-5*(ONRAIL_(3|1|2)(|L)|ERMEWA_1(|L)|GATX_EXDEC(1|2|3|4)(|L)))|(4-5*(NACCO_(6|1|3|2|4|5)))| \
455 (4-5*(SBB_Z_AVIA(1|2|3)(|L))|ERMEWA_ZANS(|L)))
456
457 # EP 6 Freight long tank cars 4
458 $DEF Z_D_E6_G_Kessel4=4-5*((4-5*VTG_ZAGNS(8|6|7)(|L))| \
459 (4-5*((WASC_ZAGKKS1|WASC_ZAGNS|WASC_ZAGS1|CARBA_ZAGS7811302)(|L)))|(4-5*VTG_ZAGNS(1|2|3|4|5)(|L))| \
460 (4-5*VTG_ZAGS(1|2|3|4|5)(|L))|(4-5*DB_ZAGS_(LOTTER|LANGEGAS)(|L))| \
461 (4-5*BASF_ZAGS(1|2|3|1L|2L|3L|4L))|(4-5*DB_ZAGS_WESTFALENGAS(|2|3|4|5)(|L))| \
462 (4-5*((MITRAG_ZAGKKS|VTG_ZAGKKS857915018|ERMEWA_ZAGS1)(|L)))| \
463 (4-5*((ERMEWA_ZANS|GATX_ZANS_DB|GATX_ZANS_ZSSK)(|L))))
464
465 # EP 6 Freight long tank cars 5
466 $DEF Z_D_E6_G_Kessel5=14*((VTG_ZACES1|VTG_ZACS8078(65145|45374|68214|68208)|ATIR_ZACNS1|GATX_ZACS1| \
467 ERMEWA_ZAFNS1|ERMEWA_ZACNS1|SLVAG_ZAES7861023|ERMEWA_ZAS(2|1)|CTL_ZACS7861763|ATIR_ZACNS807841995| \
468 VTG_ZACNS807846770|OSAG_ZAS7857214|VTG_ZANS(1|2|3|4|5|857837543|857836331|817837590)| \
469 VTG_ZAS(2|857862487|807849695)|WASC_ZANS1|GATX_ZANS4|SCHENK_ZAS0774125|DEC_KVG_2| \
470 GATX_ZACENS(1|857931069)|ALCOS_ZAS7852(222|203)|OBB_ZANS7837421|SNCF_ZANS78(36337|48191|48119)| \
471 VTG_ZACNS857929212|VTG_ZACNS857929213|VTG_ZAS807849217|ERMEWA_ZANS877848(537|199|246)| \
472 WASC_ZAS8578574(01|02|04))(|L)), \
473 3*((ALCOS_ZS7353832|VTG_ZCS807366382|BSH_ZCS7366120|SBB_ZS7357790|LONZA_ZCS7367(500|527|513|526)| \
474 ALCOS_ZS7353812|WASC_ZGS807318077|SCHENK_ZS7(207507|359705|359701))(|L))
475
476 # EP 6 Freight long tank cars 6
477 $DEF Z_D_E6_G_Kessel6=4-5*((4-5*(MILLET_ZANS|VTG_ZACNS)(|L))|(4-5*WASC_ZANS(|_OMV)(|L))| \
478 (4-5*ERMEWA_ZANS(|_OMV)(|L))|(4-5*(KVG_ZANS|VTG_ZACNS)(|L))|(4-5*GATX_ZANS_(DB|ZSSK)(|L)))
479
480 # EP 6 Freight long tank cars mixed
481 $DEF D6FZM=Z_D_E6_G_Kessel(|2|3|4|5|6)
482
483 # mixed ---------------------------------------------------------------
484
485 # EP 6 Freight private shunting
486 $DEF D6FP1KC=(3-4*(NACCO_EANOS(1|2)(|L)[OB:SCRAP(4|5|6)(|[M]),,31]))| \
487 (3-4*(CAPT_EAOS(2N|_N)(|L)[OB:SCRAP_1(4|5|3)(|[M]),,28]| \
488 CAPT_EAOS(|2)(|L)[OB:SCRAP_1(4|5|3)(|[M]),,33]))|(3-4*ERMEWA_UACNS809327026(|L))| \
489 (3-4*VTG_SHIMMNS467(A|B|C|D|E|F|G|H|I|J|K)(|L))|(2-3*VTG_TADS960A)| \
490 (3-4*((ERMEWA_UACNS(4|5)|GATX_UACNS1|VTG_UACNS3)(|L)))| \
491 (3-4*VTG_RBS(3|1)(|L)[OB:WOOD(124|19|24)(|[M]),,12])| \
492 (3*(DB_HABBIILLNS2802004|DB_HABINS2783076|TWAG_HABIIS802846946|TWAG_HABBIINS802846979| \
493 TWAG_HABIIS802743354L|TWAG_HABIIS802743354|TWAG_HABIINS802745458L|TWAG_HABIINS802745458| \
494 TWAG_HABBIINS802743013L|TWAG_HABBIINS802743013|TWAG_HABBIINS802743088L|TWAG_HABBIINS802743088| \
495 TWAG_HABINS1L|TWAG_HABINS1|TWAG_HABINS2|TWAG_HABBIINS802743390L|TWAG_HABBIINS802743390| \
496 TWAG_HABBIINS802743617L|TWAG_HABBIINS802743617|DB_HABINS2771967L|DB_HABINS2771967| \
497 DB_HABBINS350_2770257L|DB_HABBINS350_2770257|DB_HABBIINS2742422L|DB_HABBIINS2742422| \
498 TWAG_HABBIINS802742071L|TWAG_HABBIINS802742071|TWAG_HABIINS802745485))| \
499 (3-4*(ERMEWA_UACNS(1|2|_RSB)(|L)|XSLO_UACNS(|L)|ENVI_UACNS0(1|2)(|B)(|L)|CFR_UACS|DB_UACS|DBC_UACS))| \
500 (3-4*ERR_EANOS(|_FBR)(|L)[OB:SCRAP_1(4|5|3)(|[M]),,34])|(2*TWAG_LAAIIS985(D|B|A|C))| \
501 (3-4*AWT_EAOS(|L)[OB:SCRAP(4|5|6)(|[M]),,30])|(3-4*GATX_2)|(3-4*WASC_12)|(3-4*(ERMEWA_UACNS1))| \
502 (3-4*(G_UAGPS1(|L)))|(3-4*(EVS_UACS(1|2|3|4)(|L)))|(3-4*(VTG_UACS(1|2|3|4|5|6|7)(|L)))| \
503 (3-4*HGK_EAOS(2|1)(|L)[OB:SCRAP_1(4|5|3)(|[M]),,33])|(3-4*(G_6_HBBINS0(2|1|3|4|5)(|L)))| \
504 (3-4*(VTG_EANOS(2|1|2FBR)(|L)[OB:SCRAP(8|10|9)(|[M]),,33]|VTG_EAOS(|L)[OB:SCRAP(4|5|6)(|[M]),,33]))| \
505 (3-4*HGK_EAOS(2|1)(|L)[OB:SCRAP_1(4|5|3)(|[M]),,33])|(3-4*G_6_HBBINS0(2|1|3|4)(|L))| \
506 (3-4*(SBB_RS3901A|SBB_2750500GR1))|(3-4*((HVLE|ITL)_RES(|L)[O:FR31(|[M])]))| \
507 (3-4*ONRAIL_EAOS(2|1|_BA070)(|L)[OB:SCRAP(4|5|6)(|[M]),,33])|(3-4*TWAG_HIIRRS(1|2|3|4|5|6))| \
508 (3-4*EICH_6_EAOSX054(|L)[OT:SCRAP(6|5|7)(|[M]),,32])|(3-4*(CVIR_UACS0(1|2|3|4|4)(|L)))| \
509 (3-4*(EVS_UACS(2|3)(|L)))|(3-4*G_0(09|10|14))| \
510 (3-4*(GREINER_HBKS|GH_HBBKS|EUROPLASTIC_HBBKS|LANG_HBBKS|SOGEFA_HBKS|DUNLOP_HBBKS)(|L))
511
512 # EP 6 Freight private short
513 $DEF D6FP1K=2*D6FP1KC
514
515 # EP 6 Freight private long
516 $DEF D6FP1=6-7*D6FP1KC
517
518 # EP 6 Freight long wood
519 $DEF Z_D_E6_G_Holz=5*(RTRAN_UAS_O|RTRAN_UAS_N|RTRAN_UAS_Y25), \
520 7*(RTRAN_LAAPS1W|RTRAN_LAAPS2W|G_LAARS_W1L|G_LAARS_W1|G_LAARS_W2L|G_LAARS_W2|G_LAARS_W3L| \
521 G_LAARS_W3|G_LAARS_W4L|G_LAARS_W4|G_LAARS_W5L|G_LAARS_W5|G_LAARS_W6L|G_LAARS_W6|G_LAARS_W7L| \
522 G_LAARS_W7|G_LAARS_W8L|G_LAARS_W8),G_SNPS_XL_W(|L)
523
524 # EP 6 Freight long steel
525 $DEF D6FP2=14*(ERR_RCA_SHIMMNS1L|ERR_RCA_SHIMMNS1|ERR_RCA_SHIMMNS2L|ERR_RCA_SHIMMNS2| \
526 ERR_RCA_SHIMMNS3L|ERR_SHIMMNS728AL|ERR_SHIMMNS728A|ERR_SHIMMNS728BL|ERR_SHIMMNS728B| \
527 ERR_RCA_SHIMMNS3|NACCO_SHIMMNS1L|NACCO_SHIMMNS1|NACCO_SHIMMNS2L|NACCO_SHIMMNS2|NACCO_SHIMMNS3L| \
528 NACCO_SHIMMNS3|NACCO_SHIMMNS4L|NACCO_SHIMMNS4|NACCO_SHIMMNS5L|NACCO_SHIMMNS5|ERR_SHIMMNS1L| \
529 ERR_SHIMMNS1|ERR_SHIMMNS2L|ERR_SHIMMNS2|ERR_SHIMMNS_B1L|ERR_SHIMMNS_B1|ERR_SHIMMNS_B2L| \
530 ERR_SHIMMNS_B2|ERR_SHIMMNS_B3L|ERR_SHIMMNS_B3|NACCO_SHIMMNS6|NACCO_SHIMMNS7|NACCO_SHIMMS1L| \
531 NACCO_SHIMMS1)
532
533 #----------------------------------------------------------------------------------------------------
534 #
535 #Hungary
536
537 # KKSTB EP1 = Austria
538
539 # EP 3B Freight short
540 $DEF H3GS=(4-5*((M_KZ(|H|HL)[OB:FR_SAND1|FR_REPA2(|[M]),,25])))| \
541 (4-5*(M_GAX(|H)(4|3|2|1)(|L)|M_3_GZK(|H)(|L)))|(4-5*(M_3_KHM))| \
542 (4-5*(M_216HEKS3|M_148GGS2|M_148GGS3|M_148GGS5|GY_148GGS3|M_GGS2|M_148GGS4|GY_148GGS4|GY_148GGS5))| \
543 (4-5*(M_3_KY(|B|BL|H|HL|L)[OB:COAL(43|45|44|40|57)(|[M]),,27]))|(4-5*M_330KS1(4|3|2|1))| \
544 (4-5*M_LCK)|(4-5*M_(L|3_LV1))|(4-5*(M_GGH(1|2)(|L)|M_G(2|1|3|2H|2HL)))|(4-5*M_ZS2(|L))| \
545 (3-4*(M_3_GJO176(|L)|M_3_LZ139103(|L)),MAV_3_RT510390(|L))| \
546 (4-5*(M_3_G(|L|H|HL|U|UHL|UH|U193|U193L|Z|ZL|ZE141433L|ZE141433|P|PL|ZKH|ZKHL|ZK|ZKL|HF1)))| \
547 (4-5*(M_394RGS12[OB:BOILERRINGS,,12]|M_394RGS13[OB:BOILER3,,12]))| \
548 (4-5*(M_3_GU(|H|HL)|M_3_GZ(|L)|M_3_GYEKO(|H)(|L)|M_3_GP(|L)|M_3_GHF(0|1)))| \
549 (4-5*(M_157GBGS2|M_157GBGS5|M_157GBGS6|M_157GBGS8|M_157GBGS12|GY_157GBGS2|GY_157GBGS4|GY_157GBGS5))| \
550 (4-5*(M_395RMMS1[O:BELFA1A,,12]|M_395RMMS2[O:TARP11,,12]|M_393RES12[O:SCRAP18]|M_393RES13[O:SCRAP4]))
551
552 # EP 3B Freight long
553 $DEF H3FL1=(5*H3GS)| \
554 (<M_KZHL,M_KZH,M_J|M_KZM|M_KZ|M_GZKK|M_GZKKL,M_GZK,M_G3H|M_G1HL|M_G1H|M_G2HL|M_G2H|M_G3HL, \
555 M_JZKN|M_JZ|M_JZHL|M_JZH|M_JZKNHL|M_JZH1|M_JZH2,M_072TCS4,M_072TCS7|M_JZKNH, \
556 M_ZA0_BCL|M_785ZAS_MOL|M_785ZAS_BC,M_330KS1,((M_330KS2|M_330KS3|M_330KS11)[OB:BETONPIPE1,,12]), \
557 ((M_330KS12|M_330KS13|M_072TCS1)[OB:HIPRES_BURNER,,10]),M_633FCCPP1|M_633FCCPP4L,M_633FCCPP3L, \
558 M_633FCCPP5L|M_633FCCPP4|M_633FCCPP4L,M_G1|M_G3|M_G2,M_HS,M_GAXH1,M_GAXH3|M_GAX1L|M_ZS2L, \
559 M_216HEKS4|M_216HEKS2|JZ_GDOVGL|M_GGH1|M_GGH2L,M_GGH1L|M_GGH2|JZ_GDOVG,M_806ICHQRS)
560
561 # EP 3B Passenger 2x
562 $DEF H3P2=(<M_BZX59000L,M_BZ52000L,2*M_BZ53000L,M_AZ16000L|M_AZ10000L,M_BZ56000L,M_DNZ64000)| \
563 (<M_DNZ64000L,M_BZ52000,2*M_BZ53000,M_AZ16000|M_AZ10000,M_BZ56000,M_BZX59000)
564
565 # EP 3 Passenger long distance
566 $DEF H3PD1=(<M_3B_BA3000L,M_3B_ABA2000L|M_3B_ABA2000,M_3B_AA1000L|M_3B_AA1000,M_3B_WR200L|M_3B_WR200, \
567 M_3B_WR200(|L)|M_3B_WR300L|M_3B_WR300, \
568 2*(M_3B_BA3000L|M_3B_BA3000|M_3B_BAK5100L|M_3B_BAK5100|M_3B_BAK5300L|M_3B_BAK5300|M_3B_BAK5400L| \
569 M_3B_BAK5400),M_3B_BAKET3800|M_3B_BAKET3800L)
570
571 # EP 4 Passenger
572 $DEF H4P1=(<2*M_BMO,M_AMO,M_ABMO,M_BMO,M_DDB9205)|(>2*M_BMOL,M_AMOL,M_ABMOL,M_BMOL,M_DDB9205L)
573
574 # EP 4 Freight short
575 $DEF H4FS=(1-2*M_930UACES)|(3-5*(GY_148GGS(1|2)|M_GGS2))| \
576 (3-5*(M_555ES(2|4)(|H|B|BL)([OB:(GLASS4|TYRE1)(|[M]),,26]|[OB:SCRAP13(|[M]),,25])))| \
577 (3-5*(M_683FACCPPS(1|3)(1|2|3|4|5)[OB:Sand(14|5|15)([|M]),,(38|39|37)]))| \
578 (4-5*(M_4_GKLM_KOBANYAI|M_GGS2|(GY|M)_148GGS(1|2|3|4|5)))| \
579 (4-5*(M_785ZAS0|M_785ZAS1|M_785ZAS2|M_785ZAS3L|M_785ZAS3|M_785ZAS4L|M_785ZAS4|M_785ZAS5L|M_785ZAS5))| \
580 (4-5*(M_4_ES5550(|L)[OB:COAL(43|45|44|40|57)(|[M]),,27]| \
581 M_4_ES5557(B|BL|H|HL)[OB:COAL(43|45|44|40|57)(|[M]),,27]))|(2-3*(GY_157GBGS(1|2)|M_157GBGS12))| \
582 (1-3*(M_UARS(|L)))|(1-3*(M_395RMMS(1|2|3)[OB:(TRK06|CLAAS_EUROPA|K700A),,11]))| \
583 (2-3*(M_394RGS1(1|2|3)[OB:RAIL1,15,11][OB:RAIL1,95,11]))|(2-3*(M_072TCS(1|2|3)))|(2-3*M_PULTR(|1))
584
585 # EP 4 Freight long
586 $DEF H4F1=5*H4FS
587
588 # EP 5 Long distance
589 $DEF H5PL1=(<M_Z1DWA_AVMZML,M_Z1CAF_AMZML,M_Z1GOSA_ABMZ(|O)ML,M_Z1DWA_WRBUMZML,3*M_Z1GOSA_BMZML, \
590 3*M_Z1DWA_BPMML)| \
591 (<3*M_Z1DWA_BPMM,3*M_Z1GOSA_BMZM,M_Z1DWA_WRBUMZM,M_Z1GOSA_ABMZ(|O)M,M_Z1CAF_AMZM,M_Z1DWA_AVMZM)
592
593 # EP 5 Passenger regional
594 $DEF H5PR1=(<MAVS_BP2,MAVS_BHV,MAVS_BDBHV,MAVS_BDT)|(<4*M_BHV_(A|D)2(|L))| \
595 (<2*(M_2917(A|D)2|M_2905BP2(|L)),M_1917(A|D)2(|L)|M_3917A2(|L)|M_1027(A|D)2(|L), \
596 2*(M_2917(A|D)2|M_2905BP2(|L)))
597
598 # EP 5 Freight long
599 $DEF Z_H_E5_G1=GY_148GGS1,GY_148GGS2,M_082TADGS2,M_082TADGS3,M_UAGPS933A,M_765ZA2,M_ZANS_KVG_MOL, \
600 M_245HBBILLNS,M_533EAOS2|M_595EAS1,M_SHIMMS,M_477SHIMMSSL,G_SHIMMNST_Y25_4, \
601 M_593EAMS11|M_533EAOS3|M_595EASX1,M_595EASX3,M_393RES1[O:STEEL16],M_394RGS11[OB:PIPE41,,12], \
602 M_181GABS2,M_GAGSV1,M_157GBGS11,M_683FACCPPS2,M_683FACCPPS22,M_633FCCPP3,M_633FCCPP2L
603
604 # EP 6 Freight shunting
605 $DEF H6F1R=(2-3*G_5_EAS(|L)[O:SCRAP(6|4|5)(|[M])])|(4-5*M_654FAL(1|2|3|4|5))|(2-3*M_683FACCPPS5(1|2))| \
606 (2-3*(GY_246HBBILLNS|G_HBBILLNS|M_245HBBILLNS(|1)))|(2-3*M_227HBILS(|2))| \
607 (2-3*(M_246HBBILLNNS(1|2|3|4)))|(M_293HILLMRRS(|2))|(M_277HABIS(|2))|(1-2*M_354RILS)| \
608 (3-4*M_SHIMMS(|D|U|U2)(|L))|(2-3*GY_082TADGS|M_082TADGS(1|2|3|4))| \
609 (3-4*MAV_UAGPPS1|M_UAGPS933A|M_UAGPS933B)|(3-4*M_ZAES_1(1|2|3|4|0|5)(|L))| \
610 (3-4*GY_HBBILLNS24620(02|12|00)(|L))|(2-3*M_RAG_530074_AFOR(|L))|(3-4*GY_TADGSM(|L))
611
612 # EP 6 Freight short
613 $DEF H6F1S=3*H6F1R
614
615 # EP 6 Freight long
616 $DEF H6F1=6-8*H6F1R
617
618 # EP 6 Long distance
619 $DEF H6PL1=(<,MAVS_Z1CAF_APMZML,MAVS_Z1CAF_AMZML,MAVS_Z1GOSA_ABMZML,MAVS_WRM8881L,3*MAVS_Z1CAF_BMZML, \
620 3*MAVS_Z1GOSA_BMZML)| \
621 (<3*MAVS_Z1GOSA_BMZM,3*MAVS_Z1CAF_BMZM,MAVS_WRM8881,MAVS_Z1GOSA_ABMZM,MAVS_Z1CAF_AMZM, \
622 MAVS_Z1CAF_APMZM)
623
624 # EP 6 Passenger regional
625 $DEF H6PR1=(<M_9580AL|M_9247CL,MAVS_BP3,3*MAVS_BHRV)| \
626 (<(3*MAVS_BHRV),MAVS_BP3,M_9247C|M_6BD8444|M_9580A)|(<M_BYEE2155RL,2*M_BYEE2155GL)| \
627 (<M_BYEE2155G,2*M_BYEE2155R,M_BYDEE8455R)|(<4*M_BHV_(A|D)2(|L),M_BHV22)
628
629 # EP 6 Passenger regional push and pull L
630 $DEF H6PRL=(<MAVS_BYDEE,MAVS_ABYEE,MAVS_BYEE,MAVS_BYBDTEE)|(<M_BYBDTEEL,M_HALB_ABY(|L),2*M_HALB_BYL)| \
631 (<M_BYBDTEE8055AL|M_BYBDTEE8055L,M_ABYEE3155L,M_BYEE2155L,M_BYDEE8455L|M_BYDEE8455AL)| \
632 (<M_BYBDTEEL,M_HALB_ABY(|L),MAVS_BMX2105,MAVS_BDMPEE8405)
633
634 # EP 6 Passenger regional push and pull R
635 $DEF H6PRR=(<MAVS_BMX2105,MAVS_BDMPEE8405,M_HALB_ABY(|L),M_BYBDTEE1)| \
636 (<(2*M_HALB_BY1),M_HALB_ABY(|L),M_BYBDTEE1)|(<M_BYDEE8455,M_BYEE2155,M_ABYEE3155,M_BYBDTEE8055)|
637
638 # EP 6 Passenger historic pre-War 2x cars
639 $DEF H6PH1=MNOS_SR8929,MNOS_AB3420574,MNOS_AB3420059,MNOS_WRR8821,MNOS_BP2421416,MNOS_BP2421743
640
641 # EP 6 Passenger historic pre-War 4x cars
642 $DEF H6PH2=MNOS_DA6404,(<MNOS_ABAU630,MNOS_WR2347,MNOS_ABA2305,MNOS_CAU14821)
643
644 # EP 6 Passenger historic post War 4x cars
645 $DEF H6PH3=(MNOS_DA6404, \
646 (<MNOS_WR252,MNOS_9940051,MNOS_9940300|MNOS_9940301G,MNOS_9940002|MNOS_WLS8969053, \
647 MNOS_WLS8969054|MNOS_WL7029362,MNOS_9940309))| \
648 (MNOS_ISTROPOLITAN|MNOS_WLS8969056,MNOS_PIANO,MNOS_9910055, \
649 MNOS_WR8829425|MNOS_WRM8881029|MNOS_WRM8881012|MNOS_WRM881004,MNOS_BDPZ8436, \
650 MNOS_WLDSM8971|MNOS_ORFEUM,MNOS_BPZ2936015)
651
652 # EP 6 Passenger GYSEV
653 $DEF H6PG1=(3*GY_BY2130A,GY_ABY3130AL|GY_ABY3130A,GY_BY2130AL)| \
654 (<GY_BY2130(|B)(|L),GY_ABYZ2|GY_ABY3130L|GY_ABY3130BL,2*GY_BY2130(|L),GY_BYD8433L|GY_BYD8433)| \
655 (<GY_BYD8433L|GY_BYD8433,2*GY_BY2130(|B|A),GY_ABYZ2|GY_ABY3130|GY_ABY3130B,GY_BY2130(|B)(|L))| \
656 (<GY_BY2130L|GY_BY2130,GY_ABYZ2|GY_ABY3130,2*GY_BY2130(|B|A)(|L),GY_BYD8433L|GY_BYD8433)| \
657 (GY_1033|GY_AP1905|GY_1067C,4*(GY_2033|GY_2067C),GY_BDB1)| \
658 ((4*(GY_2033|GY_2067C)),GY_1033|GY_AP1905|GY_1067C)|(4*GY_BPZ2935A,GY_BDB|GY_BDB8436)
659
660 #----------------------------------------------------------------------------------------------------
661 #
662 # Germany
663
664 # EP 1 Bavaria Passenger regional secondary lines
665 $DEF D1PLB=BAY_PWIL96,BAY_BCIL05,BAY_CIL98,BAY_CI10S
666
667 # EP 1 Bavaria Freight short
668 $DEF D1FBS=(<BAY_G10,BAY_X_HOLZ,BAY_R10B_HOLZ,BAY_R10G_HOLZ,BAY_H_HOLZ)| \
669 ((BAY_PWG_PFALZ(|L)),KPEV_G10_MBH(|L),MARK_45101A,BAY_OH2)| \
670 (4-5*(BAY_HG1|HG53|HG54|HG47|BAY_PB|BAY_OH2|BAY_G250L|BAY_G250|BAY_GM))
671
672 # EP 1 Bavaria Freight long
673 $DEF D1FBL=BAY_PWG_PFALZ(|L),10*(BAY_HG1|HG53|HG54|HG47|BAY_PB|BAY_OH2)
674
675 # EP 1 Freight Wuerttemberg short
676 $DEF D1FWS=(WUE_J66VR1L,WUE_J66(S|V)R(2|3|4)(|L),WUE_NI3(S|V)POST,WUE_O73(S|V)G(|L), \
677 WUE_OC(S|V)SEEL(|L),WUE_GMVG(|L))| \
678 (<WUE_OC(S|V)N(1|2)(|L),WUE_G10VHG(|L), \
679 WUE_G10(S|V)H(KNOR|LEIB|MAE1|MAE2|MAE3|SHB1|SHB2|STFB|SWBB)(|L),WUE_OMQ(S|V)H(N|G)(|L))| \
680 (<WUE_OC(S|V)FRNK(|L),WUE_S86(S|V)SG(|L),WUE_NI3(S|V)G(1|5|2|3|4),WUE_NI3(S|V)FW,WUE_OC(S|V)G(|L), \
681 WUE_O89(S|V)HG(1|2)(|L))| \
682 (<WUE_OMK(S|V)_G(1|2)(|L),WUE_G10(S|V)H(SALA|STFF|WACK)(|L), \
683 WUE_G10(S|V)H(BAER|CLUS|ENG1|ENG2|ESL1|ESL2|HGST|HONE)(|L),WUE_OMK(S|V)(|H)(R|N)(|L))| \
684 (<WUE_OM12(S|V)HG(1|2)(|L),WUE_OM12(S|V)HR(|L),WUE_NI3(S|V)HZWG(|L),WUE_OM12(S|V)R,WUE_X63SR2(|L), \
685 WUE_S86(S|V)S_N(|L))| \
686 (<WUE_OM12(S|V)MAE,WUE_G10(S|V)H(WGBR|ULAG|UPIL|VERB|WUL1|WUL2|WUL3|WUL4|ZOLL)(|L), \
687 WUE_GML(VG|SN|SG)(|L),WUE_N63VS_N(|L),WUE_NI1SLCHT|WUE_NI1SGOES|WUE_NI1(S|V)_BWG)| \
688 (<WUE_G10(S|V)HGMI(1|2)(|L),WUE_GMSG(|L),WUE_NI1(S|V)N(1|2),WUE_NI1(S|V)G,WUE_N63(S|V)S_N(|L), \
689 WUE_N63(S|V)SG(|L))| \
690 (<WUE_NI3(S|V)HZWG(|L),WUE_GMLVG(|L),WUE_GMLSN(|L),WUE_GMLSG(|L),WUE_GMVG(|L),WUE_OM12(S|V)G)| \
691 (<WUE_G10TBTL,WUE_TBTKRANL|WUE_TBTKRAN,WUE_G10TBT,WUE_REGENSBURG_PYLL|WUE_REGENSBURG_TBT(|L), \
692 WUE_N63VS_N(|L),WUE_NI1SLCHT|WUE_NI1SGOES|WUE_NI1(S|V)_BWG)| \
693 (<WUE_OM12(S|V)HG(1|2)(|L),WUE_OM12(S|V)HR(|L),WUE_NI3(S|V)G(1|5|2|3|4),WUE_NI3(S|V)HZWG(|L), \
694 WUE_X63SR2(|L),WUE_S86(S|V)S_N(|L))| \
695 (<WUE_OM12(S|V)MAE,WUE_G10(S|V)H(WGBR|ULAG|UPIL|VERB|WUL1|WUL2|WUL3|WUL4|ZOLL)(|L), \
696 WUE_G10SHGL|WUE_G10VG,WUE_OM12(S|V)R)| \
697 (WUE_J66VR1L,WUE_J66(S|V)R(2|3|4)(|L),WUE_NI3(S|V)POST,WUE_O73(S|V)G(|L),WUE_OC(S|V)SEEL(|L), \
698 WUE_GMVG(|L))
699
700 # EP 1 Freight Wuerttemberg long
701 $DEF Z_D_E1_GW=(KPEV_PWGL~KDS|KPEV_PWG~KDS,WUE_OM12VHNL,WUE_OM12SHNL,WUE_OM12SN,WUE_Z2VHBSHM, \
702 WUE_EKWVHBRNL|WUE_EKWVHBRN,WUE_EKWSHBSHL|WUE_EKWSHBSH,WUE_EKWVHKNO|WUE_EKWVHKNOL, \
703 WUE_EKWSHZE2L|WUE_EKWSHZE2,WUE_G10SHN,WUE_G10VN,WUE_G10VHN,KPEV_OMK,KPEV_OMK1,WUE_OCVN1L, \
704 WUE_X63SR2L,WUE_X63SR1L)| \
705 (WUE_PW70G(2|1)(|L),WUE_HS(0|1)G(|L),WUE_H89(B|A)G(|L),WUE_F46(B|A),WUE_X63(S|V)G(|L), \
706 WUE_OU(S|V)G(|L),WUE_K71(S|V)(G|N)(|L),WUE_J66(S|V)G(1|2|3)(|L),WUE_SS90(S|V)SCH, \
707 WUE_L60(S|V)_H(|L),WUE_H10(S|V)_H(|L),WUE_OMK(S|V)HKTW(|L),WUE_G47(B|A)[O:SCRAP17,,21],WUE_SS90V, \
708 WUE_NI3(S|V)(ZAHN|WDHN|UBRG|PBIE|HCHT|DINK),WUE_X66(S|V)SG(|L)[OB:SPARE3,,13], \
709 WUE_RM(1|0)1(N|G)[OB:BOILER1,,12],WUE_RM(1|0)2(N|G)[OB:BOILER4,,12])| \
710 (WUE_NI3(S|V)PWG(2|1)(|L),3*D1FWS)| \
711 (WUE_NI3STNCH|WUE_NI3VTNCH,(<WUE_HRMZ(S|V)),WUE_Z2(S|V)HNGRN(|L),WUE_H56(A|B),WEG_G10(S|V)H(|L), \
712 (<WUE_HRMZ(S|V),WUE_HRMZ(S|V)H(B|G)),WUE_HRMZBS,WUE_HRMZBV,WUE_NI2(S|V)(G|N), \
713 WUE_NI1VGOES|WUE_NI1VLCHT,WUE_G10(S|V)HMAE0(|L),WUE_H10(S|V), \
714 WUE_SSS95(S|V)[O:OBB_RWB,18,12][O:BOX_FRICHS,,12][O:#OBB_RWB,79,12],WUE_M69(S|V)G(|L), \
715 WNB_G10(S|V)H(G|N)(|L),WUE_L60(S|V),WUE_HRMZ(S|V)H(B|G)L,WUE_SML(S|V)(|L)[OB:RAIL1,,12], \
716 WUE_LAT(S|V)S(3|2|1)(|L),WEG_G10(S|V))| \
717 (WUE_NI1(S|V)PFWG, \
718 15*((WUE_EKW(S|V)HDP(3|2|1)(|L)|WUE_EKW(S|V)HB(SH|RN|K1|K2)(|L)|WUE_Z3(S|V)HZEL(2|1)(|L)| \
719 WUE_Z3VHPRIV(|L)|WUE_Z2(S|V)HZEL(2|1)(|L)|WUE_EKW(S|V)HOL(2|1)(|L)|WUE_EKW(S|V)HSWK(|L)| \
720 WUE_EKW(S|V)HZE(2|1|3|4)(|L)|WUE_GAS96SS(|L))))
721
722 # EP 1 Passenger regional Wuerttemberg long 1906
723 $DEF D1PR1=WU_PW4I56(|L),2*WUE_(CCI|C37)(|L),WUE_ABBI61A(|L),WUE_ABBI61(|L),2*WUE_(CCI|C37)(|L)
724
725 # EP 1 Passenger regional Wuerttemberg long 1916
726 $DEF D1PR2=WUE_POST97(|L),WUE_PWI09(|L),2*WUE_CI(98G|98G2|05G)(|L),WUE_BCI08(|L),WU_BC3I94(|L), \
727 3*WUE_CI(98G|98G2|05G)(|L)
728
729 # EP 1 Prusia Freight shunting
730 $DEF D1FPR=(2-3*(KPEV_W4L|KPEV_W4|KPEV_W4BL|KPEV_W4B|KPEV_W3L|KPEV_W3|KPEV_W3BL|KPEV_W3B))| \
731 (2-3*(KPEV_WOOD1))|(2-3*(KPEV_OMK|KPEV_OMK1))|(2-3*(WUE_Z2SHBSHM(|L)))| \
732 (2-3*(KPEV_H2L|KPEV_H2|KPEV_H1|KPEV_H1L))| \
733 (2-3*(KPEV_1_VWH2C1(A|B)(|H)(|L)|KPEV_1_VHA8(|H)(|L)|KPEV_1_VH2D10(|K)(|H)(|L)))| \
734 (2-3*(KPEV_G10_MBHL|KPEV_G10_MBH))|(2-3*WUE_Z2SHBSHM|WUE_Z2VHBSHML)| \
735 (2-3*(KPEV_1_OTRUIIC(6|12)(|H|HL)[O:FR_KO(36|40|41|64)(|[M])]))
736
737 # EP 1 Prusia Freight short
738 $DEF D1FPS=(KPEV_PWG92CL|KPEV_PWG92C),3*D1FPR
739
740 # EP 1 Prusia Freight long
741 $DEF Z_D_E1_GP=(KPEV_PWG92CL|KPEV_PWG92C),8*D1FPR
742
743 # EP 1 Prusia Passenger long distance
744 $DEF D1PPD=KPEV_POST4PR(|L),KPEV_PW4UPR04|KPEV_PW4U07(|L), \
745 (<(2*KPEV_C4UPR08),KPEV_WR4U_PR11,KPEV_ABC4UPR09,KPEV_AB4PR94(|L),KPEV_ABC4UPR09L,KPEV_C4UPR08)| \
746 (<KPEV_C4U08L,KPEV_AB4U07L,KPEV_AB4U07L,KPEV_C4U08L,KPEV_WR0973,KPEV_ABC4U06)| \
747 (<KPEV_C4U08,KPEV_AB4U07,KPEV_AB4U07,KPEV_C4U08,KPEV_WR0973L,KPEV_ABC4U06L)
748
749 # EP 1 Prusia Passenger 3 axle main lines
750 $DEF Z_D_E1_PP1=(KPEV_POST3AL|KPEV_POST3A,KPEV_PW302L|KPEV_PW302,3*(KPEV_D3TR04HL|KPEV_D3TR04H), \
751 KPEV_AB3_91HL|KPEV_AB3_91H,KPEV_BC3PR92L|KPEV_BC3PR92, \
752 3*(KPEV_C3_04HL|KPEV_C3_04H|KPEV_C3_91HL|KPEV_C3_91H))| \
753 (KPEV_PW302L,(KPEV_C3_04HL,KPEV_C3_04H,KPEV_B3_07H(|L),KPEV_C3_04HL,KPEV_D3_00HL,KPEV_D3_00H))
754
755 # EP 1 Prusia Passenger 2 axle secondary lines
756 $DEF D1PPN=KPEV_PWPOSTG(|L)|KPEV_PWPOSTIKL|KPEV_PWPOSTIK, \
757 (KPEV_DI95K|KPEV_DI95KL,KPEV_CDI95K,KPEV_BCI95K,KPEV_BCI95KL,KPEV_CI95KL|KPEV_CI95K,KPEV_CDI95KL)
758
759 # EP 1 Prusia Passenger semi-fast train
760 $DEF Z_D_E1_PPS=(KPEV_POST4PRL|KPEV_POST4PR),(KPEV_C4PR12H|KPEV_PW4PR16AL|KPEV_PW4PR16A), \
761 2*(KPEV_C4PR94L|KPEV_C4PR94),(KPEV_AB4PR94L|KPEV_AB4PR94),2*(KPEV_C4PR94L|KPEV_C4PR94)
762
763 # EP 1 Saxonia Freight long
764 $DEF D1FSAL=SAX_PWSA07,6-8*KPEV_GH(|L), \
765 8-10*SAX_OMKU(|H|HL)[O:(FR_KO36|FR_KO38|BRMB_L_KOHLE|FR_KO41)(|[M]),,27],3-5*WUE_G10(VN|SN|SHNL|SHN)
766
767 # EP 2 Passenger long distance night
768 $DEF D2PN1=DRG_PW4UPR16BL|DRG_PW4UPR16B,DRG_ABC4UPR06B|DRG_ABC6UPR07B, \
769 (DRG_WL6U_20051G|DRG_WL6U_20051B|DRG_WL6U_20084G|DRG_WL6U_20084B), \
770 2*(DRG_WL6U_20189G|DRG_WL6U_20189B),(DRG_WL4U_20026GL|DRG_WL4U_20026DL), \
771 (DRG_WR6U_761L|DRG_WR6U_761|DRG_WR4U_789L|DRG_WR4U_789)
772
773 # EP 2a Passenger long distance prusian cars
774 $DEF D2PDPA=(DRG_PW4UPR07BL|DRG_PW4UPR07B,DRG_C4UPR94BL,DRG_WR4U_404G,DRG_AB4UPR93C,DRG_BC4UPR14BL, \
775 DRG_C4UPR11ABL,DRG_C4UPR13BSL)| \
776 (DRG_PW4UPR07BL|DRG_PW4UPR07B, \
777 (<DRG_C4UPR13BL|DRG_C4UPR13B2L,DRG_AB4UPR07B,DRG_AB4UPR09AB,DRG_WR4U_792L|DRG_WR4U_792, \
778 DRG_AB4UPR15B,DRG_C4UPR06B|DRG_C4UPR08B,DRG_ABC4UPR08B))| \
779 (DRG_PW4UPR07BL|DRG_PW4UPR07B,DRG_C4UPR94BL,DRG_WR4U_404G,DRG_AB4UPR93C,DRG_BC4UPR14BL, \
780 DRG_C4UPR11ABL,DRG_C4UPR13BSL)
781
782 # EP 2b Passenger long distance prusian cars
783 $DEF D2PDPB=(DRG_PWPOST4UPR08BL|DRG_PWPOST4UPR08B,DRG_AB4UPR07A,DRG_AB4UPR09AA,DRG_C4UKPR13A, \
784 DRG_ABC4UPR08A|DRG_BC4UPR09B|DRG_ABC4UPR09B)| \
785 (DRG_POST4UA17L2|DRG_POST4UA17L3,DRG_PW4UPR02BBL|DRG_PW4UPR02BB, \
786 (<DRG_C6UPR07AL|DRG_C6UPR07A,DRG_B4UPR20AL|DRG_B4UPR20A|DRG_AB6UPR06BL, \
787 DRG_AB4UPR07AL|DRG_AB4UPR07A,DRG_WR6U_222RL|DRG_WR6U_222R,DRG_C4UPR11ABL|DRG_C4UPR11AB, \
788 DRG_ABC4UBAY04AL|DRG_ABC4UBAY04A))
789
790 # EP 2a Passenger long distance train Oldenburg cars
791 $DEF D2PDOA=DRG_POST4_12|DRG_POST4_12L,DRG_PW4UPR07BL, \
792 (<DRG_ABC4U_OLD10B|DRG_BC4U_OLD15B,2*DRG_AB4U_OLD12B,DRG_AB4UPR15B,DRG_C4UKPR13B,3*DRG_C4U_OLD12B, \
793 DRG_C4U_OLD17B)| \
794 (<DRG_C4U_OLD17BL,3*DRG_C4U_OLD12BL,DRG_C4UKPR13BL,DRG_AB4U_OLD12BL,DRG_AB4UPR15BL, \
795 DRG_ABC4U_OLD10BL|DRG_BC4U_OLD15BL)| \
796 (DRG_POST4UA17L|DRG_POST4UA17,DRG_PW4UPR02BBL|DRG_PW4UPR02BB, \
797 (<DRG_C4U_OLD17BL|DRG_C4U_OLD12BL, \
798 DRG_ABC4UPR06BL|DRG_BC4UPR09AL|DRG_BC4UPR11BL|DRG_BC4UPR09AL|DRG_BC4UPR16BL,DRG_AB4U_OLD12BL, \
799 DRG_WR4U_404G|DRG_WR4U_407G,DRG_C4U_OLD12B,DRG_BC4U_OLD15B))
800
801 # EP 2b Passenger long distance train Oldenburg cars
802 $DEF D2PDOB=(DRG_POST4B17PR2|DRG_POST4B17PR2L,DRG_PW4UPR10BL|DRG_PW4UPR10B, \
803 DRG_C4U_OLD12A|DRG_C4U_OLD17A,DRG_AB4UPR15A,DRG_AB4U_OLD12A,DRG_WR6U_909L|DRG_WR6U_909, \
804 DRG_ABC4U_OLD10A|DRG_BC4U_OLD15A,DRG_C4U_OLD17AL)
805
806 # EP 2a-b Passenger long distance badenian cars
807 $DEF D2PDBA=DRG_PW4U_BAD06(|L), \
808 (<2*DRG_C4UPR08A,DRG_AB(4UE01B35|6U_BAD08B35|4U_BAD07B35),DRG_WR4U_7(92|89), \
809 DRG_AB(4UE01B35|6U_BAD08B35|4U_BAD07B35),DRG_ABC4U_BAD(11B35|06B|04B), \
810 2*DRG_C4U_BAD(07B35|07B35A|03B))| \
811 (>2*DRG_C4UPR08AL,DRG_AB(4UE01B35|6U_BAD08B35|4U_BAD07B35)L,DRG_WR4U_7(92|89)L, \
812 DRG_AB(4UE01B35|6U_BAD08B35|4U_BAD07B35)L,DRG_ABC4U_BAD(11B35|06B|04B)L, \
813 2*DRG_C4U_BAD(07B35|07B35A|03B)L)
814
815 # EP 2a-b Passenger long distance bavarian cars
816 $DEF Z_D_E2_PBB=(DRG_PW4UPR02BBL|DRG_PW4UPR02BB,DRG_C4U_BAD07A35A,DRG_C4U_BAD07A35,DRG_AB6U_BAD08A35L, \
817 DRG_AB4UBAY01|DRG_AB4UBAY02~LB|DRG_AB4UBAY02_30, \
818 DRG_ABC4U_BAD11A35L|DRG_ABC4UBAY04B|DRG_ABC4UBAY08B|DRG_ABC4UBAY08A,DRG_C4UPR07A,DRG_C4UPR08A, \
819 DRG_C4UKPR13BL)| \
820 (DRG_PW4UBAY09,DRG_POST4UA173,DRG_C4UBAY13,DRG_C4UBAY11,DRG_WR4U_212G,DRG_AB4UBAY08A, \
821 DRG_AB4UBAY08_11A,DRG_C4UBAY98,DRG_ABC4UBAY97L)| \
822 (DRG_PW4UBAY06L~LB|DRG_PW4UBAY06~LB,DRG_C4UBAY98,DRG_BC4UBAY99|DRG_B4UBAY03B|DRG_B4UBAY03A, \
823 DRG_AB4UBAY08AL,DRG_WR6U_101DL|DRG_WR6U_222DL|DRG_WR6U_222D,DRG_AB4UBAY08L, \
824 DRG_AB4UBAY08A|DRG_AB4UBAY08_11B,DRG_AB4UBAY98|DRG_AB4UBAY01B,DRG_C4UBAY03B|DRG_C4UBAY03A)
825
826 # EP 2a Passenger long distance saxonian cars 1930
827 $DEF D2PDS=DRG_PW4USA07(|L), \
828 (<3*DRG_C4USA(05B|07B|18A),DRG_AB4USA(09|16)B,DRG_WR6U_222G(|L),2*DRG_AB4USA(09|16)B, \
829 2*DRG_C4USA(05B|07B|18A),DRG_ABC4USA(08BB|03))| \
830 (>3*DRG_C4USA(05B|07B|18A)L,DRG_AB4USA(09|16)BL,DRG_WR6U_222G(|L),2*DRG_AB4USA(09|16)BL, \
831 2*DRG_C4USA(05B|07B|18A)L,DRG_ABC4USA(08BB|03)L)
832 # EP 2a Passenger long distance saxonian cars 1936
833 $DEF D2PDS6=DRG_PW4USA(07|18)(|L),DRG_POST4UA20_1928(|L), \
834 (<3*DRG_C4USA(05A|07A|18B),DRG_AB4USA(09|16)A,DRG_WR6U_222G(|L),2*DRG_AB4USA(09|16)A, \
835 2*DRG_C4USA(05A|07A|18B),DRG_ABC4USA(08B|03)A)| \
836 (>3*DRG_C4USA(05A|07A|18B)L,DRG_AB4USA(09|16)AL,DRG_WR6U_222G(|L),2*DRG_AB4USA(09|16)AL, \
837 2*DRG_C4USA(05A|07A|18B)L,DRG_ABC4USA(08B|03)AL)
838
839 # EP 2 Passenger long distance DRG cars
840 $DEF Z_D_E2_PB2=DRG_PW4U36B37L|DRG_PW4U36B37, \
841 (<DRG_AB4U35L,DRG_AB4U26AAL,DRG_WR4U35_1088L|DRG_WR4U35_1088,2*DRG_AB4U35)
842
843 # EP 2a-b Passenger semi-fast train prusian cars
844 $DEF D2PE1=(DRG_POST4B12PRL|DRG_POST4B12PR,DRG_PW4PR16BL|DRG_PW4PR16B, \
845 (DRG_C4PR18TH(|L),DRG_C4PR96HL|DRG_C4PR96H|DRG_C4PR96THL,DRG_B4PR95HL|DRG_B4PR95H, \
846 (DRG_B4PR04H(|L)~LB|DRG_B4PR04THL),DRG_C4PR96H|DRG_C4PR96THL))| \
847 (DRG_PW4PR04B(|L),(DRG_C4PR02TH(|L)|DRG_C4PR02(|L)),DRG_BC4PR04(|L),DRG_BC4PR98H(|L), \
848 DRG_B4PR18(|L),DRG_C4PR12TH(|L),DRG_POST3C10PRM(|L))| \
849 (DRG_POST4B17PR(|2|3)(|L),DRG_PW4PR04B(|L),DRG_BC4PR05(|H)(|L), \
850 (DRG_B4PR04H(|L)~LB|DRG_B4PR04THL|DRG_B4PR04(|L)~LB),(DRG_C4PR04(|L)~LB|DRG_C4PR04H(|L)~LB), \
851 DRG_C4PR02(|L))| \
852 (DRG_PW4PR04B(|L),DRG_C4PR18(|L),DRG_B4PR02(THL|H|HL|L),DRG_BC4PR01(|H|M|A|HM)(|L), \
853 2*DRG_C4PR12(|L|H|TH|HL))
854
855 # EP 2a-b Passenger semi-fast train Oldenburg cars
856 $DEF D2PE2=(DRG_POST4B12PRML|DRG_POST4B12PRM),(DRG_PW4PR16BL|DRG_PW4PR16B), \
857 (DRG_C4_OLD00HL|DRG_C4_OLD00H|DRG_C4_OLD00L|DRG_C4_OLD00), \
858 (DRG_BC4_OLD04HL|DRG_BC4_OLD04|DRG_BC4_OLD04H|DRG_BC4_OLD04L), \
859 (DRG_BC4_OLD02HL|DRG_BC4_OLD02H|DRG_BC4_OLD02L|DRG_BC4_OLD02), \
860 (DRG_C4_OLD03HL|DRG_C4_OLD03H|DRG_C4_OLD03L|DRG_C4_OLD03)
861
862 # EP 2a-b Passenger semi-fast train saxonian cars
863 $DEF D2PE3=(DRG_POST4B17PR(|L),DRG_PWSA17(|L),2*DRG_C4SA13(|H)(|L), \
864 2*(DRG_BC4PR05H(|L)|DRG_BC4SA97H(|L)|DRG_BC4SA01(|H)(|L)),DRG_C4SA99(|H)(|L),DRG_C4PR04TH(|L))| \
865 (DRG_POST4UB173(|L),DRG_PW4USA07(|L),DRG_C4SA97H(|L),DRG_C4SA13(|H)(|L)~LB,DRG_B4SA97H(|L)~LB, \
866 DRG_B4SA99(|H)(|L)~LB,DRG_C4SA99(|H)(|L),DRG_C4SA99(|H)(|L))
867 # EP 2 Passenger regional badenian cars
868 $DEF D2PR1=((DRG_PW_BAD(11|16)(|L)|DRG_PW3I_BAD03(|L)),(DRG_CIDBAD9212(|L)|DRG_CDIBAD93(|L)), \
869 DRG_CID_BAD10(|L),DRG_CID_BAD11(|L), \
870 2*(DRG_BI_BAD12(|L)|DRG_BI_BAD02(|U)(|L)|DRG_BI_BAD98(|L)|DRG_BCIBAD11(|L)|DRG_B3IBAD04(|L)), \
871 3*(DRG_CID_BAD10|DRG_CID_BAD11)(|L),DRG_CIDBAD98(|L))| \
872 (DRG_PW_BAD16(|L)|DRG_PW_BAD97(|L),DRG_C_BAD95(|L),2*DRG_C3_BAD07(|U)(|L),DRG_BC3_BAD09(|U)(|L), \
873 DRG_BC3BAD(06|11)26(|U)(|L),2*DRG_C3_BAD07(|U)(|L))
874
875 # EP 2 Passenger regional bavarian cars
876 $DEF Z_D_E2_PB3=DRG_PW3I_BAY95|DRG_PW3I_BAY95L,3*(DRG_C3I_BAY21B|DRG_C3I_BAY21BL), \
877 DRG_BC3_BAY91B|DRG_BC3_BAY91|DRG_BC3_BAY91BL|DRG_BC3_BAY91L,DRG_BC3I_BAY07B|DRG_BC3I_BAY07BL, \
878 2*(DRG_C3I_BAY99A|DRG_C3I_BAY99AL),DRG_PWI_BAY10L|DRG_PWI_BAY10,DRP_POST3_A10BAY|DRP_POST3_A10BAYL
879
880 # EP 2 Passenger regional bavarian cars for secondary lines
881 $DEF D2PR4=DRG_PWPOSTL_BAY14(|L),DRG_CL_BAY11(|L),DRG_BCL_BAY13|DRG_BCL_BAY13L, \
882 2*(DRG_CL_BAY13L|DRG_CL_BAY13)
883
884 # EP 2A Passenger regional prusian cars main line
885 $DEF D2PR3A=(DRG_POSTC85PR|DRG_POSTC85PRL|DRG_POST_C85PRM|DRG_POSTB85PRL|DRG_POSTB85PR), \
886 (DRG_PWPR02AL),(DRG_C3UPR02HL),(DRG_C3PR91BH|DRG_C3PR91BHL), \
887 2*(DRG_BCPR83HL|DRG_BCPR83H|DRG_BCPR87H|DRG_BCPR87HL), \
888 (DRG_CPR91BHL|DRG_CPR91BH|DRG_CPR91HL|DRG_CPR91H)| \
889 ((DRG_PW3PR11|DRG_PW3PR11S,DRG_C3PR11HL~LB|DRG_C3PR11(S|T)H(|L)|DRG_C3PR11(|L)~LB|DRG_C3PR11S(|L), \
890 DRG_C3DTRPR04TH|DRG_C3DTRPR04L|DRG_C3DTRPR04_24TH,DRG_B3PR04HL|DRG_B3PR04|DRG_B3PR10H|DRG_B3PR10L, \
891 DRG_BC3PR96HL|DRG_BC3PR96L|DRG_BC3PR96,DRG_C3PR91BL|DRG_C3PR91BH|DRG_C3PR91BHL, \
892 DRG_C3UPR02HA|DRG_C3UPR02,DRG_CPR21H|DRG_CPR21THL|DRG_CPR21L, \
893 DRG_C3PR11THL|DRG_C3PR11STHL|DRG_C3PR11S))
894
895 # EP 2B Passenger regional prusian cars main line
896 $DEF D2PR3=((DRG_PW3PR11|DRG_PW3PR11S, \
897 DRG_C3PR11HL~LB|DRG_C3PR11(S|T)H(|L)|DRG_C3PR11(|L)~LB|DRG_C3PR11S(|L), \
898 DRG_C3DTRPR04TH|DRG_C3DTRPR04L|DRG_C3DTRPR04_24TH,DRG_B3PR04HL|DRG_B3PR04|DRG_B3PR10H|DRG_B3PR10L, \
899 DRG_BC3PR96HL|DRG_BC3PR96L|DRG_BC3PR96,DRG_C3PR91BL|DRG_C3PR91BH|DRG_C3PR91BHL, \
900 DRG_C3UPR02HA|DRG_C3UPR02,DRG_CPR21H|DRG_CPR21THL|DRG_CPR21L, \
901 DRG_C3PR11THL|DRG_C3PR11STHL|DRG_C3PR11S))| \
902 (DRG_PWI28L|DRG_PWI28, \
903 5*(DRG_C3DTRPR04L|DRG_C3DTRPR04|DRG_C3DTRPR04HL|DRG_C3DTRPR04H|DRG_C3DTRPR04AL|DRG_C3DTRPR04A| \
904 DRG_C3PR11H~LB|DRG_C3PR11HL~LB|DRG_C3PR11L~LB|DRG_C3PR11~LB), \
905 DRG_BC3PR08HL|DRG_BC3PR08H|DRG_BC3PR08|DRG_BC3PR08L, \
906 DRG_B3PR10HL|DRG_B3PR10H|DRG_B3PR10|DRG_B3PR10L, \
907 4*(DRG_C3PR11H~LB|DRG_C3PR11HL~LB|DRG_C3PR11SH|DRG_C3PR11SHL|DRG_C3PR11TH|DRG_C3PR11THL| \
908 DRG_C3PR11STH|DRG_C3PR11STHL|DRG_C3PR11L~LB|DRG_C3PR11~LB|DRG_C3PR11S|DRG_C3PR11SL))| \
909 ((DRG_POST3A10PR|DRG_POST3A10PRL|DRG_POST3A10PRML|DRG_POST3A10PRM),(DRG_PW3PR99A|DRG_PW3PR99AL), \
910 (DRG_C3UPR02H|DRG_C3UPR02HL|DRG_C3UPR02L|DRG_C3UPR02), \
911 (DRG_BCPR21HL|DRG_BCPR21L|DRG_BCPR21|DRG_BCPR21H),(DRG_B3PR04H|DRG_B3PR04THL|DRG_B3PR04L), \
912 (DRG_C3PR11TH|DRG_C3PR11THL),2*(DRG_C3DTRPR04HL|DRG_C3DTRPR04H),2*(DRG_C3PR11TH|DRG_C3PR11THL))| \
913 ((DRG_POST_B12STL|DRG_POST_B12ST),(DRG_PW3PR11L|DRG_PW3PR11SL), \
914 (DRG_CPR21HL|DRG_CPR21TH|DRG_CPR21), \
915 (DRG_C3PR04HL|DRG_C3PR04|DRG_C3PR04THL|DRG_C3PR04L|DRG_C3PR04H), \
916 (DRG_BC3PR11HL|DRG_BC3PR11L|DRG_BC3PR11|DRG_BC3PR11H), \
917 (DRG_BC3PR91H|DRG_BC3PR91HL|DRG_BC3PR91L|DRG_BC3PR91), \
918 (DRG_C3UPR02H|DRG_C3UPR02L|DRG_C3UPR02HAL|DRG_C3UPR02AL|DRG_C3UPR02A), \
919 2*(DRG_C3PR11TH|DRG_C3PR11THL),(DRG_C3DTRPR04TH|DRG_C3DTRPR04THL))
920
921 # EP 2A Passenger regional prusian cars for secondary lines
922 $DEF D2PR4A=((DRG_PWPOSTI92L|DRG_PWPOSTI92),DRG_C3IPR14L|DRG_C3IPR14,DRG_BC3IPR10L|DRG_BC3IPR10, \
923 DRG_CC3IDPR07L|DRG_CC3IDPR07)| \
924 (DRG_PW3IPR91L|DRG_PW3IPR91, \
925 DRG_CIPR93L|DRG_CIPR93|DRG_CIPR86BL|DRG_CIPR86B|DRG_CIDPR88L|DRG_CIDPR88, \
926 DRG_BCIPR90L|DRG_BCIPR90|DRG_BCIPR91L|DRG_BCIPR91,DRG_BIPR91L|DRG_BIPR91|DRG_BIPR96L|DRG_BIPR96, \
927 DRG_CIPR86L|DRG_CIPR86|DRG_CIPR86AL|DRG_CIPR86A|DRG_CIPR86CL|DRG_CIPR86C)| \
928 ((DRG_POST_C85PRML),(DRG_PWPR02A|DRG_PWPR02AL),(DRG_C3PR02HL|DRG_C3PR02H|DRG_C3PR02L|DRG_C3PR02), \
929 (DRG_B3PR91HL|DRG_B3PR91H|DRG_B3PR91|DRG_B3PR91L),(DRG_C3TRPR00HL~LB|DRG_C3TRPR00H~LB), \
930 (DRG_C3PR91DH~LB|DRG_C3PR91DHL~LB|DRG_C3PR91D~LB|DRG_C3PR91DL~LB),(DRG_C3PR11H~LB|DRG_C3PR11HL~LB))| \
931 ((DRG_PWIPR88L|DRG_PWIPR88),(DRG_BPR91H|DRG_BPR91HL|DRG_BPR91AHL|DRG_BPR91AH),(DRG_BC3PR96H), \
932 (DRG_C3PR83AH|DRG_C3PR83AHL|DRG_CPR91H),(<DRG_CPR79L,DRG_CPR79),(DRG_CPR86HL|DRG_CPR86H))
933
934 # EP 2B Passenger regional prusian cars for secondary lines
935 $DEF D2PR4B=(DRG_PWPOSTI92L|DRG_PWPOSTI92,DRG_C3IPR14L|DRG_C3IPR14,DRG_BC3IPR10L|DRG_BC3IPR10, \
936 DRG_CC3IDPR07L|DRG_CC3IDPR07)| \
937 (DRG_PWPOSTI01L|DRG_PWPOSTI01,DRG_CIPR05L|DRG_CIPR05,DRG_CCIDPR93L|DRG_CCIDPR93, \
938 DRG_CIPR92L|DRG_CIPR92,DRG_BCCIDPR95L|DRG_BCCIDPR95,DRG_BC3IPR91L|DRG_BC3IPR91, \
939 DRG_CIPR83AL|DRG_CIPR83A)| \
940 (DRG_PWPOSTI94L|DRG_PWPOSTI94,DRG_CI31L|DRG_CI31,DRG_BCI34L|DRG_BCI34,DRG_CIPR05BL|DRG_CIPR05B, \
941 DRG_CCIDPR05L|DRG_CCIDPR05)| \
942 (DRG_PW3IPR91L|DRG_PW3IPR91,DRG_CIPR93L|DRG_CIPR93,DRG_CIPR91L|DRG_CIPR91, \
943 DRG_BCIPR95L|DRG_BCIPR95|DRG_BCCIDPR95L|DRG_BCCIDPR95,DRG_C3IPR91L|DRG_C3IPR91, \
944 DRG_C3IPR91AL|DRG_C3IPR91A)| \
945 (DRG_PWPOST4IPR11GL|DRG_PWPOST4IPR11G,DRG_CC4IDPR14G1L|DRG_CC4IDPR14G1, \
946 DRG_CC4ITRPR07G1L|DRG_CC4ITRPR07G1,DRG_BC4IPR09GL|DRG_BC4IPR09G|DRG_BC4IPR14GL|DRG_BC4IPR14G, \
947 DRG_C4IPR23GL|DRG_C4IPR23G)
948
949 # EP 2 Passenger regional wuettembergian cars
950 $DEF D2PRW1=DRG_POST9_7L|DRG_POST9_7,DRG_PW3IWU20AL|DRG_PW3IWU20A,DRG_CIWU19L|DRG_CIWU19, \
951 DRG_CIDWU90L|DRG_CIDWU90|DRG_CICIWU20,DRG_BCIWU08L|DRG_BCIWU08,DRG_BCIWU19L|DRG_BCIWU19, \
952 DRG_CIDWU08L|DRG_CIDWU08,DRG_CIDWU21L|DRG_CIDWU21
953
954 # EP 2 Passenger regional DRG cars for main lines
955 $DEF D2PR5B=((DRG_POST3_12STL|DRG_POST3_12ST),(DRG_PW3IWU12L|DRG_PW3IWU12), \
956 (DRG_C3UPR02HAL|DRG_C3UPR02HA),(DRG_CD27L|DRG_CD27),(DRG_C21L|DRG_C21), \
957 (DRG_BC21AL|DRG_BC21A|DRG_CD21A),2*(DRG_C3PR11TH|DRG_C3PR11THL|DRG_C3PR11STH))
958
959 # EP 2 Passenger regional DRG cars for secondary lines
960 $DEF Z_D_E2_PBN=DRG_PWI31AL|DRG_PWI31A,2*(DRG_CI33EL|DRG_CI33E),2*(DRG_BCI34EL|DRG_BCI34E), \
961 2*(DRG_CI33EL|DRG_CI33E)
962
963 # EP 2a Freight shunting 1920-1925
964 $DEF D2FCA=(3*(DRG_GMLVHNM(|L)|DRG_2_G_MUE_U|DRG_2_G_MUEL|DRG_2_G_MUE|DRG_2_G_MUE_HL|DRG_2_G_MUE_H))| \
965 (2-3*(DRG_2_G_MUE_U|DRG_2_G_MUE(|L)|DRG_2_G_MUE_H(|L)))|(2-3*DRG_KALK1(|L))| \
966 (2*((<DRG_K15(|B|C)HL,DRG_K15(|B|C))|(<DRG_K15(|B|C),DRG_K15(|B|C)H)|(<DRG_K_WUP_AB,DRG_K25H)| \
967 (<DRG_K25HL,DRG_K_WUP_ABL)))|(2-3*(DRG_X_ERFURTH(|L)))|(2-3*(DRG_O10J(1|2)|DRG_O11|DRG_O10H~BL))| \
968 (2-3*(DRG_NMVHKFMN(|L)|DRG_NMVHALPI(|L)))| \
969 (2*(DRG_O10|DRG_O10J2|DRG_O10J3|DRG_O10HL|DRG_O10H|DRG_2_OM_KBGHL|DRG_2_OM_KBGH))| \
970 (2-3*(DRG_O10|DRG_O10J2|DRG_O10J3|DRG_O10HL|DRG_O10H|DRG_2_OM_KBGHL|DRG_2_OM_KBGH))| \
971 (2-3*(DRG_RMMS33A|DRG_R10O(|L)))|(2-3*(DRG_R10H[OB:BOILER4,,13]|DRG_R10ROL[OB:BOILER5,,13]))| \
972 (2-3*(DRG_SSL25H|DRG_SSY45))|(2-3*(DRG_2_GL_DSNH(|L)|DRG_2_GLR_DSNL|DRG_2_G_MUE_H(|L)))| \
973 (2-3*(DRG_2_GW_MGD(|_H)(|L)|DRG_2_G_HAN(_L1VH|_L1VHL|_L1V|_V|_H|_VH|_VHL|_HL|_L1|_L1HL|_L1H)))| \
974 (2-3*DRG_2_OM_BSL(H|_AT|_S1|_AT32|_AT32H)(|L)[OB:SCRAP(11|12)(|[M]),,27])| \
975 (2-3*DRG_2_OM_ESN(|U|H)(|L)[OB:COAL(20|40|56)(|[M]),,28])| \
976 (2-3*((DRG_2_VWH_ALTONA(|R)(|H))|(2-3*DRG_KRUPPTEER(|L))| \
977 (DRG_2_VH_ALTONA(|FKUV|FKU|KU|KUV|FU|F2UV|U|UV|V)(|H)|DRG_2_V_ALTONA(|H|H2|V|VH|VH2)| \
978 DRG_2_V_ALTONA_AB(P|1|2)(|H)|DRG_2_V_HBG)(|L)))| \
979 (2-3*(DRG_2_GLPWHS_HAN(|L)|DRG_2_G_HAN|DRG_2_GBAY_HAN_H(|L)))| \
980 (2-3*(DRG_2_O01A|DRG_OOT8EL|DRG_OOT8E))
981
982 # EP 2a Freight short 1920-1925
983 $DEF D2FCAS=DRGA_PWGPR14(|L),3*D2FCA
984
985 # EP 2a Freight long 1920-1925
986 $DEF D2FCAL=DRGA_PWGPR14(|L),7*D2FCA
987
988 # EP 2B Freight shunting 1926-1937
989 $DEF D2FC1=(2-3*DRG_GMLVHNM(|L))| \
990 (2-3*DRG_SSL25(H|B)(|L)[OB:RAIL6[BT:,12],19,13][OB:RAIL6[BT:,12],54,13])| \
991 (2-3*(DRG_MUE_ENGELHARDT(|L)|DRG_MUE_SIMONBRAU(|L)))|(2-3*(DRG_GKHS2L|DRG_GKHS2))| \
992 (2-3*(DRG_K15BH2L|DRG_K15BH2|DRG_K15C|DRG_K15CHL,DRG_K15CH,DRG_K15D))| \
993 (2-3*(DRG_TNFS32|DRG_TNFS32HL|DRG_TNFS32H))|(2-3*DRG_R31H(M|BM)(|L)[OB:PIPE(21|16),,12])| \
994 (2-3*DRG_R31H(|B)(|L)[OB:BARREL1(4|5),,16])|(1-2*(<DRG_K_WUP_ABL,DRG_K_WUP_AB))| \
995 (2-3*(DRG_BERLIN_GHKSO2|DRG_BERLIN_TKO02K|DRG_TKO02_57|DRG_TKO02_67)(|L))| \
996 (2-3*(DRG_G_BAY(|L)|DRG_(2_GU_STN|GU04_STN)|DRG_2_GW_MGD(|_H)(|L))|DRG_2_GW_MGD(|_H)(|L))| \
997 (2-3*(DRG_2_G_HAN_H(|L)|DRG_2_GBAY_HAN_H(|L)|DRG_2_G_HAN_VH(|L)|DRG_2_G_HAN_L1VH(|L)| \
998 DRG_2_GLPWHS_HAN|DRG_2_G_MUE_U|DRG_2_G_MUE(|L)|DRG_2_G_MUE_H(|L)))| \
999 (2-3*(DRG_KASSEL37157|DRG_KASSEL_DBIER|GB_BUSSING|GB_MAGGI1|GB_MAGGI1H))| \
1000 (2-3*(DRG_2_GR_KSL(|L)|DRG_2_GR_KSL_H(|L)|DRG_2_GRHS_OPP_H(|L)|DRG_2C_GHS_OPP(|L)| \
1001 DRG_2C_GHS_OPP_H(|L)))|(2-3*DRG_SSL25(H|B)(|L)[OB:RAIL6[BT:,12],19,13][OB:RAIL6[BT:,12],54,13])
1002
1003 # EP 2B Freight short 1926-1937
1004 $DEF Z_D_E2_GBK=DRG_PWGPR14(|L),8*(1:D2FC1|3:D2FCA)
1005
1006 # EP 2B Freight long 1926-1937
1007 $DEF Z_D_E2_GB=DRG_PWGPR02A|DRG_PWGPR02AL|DRG_PWGPR14L|DRG_PWGPR14|DRG_PWGIPR92L, \
1008 1:(15*DRG_2_OOT3(0|4|6)1(|L))|4:(8*(1:D2FC1|3:D2FCA))
1009
1010 # EP 2B Freight long Leig 1926-1937
1011 $DEF D2FLL=DRG_PWGPR14L|DRG_PWGPR14, \
1012 10*((DRG_2_GLLH_DNB2|DRG_GLLMHS37B|DRG_GLLH24BH|DRG_2_GLLH_DNB1|DRG_GLLH12B|DRG_GLLH_PW3PR| \
1013 DRG_GLLH_PWGPR)(|L))
1014
1015 # EP 2c (1938-44) Passenger regional
1016 $DEF D2PR2=DRG_2C_PWI30L,5*(DRG_2C_MCI43L|DRG_2C_MCI43)
1017
1018 # EP 2c (1938-44) Passenger long distance
1019 $DEF Z_D_E2_PC=0-1*DRG_POST4A21_2C(|L)~JMU,DRG_PW4U37_2CL|DRG_PW4U37_2C, \
1020 (<2*DRG_C4U38_2C,DRG_AB4U38_2C,DRG_WR4UE39_1148(|L),DRGC_BC4U_39,DRG_C4U38_2C)| \
1021 (<DRG_C4U38_2CL,DRGC_BC4U_39L,DRG_WR4UE39_1148(|L),DRG_AB4U38_2CL,2*DRG_C4U38_2CL)| \
1022 (<2*DRG_2C_AB4U28,DRG_C4U28_2C,DRG_WR4U28_1001A(|L),DRG_C4U28_2C,2*DRG_2C_AB4U28)| \
1023 (<2*DRG_2C_AB4U28L,2*DRG_C4U28_2CL,DRG_WR4U28_1001A(|L),2*DRG_C4U28_2CL,2*DRG_2C_AB4U28L)
1024
1025 # EP 2c (1938-44) Freight shunting
1026 $DEF D2FSCR=(4-5*(DRG_2C_GMHS_BREL|DRG_2C_GMHS_BRE|DRG_2C_GMHS_BRE_BL|DRG_2C_GMHS_BRE_B|DRG_GLMHS36BR| \
1027 DRG_GLMHS36BL|DRG_GLMHS36O|DRG_GLMHS36L|DRG_GGTHS43AL|DRG_GGTHS43A))| \
1028 (4-5*(DRG_O_LINZBL|DRG_O_LINZB|DRG_O_VILLACH(|L)|DRG_O_VILLACHHL|DRG_O_VILLACHH|DRG_O_KLAGENFURT| \
1029 DRG_O_KLAGENFURTL|DRG_OMM34HT|DRG_O_LINZ|DRG_OMM34HTL))|(4-5*(DRG_RMMS33A))| \
1030 (4-5*(DRG_SSY45|DRG_SSY45L|DRG_SSYM46|DRG_SSYM46L)[OB:WH_JAGDP,,12])| \
1031 (4-5*((DRG_O_VILLACH(|H)(|L)[OB:FR_KO(51|47|52|44)(|[M]),,29])| \
1032 (DRG_O_KLAGENFURT(|L)[OB:FR_KO(51|47|52|44)(|[M]),,28])))| \
1033 (4-5*((DRG_O_LINZ(|L)[OB:BARREL14,,19]|DRG_O_LINZB[OB:BARREL14,7,19]| \
1034 DRG_O_LINZBL[OB:BARREL14,14,19])))| \
1035 (4-5*(DRG_THS42S(|L)|DRB_THS42(|L)|DRG_GKHSB(|L)|DRG_TKO02_61(|L)))| \
1036 (2-3*DRG_SSLA_KLN_19(40|42|36H|36B)(|L)[OB:RAIL6[BT:,12],19,13][OB:RAIL6[BT:,12],54,13])
1037
1038 # EP 2c (1938-44) Freight short
1039 $DEF D2FSCS=DRG_PWGS_44|DRG_PWGS_44L,2*D2FSCR
1040
1041 # EP 2c (1938-44) Freight long
1042 $DEF Z_D_E2_GC=DRG_PWGS_44|DRG_PWGS_44L,4*D2FSCR
1043
1044 # EP 3a 1950-1956 DB West Germany Long Distance train pre war coaches
1045 $DEF D3PDAL=(<DBP_3A_POST4U20B(|L),DB_3A_PW4UEPR16(|L)|DB_3A_PW4U28(|L),DB_3A_C4UPR08,DB_3A_C4UPR20, \
1046 DB_3A_C4U28,DB_3A_AB4U(|E)26(|A)|DB_3A_AB4U(23|WE23A),DSG_3A_(758|WR1001), \
1047 DB_3A_A4U(|E)23|DB_3A_A4U(26A|E26),DB_3A_B4U(|E)22,DB_3A_C4U(|E)26A,DB_3A_C4U(|E)26,DB_3A_BC4UE29)| \
1048 (<DBP_3A_POST4U17A(|L),DB_3A_PW4UEPR16(|L)|DB_3A_PW4U28(|L),DB_3A_C4UPR08L,DB_3A_C4UPR20L, \
1049 DB_3A_C4U28L,DB_3A_AB4U(|E)26(|A)L|DB_3A_AB4U(23|WE23A)L,DSG_3A_(758|WR1001)L, \
1050 DB_3A_A4U(|E)23L|DB_3A_A4U(26A|E26)L,DB_3A_B4U(|E)22L,DB_3A_C4U(|E)26AL,DB_3A_C4U(|E)26L, \
1051 DB_3A_BC4UE29L)| \
1052 (>DBP_3A_POST4U17B(|L),DB_3A_PW4UEPR16(|L),DBP_3A_P4UEA216,4*DB_3A_C4UPR(08|09A),DB_3A_ABC4UPR08L, \
1053 2*DB_3A_AB4U26A,DB_3A_C4UPR12,2*DB_3A_C4U21)| \
1054 (<4*DB_3A_C4UPR(08|09A)L,DB_3A_ABC4UPR08L,DB_3A_AB4U26AL,DB_3A_C4U21L,DB_3A_C4U21L, \
1055 DBP_3A_P4UEA216L)| \
1056 (<(2*DB_3A_C4U36L),3*(DB_3A_A(|B)4U26AL),DSG_WR4UR1236L,3*DB_3A_C4U(26|26A|28)L,DB_3A_PW4U36(|L))| \
1057 (<(2*DB_3A_C4U36),3*(DB_3A_A(|B)4U26A),DSG_WR4UR1236,3*DB_3A_C4U(26|26A|28),DB_3A_PW4U36(|L))| \
1058 (DB_3A_PW4U3(6|7)(|L)|DB_3A_PW4UEPR16(|L)|DB_3A_PW4U28(|L), \
1059 (<DB_3A_C4UPR12,DB_3A_C4U35L,DB_3A_AB4U28G,DSG_3A_WR1041(|L),DB_3A_AB4U35L,DB_3A_C4U35L, \
1060 DB_3A_C4U23))| \
1061 (<(2*DB_3A_C4U28L,DB_3A_AB4UE38(|L)),DSG_3A_758(|L),3*DB_3A_C4U28,DB_3A_PW4U28(|L), \
1062 0-1*DBP_3A_POST4U20A(|L))| \
1063 (<DB_3A_AB4UEL,DB_3A_AB4UE38L,DB_3A_ABC4UEL|DB_3A_BC4U36L,DB_3A_C4UE22L|DB_3A_C4U22AL,DB_3A_B4UEL, \
1064 DB_3A_A4UEL,DSG_3A_WR1076L,DB_3A_A4UEL,DB_3A_C4UE22L,DB_3A_B4UEL,DB_3A_PW4U37L|DB_3A_PW4U30(|L))| \
1065 (>DB_3A_AB4UE,DB_3A_AB4UE38,DB_3A_ABC4UE|DB_3A_BC4U36,DB_3A_C4UE22A|DB_3A_C4U22A,DB_3A_B4UE, \
1066 DB_3A_A4UE,DSG_3A_WR1076,DB_3A_A4UE,DB_3A_C4U22,DB_3A_B4UE,DB_3A_PW4U37(|L)|DB_3A_PW4U30(|L))| \
1067 (<DB_3A_PWPOST4U34,DB_3A_C4U21L,DB_3A_C4UE38,DB_3A_ABC4UE39|DB_3A_BC4UE39,DSG_3A_WR1001, \
1068 DB_3A_B4UE30A,DB_3A_AB4UE38,2*DB_3A_C4U28,DB_3A_C4U36)| \
1069 (>DB_3A_PWPOST4U34L,DB_3A_C4U21,DB_3A_C4UE38L,DB_3A_ABC4UE39L|DB_3A_BC4UE39L,DSG_3A_WR1001L, \
1070 DB_3A_B4UE30AL,DB_3A_AB4UE38L,2*DB_3A_C4U28L,DB_3A_C4U36L)
1071
1072 # EP 3a 1950-1956 DB West Germany Long Distance train post war coaches
1073 $DEF D3PDA=(<0-1*DBP_3A_P(OST4UA216_40|4UEA216)(|L),DB_3A_PW4U37,(2*DB_3A_C4UMG54HL),3*DB_3A_BUM54GL, \
1074 DSG_3A_WR1001L,3*DB_3A_C4UMG54HL)| \
1075 (<3*DB_3A_C4UMG54H,DSG_3A_WR1001,3*DB_3A_BUM54G,2*DB_3A_C4UMG54H,DB_3A_PW4U37L, \
1076 0-1*DBP_3A_P(OST4UA216_40|4UEA216)(|L))| \
1077 (<(3*DB_3A_C4UMG54H),3*DB_3A_BUM54G,DB_3A_BR4UM(G54B|54E2|54E1),2*DB_3A_C4UMG54H,DB_3A_PW4U37(|L))| \
1078 (<DB_3A_PW4U37(|L),2*DB_3A_C4UMG54HL,DB_3A_BR4UM(G54B|54E2|54E1)L,3*DB_3A_BUM54GL, \
1079 3*DB_3A_C4UMG54HL)| \
1080 (<(2*DB_3A_AB4UM54A),DSG_WR4UE39(|L),3*DB_3A_AB4UM54B,DB_3A_PW4U36(|L), \
1081 0-1*DBP_3A_P(OST4UA216_40|4UEA216)(|L))| \
1082 (<0-1*DBP_3A_POST4U21A59(33|42|58|72)(|L),DB_3A_PW4U37(|L),2*DB_3A_C4UMG54HL,DB_3A_AB4UM54A, \
1083 3*DB_3A_BUM54GL,DB_3A_BR4UMG54BL,3*DB_3A_C4UMG54HL)| \
1084 (<(3*DB_3A_C4UMG54H),DB_3A_BR4UMG54B,3*DB_3A_BUM54G,DB_3A_AB4UM54AL,2*DB_3A_C4UMG54H, \
1085 DB_3A_PW4U37(|L),0-1*DBP_3A_POST4U21A59(33|42|58|72)(|L))| \
1086 (<DB_3A_PW4U3(6|7)(|L),5*DB_3A_C4UM52(G|H),DSG_3A_WR10(01|89)L,3*DB_3A_AB4UM5(2B|4A|4B), \
1087 DB_3A_ABC4UM52_(1|3)|DB_3A_BC4UM52|DB_3A_BC4UMG55(O|D))| \
1088 (<DB_3A_BC4UMG55(O|D)L|DB_3A_ABC4UM52_(1|3)L|DB_3A_BC4UM52L,3*DB_3A_AB4UM5(2B|4A|4B)L, \
1089 DSG_3A_WR10(01|89),5*DB_3A_C4UM52(G|H)L,DB_3A_PW4U3(6|7)(|L))
1090
1091 # EP 3a 1950-1956 DB West Germany Passenger semi-fast train DRG coaches
1092 $DEF D3PERA=(<(2*(DB_3A_C4Y42_50L|DB_3A_C4Y42_50|DB_3A_C4Y42_50A|DB_3A_C4Y42_50AL)), \
1093 2*(DB_3A_BC4UEP42_50|DB_3A_BC4UEP42_50A|DB_3A_BC4UEP42_50AL|DB_3A_BC4UEP42_50L), \
1094 (DB_3A_C4Y42_50L|DB_3A_C4Y42_50|DB_3A_C4Y42_50A|DB_3A_C4Y42_50AL), \
1095 DB_3B_PW4I31L|DB_3A_PW4I31|DB_3A_PW4I32|DB_3A_PW4I32L|DB_3A_PW4I33|DB_3A_PW4I33L)| \
1096 (<DB_3A_PW4I31L,DB_3A_B4I30,2*(DB_3A_C4I34|DB_3A_CUP36),2*DB_3A_C4UP30SL)| \
1097 (<2*DB_3A_C4UP30SL,2*(DB_3A_C4UP34(|L)|DB_3A_CUP36),DB_3A_B4I30L,DB_3A_PW4I31)| \
1098 (<DB_3A_PW4UPR04,DB_3A_C4U26,DB_3A_BC4UIP30BL|DB_3A_B4UP30L|DB_3A_BC4UP34SL,3*DB_3A_C4UP30BL)| \
1099 (<DB_3A_C4U26,DB_3A_BC4UP30B|DB_3A_B4UP30,3*DB_3A_C4UP30B,DB_3A_PW4I31L)| \
1100 (<DB_3A_B4I(|E)30(|L),3*DB_3A_C4I34(|L),DB_3A_PW4I32(|L)|DB_3A_PW4I33(|L))| \
1101 (<DB_3A_C4I29(|L),(DB_3A_B4I(|E)30(|L)|DB_3A_BC4I30(|L)|DB_3A_BC4I33(|L)),DB_3A_C4I31(|L), \
1102 2*DB_3A_C4I30H(|L),DB_3A_PW4I3(2|1)(|L))| \
1103 (<DB_3A_C4U2950(|L),(DB_3A_BC4U31(|L)|DB_3A_BC4I33(|L)|DB_3A_BC4U3355(|L)),DB_3A_C4UP30B, \
1104 2*(DB_3A_C4U(33|31)50(|L)),DB_3A_PW4I3(2|1)(|L),DB_3_MD4I50)| \
1105 (<DB_3A_PW4I3(2|1)(|L),2*DB_3A_C4I36(|L),DB_3A_BC4I37(|L),DB_3A_C4I36(|L))| \
1106 (<DB_3A_PW4I3(2|1)(|L),DB_3A_C4Y42_50(|L),2*DB_3A_C4I36(|L),DB_3A_BC4U37(|L),DB_3A_C4I36(|L))
1107
1108 # EP 3a 1950-1956 DB West Germany Passenger semi-fast train DB coaches
1109 $DEF D3PEDAN=DB_3A_PW4I3(2|1)(|L),DB_3_C4YMG51(|L),DB_3_CR4YMGB51(|L), \
1110 2*(DB_3_BC4YMG51(|L)|DB_3_B4YMG54(|L)),2*DB_3_C4YMG51(|L)
1111
1112 # EP 3a 1950-1956 DB West Germany Passenger semi-fast train DB coaches push and pull left
1113 $DEF D3PEDAL=(<(DB_3_C4YMGF51L|DB_3_CPW4YMGF51L|DB_3_CPW4YMGF54L),2*DB_3_C4YMG51(|L), \
1114 (DB_3_BC4YMG51(|L)|DB_3_B4YMG54(|L)),DB_3_C4YMG51(|L))
1115
1116 # EP 3a 1950-1956 DB West Germany Passenger semi-fast train DB coaches push and pull right
1117 $DEF D3PEDAR=(<(2*DB_3_C4YMG51(|L)),(DB_3_BC4YMG51(|L)|DB_3_B4YMG54(|L)),DB_3_C4YMG51(|L), \
1118 (DB_3_C4YMGF51|DB_3_CPW4YMGF51|DB_3_CPW4YMGF54))
1119
1120 # EP 3a 1950-1956 DB West Germany Passenger Regional rebuild coaches 3x
1121 $DEF D3PNRA1=(<DB_3A_C3YG56,DB_3A_C3YG56L,DB_3A_BC3YG56,DB_3A_C3YG56L,DB_3A_BC3YG56,DB_3A_BPW3YG56L)| \
1122 (<DB_3A_BPW3YG56,DB_3A_BC3YG56,DB_3A_C3YG56L,DB_3A_BC3YG56,DB_3A_C3YG56L,DB_3A_C3YG56,DB_3A_C3YG56L)
1123
1124 # EP 3a 1950-1954 DB West Germany Passenger Prusian Cars 3x
1125 $DEF D3PANPA=<(DB_3A_PW3PR11FG|DB_3A_PW3PR11)(|L), \
1126 5-7*((DB_3A_C3PR91UG|DB_3A_C3PR91HG|DB_3A_C3PR11BH|DB_3A_C3PR11BU|DB_3A_C3PR11FHG|DB_3A_C3PR11FUG| \
1127 DB_3A_C3PR11FHE|DB_3A_CD21|DB_3A_CD21TR|DB_3A_CD21A|DB_3A_CD21A_TR|DB_3A_CD21B|DB_3A_CD21BTR| \
1128 DB_3A_CD27|DB_3A_CDTR27|DB_3A_C3PR11|DB_3A_C3DPR04HE|DB_3A_C3TRPR04|DB_3A_C3DPR04|DB_3A_C3DPR04WE) \
1129 (|L)), \
1130 (2*DB_3A_BC3PR11FHG(|L))|(2*DB_3A_BC3PR11FUG(|L))|(2*DB_3A_BC3PR11FHE(|L))| \
1131 (2*DB_3A_BC3PR11FUE(|L))|DB_3A_B3PR10FHG(|L)|DB_3A_B3PR10FUG(|L)|DB_3A_B3PR10FHE(|L)| \
1132 DB_3A_B3PR10UD(|L), \
1133 6-8*((DB_3A_C3PR91UG|DB_3A_C3PR91HG|DB_3A_C3PR11BH|DB_3A_C3PR11BU|DB_3A_C3PR11FHG|DB_3A_C3PR11FUG| \
1134 DB_3A_C3PR11FHE|DB_3A_CD21|DB_3A_CD21TR|DB_3A_CD21A|DB_3A_CD21A_TR|DB_3A_CD21B|DB_3A_CD21BTR| \
1135 DB_3A_CD27|DB_3A_CDTR27|DB_3A_C3PR11|DB_3A_C3DPR04HE|DB_3A_C3TRPR04|DB_3A_C3DPR04|DB_3A_C3DPR04WE) \
1136 (|L));
1137
1138 # EP 3a 1950-1956 DB West Germany Passenger Regional DRG coaches
1139 $DEF D3PNRA2=(<DB_3A_CID27,DB_3A_BCIE29AL,DB_3A_CID27L,DB_3A_CI29BF,DB_3A_PWI31AL)| \
1140 (<DB_3A_PWI23(|L)|DB_3A_PWI27(|L)|DB_3A_PWI28(|L)|DB_3A_PWI30(|L)|DB_3A_PWI31(|L)|DB_3A_PWI31, \
1141 DB_3A_CI29BFL,DB_3A_CI29|DB_3A_CI29L,DB_3A_BCI28L, \
1142 DB_3A_BCI29AL|DB_3A_BCI29A|DB_3A_BCI29L~JUH|DB_3A_BCI29L|DB_3A_BCI29~JUH, \
1143 DB_3A_BI29L~JUH|DB_3A_BI29|DB_3A_BI29~JUH,DB_3A_CI29BFL|DB_3A_CI29,DB_3A_CI29L)
1144
1145 # EP 3a 1950-1956 DB West Germany Passenger Regional Bavaria
1146 $DEF D3PNBA=(<2*DB_3A_CID27(|L),3*DB_3A_C3IBAY(99A|13|21)(|L),DB_3A_(BC3IBAY07|BCI29|BCI28|BI29)(|L), \
1147 2*DB_3A_CI28(|L),DB_3A_CIBAY25(|L),2*DB_3A_MCI43(N|R)(|L),DB_3A_PWIBAY10(|L)|DB_3A_PWI28(|L))
1148
1149 # EP 3a 1950-1959 DB West Germany Freigt short
1150 $DEF D3GK1=(2-3*(DB_3A_GMHS30(|H|L)|DB_3A_GHS31B(|L)|DB_3A_GMH35N(|L)|DB_3A_GMHS35N(|L)| \
1151 DB_3A_GLMGHS36(|L)))| \
1152 (2-3*(DB_3A_G10(|D|H4|DL|L4H4L|L|H5|H5L|L4)|DB_3A_G19(|HL|BL|B)|DB_3A_GR20HL|DB_3A_G29M))| \
1153 (2-3*(DB_ELU61[OB:WOOD3(6|8),,26]))| \
1154 (2-3*(DB_3A_RMMS31R(|L)[OB:WOOD(95|94|93|92|91|90|96|89),7,13] \
1155 [OB:WOOD(95|94|93|92|91|90|96|89),35,13][OB:WOOD(95|94|93|92|91|90|96|89),62,13] \
1156 [OB:WOOD(95|94|93|92|91|90|96|89),88,13]))| \
1157 (2-3*((DB_3A_OM32L~JUH|DB_3A_OM32|DB_3A_OM32BL|DB_3A_OM32B)[OB:BARREL1,,19]))| \
1158 (2-3*((DB_3A_OMM37(|H)(|L)|DB_3A_OMM33(O|H)(|L)|DB_3A_OMM34(|L|HL|B|BL)) \
1159 [OB:(FR_PISEK|SOIL8|SOIL7)(|[M]),,25]))|(2-3*(THORL_BUZ_3A_525010(|L)))| \
1160 (2-3*(DB_3A_G10_DARBOVEN|DB_3A_G10_KOFF|DB_3A_G10_MUNSTERLAND|DB_3A_G10_PELIKAN|DB_3A_GRS30_ALAK| \
1161 DB_3A_G10_STRICKER)(|L))| \
1162 (2-3*((DB_3A_O10(|L)[O:SAND16(|[M]),,22])|(DB_3A_OMM39[OB:SAND16(|[M]),,25])))| \
1163 (2-3*(DB_3B_OM12N52F|DB_3A_OM12HL|DB_3A_OM12H|DB_3A_OM12N23L|DB_3A_OM12N23H|DB_3B_OM12UL| \
1164 DB_3A_OM19N28UL|DB_3A_OM19N28HL|DB_3A_OM19N28BL|DB_3A_OM21U|DB_3A_OM21HL|DB_3A_OM21B))| \
1165 (2-3*(DB_SSKM49L|DB_SSKM49|DB_SSKM49RL))|(2-3*(DB_3A_R10(OR|H)(|L)[OB:BOILER(5|4|1)([|M]),,12]))| \
1166 (2-3*(DB_3A_GR20L|DB_3A_GR20|DB_3A_GR20H|DB_3A_GR20VH|DB_3A_GMEHS30H|DB_3A_GMEHS30B| \
1167 DB_3A_GMHS35NL|DB_3A_GMH35N|DB_3A_GMHS53SL|DB_3A_GMHS53S))| \
1168 (2-3*(DB_3A_V90(|H|B|V|VH|VB|G|GH|GB|A)(|L)|DB_3A_VWH03(|H)(|L)|DB_3A_VWH04(|K|KV|V|TV)(|H|HL)| \
1169 DB_3_V14(|H|V1|V1H4|V2|V2H|V2H4)(|L)| \
1170 DB_3_V23(A|AB|B|B|BH|BB|BS|BSH|BSB|BD|CDH|C|CH|CB|CD|CDB)(|L)|DB_3_V33(|S)(|L)| \
1171 DB_3A_VH04(|K|KH|KVH|KHL|KVHL|KV|U|UH|UHL|UV|UVH|UVHL|L|TUVH|TUVHL|TUV|H|HL|V|VL|VH|VHL|TV|TVL| \
1172 TVH|TVHL)|DB_3A_VH04(|K|KV|U|UV|V|TV|V)))|(2-3*(HENKEL02|THORL_BUZ_3A_525010(|L)|CSD_R5D|CSD_R8A))
1173
1174 $DEF Z_D_E3_GAK=2*D3GK1
1175
1176 # EP 3a 1950-1959 DB West Germany Freigt long
1177 $DEF D3FASE=4-5*D3GK1
1178
1179 # EP 3a 1950-1959 DB West Germany Freigt long
1180 $DEF Z_D_E3_GA=8-10*D3GK1
1181
1182 # EP 3a 1950-1959 DB West Germany Freigt short steam
1183 $DEF D3FAS=DB_3A_PWGS44B(|L)|DB_3A_PWGS44(|D)(|A)(|L)|DB_3A_PWGHS36(|L)|DB_3A_PWGHS41(|MK)(|L),4-5*D3GK1
1184
1185 # EP 3a 1950-1959 DB West Germany Freigt long steam
1186 $DEF D3FAL=DB_3A_PWGS44B(|L)|DB_3A_PWGS44(|D)(|A)(|L)|DB_3A_PWGHS36(|L)|DB_3A_PWGHS41(|MK)(|L), \
1187 8-10*D3GK1
1188
1189 # EP 3A Freight long Leig steam
1190 $DEF D3FLLS=DB_3A_PWGPR14L|DB_3A_PWGS44B(|L)|DB_3A_PWGS44(|D)(|A)(|L)|DB_3B_PWGHS41OK| \
1191 DB_3A_PWGHS36(|L)|DB_3A_PWGHS41(|MK)(|L), \
1192 10*((DB_3A_GLLH12|DB_3A_GLLH12V1|DB_3A_GLLEH12|DB_3A_GLLEH12D1|DR_3_GGLL20|DB_3A_GLLEH12V1| \
1193 DB_3A_GLLH12B1|DB_3A_GLLH12B2|DB_3A_GLLEH12A2)(|L))
1194
1195 # EP 3A 1950-1960 DB West Germany Freigt long Tank
1196 $DEF D3FBLZ=24*(DB_3_24LBEB_VTG(|L)|DB_3_24SBKW_KONTI(|L)|DB_3_24LBEB_VTG(|L)|DB_3_22KWG_ESSO(|L)| \
1197 DB_3_33LBU_EVA(|L)|DB_3_40LHB_VTG(|L)|DB_3_33LBU_EVA(|L)|DB_3_22MKW_SHELL(|L)|DB_3_30LBUB_VTG(|L)| \
1198 DB_3_40LHB_VTG(|L)|DB_3_22KWG_VTG(|L)|DB_3_17BW_SHELL(|L)|DB_3_630DB_SHELL(|L)| \
1199 DB_3_30LBUB_SHELL(|L)|DB_3_17BWBH_SHELL(|L)|DB_3_24KWAB_SHELL(|L)|DB_3_17BW_SHELL(|L)| \
1200 DB_3_22ABG_SHELL(|L)|DB_3_30LBUB_BP(|L)|DB_3_630DB_VTG(|L)|DB_3B_G10(|L)|DB_3_30LBEB_BV(|L)| \
1201 DB_3_22ABG_SHELL(|L)|DB_3_Z2B_DE(|L)|DB_3_Z2B_AR(|L)|DB_3_Z2B_BP(|L)|DB_3_Z2B_MI(|L)| \
1202 DB_3_Z2B_ES(|L)|DB_3_Z2H_SH(|L)|DB_3_Z2B_SH(|L)|DB_Z_BP(|L)|DB_Z_ESSO(|L)|DB_3B_Z4USTAC(|L)| \
1203 DB_ZAD_VTG(|L)|DB_ZAU_VTG(|L))
1204
1205 # EP 3A 1950-1960 DB West Germany Freigt long Tank steam
1206 $DEF D3FBLZS=DB_3A_PWGPR14L|DB_3A_PWGS44B(|L)|DB_3A_PWGS44(|D)(|A)(|L)|DB_3B_PWGHS41OK| \
1207 DB_3A_PWGHS36(|L)|DB_3A_PWGHS41(|MK)(|L),D3FBLZ
1208
1209 # EP 3b DB West Germany Passenger shunting
1210 $DEF D3PBS=(DB_POST2A14,DB_3WR4UM64_1RL,DB_ABUM63BL)| \
1211 (DB_3C_WR4UM39L,DB_3WLB4Y36,DSG_WLAS4UE50MD,DSG_3C_WL20310(|L))| \
1212 (DB_3B_PW4UE30L,DB_3C_MD4I50L,DB_3C_AB4U29)
1213
1214 # EP 3b 1962-1968 DB West Germany Passenger long distance TEE
1215 $DEF D3PT=(<DB_AP4UM63L,2*DB_AV4UM63L,DB_3WR4UM64_(1|2)TL,DB_AP4UM63L,DB_AV4UM63L)
1216
1217 # EP 3b 1956-1962 DB West Germany Passenger long distance DRG coaches
1218 $DEF D3PDBR5=(<DBP_3B_POST4U17(B|A)(|L),DB_3B_PW4U37(|L)|DB_3B_PW4UE30(|L),DB_3B_B4UE26A_58, \
1219 2*DB_3B_B4UE26(|A)53,DB_3B_A4UE22|DB_3B_A4UE26(_56B|A_56),DSG_3A_WR1076, \
1220 DB_3B_A4UE23|DB_3B_A4UE26_56|DB_3B_A4UWE23(|A)56,DB_3B_B4UE21,DB_3B_B4UPR20D,DB_3B_B4UPR20)| \
1221 (>DBP_3B_POST4U17(B|A)(|L),DB_3B_PW4U37(|L)|DB_3B_PW4UE30(|L),DB_3B_B4UE26A_58L, \
1222 2*DB_3B_B4UE26(|A)53L,DB_3B_A4UE22L|DB_3B_A4UE26(_56B|A_56)L,DSG_3A_WR1076L, \
1223 DB_3B_A4UE23L|DB_3B_A4UE26_56L|DB_3B_A4UWE23(|A)56L,DB_3B_B4UE21L,DB_3B_B4UPR20DL,DB_3B_B4UPR20L)| \
1224 (<DBP_3B_POST4U20(B|A)(|L),DB_3B_D4U30U(|L)|DB_3B_PW4U36(|L),DB_3B_B4UWE23A58|DB_3B_B4UWE2358_2, \
1225 DB_3B_B4UWE22_58,DB_3B_A4UE23_58|DB_3B_A4UE26B,DSG_3C_WR4U_1029,DB_3B_A4UE38_51G,DB_3B_B4UE38_53G, \
1226 DB_3B_B4UE26A53|DB_3B_B4UE26_58,DB_3B_AB4UM55(|L))| \
1227 (>DBP_3B_POST4U20(B|A)(|L),DB_3B_D4U30U(|L)|DB_3B_PW4U36(|L),DB_3B_B4UWE23A58L|DB_3B_B4UWE2358_2L, \
1228 DB_3B_B4UWE22_58L,DB_3B_A4UE23_58L|DB_3B_A4UE26BL,DSG_3C_WR4U_1029L,DB_3B_A4UE38_51GL, \
1229 DB_3B_B4UE38_53GL,DB_3B_B4UE26A53L|DB_3B_B4UE26_58L,DB_3B_AB4UM55(|L))| \
1230 (<DB_3B_POST4UB21(|L),DB_3B_PW4U3(6|7)(|L),4*DB_3B_B4U3(6|5)_51,DSG_3A_WR1(128|089), \
1231 3*DB_3B_A4U35_54O,DB_3B_AB4U(35_54|36_52)O)| \
1232 (<DB_3B_AB4U(35_54|36_52)OL,3*DB_3B_A4U35_54OL,DSG_3A_WR1(128|089)L,4*DB_3B_B4U3(6|5)_51L, \
1233 DB_3B_PW4U3(6|7)(|L),DB_3B_POST4UB21(|L))| \
1234 (<DB_3B_PW4UE30L,3*DB_3B_A4UE28F,DSG_3A_WR10(01|76|41)L, \
1235 5*(DB_3B_B4UE21L|DB_3A_C4U22L|DB_3B_B4U28BL))| \
1236 (<(5*(DB_3A_C4U22|DB_3B_B4U28B|DB_3B_B4UE21)),DSG_3A_WR10(01|76|41),3*DB_3B_A4U35_54OL, \
1237 DB_3B_PW4UE30L)
1238
1239 # EP 3b 1962-1968 DB West Germany Passenger long distance DRG coaches
1240 $DEF D3PDBR6=(DB_3B_POST4A15L|DB_3B_POST4UB21(|L), \
1241 (<DB_3B_PW4UE30(|L)|DB_3C_D4U30(|L)|DB_3(B|C)_D4U28(|L),DB_3C_A4U28JL,DB_3B_A4UE38_51DL, \
1242 DB_ABR4U3452_3ABL,DB_3B_A4U2852B,DB_3B_A4U28S,DB_3A_BC4UE29))| \
1243 (<DB_3B_MD4YG57D,DB_3B_A4U35_54O,DB_3B_B4U36_51L,DB_3B_B4U35_51L,DB_3B_B4UE38_53G,DSG_3A_WR1234)| \
1244 (<5*DB_3B_B4U28B,DSG_3A_WR123(0|4),3*DB_3B_A4U28S,DB_3B_PW4UE30(|L), \
1245 0-1*(DBP_3(B_POST4UA216_40U|C_POST4UA216_40)(|L)))| \
1246 (<0-1*(DBP_3(B_POST4UA216_40U|C_POST4UA216_40)(|L)),DB_3B_PW4UE30L,3*DB_3B_A4U28S,DSG_3A_WR1234, \
1247 5*DB_3B_B4U28B)| \
1248 (<DB_3B_PW4UE30L,3*DB_3B_A4UE28F,DSG_3A_WR10(01|76|41)L, \
1249 5*(DB_3B_B4UE21L|DB_3A_C4U22L|DB_3B_B4U28BL))| \
1250 (<5*(DB_3B_B4U28B|DB_3B_B4UE21),DSG_3A_WR10(01|76|41),3*DB_3B_A4U35_54OL, \
1251 DB_3B_PW4UE30(|L)|DB_3C_D4U30(|L)|DB_3(B|C)_D4U28(|L))| \
1252 (<DB_3B_D4U28,(5*(DB_3B_B4UE28EXA|DB_3C_B4UE28B|DB_3B_B4UE28B|DB_3C_B4UE38_53|DB_3B_B4UE38_53G)), \
1253 DB_3B_AB4UE29|DB_3C_AB4UE29B|DB_3B_AB4UE39_51GD|DB_3B_AB4UE39_51G|DB_3C_AB4UE39_51G, \
1254 DB_3C_AR4U3452,DB_3B_A4UE26B|DB_3B_A4UE28S2|DB_3C_A4UE28B, \
1255 (DB_3C_A4UE30K|DB_3B_A4UE30|DB_3B_A4UE38_51GD|DB_3B_A4UE38_51G|DB_3C_A4UE38_51))| \
1256 (>DB_3B_D4U28L, \
1257 (5*(DB_3B_B4UE28EXAL|DB_3C_B4UE28BL|DB_3B_B4UE28BL|DB_3C_B4UE38_53L|DB_3B_B4UE38_53GL)), \
1258 DB_3B_AB4UE29L|DB_3C_AB4UE29BL|DB_3B_AB4UE39_51GDL|DB_3B_AB4UE39_51GL|DB_3C_AB4UE39_51GL, \
1259 DB_3C_AR4U3452L,DB_3B_A4UE26BL|DB_3B_A4UE28S2L|DB_3C_A4UE28BL, \
1260 (DB_3C_A4UE30KL|DB_3B_A4UE30L|DB_3B_A4UE38_51GDL|DB_3B_A4UE38_51GL|DB_3C_A4UE38_51L))
1261
1262 # EP 3b 1956-1962 DB West Germany Passenger long distance new cars
1263 $DEF D3PDN5=(<DB_3B_POST4UB21(|L),DB_3B_PW4U3(6|7)(|L),4*DB_3B_B4U3(6|5)_51,DSG_3A_WR1(128|089), \
1264 3*DB_3B_A4UM54A|DB_3B_A4UM54G1|DB_3B_A4UM52B,DB_3B_AB4U(35_54|36_52)O)| \
1265 (<DB_3B_AB4U(35_54|36_52)OL,3*DB_3B_A4UM54G1L|DB_3B_A4UM52BL|DB_3B_A4UM54AL,DSG_3A_WR1(128|089)L, \
1266 4*DB_3B_B4U3(6|5)_51L,DB_3B_PW4U3(6|7)(|L)|DB_3B_BD4UM5(8|9),DB_3B_POST4UB21(|L))| \
1267 (<DBP_3B_POST4U21A59(33|42|58|72)(|L),DB_3B_PW4U3(6|7)(|L)|DB_3B_BD4UM5(8|9)L,4*DB_3B_B4UM52(G|H), \
1268 DSG_3A_WR1(128|089),3*DB_3B_A4UM54A|DB_3B_A4UM54G1|DB_3B_A4UM52B,DB_3B_AB4UM52(|_1|_3))| \
1269 (<DB_3B_AB4UM52(|_1|_3)L,3*DB_3B_A4UM54G1L|DB_3B_A4UM52BL|DB_3B_A4UM54AL,DSG_3A_WR1(128|089)L, \
1270 4*DB_3B_B4UM52(G|H)L,DB_3B_PW4U3(6|7)(|L),DBP_3B_POST4U21A59(33|42|58|72)(|L))| \
1271 (<DB_3B_PW4U37O(|L),DB_3B_MD4YG57D,4*DB_3B_B4UM54,DB_3B_AR4UM(G54B2|54B2|54B3),DB_3B_A4UM54G, \
1272 DB_3B_AB4UM52(|_1|_3)S)| \
1273 (<DB_3B_PW4U37O(|L),DB_3B_MD4YG57D,DB_3C_AB4UM52_(1|3)L,DB_3B_AR4UM(G54B2|54B2|54B3)L, \
1274 DB_3B_A4UM54GL,4*DB_3B_B4UM54L)
1275
1276 # EP 3b 1962-1968 DB West Germany Passenger long distance new cars
1277 $DEF D3PDN=0-1*(DB_POST4MG(AP|B|BL)26(|L)), \
1278 (<DB_3B_D4UM60(|L),2*DB_B4UM63,2*DB_A4UM54,DB_3WR4UM64_2R(|L),3*DB_B4UM63)| \
1279 (<2*DB_3B_BUM54,2*DB_A4UM54,DB_3C_AR4UM(G54B|54B2|54BR1)L,3*DB_3B_BUM54L,DB_3B_D4UM60L, \
1280 DB_3C_MD4I50(|T)(|L))| \
1281 (<DB_BD4UM59L|DB_3B_BDUMS273L,2*DB_B4UM63,2*DB_A4UM54,DB_3WR4UM64_2R(|L),3*DB_B4UM63)| \
1282 (<2*DB_3B_BUM54,2*DB_A4UM54,DB_3C_AR4UM(G54B|54B2|54BR1),3*DB_3B_BUM54L,DB_BD4UM(59|61), \
1283 DB_3C_MD4YG57(|L))| \
1284 (<DB_3C_D4U37(|O)(|L),DB_3B_MD4YG57D,4*DB_3B_B4UM54,DB_3C_WR4UM39,DB_3C_A4UM54B(|L), \
1285 DB_3B_AB4UM52(|_1|_3)SL)| \
1286 (<DB_3C_AB4UM52_(1|3),DB_3C_A4UM54BL,DB_3C_WR4UM39L,4*DB_3B_B4UM54L,DB_3C_D4U37(|O), \
1287 DB_3B_MD4YG57DL)| \
1288 (3-4*(DB_3A_GL11(|L|U|H|HL|UV|V|VL|V1|V1L|VH|VHL|VB|VBL)|DB_3A_GLR22(|U|H|B)(|L)))| \
1289 (<(5*(DB_3C_B4UM54(A|C)|DB_3B_BUM54A|DB_3B_B4UM54(B|C)|DB_3C_B4UM51G|DB_3C_B4UM5261H)), \
1290 DB_3C_WR4UM39|DSG_3A_WR123(4|0)L,DB_3(C|B)_AB4UM55|DB_3B_AB4UM55(A|C|D)|DB_3C_AB4UM5261, \
1291 3*(DB_3C_A4UM54A|DB_3B_A4UM52B(|S)|DB_3C_A4UM5261|DB_3C_A4UM54S),DB_3C_D4U37(|OM|O)(|L))| \
1292 (<DB_3C_D4U37(|OM|O)(|L), \
1293 3*(DB_3C_A4UM5261L|DB_3B_A4UM52B(|S)L|DB_3C_A4UM54SL|DB_3C_A4UM54AL|DB_3C_A4UM54SL), \
1294 DSG_3A_WR123(4|0)|DB_3C_WR4UM39L,DB_3C_AB4UM5261L|DB_3B_AB4UM55(A|C|D)L|DB_3(C|B)_AB4UM55L, \
1295 5*(DB_3C_B4UM54(A|C)L|DB_3B_BUM54AL|DB_3B_B4UM54(B|C)L|DB_3C_B4UM5261(G|H)L))| \
1296 (<(5*(DB_3D_BUM63|DB_B4UM63|DB_3C_B4UM61G)),DB_3D_BUM54|DB_3D_AB4UM63|DB_3C_AB4UM61G, \
1297 DB_BRBU4UM61L,3*(DB_3C_A4UM62B|DB_3D_A4UM61|DB_A4UM61), \
1298 DB_3B_D4UM60L|DB_3C_BD4UM58|DB_BD4UM59~TDBW|DB_3B_BD4UM61)| \
1299 (<DB_3B_BD4UM61L|DB_3C_BD4UM58L|DB_BD4UM59L~TDBW|DB_3B_D4UM60, \
1300 3*(DB_A4UM61L|DB_3D_A4UM61L|DB_3C_A4UM62BL),DB_3D_AB4UM63L|DB_3C_AB4UM61GL|DB_3D_BUM54L, \
1301 DB_3WR4UM64_1R,5*(DB_B4UM63L|DB_3D_BUM63L|DB_3C_B4UM61GL))| \
1302 (<DB_3B_D4UM60,3*((DSG_3B_WLAB4UMG59_332(01|41|56)L)|(DSG_3B_WLAB4UMG59_332(01|41|56))), \
1303 DB_3C_WR4UM39(|L),5@NS_N_BC(|L),DB_3C_AB4U35_54)
1304
1305 # EP 3b 1956-1958 DB West Germany Passenger semi-fast train DRG coaches
1306 $DEF D3PERB=(<DB_3B_B4Y3150L,DB_3B_B4Y2950L,DB_3B_AB4Y(30|33)55L|DB_3B_A4Y3055L,DB_3B_B4Y3350L, \
1307 DB_3B_PW4I31)| \
1308 (<DB_3B_PW4I31L,DB_3B_B4Y3350,DB_3B_AB4Y(30|33)55|DB_3B_A4Y3055,DB_3B_B4Y2950,DB_3B_B4Y3150)| \
1309 (<DB_3B_PW4I32(|L),DB_3B_AB4Y3755(|L),2*DB_3B_B4Y3650(|L),2*DB_3B_B4Y3050(|L))
1310
1311 # EP 3b 1957-1961 DB West Germany Passenger Prusian Cars 3x
1312 $DEF D3PBNPA=((DB_PWI29|DB_PWI28)(|L),4-5*((DB_3B_B3PR11CSE|DB_3B_B3CDPR04S|DB_B27|DB_B21)(|L)), \
1313 DB_AI29_1958(|L), \
1314 6-8*((DB_3B_B3PR04CDTR|DB_3B_B3PR04CDUE|DB_3B_B3PR11CSE|DB_3B_B3CDPR04S|DB_B27|DB_B21)(|L)))| \
1315 (<DB_3B_D3PR11E(|L), \
1316 5-7*((2:DB_3B_B3PR04CDW|2:DB_3B_B3PRCD04UD|DB_B21|DB_3B_B21DTR|4:DB_3B_B3PR11CDE|DB_3B_B3PR11CUE| \
1317 DB_3B_B3PR11BCFUE|DB_3B_B3PR11BCUD|DB_3B_B3PR10BD|DB_3B_B3PR10BU)(|L)),DB_AI29_1958(|L), \
1318 5-7*((2:DB_3B_B3PR04CDW|2:DB_3B_B3PRCD04UD|4:DB_3B_B3PR11CDE|DB_3B_B3PR11CUE|DB_B21| \
1319 DB_3B_B3PR11BCFUE|DB_3B_B21DTR|DB_3B_B3PR11BCUD|DB_3B_B3PR10BD|DB_3B_B3PR10BU)(|L)))
1320
1321 # EP 3b 1961-1968 DB West Germany Passenger regional Silver Cars left
1322 $DEF D3PBNSL=(<DB_3_BDNBF59L,DB_3_B4NB59(|L),DB_3_AB4NB59(|L),2*DB_3_B4NB59(|L))
1323 # EP 3b 1961-1968 DB West Germany Passenger regional Silver Cars right
1324 $DEF D3PBNSR=(>DB_3_BDNBF59,DB_3_B4NB59(|L),DB_3_AB4NB59(|L),2*DB_3_B4NB59(|L))
1325 # EP 3C 1964-1968 DB West Germany Passenger regional Silver Cars
1326 $DEF D3PBNS=(<DB_3C_MD4YG57(|L)|DB_3C_D4Y33_57U(|L)|DB_3C_PW4I32L(|L),DB_3_B4NB59(|L), \
1327 DB_3_AB4NB59(|L),2*DB_3_B4NB59(|L))
1328 # EP 3b 1961-1968 DB West Germany Passenger regional push and pull left
1329 $DEF D3PBNPL=(<DB_3B_BPW4YMGF54L|DB_3_BPW4YMGF54L|DB_3A_BPW4YMGF51L|DB_3B_B4YMGF51L|DB_3A_B4YMGF51L| \
1330 DB_3B_B4YMGF51L,(DB_3A_B4YMG51|DB_3B_B4YMG51A)(|L),(DB_3B_AB4YMG51|DB_3C_ABYMG51)(|L), \
1331 (DB_3A_B4YMG51|DB_3B_B4YMG51A)(|L))
1332
1333 # EP 3b 1961-1968 DB West Germany Passenger regional push and pull right
1334 $DEF D3PBNPR=(<(DB_3A_B4YMG51|DB_3B_B4YMG51A)(|L),(DB_3B_AB4YMG51|DB_3C_ABYMG51)(|L), \
1335 (DB_3A_B4YMG51|DB_3B_B4YMG51A)(|L), \
1336 DB_3B_BPW4YMGF54|DB_3_BPW4YMGF54|DB_3A_BPW4YMGF51|DB_3B_B4YMGF51|DB_3B_B4YMGF51|DB_3A_B4YMGF51)
1337
1338 # EP 3b 1958-1968 DB West Germany Passenger semi-fast train DRG coaches
1339 $DEF D3PERC=(<DB_3B_PW4I31,DB_3C_B4Y3050L, \
1340 DB_3C_AB4Y3155|DB_3C_AB4Y3355|DB_3C_AB4Y3755A|DB_3C_AB4Y3055A,DB_3C_A4Y3055A|DB_3D_A4Y3055, \
1341 DB_3C_B4Y3650|DB_3C_B4Y3150,DB_3C_B4Y3450)| \
1342 (<DB_3C_B4Y3450L,DB_3C_B4Y3650L|DB_3C_B4Y3050,DB_3C_A4Y3055AL|DB_3D_A4Y3055L, \
1343 DB_3C_AB4Y3055AL|DB_3C_AB4Y3755AL|DB_3C_AB4Y3155L|DB_3C_AB4Y3355L,DB_3C_B4Y3150L,DB_3B_PW4I31L)| \
1344 (<DB_3C_B4UE26A53(|L)|DB_3C_B4UE2653(|L),DB_3C_B4UE22(|L)|DB_3C_B4UE26(|A)_58(|L), \
1345 DB_3C_B4Y3(350|150)(|L),DB_3C_D4Y3157U(|L)|DB_3C_MD4YG57(|L))
1346
1347 # EP 3b 1958-1968 DB West Germany Passenger regional DRG-cars
1348 $DEF Z_D_E3_PDB=(<DB_PWI23(|L),DB_BI27(|L),2*(DB_BI21(|L)~JUH,DB_BI21A(|L)|DB_BI21B(|L)), \
1349 (DB_B27(|L)|DB_BD21B(|L)),(DB_AB21_1956(|L)|DB_AB21_1958(|L)), \
1350 3*(DB_B21(A|ADTR)(|L)|DB_B21(C|D|E)(|L)|(DB_B21|DB_BD21B(|L)|DB_3B_B21BTRL|DB_3B_B21BDTR)))| \
1351 (<(3*(DB_3B_BI21(C|D)(|L)|DB_3B_BI28(A|B)(|L))),DB_AI29_1956(|L), \
1352 3*(DB_3B_BI21(C|D)(|L)|DB_3B_BI28(A|B)(|L)),DB_PWI23(|L))| \
1353 (DB_3A_PWI31A,DB_ABI34,DB_BI29,DB_BI29L,DB_3C_ABI29AL,DB_BIW29,DB_3B_BI27FL,DB_3B_BI27FL, \
1354 DB_3B_BI29FL,DB_3B_BI29F)
1355
1356 # EP 3b 1958-1968 DB West Germany Passenger regional rebuild cars 4x
1357 $DEF D3PDU=(<DB_33BDYG56|DB_33BDYG56R|DB_33BDYG56S,DB_33BYG56RL|DB_33BYG56SL|DB_33BYG58L, \
1358 DB_33ABYG57(|L)|DB_33ABYG58(|L),DB_33BYG56R|DB_33BYG56S|DB_33BYG58)
1359
1360 # EP 3b 1960-1968 DB West Germany Freigt short
1361 $DEF D3FBK=(3-4*DB_3B_OM12(B|EL|EHL|EH|E)|DB_OMM51|DB_OMM56|DB_3B_OM21EHL|DB_3OMMI51L|DB_3B_OMM44U)| \
1362 (3-4*DB_3B_OM32(|B)(|L)[OB:BARREL1,,22])|(3-4*DB_FCS(14|15|16|17|18|19|20|21|22|23|24|25))| \
1363 (3-4*DB_3OMMI51M(|L))|(3-4*(DB_3B_GMEHS30MH|DB_GBKL236H|DB_3B_GMS44E)(|L))|(2-3*DB_3B_XLM57)| \
1364 (3-4*(DB_3B_GMS54S|DB_3B_GMHS53ESL2|DB_3B_GMS54TB|G_46428|DB_GBKL238L|DB_GBKL238|DB_3B_G19HL))| \
1365 (3-4*(DB_3B_KMMKS51B|DB_3B_KMMFKS52|DB_3B_KMMKS01|DB_3B_KMMKS51)(|L))|(2-3*(DB_3B_XLM57|DB_X05B))| \
1366 (3-4*(DB_3B_GLMHS50A(|L)|DB_3B_GMMHS56A|DB_3B_GMMEHS56B(|L)|DB_3B_GMMHS56B(|L)|DB_3B_GMMHS56(|L)))| \
1367 (3-4*DB_3_VLMMHS63(|H)(|L))|(2-3*(DB_3B_R10(OR|H)(|L)[OB:(BOX_BBC|BOX22|BOX6),,12]))| \
1368 (3-4*DB_3B_GL11(|L|U|H|HL|UV|V|VL|V1|V1L|VH|VHL|VB|VBL|MVB|MVBL|MV|MVL))| \
1369 (3-4*(DB_BT50DDZKR|DB_BT50DIKR_UNION|DB_BT50DIKR_KONIGSBACHER|DB_BT50EFKR_KNORR))| \
1370 (3-4*(DB_3B_GMHS35KEB|DB_GBKL236H|DB_3B_GMHS53ESL(1|2)|DB_3B_GMHS35KEB|DB_GBKL238|DB_3B_GMHS35KE| \
1371 DB_GBKL238))|(2-3*DB_3_V14H(|L))|(3-4*(DB_RMS31B[OB:WHEEL1,,12]))| \
1372 (3-4*(DB_3_OMM37H|DB_3_OMM37B|DB_3_OMM37U|DB_3_OMM37E|DB_3_OMM37EH|DB_3_OMM37EH1|DB_3_OMM37EB| \
1373 DB_3_OMM37|DB_3B_OMM34)(|L)[OB:(FR_PISEK|SOIL8|SOIL7)(|[M]),,25])| \
1374 (3-4*(DB_3B_OMM37(|E)(|H|F)(|L)|DB_3B_OM12N23H|DB_3B_OM12N23B|DB_3B_OM19N28H| \
1375 DB_3B_OMM33(|E)(H|O)(|L)))|(3-4*(DB_OTMM70VD))|(3-4*DB_3B_(RBMMS55(O|R)|GBMHS51(A|B))(|L))| \
1376 (3*((<DB_K15BHL,DB_K15B)|(<DB_K15C,DB_K15BH)|(<DB_K15CHL,DB_K15C)|(<DB_K15D,DB_K15DH)| \
1377 (<DB_K15CHL,DB_K15BNB)|DB_KK15L|(<DB_K15CNB,DB_K15BH)|(<DB_K15NB,DB_K15CH)|(<DB_K15D,DB_K15DH)))| \
1378 (3-4*(DB_OMM46B|DB_3B_OMM49B|DB_OMM52H|DB_3B_OMM53S|DB_OMM54P|DB_OMM55B|DB_3B_OMM55|DB_OMM55P| \
1379 DB_OMM55B|DB_3B_OMM51_131|DB_3B_OMM52_132|DB_3B_OM53|DB_3_OMM37EB|DB_3_OMM37EU)(|L) \
1380 [OB:COAL(40|20|42)(|[M]),,27])|(2-3*DB_TTKO49OB(|L))|(3-4*DB_3B_G(MMEHS56|MHS57|LMHS36)(|L))| \
1381 (3-4*DB_3_Z2(B_DE|B_AR|B_BP|B_MI|B_ES|H_SH|H_SH)(|L))|(3-4*DB_3B_T(EHS42|MEHS50TRA2)(|L))| \
1382 (2-3*((DB_3BTS30[O:WB3D1,*22,11][O:WB3D1,*45,11][O:WB3D1,*68,11])| \
1383 (DB_3BTS30L[O:WB3D1,*23,11][O:WB3D1,*45,11][O:WB3D1,*69,11])| \
1384 (DB_3_BT30A(|B)L[O:WB3D1,*21,12][O:WB3D1,*45,12][O:WB3D1,*69,12])| \
1385 (DB_3_BT30A(|B)[O:WB3D1,*22,12][O:WB3D1,*46,12][O:WB3D1,*70,12])))| \
1386 (2-3*(VTG_3_UHS597332|EVA_3_UHS539209|VTG_3_UBHS598702|VTG_3_UHS587854|DB_3_UHS509579_MG)(|L))| \
1387 (2-3*(DR_ZH8020|EVA_3B_Z3KAS(|L)|DR_ZAEKK2))|(2-3*(DB_3KLMMGKS66)(|L))| \
1388 (3*(DB_3B_OMM52_0(1|2|3|4|5|6|7)[OB:COAL(56|50)(|[M]),,26]))| \
1389 (2-3*(DB_3B_R10(OR|H)(|L)[OB:WOOD22(1|2|3|4|5|6),,12]))| \
1390 (2-4*(DB_3B_GMS39H(1|2)|DB_3B_GLMMS61H)(|L))| \
1391 (2-4*(DB_3B_GBS252(|L)|DB_3B_GLMHS50B(|L)|DB_3B_GMS39A))| \
1392 (2-3*(DB_3B_R(MMS31|10O)(|L)[OB:STEELCOIL1,,12]))|(2-3*(DB_3B_KKDS55(|L)|DB_3C_KDS54(|B)(|L)))| \
1393 (2-3*((DB_3B_TMEHS50(|TRA)(|L))|DB_3B_OMM33H1))| \
1394 (2-3*((DB_3B_BTMS55(|L)[OB:TANK_41W,9,12][OB:TANK_41W,81,12][OB:TANK_41W,57,12][OB:TANK_41W,33,12])| \
1395 (DB_3B_TS50O(|L)[OT:FR_EKRT2,34,14][OT:FR_EKRT2,58,14][OT:FR_EKRT2,10,14])))| \
1396 (DB_3B_TS50B[OT:FR_EKRT2,34,14][OT:FR_EKRT2,58,14][OT:FR_EKRT2,10,14])| \
1397 (DB_3B_TS50BL[O:EOSKRT021[BC:-15,15],39,13][O:EOSKRT021[BC:-15,15],63,13] \
1398 [O:EOSKRT021[BC:-15,15],15,13])|(2-3*DB_3B_Z2UER(1|2)(|L))|(2-3*DB_BT10EOSKRT)| \
1399 (2-3*((DB_3B_RMMS33(|L)[OB:CABLE18,18,12][OB:CABLE18,50,12][OB:CABLE18,83,12])| \
1400 (DB_3B_RMMS31R[OB:BOX10,44,16][OB:BOX25,11,14][OB:#BOX10,77,16])))| \
1401 (2-3*(FS_3(B_GMHS1|_F033)(|L)|OBB_3_GDS135H(|L)|SBB_3K3_42401[BC:-15,15](|L)))| \
1402 (2-3*(NS_3B_CHOP1460(|L)|NS_3B_SCHRKB(|L)|SNCB_3B_4427500(|L)))| \
1403 (2-3*(DB_3B_RMMS31B[OB:WOOD17(1|6|7|8|3|9),22,15][OB:WOOD17(1|6|7|8|3|9),69,15]| \
1404 DB_3B_RMMS31BL[OB:WOOD1(58|61|62|59|63),20,15][OB:WOOD1(58|61|62|59|63),66,15]| \
1405 DB_3B_RMMSO33(|L)[OB:FR_TRACTOR2,13,12][OB:FR_TRACTOR2,62,12]))| \
1406 (3*(DB_3B_OMM55_(01|02|03|04|05|06|07|08|09|10|11|12|13|14)[OB:COAL(56|50)(|[M]),,26]))| \
1407 (2-3*DB_3SSLA44_1942(|L)[OB:RAIL6[BT:,12],19,13][OB:RAIL6[BT:,12],54,13])
1408
1409 $DEF Z_D_E3_Gkurz=2*D3FBK
1410
1411 # EP 3b 1960-1968 DB West Germany Freigt long
1412 $DEF Z_D_E3_GB=8-10*D3FBK
1413
1414 # EP 3b 1960-1968 DB West Germany Freigt Caboose
1415 $DEF D3FBPWG=(DB_3B_PWGHS41OK|DB_3C_PWGHS41OK(|L))|DB_3B_PWGHS54(A|AL|B|BL|A3L)| \
1416 DB_3B_PWGS44(|D|B|A|DA)(|L)|DB_3C_PWGS44B(|L)|DB_PWGHS28A(|L)|DB_3B_PWG14BO(|L)|DB_3B_PWGPR14B(|L)
1417
1418 # EP 3b 1960-1968 DB West Germany Freigt short steam
1419 $DEF D3FBS2=D3FBPWG,4-5*D3FBK
1420
1421 # EP 3b 1960-1968 DB West Germany Freigt long steam
1422 $DEF D3FBL2=D3FBPWG,Z_D_E3_GB
1423
1424 # EP 3b 1960-1968 DB West Germany Freigt shunting
1425 $DEF DEFSB=2-4*(DB_3_V14H(|L)|DB_3B_OM12B|DB_3B_KMMFKS52(|L)|DB_RMS31B(|L)|DB_TTKO49OB(|L)| \
1426 DB_3B_GMHS53ESL2(|L)|DB_3B_GMHS35KE(|L)|DB_3B_OM19N28H|DB_3B_OM21EH(|L))
1427
1428 # EP 3b 1960-1968 DB West Germany Freigt Fals ore
1429 $DEF D3FLF=(24*(DB_OOT(24X|23E|23|24|41_73|41_77|41_81|Z41|Z41_73|Z41_77|Z41_81|Z44|Z48|53V|53|Z43| \
1430 Z43H)(|L)[O:FR_ERZ(09|01|02|06|21|22|20|19|17|18|04|05)(|[M])]))| \
1431 (24*(DB_OOT(42_73ML|42_73M|42_77M|42_77ML|42_81ML|42_81M|42_89M|42_89ML|50M|Z50B|Z50D|Z50F) \
1432 [O:FR_ERZ(09|01|02|06|21|22|20|19|17|18|04|05)(|[M])]))
1433
1434 # EP 3b 1960-1968 DB West Germany Freigt Fals coal
1435 $DEF D3FLCO=26*(DB_OOT(42_73ML|42_73M|42_77M|42_77ML|42_81ML|42_81M|42_89M|42_89ML|Z43ZL|Z43Z|50M| \
1436 Z50A|Z50C|Z50E)[O:(OMM_KOHLE_0(1|2|3)|COAL(9|23))(|[M])])
1437
1438 # EP 4 DB West Germany Passenger long distance 26,4 m cars 1970-1975
1439 $DEF Z_D_E4_PDG=(<(0-1*DB_POSTMRAP26_(55|63|65)(|L)),DB_4A_DMS905L,2*DB_4A_BUM232BL, \
1440 2*DB_B(UM233|M234)~HEN,2*(DB_4_AM20(3|2)BL|DB_4A_AM20(3|2)PL), \
1441 DB_4A_WRUMH132_(1|2)RL|DB_4D_WRUMH132_2PL,DB_4_AM203BL,2*DB_4A_BUM234C)| \
1442 (<(2*DB_4A_BUM234C),DB_4_AM203B,DB_4A_WRUMH132_(1|2)R|DB_4D_WRUMH132_2P, \
1443 2*(DB_4_AM20(3|2)B|DB_4A_AM20(3|2)P),2*DB_B(UM233|M234)~HEN,2*DB_4A_BUM232BL,DB_4A_DMS905, \
1444 0-1*DB_POSTMRAP26_(55|63|65))| \
1445 (<(2*DB_4A_BUM23(1G|1H|2|2A|2B|2BK|2AK)),DB_4A_(ABUM221_1|ABUM221_3|BUM222|ABUM223G), \
1446 DB_4A_AUM20(1|2|2B|2C|2D),DB_4A_WRUE35_15(1|2),2*DB_4A_AUM20(2|2B|2C|2D), \
1447 3*DB_4A_BUM23(1G|1H|2|2A|2B|2BK|2AK|9K|9N),DB_BDUMS271~TDBW|DB_BDUMS272)| \
1448 (<DB_4A_DUM902,2*DB_4A_BUM23(3A|3C|4A|4B|4C|4K|4S), \
1449 DB_4A_(BUM226|ABUM224|ABUM224G|ABUM225A|ABUM225B|ABUM225GK),DB_4A_AUM20(3C|3D|3K|4B), \
1450 (DB_4A_ARMH217KL|DB_ARUM216BAL|DB_ARUM216BRA(1|2)L),2*DB_4A_AUM20(3C|3D|3K), \
1451 3*DB_4A_BUM23(3A|3C|4A|4B|4C|4K|4S))| \
1452 (<(2*DB_4A_BUM23(3A|3C|4A|4B|4C|4K|4S)L),DB_4A_AUM20(3C|3D|3K|4B)L, \
1453 (DB_4A_ARMH217K|DB_ARUM216BA|DB_ARUM216BRA(1|2)),2*DB_4A_AUM20(3C|3D|3K)L, \
1454 DB_4A_(BUM226|ABUM224|ABUM224G|ABUM225A|ABUM225B|ABUM225GK)L,2*DB_4A_BUM23(3A|3C|4A|4B|4C|4K|4S)L, \
1455 DB_4A_DUM902L)| \
1456 (<DBP_4A_POSTU21A59(33|42|58|72)(|L),DB_BDUMS272L|DB_BDUMS271L~TDBW, \
1457 (3*DB_4A_BUM23(1G|1H|2|2A|2B|2BK|2AK|9K|9N)L),2*DB_4A_AUM20(2|2B|2C|2D)L,DB_4B_WRTUM_133(|L), \
1458 DB_4A_AUM20(1|2|2B|2C|2D)L,DB_4A_(ABUM221_1|ABUM221_3|BUM222|ABUM223G)L,DB_4A_AUM20(2|2B|2C|2D)L, \
1459 (2*DB_4A_BUM23(1G|1H|2|2A|2B|2BK|2AK)L))| \
1460 (<DB_BDUMS271L~TDBW,DB_4A_BUM232B,DB_4_AM202B,DB_ARUM216BRA2,DB_4_AM202BL,DB_BUM233~HEN, \
1461 DB_4A_BUM234C,DB_4A_ABUM223G)
1462
1463 # EP 4 DB West Germany Passenger long distance 26,4 m cars 1975-1980
1464 $DEF D4PDMO=(<DB_4(A|B|C)_DMS905(|L)|DB_4(A|B)_DMS902BB(|L)|DB_4A_DM902P(|L)|DB_4A_DUM902(|L), \
1465 3-4*(DB_4BM234|DB_BM234P|DB_BM234|DB_4B_BUM234OB|DB_BUM233L|DB_4A_BUM232L|DB_4C_BM232OBL|DB_BM232P), \
1466 DB_4B_ABUM225OB|DB_4ABM225BB|DB_ABUM225G|DB_ABUM225G|DB_4B_ABUM224G|DB_4C_ABUM223GA|DB_ABUM223G, \
1467 DB_4_AM202B|DB_4B_AM202OB|DB_4_AM203B|DB_AUM203P|DB_4AM203|DB_4A_AUM203OB, \
1468 DB_4B_WRUE35_152L|DB_4C_WRUGH152R|DB_4C_WRUGH152P|DB_4C_WRUGH152PE|DB_4C_WRUEGH152OB| \
1469 DB_4D_WRUMH132_2PL|DB_4C_WRUMH132_(2|1)RL|DB_WRTM134ML, \
1470 DB_4_AM202B|DB_4B_AM202OB|DB_4_AM203B|DB_AUM203P|DB_4AM203|DB_4C_AM202OB, \
1471 3*(DB_4BM234|DB_BM234P|DB_BM234|DB_4B_BUM234OB|DB_BUM233L|DB_4A_BUM232L|DB_4C_BM232OBL|DB_BM232P), \
1472 DB_4B_ABUE332G(|L)|DB_4C_AUE309)| \
1473 (<DB_4C_AUE309L|DB_4B_ABUE332G(|L), \
1474 3*(DB_4BM234L|DB_BM234PL|DB_BM234L|DB_4B_BUM234OBL|DB_BUM233|DB_4A_BUM232|DB_4C_BM232OB|DB_BM232PL), \
1475 DB_4_AM202BL|DB_4B_AM202OBL|DB_4_AM203BL|DB_AUM203PL|DB_4AM203L|DB_4C_AM202OB, \
1476 DB_4B_WRUE35_152|DB_4C_WRUGH152RL|DB_4C_WRUGH152PL|DB_4C_WRUGH152PEL|DB_4C_WRUEGH152OBL| \
1477 DB_4D_WRUMH132_2PL|DB_4C_WRUMH132_(2|1)RL|DB_WRTM134ML, \
1478 DB_4_AM202BL|DB_4B_AM202OBL|DB_4_AM203BL|DB_AUM203PL|DB_4AM203L|DB_4A_AM203OBL, \
1479 DB_ABUM223GL|DB_4B_ABUM224GL|DB_ABM223PL|DB_ABUM225GL|DB_ABUM225GL|DB_4ABM225BBL|DB_4B_ABUM225OBL, \
1480 3-4*(DB_4BM234L|DB_BM234PL|DB_BM234L|DB_4B_BUM234OBL|DB_BUM233|DB_4A_BUM232|DB_4C_BM232OB| \
1481 DB_BM232PL),DB_4(A|B|C)_DMS905(|L)|DB_4(A|B)_DMS902BB(|L)|DB_4A_DM902P(|L)|DB_4A_DUM902(|L))| \
1482 (<DB_4C_BDM272OBL|DB_BDUMS272L~HEN|DB_4C_BDM271OBL|DB_BDUMS271L~TDBW, \
1483 3*(DB_4B_BUM23(2A|2B)|DB_4C_BM232OB|DB_4B_BUM232OBL|DB_4B_BUM232(A|B)),DB_4A_BUM222, \
1484 2*DB_4B_AUM202(A|O|B),DB_WRMZ135OB|DB_4D_WRUMH132_2P|DB_4C_WRUMH132_(2|1)R|DB_WRTM134M, \
1485 DB_4B_AUM202(A|O|B),3*(DB_4C_BM232OB|DB_4B_BUM232OBL|DB_4B_BUM232(A|B)))| \
1486 (<(2*(DB_4B_BUM23(2A|2B)L|DB_4C_BM232OBL|DB_4B_BUM232OB|DB_4B_BUM232(A|B)L|DB_4B_BUM23(2A|2B)L)), \
1487 2*DB_4B_AUM202(A|O|B)L,DB_WRMZ135OBL|DB_4D_WRUMH132_2PL|DB_4C_WRUMH132_(2|1)RL|DB_WRTM134ML, \
1488 DB_4B_AUM202(A|O|B)L,DB_4A_BUM222L, \
1489 3*(DB_4B_BUM23(2A|2B)|DB_4C_BM232OBL|DB_4B_BUM232OB|DB_4B_BUM232(A|B)L)|DB_WRTM134M, \
1490 DB_4C_BDM272OB|DB_BDUMS272~HEN|DB_4C_BDM271OB|DB_BDUMS271~TDBW)| \
1491 (<(DB_4(B|A)_DMS902BBL|DB_4(B|C|A)_DMS905L), \
1492 3*(DB_4B_BUM233G|DB_BM233P|DB_BM234PL|DB_4BM234|DB_4B_BM234S), \
1493 (2:DB_4C_ABUM223(GB|GA)|1:DB_4B_BUM226|5:DB_4B_ABUM22(5OK|5GK|5G|4O|4G)), \
1494 2*(DB_4B_AUM203(OK|GK|G|M)|DB_4A_AM203OBL), \
1495 DB_4A_ARMZ211K|DB_4B_ARMZ211SPE|DB_ARUM216BRA(1|2)|DB_ARUM216BRB|DB_ARUM216OB(R|S), \
1496 (DB_4B_AUM203(OK|GK|G|M)|DB_4A_AM203OBL|DB_4A_AM203P), \
1497 2*(DB_4B_BUM233G|DB_BM233P|DB_BM234PL|DB_4BM234|DB_4B_BM234S))| \
1498 (<(2*(DB_4B_BUM233GL|DB_BM233PL|DB_BM234P|DB_4BM234L|DB_4B_BM234SL)), \
1499 2*(DB_4B_AUM203(OK|GK|G|M)L|DB_4A_AUM203OB), \
1500 DB_4B_ARMZ211KL|DB_4B_ARMZ211SPEL|DB_ARUM216BRA(1|2)L|DB_ARUM216BRBL|DB_ARUM216OB(R|S)L, \
1501 (DB_4B_AUM203(OK|GK|G|M)L|DB_4A_AUM203OB|DB_4A_AM203PL), \
1502 (2:DB_4C_ABUM223(GB|GA)L|1:DB_4B_BUM226L|5:DB_4B_ABUM22(5OK|5GK|5G|4O|4G)L), \
1503 3*(DB_4B_BUM233GL|DB_4B_BUM23(2A|2B)L|DB_BM233PL|DB_BM234P|DB_4BM234L|DB_4B_BM234SL), \
1504 DB_4(B|A)_DMS902BB|DB_4(B|C|A)_DMS905)
1505
1506 # EP 4 DB West Germany Passenger long distance old cars 1968-1970
1507 $DEF D4PDAA=(<DB_4A_DUE932KL|DB_4B_DUE932(|L)|DB_4A_DUESE947(|L)|DB_4B_DUE941(|L)|DB_4A_DUE941M(|L)| \
1508 DB_4B_DYE927(|L), \
1509 3*(DB_4A_BUE354K|DB_4A_BUE363K|DB_4B_BYE363|DB_4B_BUE364|DB_4A_BUE350|DB_4B_BUE354), \
1510 DB_4A_WRUGH152R(|L)|DB_4A_WRUE152_140(|L)|DB_4A_ARUE316L, \
1511 DB_4A_AUE310EL|DB_4B_AUE309L|DB_4B_AUE308GL|DB_4A_AUE302L|DB_4A_AUE302GL|DB_4A_AUE301L, \
1512 DB_4B_ABUE321GL|DB_4A_AB4UE323GL|DB_4_AB4UE323L|DB_4A_ABUE322L|DB_4A_ABUE324GL|DB_4B_ABUE325GL| \
1513 DB_4B_ABUE329GL|DB_4A_ABUE332L|DB_4A_ABUE334GL|DB_4A_ABUE334L, \
1514 3*(DB_4A_BUE350,DB_4A_BUE354K|DB_4A_BUE363K|DB_4B_BYE363|DB_4B_BUE364|DB_4B_BUE363|DB_4B_BUE354))| \
1515 (<(3*(DB_4A_BUE354KL|DB_4A_BUE363KL|DB_4A_BUE350L|DB_4B_BUE364L|DB_4B_BUE363L|DB_4B_BUE354L)), \
1516 DB_4B_ABUE321G|DB_4A_AB4UE323G|DB_4_AB4UE323|DB_4A_ABUE322|DB_4A_ABUE324G|DB_4B_ABUE325G| \
1517 DB_4B_ABUE329G|DB_4A_ABUE332|DB_4A_ABUE334G|DB_4A_ABUE334, \
1518 DB_4A_AUE310E|DB_4B_AUE309|DB_4B_AUE308G|DB_4A_AUE302(|K)|DB_4A_AUE302GK|DB_4A_AUE301, \
1519 DB_4A_WRUGH152R(|L)|DB_4A_WRUE152_140(|L)|DB_4A_ARUE316, \
1520 3*(DB_4A_BUE354KL|DB_4A_BUE363KL|DB_4B_BYE363L|DB_4B_BUE364L|DB_4A_BUE350L|DB_4B_BUE354L), \
1521 DB_4A_DUE932KL|DB_4B_DUE932(|L)|DB_4A_DUESE947(|L)|DB_4B_DUE941(|L)|DB_4A_DUE941M(|L)| \
1522 DB_4B_DYE927(|L))
1523
1524 # EP 4 DB West Germany Passenger long distance old cars 1970-1975
1525 $DEF D4PDAB=(<DB_4B_ABUE32(1|5|9)L|DB_4_AB4UE323L|DB_4_ABUE324L, \
1526 2*(DB_4B_BUE354|DB_4B_BUE356L|DB_4B_BUE357L|DB_4_BUE367L|DB_4_B4UE368L|DB_4B_BUE371L| \
1527 DB_4B_BUE372_(28|34)L),2*(DB_4B_AUE302(|G)L|DB_4B_AUE306(|N)L|DB_4B_AUE307(|G)L), \
1528 2*(DB_4B_BUE354|DB_4B_BUE356L|DB_4B_BUE357L|DB_4_BUE367L|DB_4_B4UE368L|DB_4B_BUE371L| \
1529 DB_4B_BUE372_(28|34)L), \
1530 DB_4B_DPOSTUE956(|U)(|L)|DB_4B_DUE932(KL|UL|OL|U|O)|DB_4B_DYE927(|U)(|L)|DB_4B_DUE924(|L))| \
1531 (<DB_4B_DPOSTUE956(|U)(|L)|DB_4B_DUE932(KL|UL|OL|U|O)|DB_4B_DYE927(|U)(|L)|DB_4B_DUE924(|L), \
1532 2*(DB_4B_BUE354(|K)L|DB_4B_BUE356|DB_4B_BUE357|DB_4_BUE367|DB_4_B4UE368|DB_4B_BUE371| \
1533 DB_4B_BUE372_(28|34)),2*(DB_4B_AUE302(|GK|G)|DB_4B_AUE306(|N)|DB_4B_AUE307(|G)), \
1534 2*(DB_4B_BUE354(|K)L|DB_4B_BUE356|DB_4B_BUE357|DB_4_BUE367|DB_4_B4UE368|DB_4B_BUE371| \
1535 DB_4B_BUE372_(28|34)),DB_4B_ABUE32(1|5|9)|DB_4_AB4UE323L|DB_4_ABUE324)| \
1536 (<DB_4B_ABUE332,(2*DB_4B_BUE36(2|3)),1-2*DB_4B_AUE308,2*DB_4B_BUE36(2|3), \
1537 DB_4B_DUE941(|K|M)(|L)|DB_4B_DUE938M(|L))| \
1538 (<DB_4B_DUE941(|K|M)(|L)|DB_4B_DUE938M(|L),(2*DB_4B_BUE36(2|3)L),1-2*DB_4B_AUE308L, \
1539 2*DB_4B_BUE36(2|3)L,DB_4B_ABUE332L)| \
1540 (<(DB_4B_DUESE947(|L)|DB_4B_DUE941(|K|M)(|L)|DB_4B_DUE938M(|L)),0-1*DB_4B_AUE309,DB_4B_AUE310(|E), \
1541 0-1*DB_4A_BUE370,4*DB_4B_BUE366(|E),DB_4B_ABUE334(|G))| \
1542 (<DB_4B_ABUE334(|G)L,0-1*DB_4A_BUE370L,4*DB_4B_BUE366(|E)L,0-1*DB_4B_AUE309,DB_4B_AUE310(|E)L, \
1543 (DB_4B_DUESE947(|L)|DB_4B_DUE941(|K|M)(|L)|DB_4B_DUE938M(|L)))
1544
1545 # EP 4 DB West Germany Passenger regional 3x cars
1546 $DEF D4PPN3=(<DB_4A_D2IE876(|L)|DB_4A_D2IE879(|L)|DB_4A_D2IE881(|U)(|L)|DB_4A_D2IE883(|L), \
1547 (DB_4U_B3YG761,DB_4AB3YG756L)|(DB_4AB3YG756,DB_4B3YG761L), \
1548 (DB_4U_B3YG761,DB_4U_B3YG761L)|(DB_4B3YG761,DB_4B3YG761L))| \
1549 (<(DB_4BD3YG766L,DB_4U_B3YG761),(DB_4B3YG761,DB_4AB3YG756L)|(DB_4AB3YG756,DB_4U_B3YG761L), \
1550 (DB_4U_B3YG761,DB_4U_B3YG761L)|(DB_4B3YG761,DB_4B3YG761L))| \
1551 (<(DB_4U_B3YG761,DB_4U_B3YG761L)|(DB_4B3YG761,DB_4B3YG761L), \
1552 (DB_4B3YG761,DB_4AB3YG756L)|(DB_4AB3YG756,DB_4U_B3YG761L),(DB_4B3YG761L,DB_4BD3YG766))
1553
1554 # EP 4 DB West Germany Passenger regional rebuild 4x cars 80s
1555 $DEF D4PPNUC=(<DB_4C_BYG514(R|S)(|L)|DB_43BYG514(R|S)(|L)|DB_4C_BYG515M(|L)|DB_43BYG515(|L), \
1556 DB_43ABYG503(|N)(|L),DB_4C_BYG531ML|DB_4C_BYG532(R|S)L)| \
1557 (<DB_4C_BYG531M|DB_4C_BYG532(R|S),DB_43ABYG503(|N)(|L), \
1558 DB_4C_BYG514(R|S)(|L)|DB_43BYG514(R|S)(|L)|DB_4C_BYG515M(|L)|DB_43BYG515(|L))
1559
1560 # EP 4 DB West Germany Passenger regional silver cars 70s
1561 $DEF Z_D_E4_PES=(<DB_4A_BN719L,2*DB_4A_ABNB703L,2*DB_4A_BN719,DB_4A_MDYG986M2)
1562
1563 # EP 4 DB West Germany Passenger regional silver cars 70s push and pull left
1564 $DEF D4PSWAL=(<DB_4A_BDNF738BL|DB_4A_BDNRZF740OL,DB_4A_BN724B(|L)|DB_4A_BN719(|L),DB_4A_ABNB703(|L), \
1565 DB_4A_BN719(|L))
1566
1567 # EP 4 DB West Germany Passenger regional silver cars 70s push and pull right
1568 $DEF D4PSWAR=(DB_4A_BN724B(|L)|DB_4A_BN719(|L),DB_4A_ABNB703(|L),DB_4A_BN719(|L), \
1569 DB_4A_BDNRZF740O|DB_4A_BDNF738B)
1570
1571 # EP 4 DB West Germany Passenger regional silver cars 80s
1572 $DEF D4PRS8=1-2*(DB_4C_BN(724|B719DH)(|L)),1-2*DB_(ABN703|4C_ABNB703)(|L),1-2*(DB_4C_BN(724|B719DH)(|L))
1573
1574 # EP 4 DB West Germany Passenger regional yl-cars (middle doors) 80s push and pull left
1575 $DEF D4PEML=(<DB_4C_BDYLB45(8|9)L|DB_4D_BDYMF456L|DB_4D_BYMF436L|DB_4C_457L|DB_4C_457UL, \
1576 DB_4D_BYM421(|L),DB_4D_ABYM411(|L)|DB_4C_422(|L))
1577
1578 # EP 4 DB West Germany Passenger regional yl-cars (middle doors) 80s push and pull right
1579 $DEF D4PEMR=(<DB_4C_422(|L)|DB_4D_ABYM411(|L),DB_4D_BYM421(|L), \
1580 DB_4C_BDYLB45(8|9)|DB_4C_457|DB_4D_BDYMF456|DB_4D_BYMF436|DB_4C_457U)
1581
1582 # EP 4 DB West Germany Passenger regional silver cars 80s push and pull left
1583 $DEF D4PSWCL=(<DB_4C_BDNRZF740(|O)L|DB_4B_BDNRZF740OL|DB_4BDNRZF740HL|DB_4C_BDNRZF740OL, \
1584 DB_4(B|C)_BN724(|L)|(DB_4_BNRZB719|DB_4C_BNB719DH)(|L),DB_4C_ABNB703(|L), \
1585 (DB_4_BNRZB719|DB_4C_BNB719DH)(|L))
1586
1587 # EP 4 DB West Germany Passenger regional silver cars 80s push and pull right
1588 $DEF D4PSWCR=(DB_4(B|C)_BN724(|L)|((DB_4_BNRZB719|DB_4C_BNB719DH)(|L)),DB_4C_ABNB703(|L), \
1589 ((DB_4_BNRZB719|DB_4C_BNB719DH)(|L)), \
1590 DB_4C_BDNRZF740O|DB_4BDNRZF740H|DB_4C_BDNRZF740(|O)|DB_4B_BDNRZF740O)
1591
1592 # EP 4 DB West Germany Passenger semi fast train DRG cars 1968-1974
1593 $DEF D4PEA1=(<(DB_4A_DYE973(|U)(|L)|DB_4A_DYE974(|U)(|L)|DB_4A_DYE975(|U)(|L)|DB_4A_ADYSE641(|G)(|L)| \
1594 DB_4A_DIE992(|L)), \
1595 DB_4A_ABYSE634(|G)(|L)|DB_4A_ABYSE633(|A)(|G)(|L)|DB_4A_ABYSE630A(|G)(|L)|DB_4A_ABYSE627(|G)(|L)| \
1596 DB_4B_ABYSE619G|DB_4A_ABYSE619GL|DB_4A_ABYSE619(|L)|DB_4A_ABYSE618(|W)(|L), \
1597 DB_4A_ABYSE617A(|G)(|L)|DB_4A_AYSE604(A|B|AG)(|L), \
1598 (0-1*DB_4A_BYE654(|L)~LB|(DB_4A_BRYE693(|G)(|L))), \
1599 (3-4*DB_4A_BYE673(|L)|DB_4A_BYE669(|A)(|L)|DB_4A_BYE667(B|A)(|L)|DB_4A_BYE663(|L)| \
1600 DB_4A_BYE662(|L)|DB_4A_BYE656(|L)|DB_4A_BYE655A(|L)|DB_4A_BYE653(|L)))
1601
1602 # EP 4 DB West Germany Passenger semi fast train DRG cars 1975-1982
1603 $DEF D4PEA2=(<(4*(DB_4C_BYE667B(|L)|DB_4C_BYE655(|L)|DB_4B_BYE673(|L)|DB_4B_BYE669(|A)(|L)| \
1604 DB_4B_BYE667(B|A)(|L)|DB_4B_BYE663(|L)|DB_4B_BYE662(|L)|DB_4B_BYE656(|L)|DB_4B_BYE655A(|L)| \
1605 DB_4B_BYE653(|L))), \
1606 DB_4B_ABYSE634(|L)|DB_4B_ABYSE633(|A)(|L)|DB_4B_ABYSE630A(|L)|DB_4(B|C)_ABYSE627(|L)| \
1607 DB_4B_ABYSE619(|W)(|L)|DB_4(B|C)_ABYSE618(|L)|DB_4B_ABYSE617(A|B)(|L)|DB_4C_AYSE604(A|B)(|L)), \
1608 DB_4B_DYE973(|U)(|L)|DB_4B_DYE974(|U)(|L)|DB_4B_DYE975(|U)(|L)|DB_4B_DYE971(|U)(|L)| \
1609 DB_4(B|C)_ADYSE641(|L)|DB_4B_DYE973B(|L)
1610
1611 # EP 4A DB West Germany Germany Freight shunting
1612 $DEF D4FK1S=(2-3*((DB_5OMM55(|E|B|D)(|L)|DB_OMM52(A|C|D)(|L))[OB:COAL(56|50)(|[M]),,26]))| \
1613 (2-3*(DB_4A_E016UL|DB_4A_E016U|DB_4A_E016|DB_4A_E016BL|DB_4A_E016N23UL|DB_4A_E016N23| \
1614 DB_4A_E016N23BL|DB_4A_E016N23SL|DB_4A_E016N52F|DB_4A_E019U|DB_4A_E019BL|DB_4A_E021FL| \
1615 DB_4A_E021FTL|DB_4A_E021|DB_4A_E021F|DB_4A_E021FTL|DB_4A_E021FT|DB_4A_E016N23S|DB_4A_E019L| \
1616 DB_4A_E021FT(|L)[OB:SCRAP1(3|5|4|2)(|[M]),,27]))|(2-3*DB_4A_I(BS394|CH377)(|L))| \
1617 (2-3*(DB_4A_E(016U(|L)|016|016B(|L)|016N23UL|016N23|016N23BL|016N23S(|L)|016N52F(|L)|019U|019L| \
1618 019BL|021F(|L)|021T(|L)|021FT(|L))[OB:(FR_KO12|COAL41)(|[M]),,28]))| \
1619 (2-3*(DB_4A_GRSV212B|DB_GBS254A|DB_4A_GRS212EB(|L)|DB_4A_GLS203))| \
1620 (2-3*(DB_4A_GRS204E(|L)|DB_4A_GRSV212B(|L)|DB_4A_GRSV212B|DB_4A_GS211E(|L)))| \
1621 (2-3*(DB_4A_GBS254(|A)(|L)|DB_4A_GBS252(|L)|DB_4A_GOS253(|B)(|L)))| \
1622 (2-3*(DB_4A_GOS245(|A)(|L)|DB_4A_GLMS207L|DB_4A_GLS205T|DB_4A_GRS204EL))| \
1623 (2-3*DB_4A_(HFRS312|LFST569R|HABFIS0299000)(|L))| \
1624 (2-3*(DB_4A_TS852(|L)|DB_4A_TCS850|DB_TD928(|L)|DB_4A_TCEFS845))| \
1625 (2-3*(DB_4A_UAHS0778654_EVA(|L)|EVA_4A_UHS0738922(|L)|HOECHST_4A_UHS0736598| \
1626 HOECHST_4A_UHS0736602 (|L)|DB_4A_UHS0723217_DOW|VTG_4A_UHS0723205(|L)))| \
1627 (2-3*(DB_4A_UHS0022027_HOBUM|DB_4A_UHS0022027_HOBUM|KNZ_4A_UHS0727901|SCHRAUBE_4A_UHS0025276| \
1628 SCHERING_4A_UHS0006651|KOAG_4A_UHS0736784|DB_4A_UHS0025281|DB_4A_UHS0025282))| \
1629 (2-3*(VTG_4A_UHS0723203|DB_4A_UHS0033369_VALENTIN|BUSE_4A_UHS0037939L|VTG_4A_UHS0723201(|L)| \
1630 KNZ_4A_UHS0727901|SCHRAUBE_4A_UHS0025276|SCHERING_4A_UHS0006651))| \
1631 (2-3*DB_4AR642_194(0|2)(|L)[OB:RAIL6[BT:,12],19,13][OB:RAIL6[BT:,12],54,13])
1632
1633 # EP 4A DB West Germany Germany Freight short
1634 $DEF D4FK1A=2*D4FK1S
1635
1636 # EP 4A DB West Germany Germany Freight long
1637 $DEF D4FLA=7-8*D4FK1A
1638
1639 # EP 4A DB West Germany Germany Freight long steam
1640 $DEF D4FLSA=DB_4_PWGHS054(A|A3BL|D|C|B|AL|A3AL|DL|CL|BL),7-8*D4FK1A
1641
1642 # EP 4B DB West Germany Germany Freight shunting
1643 $DEF D4FK1=(2-3*((DB_4_E037_01|DB_4_E040_2(1|2|3|4|5)|DB_5OMM55(D|E)(|L)) \
1644 [OB:COAL(43|45|44|40|57)(|[M]),,27]))|(2-3*DB_(EANOS052AM|EAOS051_Y25M|EAOS051_Y25FM(|L)))| \
1645 (2-3*(DB_4_EAOS051|DB_EAOS051L|DB_4_EANOS052L|DB_4_EANOS052BL|DB_4_EANOS052V|DB_4_EANOS052VBL| \
1646 DB_EANOS052|DB_4_EAOS106AB|DB_4_EAOS106BBL|DB_4_EAOS106AE|DB_4_EAOS106BEL|DB_4_EAOS106BE| \
1647 DB_EAOS106L|DB_EAOS106|DB_EAOS106B1|DB_4_EAOS106AL))|(2-3*(DB_FCS(3|4|5|6|7|8|9|10|11|12)(|L)))| \
1648 (2-3*(DB_4_GOS245C(|L)|DB_4B_GSUV212B|DB_GS213BM(|L)))| \
1649 (2-3*(DB_4B_GLS205EFT|DB_4B_GS211E(|L)|DB_4B_GLS205FTB(|L)|DB_4B_GLS205EFT))| \
1650 (2-3*(G_4440|G_46421|G_4644|G_4442))| \
1651 (2-3*(DB_4(B_GBS252(|L)|B_GOS253B(|L)|_GOS253(|L)|GBS254(|L)~JUH)))| \
1652 (2-3*(DB_4B_GLS203|DB_4B_GS(212E|212EB|UV212B)(|L)))| \
1653 (2-3*DB_HBBI(S306(A|B|C|D)(|L)|NS246(|L)|S306M|S306EM|LLS308M|LLS311M))| \
1654 (2-3*DB_(HBIS_RIEGELSBERGER|HBIS_SCHLOSS|4B_HABFIS0299015)(|L))| \
1655 (2-3*(DB_HBIS_T297(A|B|C|D)(|L)|DB_HBIS299G(|L)))| \
1656 (2-3*(DB_4IBBHS396(|L)|BASF_TROCKENEIS|DB_4IBBHS396E(|L)|DB_IBBHS399M|DB_IBBHLPS401M))| \
1657 (2-3*(DB_KBS442N|DB_HABBIS345AM))|(2-3*DB_LGJS598(|L)[O:C60_E4,14,12][O:C60_E4,75,12])| \
1658 (2-3*(DB_LGJS598[O:C2_SEALAND,13,12][O:C2R22,74,12]))| \
1659 (2-3*DB_LAAEKS553[OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),6,10] \
1660 [OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),6,29][OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),142,10] \
1661 [OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),62,10][OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),62,29] \
1662 [OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),144,29][OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),204,29] \
1663 [OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),192,10])|(2-3*(DB_RES686|DB_4GBS254(|L)|DB_GBS254A))| \
1664 (2-3*(DB_LBKKMMS578M[O:TANK_25(N|K),11,12][O:TANK_25(N|K),36,12][O:TANK_25(N|K),60,12]))| \
1665 (2-3*(DB_RES686MM|DB_RES687M))|(2-3*DB_RLMMPS651M[O:PIPE(31|62|60)])| \
1666 (2-3*(RAILS_SHIMMNS708|DB_SHIMMS708M)(|L))|(2-4*DB_SGMMS697M[OB:STEEL(28|29|30|31|41),,12])| \
1667 (2-3*(DB_SGMMNS738M(|L)[OB:STEEL(28|29|30|31|41),,12]))| \
1668 (2-3*((DB_SAHMMS709M|DB_SAHMMS709NM|DB_SAHMMS711ASM)[OB:COIL20H,32,13][OB:COIL23H,70,13] \
1669 [OB:COIL23H,112,13]))|(2-3*(DB_SPS719MM[OB:WOOD(129|46|128|130)(|[M]),,12]))| \
1670 (2-3*((DB_SGNS696M|DB_SGNS694M(|L))[O:C6(10|0)_E4,7,12][O:C6(10|0)_E4,68,12][O:C6(10|0)_E4,129,12]))| \
1671 (2-3*DB_TA(EMS887M|EMS888M|MNS886M(|L)|EMS892M(|L)|MNS893M(|L)))|(2-3*DB_TD(S930QWM|925QWM)(|L))| \
1672 (2-3*(DB_4B_TCMS850|DB_TADS960A|DB_TBIS869AEM|DB_TBIS875EM))| \
1673 (2-3*(DB_TBIS870BEM|DB_TBIS871EM|DB_TBIS874M|DB_TBIS870AEM))| \
1674 (2-3*((DB_UAC946M|VTG_4_UHS0728261)(|L)))| \
1675 (2-3*((DB_UCS908_25M|DB_UCS908_25FM|DB_UCS908AM|DB_UCS908QWM|DB_UCS908FM|DB_UCS909AM|DB_UCS909FM| \
1676 EVA_UCS908M|EVA_UCS909M)(|L)))|(2-3*(HENKEL01|BAYER_4_ZCEKKS7435722|DB_Z5CHLOR1))| \
1677 (2-3*(VTG_4_ZACS7868089|VTG_4_ZAFS7899001)(|L)|DB_4_ZGS7318045_ITG)| \
1678 (2-3*BAYER_4_ZCEKKS7435722|DB_4_ZACES0077931_SOGEFA(|L))
1679
1680 # EP 4B DB West Germany Germany Freight short
1681 $DEF Z_D_E4_Gkurz=2*D4FK1
1682
1683 # EP 4B DB West Germany Germany Freight long
1684 $DEF D4FL=7-8*D4FK1
1685
1686 # EP 4B DB West Germany Germany Freight long steam
1687 $DEF D4FLS=DB_4_PWGHS054(A|A3BL|D|C|B|AL|A3AL|DL|CL|BL),7-8*D4FK1
1688
1689 # EP 4 DB West Germany Germany Freight container
1690 $DEF Z_D_E4_Gcon=7*(DB_LGJS598|DB_LGJS573|DB_LGJS598|DB_LBGJS598A|DB_LGJS598B|DB_LGJS573CL|DB_LGJS573C) \
1691 [O:C60_E4,14,12][O:C60_E4,75,12], \
1692 2*(DB_LGJS598|DB_LGJS573|DB_LGJS598|DB_LBGJS598A|DB_LGJS598B|DB_LGJS573CL|DB_LGJS573C) \
1693 [O:C120_E4,,12],(3-4*DB_LGJNS576M[O:C6(0|10)_E4,11,12][O:C6(0|10)_E4,73,12])
1694
1695 # EP 4 DB West Germany Freigt Fad ore
1696 $DEF D4FFO=35*(DB_4FAD1(67F|67A|67B|67C|67D|67E|67F|67G|67H|67I|67J|67K|67L|67M|67N|67O|67P|67Q|68F| \
1697 68A|68B|68C|68D|68E|68F|68G|68H|68I|68J|68K)[O:(FR_DRG_RUB|FR_ERZ22|FR_ERZ17|FR_ERZ05)(|[M])])
1698
1699 # EP 5 Passenger IC push and pull
1700 $DEF DB_ICL1996=(<DB_BimdzfL1996,(0-2)*DBAG_BM235OR(|L),2*DB_Bpmz1996,DB_Bpmbz1996,2*DBAG_BM235OR(|L), \
1701 DB_ARmz1996,DB_Avmz1996,19:DB_Apmz1996|1:DB_Avmz1996)
1702 $DEF DB_ICR1996=(<19:DB_Apmz1996|1:DB_Avmz1996,DB_Avmz1996,DB_ARmz1996,2*DBAG_BM235OR(|L), \
1703 DB_Bpmbz1996,2*DB_Bpmz1996,(0-2)*DBAG_BM235OR(|L),DB_BimdzfR1996)
1704
1705 # EP 5 Passenger IC not push and pull
1706 $DEF D5PIC=(<(3*(DBAG_BM235VRL~HEN|BM235RL~HEN|DB_BOMZ236L|DBAG_BOMZ236_3VRL)), \
1707 (3*(DB_BPMZ293RKL|DB_BPMZ293RWL|DB_BPMZ293RSL|DB_BPMZ292_0RL, \
1708 DB_5BPMZ293_2DL|DB_BPMZ291_2RWL|DB_BPMZ291_3RL)),(DB_BVMZ185RKL|DB_5BVMZ185DHL), \
1709 (DB_5B_WRMH132_1L|DB_5B_WRMH132_2L|DB_WRMZ135RL~HEN|DB_WRMZ137RWL|DB_WRMZ137RKL|DB_5ARMH217RL| \
1710 DB_5ARMZ218L|DB_5ARMZ211L|DB_8895002L),(0-1*DBAG_ABVMZ227_4RL), \
1711 (2*(DB_APMZ121_0RWL|DB_APMZ121RWL|DB_APMZ121_0RKL|DB_APMZ121RKL|DB_APMZ123RHL|DB_APMZ117RWL| \
1712 DB_APMZ117RKL|DBAG_APMZ123RHL)), \
1713 (2*(DB_AVMZ111_2RWL|DB_AVMZ207RWL|DB_AVMZ107RWL|DB_AVMZ107RKL|DB_AVMZ111_0RKL|DB_5AVMZ111BL| \
1714 DB_5AVMZ111CL|DB_AVMZ111_1RKL|DB_AVMZ111_2RKL|DB_5AVMZ111AL|DB_AVMZ107RK)))| \
1715 (<(2*(DB_AVMZ111_2RW|DB_AVMZ207RW|DB_AVMZ207RK|DB_AVMZ107RK|DB_AVMZ111_0RK|DB_AVMZ111_1RK| \
1716 DB_AVMZ111_2RK|DB_5AVMZ111C)), \
1717 (2*(DB_APMZ121_0RW|DB_APMZ121RW|DBAG_APMZ123RH|DB_APMZ121_0RK|DB_APMZ117RK|DB_APMZ121RK| \
1718 DB_APMZ123RH|DB_APMZ117RW)),(0-1*(DB_ABVMZ227_4RH|DB_ABVMZ227_4R)), \
1719 (DB_5B_WRMH132_1|DB_5B_WRMH132_2|DB_WRMZ135R~HEN|DB_WRMZ137RW|DB_WRMZ137RK|DB_5ARMH217R| \
1720 DB_5ARMZ218|DB_5ARMZ211|DB_8895002),(DB_BVMZ185RK|DBAG_BVMZ185VRH), \
1721 (3*(DB_BPMZ292_0R|DB_BPMZ293RK|DB_BPMZ293RW|DB_5BPMZ293_2D|DBAG_BPMZ291_2RK |DB_BPMZ291_2RW| \
1722 DB_BPMZ291_3R)),(3*(DBAG_BM235VR~HEN|BM235R~HEN|DB_BOMZ236|DBAG_BOMZ236_3VR)))| \
1723 (<DBAG_AVMZ207VRHL, \
1724 DBAG_APMZ121_0VRL|DBAG_APMZ121_0VR|DBAG_APMZ121VR|DBAG_APMZ117VRHL|DBAG_APMZ117VRH, \
1725 DBAG_AVMZ111_0VRL|DBAG_AVMZ111_0VR, \
1726 DBAG_WRMZ133VRHL|DBAG_WRMZ133VRH|DBAG_6ARMZ218L|DBAG_6ARMZ218|DBAG_WRMH132_1VRHL| \
1727 DBAG_WRMH132_2VRH|DBAG_6ARMH217L|DBAG_6ARMH217|DBAG_6ARMZ211L|DBAG_6ARMZ211|DBAG_WRMZ135VRL~HEN| \
1728 DBAG_WRMZ135VR~HEN|DBAG_WRMZ137VRHL|DBAG_WRMZ137VRH,DBAG_BPMZ291_2VRL,DBAG_BPMZ291_2VR, \
1729 DBAG_BPMBKZ291_8VRH,DBAG_BPMBKZ291_8VRHL,DBAG_BVMZ185VRHL,DBAG_BM235VR~HEN,DB_BDMS273_VR1ML~KMN)
1730
1731 # EP 5 Passenger regional DB Cars short
1732 $DEF Z_D_E5_PWR=(DB_BN454_4GL,DBAG_5_ABNRZ417,DB_BNDZF481GKM )| \
1733 ((DB_5A_BN433DH|DBAG_5_BNRZB719)(|L),DBAG_5_ABN(RZ417|703)(|L)|DBAG_ABN(RZ403G|402G)(|L)), \
1734 DBAG_5_BN724(|L)
1735
1736 # EP 5 Passenger regional DB Cars long
1737 $DEF D5PRL=(2*(DBAG_5_BN724|DB_BN454_4G)(|L),2*DB_ABN417G(|L)~KMN,(2*DB_5BN440)|DB_BNDZF481GKM )| \
1738 (2*(DB_5A_BN433DH|DBAG_5_BNRZB719)(|L),2*(DBAG_5_ABN(RZ417|703)(|L)|DBAG_ABN(RZ403G|402G)(|L)), \
1739 DBAG_5_BN724(|L))
1740
1741 # EP 5 Passenger regional DR Cars
1742 $DEF Z_D_E5_POR=(<DBAG_5BYU439M,DBAG_5ABYU408PL,DBAG_5BYU439M, \
1743 DBAG_5D_BDGHWS534L|DBAG_5BDGHWS534L|DBAG_5_BDWSB270L)| \
1744 (<DBAG_5BYU439ML,DBAG_5ABYU408P,DBAG_5BYU439ML,DBAG_5BDGHWS534)
1745
1746 # EP 5 Germany DB Freigt shunting
1747 $DEF D5FR=(2-4*(DB_FCS30(|L)|DB_HBIS_T297A(|L)|DBAG_5_ES025(|L)|DB_HBIS295L2KM|DBC_HBILLNS303M))| \
1748 (2-3*DBAG_SAMMSU454M[O:GROUND1(|[M])])|(2-3*DB_RLMMPS651KM[O:PIPE(31|62|60)])| \
1749 (2-3*(DB_5HABFIS2796119(|L)|DBC_HIRRSTT325M))|(2-3*DB_TIMS858(A|B)KM)| \
1750 (2-4*DB_(E025KM|ES045KM|5OMM55D(|L)|5OMM55E(|L))[OB:(FR_KO12|COAL41)(|[M]),,27])| \
1751 (3-4*DBAG_5_EAS(067|070(|F)|071|072)(|L)[OB:SCRAP(4|6|5)(|[M]),,33])| \
1752 (2-4*(ERR_HB6M|TWAG_HB6M|TWAG_HB9M|DB_HABBIS345KM))|(3-4*(DB_TADS960A|DB_TBIS|DBAG_5_TMS851))| \
1753 (3-4*(DB_RILS652KM|DB_RILNS654BM|TWAG_RVM))|(2-3*DB_RLMMPS651KM[O:PIPE(31|62|60)])| \
1754 (2-4*DBAG_5_ES027(E|F)(|L)[O:(BALLAST48|BALLAST50|BALLAST20)(|[M])])|(2-3*DBAG_5_TMS851(|B)(|L))| \
1755 (2-4*DBAG_5_EANOSX052(B|V|VB|_1|_1B)(|L)[O:(GROUND1|SAND4|BALLAST_OLD1|SAND3|BALLAST08)(|[M])])| \
1756 (2-4*(DB_EANOS2|DB_EANOSB1L|DB_EANOSB2L|DBC_EANOS2|DBC_EANOS1|DB_EANOS1|DB_EANOSB1| \
1757 DBAG_5_EALOST058VL|DBAG_5_EALOST058FL|DBAG_5_EALSX063EF))|(2-4*DB_TAD(|G)S95(8|7)KM)| \
1758 (2-4*DB_SGJKKMMS3[O:(BOX745_BAHNTRANS|BOX745_CARGOFITTT3|BOX745_02),10,12] \
1759 [O:(BOX745_ARMBRUSTER1|BOX745_CARGOFITTT7|BOX745_04),84,12])| \
1760 (2-4*DB_TA(EMS892KM(|L)|MNS886KM(|L)|EMS889KM(|L)|MNS893KM(|L)|EMS889KM|EMS890KM|EMS890Y25KM| \
1761 EMS891KM))|(2-4*(DB_SGMMS697KM|DB_SAMMNPS_V)[OB:STEEL(28|29|30|31|41),,12])| \
1762 (2-4*((DB_UCS908_25KM|DB_UCS908_25FKM|DB_UCS908KM|DB_UCS908FKM|DB_UCS909KM|DB_UCS909FKM| \
1763 MEG_UCS908M|MEG_UCS908_FM|MEG_UCS909M|MEG_UCS909_FM)(|L)))|(2-4*DB_UAOOS948KM(|L))| \
1764 (2-3*DB_(RMMS663KM|RMMS663Y25KM|RS680KM|SGJS716KM)[OB:PIPE7(|[M]),,12])| \
1765 (3-4*(DB_RS689KM[OB:PIPE(54|58|40|63|59|55|45|47),,11]))|(3-4*DB_REMMS665(KM|Y25KM))| \
1766 (2-4*DB_EA(OS051_Y25KM|OS051_1Y25KM|OS051_Y25FKM|OS051_650KM|NOS052KM|NOS052_Y25KM|LOS053KM| \
1767 LOS053_Y25KM|LOS053D1Y25KM))|(2-4*(DB_RES676|DB_RES676DS)[OB:FER1(2|3)(|[M])])| \
1768 (2-3*(DB_SGMMNS738KM(|L)[OB:STEEL(28|29|30|31|41),,12]))|(2-3*DB_TD(925KM|925QWKM|S930QWKM)(|L))| \
1769 (2-3*(DB_TBIS871EKM|DB_TBIS869AEKM|DB_TBIS875EKM|DB_TBIS870BEKM))|(2-4*DBC_TAMNS89(3|5)M(|L))
1770
1771 # EP 5 Germany DB Freigt long
1772 $DEF D5FL=7*D5FR
1773
1774 # EP 5 Germany DB Freigt steel long
1775 $DEF D5FSL=15*((RAILS_SHIMMNS708KM|DBAG_SHIMMNS730M|DB_SHIMMS708KM)(|L))
1776
1777 # EP 6 Passenger IC 2010 push-pull train right
1778 $DEF D6PI2R=(<2*DBAG_AVMZ109B,DBAG_APMZ125WBL,DBAG_WRMZ134B(|2),DBAG_BVMZ186B,DBAG_BPMZ294B, \
1779 5*DBAG_BPMZ295B,DBAG_BPMBDZF296_1B)
1780
1781 # EP 6 Passenger IC 2010 push-pull train left
1782 $DEF D6PI2L=(<DBAG_BPMBDZF296_1BL,5*DBAG_BPMZ295BL,DBAG_BPMZ294BL,DBAG_BVMZ186BL,DBAG_WRMZ134BL, \
1783 DBAG_APMZ125WB,2*DBAG_AVMZ109BL)
1784
1785 # EP 6 Passenger regional 2000 n-cars
1786 $DEF Z_D_E6_PR=(<DBAG_BDUU497_3,DBAG_ABN416L,DBAG_ABN416,DBAG_BND447_9,DBAG_6BN448,DBAG_BND447_9L)
1787
1788 # EP 6 Passenger regional 2000 push-pull train n-cars left
1789 $DEF D6PNWDL=(<DBAG_BNRDZF463_1VRL|DBAG_BDNF464HHL|DBAG_BNDZF479L|DBAG_BDNZF479_2L|DBAG_BNDZFB479_2L| \
1790 DBAG_BNRBDKZF479L|DBAG_BNRDZF480VRL|DBAG_BNRBDZF480L|DBAG_BDNZF481L|DBAG_BNRBDKZF481L| \
1791 DBAG_BYBDZF482_1L,DBAG_6BN448(|L)|DBAG_6BN448(|L),DBAG_ABN416(|L)|DBAG_ABNRZ417(|L), \
1792 DBAG_ABN417_5(|L)|DBAG_ABNRZ417_6(|L),DBAG_BND447_9(|L)|DBAG_BN447(|L))
1793
1794 # EP 6 Passenger regional 2010 push-pull train n-cars left
1795 $DEF D6PNWRL=(<DBAG_BNRDZF463_1VRRL|DBAG_BDNF464HHRL|DBAG_BNDZF479RL|DBAG_BDNZF479_2RL| \
1796 DBAG_BNDZFB479_2RL|DBAG_BNRBDKZF479RL|DBAG_BNRDZF480VRRL|DBAG_BNRBDZF480RL|DBAG_BDNZF481RL| \
1797 DBAG_BNRBDKZF481RL|DBAG_BYBDZF482_1RL,DBAG_6BN448R(|L)|DBAG_6BN448R(|L), \
1798 DBAG_ABN416R(|L)|DBAG_ABNRZ417R(|L),DBAG_ABN417_5R(|L)|DBAG_ABNRZ417_6R(|L), \
1799 DBAG_BND447_9R(|L)|DBAG_BN447R(|L))
1800
1801 # EP 6 Passenger regional 2010 push-pull train n-cars right
1802 $DEF D6PNWRR=(DBAG_6BN448R(|L)|DBAG_6BN448R(|L),DBAG_ABN416R(|L)|DBAG_ABNRZ417R(|L), \
1803 DBAG_ABN417_5R(|L)|DBAG_ABNRZ417_6R(|L),DBAG_BND447_9R(|L)|DBAG_BN447R(|L), \
1804 DBAG_BNRDZF463_1VRR|DBAG_BDNF464HHR|DBAG_BNDZF479R|DBAG_BDNZF479_2R|DBAG_BNDZFB479_2R| \
1805 DBAG_BNRBDKZF479R|DBAG_BNRDZF480_1VRR|DBAG_BNRBDZF480R|DBAG_BDNZF481R|DBAG_BNRBDKZF481R| \
1806 DBAG_BYBDZF482_1R)
1807
1808 # EP 6 Freight mixed
1809
1810 # DB short
1811 $DEF D6FD1K=(3-4*(RAI_SNPS719_HOESCH|DB_RNSZ_T|DB_RNSZ_W1|DB_RNSZ_W2))| \
1812 (3-4*(DB_EALOSX1|DBAG_5_EAOS106BE|DBAG_5_EAOS106BB|DBAG_5_EANS069F|DBAG_5_EAS066E))| \
1813 (3-4*(DB_HBIS_T299B|DB_HBBILLNS305DL|DB_HBBILLNS305SL|DB_HBBINS309AL|DB_HBBINS309BL| \
1814 DB_HBBINS309BPL|DB_HBBINS309BP|DB_HBBINS309CL|DB_HBBINS309CPL|DB_HBBINS309CP|DB_HBBINS309DL| \
1815 DB_HBBINS309EL|DB_HABIS6RS2|DB_HABIS7TW2|DB_HBBILLNS305_2458247(|L)|DBC_HBBILLNS305_2457900(|L)| \
1816 DBC_HBBILLNS305_2458247(|L)|DBC_HBBINS2460364(|L)|DBC_HBBINS306_2469830(|L)|DB_HBBINS2464088(|L)| \
1817 DB_HBBINS2469687(|L)|DB_HBBINS2469826(|L)|DB_HBBINS2470038(|L)|DBC_HBBINS306_2470026(|L)| \
1818 DBC_HBBINS306_2470048(|L)|DBC_HBBINS306_2470339(|L)))|(3-4*(DBC_UACS))| \
1819 (2-3*(DB_RNSZ_S2|DB_RNSZ_S1|DB_RNSZ_P|DB_RBNS641P|DB_RBNS641[OB:PIPE4,13,13][OB:PIPE52,141,13]| \
1820 DB_RBNS646[OB:PIPE48,,13]|DB_RNSZ3991206[OB:WOOD128(|[M]),,12]))| \
1821 (3-4*(RAI_AUTOTEILE7|DB_HBIS293A|DB_HBIS293B|DB_HBIS293C|DB_HBIS293D|DB_HBIS293E|DB_HBIS293F))| \
1822 (2-3*(DB_SHIMM(SU1|NS718E|NS718D|NS718C|NS718B)(|L)))|(3-4*(RAI_HIIRRSTT324DLM|RAI_HIRRSTT325AM))| \
1823 (2-3*(DBC_RILS652MM|RAI_RILS652M2M|RAI_RILS652M1M|DBS_RILS652MM|DB_RILS652VRM))| \
1824 (2-3*(TWAG_HABIS802753499|TWAG_HABIS802753499L|DB_HABIS2|TWAG_HABIS2|TWAG_HABIS3L|TWAG_HABIS3))| \
1825 (3-4*(GERS_RBS8035(09051|09049|09059)[OB:PIPE(54|58|40|63|59|55|45|47),,12]))| \
1826 (2-3*(RAI_RILS652_1A|RAI_RILS652_1B|DBC_RILS3|DBC_RILS4|RAI_RILNS654C|RAI_RILNS654D|DBS_RINS655A| \
1827 DBS_RILS652A|DBS_RILS652B|DBS_RILS652C|DBS_RILS652D|DBS_RINS655B|DBS_RINS655C|DBS_RILNS654A))| \
1828 (2-3*(AAE_RES686(A|B)(|L)|G_RES3(|L))[OB:TARP21(|[M]),,16])|(2-3*DBAG_HBBINS306(F|G|H|I|J|K)(|L))| \
1829 (2-3*DB_REMMS39482(20|77)(|L)[OB:TARP(8|14|20|19)(|[M]),,10])| \
1830 (2-3*DB_RMMS664_3961(378|212|604)(|L)[OB:GRANIT(1|2|3),18,12][OB:GRANIT(1|2|3)(|[M]),79,12])| \
1831 (2-3*(DB_SNPS719B(|L)|DB_SNPS719(|L)[OB:WOOD46(|[M]),,12]|G_01(5|6)|DBC_ROO5639A(|L)))| \
1832 (2-3*(DB_HBBINS306_24(59954|59994|69637|70516|70586|70771|70826|70858|70866)(|L)| \
1833 DB_HBBILLNS306_24(58315|59453|69429)(|L)))|(2-3*DB_RIJMMNS660VRM)| \
1834 (3-4*((ITL_EAOSM|ONRAIL_EANOS157M|HGK_EAOS(1|2))[OB:SCRAP(5|6|4)(|[M]),,33]))| \
1835 (2-3*DBAG_6_EAOS106(BL|CL|D|B|C|L)[OB:COAL5(4|1|2|3|5)(|[M]),,16])| \
1836 (2-3*(DBAG_RES686(A|B)(|L)[OB:PIPE(54|58|40|63|61|59|55|56|57|39),,12]))| \
1837 (2-3*((DBAG_5_EAS066(E|EFL)|DBAG_5_EANS069TL|DBAG_5_EAS073EF|DBAG_5_EAOS106(A|BB|BEBL)|DB_EAOS106J) \
1838 [OB:TIRES1,27]))|(2-3*DB_SNS727(C|A)(|L))|(2-3*(DBC|DBS)_HABBIS345M)| \
1839 (2-3*(DB_HBBILLNS304_246(4063|4187|9051)(|L)|DB_HBBILLNS2457219(|L)))| \
1840 (DB_HBILLNS302A(|L)|DB_HBILLNS303(B|A|C)|DB_HBILLNS303D(|L)|DB_HBILLNS303E(|L)|DBC_HBILLNS302(B|A))| \
1841 (2-3*(G_LADDS[OB:MB_VITO1W,36,9][OB:MB_VITO1W,95,9][OB:#MB_SPRINTER1,161,9][OB:MB_VITO1W,215,9]))| \
1842 (2-3*((DB_RES686|DB_RGS3910A|DBAG_5ROOS639B|DBC_6ROOS639(|L)|DBAG_RILS669(|L))[OB:STEEL24,,12]))| \
1843 (2-3*(DB_FACS123(A|B|C)))|(2-3*(DB_FACNS141(|A|B)(|L)))|(2-3*(DBAG_HBIS_WW299(F|E|EL|C|BL|A)))| \
1844 (2-3*DBAG_EALOST058B(1|2|3)(|L))|(2-3*(DB_SAMMS489F|DB_RMMS664A)(|L))| \
1845 (2-3*DB_HBBILLNS305_24(57245|57498|57546|57750|57835|58132|58284|58533|58620|58674|59054|59064| \
1846 59399|59484|59528|59568|59868|62131|62400|62473|62509|69406|69860|70651|70692)(|L))| \
1847 (2-3*(DB_SAMMS489(|B)[B:82,8,1,1,#202020][OB:PIPE(49|50|51),15,13][OB:PIPE(49|50|51),64,13] \
1848 [OB:PIPE(49|50|51),111,13]|DB_SAMMS489H(|L)))|(2-4*DB_TAD(S958VR|S958K|GS958K|S957K|GS957K)M)| \
1849 (2-3*(DBAG_(EAOSX054|5_EASX063A)(|L)[OB:COAL5(4|1|2|3|5)(|[M]),,16]))| \
1850 (3-4*(DBC_6ROOS639|DBAG_5ROOS639B))| \
1851 (3-4*(DB_HBISWW2257094(|L)|(DB_HBISWW299_22(54629(|L)|97711(|L)|54629|56488(|L)|56603))| \
1852 (DB_HBILLSX299_22(76825|76754(|L)))))| \
1853 (3-4*(DB_RILNS654M|DBC_RILNS654M|RAI_RILNS654AM|RAI_RILNS654BM|RAI_RILNS654EM|DBS_RILNS654MM| \
1854 DB_RINS655M|DBC_RINS655M))| \
1855 (3-4*(DB_HABIS6RS(1|2|3)|DB_HABIS7TW(1|2|3|4|5)|DB_HABFIS1CW(3|2|1)|DB_HABIS8RS(1|2|3)))| \
1856 (2-3*((ERMEWA_4_ZAGKKS7919|MILLET_4_ZAGKKS7915|NACCO_4_ZAGKKS7915|SIMOTRA_4_ZAGKKS7915)(|L)))| \
1857 (2-3*(DB_HBBINS309E|DB_HBBINS309D|DB_HBIS293C|DB_HBIS293B|DB_HBIS293A|DB_HBINS292A|DB_HBIS293K| \
1858 DB_HABBIINS352_2740514L|DB_HABBIINS352_2740514|DB_HBIS293H|DB_HBIS293F|DB_HBIS293G|DB_HBIS293E| \
1859 DB_HBIS293B|DB_HBILLSX299_2276754|DB_HBIS293G|DB_HBIS293H|DB_HBBINS1|DB_HBBINS2|DB_HBIS293K| \
1860 DB_HBIS293L|DB_HBIS293M|DB_HBIS293N|DB_HBIS293O|DB_HBIS293P|DB_HBIS293Q|DB_HBIS293R|DB_HBIS293S| \
1861 DB_HBIS293T|DB_HBIS293A1|DB_HBINS292BPL|DB_HBINS292BP|DB_HBINS292BGL|DB_HBINS292BG|DB_HBINS292CL| \
1862 DB_HBINS292EL|DB_HBINS292EP(|L)|DB_HBINS292DL))
1863
1864 # EP 6 Freight short
1865 $DEF Z_D_E6_G_kurz=2*D6FD1K
1866
1867 # DB long
1868 $DEF Z_D_E6_G1=6-7*D6FD1K
1869
1870 # EP 6 Freight long Coal transport DB cars
1871 $DEF Z_D_E6_G_Fals2=15*((DB_FALNS183(A|B|C|D|E|F|G|H|I|J|K|M|N|O|P|Q)| \
1872 DB_FALS(01|02|03|06|07|08|09|10|11|12|13|14|15|17|19)|DB_FALNS2(|L)) \
1873 [OB:FR_KO37|FR_COAL1|FR_COAL2|COAL33|COAL34|COAL35|COAL3(|[M]),,41])
1874
1875 # private
1876
1877 # EP 6 Freight long lime transport
1878 $DEF D6FPK1=(12*GATX_(UACS809319244(|L)|UACS809319314(|L)|KALK1|KALK2|KALK3|KALK4|KALK5|KALK7|KALK6| \
1879 KALK8|KALK9))|(12*(KVG_KALK1|KVG_KALK2|KVG_KALKSILO(|L)|DB_UAPPS0658036(|L)))
1880
1881 # EP 6 Freight long Coal transport private cars
1882 $DEF Z_D_E6_G_FalsP=(15*((DE_FALS_G1|DE_FALS_G2|DE_FALS_G3L|DE_FALS_G4L|NIAG_FALNS1L|NIAG_FALNS1| \
1883 NIAG_FALNS3|NIAG_FALNS4L|NIAG_FALNS4|NIAG_FALNS5L|VEO_FALNS2L|VEO_FALNS4|VTG_FALNS183N1L| \
1884 VTG_FALNS183N1|VTG_FALNS183N2L|VTG_FALNS183N2|VTG_HGK_FALNS2L|VTG_HGK_FALNS3L|ONRAIL_FALS18| \
1885 ONRAIL_FALS21|ONRAIL_FALS22|RBH_FALNS183VTGM) \
1886 [OB:FR_KO37|FR_COAL1|FR_COAL2|COAL33|COAL34|COAL35|COAL3(|[M]),,40]))| \
1887 (15*((ONRAIL_FALS_(V2A|V1B|V2B|V3A|V3B|V3C|V1A|HHPI_V3C|HHPI_V3B|HHPI_V2A|HHPI_V2B|HHPI_V3A| \
1888 HHPI_V2A|HHPI_V1A|HHPI_V1B)(|L)|KVG_FALS6666_(1|2|3|4)(|L)|GATX_FALS6654_(1|2|3|4|5)(|L)) \
1889 [OB:KOKS0(1|2|3|4)(|[M]),,40]))|(13*(ERR_FALNS(1|2|3|4)(|L)[O:COAL(46|49|47|48)(|[M])]))
1890
1891 # EP 6 Freight short Steel transport
1892 $DEF Z_D_E6_G_Stahku=4*((DBAG_5RMMS663L[O:STEEL5,15,12][O:STEEL5,50,12])| \
1893 ((DB_RNSZ_B1|DB_REMMS2(|L)|DB_RMMS664C(|L)|DB_RMMS664B(|L)|DB_SNPS719A(|L)|VTG_RBS2(|L)| \
1894 VTG_RBS4(|L)|DB_REMMS1(|L)|DB_SAMMS489G(|L)|DB_SNS727(B|D|E)|DB_SNPS719C(|L))| \
1895 DB_SAMMS489(C|D|E)(|L)|(DBS_RGLNS673M|DBAG_SAMMNPS_V)[OB:STEEL(28|29|30|31|41)(|[M]),,12]))| \
1896 (DB_SGMMNS738KM(|L)[OB:STEEL(28|29|30|31|41)(|[M]),,12])| \
1897 (DBS_SAMMS489M(|L)[OB:STEEL(28|29|30|31|41)(|[M]),,12])
1898
1899 # EP 6 Freight Steel transport
1900
1901 $DEF Z_D_E6_G_COIL1=(10-12*(DB_SHIMMSU708AL|DB_SHIMMSU708A|DB_SHIMMSU708BL|DB_SHIMMSU708C| \
1902 G_SHIMMNSP_Y25BL|G_SHIMMNSP_Y25DL|G_SHIMMNSP_Y25D|DB_SHIMMNS_TU718_3L|DB_SHIMMNS_TU718_3| \
1903 DB_SHIMMNS_TU718_6|DB_SHIMMNS_TU718B6L|DB_SHIMMNS_TU718B6|DB_SHIMMNS_TU720_3|DB_SHIMMNS_TU720_4| \
1904 DB_SHIMMNS_TTU722_12|DB_SHIMMNS_TTU722_5L|DB_SHIMMNS_TTU722_5|DB_SHIMMNS_TTU722_7| \
1905 DB_SHIMMNS_TTU722_8|DB_SHIMMNS_TTU722_10|DB_SHIMMNS_TTU722_1L|DB_SHIMMNS_TTU722_1| \
1906 DB_SHIMMNS_TTU722_2|DB_SHIMMNS_TTU722_4L|DB_SHIMMNS_TTU722C|DB_SHIMMNS_TTU723_2L| \
1907 DB_SHIMMNS_TTU723_3L|DB_SHIMMNS_TTU723_5L|DB_SHIMMNS_TTU723_6L|DB_SHIMMNS_TTU723_6| \
1908 DB_SHIMMNS_TTU723G1L|DB_SHIMMNS_TTU723G1|DB_SHIMMNS_TTU723B2L|DB_SHIMMNS_TTU723B3| \
1909 DB_SHIMMNS_TTU723B4L),4*(DBAG_5RMMS663L[O:STEEL5,15,12][O:STEEL5,50,12]))
1910 $DEF Z_D_E6_G_COIL2=10-12*(DB_SAHMMS(_T710_1|_T710_2|_T710_3|_T710_4|711_1|711_1B|711_2|711_4|711_3| \
1911 711_5|711_5B|711_6|711_6B)(|L)[OB:COIL(9|10|11|12|13|14|15),10,11] \
1912 [OB:COIL(9|10|11|12|13|14|15),32,11][OB:COIL(9|10|11|12|13|14|15),53,11] \
1913 [OB:COIL(9|10|11|12|13|14|15),74,11][OB:COIL(9|10|11|12|13|14|15),95,11] \
1914 [OB:COIL(9|10|11|12|13|14|15),116,11][OB:COIL(9|10|11|12|13|14|15),138,11]), \
1915 3-4*DB_SAHLMMPS706_(1|2|3|4|5)[OB:COIL(9|10|11|12|13|14),106,13] \
1916 [OB:COIL(9|10|11|12|13|14|15),83,13][OB:COIL(9|10|11|12|13|14|15),58,13] \
1917 [OB:COIL(9|10|11|12|13|14|15),35,13][OB:COIL(9|10|11|12|13|14|15),10,13]
1918 $DEF Z_D_E6_G_COIL3=(14*(G_SHIMMNST_Y25_1L|G_SHIMMNST_Y25_1|G_SHIMMNST_Y25_2L|G_SHIMMNST_Y25_2| \
1919 G_SHIMMNST_Y25_3L|G_SHIMMNST_Y25_3|G_SHIMMNST_Y25_4L|G_SHIMMNST_Y25_4|DB_SHIMMNSU708L| \
1920 DB_SHIMMNSU708|G_SHIMMNSP_Y25AL|G_SHIMMNSP_Y25A|G_SHIMMNSP_Y25BL|G_SHIMMNSP_Y25B|G_SHIMMNSP_Y25CL| \
1921 G_SHIMMNSP_Y25C|G_SHIMMNSP_Y25DL|G_SHIMMNSP_Y25D))
1922 $DEF Z_D_E6_G_COIL4=4*Z_D_E6_G_Stahku
1923 $DEF Z_D_E6_G_COIL5=(10*DB_SAHIMMSU900(|A|B|BL|C|CL|D|DL|E|EL),4*RAI_SAHIMMSU901(D|C|CL))
1924 $DEF Z_D_E6_G_COIL6=15*(LOGSERV_SHIMMNS718_ONRAIL1M|LOGSERV_SHIMMNS718_ONRAIL2M|LOGSERV_SHIMMNS_VTGM| \
1925 NACCO_SHIMMS1L|NACCO_SHIMMNS1|ERR_SHIMMNSM|VTG_SHIMMNSM|SOGE_SHIMMNS2)
1926 $DEF Z_D_E6_G_COIL7=13*((DB_SAHMMS709KM|DB_SAHMMS709NKM)[OB:COIL20H,32,13][OB:COIL23H,70,13] \
1927 [OB:COIL23H,112,13])
1928
1929 $DEF Z_D_E6_G_COIL=Z_D_E6_G_COIL(1|2|3|4|5|6|7)
1930
1931 # EP 6 Freight GRAVEL transport
1932 $DEF Z_D_E6_G_FCS=(12*(DB_FCS((3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28| \
1933 29|30)(|L)[O:(FR_GRAVEL1|FR_BRAM|FER(3|4))(|[M]),,40])))| \
1934 DBAG_FACS124(A|B|BC)(|L)[O:(FR_GRAVEL1|FR_BRAM|FER(3|4))(|[M]),,41]
1935
1936 # EP 6 Freight CAR transport
1937 $DEF D6FCA1=(6*ATG_LAAES556M[OB:VW_GOLF7(|B|E|K|W|H),3,27][OB:VW_GOLF7(|B|E|K|W|H),47,27] \
1938 [OB:VW_GOLF7(|B|E|K|W|H),3,9][OB:VW_GOLF7(|B|E|K|W|H),47,9][OB:VW_GOLF7(|B|E|K|W|H),91,27] \
1939 [OB:VW_GOLF7(|B|E|K|W|H),136,27][OB:VW_GOLF7(|B|E|K|W|H),91,9][OB:VW_GOLF7(|B|E|K|W|H),136,9] \
1940 [OB:VW_GOLF7(|B|E|K|W|H),179,27][OB:VW_GOLF7(|B|E|K|W|H),224,27][OB:VW_GOLF7(|B|E|K|W|H),180,9] \
1941 [OB:VW_GOLF7(|B|E|K|W|H),224,9], \
1942 6*SITFA_TA381_OM[OB:VW_GOLF7(|B|E|K|W|H),3,27][OB:VW_GOLF7(|B|E|K|W|H),47,28] \
1943 [OB:VW_GOLF7(|B|E|K|W|H),3,10][OB:VW_GOLF7(|B|E|K|W|H),47,9][OB:VW_GOLF7(|B|E|K|W|H),91,28] \
1944 [OB:VW_GOLF7(|B|E|K|W|H),135,28][OB:VW_GOLF7(|B|E|K|W|H),91,9][OB:VW_GOLF7(|B|E|K|W|H),135,9] \
1945 [OB:VW_GOLF7(|B|E|K|W|H),179,28][OB:VW_GOLF7(|B|E|K|W|H),223,28][OB:VW_GOLF7(|B|E|K|W|H),179,9] \
1946 [OB:VW_GOLF7(|B|E|K|W|H),223,11])| \
1947 (4*ATG_LAADRS557M[OT:(FD_PORSCHE_MACAN(1|2)[SM:0.5]),91,12] \
1948 [OT:(FD_PORSCHE_MACAN(1|2)[SM:0.5]),34,12][OT:(FD_PORSCHE_MACAN(1|2)[SM:0.5]),169,12] \
1949 [OT:(FD_PORSCHE_MACAN(1|2)[SM:0.5]),234,12], \
1950 4*STVA_TA379WRM[OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),12,28] \
1951 [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),62,28][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),159,28] \
1952 [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),210,28][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),110,28] \
1953 [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),8,10][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),64,10] \
1954 [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),161,10][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),212,10] \
1955 [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),112,10][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),14,28], \
1956 4*STVA_TA364W_RM[OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),71,28] \
1957 [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),134,28][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),191,28] \
1958 [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),190,10][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),14,10] \
1959 [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),72,10][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),134,10] \
1960 [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),14,28])
1961
1962 # EP 6 Maintenance 1
1963 $DEF Z_D_E6_Bauzug=(<2*DBAG_5RMMS663(|L),DBAG_5RMMS663L,DBC_FCS2,DBC_FCS5,DBC_FCS6,DB_FCS27, \
1964 DB(C|AG)_SAMMSU454M[O:GROUND1])
1965
1966 # EP 6 Maintenance 2
1967 $DEF Z_D_E6_Bauzug2=10-12*(IWAG_FAKKS(_ELA1|_ELA2|_ELA3|_EILT1|_EILT2|_EILT3|4|2|3) \
1968 [OB:(SAND15|FR_GRAVEL1|FR_RIZKY|BETTERAVES_2E1|BETTERAVES_2E2)(|[M]),,31]| \
1969 (IWAG_FANS(2|3|1|_ABCBAU2|_ABCBAU1) \
1970 [OB:(SAND15|FR_GRAVEL1|FR_RIZKY|BETTERAVES_2E1|BETTERAVES_2E2)(|[M]),,31])| \
1971 (SCHAU_FAKKS(2|3))[OB:(SAND15|FR_GRAVEL1|FR_RIZKY|BETTERAVES_2E1|BETTERAVES_2E2)(|[M]),,31])| \
1972 (DB_FAS126(A|AP|B|BP|C|D|E|EP|FP|GP|BA|BAP|BP|BC|BD|BE|KA|KB|KC|KCP|KD|KE|KF|KG|KH|KI|KAP|KBP|KDP| \
1973 KEP|KFP|KGP|KHP|KIP)[OB:(SAND15|FR_GRAVEL1|FR_RIZKY|BETTERAVES_2E1|BETTERAVES_2E2)(|[M]),,31]| \
1974 (DBC_FAS126(A|B|C)[OB:(SAND15|FR_GRAVEL1|FR_RIZKY|BETTERAVES_2E1|BETTERAVES_2E2)(|[M]),,31]))
1975
1976 # EP 6 Maintenance 3
1977 $DEF Z_D_E6_Bauzug3=(<(3*(DBB_RES_RU(|L)[OB:(GRAVEL8(|[M])),,16])), \
1978 2*(DBB_RGS_RU_BSG(|L)|DBB_RGS_RU_KT(|L)), \
1979 5*(DB_FACNS141(|L),DBC_FCS2|DBC_FCS3|DBC_FCS4|DBC_FCS5|DBC_FCS6|DB_FCS27|DB_FCS28L|DB_FCS28), \
1980 DBB_RGS_SCH,DBB_RES_BA_CON|DBB_RES_BA_CONL,DBB_RES_RUL|DBB_RGS_RUL[OB:PYLON2,,12])
1981
1982 # EP 6 Maintenance 4
1983
1984 $DEF D6FM4=4*(ITL_RES5(|L)|ITL_ROSDSM)[O:PYLON3,15,12][O:PYLON3,100,12], \
1985 6*ITL_RES(2|4)(|L)[OB:RAIL6(|[M]),,13]
1986
1987 # EP 6 Maintenance mix
1988 $DEF D6FMM=Z_D_E6_Bauzug|Z_D_E6_Bauzug3|Z_D_E6_Bauzug2|D6FM4
1989
1990 #----------------------------------------------------------------------------------------------------
1991 #
1992 # East Germany
1993
1994 # EP 3a DR East Germany Passenger long Distance
1995 $DEF DR3PD=(<DR_3POST_43524(|L),DR_3A_PW4U28(|L),DR_3A_C4U26,DR_3AB4U38,DR_3A_AB4U23,DR_3A_C4U22, \
1996 DR_3A_C4U26,2*DR_3A_C4U28)| \
1997 (>DR_3POST_43524(|L),DR_3A_PW4U28(|L),DR_3A_C4U26L,DR_3AB4U38,DR_3A_AB4U23L,DR_3A_C4U22L, \
1998 DR_3A_C4U26L,2*DR_3A_C4U28L)|(DR_3A_PW4U28(|L),4*DR_C4UP54(|L)~JMU,2*DR_3AB4U38,2*DR_3A_C4U28)
1999
2000 # EP 3B DR East Germany Passenger long Distance
2001 $DEF DR3PDB=(<DR_3POST4|DR_3POST41,DR_3D4GE|DR_3D4GE1S,5*(DR_3B4GE1|DR_3B4GRE|DR_3B4GRE1|DR_3B4GE1S), \
2002 2*(DR_3A4GE(|1|1S),DR_3B_MOD_A4GE3(8|5)A),DR_3B_MOD_AB4GE35|DR_3AB4GE,DR_3B_POST4U_B17(|L))| \
2003 (>DR_3POST4L|DR_3POST41L,DR_3D4GEL|DR_3D4GE1SL,5*(DR_3B4GREL|DR_3B4GRE1L|DR_3B4GE1SL), \
2004 2*(DR_3A4GE(|1|1S),DR_3B_MOD_A4GE3(8|5)A)L,DR_3B_MOD_AB4GE35L|DR_3AB4GEL)| \
2005 (<DR_3_B4UPEL,(2*DR_B4GE62),DR_B4GE68ZL|DR_B4GE68Z|DR_2040070L|DR_2040070,DR_A4GE64L,DR_A4GE64, \
2006 2*DR_B4GE62L,DR_AB4GE63L|DR_AB4GE63,DR_3B_D4U37,DR_3POST4_21L)| \
2007 (<DR_3B_POST4U_B17(|L),DR_3_BD4I_C8P,DR_3_B4I_C10,DR_3_B4I_B5C4,2*DR_3_B4I_B5C4L)| \
2008 (<DR_3B_POST15(|L),DR_3B_D4U37(|L),DR_3B_AB4U39L~JMU,(2*DR_3B_B4U38L),DR_3B_A4U38L, \
2009 MITR_3B_WR4UE35,DR_3B_A4U38L,2*DR_3B_B4U38L)| \
2010 (<(2*DR_3B_B4U38),DR_3B_A4U38,MITR_3B_WR4UE35,DR_3B_A4U38,2*DR_3B_B4U38,DR_3B_AB4U39~JMU, \
2011 (DR_3B_POST15(|L),DR_3B_D4U37(|L))| \
2012 (<(2*DR_3B_B4UE34BCL),DR_3B_A4U26A,MITR_3B_WR4UE35,DR_3B_A4U26A,2*DR_3B_B4UE30B,DR_3B_B4UE34BCL), \
2013 DR_3B_POST15(|L),DR_3B_D4U37(|L))| \
2014 (<DR_POSTMD,2*DR_B519BL,DR_B519B,DR_43BGEL,DR_43AGE1S,DR_44BGE1SL)| \
2015 (<DR_BDS275BL,DR_BCME2BL,DR_BCME2B,DR_AB511A,(DR_WRMD|MITR_3B_WR4UEM(G|S)J(|L)),DR_WLABGEA, \
2016 DR_WLABGEAL,DR_B516BL,DR_B518AL)| \
2017 (<DR_3B_D4UE30U,2*DR_3B_B4UE28,DR_3B_B4UE22,MITR_3B_WR4UE35,DR_3B_A4UE23A58|DR_3B_A4UE23A, \
2018 DR_3B_A4U38,DR_3B_B4UE26,DR_3B_B4UE28,DR_3B_B4UE30B)| \
2019 (>DR_3B_D4U37(|L),2*DR_3B_B4UE28L,DR_3B_B4UE22L,MITR_3B_WR4UE35L,DR_3B_A4UE23A58L|DR_3B_A4UE23AL, \
2020 DR_3B_A4U38L,DR_3B_B4UE26L,DR_3B_B4UE28L,DR_3B_B4UE34BCL)
2021
2022 # EP 3b DR East Germany Passenger semi-fast train
2023 $DEF DR3PE=(<DR_4B_POST15L|DR_4B_POST15,DR_B4UP57000|DR_B4UP57000L,DR_B4UP66500, \
2024 DR_PWI_DI90000L|DR_PWI_DI90000,DR_PWI_DI92000L|DR_PWI_DI92000)| \
2025 (DR_3B_D4UME3(1|2)(|L),2*DR_3B_B4UME(|L),DR_3B_AB4UME(|L)|DR_3B_A4UME(|L),2*DR_3B_B4UME(|L))
2026
2027 # EP 3b DR East Germany Passenger regional Old cars
2028 $DEF DR3PRA1=(DR_PW3IWUE21_3,DR_3BI_BCI29,2*DR_CD27_3(|L))| \
2029 (DR_BI31(|L)~JMU|DR_3B_ABI31(|L)|DR_ABI34(|L),3*(DR_CI31A(|L)~JMU|DR_CI33(|L)~TDBW), \
2030 DR_PWI31A(|L)~JMU,DR_3A_POST3A_CI128)
2031
2032 # EP 3b DR East Germany Passenger regional Reko 4x
2033 $DEF DR3PRN=DR_3D4GE1(|L),6*(DR_3B4GWL(|S|R)(|L))
2034
2035 # EP 3b DR East Germany Passenger regional Reko 3x
2036 $DEF DR3PRR=(<DR_3A_POST3A_CI128L|DR_3A_POST3A_CI128|DR_3B_POST3A_CI128L|DR_3B_POST3A_CI128, \
2037 DR_3A_PW3GEL|DR_3A_PW3GE|DR_3B_PW3GEL|DR_3B_PW3GE,DR_3B_B3G57L,DR_3B_B3G57,DR_3B_B3GTR57L, \
2038 DR_3B_B3GTR57,DR_3A_B3G57L,DR_3A_B3G57,DR_3A_B3GTR57L,DR_3A_B3GTR57)
2039
2040 # EP 3b DR East Germany Passenger regional double deck
2041 $DEF DR3PRD=(2*DR_3B_DC7GZ)|DR_3B_DC13GZ(1|2)|DR_3B_DC1361GZ1
2042
2043 # EP 3b DR East Germany Freight shunting
2044 $DEF DR3FR=(2-3*(DR_3_OMU37VBHL|DR_3_OMU35BL|DR_3_OMU37VBHL|DR_3_OMMBU402S|DR_3_OMU36VBUL|DR_3_OMU35H| \
2045 DR_3_OMU35BL|DR_3_OMU36VBUL))|(2-3*(DR_3_ZZ82402G(2|1)|DR_3_ZZ(RQ81022|8101)(|L)))| \
2046 (2-3*(DR_G1|DR_3_G04H|DR_3_GR04(|H)|DR_3_GHMS11BL|DR_3_G04VH4|DR_3_G04VB|DR_3_GR04H|DR_3_G05L| \
2047 DR_3_GHMS11(|L)))|(2-3*(DR_3_MS06B|DR_3_MS06)(|L))|(2-3*(DR_TDGS1AL|DR_TDGS1CL))| \
2048 (2-3*(DR_3_GG15(|L)|DR_3_GGU73|DR_BROMBERG|DR_BROMBERG(|BL|SBL)))| \
2049 (2-3*(DR_Z7004A|DR_ZE7098A|DR_ZE7098A(|L)|DR_Z7004AL|DR_Z7004A|DR_ZSW7361C|DR_ZH8020L))| \
2050 (2-3*(DR_3_OMU36VBBL|DR_3_OMU36VB|DR_3_OMU35H(|L)[OB:FER1(|[M]),,26]))|(2-3*(DR_O10(|B|HL|L)))| \
2051 (2-3*(DR_3_GHS07BL|DR_3_GGU73|DR_3_GHMS11(|B)(|L)|DR_GAGMSV4|DR_GLMS(1|2|3)(|B|BL)|DR_GG| \
2052 DR_3_GHS07LHL|DR_GAGMSV2))|(2-3*(DR_UCXL))|(2-3*DR_3A_O10(|L)[OB:BARREL4,,21])| \
2053 (2-3*((DR_3_GLM04(|B|FV|FVB|FVB5))|(2-3*(DR_3_GM11(|O|OB))|DR_3_GMM(|S)14(|D))(|L)))| \
2054 (2-3*(DR_KMM54A1B|DR_KMM54A1BL|DR_KMM54A2BL|DR_KMM54A4B))|(2-3*(DR_3_GGU73|DR_GAGMSV3))| \
2055 (2-3*(DR_MS(2|3)|DR_MSB|DR_MS3B(|L)|DR_ICHQSSZ4))|(2-3*DR_LBK(5|1|2|3|4)(|L))| \
2056 (2-3*(DR_3_OMU41(|UL|U|L|H|HL|BL|B)[OB:(FR_SUTR|FR_KO34|FR_KO23|BALLAST43)(|[M]),,28]))| \
2057 (2-3*(DR_3_GL(12|12L|12U|12H|12HL|12U|R12UL|R12|R12L|R12U|R12H|R12HL|R12U)))| \
2058 (2-3*(DR_3_OMU37(|VBUL|VBU|VB|VBH|VBBL|VBB|L)))| \
2059 (2-3*(DR_3_GU10(|L)|DR_3_GU02|DR_3_G04VB(|L)|DR_3_G05(|L)|DR_3_GHS07(|B|LH|H)(|L)))| \
2060 (2-3*(DR_3_OMMBU402(|L|U|U1|S|S1|SL|S1L)[OB:(FR_SUTR|FR_KO34|FR_KO23|BALLAST43)(|[M]),,26]))| \
2061 (2-3*(DR_3_OOR47_(56|56H|56O|56OH|58|58H|58O|58OH|63|63B|63O|63OB)(|L)[OB:WOOD1(38|37)(|[M]),,31]))| \
2062 (2-3*(DR_3_OORU47_(S154|S154H|S256|S1R60|S1R60H|S2R60)(|L)[OB:WOOD1(38|37)(|[M]),,33]))| \
2063 (2-3*(DR_LBK2L|DR_LBK3|DR_Z7004AL|DR_O10L|DR_3_OMU35H(|L)|DR_GAGMSV2|DR_GLMS1B))| \
2064 (2-3*(DR_3_OMU35(H|U|B)(|L)|DR_4_SAUREL))| \
2065 (2-3*DR_3_ZZ(8104|82401G1H|82401G2B|82401G2H|82401G2B|R81021)(|L))| \
2066 (2-3*(DR_3SSLMA6580_1925(H|B)(|L)|DR_3SSLMA6580_1936(H|B)(|L)|DR_3SSLMA6580_1942(|L)| \
2067 DR_3SSLMA6580_1940(|L)[OB:RAIL6[BT:,12],19,13][OB:RAIL6[BT:,12],54,13]))
2068
2069 # EP 3 DR East Germany Freight short
2070 $DEF DR3FS=2-3*DR3FR
2071
2072 # EP 3b DR East Germany Freight long
2073 $DEF DR3FL=DR_3PWGPR14(|L),8-10*DR3FR
2074
2075 # EP 4 DR East Germany Passenger long distance 1970-1975
2076
2077 $DEF DR4PL1=(<DR_4(1|2)DGE(|1|1S),5*DR_4(1|2)BGE(|1|1S),DR_4(1|2)BGRE(|1),DR_WRMA(|L), \
2078 2*DR_4(1|2)AGE(|1|1S|35A|38A),DR_4(1|2)ABGE(|1S))| \
2079 (<DR_4(1|2)DGE(|1|1S)L,5*DR_4(1|2)BGE(|1|1S)L,DR_4(1|2)BGRE(|1)L,DR_WRMA(|L), \
2080 2*DR_4(1|2)AGE(|1|1S|35A|38A)L,DR_4(1|2)ABGE(|1S)L)| \
2081 (<3*DR_B51(6|8)A,2*DR_A50(4|5)A,DR_4WRME8870G|MITR_4B_WR_RE(GB|SB|SG|GG),2*DR_B51(6|8)A, \
2082 DR_AB5(08|11)A,DR_4(1|2)DGE1(|L),DR_4(1|2)POST2(0|1)(|L))| \
2083 (>3*DR_B51(6|8)AL,2*DR_A50(4|5)AL,DR_4WRME8870G|MITR_4B_WR_RE(GB|SB|SG|GG)L,2*DR_B51(6|8)AL, \
2084 DR_AB5(08|11)AL,DR_4(1|2)DGE1(|L),DR_4(1|2)POST2(0|1)(|L))
2085
2086 # EP 4 DR East Germany Passenger long distance 1975-1980
2087
2088 $DEF DR4PL3=(<DR_43DGE(|1|1S),5*DR_43BGE(|1|1S),DR_43BGRE(|1),DR_WRMA(|L),2*DR_43AGE(|1|1S), \
2089 DR_43ABGE(|1|1S))| \
2090 (<DR_43DGE(|1|1S)L,5*DR_43BGE(|1|1S)L,DR_43BGRE(|1)L,DR_WRMA(|L),2*DR_43AGE(|1|1S)L, \
2091 DR_43ABGE(|1|1S)L)| \
2092 (<3*DR_B51(6|8|9)B,2*DR_A50(4|5|7)B,DR_4WRME8870G|MITR_4B_WR_RE(GB|SB|SG|GG),2*DR_B51(6|8|9)B, \
2093 DR_AB5(08|11|12)B,DR_43DGE1(|L),DR_43POST2(0|1)(|L))| \
2094 (>3*DR_B51(6|8|9)BL,2*DR_A50(4|5|7)BL,DR_4WRME8870G|MITR_4B_WR_RE(GB|SB|SG|GG)L,2*DR_B51(6|8|9)BL, \
2095 DR_AB5(08|11|12)BL,DR_43DGE1(|L),DR_43POST2(0|1)(|L))| \
2096 (<DR_4BME2080269L|DR_4BCME5940L,DR_4AME1980L,DR_4ABME3980L|DR_4ABME3980107L, \
2097 MITR_4B_WR_RE(GB|SB|SG|GG)L,3*DR_4BME2080L,DR_4BDMSE8240L|DR_4B_BDMSE8245003L)| \
2098 (<DR_4B_BDMSE8245003|DR_4_DUE30|DR_4BDMSE8240,3*DR_4BME2080,DR_4ABME3980|DR_4ABME3980107, \
2099 DR_4AME1980,DR_4BCME5940|DR_4BME2080269)
2100
2101 # EP 4 DR East Germany Passenger long distance 1980s
2102 $DEF DR4PL2=(<DR_4BDME8280L,DR_AME1043IEL|DR_AME1043IE, \
2103 DR_4AME1043L|DR_4AME1043|DR_4AME1085L|DR_4AME1085, \
2104 DR_4BMKL|DR_4BMK|DR_4AME1085SXBL|DR_5WRME8870L|DR_5WRME8870, \
2105 4*(DR_4BME2150L|DR_4BME2150|DR_4BME2185PL|DR_4BME2185P|DR_4BMH2115L|DR_4BMH2115), \
2106 DR_BME2150L|DR_BME2150,DR_4ABME3043|DR_4ABME3085L)| \
2107 (<(2*DR_BOM280(E|N)L),2*DR_4(A|B)_BME2940L,2*(DR_4(A|B)_AME1940L|DR_AM201NL),DR_4WRGE_EX(1|2|3)L, \
2108 2*DR_4(A|B)_BME2940L)| \
2109 (<(2*DR_4(A|B)_BME2940),DR_4WRGE_EX(1|2|3),2*(DR_4(A|B)_AME1940|DR_AM201N),2*DR_4(A|B)_BME2940, \
2110 2*DR_BOM280(E|N))| \
2111 (<DR_DGE4(G|H)L,DR_4B_BCME5940L,2*DR_4B_BME2080AL,DR_4C_WRGEL|DR_4B_ABME3980L, \
2112 2*DR_4(B|C)_AME1940L,2*DR_4B_BME2080AL,DR_4B_BDMSE8245L)| \
2113 (<DR_DGE4(G|H),DR_4B_BDMSE8245,2*DR_4(B|C)_AME1940,DR_4C_WRGE,DR_4B_ABME3980,2*DR_4B_BME2080A, \
2114 2*DR_4C_AME1940,DR_4B_BCME5940)
2115
2116 # EP 4 DR East Germany Passenger regional Reko 3x
2117 $DEF DR4PR3=5*(DR_4BAGE(|L)|DR_4A_BAGE(|L)),DR_4BAGTRE(|L),DR_4PWI(23|27|28|29|30|31)(|L),DR_4POSTA(|L)
2118
2119 # EP 4 DR East Germany Passenger regional old/Reko 4x
2120 $DEF DR4PRM=(<DR_4B_POST15(|L),DR_4_DUE30|DR_4D4UME32(|L)|DR_4_PW4I33|DR_4D4UME31(|L), \
2121 3*DR_4BGHWER(|L),DR_4AB4UME(|L)|DR_4A4UME(|L),DR_4B4UME(|L))
2122
2123 # EP 4 DR East Germany Passenger regional Reko 4x
2124 $DEF DR4PRR=(<DR_4DAGEL|DR_4DAGE,DR_4A_BAGEL,DR_4BAGEL|DR_4BAGE,DR_4A_BAGE|DR_4A_BAGEL, \
2125 DR_4BAGTRE|DR_4BAGTREL,2*DR_4A_BAGE)
2126
2127 # EP 4 DR East Germany Freigt long Coal
2128 $DEF Z_DR_E4_FAL=15*(DR_FAL6556AL|DR_FAL6556A|DR_FAL6556BL|DR_FAL6556B|DR_FAL6556CL|DR_FAL6556C| \
2129 DR_FAL6556DL|DR_FAL6556D|DR_FAL6556AHL|DR_FAL6556AH|DR_FAL6556BHL|DR_FAL6556BH|DR_FAL6556CHL| \
2130 DR_FAL6556CH|DR_FAL6556DHL|DR_FAL6556DH|DR_FAL6556EHL|DR_FAL6556EH)|
2131
2132 # EP 4 DR East Germany shunting
2133 $DEF DR4FR=(3-4*(DR_LAAEKQZ[OB:TRABANT_(CH|BL|CG|UBL|G|GY|WH|UCH),20,28] \
2134 [OB:TRABANT_(CH|BL|CG|UBL|G|GY|WH|UCH),70,28][OB:TRABANT_(BL|CG|UBL|G|GY|WH|UCH),20,12] \
2135 [OB:TRABANT_(CH|BL|CG|UBL|G|GY|WH|UCH),70,12][OB:TRABANT_(CH|BL|CG|UBL|G|GY|WH|UCH),130,28] \
2136 [OB:TRABANT_(BL|CG|UBL|G|GY|WH|UCH),180,28][OB:TRABANT_(BL|CG|UBL|G|GY|WH|UCH),130,12] \
2137 [OB:TRABANT_(CH|BL|CG|UBL|G|GY|WH|UCH),180,12]))| \
2138 (4*(DR_EKKL4[OB:SCRAP_14,,25]|DR_EKKL[OB:SCRAP_15,,25]))| \
2139 (4*(DR_FCS1(A|B|D)(|L)[OB:FER(4|1)(|[M])]))|(3-4*(DR_4_U9083|DR_US9084))| \
2140 (3*(DR_4RES3936R(|L)[OB:SCRAP10(|[M]),,16])|(DR_4RES3936R|DR_4RES_K[OB:GRAVEL8(|[M]),,13]))| \
2141 (3-4*DR_GBS1500(A|B|C|D|E|F|G|H|I|J|K|L))|(3-4*(DR_GAGMSV4|DR_GBS1507))| \
2142 (3-4*DR_4A_EAL5906(A_65|A_65B|N_65|N_65B)(|L)[OB:WOOD1(38|37)(|[M]),,33])| \
2143 (3-4*(DR_4_EAL5906(A_65|A_65B|N_63|N_63B|N_65|N_65B)(|L)[OB:WOOD1(38|37)(|[M]),,33]))| \
2144 (3-4*DR_4_EAS(5968|5967|5966|5965(|F)|5952|5951)(|L)[OB:SCRAP(4|6|5)(|[M]),,33])| \
2145 (3-4*((DR_4_EAL(5918_58(|H)|5918_56(|H)|S5910|SX5909))|(DR_4A_EAL(5916_S2(|R)|5916_S1(|H))))(|L) \
2146 [OB:SCRAP(4|6|5)(|[M]),,32])|(4*(DR_4B_TMS0757BL|DR_TDS1C|DR_TDS1FL))| \
2147 (3*(((DR_RGS3920R(|L)|DR_4RGS3910RAL|DR_RGS3917)[OB:BOX22,133,12][OB:BOX16,80,12][OB:BOX36,25,12])| \
2148 (DR_RGS3920(|L)[O:DR_RGS3920RU,67,12][O:DR_RGS3920RU,88,12][O:#DR_RGS3920RU,107,12] \
2149 [O:#DR_RGS3920RU,128,12][OB:TARP20,,12])| \
2150 (DR_4RGS2(|L)[OB:ADK_80(A|B|C|D),13,12][OB:ADK_80(A|B|C|D),102,12])))| \
2151 (4*(DR_EL_(3L|4L|1|2|3|4|5|6)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]))| \
2152 (4*(DR_ICHQSSZ5|DR_IBBLPS3|DR_IBHQSSZ2))|(2-3*DR_4_UAH82402(|G2)(|L))| \
2153 (4*((DR_4_EAS5969|DR_EAL4L|DR_ES6|DR_4_E037)[OB:COAL37(|[M]),,27]))| \
2154 (4*((DR_EAL5916C|DR_EAL5916A|DR_EL5569D)[OB:BALLAST18,,27]))| \
2155 (4*(DR_RLMMP3863A[O:PIPE(31|62|60)]|DR_EKKL4L|DR_OOR2(|L)|DR_4RMMS3960[OB:PIPE(31|62|60),,12]))| \
2156 (4*(DR_HBS|DR_4KS[OB:PYLON3,,12]|DR_SAMM))|(3-4*DR_4_UAH82411(|G2)(|L));
2157
2158 # EP 4 DR East Germany Freigt long
2159 $DEF DR4FL2=5-6*DR4FR
2160
2161 # EP 4 DR East Germany Freigt long tank cars
2162 $DEF Z_DR_E4_Kessel=15*(DR_ZSW7361A|DR_ZSW7361BL|DB_ZAD_VTG|DB_ZAU_VTGL|DR_ZAKKW4L|DR_ZAKKW4| \
2163 DR_ZSW7361B|DR_ZSW7361CL|DR_ZSW7361C|DR_ZSW7361DL|DR_ZSW7361D|M_ZS2L|M_ZS2|DR_ZAKKW2L|DR_ZAKKW2| \
2164 DR_ZAKKW3L|DR_ZAKKW3|(DR_EKKL4[OB:SCRAP_14,,25]|DR_EKKL[OB:SCRAP_15,,25])| \
2165 DR_FCS1(A|B|D)(|L)[OB:FER(4|1)(|[M]),,40]|DR_4RES3936RL[OB:SCRAP10,,16]|DR_4OMMU2[O:FR_KO47,,28])
2166
2167 # EP 4-5 DR East Germany Passenger Inter Regio
2168 $DEF DR5PI=(<DR_5_1940110L|DR_5_1940110,DR_AMZ1095|DR_AMZ1095L|DR_AIMZ1094|DR_AIMZ1094L, \
2169 DR_ARKIMBZ262_2L|DR_ARKIMBZ262_2,DR_BIMZ2295L|DR_BIMZ2295,DR_BMZ2190IR|DR_BMZ2190IRL, \
2170 2*DR_BIMZ2295,DR_5BMZ2190L,DR_5BMZ2190|DR_BIMDZ8495|DR_BIMDZ8495L)
2171
2172 #----------------------------------------------------------------------------------------------------
2173 #
2174 # SWISS
2175
2176 # EP 1 Gotthardbahn Freight short;
2177 $DEF CH1FGS=4-6*((GB_H1H|GB_6001W1|GB_6001W2|GB_6001H|GB_4001(|O)(|L)[OB:AG55,,20])|GB_3001G(|L)| \
2178 GB_3001(|L)|GB_2001G(|L)|GB_3485H(|L)|GB_3501Z(|L)|GB_5001H|GB_K2BM| \
2179 GB_5001H[OB:BONBONNEGAZ1,15,15][OB:BONBONNEGAZ1,45,15])
2180
2181 # EP 2 Passenger regional short;
2182 $DEF CH2PRS=SBB_CF9793(|L)|SBB_F16801(|L)|SBB_F17401(|L),2-4*SBB_C6791(|L),2-4*SBB_B3451(|L), \
2183 2-4*SBB_C6791(|L)
2184
2185 # EP 2 Passenger regional long;
2186 $DEF CH2PRL=SBB_DSW|SBB_FT16021(|L)|SBB_16001LNG|SBB_16001,1-2*SBB_CC5701GZ(|L), \
2187 (1-2*(SBB_BB4011GZ(|L)|SBB_BC4201GZ(|L)))|(2-3*SBB_CC5701GZ(|L),SBB_CF9793)
2188
2189 # EP 2 Freight short
2190 $DEF CH2FS=(4-6*(SBB_59251(|L)[OB:AG65,20,28|29])| \
2191 (SBB_1K2_40101(|L)|SBB_2K2_32502L|SBB_2K2_32502|SBB_3K2_33045L|SBB_3K2_33045(|L)|SBB_60221(|L)| \
2192 SBB_K1|SBB_60601(|L)[OB:TRAVERSES01,17,10][OB:TRAVERSES01,42,10]|SBB_2K2_30113(|L)| \
2193 SBB_M9H(|L)[OB:BOILER1,17,12][OB:BOILER(1|4),90,12])|SBB_P91733(|L))
2194
2195 # EP 2 Freight long;
2196 $DEF CH2FL=(10-15*(SBB_59251[O:#FR_KO13,20,29])|(SBB_59251L[O:FR_KO13,20,29])| \
2197 (SBB_59201[O:#OMM_KOHLE_01,8,28])|(SBB_57241[O:#FR_KO12,12,28])|(SBB_57241L[O:#FR_KO13,20,28])| \
2198 (SBB_57186[O:FR_KO12,12,28])|(SBB_57186L[O:OMM_KOHLE_01,15,28])|(SBB_57001[O:OMM_KOHLE_01,9,28])| \
2199 (SBB_57001L[O:OMM_KOHLE_01,15,28])|(SBB_55062[O:#COAL15,,24])|(SBB_55062L[O:COAL13,,24]))| \
2200 ((<(SBB_1K2_40101(|L)|SBB_2K2_40101|SBB_1K2D_40201L|SBB_1K2D_40401),SBB_3K2_35901|SBB_3K2_35901L, \
2201 (SBB_1K2_32501L|SBB_1K2_32501|SBB_2K2_32502L|SBB_2K2_32502|SBB_3K2_33045L|SBB_3K2_33045), \
2202 3*(SBB_3K3_42001BL|SBB_3K3_42001B|SBB_3K3_42001HL|SBB_3K3_42001H|SBB_3K3_42401L|SBB_3K3D_46501L| \
2203 SBB_3K3D_46501|SBB_3K3D_46631L|SBB_3K3D_46631),SNOB_J25001L|SNOB_J25001,, \
2204 BSBS_2481(|L)|BSB_2401(|L),BNB_K2_301|BNB_K2_301L,GB_3485HL|GB_3485H, \
2205 2*(BNB_K2_201L|BNB_K2_201,GB_1801Z|GB_1801ZL,GB_1901L|GB_1901),SBB_60221L|SBB_60221,SBB_60601, \
2206 SBB_K1|SBB_60601L,UEBB_41L|UEBB_41,SBB_2K2_30113|SBB_2K2_30113L))|(3*CH2FS)
2207
2208 # EP 3 Passenger BLS long
2209 $DEF CH3PBL=3*(BLS_B4U_811(|L)),2*BLS_AB4U_181(|L),3*(BLS_B4U_811(|L))
2210
2211 # EP 3B Passenger SBB local
2212 $DEF CH3PR1=(<SBB_1833006,SBB_17101,SBB_3B4U8754,SBB_3B4U8754L,SBB_3AB4U1,SBB_3A4U1,SBB_3GMS137_5H)
2213
2214 # EP 3 Passenger SBB long Distance
2215 $DEF CH3PD1=(<SBB_3_9133900L,2*SBB_3BEW1B,SBB_34EW2AB,SBB_3BEW1A,2*SBB_3BEW1B)
2216
2217 # EP 3 Freight shunting
2218 $DEF CH3FR=(1-2*(SBB_3GMS137_5B|SBB_3GMS137_5BL|SBB_GMS_K3FURGUTERH(|L)|SBB_GMS_K3POURVOSH(|L)| \
2219 SBB_3GMS137_6|SBB_3GMS137_5HL|SBB_3GMRV105|SBB_3GMS137_6L))| \
2220 (1-2*(SBB_K3_43001|SBB_K3NH|SBB_GMS_K3HL|SBB_GMS_K3H|SBB_HHV(|L)|SBB_2J3_23001|SBB_3J3_23001L| \
2221 SBB_3J3_23001|SBB_3J3_23101L|SBB_3J3_23101))| \
2222 (2-3*(SBB_4GMS137_5BL|SBB_4GMS137_5B|SBB_4GMS137_5HL|SBB_4GMS137_5H|SBB_4GMRV105L|SBB_4GMRV105))| \
2223 ((SBB_KLMS|SBB_KKKML)[OB:(BOX33|BOX_BMW),,13])|(SBB_M3EH|SBB_M3EBL)| \
2224 (2-3*(SBB_3HCQRSS212L|SBB_3HCQRSS212|SBB_3HHV2009000L|SBB_3HHV2009000|SBB_3HHV2009200L| \
2225 SBB_3HHV2009200|SBB_3HV200L|SBB_3HV200|SBB_3J2D_22201L|SBB_3J2D_22201|SBB_3J2D_22501L| \
2226 SBB_3J2D_22501|SBB_J2D_22601L|SBB_J2D_22601))|(1-2*SBB_(2O73601|3O70001|3O70101)(|L))| \
2227 (2-3*(SBB_64001L|SBB_P516009L|SBB_KKKM|SBB_KKKM1L|SBB_KKKM1|SBB_68002L|SBB_68002|SBB_KKKMSWL| \
2228 SBB_KKKMSW|SBB_68901L|SBB_68901|SBB_M6EL|SBB_M6E|SBB_M6E1L|SBB_M6E1|SBB_M6NL|SBB_M6N|SBB_M6N1L| \
2229 SBB_M6N1|SBB_P516009|SBB_O74410SN(|L)))| \
2230 (1-2*(SBB_1200000|SBB_GS_K4A|SBB_GS_K4|SBB_46998|SBB_1700001|SBB_K2NBL|SBB_K2NB|SBB_K2NHL|SBB_K2NH))| \
2231 (2-3*(BLS_GKLML|BLS_GKLM|SBB_GKLM_K2L|SBB_GKLM_K2|SBB_GKLM_K2FURGUTERL|SBB_GKLM_K2FURGUTER| \
2232 SBB_GKLM_K2POURVOSL|SBB_GKLM_K2POURVOS|SBB_GKLM_K2HL|SBB_GKLM_K2H|SBB_3GKLMV114L|SBB_3GKLMV114| \
2233 SBB_G24|SBB_3GKLM111|SBB_GKLM_K2FURGUTERH(|L)|SBB_GKLMVHL|SBB_GKLMVH|SBB_HKVL|SBB_HKV))| \
2234 (1-2*(SBB_ZK151|SBB_0003295|SBB_0003293(|L)|SBB_3O70001|SBB_53001))| \
2235 (1-2*(SBB_37001BL|SBB_37189|SBB_37189L|SBB_22179L|SBB_22179|SBB_22179AL|SBB_22179A))| \
2236 (1-2*(SBB_58101L|SBB_58101|SBB_K2OBL|SBB_K2HOL))| \
2237 (1-2*(SBB_3HK205L|SBB_3HK205|SBB_4HK205L|SBB_4HK205|SBB_3HHK206L|SBB_3HHK206|SBB_HKHL|SBB_HKH| \
2238 SBB_23001L|SBB_23001|SBB_23101L|SBB_23101|SBB_2J3_23001L))|(1-2*(SBB_M(3EH|6E)(|L)))| \
2239 (1-2*(SBB_3GM(S137_5B|RV105)(|L)))|(1-2*(SBB_69701SULZER(|L)))| \
2240 (1-2*(SBB_GMS_K3(FURGUTERH|POURVOSH)(|L)))|(1-2*(SBB_GKLM_K2(|POURVOS)(|L)))| \
2241 (1-2*((SBB_3J3_23001(|L)|SBB_J2D_22601(|L))))|(1-2*(SBB_HHV(|L)|SBB_HKH(|L)))
2242
2243 # EP 3 Freight short
2244 $DEF CH3FS=4-6*CH3FR
2245 # EP 3 Freight long
2246 $DEF CH3FL=12-15*CH3FR
2247
2248 # EP 4 Freight shunting
2249 $DEF CH4FR=(1-3*(SBB_4GMS137_5B(|L)|SBB_4GMS137_5H(|L)|SBB_4GMS137_6(|L)))|(1-3*(SBB_4GMRV105(|L)))| \
2250 (1-3*(SBB_4GKLM(V114|111)(|L)))|(1-3*(SBB_4HK205(|L)|SBB_4HHK206(|L)))|(1-3*(SBB_4E505P))| \
2251 (1-3*(SBB_64001SLM(|L)))|(1-3*(SBB_LKKM2(|L)))|(1-3*(SBB_KKKMSW(1|3)|SBB_M6E(2|3)|SBB_KKKM_SLM))| \
2252 (1-3*(SBB_46998|SBB_1704122|SBB_GS_K4|SBB_1200000|SBB_47001))|(1-3*(SBB_G6|SBB_GBS_0(|L)))| \
2253 (1-3*(SBB_HBILSVY237(|L)|SBB_HBBILLNS2457))|(1-3*(SBB_IBPSS1|SBB_IBPSS|DB_IBCS_INTERFRIGO))| \
2254 (1-3*(SBB_SHIMMS07(|L)))|(1-3*(SBB_4TES0750000(|L)|SBB_4TES0750100(|L)))| \
2255 (1-3*(SBB_O76501(|L)|SBB_TPPS3(|L)|SBB_TPPS4(|L)))| \
2256 (1-3*SBB_(1202809|1200000_LINDT|HKKS_K4APROZ|P552101_APROZ1))| \
2257 (1-3*(SBB_UACS932_1101S(|L)|SBB_UACS932_1101(|L)))|(1-3*(SBB_UCS_9121101(|L)))| \
2258 (1-3*(SBB_O74001RR|SBB_O74201SHL|SBB_O74001RRL|SBB_O74410SRL|SBB_O74410SR|SBB_O74201SR| \
2259 SBB_O74201SRL|SBB_O74410GKL|SBB_O74001L|SBB_O74001))| \
2260 (1-3*(SBB_LGMMSL|SBB_LGMMS|SBB_LKKML|SBB_LKKM|SBB_LGMMSWL|SBB_LGMMSW|SBB_LKKM1|SBB_LKKM1L| \
2261 SBB_LLPSX4127L|SBB_LLPSX4127))|(1-3*(SBB_4_EOS(1|2|3|4)B(|L)))|(1-3*SBB_4_FBK1(|L))| \
2262 (1-3*(SBB_4_(GKLM1|GMS1|GMS2|GSK4B)(|L)))|(1-3*(SBB_4_I1(|L)|GF_INTERFRIGO1|SBB_IBPSS(|1)))| \
2263 (1-3*(SBB_4_Z1(|L)|SBB_GZ_3SR))|(1-3*(BLS_E1M|SBB_EM))
2264
2265 # EP 4 Freight short
2266 $DEF CH4FS=3-4*CH4FR
2267
2268 # EP 4 Freight long
2269 $DEF CH4FL=10-11*(CH4FR)
2270
2271 # EP 4 Passenger Long Distance
2272 $DEF CH4PD1=(<SBB_4_3070L|SBB_4_3070,SBB_3_2270L,SBB_3_2170L,SBB_4_1970L,SBB_8870HL|SBB_8870H, \
2273 SBB_3_2270,SBB_3_2170,SBB_DMSL|SBB_DMS)| \
2274 (<SBB_EUR_BMO~TBR,SBB_EUR_BMOL~TBR,SBB_1971OL,SBB_4_8870OL|SBB_4_8870O,SBB_4_2170OL, \
2275 SBB_4_2170O|SBB_4_5070_019L|SBB_4_5070L|SBB_4_5070|SBB_5071L|SBB_5071)| \
2276 (<2*SBB_4_AM51L,SBB_4_AB51L,SBB_4_8870F,4*SBB_4_BM51L)| \
2277 (<4*SBB_4_BM51,SBB_4_8870FL,SBB_4_AB51,SBB_4_AM51)| \
2278 (<2*SBB_4_5070_019L,SBB_4_RIC2AL,SBB_L_R_WRML,4*SBB_4_BM51OL,SBB_4_DMS51L)| \
2279 (>2*SBB_4_5070,SBB_4_RIC2A,SBB_L_R_WRM,4*SBB_4_BM51O,SBB_4_DMS51)| \
2280 (<SBB_4_DMS51,4*SBB_4_BM51O,SBB_4_RIC2A,2*SBB_4_5070L)| \
2281 (<SBB_RICU_BL,SBB_UMBAU_GBML,SBB_RICU_AB2,SBB_5RICBLS_A7ML,SBB_L_RS_WRML,SBB_RICU_BL,SBB_B20430M, \
2282 SBB_RICU_DL)| \
2283 (<SBB_RICU_D,SBB_B20430ML,SBB_RICU_B,SBB_L_RS_WRM,SBB_5RICBLS_A7M,SBB_RICU_AB2L,SBB_UMBAU_GBM, \
2284 SBB_RICU_B)
2285
2286 # EP 4 Passenger BLS
2287 $DEF CH4PBL=2-3*(BLS_294005(4|0)(|L)),2*(BLS_1740040(|L)|BLS_1740030(|L)), \
2288 2-3*(BLS_294005(4|0)(|L))|(<(2-3*BLS_EW1BG),BLS_EW1ABG,BLS_EW1ABGL,2-3*BLS_EW1BGL)| \
2289 (<BLS_4EW1DM(|L),BLS_4EW1BM,(BLS_EW1GAB1M(|L)|BLS_4EW1AM),2*BLS_4EW1BM)
2290
2291 # EP 4 Passenger SBB semi fast train
2292 $DEF CH4PS=(<2*SBB_4BEW1B,2*SBB_4BEW1A,SBB_4_8833509(|L),2*SBB_4BEW1B,SBB_4B5EW2D)
2293
2294 # EP 4 maintenance
2295 $DEF CH4FM=SBB_XS57630D,SBB_XS57630U,6*((SBB_S6T_85501(|L)|SBB_XS9572100(|L))[O:FR_SCH06(|[M]),,16]), \
2296 SBB_XS45419(|L),SBB_XS57120D[OB:FR17,,15],SBB_XS57120U[OB:FR17,,15]
2297
2298 # EP 5 Passenger Long Distance
2299 $DEF CH5PD1=(<SBB_1073,SBB_1075,SBB_1075P,SBB_1075B,SBB_EW3WR_IC|SBB_5_8833509,SBB_2175B,SBB_2175P, \
2300 2*SBB_2175,2*SBB_2175O,SBB_2173,SBB_EW4D51)| \
2301 (>SBB_1073L,SBB_1075L,SBB_1075PL,SBB_1075BL,SBB_EW3WR_ICL|SBB_5_8833509L,SBB_2175BL,SBB_2175PL, \
2302 2*SBB_2175L,2*SBB_2175OL,SBB_2173L,SBB_EW4D51L)| \
2303 (<2*SBB_5_AM51L,SBB_5_AB51L, \
2304 (SBB_EW4WRL|SBB_EW3_WRBUFL|SBB_8833710L|SBB_EW3WR_MITROPAL|SBB_8833712BL|SBB_EW3WR_BSL| \
2305 SBB_8833712L),4*SBB_5_BM51L)| \
2306 (>2*SBB_5_AM51,SBB_5_AB51, \
2307 (SBB_EW4WR|SBB_EW3_WRBUF|SBB_8833710|SBB_EW3WR_MITROPA|SBB_8833712B|SBB_EW3WR_BS|SBB_8833712), \
2308 4*SBB_5_BM51)| \
2309 (<2*SBB_5_1970NL,2*SBB_5_BCML,(SBB_EW1_RS_MITM|SBB_8833712M|SBB_EW3_WRMIT)(|L),SBB_5_RIC2AL, \
2310 2*SBB_5_RIC2BL,SBB_5_BPM51L)| \
2311 (<SBB_5_BPM51,2*SBB_5_RIC2B,SBB_5_RIC2A,(SBB_EW1_RS_MITM|SBB_8833712M|SBB_EW3_WRMIT)(|L), \
2312 2*SBB_5_BCM,2*SBB_5_1970N)
2313
2314 # EP 5-6 maintenance
2315 $DEF CH5FMA=(7-10*(SBB_XANS74(A|C)(|L)))| \
2316 (8-10*SBB_XAS73(A|B|C|D|E|F|G)(|L)[O:(FR_GRAVEL1|GRAVEL12)(|[M])])| \
2317 (7-9*SBB_5RESM[OB:(SOIL23|GRAVEL8)(|[M]),,16])
2318
2319 # EP 5 Freight mixed short
2320 $DEF CH5FS2=(3-5*(SBB_HBILS_CDOM(I|1G|1F|1I|G|F)(|L)))|(3-5*(SBB_EANOS53761(59|85)T(|L)))| \
2321 (3-5*(SBB_EAS(2|3|4|5|6|7|8|9|10|11|12)(|L)[OB:SCRAP(6|5|4)(|[M]),,32]))| \
2322 (3-5*(SBB_EAOS532(0607|0999|1002|0554|0928|0942|1061)(|L)[OB:SCRAP(6|5|4)(|[M]),,32]))| \
2323 (3-5*(EVS_UACS(2|3)(|L)|SBB_UACS_JURA(2|3)(|L)))|(3-5*(SBB_UACNS_VIGIER(|L)))| \
2324 (3-5*(SBB_6KK|SBB_5HBIS_PLFM)(|L))|(3-5*(SBB_TAGNPPS008(|L)))| \
2325 (3-5*(SBB_6HBIS225(A|AL|B|BL|C|CL|D|DL|E|EL|G|GL|F)))| \
2326 (3-4*(SBB_RSW3900(|HL)(|L)[OB:PIPE(54|58|40|63|59|55|56|57|39),,13]))| \
2327 (3-5*(SBB_HBILLNS(12|13|14|15|16)(|L)))|(3-5*SBB_TAGNPPS0(09|10|11|12)(|L))| \
2328 (3-5*SBB_UAGNPPS(1|9347001|9347008|9347019|9347014|9347011(|L)|1L|9347000L|9347001L|9347008L| \
2329 9347019L|9347011))|(3-5*(SBB_6FSU605(|L)|SBB_FACC_MAKIESS))|(3-5*SBB_5TBISM)| \
2330 (3-5*((SBB_ZS_ALTOLA|SBB_ZS_ASEOL|SBB_ZS_AARAU|SBB_ZS7357790|BAGL_ZS7351920|SBB_MOTOREX)(|L)))| \
2331 (3-5*((SBB_RES1(|L)|SBB_RES3936291)[OB:TARP(15|21)(|[M]),,17]))| \
2332 (3-5*(SBB_FANSU6770(2230|226|210)(|L)[O:GRAVEL(2|7|6)(|[M])]))| \
2333 (3-4*(SBB_HABBIILLNS2891000|SBB_HABBIILLNSS2891004L|SBB_HABBIILLNSS2891004| \
2334 SBB_HABBIILLNSS2891011L|SBB_HABBIILLNSS2891011|SBB_HABBIILLNSS2891016|SBB_HABBIILLNSS2891024L| \
2335 SBB_HABBIILLNSS2891024|SBB_HABBIILLNSS2891033L|SBB_HABBIILLNSS2891033|SBB_HABBIILLNSS2891040| \
2336 SBB_HABBIILLNSS2891041|SBB_HABBIILLNSS2891043L|SBB_HABBIILLNSS2891043|SBB_HABBIILLNSS2891045L| \
2337 SBB_HABBIILLNSS2891045|SBB_HBBILLNS2457341|SBB_HABBIILLNSS2891049L|SBB_HABBIILLNSS2891049| \
2338 AAEC_HABBILLNS2780922))|(3-4*(SBB_5GSM|SBB_1704122|SBB_1200996))| \
2339 (3-5*(SBB_HBBILLNS2461721(|L)|SBB_HBBILLNS2461830(|L)|SBB_HBBILLNS2461974|SBB_HBBILLNS2461788| \
2340 SBB_HBBILLNS2461568|SBB_HBBILLNS2461540L|SBB_HBBILLNS2461540|SBB_HBBILLNS2461821| \
2341 SBB_HBBILLNS2461384|SBB_HBBILLNS2461543(|A)(|L)|SBB_HBBILLNSS2461_CARGO|SBB_HBBINSS2451097(|L)| \
2342 SBB_HBBINSS2451180(|L)|SBB_HBBINSS2451106(|L)|SBB_HBBINSS2451193(|L)|SBB_HBBINSS2451022(|L)| \
2343 SBB_HBBINSS2451149(|L)|SBB_HBBINSS2451148(|L)|SBB_HBBINSS2451133(|L)))
2344
2345 $DEF CH5FS3=(3-5*(SBB_2750000A|SBB_2750500A|SBB_2850500A))|(3-4*SBB_EANOS8[OB:SCRAP(4|5)(|[M]),,33])| \
2346 (3-4*(SBB_EANOS(6|5|4|3|2|1)(|L)[OB:SCRAP(4|5|9|10|8)(|[M]),,31]))| \
2347 (3-4*(SBB_EAS(12|11|10|9|8|7|6|5|4|3)(|L)[OB:SCRAP_(13|12|14|15)(|[M]),,31]))| \
2348 (3-4*(SBB_HB(ILS2350587|ILSVY2370465|ILSVY2370404|ILLNS17|ILLNS18|ISWW2252205|ISWW2252281| \
2349 ILSVY2370423|ISWW2252109|ISWW2252130|ILS2350608|ILS2350735)(|L)))| \
2350 (3-4*(WASC_HABBIILLNSS_POST(1|2)(|L)|DB_HABIS7TW(3|1|2|5|5))| \
2351 (TWAG_HABIIS802743354|TWAG_HABBIINS802846979|DB_HABINS2783076))| \
2352 (3-4*(SBB_FACC_MAKIESS|SBB_47001|SBB_9321053))|(3-4*JURA_UACS0(4|5|6|7|8|9)(|L))| \
2353 (3-4*(SBB_HBISWW225_2200O|SBB_HBILSVY237(|L)|SBB_HBILSVY237T|SBB_HBILS_C2IL|SBB_H2|SBB_H1| \
2354 SBB_HBILS_CDOMG(|L)|SBB_HBILS_C2F))|(2-3*SBB_HABIS_(CONTI|PANGAS))| \
2355 (3-5*(SBB_2750000A|SBB_2750500A|SBB_2850500A))|(3-4*SBB_EANOS8[OB:SCRAP(4|5)(|[M]),,33])| \
2356 (3-4*(SBB_TAGPPS0660G(|L)|SBB_TAGNPPS(|L)|SBB_TAGNPPS005|SBB_TAGNPPS186(|L)|SBB_TAGNPPS186))| \
2357 (3-4*(SBB_5UACOS1(|L)|SBB_4UACOS(|L)|SBB_5UACOS(|L)|SBB_UCS_9121101L|SBB_UCS_9121101))| \
2358 (3-4*(SBB_UCS(9105008|9108001|9104218|_9104244)(|L)))|(3-4*SBB_TPPS3(|L))| \
2359 (3-4*(SBB_EOS01|SBB_EOS02|SBB_EOS03))|(3-4*(SBB_UACS932_HOLCIM(|4|1L|2|3|5|L|2L|3L|4L|5L)))| \
2360 (3-4*(SBB_UACS0(4|1|2|3|4|5)(|L)))|(3-4*SBB_RES(2|3|4)(|L))|(3-5*(SBB_TAGNPPS0(09|10|11|12)(|L)))| \
2361 (3-4*(SBB_TDS0731004|SBB_HABILS2M))|(3-5*(SBB_2750000A|SBB_2750500A|SBB_2850500A))| \
2362 (3-4*SBB_EANOS8[OB:SCRAP(4|5)(|[M]),,33])| \
2363 (3-5*(SBB_SGSB(|L)[O:ROFF_(31L|32|33|33L|34|35L),8,14][O:ROFF_(31L|32|33|33L|34|35L),69,14] \
2364 [O:ROFF_(31L|32|33|33L|34|35L),130,14]))
2365
2366 $DEF CH5FS4=(3-5*(SBB_HBIS_JUBI150|SBB_HBILS_CDOMIL|SBB_HBILSVY237|SBB_HBIS_BLUMCHENL|SBB_HBILS_CDOMI| \
2367 SBB_HBILS_C2FL|SBB_HBILS_C2F|SBB_HBILS_C1FL|SBB_HBILS_C1IL|SBB_HBILS_C3OL|SBB_HBILS_APROZ1O| \
2368 SBB_HBILS_GRAF15|SBB_HBILSVY2370423A|SBB_HBILS_GRAF22|SBB_HBILS2350566|SBB_2457421| \
2369 SBB_HBILS_GRAF41|SBB_HBBILLNS2457_CARGO1|SBB_HBILLNS2|SBB_HBBILLNS2457_OTTO|SBB_HBBILLNS2457601| \
2370 SBB_HBBILLNS2457_SIHL|SBB_HBBILLNS2457_TELA|SBB_2457081|SBB_HBBILLNSS2461|SBB_HBIS_BLUMCHEN| \
2371 SBB_HILRRS2|SBB_HILRRS4|SBB_HBBILLNS2457605AL|SBB_HBBILLNS2461109L|SBB_HBBILLNS2457_HOLZ| \
2372 SBB_2457089|SBB_HBBILLNS2457_CARGO2|SBB_HBBILLNS2457_DATWYLER|SBB_HBBILLNS2457_EPA|SBB_2462007| \
2373 SBB_HBILLNS6|SBB_HBBILLNS2457094|SBB_HBBILLNS2457202|SBB_HBBILLNS2457242|SBB_HBBILLNS2457257| \
2374 SBB_HBBILLNS2457362|SBB_HILRRS6|SBB_HILRRS5L|SBB_HILRRS3L|SBB_HILRRS(|L)|SBB_HILRRS1L))| \
2375 (3-4*SBB_HB(ILS2350587|ILSVY2370465|ILSVY2370404|ILLNS17|ILLNS18|ISWW2252205|ISWW2252281| \
2376 ISWW2252303|IS225O|IS2250285|IS2250170|ILS2350552|ILS2350573|ILSVY2370227|ILSVY2370202| \
2377 ILSVY2370204|ILSVY2370423|ISWW2252109|ISWW2252130|ILS2350608|ILS2350735|BILLNS2457016| \
2378 BILLNS2457028|BILLNS2457124|BILLNS2457275|BILLNS2457335|BILLNS2457415|BILLNS2457446|BILLNS2457455| \
2379 BILLNS2457507|BILLNS2457550|BILLNS2457595|BILLNS2457360|BILLNS2457609|BILLNS2457613|BILLNS2457080| \
2380 BILLNS2457608|BILLNS2457605|BILLNS2459373|BILLNS2459|BILLNS2459408|BILLNS2459406|BILLNS2459380| \
2381 BILLNS2459397|BILLNS2459330|BILLSUY2471024|BILLNS2457512A|BILLNS2457119|IS2250498|IS2250500| \
2382 IS2250870|IS2251944)(|L))| \
2383 (3-4*(SBB_HABBIILLNS2891000|SBB_HABBIILLNSS2891004L|SBB_HABBIILLNSS2891004| \
2384 SBB_HABBIILLNSS2891011L|SBB_HABBIILLNSS2891011|SBB_HABBIILLNSS2891016|SBB_HABBIILLNSS2891024L| \
2385 SBB_HABBIILLNSS2891024|SBB_HABBIILLNSS2891033L|SBB_HABBIILLNSS2891033|SBB_HABBIILLNSS2891040| \
2386 SBB_HABBIILLNSS2891041|SBB_HABBIILLNSS2891043L|SBB_HABBIILLNSS2891043|SBB_HABBIILLNSS2891045L| \
2387 SBB_HABBIILLNSS2891045|SBB_HBBILLNS2457341|SBB_HABBIILLNSS2891049L|SBB_HABBIILLNSS2891049| \
2388 AAEC_HABBILLNS2780922))| \
2389 (3-5*(SBB_HBBILLNS2461721(|L)|SBB_HBBILLNS2461830(|L)|SBB_HBBILLNS2461974|SBB_HBBILLNS2461788| \
2390 SBB_HBBILLNS2461568|SBB_HBBILLNS2461540L|SBB_HBBILLNS2461540|SBB_HBBILLNS2461821| \
2391 SBB_HBBILLNS2461384|SBB_HBBILLNS2461543(|A)(|L)|SBB_HBBILLNSS2461_CARGO|SBB_HBBINSS2451097(|L)| \
2392 SBB_HBBINSS2451180(|L)|SBB_HBBINSS2451106(|L)|SBB_HBBINSS2451193(|L)|SBB_HBBINSS2451022(|L)| \
2393 SBB_HBBINSS2451149(|L)|SBB_HBBINSS2451148(|L)|SBB_HBBINSS2451133(|L)))
2394
2395 $DEF CH5FS5=(4-5*SBB_UACS0(4|1|2|3|4|5|6|7|8)(|L))|(4-5*(SBB_EAOS5321061|SBB_EAOS12)(|L))| \
2396 (4-5*SBB_TAGNPPS0664(025|038|115|109|166|178|198)(|L))| \
2397 (4-5*SBB_SNPS(|L)[OB:WOOD(129|130|128|46)(|[M]),,13])
2398 $DEF CH5FS1=CH5FS(2|3|4|5)
2399
2400 # EP 5-6 Freight long
2401 $DEF CH5FL1=5-6*CH5FS1
2402
2403 # EP 5-6 Freight with advertising cars
2404 $DEF Z_CH_E5_GWerbe=15*(GB13POST~SBB|SBB_HBILS_GRAF1|SBB_HBILS_GRAF2|SBB_HBILS_GRAF3|SBB_HBILS_GRAF4| \
2405 SBB_HBILS_GRAF5|SBB_HBILS_GRAF6|SBB_HBILS_GRAF7|SBB_HBILS_GRAF8|SBB_HBILS_GRAF9|SBB_HBILS_GRAF10| \
2406 SBB_HBILS_GRAF11|SBB_HBILS_GRAF12|SBB_HBILS_GRAF13|SBB_HBILS_GRAF14|SBB_HBILS_GRAF16| \
2407 SBB_HBILS_GRAF17|SBB_HBILS_GRAF18|SBB_HBILS_GRAF19|SBB_HBILS_GRAF20|SBB_HBILS_GRAF21| \
2408 SBB_HBILS_GRAF23|SBB_HBILS_GRAF24|SBB_HBILS_GRAF25|SBB_HBILS_GRAF26|SBB_HBILS_GRAF27| \
2409 SBB_HBILS_GRAF28|SBB_HBILS_GRAF29|SBB_HBILS_GRAF30|SBB_HBILS_GRAF31|SBB_HBILS_GRAF32| \
2410 SBB_HBILS_GRAF33|SBB_HBILS_GRAF34|SBB_HBILS_GRAF35|SBB_HBILS_GRAF36|SBB_HBILS_GRAF37| \
2411 SBB_HBILS_GRAF38|SBB_HBILS_GRAF39|SBB_HBILS_GRAF40|SBB_HBILS_GRAF42|SBB_HBILS_GRAF43| \
2412 SBB_HBILS_GRAF44|SBB_HBILS_GRAF45|SBB_HBILS_GRAF46|SBB_HBILS_GRAF47|SBB_HBILS_GRAF48| \
2413 SBB_HBILS_GRAF49|SBB_HBILS_GRAF50|SBB_HBILS_GRAF51|SBB_HBILS_GRAF52|SBB_HBILS_GRAF53| \
2414 SBB_HBILS_GRAF54|SBB_HBILS_GRAF55|SBB_HBILS_GRAF56|SBB_HBILS_GRAF57|SBB_HBILS_GRAF58| \
2415 SBB_HBILS_GRAF59|SBB_HBILS_AKISEG|SBB_HBILS_BAK|SBB_HBILS_DICK|SBB_HBILS_INU|SBB_HBILS_KMAL| \
2416 SBB_HBILS_MOM|SBB_HBILS_NASK|SBB_HBILS_NOS|SBB_HBILS_STAR|SBB_HBIS_PHISIK|SBB_HBIS_OKAS| \
2417 SBB_HBIS_CLOY|SBB_HBILS_UETIKER1O|SBB_HBILS_UETIKER2L|SBB_HBILS_UETIKER2|SBB_HBILS_UETIKER3L| \
2418 SBB_HBILS_UETIKER3|SBB_HBILS_WIR_BEWEGENL|SBB_HBILS_WIR_BEWEGEN|SBB_HBINS5|SBB_HBILS_SIHLWL| \
2419 SBB_HBILS_SIHLW|SBB_HBILS_SIHLRL|SBB_HBILS_SIHLR|SBB_HBILS_UETIKER1L|SBB_HBILS_UETIKER1| \
2420 GB13SIE2~SA|SBB_HBILS_RICHINA1O|SBB_HBILS_RICHINA2L|SBB_HBILS_RICHINA2|SBB_HBINS_RICHINA| \
2421 SBB_HBILS_ROLANDL|SBB_HBILS_ROLAND|SBB_HBILS_SCHINDLERL|SBB_HBILS_SCHINDLER|GB13SIE1~SA| \
2422 SBB_HBILS_RICHINA1L|SBB_HBILS_RICHINA1|SBB_HBILS_PTTL|SBB_HBILS_PTT|SBB_HBILS_POSTL| \
2423 SBB_HBILS_POST|SBB_HBILS_RAILBOUTIQUEL|SBB_HBILS_RAILBOUTIQUE|SBB_HBILS_RAILB|SBB_HBILS_PERLEN1O| \
2424 SBB_HBILS_DENNER1L|SBB_HBILS_DENNER1|SBB_HBILS_DENNER2L|SBB_HBILS_DENNER2|SBB_HBILS_DENNER3L| \
2425 SBB_HBILS_DENNER3|SBB_HBINS14|SBB_HBIS_HERO|SBB_HABIS_HERO|SBB_HBILS_KALKSAND1L| \
2426 SBB_HBILS_KALKSAND1|SBB_HBILS_KALKSAND2L|SBB_HBILS_KALKSAND2|SBB_HBIS2|SBB_HBIS_LISTAL| \
2427 SBB_HBIS_LISTA|SBB_HBILS_PERLEN1L|SBB_HBILS_PERLEN1|SBB_HBILS_DELACHERL|SBB_HBILS_BGUSSEL| \
2428 SBB_HBILS_BGUSSE|GB13CRES~SBB|SBB_HBIS_AJAX|SBB_HBILS_AJAXL|SBB_HBILS_AJAX| \
2429 SBB_HBILS_BAHNFRUHLINGL|SBB_HBILS_BAHNFRUHLING|SBB_HBILS_BGUSSBL|SBB_HBILS_BGUSSB| \
2430 SBB_HBILS_BGUSSSL|SBB_HBILS_BGUSSS|SBB_HBILS_BGUSSAL|SBB_HBILS_AARGL|SBB_HBILS_AARG| \
2431 SBB_HBILS_AARGAU200|SBB_HBILS_KNORR1L|SBB_HBILS_KNORR1|SBB_HBIS3|SBB_HBILS_KNORR2L| \
2432 SBB_HBILS_KNORR2|SBB_HBILS_KNORR3L|SBB_HBILS_KNORR3|SBB_HBILS_KNORR|SBB_HBILS_MAGGI1L| \
2433 SBB_HBILS_MAGGI1|SBB_HBINS4|SBB_HBILS_MAGGI2L|SBB_HBILS_MAGGI2|SBB_HBILS_LINDT1L|SBB_HBILS_LINDT1| \
2434 SBB_HBILS_LINDT2L|SBB_HBILS_LINDT2|SBB_HBILS_OVA_URHELL|SBB_HBILS_OVA_URHEL| \
2435 SBB_HBILS_OVA_URTRUB_LI|SBB_HBILS_OVA_URTRUB|SBB_HBILS_ROLAND1L|SBB_HBILS_ROLAND1| \
2436 SBB_HBILS_ROLAND2L|SBB_HBILS_ROLAND2|SBB_HBILS_USEGOFL|SBB_HBILS_USEGOF|SBB_HBILS_USEGOGL| \
2437 SBB_HBILS_USEGOG|SBB_HBINS_USEGO|SBB_HBILS_VOLGL|SBB_HBILS_VOLG|SBB_HBILS_COOPDL|SBB_HBILS_COOPD| \
2438 SBB_HBILS_COOPDOL|SBB_HBILS_COOPDO|SBB_HBILS_COOPFL|SBB_HBILS_COOPF|SBB_HBILS_COOPFOL| \
2439 SBB_HBILS_COOPFO|SBB_HBILS_COOP1L|SBB_HBILS_COOP|SBB_HBINS_COOP|SBB_HBINS11|SBB_HBILS_FRISCHL| \
2440 SBB_HBILS_FRISCH|SBB_HBILS_FRISCHOL|SBB_HBILS_FRISCHO|SBB_HBILS_COOPAL|SBB_HBILS_COOPA| \
2441 SBB_HBILS_COOPBL|SBB_HBILS_COOPB|SBB_HBILS_COOPCL|SBB_HBILS_COOPC|SBB_HBILS_COOPEL| \
2442 SBB_HBILS_COOPE|SBB_HBILS_COOPNL|SBB_HBILS_COOPN|SBB_HBILS_ARNIL|SBB_HBILS_ARNI|SBB_HBILS_ARNIOL| \
2443 SBB_HBILS_ARNIO|SBB_HBILS_GALAL|SBB_HBILS_GALA|SBB_HBILS_GALAOL|SBB_HBILS_GALAO|SBB_HBILS_COOPML| \
2444 SBB_HBILS_COOPM|SBB_HBILS_COOPM1L|SBB_HBILS_COOPM1|SBB_HBILS_PICANTAL|SBB_HBILS_PICANTA| \
2445 SBB_HBILS_PICANTAOL|SBB_HBILS_PICANTAO|SBB_HBILS_MALTL|SBB_HBILS_MALT|SBB_HBILS_MALTOL| \
2446 SBB_HBILS_MALTO|SBB_HBILS_QUICKL|SBB_HBILS_QUICK|SBB_HBILS_QUICKOL|SBB_HBILS_QUICKO| \
2447 SBB_HBILS_APROZ1L|SBB_HBILS_APROZ1|SBB_HBILS_APROZ1OL|SBB_HBILS_APROZ1O|SBB_HBILS_APROZ2L| \
2448 SBB_HBILS_APROZ2|SBB_HBILS_APROZ2OL|SBB_HBILS_APROZ2O|SBB_HBILS_APROZ3L|SBB_HBILS_APROZ3| \
2449 SBB_HBILS_APROZ3OL|SBB_HBILS_APROZ3O|SBB_HBINS12|SBB_HBILS_BICUITSL|SBB_HBILS_BICUITS| \
2450 SBB_HBILS_BICUITSOL|SBB_HBILS_BICUITSO|SBB_HBILS_BISCHOFSZELL1L|SBB_HBILS_BISCHOFSZELL1| \
2451 SBB_HBILS_BISCHOFSZELL1OL|SBB_HBILS_BISCHOFSZELL1O|SBB_HBILS_BISCHOFSZELL2L| \
2452 SBB_HBILS_BISCHOFSZELL2|SBB_HBILS_BISCHOFSZELL2OL|SBB_HBILS_BISCHOFSZELL2O| \
2453 SBB_HBILS_BISCHOFSZELL3L|SBB_HBILS_BISCHOFSZELL3|SBB_HBILS_BISCHOFSZELL3OL| \
2454 SBB_HBILS_BISCHOFSZELL3O|SBB_HBILS_MIGROS2|SBB_HBILS_FREYL|SBB_HBILS_FREY|SBB_HBILS_MIGROS3| \
2455 SBB_HBINS13|SBB_HBILS_MIGROS4|SBB_HBINS_MIGROS|SBB_HBILS_FARMER1L|SBB_HBILS_FARMER1| \
2456 SBB_HBILS_FARMER2L|SBB_HBILS_FARMER2|SBB_HBILS_MARGARINEL|SBB_HBILS_MARGARINE| \
2457 SBB_HBILS_MARGARINEOL|SBB_HBILS_MARGARINEO|SBB_HBILS_MIGROS1|SBB_HBILS_MIDOR2L|SBB_HBILS_MIDOR2| \
2458 SBB_HBILS_MIDOR2OL|SBB_HBILS_MIDOR2O|SBB_HBILS_MIDOR75L|SBB_HBILS_MIDOR75|SBB_HBILS_MIDOR75OL| \
2459 SBB_HBILS_MIDOR75O|SBB_HBILS_MONTEG1L|SBB_HBILS_MONTEG1|SBB_HBILS_MONTEG2L|SBB_HBILS_MONTEG2| \
2460 SBB_HBILS_TOTALL|SBB_HBILS_TOTAL|SBB_HBILS_TOTALOL|SBB_HBILS_TOTALO|SBB_HBILS_EPAL|SBB_HBILS_EPA| \
2461 SBB_HBILS_HEIDILANDL|SBB_HBILS_HEIDILAND|SBB_HBILS_HERO1L|SBB_HBILS_HERO1|SBB_HBILS_HERO2L| \
2462 SBB_HBILS_HERO2|SBB_HBILS_HERO3L|SBB_HBILS_HERO3|SBB_HBILS_JELMOLIL|SBB_HBILS_JELMOLI| \
2463 SBB_HBILS_JURASELL|SBB_HBILS_JURASEL|SBB_HBILS_WALLISSER2|SBB_HBILS_WARTECK1L|SBB_HBILS_WARTECK1| \
2464 SBB_HBINS_WARTECK|SBB_HBILS_WARTECK2L|SBB_HBILS_WARTECK2|SBB_HBILS_WARTECK3L|SBB_HBILS_WARTECK3| \
2465 SBB_HBILS_EICHHOFBL|SBB_HBILS_EICHHOFB|SBB_HBILS_EICHHOF|SBB_HBILS_EICHHOFNL|SBB_HBILS_EICHHOFN| \
2466 SBB_HBINS7|SBB_HBILS_EICHHOF1L|SBB_HBILS_EICHHOF1|SBB_HBILS_EICHHOF2L|SBB_HBILS_EICHHOF2| \
2467 SBB_HBINS10|SBB_HBILS_GURTENBIER1L|SBB_HBILS_GURTENBIER1|SBB_HBILS_GURTENBIER2L| \
2468 SBB_HBILS_VY382GOTTHARDL|SBB_HBILS_VY382GOTTHARD|SBB_HBILS_VY458GOTTHARDL|SBB_HBILS_VY458GOTTHARD| \
2469 SBB_HBILS_GURTENBIER2|SBB_HBILS_HALDENGUTL|SBB_HBILS_HALDENGUT|SBB_G8|SBB_HBINS_HALDENGUT| \
2470 SBB_HBILS_HURLIMANNL|SBB_HBILS_HURLIMANN|SBB_HBILS_HURLIMANN1L|SBB_HBILS_HURLIMANN1| \
2471 SBB_HBINS_KARBACHER|SBB_HBILS_LOWENBRAUL|SBB_HBILS_LOWENBRAU|SBB_HBILS_LOWENBRAU2L| \
2472 SBB_HBILS_LOWENBRAU2|SBB_HBILS_LOWENBRAU3L|SBB_HBILS_LOWENBRAU3|SBB_HBILS_SCHLOSSGOLDL| \
2473 SBB_HBILS_SCHLOSSGOLD|SBB_HBILS_WALLISSERL|SBB_HBILS_WALLISSER|SBB_HBILS_WALLISSER2L| \
2474 SBB_HBILS_PEPSI1L|SBB_HBILS_PEPSI1|SBB_HBINS3|SBB_HBILS_PEPSI2L|SBB_HBILS_PEPSI2| \
2475 SBB_HBILS_RIVELLA_ROT_BLAU_LI|SBB_HBILS_RIVELLA|SBB_G10|SBB_HBIS_RIVELLA|SBB_HBILS_RIVELLA1L| \
2476 SBB_HBILS_RIVELLA1|SBB_HBILS_RIVELLA2L|SBB_HBILS_RIVELLA2|SBB_HBILS_SCHWEPPESL~TBR| \
2477 SBB_HBILS_SCHWEPPES~TBR|SBB_HBILS_SCHWEPPES~MF|SBB_HBINS1|SBB_HBILS_SINALCOL|SBB_HBILS_SINALCO| \
2478 SBB_HBILS_PASSUGGER1L|SBB_HBILS_PASSUGGER1|SBB_HBILS_PASSUGGER2L|SBB_HBILS_PASSUGGER2| \
2479 SBB_HBILS_RHAZUNSER1L|SBB_HBILS_RHAZUNSER1|SBB_HBILS_RHAZUNSER2L|SBB_HBILS_RHAZUNSER2| \
2480 SBB_HBILS_VALSER1L|SBB_HBILS_VALSER1|SBB_HBILS_VALSER2L|SBB_HBILS_VALSER2|SBB_HBILS_VALSER| \
2481 SBB_HBILS_VALSER3L|SBB_HBILS_VALSER3|SBB_HBILS_VALSER4L|SBB_HBILS_VALSER4|SBB_HBILS_VMBL| \
2482 SBB_HBILS_VMB|SBB_HBILS_COLAL|SBB_HBILS_COLA|SBB_HBINS2|SBB_HBILS_ELMERL~TBR|SBB_HBILS_ELMER~TBR| \
2483 SBB_HBILS_ELMER~MF|SBB_HBIS_GRANINI|SBB_HBILS_ORANGINA1L|SBB_HBILS_ORANGINA1|SBB_HBILS_ORANGINA2L| \
2484 SBB_HBILS_ORANGINA2|SBB_HBINS6|SBB_HBILS_ORANGINA|SBB_HBILS_ORANGINA_ROCOL| \
2485 SBB_HBILS_ORANGINA_ROCO|SBB_HBILS_OVOMALTINE1L|SBB_HBILS_OVOMALTINE1|SBB_HBILS_OVOMALTINEL~TBR| \
2486 SBB_HBILS_OVOMALTINE~TBR|SBB_HBILS_OVOMALTINE~MF|SBB_HBILS_C3O|SBB_HBILS_FONTESSA1L| \
2487 SBB_HBILS_FONTESSA1|SBB_HBILS_FONTESSA1OL|SBB_HBILS_FONTESSA1O|SBB_HBILS_FONTESSA2L| \
2488 SBB_HBILS_FONTESSA2|SBB_HBILS_FONTESSA2OL|SBB_HBILS_FONTESSA2O|SBB_HBILS_HENNIEZ1L| \
2489 SBB_HBILS_HENNIEZ1|SBB_HBILS_HENNIEZ2L|SBB_HBILS_HENNIEZ2|SBB_HBILS_C1I|SBB_HBILS_C2I| \
2490 SBB_HBILS_C1GL|SBB_HBILS_CDOMFL|SBB_HBILS_CDOMF|SBB_HBILS_CDOM1GL|SBB_HBILS_CDOM1G| \
2491 SBB_HBILS_CDOM1FL|SBB_HBILS_CDOM1F|SBB_HBILS_CDOM1IL|SBB_HBILS_CDOM1I|SBB_HBILS_C2GL| \
2492 SBB_HBILS_C2G|SBB_HBILS235L|SBB_HBILS235WL|SBB_HBIS225L|SBB_HBIS225|SBB_HBISWW225_2200)
2493
2494 # EP 6 Passenger IC
2495
2496 $DEF CH6PIC=(<(3*(SBB_APM1|SBB_1090REFITL|SBB_1090REFIT)),SBB_EW4WRVRESTL|SBB_EW4WRVREST, \
2497 6*(SBB_2090REFITL|SBB_2090REFIT|SBB_BPM2L|SBB_BPM2|SBB_BPM1L),SBB_BPM3)| \
2498 (<(2*SBBECAA~MF),SBB_1090EXCISL|SBB_1090EXCIS|SBBECBL~MF,SBB_EW3_BRM(|L)|SBB_EW4WRVREST, \
2499 SBB_2090309DISL,5*(SBB_2090NCISL|SBB_2090NCIS))| \
2500 (<(3*(SBB_1090EXCISSL|SBB_1090EXCISS)),SBB_EW4WRVLEBUFFETL|SBB_EW4WRVLEBUFFET, \
2501 6*(SBB_2090312L|SBB_2090312))
2502
2503 # EP 6 Freight with cereal transport
2504 $DEF CH6FC=11-14*(SNCF_CERG_OVO(|L)|SNCF_CERG_CTC6(|L)|SNCF_CERG_GRA1(|L)|SNCF_CERG_CTC(2|3|4|5)(|L)| \
2505 SNCF_CERG_TMF(|L)|SNCF_CERG_TRA(1|2)(|L)|SNCF_CERG_SHGT2(|L)| \
2506 SNCF_CERG96_(AC|CAR|CIWC|CTC|CTC2|LOG1|GRA2|OVO|OVO2|TMF|W|W2)(|L)|SNCF_FG132_(CTC3|SHGT2)(|L)| \
2507 SNCF_CER84R_FR1(|L)|SNCF_CERP96H_LOG(|L)|SNCF_CERP_(M|CCA|LOG1)(|L)|SNCF_CERX_KAR(|L))
2508
2509 # EP 6 Freight Truck transport
2510 $DEF CH6FR=BLS_HUPAC(|L), \
2511 (<SBB_5SAADKMS(A|B)L[OB:!TRUCK_ITL,,5],18*SBB_5_SAADKMSM(|L)[OB:!TRUCK_ITL,,5], \
2512 SBB_5_SAADKMSA|SBB_5SAADKMSB[OB:!TRUCK_ITL,,5])| \
2513 (<SBB_5SAADKMS(A|B)L[OB:!TRUCK_IT,,5],18*SBB_5_SAADKMSM(|L)[OB:!TRUCK_IT,,5], \
2514 SBB_5_SAADKMSA|SBB_5SAADKMSB[OB:!TRUCK_IT,,5])
2515
2516 # EP 6 Freight Container
2517 $DEF CH6FCO=12*(SBB_SGNS(4|5)[O:MIGROS_REF(3|2L|1|1L),8,12][O:MIGROS_REF(3|2L|1|1L),113,12]| \
2518 SBB_SGNS455L[N:#B,B13] \
2519 [O:CA_PTT(1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25)(|L),24,12] \
2520 [O:CA_PTT(1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25)(|L),100,12]| \
2521 SBB_SGSB(|L)[O:ROFF_0(1|2|3|4|6)(|L),9,13][O:ROFF_0(1|2|3|4|6)(|L),70,13] \
2522 [O:ROFF_0(1|2|3|4|6)(|L),131,13]|AAE_SGGRS1[O:C40A,7,12][O:C40A,140,12]| \
2523 CBR_SGGMRSS1[O:C40A,10,12][O:C40A,159,12]|(2*SBB_LGNS4435000[O:C40A,,12]))
2524
2525 # EP 6 Freight STEAL
2526 $DEF CH6FS=(15-18*ERR_SHIMMNS(12|13)(|L))| \
2527 (15-18*SBB_SHIMMS(17|17L|18L|02|02L|04L|05L|06L|07L|08L|09L|10L|11L|12L|13L|14L|15L|16L|04|05|06| \
2528 07|08|09|10|11|12|13|14))|(15-18*SBB_SHIMMNS(01|02|03|04|05|06|07|08|09|10|11|12|13|14|15)(|L))
2529 # EP 6 Freight short
2530 $DEF CH6FSH=5-8*(SBB_EAOS5321061|SBB_EAOS5321061L|SBB_EAOS5320928|SBB_EAOS5320942|SBB_2750500GR2| \
2531 G_014|DB_HABIS7TW4|TWAG_HABBIINS802846979|TWAG_HABBIINS802742071)
2532 #----------------------------------------------------------------------------------------------------
2533 #
2534 # Austria
2535
2536 # EP 1 Passenger
2537 $DEF A1P=CSD_FY5_0902,KKSTB_DE,3-4*KKSTB_C3_EXKFNB,2-3*KKSTB_AB3_EXKFNB|CSD_BEY2_1980(|L), \
2538 3-4*KKSTB_C3_EXKFNB
2539
2540 # EP 1 Freight shunting
2541 $DEF A1FR=(2-3*(KKSTB_1_LXVII(|H|HL)|KKSTB_1_LIVH(|L)|KKSTB_1_LMB(|L)|KKSTB_1_G1B(|H|HL)))| \
2542 (2-3*(KKSTB_1_LXV(|H|HL)|KKSTB_1_LXI|KKSTB_1_LXIII(|H|HL)|KKSTB_1_LIVB(|L)))| \
2543 (2-3*(KKSTB_1_LXXI(|B|BL)|KKSTB_1_LI(|B|BL)|KKSTB_1_LIL(|B|BL)|KKSTB_1_LIII(|B|BL)))| \
2544 (2-3*(KKSTB_1_GG(E1B|E1BH|E1BHL|1BHL|1BH|1B)))|(2-3*(KKSTB_1_GE(1BHL|1BH|1BH|1B|IAH|IAHL|IA)))| \
2545 (1-2*KKSTB_1_GA(|L))|(2-3*KKSTB_1_LSTXI(|B|BL)[OB:COW(1|2|2L|3),7,12][OB:COW(1|2|2L|3),31,12])
2546
2547 # EP 1 Freight long
2548 $DEF A1FL=CSD_D6_05(|L)[NB:B,BA8],8*A1FR
2549
2550 # EP 2 Freight shunting
2551 $DEF A2FR=(2-3*(SBB_1K2_30113|SBB_1K2_30113|SBB_1K2_40101))|(2-3*CSD_UZ5_859)|(2-3*DRG_O21(|H)(|L))| \
2552 (2-3*(NS_44001GLYN|NS_95001GN2E|NS_174501E|NS_19001))| \
2553 (2-3*BBO_2_JKE(|H|HL|B|BL|R1|R1L|R1HL|R1H|R1B|R1BL|L1|L1L|L1H|L1HL|L1B|L1BL|L1R1|L1R1L|L1R1H| \
2554 L1R1HL|L1R1B|L1R1BL|E|EH|EHL|EB|EBL|ER1|ER1H|ER1HL|ER1B|ER1BL|L) \
2555 [OB:FR_CARRIAGE1|FR_HAYRAKE|FR_HAYRAKE2|BOX41|BOX44|BOX_FRICHS|BOX1|BOX6|MARBLE2|BOILER4| \
2556 FR_CARRIAGE1,,12])
2557
2558 # EP 2 Freight long
2559 $DEF A2FL=CSD_D6_05(|L)[NB:B,BA8],8*A2FR
2560
2561 # EP 3a 1949-1956 Passenger regional
2562 $DEF A3PL1=(<6-8*(OBB_2AXN28_3A(|L)|OBB_2AXN28(|N)_3BR(|L)|OBB_BI37710F(|L)|OBB_BI39200F(|L)| \
2563 OBB_BI39000FR(|L)|OBB_BI35200FR(|L)),OBB_DGHO)
2564
2565 # EP 3b 1958-1960 Passenger long distance
2566 $DEF A3PL3=<OBB_D95103GM[B:90,13,10,5],2*OBB_3B_B4IPUHO330(0|3)0(|L)[NT:P],2*OBB_3B3150, \
2567 3*OBB_3B311(2|0)0
2568
2569 # EP 3c 1960-1967 Passenger long distance 1 Schlieren
2570 $DEF A3PL2=(<OBB_3C3_BDPO8235,2*OBB_3C3_BPO2935(|L),OBB_BR8514(|L),OBB_3C1_ABPO3735, \
2571 OBB_3C1_APO1735(|L),OBB_3C3_BPO2935(|L))
2572
2573 # EP 3b 1957-1967 Passenger long distance 2 BBOE-cars
2574 $DEF A3PD=(<OBB_SPD1(|L),2-3*(OBB_N28B(0|1|2)(|L)|OBB_SP11),1-2*OBB_N28A1(|L),OBB_N28AB1, \
2575 3-4*(OBB_N28B(0|1|2)(|L)|OBB_SP11))
2576
2577 # EP 3b 1957-1967 Passenger regional 2-axle
2578 $DEF A3PR2=(<OBB_BDI47900F,OBB_BI39700FL,OBB_BI38200F,OBB_2AXN28_3BRL)| \
2579 (<OBB_BI38200FL,BBO_2AXN28L,OBB_BI39700F,OBB_BI37710FL,OBB_SP2,OBB_SP1,OBB_DGHO)
2580
2581 # EP 3 Freight other
2582 # open car
2583 $DEF A3O=OBB_3_OM751(|E)(|L)[#E!OB:AG80,*46,28]|OBB_3_OM743U(|L)[#E!OB:AG80,*50,28]| \
2584 OBB_3_OM754(5|7)(|E)(|L)[#E!OB:AG80,*46,28]
2585 # open car, end of the train (brake house)
2586 $DEF A3OE=OBB_3_OM751(H|EH|EB|B)[#E!OB:AG80,*46,28]|OBB_3_OM751(H|EH|EB|B)L[#E!OB:AG80,*50,28]| \
2587 OBB_3_OM743(H|B)[#E!OB:AG80,*58,28]|OBB_3_OM743(H|B)L[#E!OB:AG80,*58,28]
2588
2589 # box car
2590 $DEF A3G=OBB_3_(4:G125V(1|2)|10:(GM143|GM144|GMDS140)(|H|B)|GDS135H)(|L)
2591 # box car, end of the train (brake house)
2592 $DEF A3GE=OBB_3_(GM143|GM144|GMDS140|GDS135)H($DIR(,L))
2593
2594 $DEF FR3Z=CSD_R8(|A|B|C)(|[!L])|DR_4A_(Z8020|Z8021)(|L)|DR_ZH8020(|L)|SBB_EGLIN3|SBB_EGLIN5
2595
2596 $DEF A3FO=3-15*A3O,A3OE
2597 $DEF A3FG=3-15*A3G,A3GE
2598 $DEF A3FX=A3O|A3G,3-30*A3O|A3G|FR3Z,A3OE|A3GE
2599
2600 $DEF A3FS=1-4*A3O|A3G|FR3Z
2601 $DEF A3F=(|[!E])A3FO|A3FG|5:A3FX
2602
2603 # EP 3 Freight shunting
2604 $DEF A3FS1=(2-4*OBB_1099K|OBB_MILCH_WIEN|OBB_MILCH_SCHARDINGER|SBB_STANDARDAG)| \
2605 (2-4*(OBB_BRAUERAG|OBB_HIRTER_MARZEN|OBB_STIEGL3)(|L))| \
2606 (2-4*OBB_3(G163|_GMMS180E|_GMMS180EH|GLMMS283)(|L))| \
2607 (2-4*G_008|DB_EKW49L|DB_ZAU_VTGL|DB_ZAU_VTG|DB_EKW49)| \
2608 (2-4*OBB_3_G125V1L|OBB_3_G125V1|OBB_3_GM143|OBB_3_GM144|OBB_3_GMDS140HL|OBB_3_GMDS140H)| \
2609 (2-4*OBB_3_OM743HL|OBB_3_OM751BL|OBB_3_OM751E|OBB_3_OM751EH|OBB_3_OM7545EL|OBB_3_OM7547EL)| \
2610 (2-4*OBB_3_OM7547[O:FR_REPA2,,28]|OBB_3_OM7547L[O:#FR_REPA2,,28]|OBB_3_OM7547EL[O:FR_BRAM,,28]| \
2611 OBB_3_OM7547E[O:FR_BRAM,,28])|(2-4*(OBB_BRAUERAG|OBB_HIRTER_MARZEN|OBB_STIEGL3)(|L))| \
2612 (2-4*OBB_GABS1810|OBB_GABS1810N|OBB_GABS181|OBB_3_G125V2L|OBB_3_GM143L|OBB_3_GM143BL|OBB_3_GM143B| \
2613 OBB_3_GM144H|OBB_3_GM144BL|OBB_3_GMDS140|OBB_3_GDS135HL)| \
2614 (2-4*OBB_3_OM743BL[O:FR_KO21,,28]|OBB_3_OM751HL[O:#FR_KO21,,28]|OBB_3_OM751B[O:FR_KO20,,28])| \
2615 (2-4*OBB_3_OL(R|RHL|RH|RBL|RB|R_R1|R_R1HL|R_R1H|R_R1BL|R_R1B|L|HL|H|BL|B|_R1L|_R1|_R1HL|_R1H| \
2616 _R1BL|_R1B|_L1L|_L1|_L1HL|_L1H|_L1BL|_L1B|_L1R1L|_L1R1|_L1R1HL|_L1R1H|_L1R1BL|_L1R1B)) \
2617 [OB:(BOX16|BOX28|BOX1|BOX4|BOX6|BOX33),,12]| \
2618 (2-4*OBB_3_OL(|L|H|HL|B|BL|_R1|_R1L|_R1HL|_R1H|_R1B|_R1BL|_L1|_L1L|_L1H|_L1HL|_L1B|_L1BL|_L1R1| \
2619 _L1R1L|_L1R1H|_L1R1HL|_L1R1B|_L1R1BL) \
2620 [OB:FR_CARRIAGE1|FR_HAYRAKE|FR_HAYRAKE2|BOX41|BOX44|BOX_FRICHS|BOX1|BOX6|MARBLE2|BOILER4| \
2621 FR_CARRIAGE1,,12])|(2-4*OBB_3_OM751E[O:#FR_KO22,,28]|OBB_3_OM751EB[O:#FR_KO22,,28])| \
2622 (2-4*OBB_3_GM144L,OBB_GBS151BL,OBB_GBS151,OBB_3_OM7547E)|(2-4*A3G(|E))|(2-4*A3O(|E))
2623
2624 # EP 3 Freight short
2625 $DEF Z_AT_E3_G1=5*A3FS1
2626
2627 # EP 3 Freight long
2628 $DEF A3FL=10*A3FS1
2629
2630 # EP 4 Freight shunting
2631 $DEF A4FS=(3-4*(OBB_EAOS_(Y25|MD)[O:SCRAP(5|6)]|OBB_EANOS_(Y25|MD)[O:SCRAP(8|10)]))| \
2632 (3-4*(OBB_GBS151(D|I)|OBB_GABS181(|0|0N|A|B|AB)|OBB_GBS151(|A|W|E|BL)|OBB_GBS150(|A)|OBB_GBSM))| \
2633 (3-4*(OBB_SHIMMS_BL|OBB_SHIMMS_B))|(3-4*OBB_4GS(1200A1H|1200B1H|9432)(|L))| \
2634 (3-4*(OBB_HBINS_STIEGL|OBB_247HBBILLNS|OBB_HIRRS292(FT|A|B|SO)))| \
2635 (3-4*(OBB_KSL[OB:ROPEDRUM,,11]|OBB_KS(|L)[OB:(GEOTEX1|TURBINE1),,13]))|(3-4*OBB_TADS)| \
2636 (3-4*(OBB_ZANS_AVIA|EVA_7855631|VTG_859823|OBB_ZANS_VTG))| \
2637 (3-4*(OBB_ZWETTL|OBB_MILCH_SCHARDINGER|OBB_MILCH_WIEN))| \
2638 (3-4*(OBB_4GS1200(A|B)1(|L)|OBB_4GBS151A1(|L)))|(2-3*(OBB_GABSM|OBB_GABS1810|OBB_GABS181))
2639
2640 # EP 4 Freight short 2
2641 $DEF A4FK=2*A4FS
2642
2643 # EP 4 Freight long
2644 $DEF A4FL=5*A4FS
2645
2646 # EP 4 Passenger long distance
2647 $DEF A4PI=(<OBB_8235J1L,1-2*OBB_2935J1(|L)~ZS,OBB_1735J1(|L)~ZS,1-2*OBB_2935J1(|L)~ZS)| \
2648 (<OBB_SPDO(|L),1-2*OBB_4A_20750(|L),1-2*OBB_4B_1975L,1-2*OBB_4A_20751(|L))| \
2649 (<1-2*OBB_2134WJ1(|L),1-2*OBB_3034J1(|L),1-2*OBB_20342J1(|L),OBB_8234J1L)
2650
2651 # EP 4A Passenger semi-fast train 4
2652 $DEF A4PS=(OBB_EILZUGD,OBB_EILZUGB,OBB_EILZUGB2,OBB_N28ABJL)| \
2653 (OBB_4A1_BDPO8235,OBB_4A1_BPZ85353,OBB_4A1_ABP3735,2*OBB_4A1_BPO2935)
2654
2655 # EP 4B Passenger semi-fast train 4
2656 $DEF A4PSB=(<(OBB_B290440M(|L)|OBB_BP281463J(1|2)ML),(OBB_B28300GM(|L)|OBB_BP281463G(1|2)ML), \
2657 OBB_A(18130|B39130)M(|L),OBB_B2(8141J1|0130)M(|L),OBB_D9(5103G|2133_31U)M(|L))| \
2658 (<OBB_B2814(6|1)J2M(|L),OBB_AB37400J1M(|L),OBB_A1(7800J2|8140)M(|L), \
2659 OBB_B28141G1M(|L)|OBB_D9(2433J2|2433G1|5103J2)M(|L))
2660
2661 # EP 5 Freight short
2662 $DEF A5FS1=(3-4*OBB_SHIMMNSM(|L))|(3-4*(OBB_EAOS1M[OB:SCRAP(5|6|4)(|[M]),,35]))| \
2663 (3-4*((OBB_KBS334|OBB_KS3310099|OBB_KS3311215)(|L)[OB:FOKRT101(|_WOOD),,13]))| \
2664 (3-4*(OBB_RNOOS_UZ3522(|L)[OB:WOOD31(|[M]),,10]|OBB_RNSZ3991396W(|L)))| \
2665 (3-4*(OBB_KS3311215P|OBB_KBS334P|OBB_KBS3349977P)(|L))| \
2666 (3*(OBB_HBBINS2470000(|L)|OBB_HBBILLS2471207(|L)|0000|OBB_HBBILLS2471178(|L)|OBB_HBBILLS2471539(|L)))| \
2667 (3-4*((OBB_RS3900200|OBB_RNSZ3506183)(|L)[OB:PIPE(54|58|40|63|59|55),,13]))| \
2668 (3-4*((OBB_RNSZ3991396|OBB_RNSZ3504154)(|L)[OB:PIPE(54|58|40|63|59|55|45|47),,11]))| \
2669 (3-4*((OBB_EANOS|OBB_EANOS1)(|L)[O:SCRAP(5|6|4)(|[M]),,33]))| \
2670 (3-5*((OBB_RNSZ_KS1|OBB_RS_RS1|OBB_RS_RS2|OBB_KS_RNSZ_KS1|OBB_RNSZ3506183S|OBB_RNSZ3504154S)(|L)))| \
2671 (3-4*OBB_SHIMMNS_STEEL(1|2|3|4|5)(|L))|(3-4*(OBB_ZANS_VTG))| \
2672 (3-5*OBB_(RNOOS_UZ3522620W|RNOOS_UZ3522623W|RNOOS_UZ3522)(|L))|(3-4*OBB_LAAPS430(A|B|C))| \
2673 (3*(OBB_FBS|OBB_FCS(|L)))|(3-4*(OBB_TADSRCA))|(3*(OBB_SHIMMS_T|OBB_SHIMMS_W))
2674
2675 # EP 5 Freight long
2676 $DEF A5F1=5*A5FS1
2677
2678 # EP 6 Passenger historic (Schlieren green)
2679 $DEF A6PN=(<OBB_5N2_BRPZ85353|OBB_5N2_BRPZ85353L,OBB_5N1_BRPZ85353|OBB_5N1_BRPZ85353L, \
2680 OBB_5N_AP1735|OBB_5N_AP1735L)
2681
2682 # EP 6 Freight short steel transport
2683 $DEF Z_AT_E6_G_COIL=(OBB_SHIMMS_W,OBB_SHIMMS_T,OBB_SHIMMS_R, \
2684 5*(OBB_SHIMMNS_STEEL1L|OBB_SHIMMNS_STEEL1|OBB_SHIMMNS_STEEL2L|OBB_SHIMMNS_STEEL2| \
2685 OBB_SHIMMNS_STEEL3L|OBB_SHIMMNS_STEEL3|OBB_SHIMMNS_STEEL4L|OBB_SHIMMNS_STEEL4|OBB_SHIMMNS_STEEL5L| \
2686 OBB_SHIMMNS_STEEL5|OBB_SHIMMNS_STEEL6L|OBB_SHIMMNS_STEEL6|OBB_SHIMMNS_STEEL7))
2687
2688 # EP 6 Freight short
2689 $DEF A6FS1=(3-4*(OBB_SHIMMS_W|OBB_SHIMMS_T|OBB_SHIMMS_R|RCA_SHIMMNSM(|L)))| \
2690 (3-4*(RCA_EANOS53(76|80)M[OB:SCRAP(5|6|4)(|[M]),,35]))| \
2691 (3-4*((OBB_KBS334|OBB_KS3310099|OBB_KS3311215)(|L)[OB:FOKRT101(|_WOOD),,13]))| \
2692 (3-4*(OBB_RNOOS_UZ3522(|L)[OB:WOOD31(|[M]),,10]|OBB_RNSZ3991396W(|L)))| \
2693 (3*(OBB_HABBIILLNS2893196(|L)|OBB_HBBILLNS_DARBO))| \
2694 (3-4*(OBB_KS3311215P|OBB_KBS334P|OBB_KBS3349977P)(|L))| \
2695 (3*(OBB_HBBINS2470000(|L)|OBB_HBBILLS2471207(|L)|0000|OBB_HBBILLS2471178(|L)| \
2696 OBB_HBBILLS2471539(|L)|OBB_HABINS_RCA|OBB_247HBBILLNS_RC|OBB_HABIS_RCA))| \
2697 (3-4*((OBB_RS3900200|OBB_RNSZ3506183)(|L)[OB:PIPE(54|58|40|63|59|55),,13]))| \
2698 (3-4*((OBB_RNSZ3991396|OBB_RNSZ3504154)(|L)[OB:PIPE(54|58|40|63|59|55|45|47),,11]))| \
2699 (3-4*((OBB_EANOS|OBB_EANOS1|OBB_6EANOS)(|L)[O:SCRAP(5|6|4)(|[M]),,33]))| \
2700 (3-5*((OBB_RNSZ_KS1|OBB_RS_RS1|OBB_RS_RS2|OBB_KS_RNSZ_KS1|OBB_RNSZ3506183S|OBB_RNSZ3504154S)(|L)))| \
2701 (3-4*(OBB_SHIMMNS_STEEL1L|OBB_SHIMMNS_STEEL1|OBB_SHIMMNS_STEEL2L|OBB_SHIMMNS_STEEL2| \
2702 OBB_SHIMMNS_STEEL3L|OBB_SHIMMNS_STEEL3|OBB_SHIMMNS_STEEL4L|OBB_SHIMMNS_STEEL4|OBB_SHIMMNS_STEEL5L| \
2703 OBB_SHIMMNS_STEEL5|OBB_SHIMMNS_STEEL6L|OBB_SHIMMNS_STEEL6|OBB_SHIMMNS_STEEL7))| \
2704 (3-4*(OBB_ZANS_VTG))|(3-5*OBB_(RNOOS_UZ3522620W|RNOOS_UZ3522623W|RNOOS_UZ3522)(|L))| \
2705 (3-4*(OBB_TADSRCA))|(3-4*OBB_LAAPS430(A|B|C))|(3*(OBB_FBS|STLB_FBS|OBB_FCS(|L)))| \
2706 (3*(OBB_SHIMMS_T|OBB_SHIMMS_W))
2707
2708 # EP 6 Freight long
2709 $DEF A6F1=5*A6FS1
2710
2711 # EP 6 Freight Container
2712 $DEF A6FC=15-18*((OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[OT:C30A,7,11] \
2713 [OT:C30A,99,11])| \
2714 (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[O:C20B,7,11][O:C20B,68,11] \
2715 [O:C20B,129,11])| \
2716 (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L) \
2717 [O:CT_BERTSCHI11|CT_CHIMICAL_EXPRESS|CT_CONSERT2|CT_CONTAINERDIENST|CT_HOYER1|CT_MILKA|CT_REXWAL| \
2718 CT_TANKCT|CT_TIPHOOK,112,11][OT:C30A,99,11])| \
2719 (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[O:C2I_EXTE_WOOD(1|2|3|4|5|6),7,11] \
2720 [O:C2I_EXTE_WOOD(1|2|3|4|5|6),68,11][O:C2I_EXTE_WOOD(1|2|3|4|5|6),129,11])| \
2721 (M_SGNSS(|L)[OT:C40B,7,11][OT:C20A,128,11])| \
2722 (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[OT:C20A,7,11][OT:C20A,68,11] \
2723 [OT:C20A,128,11])|(AAE_SGNS4553467[O:WBGA75,9,12][O:WBGA75,>188,12])| \
2724 (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[OT:C40B,7,11][OT:C20A,128,11])| \
2725 (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[OT:C40B,7,11])| \
2726 (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[OT:C40B,68,11])| \
2727 (G_SGGMRSG(|2|3|4|5|6|7|8|9|10|11|12)[O:C40B,9,11][O:C40B,164,11])| \
2728 (FS_SGGMRSS(|_X|_CEMAT|_XN)[O:C20A,17,11][O:C20A,78,11][O:C20A,202,11][O:C20A,263,11])| \
2729 (FS_SGGMRSS(|_X|_CEMAT|_XN)[O:C40B,17,11][O:C40B,202,11]))
2730
2731 #----------------------------------------------------------------------------------------------------
2732 #
2733 # Great Britain
2734
2735 # EP 2 Freight short
2736 $DEF GB2FS1=(2-3*(BR_5PLU[BC:-30,30][BT:0,7,3][BT:48,7,3][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][AUM:CA] \
2737 [NB:B,BA8]))| \
2738 (2-3*((BR_10THOO|BR_10TFUR1|BR_10TGLA2|BR_10THAW1|BR_10THGW|BR_10THOL)[BC:-30,30,7,0,46,9] \
2739 [BT:0,7,3][BT:5,30,46][BT:57,7,3][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8] \
2740 [O:FR_KO(55)(|[M]),6,29]))| \
2741 (2-3*(BR_5PLF[BC:-20,20][BT:0,7,3][BT:50,7,3][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8]))| \
2742 (2-3*((GW_VAN3A|GW_BANANA1|GW_GWFRUIT|GW_FRUIT|GW_VAN5A|GW_VAN1|GW_VAN1A|GW_VAN2|GW_VAN2A|GW_VAN4| \
2743 GW_VAN4A|GW_VENT|LMS_12TVAN1|LMS_12TVAN2)[BC:-20,20][BC:-20,20,2,32,52,1][BC:-20,20,2,31,52,2] \
2744 [BT:0,7,3,4][BT:52,7,3,4][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8]))
2745
2746 # EP 2 Freight long GW
2747 $DEF GB2F1GW=7*GB2FS1, \
2748 GW_TOAD2L[BC:-20,20][BC:-20,20,2,34,60,1][BC:-20,20,2,36,81,2][BC:-20,3,2,38,82,1][BT:0,6,3] \
2749 [BT:82,5,3,7][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8]
2750
2751 # EP 2 Freight long LMS
2752 $DEF GB2F1LM=7*GB2FS1, \
2753 LMS_BV1D[BC:-20,20][BC:-20,20,2,33,60,1][BC:-20,20,2,35,60,2][BC:-20,3,2,36,53,1][BT:0,7,3] \
2754 [BT:62,7,3][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8]
2755
2756 # EP 2 Freight long LNER
2757 $DEF GB2F1LN=7*GB2FS1, \
2758 (LNER_BRAKE2|LNER_BRAKE3|LNER_BRAKE)[BC:-20,20][BC:-20,20,2,35,57,1][BC:-10,11,4,0,54,8] \
2759 [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8]
2760
2761 # EP 2 Passenger short GW
2762 $DEF GB2PSGW=GW_SIPHONJ[BC:-20,20][BC:-20,20,2,34,156,1][BC:-20,20,2,36,156,1][NC:P,2,22,12,0] \
2763 [OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8], \
2764 3*((GW_28DIAE141[BC:-10,20,4,32,180,3][BC:-10,20,4,37,180,2][BC:-10,20,4,32,180,1][BT:0,6,3,5] \
2765 [BT:185,6,3,5][OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][OB:WINDOW_BG,6,17][OB:WINDOW_BG,82,16])| \
2766 (GW_22DIAC35[BC:-50,30,4,32,171,6][BC:10,20,4,35,171,2][BT:0,6,3,5][BT:176,6,3,5][OT:BUFFER4R,>,8] \
2767 [O:BUFFER4L,0,8][NB:B,BA8][OB:WINDOW_BG,16,17][OB:WINDOW_BG,72,16][NC:P,3,22,12,0][NC:P,2,1,11,1]))
2768
2769 # EP 2 Passenger short London Midland and Scottish Railway
2770 $DEF GB2PSLM=,LMS_1BGL[OB:WINDOW_BG,9,15][OB:WINDOW_BG,53,15], \
2771 (<LMS_1FKL[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],LMS_3FKL[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15], \
2772 LMS_3FK2L[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],LMS_3FK4L[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15], \
2773 LMS_3BCK[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],LMS_3BTK2L[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15], \
2774 LMS_3BTOL[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],LMS_3RFL[OB:WINDOW_BG,9,15], \
2775 LMS_1BTO2L[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15], \
2776 LMS_1BTOL[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],LMS_3BTK4L[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15])
2777
2778 # EP 2 Passenger short London and North Eastern Railway
2779 $DEF GB2PSLNER=(<LNER_TGCK[BT:0,0,2,12][BT:190,0,2,12][BC:-30,30,0,0,,9][BC:-25,25,2,32,188,3] \
2780 [BC:-25,25,2,37,187,2][BC:-25,25,2,32,190,1] \
2781 [WD:A,21,4,9,16,29,37,50,58,71,79,92,117,130,151,138,159,172,100][WOO:A,WIN_4_9] \
2782 [WD:C,21,5,7,22,43,85,64,106,123,144,165][WOO:C,WIN_5_7][O:BUFFER2L,0,8][OT:BUFFER2R,>,8] \
2783 [NB:B,BA8][NC:P,2,23,12,0], \
2784 LNER_TGSKR[BT:0,0,2,12][BT:190,0,2,12][BC:-30,30,0,0,,9][BC:-25,25,2,32,188,3] \
2785 [BC:-25,25,2,37,187,2][BC:-25,25,2,32,190,1] \
2786 [WD:A,21,4,9,14,27,35,48,56,69,77,90,98,119,132,153,140,161,174,111][WOO:A,WIN_4_9] \
2787 [WD:C,21,5,7,20,41,83,62,104,125,146,167][WOO:C,WIN_5_7][O:BUFFER2L,0,8][OT:BUFFER2R,>,8] \
2788 [NB:B,BA8][NC:P,2,23,12,0], \
2789 LNER_TGTWIN[BT:0,0,2,13][BT:330,0,2,13][BC:-30,30,0,0,,9][BC:-25,25,2,31,328,3] \
2790 [BC:-25,25,2,36,328,2][BC:-25,25,2,31,328,1] \
2791 [WD:A,20,4,9,5,18,25,243,38,45,58,65,78,85,98,105,118,125,145,138,158,170,183,190,203,290,210,230, \
2792 223,250,263,270,283,310,303,323,][WOO:A,WIN_4_9] \
2793 [WD:C,21,3,6,12,32,72,52,177,112,92,132,152,197,217,237,257,297,277,317][WOO:C,WIN_3_6] \
2794 [O:BUFFER2L,0,8][OT:BUFFER2R,>,8][NB:B,BA8], \
2795 LNER_TGBTWINL[BT:0,0,2,13][BT:318,0,2,13][BC:-30,30,0,0,,9][BC:-25,25,2,31,316,3] \
2796 [BC:-25,25,2,36,316,2][BC:-25,25,2,31,316,1] \
2797 [WD:A,20,4,9,5,18,27,40,49,62,79,92,99,119,132,152,139,164,177,184,197,204,217,237,224,112] \
2798 [WOO:A,WIN_4_9][WD:C,21,3,6,12,34,86,56,191,106,126,146,171,211,231,268,262,306][WOO:C,WIN_3_6] \
2799 [O:BUFFER2L,0,8][OT:BUFFER2R,>,8][NB:B,BA8][BC:20,30,279,28,4,1][BC:20,30,274,28,4,1] \
2800 [BC:20,30,299,28,4,1][BC:20,30,294,28,4,1][BC:20,30,289,28,4,1][BC:20,30,250,28,4,1] \
2801 [BC:20,30,255,28,4,1][BC:20,30,284,28,4,1][BC:20,30,316,21,1,5][BC:20,30,312,21,1,5])
2802
2803 # EP 2 Passenger short Southern Railway
2804 $DEF GB2PSSR1=(<SR_MPP1[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-20,25,2,32,171,1] \
2805 [BC:-10,25,2,33,171,2][BC:-10,25,2,37,171,1][WD:A,20,12,9,26,45,64,83,121,140,102][WOO:A,WIN_12_9] \
2806 [WD:C,20,5,9,158,165,8,15][WOO:C,WIN_5_9][O:SNCFUFGL2,0,12][O:SNCFUFGR2,>,12][O:BUFFER4L,0,8] \
2807 [OT:BUFFER4R,>,8][NB:B,BA8][NC:P,3,23,12,0], \
2808 2*(SR_MCOR12[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-30,-30,10,20,4,8] \
2809 [BC:-30,-30,162,20,4,8][BC:-20,25,2,32,171,1][BC:-10,25,2,33,171,2][BC:-10,25,2,37,171,1] \
2810 [WD:A,20,4,8,26,46,66,86,126,146,140,106,152][WOO:A,WIN_4_8] \
2811 [WD:C,20,4,8,20,40,60,92,120,52,132,112,100,72,80,32][WOO:C,WIN_4_8][O:SNCFUFGL2,0,12] \
2812 [O:SNCFUFGR2,>,12][O:BUFFER4L,0,8][OT:BUFFER4R,>,8][NB:B,BA8][NC:P,3,23,12,0]), \
2813 SR_MPP[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-20,25,2,32,171,1][BC:-10,25,2,33,171,2] \
2814 [BC:-10,25,2,37,171,1][WD:A,20,4,9,27,47,67,87,127,152,158,107][WOO:A,WIN_4_9] \
2815 [WD:C,20,5,9,20,40,60,93,120,53,133,113,100,73,80,33][WOO:C,WIN_5_9][WD:B,20,4,8,167] \
2816 [WOO:B,WIN_4_8][O:SNCFUFGL2,0,12][O:BUFFER5L,0,8][OT:BUFFER4R,>,8][NB:B,BA8][NCL:P,2,23,12,0])
2817
2818 # EP 2 Passenger long Southern Railway
2819 $DEF GB2PLSR1=(<2*(SR_MPP1[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-20,25,2,32,171,1] \
2820 [BC:-10,25,2,33,171,2][BC:-10,25,2,37,171,1][WD:A,20,12,9,26,45,64,83,121,140,102][WOO:A,WIN_12_9] \
2821 [WD:C,20,5,9,158,165,8,15][WOO:C,WIN_5_9][O:SNCFUFGL2,0,12][O:SNCFUFGR2,>,12][O:BUFFER4L,0,8] \
2822 [OT:BUFFER4R,>,8][NB:B,BA8][NC:P,3,23,12,0]), \
2823 4*(SR_MCOR12[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-30,-30,10,20,4,8] \
2824 [BC:-30,-30,162,20,4,8][BC:-20,25,2,32,171,1][BC:-10,25,2,33,171,2][BC:-10,25,2,37,171,1] \
2825 [WD:A,20,4,8,26,46,66,86,126,146,140,106,152][WOO:A,WIN_4_8] \
2826 [WD:C,20,4,8,20,40,60,92,120,52,132,112,100,72,80,32][WOO:C,WIN_4_8][O:SNCFUFGL2,0,12] \
2827 [O:SNCFUFGR2,>,12][O:BUFFER4L,0,8][OT:BUFFER4R,>,8][NB:B,BA8][NC:P,3,23,12,0]), \
2828 2*(SR_MPP1[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-20,25,2,32,171,1] \
2829 [BC:-10,25,2,33,171,2][BC:-10,25,2,37,171,1][WD:A,20,12,9,26,45,64,83,121,140,102][WOO:A,WIN_12_9] \
2830 [WD:C,20,5,9,158,165,8,15][WOO:C,WIN_5_9][O:SNCFUFGL2,0,12][O:SNCFUFGR2,>,12][O:BUFFER4L,0,8] \
2831 [OT:BUFFER4R,>,8][NB:B,BA8][NC:P,3,23,12,0]), \
2832 SR_MPP[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-20,25,2,32,171,1][BC:-10,25,2,33,171,2] \
2833 [BC:-10,25,2,37,171,1][WD:A,20,4,9,27,47,67,87,127,152,158,107][WOO:A,WIN_4_9] \
2834 [WD:C,20,5,9,20,40,60,93,120,53,133,113,100,73,80,33][WOO:C,WIN_5_9][WD:B,20,4,8,167] \
2835 [WOO:B,WIN_4_8][O:SNCFUFGL2,0,12][O:BUFFER5L,0,8][OT:BUFFER4R,>,8][NB:B,BA8][NCL:P,2,23,12,0])
2836
2837 # EP 2 Passenger long GW
2838 $DEF GB2PLGW=GW_SIPHONJ[BC:-20,20][BC:-20,20,2,34,156,1][BC:-20,20,2,36,156,1][NC:P,2,22,12,0] \
2839 [OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8], \
2840 GW_34DIAC32[BC:-10,20,4,32,171,6][BC:-20,20,4,32,171,3][BC:-10,20,4,32,171,1] \
2841 [BC:-20,20,4,37,171,1][BT:0,6,3,5][BT:176,6,3,5][OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8] \
2842 [OB:WINDOW_BG,16,17][OB:WINDOW_BG,77,16][NC:P,3,22,12,0][NC:P,2,1,11,1], \
2843 GW_34DIAC35[BC:-10,20,4,32,171,6][BC:-20,20,4,32,171,3][BC:-10,20,4,32,171,1] \
2844 [BC:-20,20,4,37,171,1][BT:0,6,3,5][BT:176,6,3,5][OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8] \
2845 [OB:WINDOW_BG,16,17][OB:WINDOW_BG,77,16][NC:P,3,22,12,0][NC:P,2,1,11,1], \
2846 GW_34DIAC59[BC:-10,20,4,32,180,6][BC:-20,20,4,32,180,3][BC:-10,20,4,32,180,1] \
2847 [BC:-20,20,4,37,180,1][BT:0,6,3,5][BT:185,6,3,5][OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8] \
2848 [OB:WINDOW_BG,16,17][OB:WINDOW_BG,77,16][NC:P,3,22,12,0][NC:P,2,1,11,1], \
2849 GW_34DIAC61_63[BC:-10,20,4,32,180,6][BC:-20,20,4,32,180,3][BC:-10,20,4,32,180,1] \
2850 [BC:-20,20,4,37,180,1][BT:0,6,3,5][BT:185,6,3,5][OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8] \
2851 [OB:WINDOW_BG,16,17][OB:WINDOW_BG,77,16][NC:P,3,22,12,0][NC:P,2,1,11,1]
2852
2853 # EP 3 Freight short
2854 $DEF GB3FS1=(2-3*(BR_3_VIX(|L)))| \
2855 (2-3*BR_12T(E|SAVN|N)(|L)[BT:0,3,4,6][OT:BUFFER4L,0,8][OT:BUFFER4R,>,8][BT:0,0,5,5][BT:53,0,4,8] \
2856 [NB:B,BA8])|(2-3*(DB_3B_RBMMS55(O|R)|DB_3B_GBMHS51(A|B)|SNCB_3(A_5030A2|B_5030A2|B_5030A2V))(|L))| \
2857 (2-3*(BR_HAA(|L)[BT:0,3,4,6][OT:BUFFER4L,0,8][OT:BUFFER4R,>,8][BT:81,0,4,8][NB:B,BA8]))| \
2858 (2-3*(BR_16TSMN(1|2)E(|L)[BC:-15,20][BT:0,3,4,6][OT:BUFFER4L,0,8][OT:BUFFER4R,>,8][BT:53,0,4,8] \
2859 [NB:B,BA8]))|(2-3*BR_OCT1P[BT:0,3,4,6][OT:BUFFER4L,0,8][OT:BUFFER4R,>,8][BT:139,0,4,8][NB:B,BA8])| \
2860 (2-3*BR_(5PLK1|5PLK2|7PLC1|7PLK1|7PLK2)[BT:0,3,4,6][OT:BUFFER4L,0,8][OT:BUFFER4R,>,8][BT:53,0,4,9] \
2861 [NB:B,BA8])| \
2862 (2-3*BR_HOP3[BT:0,3,4,6][OT:BUFFER3L,0,8][OT:BUFFER3R,>,8][BT:74,0,4,8][NB:B,BA8] \
2863 [B:74,9,1,01,#181818][B:3,9,1,01,#181818][O:COAL4(3|5)(|[M])])
2864
2865 # EP 3 Freight long
2866 $DEF GB3F1=9*GB3FS1, \
2867 (BR_BRAKE1NL|BR_STDBV|BR_BVF|BR_BVU|BR_STDBVU|BR_BRAKE1NL|BR_BRAKE1EL|BR_BRAKE1E)[BC:-20,20] \
2868 [BC:-20,20,2,36,69,1][BC:-20,3,2,35,67,2][BT:0,8,3][BT:80,8,3][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8] \
2869 [NB:B,BA8]
2870
2871 # EP 3 Passenger short maroon
2872 $DEF GB3PS1=BR_MDIAD117[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:175,7,4,2][BC:-20,20,2,32,177,3] \
2873 [BC:-20,20,2,37,177,2][BC:-20,20,2,32,177,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,73,16] \
2874 [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10], \
2875 4*((BR_MDIAC61_63[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:184,7,4,2][BC:-20,20,2,32,182,3] \
2876 [BC:-20,20,2,37,182,2][BC:-20,20,2,32,182,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,82,16] \
2877 [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8])| \
2878 (BR_MDIAC59(|L)[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:184,7,4,2][BC:-20,20,2,32,182,3] \
2879 [BC:-20,20,2,37,182,2][BC:-20,20,2,32,182,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,82,16] \
2880 [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10])| \
2881 (BR_MDIAC60_62[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:184,7,4,2][BC:-20,20,2,32,182,3] \
2882 [BC:-20,20,2,37,182,2][BC:-20,20,2,32,182,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,82,16] \
2883 [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10])| \
2884 (BR_MDIAC35[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:175,7,4,2][BC:-20,20,2,32,177,3] \
2885 [BC:-20,20,2,37,177,2][BC:-20,20,2,32,177,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,73,16] \
2886 [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10]))
2887
2888 # EP 3 Passenger short red/creme
2889 $DEF GB3PS2=BR_CDIAD95L[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:175,7,4,2][BC:-20,20,2,32,177,3] \
2890 [BC:-20,20,2,37,177,2][BC:-20,20,2,32,177,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,73,16] \
2891 [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10], \
2892 4*((BR_CDIAC59(|L)[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:184,7,4,2][BC:-20,20,2,32,182,3] \
2893 [BC:-20,20,2,37,182,2][BC:-20,20,2,32,182,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,82,16] \
2894 [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10])| \
2895 (BR_CDIAC32(|L)[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:175,7,4,2][BC:-20,20,2,32,177,3] \
2896 [BC:-20,20,2,37,177,2][BC:-20,20,2,32,177,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,73,16] \
2897 [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10])| \
2898 (BR_CDIAC60_62[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:184,7,4,2][BC:-20,20,2,32,182,3] \
2899 [BC:-20,20,2,37,182,2][BC:-20,20,2,32,182,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,82,16] \
2900 [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10])| \
2901 (BR_CDIAC35(|L)[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:175,7,4,2][BC:-20,20,2,32,177,3] \
2902 [BC:-20,20,2,37,177,2][BC:-20,20,2,32,177,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,73,16] \
2903 [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10]))
2904
2905 # EP 3 Passenger long MK3
2906 $DEF GB3PL3=(<BR_MK1SO02BSKL,2*BR_MK1SO02SK(|L),BR_MK1SO02FO(|L),BR_MK1SO02TSO(|L),BR_MK1SO02RBR(|L), \
2907 BR_MK1SO02FO(|L),2*BR_MK1SO02TSO(L),BR_MK1_CCTP)
2908
2909 # EP 4 Passenger IC
2910 $DEF GB4PI=(<BR_MK2D_BFKL,2*BR_MK2D_TFO(|L),BR_MK2D_RMBT(|L),4*BR_MK2D_TSO(|L))| \
2911 (<(2*BR_MK1SO06SKL),BR_MK1SO06FKL,BR_MK1SO06BFKL|BR_MK1SO06BCKL|BR_MK1SO06BSKL|BR_MK1SO06RBRL, \
2912 BR_MK1SO06FOL,2*BR_MK1SO06TSOL,BR_MK1SO06RMBL|BR_MK1SO06BGL)| \
2913 (<BR_MK1SO06BG|BR_MK1SO06RMB,2*BR_MK1SO06SK,BR_MK1SO06FO, \
2914 BR_MK1SO06BFK|BR_MK1SO06BCK|BR_MK1SO06BSK|BR_MK1SO06RBR,BR_MK1SO06FK,2*BR_MK1SO06TSO)
2915
2916 # EP 4 Passenger MK3
2917 $DEF GB4PM1=(<(2*BR_MK1SO02SKL),BR_MK1SO02FKL, \
2918 BR_MK1SO02BFKL|BR_MK1SO02BCKL|BR_MK1SO02BSKL|BR_MK1SO02RBRL,BR_MK1SO02FOL,2*BR_MK1SO02TSOL, \
2919 BR_MK1SO02RMBL|BR_MK1SO02BGL)| \
2920 (<BR_MK1SO02BG|BR_MK1SO02RMB,2*BR_MK1SO02SK,BR_MK1SO02FO, \
2921 BR_MK1SO02BFK|BR_MK1SO02BCK|BR_MK1SO02BSK|BR_MK1SO02RBR,BR_MK1SO02FK,2*BR_MK1SO02TSO)| \
2922 (<(2*BR_MK1SO01SKL),BR_MK1SO01FKL,BR_MK1SO01BFKL|BR_MK1SO01BCKL|BR_MK1SO01BSKL|BR_MK1SO01RBRL, \
2923 BR_MK1SO01FOL,2*BR_MK1SO01TSOL,BR_MK1SO01RMBL|BR_MK1SO01BGL)| \
2924 (<BR_MK1SO01BG|BR_MK1SO01RMB,2*BR_MK1SO01SK,BR_MK1SO01FO, \
2925 BR_MK1SO01BFK|BR_MK1SO01BCK|BR_MK1SO01BSK|BR_MK1SO01RBR,BR_MK1SO01FK,2*BR_MK1SO01TSO)| \
2926 (<(2*BR_MK1SO03SKL),BR_MK1SO03FKL,BR_MK1SO03BFKL|BR_MK1SO03BCKL|BR_MK1SO03BSKL|BR_MK1SO03RBRL, \
2927 BR_MK1SO03FOL,2*BR_MK1SO03TSOL,BR_MK1SO03RMBL|BR_MK1SO03BGL)| \
2928 (<BR_MK1SO03BG|BR_MK1SO03RMB,2*BR_MK1SO03SK,BR_MK1SO03FO, \
2929 BR_MK1SO03BFK|BR_MK1SO03BCK|BR_MK1SO03BSK|BR_MK1SO03RBR,BR_MK1SO03FK,2*BR_MK1SO03TSO)| \
2930 (<(2*BR_MK1SO04SKL),BR_MK1SO04FKL,BR_MK1SO04BFKL|BR_MK1SO04BCKL|BR_MK1SO04BSKL|BR_MK1SO04RBRL, \
2931 BR_MK1SO04FOL,2*BR_MK1SO04TSOL,BR_MK1SO04RMBL|BR_MK1SO04BGL)| \
2932 (<BR_MK1SO04BG|BR_MK1SO04RMB,2*BR_MK1SO04SK,BR_MK1SO04FO, \
2933 BR_MK1SO04BFK|BR_MK1SO04BCK|BR_MK1SO04BSK|BR_MK1SO04RBR,BR_MK1SO04FK,2*BR_MK1SO04TSO)| \
2934 (<(2*BR_MK1SO05SKL),BR_MK1SO05FKL,BR_MK1SO05BFKL|BR_MK1SO05BCKL|BR_MK1SO05BSKL|BR_MK1SO05RBRL, \
2935 BR_MK1SO05FOL,2*BR_MK1SO05TSOL,BR_MK1SO05RMBL|BR_MK1SO05BGL)| \
2936 (<BR_MK1SO05BG|BR_MK1SO05RMB,2*BR_MK1SO05SK,BR_MK1SO05FO, \
2937 BR_MK1SO05BFK|BR_MK1SO05BCK|BR_MK1SO05BSK|BR_MK1SO05RBR,BR_MK1SO05FK,2*BR_MK1SO05TSO)
2938
2939 # EP 4 Passenger Network SouthEast
2940 $DEF GB4PNSE1=(<(2*NSE_MK1SO01SKL),NSE_MK1SO01FKL, \
2941 NSE_MK1SO01BFKL|NSE_MK1SO01BCKL|NSE_MK1SO01BSKL|NSE_MK1SO01RBRL,NSE_MK1SO01FOL,2*NSE_MK1SO01TSOL, \
2942 NSE_MK1SO01RMBL|NSE_MK1SO01BGL)| \
2943 (<NSE_MK1SO01BG|NSE_MK1SO01RMB,2*NSE_MK1SO01SK,NSE_MK1SO01FO, \
2944 NSE_MK1SO01BFK|NSE_MK1SO01BCK|NSE_MK1SO01BSK|NSE_MK1SO01RBR,NSE_MK1SO01FK,2*NSE_MK1SO01TSO)
2945 # EP 4 Passenger West Coast Railway
2946 $DEF GB4PWC1=(<(2*WCRC_MK1SO01SKL),WCRC_MK1SO01FKL, \
2947 WCRC_MK1SO01BFKL|WCRC_MK1SO01BCKL|WCRC_MK1SO01BSKL|WCRC_MK1SO01RBRL,WCRC_MK1SO01FOL, \
2948 2*WCRC_MK1SO01TSOL,WCRC_MK1SO01RMBL|WCRC_MK1SO01BGL)| \
2949 (<WCRC_MK1SO01BG|WCRC_MK1SO01RMB,2*WCRC_MK1SO01SK,WCRC_MK1SO01FO, \
2950 WCRC_MK1SO01BFK|WCRC_MK1SO01BCK|WCRC_MK1SO01BSK|WCRC_MK1SO01RBR,WCRC_MK1SO01FK,2*WCRC_MK1SO01TSO)
2951
2952 # EP 4 Passenger regional
2953 $DEF GB4PR=(<(2*BR_MK2A_TSO)(|L),2*BR_MK2A_FK(|L),2*BR_MK2A_TSO(|L),BR_MK2A_BSO)
2954
2955 # EP 4 Freight short
2956 $DEF GB4FS1=(2-3*(BR_4A_HFS(1|2)(|L)))|(2-3*(BR_4B_ZJX_SATLINK(|L)))|(2-3*(BR_4B_HFS(1|2|3)(|L)))| \
2957 (2-3*(BR_HEASL|BR_HEAS|BR_HEATRL|BR_HEATR|BR_HEAMLL|BR_HEAML))| \
2958 (2-3*(BR_VDA01SL|BR_VDA01S|BR_VDA02SL|BR_VDA02S|BR_VDA03SL|BR_VDA03S|BR_VDA04SL|BR_VDA04S| \
2959 BR_VDA05SL|BR_VDA05S|BR_VDA06SL|BR_VDA06S|BR_VDA07SL|BR_VDA07S|BR_VDA08SL|BR_VDA08S|BR_VDA09SL| \
2960 BR_VDA09S))|(2-3*(BR_MEATR|BR_MFASL|BR_MFAS|BR_MFAMLL|BR_MFAML|BR_MEATRL))| \
2961 (2-3*(BR_OBA05SL|BR_OBA07S|BR_OBA10S|BR_OBA08SL|BR_OBA06SL))|(2-3*BR_TEABL(5|4|3|2|1)L)| \
2962 (2-3*(DRS_FNA(|L)[BC:-20,20][BT:0,3,4,6][BT:0,3,4,6][BT:109,3,4,6][OT:BUFFER4L,0,8] \
2963 [OT:BUFFER4R,>,8][NB:B,BA8]))|(2-3*(BR_4B_RRX_B787214))| \
2964 (2-3*BR_TE01(5A_SUKO80111|5A_SMBP4049|4H_BPO80560)(|L))|(2-3*BR_4HABFIS_(2796119|0298000)(|L))| \
2965 (2-3*(SNCB_4A_HF2040|DB_4A_LFST569R|DB_4A_TCEFS845|DB_4A_HFRS312)(|L))| \
2966 (2-3*(BR_4B_RRX_B787214(|L)[O:C60_E4,*40][O:C60_E4,*101,12]))
2967 # EP 4 Freight long
2968 $DEF GB4FL=7*GB4FS1
2969
2970 # EP 5 Passenger IC
2971 $DEF GB5PI=(<BR_MK2D_ICBSOL,4*BR_MK2D_ICTSO,BR_MK2F_ICRFB(|L),2*BR_MK2D_ICFO(|L))
2972
2973 # EP 5 Freight shunting
2974 $DEF GB5FR=(TGR_PCA(|L),KETT_PCA(|L),BCC_PCA2(|L))|(2*EWS_VDAS(|L))|(2*BR_VDA07S(|L))| \
2975 (EWS_HOA(1|2)S(|L))|(2*FL_HIA(1|2))|(3*EWS_HEAS(|L))| \
2976 (4-5*TIPH_JRA(|L)[OB:SCRAP_14,10,28][OB:#SCRAP_15,52,28])| \
2977 (2*FL_MJAS(|L)[OB:SCRAP_14,10,28][OB:#SCRAP_15,52,28])|(1-3*EWS_MEAS(|L))| \
2978 (1-3*(VTG_KIAS(|L)|TIPH_KIA1S(|L)|TIPH_KIA2S(|L)|EWS_BYA1(|L)))|(2*EWS_BLAS(|L))|(2*EWS_BWAS(|L))| \
2979 (4-5*EWS_MFAS(|L)[OB:SCRAP3(|[M])])|(3*ELC_JHASO0(1|2|3|4)(|L))| \
2980 (3*(GTRM_JJA|BR_5HABFIS_2796119)(|L))|(3*(GBRF|FSTL)_HYASO0(1|2)(|L))
2981
2982 # EP 5 Freight long
2983 $DEF GB5FL=5-7*GB5FR
2984
2985 # EP 5 Freight Container
2986 $DEF GB5FC2=9-11*(FL_FEA[OB:C40A,38,10][OB:C40A,212,10]| \
2987 FL_FEA[O:C20A,38,10][O:C20A,211,10][O:C20A,99,10][O:C20A,272,10]| \
2988 FL_FIA[O:C20A,26,10][O:C20A,208,10][O:C20A,87,10][O:C20A,269,10]| \
2989 EWS_FKA[O:C30A,22,9][O:C20A,189,9][O:C20A,113,9][O:C30A,250,9]|FL_FEA[O:C20A,211,10][O:C20A,272,10]), \
2990 1-2*(FL_F(E|I)A|EWS_FKA)
2991
2992 # EP 5 Freight other
2993 $DEF GB_CONT1=BR_SDFFGSS[O:C20A|C40A]
2994 $DEF GB_STEEL1=(VTG_KIAS|TIPH_KIA1S|TIPH_KIA2S|EWS_BYA1|EWS_BWAS)(|L)
2995
2996 $DEF GB5FC=12-18*GB_CONT1
2997 $DEF GB5FS=8-15*GB_STEEL1
2998
2999 # EP 5 Freight Tank
3000 $DEF GB5FT=(12-15*(CAIB_TEASO01|EWS_TEASO01|FL_TEASO01|VTG_TEASO01|VTG_TEASO02|VTG_TEASO03| \
3001 VTG_TEASO04|VTG_TEASO05|VTG_TEASO06|VTG_TEASO07|VTG_TEASO08|VTG_TEASO09)(|L))| \
3002 (12-15*(PETRO_TEA0(1|1L|2L|3L)|EWS_TEA0(7|6|5|4|3|2|1)L| \
3003 VTG_TEA(08|07|05L|04|04L|05|03|03L|02|02L|01|01L|09|10|11)))
3004
3005 # EP 5 Freight mix
3006 $DEF GB5F=GB5FC|GB5FS|GB5FL|GB5FC2|GB5FT
3007
3008 # EP 6 Passenger West Coast Railway
3009 $DEF GB6PWC1=(<2*WCRC_MK1SO01SKL,WCRC_MK1SO01FKL, \
3010 WCRC_MK1SO01BFKL|WCRC_MK1SO01BCKL|WCRC_MK1SO01BSKL|WCRC_MK1SO01RBRL,WCRC_MK1SO01FOL, \
3011 2*WCRC_MK1SO01TSOL,WCRC_MK1SO01RMBL|WCRC_MK1SO01BGL)| \
3012 (<WCRC_MK1SO01BG|WCRC_MK1SO01RMB,2*WCRC_MK1SO01SK,WCRC_MK1SO01FO, \
3013 WCRC_MK1SO01BFK|WCRC_MK1SO01BCK|WCRC_MK1SO01BSK|WCRC_MK1SO01RBR,WCRC_MK1SO01FK,2*WCRC_MK1SO01TSO)
3014
3015 # EP 6 Passenger Direct Rail Services
3016 $DEF GB6PDR1=(<DRS_MK2ABSO|DRS_MK2BSO,5*DRS_MK2TSOL)|(<(5*DRS_MK2TSO),DRS_MK2ABSOL|DRS_MK2BSOL)
3017
3018 # EP 6 Passenger Chiltern Railways
3019 $DEF GB6PC1R=(<(4*CHIL_MK3TSOBG),2*CHIL_MK3FOBG,CHIL_MK3DVT)| \
3020 (<CHIL_MK3TSO1,CHIL_MK3TSO1L,CHIL_MK3GFW,CHIL_MK3DVT)
3021 $DEF GB6PC1L=(<CHIL_MK3DVTL,CHIL_MK3GFWL,CHIL_MK3TSO1,CHIL_MK3TSO1L,CHIL_MK3TSO2,CHIL_MK3TSO2L)| \
3022 (<CHIL_MK3DVTL,2*CHIL_MK3FOBG,4*CHIL_MK3TSOBG)
3023
3024 # EP 6 Maintenance
3025 $DEF GB6FMO=4-5*(4-5*BR_OBA(01|02|03|04|05|06|07|08|09|10)S(|L) \
3026 [O:(FR_GRAVEL1|BALLAST49|GRAVEL(2|6))(|[M]),,22])
3027
3028 # EP 6 Freight Short
3029 $DEF GB6FRS=(4*(VTG_JNA4SO0(1|2|3)|TOUAX_JNA4SO0(1|2)|GBRF_JNA4SO0(1|2)|ERMEWA_JNA2SO0(1|2)| \
3030 (TIPH_JRA|NTWR_IOASO01)|FL_MJAS(|O02)|(DBS_MMASO01|GBRF_MJASO01))(|L)[OB:SCRAP2(0|1)(|[M]),,30])|
3031 $DEF GB6FRH=(4*(FL_HIA(1|2)|ELC_JHASO0(1|2|3|4)|FL_HIA(1|2)|ELC_JHASO0(1|2|3|4)|VTG_HYASO0(1|2|3|4|5)| \
3032 EWS_HOA1SO0(1|2|3)|(TOUAX|NACCO|VTG)_HYASO01|(GBRF_HYASO03|DBS_HOA1SO01|ERMEWA_HOA1SO01))(|L))
3033 $DEF GB6FRI=(4*(VTG_IIA1SO0(1|2|3)|(TOUAX|GERS|DRS)_IIA1SO01|GBRF_IIA1SO0(1|2)|FSTL_IIA1SO0(1|2)| \
3034 GBRF_HYASO0(1|2))(|L))
3035
3036 # EP 6 Freight mix
3037 $DEF GB6FRM=5*GB6FR(H|I|S)
3038
3039 #----------------------------------------------------------------------------------------------------
3040 #
3041 # FRANCE
3042
3043 # EP 1 Freight short Est
3044 $DEF F1FESS=3*EST_1C_KYW29(3|2)(|L)
3045
3046 # EP 1 Freight short Etat
3047 $DEF F1FETS=3*ETAT_1C_KYW(80|267)(|L)
3048
3049 # EP 1 Freight short Midi
3050 $DEF F1FMIS=MIDI_1C_KYW220(|L)
3051
3052 # EP 1 Freight short Nord
3053 $DEF F1FNOS=3*NORD_1C_KYW267(8|2)(|L)
3054
3055 # EP 1 Freight short Paris - Lyon - Méditerranée
3056 $DEF F1FPLMS=3*PLM_1C_KYW113(|L)
3057
3058 # EP 1 Freight short Paris-Orleon
3059 $DEF F1FPOS=3*PO_1C_KYW44(1|2)(|L)
3060
3061 # EP 2 Freight short Est
3062 $DEF F2FESS=3*EST_2_KYW29(3|2)(|L)
3063
3064 # EP 2 Freight short Etat
3065 $DEF F2FETS=3*ETAT_2_KYW(80|267)(|L)
3066
3067 # EP 2 Freight short Midi
3068 $DEF F2FMIS=MIDI_2_KYW220(|L)
3069
3070 # EP 2 Freight short Nord
3071 $DEF F2FNOS=3*NORD_2_KYW267(8|2)(|L)
3072
3073 # EP 2 Freight short Paris-Orleon
3074 $DEF F2FPOS=3*PO_2_KYW44(1|2)(|L)
3075
3076 # EP 2 Freight short Paris-Lyon-Mediterannee
3077 $DEF F2FPLMS=3*PLM_2_(FAY32|KYW113)(|L)
3078
3079 # EP 2 Passenger semi-fast train Alsace-Lorraine
3080 $DEF F2PAS=AL_PW3|AL_PW3G,4-5*(AL_C9FG|AL_C9F)
3081
3082 # EP 2 Passenger Express PLM
3083 $DEF F2PP=PLM_F3U|PLM_F3UL,(<PLM_AB3UL|PLM_AB3U,5*(PLM_AB4ULLSL|PLM_AB4ULS|PLM_AB4UL|PLM_AB4U))
3084
3085 # EP 2 Passenger Express CIWL
3086 $DEF F2PC=CIWL_D1269MCB|CIWL_D1283MCN,2-2*(CIWL_A4029CB|CIWL_A4018CN),CIWL_AK4005CN,CIWL_SH4013CB, \
3087 2-3*(CIWL_AK4080CB|CIWL_B4111CB|CIWL_BK4091CB)
3088
3089 # EP 2 Passenger Express CIWL Edelweis
3090 $DEF F2PCE=(<CIWL_PW4B,CIWL_2PEDN,CIWL_2PCFO,CIWL_2PFO,CIWL_2PCEDN,CIWL_PW4BL)| \
3091 (<CIWL_PW4B,CIWL_2PEDNL,CIWL_2PCEDNL,CIWL_2PFOL,CIWL_2PCFOL,CIWL_PW4BL)
3092
3093 # EP 2 Freight long
3094 $DEF F2FL=8-10*((3-5*(AL_TREMIE(|L)[O:FR_AG02|FR_KO10](|[M])))| \
3095 (1-3*(SBB_63401(|L)[OB:FR_HAYRAKE(|2)(|[M]),,12]))| \
3096 (1-3*((WUE_OM12(V|S)HN(|L)|WUE_OM12(V|S)N)[OB:(OMM_KOHLE_02|COAL9)(|[M]),,25|26]))| \
3097 (1-3*(DRG_G|DRG_GH(|L)))|(1-3*(GB_3485HZ(|L)|GB_3485H(|L)))|(1-2*(CSD_Z1_75473(|A)))| \
3098 (1-3*(SNCF_2_K363(|L)))|(1-2*(NS_70431E|NS_70774E(|L)))|(2-3*(NOB_K1_VSCHB(|HL)))| \
3099 (2-3*(OBB_3_OM751H(|L)))|(2-3*(SBB_60501B(|L)[OB:BOX25|BOX8|GRANIT2,,12])))
3100
3101 # EP 2 Freight short
3102 $DEF F2FS=4-6*((1-2*(AL_TREMIE(|L)[O:FR_AG02|FR_KO10](|[M])))| \
3103 (1-2*(SBB_63401(|L)[OB:FR_HAYRAKE(|2)(|[M]),,12]))| \
3104 (1-2*((WUE_OM12(V|S)HN(|L)|WUE_OM12(V|S)N)[OB:(OMM_KOHLE_02|COAL9)(|[M]),,25|26]))| \
3105 (1-2*(DRG_G|DRG_GH(|L)))|(1-2*(GB_3485HZ(|L)|GB_3485H(|L)))|(1-2*(CSD_Z1_75473(|A)))| \
3106 (1-2*(SNCF_2_K363(|L)))|(1-2*(NS_70431E|NS_70774E(|L)))|(1-2*(NOB_K1_VSCHB(|HL)))| \
3107 (1-2*(OBB_3_OM751H(|L)))|(1-2*(SBB_60501B(|L)[OB:BOX25|BOX8|GRANIT2,,12])))
3108
3109 # EP 3 Passenger long distance
3110 $DEF F3PD=(<SNCF_3EST_1B9JL,2*SNCF_3EST_3A8JL,SNCF_3EST_3BRJL,2*SNCF_3AOC48_B10GJ,SNCF_3EST_1B5DJ)| \
3111 (<SNCF_3EST_1B5DJL,2*SNCF_3AOC48_B10GJL,SNCF_3EST_3BRJ,2*SNCF_3EST_3A8J,SNCF_3EST_1B9J)| \
3112 (<SNCF_3TOR_A5DHL,2*SNCF_3TOR_B(9|10)HL,CIWL_WR_D3A,SNCF_3TOR_A8HL,SNCF_3TOR_A4B4HL, \
3113 2*SNCF_3TOR_B(9|10)HL,SNCF_3(PAEAL21M|TP21M)(|L))| \
3114 (<(2*SNCF_3TOR_B(9|10)H),SNCF_3TOR_A4B4H,SNCF_3TOR_A8H|SNCF_METSO48_A812M,CIWL_WR_D3AL, \
3115 2*SNCF_3TOR_B(9|10)H,SNCF_3TOR_A5DH)| \
3116 (<SNCF_3TOR_A5DHL,2*SNCF_3TOR_A8HL|SNCF_METSO48_A812ML,5*SNCF_3TOR_B10HL,SNCF_3TOR_A4B4HL)| \
3117 (<5*SNCF_3TOR_B10H,SNCF_3TOR_A4B4H,2*SNCF_3TOR_A8H,SNCF_3TOR_A5DH)| \
3118 (<SNCF_3(PAEAL21M|TP21M)(|L),SNCF_PA16BM|SNCF_PA16BML,SNCF_3ESTDD2PM(|L)|SNCF_3ESTDD2M, \
3119 2*SNCF_3TOR_B9HL,SNCF_3TOR_B10HL,SNCF_3TOR_A4B4L,CIWL_4WRT3341M(|L),SNCF_3TOR_A9M,SNCF_3TOR_A9ML, \
3120 2*SNCF_3TOR_B10HL)
3121
3122 # EP 3 Passenger regional cars ex DRG
3123 $DEF F3PRD=(<SNCF_DR2E30_A6TG|SNCF_DR2E30_A6TGL,SNCF_ARM18_B6TF|SNCF_ARM18_B6TFL,SNCF_DR23, \
3124 SNCF_DR_BAT_B7TG,SNCF_DR_BAT_B612TG,SNCF_SEMIMET2O_B6|SNCF_SEMIMET2O_B6L, \
3125 SNCF_SEMIMET2O_B7|SNCF_SEMIMET2O_B7L,SNCF_DR28D)| \
3126 (SNCF_3PA10L,SNCF_DR28D,SNCF_DR_BAT_B,SNCF_DR23,SNCF_DR2E_TNL,SNCF_SEMIMET2O_B6)
3127
3128 # EP 3B Passenger Region Sud-Est 5
3129 $DEF F3PRSE=(<PLM_B4DTM,6*PLM_B8TM(|L),PLM_B4DTML)|(>PLM_B4DTML,6*PLM_B8TM(|L),PLM_B4DTM)| \
3130 (<SNCF_3MET3_B4DM,2*SNCF_3MET3_B8M(|L),SNCF_3MET3_A7M(|L),2*SNCF_3MET3_B8M(|L), \
3131 SNCF_3MET3_A3B4M(|L),SNCF_3MET3_B8M(|L))| \
3132 (2*SNCF_ROME_BM(|L),SNCF_ROME_AM(|L),3*SNCF_ROME_BM(|L),$DIR(SNCF_ROME_BDM,SNCF_ROME_BDML))
3133
3134 # EP 3B Passenger Grandes lignes Est
3135 $DEF F3PRES=(SNCF_EST_DD2M|SNCF_DD2_METEST_WL_VML),2*SNCF_BRUHAT_GM,SNCF_AOC_A8G0M(|L),2*SNCF_BRUHAT_GM
3136
3137 # EP 3 Freight short
3138 $DEF F3FS=(4-5*(SNCF_3A_K363L|SNCF_3A_K363|SNCF_3A_K437L|SNCF_3A_K437|SNCF_3A_KF437HL|SNCF_3A_KF437H| \
3139 SNCF_3A_LL|SNCF_3A_L|SNCF_3A_L_BL|SNCF_3A_L_B))|(5-8*(SNCF_ELO[O:BETTERAVES_2E(1|2)(|[M])]))| \
3140 (3-4*(SNCB_3A_5030A2(|L)|SNCB_3B_5030A2(|V)(|L)))|(3-4*(SNCF_3A_HJYF(|L)|EVS_HS_CIMT(|O)M))| \
3141 (3-4*EVS_HS_SNAV2(OM|UM|_SRVVM|_SRLVM|_RENAULTM))|(4-5*SNCF_3_LYW4(1|2)2(|L))| \
3142 (4-5*(SNCF_3A_HK(F_VB|F_VBL|_VB|_VBL|_VBU)))|(3-4*SNCF_GS402(A|B|C|D))| \
3143 (3-4*SNCF_TREMIE(_FER2M|VBML|VBM))|(3-4*SNCF_UHS_MILKM)| \
3144 (4-5*(STEF_I_CADOUX_STEF_E3M|SNCF_I_STEF_BERLINM|STEF_I_DRISO_STEF1M|STEF_I_UIC_STEF_E3M| \
3145 STEF_I_TPISO_STEFM))|(3-4*SGW_DM40_FANE_E3M(|L))| \
3146 (<SNCF_HMYV_EXTRML[OB:(CAMIONBACHE1|BUSSING_SAK2|BUSSING_NAG4500|BUSSING_T2|SAURER_5D_EAG1),38,8], \
3147 SNCF_HMYV_EXTRM[OB:(CAMIONBACHE1|BUSSING_SAK2|BUSSING_NAG4500|BUSSING_T2|SAURER_5D_EAG1),38,8])| \
3148 (4-5*(SNCF_TREMIE_MH30_SGMFM|SNCF_TREMIE_MH30_GFM|SNCF_TREMIE_MH30_GCM|SGW_MH30_E4M| \
3149 SGW_MH30_SGMF_E3M|SGW_MH45_SCRC_E3M(|L)))|(4-5*SGW_EF_(E3M|E3AM|ARBEL_E3M))| \
3150 (4-5*(PLM_E07MM(|L)[OB:COAL4(5|3)(|[M]),,24]| \
3151 SNCF_TOW_VILLACH(|MET)M[OB:(COAL50|FR_COAL1)(|[M]),,26]| \
3152 SNCF_E_KLAGENFURT(1|M)M[OB:(COAL50|FR_COAL1)(|[M]),,25]))|(4-5*SNCF_G_UIC_(BOIS_RWM|RWM|RWPEM))| \
3153 (4-5*SNCF_G(_EST20TM|_EST20TRM|_EST20TFML|_EST20TFM|_ETAT1904M|_OCEM19M|_OCEM19RWM|M1_21M| \
3154 _OCEM29M|_OCEM29BML|_OCEM29BM|_STDAM|_STDA_RWM|_STDB_RWM))| \
3155 (4-5*(SNCF_E_LINZM[O:BARREL8[BC:-5,-30],29,21][O:BARREL8[BC:-5,-30],7,21] \
3156 [O:BARREL8[BC:-5,-30],35,21]))|(3-4*(SGW_3TH40_CFMCF35HRWM(|L)[OB:#SCRAP_1(3|2|4|5)(|[M]),,33]));
3157
3158 # EP 3 Freight long
3159 $DEF F3FL=4-5*F3FS
3160
3161 # EP 3 Freight long steam
3162 $DEF F3FLS=SNCF_(UK6_14BM(|L)|FOURG_WD_BM|3FOURG_OCEM2M(|L)|STDD_E3M(|L)|RWM(|L)),F3FL
3163
3164 # EP 3 Freight Cerales short
3165 $DEF F3FCR=(3-4*(SNCF_3CER3E_RICHARD1_CTCM|SNCF_3CER3E_RICHARD1_CTC_COTRAMM)(|L))| \
3166 (3-4*(SNCF_3CER2EFRB_CTCM)(|L))|(3-4*(SNCF_3CER2EFRC_CTCM)(|L))|(3-4*(SNCF_CER2E47FG_ALGECO_E3M))|
3167
3168 # EP 3 Freight Cerales short
3169 $DEF F3FCS=2-3*F3FCR
3170
3171 # EP 3 Freight Cerales long
3172 $DEF F3FCL=7*F3FCR
3173
3174 # EP 4 Passenger Long distance
3175 $DEF F4PD=(<SNCF_UIC_A7DYL,2*SNCF_UIC_A9_1967L,SNCF_874470SYL,SNCF_Y_WRRB,,SNCF_UIC_A4B5YL, \
3176 5*SNCF_875970SYL)| \
3177 (<5*SNCF_875970SY,SNCF_UIC_A4B5Y,SNCF_Y_WRRBL,SNCF_874470SY,2*SNCF_UIC_A9_1967,SNCF_UIC_A7DY)
3178
3179 # EP 4 Passenger Long distance le Mistral
3180 $DEF F4PM=(<SNCF_M69_A4DTUXJ,SNCF_M69_A8UJL,SNCF_M69_A8UJ,SNCF_M69_A3RTUJ,SNCF_M69_A8UJL, \
3181 SNCF_M69_A8UJ,SNCF_M69_VRUJ,SNCF_M69_A8TUJL,SNCF_M69_A4DTUXJL)| \
3182 (<SNCF_M69_A4DTUXJ,SNCF_M69_A8TUJ,SNCF_M69_VRUJ,SNCF_M69_A8UJ,SNCF_M69_A8UJ,SNCF_M69_A3RTUJL, \
3183 SNCF_M69_A8UJL,SNCF_M69_A8UJ,SNCF_M69_A4DTUXJL)
3184
3185 # EP 4 Freight shunting
3186 $DEF F4FR=(3-5*((SNCF_E_UIC2_SGWS|SNCF_E_UIC2S|SNCF_E_UIC2)[OB:SCRAP3(|[M]),,27|26]))| \
3187 (3-5*(SNCF_EAOS(1|2|3)[OB:SCRAP_1(2|3|4|5)(|[M]),,30|29]))|(3-5*SNCF_GAS(|1|1B|1C|1D|1E)(|L))| \
3188 (3-5*SNCF_GAS(2B|2|2B|2C|2D|2E|2F)(|L))|(3-5*(SNCF_Z_ELF2|SNCF_Z_ELF1))| \
3189 (3-5*(SNCF_Z_ELF2|SNCF_Z_ELF1))|(3-5*(SNCB_4A_HF2040(|L)|SNCF_EVS_SNAV_RENAULTM))| \
3190 (3-5*EVS_HS_SNAV4(M|YM|YSM|_CHAMPM|PM_PEUG1ML|PM_PEUG1M|PM_PEUG2ML|PM_PEUG2M))| \
3191 (3-5*(SNCF_EOS40(|A)M[OB:(COAL50|FR_COAL1)(|[M]),,30]||(3-4*SNCF_4FFS6094(|L))| \
3192 SGW_4TH30VRWM[OB:(COAL50|FR_COAL1)(|[M]),,26]))|(3-5*(SNCF_R_TP_BB_E4M[OB:BOX6,,13]))| \
3193 (3-5*(SNCF_4_GS311(|A|F|AF|B|BF|BS1|BS1F)(|L)|SNCF_4_GS312(|A|B|BS1)(|L)|SNCF_4_GS313(|A|B|BS1)(|L)))| \
3194 (3-5*(SNCF_UASJFL|SNCF_UASGSSL|SNCF_UAGPPS1UL|SNCF_UASGSS|SNCF_UAGPPS1C|SNCF_UAGPPS1CL| \
3195 SNCF_UAGPPS1U|SNCF_UASJF|SNCF_UASGNTL|FS_UASSMG|SNCF_UASGNT|SNCF_UAGPPS1EL|SNCF_UAGPPS1E| \
3196 SNCF_UASTCL|SNCF_UASTC|SNCF_UASTCECL|SNCF_UASTCEC))|(3-4*SNCF_I(71SM|71M|87M|87FM))| \
3197 (3-5*SNCF_G(S2_12M|HKS605BM|4BOISM|4M|S402EM))|(3-5*SNCF_G(ASS9_16AM|ASS9_16M|12M|13_SERNAMG2M))| \
3198 (3-4*(SNCF_E9_31M[OB:#SCRAP_1(3|2|4|5)(|[M]),,24]))|(3-4*(SNCF_TMSM|SNCF_T001M|SNCF_TMS_SM))| \
3199 (3-4*(SNCF_4K_OCEM29M[OB:SCHALE(1|2)(|[M]),,12]))|(3-4*SGW_DM(40AM|53_SITRAM_E3M))| \
3200 (3-4*(SNCF_FLBS_MK_SIMOTRAM|SGW_MKANF81_SIMOTRAM))|(3-4*SNCF_I87M(|L))| \
3201 (3-4*((SGW_TH_BAIGNOIRE_SCRC|SNCF_EALMO_TH_STEMIM|SNCF_EALMO_THM|SNCF_EALMO_TH_ARBELM| \
3202 SNCF_EALMO_TH_SIMOTRAM)[OB:SAND(10|9|11|12)(|[M]),,31]))| \
3203 (3-4*SNCF_UCS_MARIAGE34_(BMP1M|BMP2M|OMYAM))|(4-5*SNCF_EOS40(|A)M[OB:SCRAP3(|[M]),,31])| \
3204 (3-4*((SGW_TH_FRANGECOM|SGW_EAOS_BSPRM|SGW_EAOS_BMM)[OB:#SCRAP_1(3|2|4|5)(|[M]),,33]))| \
3205 (3-4*(SGW_4TH40ARBELM(|L)[OB:#SCRAP_1(3|2|4|5)(|[M]),,27]))| \
3206 (3-4*(SNCF_EVSM|SNCF_UCS_EVS1M|SNCF_UCS_EVS2M|SNCF_UCS_OMYAM|SNCF_UCS_OMYA2M))| \
3207 (3-4*(SNCF_4PRIM_PLM34FM|SNCF_4PRIM_OCEM29M|SNCF_GOS719M|SNCF_G79M))| \
3208 (2-3*SNCF_LGS_N(VM|CM)[O:C6(0|10)_E4,11,12][O:C6(0|10)_E4,73,12],SNCF_4UFSS9196(B|A))
3209
3210 # EP 4 Freight short
3211 $DEF F4FS=2-3*F4FR
3212
3213 # EP 4 Freight long
3214 $DEF F4FL=6*F4FR
3215
3216 # EP 4 Freight Cerales short
3217 $DEF F4FCR=(3-4*SNCF_CER2EFR(B_TC_CTC|D_CTC|D_TC_CTC)M(|L))|(3-4*SNCF_CER2EFR(D_TC_SOFIDIC)M(|L))| \
3218 (3-4*(SNCF_CER2E47FG_TC_ALGECOM|SNCF_CER2E47FG_TC_SHGTM))| \
3219 (3-4*(SNCF_CER2E43_TC_UNCACM|SNCF_CER2E43_TC_SLEMIM)(|L))|(3-4*(SNCF_CER2EM|SNCF_CER2E_TCM))| \
3220 (3-4*(SNCF_CEREX3E_RICHARD1_COTRAMM|SNCF_CEREX3E_RICHARD1_ESMERYM)(|L))
3221
3222 # EP 4 Freight Cerales short
3223 $DEF F4FCS=2-3*F4FCR
3224
3225 # EP 4 Freight Cerales long
3226 $DEF F4FCL=7*F4FCR
3227
3228 # EP 5 Passenger long distance
3229 $DEF F5PC=(<SNCF_VTU_B51_2L,SNCF_VTU_B51_2, \
3230 3*(SNCF_VTU_A2R|SNCF_VTU_A10UL|SNCF_VTU_A10U|SNCF_VTU2_A10UL|SNCF_VTU2_A10U|SNCF_VTU_A10L| \
3231 SNCF_VTU_A10|SNCF_VTU_A10AL|SNCF_VTU_A10A|SNCF_VTU_A10BL|SNCF_VTU_A10B|SNCF_VTU_A10CL| \
3232 SNCF_VTU_A10C|SNCF_VSE_A9U_COL|SNCF_VSE_A9U_CO|SNCF_VSE_A9U_CSL|SNCF_VSE_A9U_CS|SNCF_A9U_VSEL| \
3233 SNCF_A9U_VSE|SNCF_VTU_A2RL),SNCF_VTU_B5RXL, \
3234 5*(SNCF_VTU_B11L|SNCF_VTU_B11|SNCF_VTU_B11AL|SNCF_VTU_B11A|SNCF_VTU_B11BL|SNCF_VTU_B11B| \
3235 SNCF_VTU_B11CL|SNCF_VTU_B11C|SNCF_VTU_B11DL|SNCF_VTU_B11D|SNCF_VTU2_B10UL|SNCF_VTU2_B10U| \
3236 SNCF_VTU_B10L|SNCF_VTU_B10|SNCF_VTU_B10AL|SNCF_VTU_B10A|SNCF_VTU_B10BL|SNCF_VTU_B10B| \
3237 SNCF_VTU_B10CL|SNCF_VTU_B10C|SNCF_VTU_B10DL|SNCF_VSE_B11U_COL|SNCF_VSE_B11U_CO|SNCF_VSE_B11U_CSL| \
3238 SNCF_VSE_B11U_CS|SNCF_VTU_B10D|SNCF_B11U_VSEL|SNCF_B11U_VSE), \
3239 SNCF_VTU_A5B5UL|SNCF_VTU_A5B5U|SNCF_VSE_A4B6U_ORIGL|SNCF_VSE_A4B6U_ORIG|SNCF_VSE_A4B6U_COL| \
3240 SNCF_VSE_A4B6U_CO|SNCF_VSE_A4B6U_CSL|SNCF_VSE_A4B6U_CS|SNCF_VTU2_A5B5UL|SNCF_VTU2_A5B5U| \
3241 SNCF_VTU_A5B5L|SNCF_VTU_A5B5)
3242
3243 # EP 5 Freight short
3244 $DEF F5FS=(4-5*(SNCF_R55M|SNCF_R56M|SNCF_R57M|SNCF_ROOS516M)[OB:WOOD17(1|2|3|4|5|6|7|8)(|[M]),152,12] \
3245 [OB:WOOD17(1|2|3|4|5|6|7|8)(|[M]),104,12][OB:WOOD17(1|2|3|4|5|6|7|8)(|[M]),10,12] \
3246 [OB:WOOD17(1|2|3|4|5|6|7|8)(|[M]),56,12])|(4-5*SNCF_RILS0(1|4|5|6))| \
3247 (4-5*RTRAN_(TE2|T1|TE1|TE3|TE4|PLC2A|PLC2B)M)|(4-5*(SNCF_ERMEWASATI_PM|GT1|ERMEWA_ZAS1(|L)))| \
3248 (4-5*SNCF_H8(1_6UNIMETALM|7M))|(4-5*SNCF_L31M[OB:CLAAS_01,,11])| \
3249 (4-5*(SNCF_FAPS_SIMOTRAM|SGW_FAPS_SIMOTRAMALETM|SGW_EX100_ROYM)(|L))| \
3250 (4-5*SNCF_T(87M|90M|ANPPS_TRANSENGRAIS1M))|(3-4*SNCF_FG128M(|L))| \
3251 (4-5*(SNCF_ORVAL80AEM|SNCF_ORVAL80AKM|SNCF_ORVAL80BEM|SNCF_ORVAL80B_COFRABLACKEM| \
3252 SNCF_ORVAL80B_COFRABLACKBM|SNCF_ORVAL80BKM)(|L))
3253
3254 # EP 5 Freight long
3255 $DEF F5FL=5-6*F5FS
3256
3257 # EP 5 Freight Cerales short
3258 $DEF F5FCR=(3-4*(SNCF_CER2E50B_SAND1M|SNCF_CER2E4_SOUF1M)(|L))| \
3259 (3-4*(SNCF_CER2E50B_CTCM|SNCF_CER2E50B_ESMERYM)(|L))| \
3260 (3-4*(SNCF_CER2E50B_CANAM|SNCF_CER2E50B_GUYOMARCHM|SNCF_CER2E50B_MJGM)(|L))| \
3261 (3-4*(SNCF_CER2E50B_ERMEWAM|SNCF_CER2E50B_GMBM)(|L))| \
3262 (3-4*(SNCF_CER2E1_UNCACM|SNCF_CER2E53BRA_TCM(|L)|SNCF_CERE2E53BRC_TC(|L)))| \
3263 (3-4*(SNCF_CERE2E53BRB_FRLUZM|SNCF_CERE2E53BRB_TCM|SNCF_CERE2E53BRB_TC_MROM|SNCF_CERE2E53BRC_TCM) \
3264 (|L))|(3-4*(SNCF_CER2E70_TMFCITA1M|SNCF_CER2E70_TMFCITA2M|SNCF_CER2E70_CTCM)(|L))| \
3265 (3-4*(SNCF_CERG2_CTCM|SNCF_CERG2_MIDIM|SNCF_CERG2_MROM|SNCF_CERG2_SHGTM|SNCF_CERG2_STEMIM| \
3266 SNCF_CERG2_TRANSMAGRAINSM)(|L))|(3-4*SNCF_CER2E50B_CANAM(|L))
3267
3268 # EP 5 Freight Cerales short
3269 $DEF F5FCS=2-3*F5FCR
3270
3271 # EP 5 Freight Cerales long
3272 $DEF F5FCL=7*F5FCR
3273
3274 # EP 5 Freight short maintenance
3275 $DEF F5FM=(3-4*G_RGS2[OB:RAIL1,15,12][OB:RAIL1,95,12],3-4*SNCF_RES9_16[NB:B,BA1][O:GRAVEL(1|8)(|[M])], \
3276 3*SNCF_TDS_INFRA[NT:B])| \
3277 (8*SNCF_UAS_S39_6M[O:BALLAST(41|40|39|38|42)(|[M])],2*SNCF_UAS_S39_2VM[OB:FR17,,17])| \
3278 (8*SNCF_UA_R09_6VM[OB:RAIL5,,12])| \
3279 (4*SNCF_US_C12_2VM(|L)[O:FER(3|4)(|[M]),,40],7*SNCF_UAS_D12_6VM(|L)[O:FER(1|2)(|[M]),,40])
3280
3281 # EP 6 Passenger long distance
3282 $DEF F6PC=(<SNCF_VSE_A9U_CPL,SNCF_VTU2_A10U_CP2L|SNCF_VTU_A10U_CP2L, \
3283 SNCF_VSE_A4B6U_CPL|SNCF_VTU_A5B5U_CP2L|SNCF_VTU2_A5B5U_CP2L,SNCF_VTU_B5RX,SNCF_VU_B11U_CP, \
3284 SNCF_VTU2_B10U_CP2,SNCF_VTU_B10U_CP2,SNCF_VSE_B11U_CPL,SNCF_VU_B9UX_CP)| \
3285 (<SNCF_VTU_B5RX,SNCF_VU_B11U_CP,SNCF_VTU2_B10U_CP2,SNCF_VTU_B10U_CP2,SNCF_VSE_B11U_CPL, \
3286 SNCF_VU_B9UX_CP,SNCF_VSE_A4B6U_CP|SNCF_VTU_A5B5U_CP2|SNCF_VTU2_A5B5U_CP2,SNCF_VSE_A9U_CP, \
3287 SNCF_VTU2_A10U_CP2|SNCF_VTU2_A10U_CP2)
3288
3289 # EP 6 Freight short
3290 $DEF F6FS=(4-5*(SNCF_AIR_LIQUIDE|SNCF_AIR_LIQUIDE2|GATX_13(|L)|SBB_MOTOREX(|L)))| \
3291 (4-5*(DB_HABIS7TW5|SNCF_HABIS_KRONENBOURG))|(4-5*SNCF_RILS0(1|2|3|4|5|6))| \
3292 (4-5*SNCF_HBILLNS(1|2|3|5|6|7|9|10|11|12|13|1L|3L|4L|6L|7L|8L|9L|10L|11L|12L|13L))| \
3293 (4-5*SNCF_H8(1_6UNIMETALM|7M))|(4-5*SNCF_(EAOS4|EAOS80_SGW)[OB:SCRAP(6|4|5)(|[M]),,32])| \
3294 (4-5*(SNCF_HFS(1|2|3|4)))|(4-5*G_ZAES_HR|SNCF_ZANS_SIMOTRA)|(4-5*SNCF_GS402(A|B|C|D))| \
3295 (4-5*(SNCF_GHKS(1|2)))|(4-5*(SNCF_RILS216|SNCF_GASS9_16))| \
3296 (4-5*(SNCF_UAHS1|INFRA_UAS_D12_6(|L)|SNCF_G41BETAIL))|(2-3*SNCF_SLMMPS96_6M[O:STEEL2(7|8|9|5|6)])| \
3297 (4-5*(SNCF_GAS86|SNCF_GOS70|SNCF_GOS70_SERNAM))|(4-5*(SNCF_68ACETATEVINYLE|SNCF_FS_LAROCHETTE))| \
3298 (4-5*SNCF_KANGB_CNC_VIM[O:WB121,,12])|(4-5*(SNCF_T90M|SNCF_TANPPS_TRANSENGRAIS2M))| \
3299 (4-5*ERMEWA_CARBONATE(1|2|3)M(|L))| \
3300 (4-5*(SNCF_UACS_SIMOTRAM|EVS_UACS64_TRANSPULM|SNCF_UACS_CALCIAM)(|L))| \
3301 (4-5*(FWAG_TAMS_M30M|SNCF_T13M|SNCF_T13AM|SNCF_T13BM|SNCF_T13_BSFM|SNCF_T13_BMFM)(|L))
3302
3303 # EP 6 Freight long
3304 $DEF F6FL=4-5*F6FS
3305
3306 # EP 6 Freight Cerales short
3307 $DEF F6FCR=(3-4*(SNCF_CER2E47BR_FLUZ|SNCF_CER2E47BR_TCM|SNCF_CER2E43EM|SNCF_CER2E43_MBLANCM| \
3308 SNCF_3CER2E43_SAND1M|SNCF_CER2E43_SAND1M|SNCF_CER2E43_TC_SLEMIM|SNCF_CER2E48_CAPM| \
3309 SNCF_CER2E48_MBLANCM|SNCF_CER2E48_UCAM|SNCF_CER2E50AEM|SNCF_3CER2E50A_CLECHETM|SNCF_CER2E2_MFSM| \
3310 SNCF_CER2E50A_MROM|SNCF_CER2E50A_SICALRPM|SNCF_CER2E50A_STEMIM|SNCF_CERCAD50_STORIONE2| \
3311 SNCF_CERE2E53BRB_TC|SNCF_CERE2E53BRB_TC_MRO|SNCF_CER2E53BRA_TC|SNCF_CERE2E53BRB_FRLUZ)(|L))| \
3312 (3-4*(SNCF_CERG96M|SNCF_CERG96WM|SNCF_CERG96_AGRI1M|SNCF_CERG96_AGRIM|SNCF_CERG96_GOUESSANTM| \
3313 SNCF_CERG96_GUYM|SNCF_CERG96_INVIVOM|SNCF_CERG96_UCAM|SNCF_CERP84_MROM)(|L))| \
3314 (3-4*(SNCF_CERG_TCVEM|SNCF_CERP86_TCV_CTCM|SNCF_CER96P1_TCVE_CTCM|SNCF_CERP86_TCV2_CTCM| \
3315 SNCF_CERP96H_TCV_CTC1M|SNCF_CERP86_TC_CMTM|SNCF_CERP84R_CTCM|SNCF_CERP96_TC_CTCM| \
3316 SNCF_CERP96P2_TCVE_CTCM|SNCF_CERP96P2_TCV_CTCM|SNCF_CERG96_TCV2_CTCM|SNCF_CER2E48_TC_CTCM| \
3317 SNCF_CER2E43_TC_CTCM|SNCF_CER2E45_CTCM|SNCF_CER2E45TC_CTCM|SNCF_FG132_CTCM| \
3318 SNCF_CERFG96P3_TCV_CTCM|SNCF_CERG4_CTCM)(|L))| \
3319 (3-4*(MILLET_CEREG95M|MILLET_CERG95PTMM|MILLET_CER96P1M|MILLET_CER96P2M|MILLET_CERG132M)(|L))| \
3320 (3-4*(SNCF_CERG96_SOUFFLET2M|SNCF_CERP86_TC_CAM|SNCF_CERP86_TC_SATIM)(|L))| \
3321 (3-4*(SNCF_CERP84R_GMMM|SNCF_CERP84R_FWM|SNCF_CERP84R_CIWCM|SNCF_CERP84_ESMERYM|SNCF_CERP84_STEMIM) \
3322 (|L))| \
3323 (3-4*(SNCF_CERFG96P3_TCVE_ERMEWAM(|L)|SNCF_CERP_ERMEWAGM|SNCF_CER94P_ERMEWAM(|L)| \
3324 SNCF_CER2E50A_ERMEWAM(|L)|SNCF_CERG92_ERMEWAM(|L)|SNCF_CER2E48_ERMEWAM(|L)| \
3325 SNCF_CER2E43_ERMEWAM(|L)|SNCF_CERP84R_ERMEWAM(|L)))|(3-4*(SNCF_CERP86M|SNCF_CERP86_TMFCITAM)(|L))| \
3326 (3-4*(SNCF_CERP96P2_TCVM|SNCF_CERFG96P3_TCVEM|SNCF_CERP96P2_TCVEM|SNCF_CERG96_TCV2M| \
3327 SNCF_CERP86_TCVM|SNCF_CERP96P2_TCVE_TRANSMAGRAINSM|SNCF_CERP96P2_TCV2_CIWCM| \
3328 SNCF_CERP96P2_TCV2_INVIVOM)(|L))| \
3329 (3-4*(SNCF_CERP_CARGILL2M(|L)|SNCF_CER96P1_CARGILL2M(|L)|SNCF_CERP_COOPER(LML|ML)| \
3330 SNCF_CERP_SANDERS1M(|L)))| \
3331 (3-4*(SNCF_CERP_STORIONEM|SNCF_CERP_TMFCITAEM|SNCF_CERP_SHGT1M|SNCF_CERP_UFACM)(|L))| \
3332 (3-4*(SNCF_CERP96_BREIZALM|SNCF_CERP_BREIZALM|SNCF_CERG_BREIZALM|SNCF_CERG94G8_BREIZALM)(|L))| \
3333 (3-4*(SNCF_CERG_CANTALOUML|SNCF_CERG_GMBM(|L)|SNCF_CERG_GRANITM(|L)|SNCF_CERG_GUYM(|L)))| \
3334 (3-4*(NACCO_CERPM|SNCF_CERP_NACCOM|SNCF_CERG_NACCOM)(|L))| \
3335 (3-4*(SNCF_CER96P1_MONFERM|SNCF_CER2E43_MONFERM|SNCF_CER2E48_MONFERM|SNCF_CERG96_MONFERM| \
3336 SNCF_CER2E50A_MONFERM)(|L))|(3-4*(SNCF_CERP84_SOUFFLETM|SNCF_CERG94_SOUF3M)(|L))| \
3337 (3-4*(SNCF_CERG94_TMFCITAPLM|SNCF_CERG_INVIVO1M|SNCF_CERG_INVIVOM|SNCF_CERG_SIGMAM)(|L))| \
3338 (3-4*(SNCF_CERG94G_UCAM|SNCF_CERG94G8_UCAM|SNCF_CER96P1_UCAM|SNCF_CERP102FG_UCAM)(|L))| \
3339 (3-4*(SNCF_CERFG96P3_COOPER(ML|LML)|SNCF_CERFG96P3_GUYOMARCH1M(|L)))| \
3340 (3-4*(SNCF_CERP92_COOPAGRIM|SNCF_SUCREFGM|SNCF_CERP_MBLANCM|SNCF_CERP102FGM)(|L))| \
3341 (3-4*(SNCF_CERG4_ALGECOM|SNCF_CER96P1_TMFCITANM|SNCF_CERP102FG_GOUESSANTM)(|L))| \
3342 (3-4*(SNCF_CERP96HKP_TMFCITAM|SNCF_CERP96D_TMFCITAM|SNCF_CERG102_TMFCITAM)(|L))
3343
3344 # EP 6 Freight Cerales short
3345 $DEF F6FCS=2-3*F6FCR
3346
3347 # EP 6 Freight Cerales long
3348 $DEF F6FCL=7*F6FCR
3349
3350 # EP 6 Freight tank long
3351 $DEF F6FTL=15*(SNCF_CITVIN_DANZAS12M(|L)|SNCF_CITVIN_ERMEFERM|SNCF_CITVIN1304_ERMEFERM| \
3352 SNCF_CITVIN1304_ERMEWAJUS1UNIFERM|SNCF_CITVIN_ERMEWAJUS1M|SNCF_CITVIN1304BI_MONFERLM| \
3353 SNCF_CITVIN_LOTRAS12M(|L)|SNCF_CITVIN_MUSCADOR13M(|L)|SNCF_CITVIN_LOTRAS13M(|L))
3354
3355 # EP 6 Freight short maintenance
3356 $DEF F6FM=(3-4*G_RGS2[OB:RAIL1,15,12][OB:RAIL1,95,12],3-4*SNCF_RES9_16[NB:B,BA1][O:GRAVEL(1|8)(|[M])], \
3357 3*SNCF_TDS_INFRA[NT:B])| \
3358 (8*SNCF_UAS_S39_6M[O:BALLAST(41|40|39|38|42)(|[M])],2*SNCF_UAS_S39_2VM[OB:FR17,,17])| \
3359 (8*SNCF_UA_R09_6VM[OB:RAIL5,,12])| \
3360 (4*SNCF_US_C12_2VM(|L)[O:FER(3|4)(|[M]),,40],7*INFRA_UAS_D12_6M(|L)[O:FER(1|2)(|[M]),,40])
3361
3362 #----------------------------------------------------------------------------------------------------
3363 #
3364 # LUXEMBURG
3365
3366 # EP 3 Freight short
3367 $DEF L3FS=(2-3*SNCF_GAS(|2))|(2-3*(CFL_GS1))|(2-3*(CFL_3_TTOWB(|L)[O:SUGARBEET3(|[M]),,28]))| \
3368 (2-3*(NS_KBS1))|(2-3*(SNCB_3A_4422000(|L)|SNCB_3A_4422762E(|L)|SNCB_3A_4427500(|L)))| \
3369 (2-3*(NS_GBLS))|(2-3*(CFL_3_UKK(|L)[OB:BOX(34|25|23),14,11][OB:BOX(34|25|23),59,11]))| \
3370 (2-3*SNCB_3A_257001U(|V))
3371 # EP 3 Freight long
3372 $DEF L3F1=8-9*L3FS
3373
3374 # EP 4 Freight short
3375 $DEF L4FS=(2-3*CFL_TMSM)|(3-4*CFL_FCS_B1M[OB:FER(3|4)M(|[M]),,40])|(2-3*CFL_4_GBLS_ALB(|L))| \
3376 (2-3*CFL_4_ES(|L))|(2-3*(CFL_4_GKKS1301(|L)|CFL_4_GKKS1301AL(|L)))|(3-5*CFL_GS(1|1L|2))
3377
3378 # EP 4 Freight long
3379 $DEF L4F1=5*(L4FS|F4FR|D4FK1)
3380
3381 # EP 5 Freight short
3382 $DEF L5FS=(2-3*CFLC_FAS_B1M)
3383
3384 # EP 6 Freight shunting
3385 $DEF L6FR=(3-4*(CFL_SHIMMNSSL|CFL_SHIMMNSS|ERR_CFL_SHIMMNSL|ERR_CFL_SHIMMNS))|(3-4*CFL_KS)| \
3386 (3-4*CFL_SHIMMNSS(|L))|(3-4*CFLC_RILNSS(3|8|7|7L|6|5|5L|4|9|10|11|12|11L))| \
3387 (3-4*(CFL_RILNSSM|CFLC_RILNSS1M|CFLC_RILNSS2M))|(3-4*CFL_FCS(1|2|3)M[OB:FER(3|4)M(|[M]),,40])| \
3388 (3-4*CFL_RENSSM[OB:PYLON3,15,12][OB:PYLON3,100,12])|(3-4*CFL_TDGSM)
3389 # EP 6 Freight short
3390 $DEF L6FS=2*L6FR
3391 # EP 6 Freight long
3392 $DEF L6FL=5*L6FR
3393
3394 #----------------------------------------------------------------------------------------------------
3395 #
3396 # BELGIUM
3397
3398 # EP 2 Passenger
3399 $DEF B2P1=(<SNCB_2_M1C8PL,2*SNCB_2_M1C10(|L),SNCB_2_M1B5C4(|L),2*SNCB_2_M1C10(|L))| \
3400 (<(2*SNCB_2_M1C10(|L)),SNCB_2_M1B5C4(|L),2*SNCB_2_M1C10(|L),SNCB_2_M1C8P)
3401
3402 # EP 3 Passenger
3403 $DEF B3P1=(<SNCB_3_M1B8DPL,3*SNCB_34_M1B10(|L),SNCB_34_M1A5B4(|L),SNCB_34_M1B10(|L))| \
3404 (<SNCB_34_M1A5B4(|L),3*SNCB_34_M1B10(|L),SNCB_3_M1B8DP)
3405
3406 # EP 3 Freight short 3A
3407 $DEF B3FS=(2-3*SNCF_GAS(|2))|(2-3*(CFL_GS1))|(2-3*(SNCF_RORYW[OB:BETON4,25,13][OB:BETON3,112,12]))| \
3408 (2-3*(NS_KBS1))|(2-3*(SNCB_3A_4422000(|L)|SNCB_3A_4422762E(|L)|SNCB_3A_4427500(|L)))| \
3409 (2-3*(NS_GBLS))|(2-3*(SNCB_G(9|10)A))|(2-3*SNCB_3_103800(|U)(|L))| \
3410 (2-3*(SNCB_3A_257001U(|V))|(2-3*SNCB_3A_4(1|2)0000(|L)[O:COAL(40|42|20)(|[M])]))
3411 # EP 3 Freight long 3A
3412 $DEF B3F1=7-8*B3FS
3413
3414 # EP 3 Freight short 3B
3415 $DEF B3F2S=(2-3*SNCF_GAS(|2))|(2-3*CFL_GS1)|(2-3*(SNCF_RORYW[OB:BETON4,25,13][OB:BETON3,112,12]))| \
3416 (2-3*(NS_KBS1))|(2-3*(SNCB_3B_(1022500|2286200|2286200B)(|L)[OB:SAND5(|[M]),,27]))| \
3417 (2-3*SNCB_3_1038200(|L))|(2-3*SNCB_3B_4427500)|(2-3*NS_GBLS)|(2-3*SNCB_G(9|10)A)| \
3418 (2-3*SNCB_3_5030(|L))|(2-3*SNCB_3B_4(1|2)0000(|L)[O:COAL(40|42|20)(|[M])])| \
3419 (2-3*SNCB_3B_6600[OB:BOX33(|[M]),,12])|(2-3*SNCB_3B_1038600(|U)(|L))
3420
3421 # EP 3 Freight long 3B
3422 $DEF B3F2=7-8*B3F2S
3423
3424 # EP 4 Pessenger Regional 4a
3425 $DEF B4PR1=(<SNCB_4LA6DL|SNCB_4LB6DL,SNCB_4LA8L|SNCB_4LA8,2*SNCB_4LB8,SNCB_4LB8L)| \
3426 (<(2*SNCB_3LB8),SNCB_3LA8L,SNCB_3LA4B4L|SNCB_3LA4B4|SNCB_3LA4B4L,2*SNCB_3LB8L, \
3427 SNCB_3LB6D|SNCB_3LA6D)|(<SNCB_K1ARDML,3*SNCB_K1B1M(|L))|(<3*SNCB_K1B1M(|L),SNCB_K1ARDM)| \
3428 (<SNCB_K2BDM2L,3*SNCB_K2B(1|2)M(|L))|(<3*SNCB_K2B(1|2)M(|L),SNCB_K2BDM2)| \
3429 (<SNCB_K1BD(4|3)ML,SNCB_K1AB1M(|L),2*SNCB_K1B1M(|L))| \
3430 (<SNCB_K1AB1M(|L),2*SNCB_K1B1M(|L),SNCB_K1BD(4|3)M)| \
3431 (<SNCB_M2GBM(|L),SNCB_M2GABM(|L),SNCB_M3_BM(|L),SNCB_M2GBM(|L),SNCB_M2GBDM)| \
3432 (>SNCB_M2GBM(|L),SNCB_M2GABM(|L),SNCB_M3_BM(|L),SNCB_M2GBM(|L),SNCB_M2GBDML)
3433
3434 # EP 4 Freight short 4A
3435 $DEF B4F1S=(2-3*SNCB_4A_E1215A0(|B)(|L)[OB:COAL(40|41)(|[M]),,28])|(2-3*SNCB_LGNSS2)| \
3436 (2-3*SNCB_TMS(|L))|(2-3*SNCB_4(_GKKLMS2231|_GLMS2231|GKLMMS)(|L))| \
3437 (2-3*SNCB_4_ELO5510(|L)[OB:TARP19(|[M]),,10])|(2-3*(SNCB_ZANS_CAIB|SNCB_ZANS_ARMITA))| \
3438 (2-3*SNCB_TADS(1|2|3|4))|(2-3*SNCB_UASCITA)|(2-3*SNCB_4A_UDE9025(|U)(|L))| \
3439 (2-3*(SGW_MKH61ARBELM|SGW_MKH61ARBEL_SCRCM|SGW_MKH61ARBEL_SOGEWAGM|SGW_MH61ARBEL_SIMOTRAM))
3440
3441 # EP 4 Freight long 4A
3442 $DEF B4F1=7-8*B4F1S
3443
3444 # EP 4 Freight short 4B
3445 $DEF B4F2S=(2-3*SNCB_4B_E1215A0(|B)[OB:COAL(40|41)(|[M]),,28])|(2-3*(SNCB_LGNSS2))| \
3446 (2-3*(SNCB_TMS|SNCB_TMS1215B1M)(|L))|(2-3*(SNCB_ZANS_CAIB|SNCB_ZANS_ARMITA))| \
3447 (2-3*SNCB_TADS(1|2|3|4))|(2-3*SNCB_UASCITA)|(2-3*SNCB_4_ROOS3514E4(|L)[OB:PIPE_BERGROHR,,12])| \
3448 (2-3*(SNCB_EAOS_1415A(1|2|3)M[OB:#SCRAP_1(3|2|4|5)(|[M]),,32]))| \
3449 (2-3*SNCB_3614C5M[OB:PIPE7(|[M]),,12])|(2-3*SNCB_1000H0_(CAIBM|VTGM))
3450
3451 # EP 4 Freight long 4B
3452 $DEF B4F2=7-8*B4F2S
3453
3454 # EP 5 EC
3455 $DEF B5PE=(<SNCB_9570NB|SNCB_9570NBL,SNCB_I10_2170NL,SNCB_I10_8870M3|SNCB_I10_8870M3L,SNCB_I6_1970M, \
3456 2*SNCB_I10_2170N,SNCB_I10_2170NL)
3457
3458 # EP 5 Freight short
3459 $DEF B5FS=(2-4*((SNCB_5_E1215A0(|B)(|L)[OB:COAL(40|41)(|[M]),,28])|(SNCB_E1[OB:COAL(40|41)(|[M]),,27])))| \
3460 (2-4*(NS_EANOS3L|NS_EANOS3|DBAG_5_EAOSX051|DBAG_5_EAOSX051BL|DB_EANOSB|DBC_EANOSX055| \
3461 DBAG_EALOS_053|DBAG_5_EALOST058VL|DBAG_EALOS058L[OB:PAPER1(|[M]),,32]))| \
3462 (2-4*((DBAG_EALOS058,DBAG_5_EALSX063E,SNCB_R1,SNCB_RILS,SNCB_TAEMSL,SNCB_REMMS3514C0M) \
3463 [OB:GRAVEL1,,16]))|(2-4*SNCB_REMMS3514C0IM[OB:FR_JCB_JS175W,,9])| \
3464 (2-4*SNCB_5_EAOS6501B(2|1A|1B)(|F)(|L))|(2-4*(SNCB_S3614A2M[OB:COIL20H,26,13][OB:COIL20H,72,13]))
3465
3466 # EP 5 Freight long
3467 $DEF B5F1=7*B5FS
3468
3469 # EP 6 Freight short
3470 $DEF B6FS=(3-4*((SNCB_SHMMNS3614E2AM|XPEDYS_SHMMNS3614E2M)[OB:COIL23H,35,12][OB:COIL23H,80,12]))| \
3471 (3-4*(SNCB_SHIMMNS3614D5AM|SNCB_SHIMMNS3614D9M|SNCB_SHIMMNS3614D9AM|SNCB_SHIMMNS3614L1AM))| \
3472 (3-4*(SNCB_3614D5_VBM|SNCB_3614L1_VBM))|(3-4*(SNCB_R3514C3AM[O:BETON3,12][O:BETON3,76,18]))| \
3473 (3-4*((SNCB_SHMMNS3614E1|SNCB_SHMMNS3614E1A)[OB:COIL13,32,15][OB:COIL13,74,15]))| \
3474 (3-4*SNCB_FAS(|1415G6A|1415G8|1415G8A)M)|(4-5*BCAR_SDKMS(|L)[O:WB13(5|7|6),,12])| \
3475 (3-4*(SNCB_CERP_AMYLUMM|SNCB_CER92P_AMYLUM)(|L))
3476
3477 # EP 6 Freight long
3478 $DEF B6F=(15*(SNCB_FALS1000F9L|SNCB_FALS1000F9|SNCB_FALS1000F9BCVL|SNCB_FALS1000F9BCV| \
3479 SNCB_FALS1000F5BCVM))|(5*B6FS)
3480
3481 #----------------------------------------------------------------------------------------------------
3482 #
3483 # NETHERLANDS
3484
3485 # EP 1-2 Freight
3486 $DEF NL12V=SS_83900(|L)|SS_84543|SS_82001(|L)|SS_84500
3487 $DEF NL12OE=(SS_5501[OB:FR_HAYRAKE2,8,12][OB:FR_HAYRAKE2,55,12]|SS_25589L[#E!OB:AG65,*47,19]| \
3488 SS_25589[#E!OB:AG65,*40,19]|SS_42176[#E!OB:AG85,*49,22]|SS_42176L[#E!OB:AG85,*55,22]| \
3489 SS_47091L[#E!OB:AG70,*50,26]|SS_47091[#E!OB:AG70,*44,26])
3490 $DEF NL12O=5:(SS_25509[#E!OB:AG75,*44,19]|SS_45301[#E!OB:AG50,*31,23]|SS_43001[#E!OB:AG70,*44,26])| \
3491 3:(SS_25589[#E!OB:AG65,*47,19]|SS_42176[#E!OB:AG85,*49,22]|SS_42176L[#E!OB:AG85,*55,22]| \
3492 SS_47091L[#E!OB:AG70,*50,26]|SS_47091[#E!OB:AG70,*44,26])
3493 $DEF NL12GE=(SS_17066|HSM_6526CHD|NS_12201|NS_12701E|NS_12701N|HSM_33226CHD|SS_11169|HSM_10671CHW| \
3494 NS_23601HE|NS_23601HN|HSM_447|SS_59090|SS_59414|SS_61251|SS_14001)($DIR(,L))
3495 $DEF NL12G=5:(HSM_5041CHD|NS_19001|NS_7801E|NS_7801N|NS_9501|SS_10030|HSM_41976CHWG|NS_21001E| \
3496 NS_21001N|NS_21426N|SS_15001)| \
3497 3:(NS_23601E|NS_23601N|SS_17066|HSM_6526CHD|NS_12201|NS_12701E|NS_12701N|HSM_33226CHD|SS_11169| \
3498 HSM_10671CHW|NS_23601HE|NS_23601HN|HSM_447|SS_59090|SS_59414|SS_61251|SS_14001)(|L)
3499
3500 $DEF NL12FV=3-15*NL12O,NL12OE
3501 $DEF NL12FO=3-15*NL12O,NL12OE
3502 $DEF NL12FG=3-15*NL12G,NL12GE
3503 $DEF NL12FX=NL12O|NL12G,3-16*NL12O|NL12G,NL12OE|NL12GE
3504 $DEF NL12FS=1-5*NL12O(2:|[!E])|NL12G|FR3Z
3505 $DEF NL12FM=3-10*NL12O(2:|[!E])|NL12G|FR3Z,NL12OE(2:|[!E])|NL12GE
3506 $DEF NL12FC=(|[!E]) \
3507 ((8-15*SS_45301[#E!OB:AG50,*31,23],SS_25589[#E!OB:AG65,*47,19])| \
3508 (1-4*(3-5*SS_43001[#E!OB:AG70,*44,26],|SS_47091L[#E!OB:AG70,*50,26]|SS_47091[#E!OB:AG70,*44,26])))
3509 $DEF NL12FDG=NS_D(G2421G|111|112|G2266|G3209|G2199|G2030)(|L)
3510
3511 $DEF NL12F=NL12FDG,3:(|[!E])NL12FO|3:NL12FG|10:NL12FX|3:NL12FC|1:NL12FV
3512
3513 $DEF NL12T=NL12F
3514
3515 # EP 2 Freight coal
3516 $DEF NL2FLC=NL12FDG,13-17*(3:NS_56261E|NS_GTMKHE(|L)|2:NS_47501E)
3517
3518 # EP 2 Freight short
3519 $DEF NL2FS1=2-3*(NS_91010GTDE|NS_G3|NS_560809_GROLSCH(|L)|NS_GB_HEINEKEN1(|L))
3520
3521 # EP 2 Passenger 2-axle short
3522 $DEF NL2P2=NS_D25(57|66)|NS_DPOSTL|NS_D4|NS_D(1|2),NS_D3,NS_C6_2570,NS_B4C_2501|NS_B2,NS_P2,NS_P1, \
3523 NS_C7_4001
3524
3525 # EP 2 Passenger 4-axle
3526 $DEF NL2PSC=(NS_D4501(|L), \
3527 (<,NS_C10C_6101L, \
3528 NS_SAX1L|NS_SAX1|NS_SAX1HL|NS_SAX1H|NS_AB7C_6009L|NS_AB7C_6009|NS_AB7C_6021L|NS_AB7C_6021| \
3529 NS_AB7C_6101L|NS_AB7C_6101|NS_AB8C_6231|NS_B8C_6006L|NS_B8C_6006,NS_BC9C_6001(|L)|NS_P3, \
3530 NS_C10C_6026L))| \
3531 ((NS_D4525_1(|L), \
3532 (<NS_C10CL|NS_C10C,NS_BC9CL|NS_BC9C|NS_BC9CHL|NS_BC9CH,NS_AB7CL|NS_AB7C|NS_AB7CHL|NS_AB7CH, \
3533 NS_D4501L,NS_C10CHL|NS_C10CH))|(<NS_C7_4001L,NS_B6C_4511,NS_C8C_4501,NS_C7_4001)| \
3534 (<NS_C10C_6101L,NS_C10C_6026,NS_B8C_6006L|NS_B8C_6006,NS_AB8C_6221L|NS_AB8C_6221,NS_C10C_6101L))
3535
3536 # EP 2 Passenger D - long distance
3537 $DEF NL2PL=(<NS_C10C_6101,NS_C10C_6026,NS_BC9C_6001,CIWL_WR2,NS_AB8C_6231L,NS_C10C_6026L|CIWL_WL(20|30))
3538 # EP 3a Freight short
3539 $DEF NL3FLS=(3-4*(NS_174501N|NS_174541NL|NS_174541N))|(3-4*(NS_7801N|NS_9501|NS_12701NL))| \
3540 (3-4*(NS_70774N))|(3-4*(NS_87101E|NS_44001GLYN|NS_95001GN2E|NS_95001GN1E|NS_G3))| \
3541 (3-4*(NS_23601NL|NS_23601N|NS_23601HNL|NS_23601HN))|(3-4*(NS_GZ(E|N)))| \
3542 (3-4*NS_RMMP_EX_USATC[O:PROPELLER|SPARE1|BOILERPARTS1,13][O:PROPELLER|SPARE1|BOILERPARTS1,51,11] \
3543 [O:PROPELLER|SPARE1|BOILERPARTS1,88,11])|(3-4*(NS_3A_SCHH(|L)|NS_CHHP1))| \
3544 (3-4*NS_3A_SCHR(K|KB|W|KGB1|WGB1|KGB1B|WGB1B|KGB2|KGB2B|WGB2|WGB2B|KGB3|KGB3B|WGB3|WGB3B)(|L))| \
3545 (3-4*(NS_3_CHOP1460(|V)_FRICO(|L)|NS_3_CHOP1460(|V)_FRICOR(|L)))|(3-4*(G_E1|NS_3A_XCHG(|L)))| \
3546 (3*(NS_3A_CHOP1469H(|L)|NS_3A_CHOP1475(B|H)(|L)))|(NS_UIKKS[O:MOTOR4,,6],NS_179023N,NS_25101N)
3547
3548 # EP 3a Freight long
3549 $DEF NL3FLA=NS_D(G2421G|111|112|G2266|G2372|G3209|G2199|G2030)(|L),5*NL3FLS
3550
3551 # EP 3a Passenger regional
3552 $DEF NL3PRA=(2*NS_C12C_(O|OH|G|GH)(|L),NS_B12C_G(|L),2*NS_C12C_(O|OH|G|GH)(|L))| \
3553 (2*NS_C12C_B(|L),NS_B12C_B(|L),2*NS_C12C_B(|L))
3554
3555 # EP 3a Passenger long distance NS_OVALBC
3556 $DEF NL3PLA=(NS_D6061G,2*(NS_OVAL(O|OH|G|GH)_C),2*(NS_OVAL(O|OH|G|GH)_AB),2*(NS_OVAL(O|OH|G|GH)_C))| \
3557 (NS_D6061B,2*(NS_OVALB_C),(NS_OVALB_B(1|2)),(NS_OVALB_(AB|A)),2*(NS_OVALB_C))| \
3558 (NS_D6061GL,2*(NS_OVAL(O|OH|G|GH)_CL),2*(NS_OVAL(O|OH|G|GH)_ABL),2*(NS_OVAL(O|OH|G|GH)_CL))| \
3559 (NS_D6061BL,2*(NS_OVALB_CL),(NS_OVALB_B(1|2)L),(NS_OVALB_(AB|A)L),2*(NS_OVALB_CL))| \
3560 (NS_D6061B,1-2*NS_ABD9_CL,NS_ABD9_ABL|NS_ABD9_AL,NS_ABD9BL,2*NS_ABD9_CL)| \
3561 (NS_D6061BL,1-2*NS_ABD9_C,NS_ABD9_AB|NS_ABD9_A,NS_ABD9B,2*NS_ABD9_C)| \
3562 (NS_D7521G,1-2*NS_ABD9G_C,2-3*NS_ABD9(OH|G|GH|O),2*NS_ABD9G_C)| \
3563 (NS_D7521GL,1-2*NS_ABD9G_CL,2-3*NS_ABD9(OH|G|GH|O)L,2*NS_ABD9G_CL)
3564
3565 # EP 3a Freight coal
3566 $DEF NL3FLC=13-17*(NS_GTMKN|NS_GTMKBN(|L)|NS_GTMKHN(|L)|NS_47501N)
3567
3568 # EP 3bc Freight short
3569 $DEF NL3FSB=(2-3*NS_3B_SCH(H|K)(|L))|(2-3*NS_3C_GSV(W|K|KB|KV|KVB|WV|WB|WVB)(|L))| \
3570 (2-3*NS_3B_(XCHG|SCHRK|SCHRKB|SCHRW|SCHRWB|SCHRKE|SCHRKEB|SCHRWE|SCHRWEB)(|L))| \
3571 (2-3*NS_3_(CHOP1460_FRICO|CHOP1460V_FRICO|CHOP1460_FRICOR|CHOP1460V_FRICOR|GSV_FRICO)(|L))| \
3572 (2-3*NS_3B_CHO(K1450B|P1460|K1459|K1450H|P1469H)(|L))
3573
3574 # EP 3b Freight long
3575 $DEF NL3FLB=8*NL3FSB
3576
3577 # EP 3b Passenger regional
3578 $DEF NL3PRB=(<NS_MAT24BDZG,2-4*NS_MAT24GB(|L))|(<(2-4*NS_MAT24GB(|L)),NS_MAT24BDZGL)| \
3579 (<NS_MAT24BDZ,(NS_MAT24AB(|M|MS|S)(|L)|NS_MAT24A(|S)(|L)),2-3*NS_MAT24B(Z|1|2|3|4)(|L))| \
3580 (<(2-3*NS_MAT24B(Z|1|2|3|4)),(NS_MAT24ABM(|S)(|L)|NS_MAT24A(|S)(|L)),NS_MAT24BDZL)
3581
3582 # EP 3 maintenance
3583 $DEF NL3FM1=(NS_9441511,NS_9741616)|(7*(NS_ROBEL6|NS_ROBEL4|NS_ROBEL1|NS_ROBEL3))
3584
3585 # EP 4 Freight short
3586 $DEF NL4FS1=(2-3*GSM_4_TTOX(|L)[O:BETTERAVES_2E(1|2)(|[M]),,27])|(2-3*NS_RS1[OB:(BOX27|PIPE27),,13])| \
3587 (2-3*NS_FALS2520_KALK(1|2))|(2-3*NS_SAHMMS(1|2))|(2-3*NS_SDKMMSS_TRAILSTARL)| \
3588 (2-3*NS_EANOS1[O:SCRAP(5|6)(|[M])])|(2-3*(NS_GSWD|NS_TMS(|L)))|(2-3*NS_UCS3810(|L))| \
3589 (2-3*NS_4_GSV(K|KB|KV|KVB|W|WB|WV|WVB|_FRICO)(|L))|(2-3*NS_4_(GBLS|HBCSV)(|L))| \
3590 (2-3*NS_EKLO[OB:CABLE7,*29,12][OB:CABLE7,*74,12])| \
3591 (2-3*(NS_HBIS1940(C|B|D)|NS_HBCS|NS_HBBKKSS|NS_HBIS1910(B|UTD)|NS_HBIS1920C))| \
3592 (2-3*(NS_GBS18(10|20)|NS_GS_POST|NS_GS|NS_G_UIC_BOISM))|(2-3*(NS_KLMOS1))|(2-3*(NS_KS(1|2)))| \
3593 (2-3*(NS_KBS(3|4)))| \
3594 (2-3*NS_SAHMMS357[OB:COIL23H,50,14][OB:COIL23H,91,13][OB:COIL23H,133,13][OB:COIL23H,7,13])| \
3595 (2-3*NS_CHHP2|(2-3*NS_FCCPPS)|(2-3*NS_TADS(2|3)))
3596
3597 # EP 4 Freight long
3598 $DEF NL4FL1=7*NL4FS1
3599
3600 # EP 4 maintenance
3601 $DEF NL4FM1=(NS_9741611,NS_270118,NS_9791507,NS_9791508)| \
3602 (NS_ROBELB,NS_VERBLW(2|1),NS_GS_W,NS_WERKW(1|2))| \
3603 (NS_HBIS_SPOORKRAAN,NS_KRAN1L,NS_KRANM1,NS_KRANM2(|L))| \
3604 (NS_ROBELA,NS_3ROBEL,NS_3ROBEL,NS_3ROBELE,NS_3ROBELE)
3605
3606 # EP 5 Freight short
3607 $DEF NL5FS1=(3-5*(NS_EAOS(|L)|NS_EANOS|NS_EANOS3(|L)|NS_EANOS2)[O:SCRAP(5|6)(|[M])])| \
3608 (3-5*(NS_HBIS1910B|NS_HBIS1940C))|(3-5*(NS_KBS4|NS_KBS3))|(3-5*(NS_FCCPPS[OB:CLAY15(|[M]),,38]))| \
3609 (3-5*(NS_UCS3810|NS_UBCS3830A|NS_UBCS3830B|NS_UCSY384)(|L))|(3-5*(NS_TADS3|NS_TADS2|NSC_TADS))| \
3610 (3-5*NS_SAHMMS357[OB:COIL23H,50,14][OB:COIL23H,91,13][OB:COIL23H,133,13][OB:COIL23H,7,13])| \
3611 (3-5*NS_SDKMMSS_TRAILSTAR)|(3-5*(NS_TADS_MESTSTOFFEN_O(|L)))|(3-5*NS_SHIMMNS_NSCARGOM)
3612
3613 # EP 5 Freight long
3614 $DEF NL5F1=5*NL5FS1
3615
3616 # EP 5 maintenance
3617 $DEF NL5FM1=(NS_WERKWY1(|L),NS_G1,NBM_WERKW1)|((6*NS_G2|NS_ROBEL5),NS_ROBEL2,NS_WERKW3)
3618
3619 # EP 6 Freight short
3620 $DEF NL6S=(3-5*(RAILPRO_FCCPPS1L|RAILPRO_FCCPPS1|RAILPRO_FCCPPS2L))|(3-5*NACCO_TADS_Y(|L))| \
3621 (3-5*EIVEL_EAOS(|L))| \
3622 (3-5*(RAI_EANOS|RAI_EANOS_S055(|L)|RAI_EANOS_X052(|L)|RAI_EAOS075BM(|L)|DBS_EAOS075M))| \
3623 (3-5*(DBC|DBS)_HABBIS345M)|(3-5*DBS_RGLNS673[O:STEEL41,,12])| \
3624 (3-5*(ACTS_SLPSX(|L)[O:ROFF_20E,7,13][O:ROFF_20E,70,13] \
3625 [O:ROFF_(20E|20GP|20G|30B|30BP|30BM|20NESTLER(|1)|30GT|30GW|30G)(|L),134,13]))
3626
3627 # EP 6 Freight long
3628 $DEF NL6F=5*NL6S
3629
3630 # EP 6 Passenger IC HSA
3631 $DEF NL6PIH=(<NS_HSA_B1L,NS_HSA_A2,NS_HSA_B5L,NS_HSA_BD4,NS_HSA_A3L,NS_HSA_A2L,NS_HSA_B1)| \
3632 (<NS_HSA_B1L,NS_HSA_A2,NS_HSA_A3,NS_HSA_BD4L,NS_HSA_B5,NS_HSA_A2L,NS_HSA_B1)
3633
3634 #----------------------------------------------------------------------------------------------------
3635 #
3636 # Denmark
3637 #
3638 # EP 3 Freight open cars
3639 $DEF DK3O=DSB_3A_PB10121(|L)|DSB_3_PB10116E(|L)|DSB_3_PB10872(|L)|DSB_3_P12009U|DSB_3_P12401B(|L)| \
3640 DSB_3_E52(042EU|401EB|401EBL)
3641
3642 # EP 3 Freight shunting
3643 $DEF DK3FS=(2-3*DK3O)|(2-3*DSB_3_G4(18|10E|10|00)(|L))|(2-3*(DSB_EM|DSB_EQ|DSB_QB))| \
3644 (2-3*DSB_3_PJB16638(|L)[OB:WOOD20(7|8|9)(|[M]),,13])| \
3645 (2-3*DSB_3_PJ17(040|167|218)(|L)[OB:WOOD21(4|5|3)(|[M]),,13])| \
3646 (2-3*DSB_3_PJ(R13975|R13933|B16638)(|L)[OB:WOOD2(11|12|09)(|[M]),,13])| \
3647 (2-3*DSB_3A_PB10121(|L)[OB:TARP_SULZER1(|L)])| \
3648 (DSB_3_GP_VIKING(|L),DSB_EQ[NB:B,BA8],DSB_ZT99999[NB:B,BA8])|(2-3*DSB_3_IA19(151|501)(|L))| \
3649 (2-3*DSB_3_HJ37(001|212|277|357)(|L))|(2-3*DSB_3_H(J37542|J37776|J37768|J37701|D38121)(|L))| \
3650 (2-3*DSB_3_G(418|410E|410|400)(|L))| \
3651 (2-3*DSB_3_P12(009U|401BL|401B)[OB:WOOD2(13|14|12|11|09|08),,12])| \
3652 (2-3*DSB_3_E52(042EU|401EBL|401EB)[OB:WOOD2(13|14|12|11|09|08),,12])| \
3653 (2-3*DSB_3_(HD38121|HJ37001|HJ37212|HJ37277|HJ37330|HJ37357|HJ37542|HJ37701|HJ37768|HJ37776)(|L))| \
3654 (2-3*DSB_3_G(418|410E|410|400)(|L))|(2-3*DSB_3_IA19(501|151)(|L))
3655
3656 # EP 3 Freight long
3657 $DEF DK3FL=7-8*DK3FS
3658
3659 # EP 3A Passenger 2/3x
3660 $DEF DK3PA1=(DSB_3A(EK6939|DO5630|EH6590)(|L), \
3661 6-7*((DSB_3A_CU4055|DSB_3A_CU4160|DSB_3A_CU4216|DSB_3A_CV4301|DSB_3A_CV4318|DSB_3A_CX4551| \
3662 DSB_3A_CX4553|DSB_3A_CY4616|DSB_3A_CY4644)(|L)))
3663
3664 # EP 3A Passenger long distance
3665 $DEF DK3PA2=(<DSB_3AED6401,5*(DSB_3A_CM2099|DSB_3A_CM2132|DSB_3A_CM2051))| \
3666 (<5*(DSB_3A_CM2051L|DSB_3A_CM2132L|DSB_3A_CM2099L),DSB_3AED6401L)
3667
3668 # EP 3B Passenger 2/3x
3669 $DEF DK3PB1=DSB_3B(EK6925|EH6597|DO5601|DO5620)(|L), \
3670 6-7*((DSB_3B_CU4048|DSB_3B_CU4071|DSB_3B_CU4101|DSB_3B_CU4164|DSB_3B_CU4201|DSB_3B_CU4249| \
3671 DSB_3B_CV4305|DSB_3B_CV4319|DSB_3B_CY4601|DSB_3B_CY4622)(|L))
3672
3673 # EP 3B Passenger regional 4x
3674 $DEF DK3PB2=(<DSB_3(_DA5005|_DB5102|BDB5107|_DH5316|_DK5901|_DK5907|_EA6002|BEA6013|BECO6242|BECO6245| \
3675 BECO6280|AED6401)(|L),DSB_3B_(CL1525|CL1624)L,DSB_3B_(AU162L|AV249L), \
3676 3*(DSB_3B_(COB|CO2742|CMR2119|CMR2123)),1-2*(DSB_3B_CR3614))| \
3677 (<2*(DSB_3B_(COB|CO2742|CMR2119|CMR2123)L),1-2*(DSB_3B_CR3614)L,DSB_3B_(CL1525|CL1624), \
3678 DSB_3(_DA5005|_DB5102|BDB5107|_DH5316|_DK5901|_DK5907|_EA6002|BEA6013|BECO6242|BECO6245|BECO6280| \
3679 AED6401)(|L))| \
3680 (<DSB_3(_DA5005|_DB5102|BDB5107|_DH5316|_DK5901|_DK5907|_EA6002|BEA6013|BECO6242|BECO6245| \
3681 BECO6280|AED6401)(|L),DSB_3B_CLE1677L,DSB_3B_BL1331L,DSB_3B_AL342L,DSB_3B_BL1322L)| \
3682 (<DSB_3B_BL1331,DSB_3B_AL342,DSB_3B_BL1322,DSB_3B_CLE1677, \
3683 DSB_3(_DA5005|_DB5102|BDB5107|_DH5316|_DK5901|_DK5907|_EA6002|BEA6013|BECO6242|BECO6245|BECO6280| \
3684 AED6401)(|L))
3685
3686 # EP 3B Passenger long distance
3687 $DEF DK3PB3=(<DSB_3(_DC5142|BDD5201)(|L), \
3688 1-2*DSB_3B_(CM2006|CM2179|CA1002|CA1026|CAE1035|CAR1041|CB1308)L,DSB_3B_(AU162|AV249), \
3689 1-2*((DSB_3B_(AC29|AC42)|DSB_3B_AF185_AY186)L), \
3690 1-2*DSB_(CB1|3B_CC1136|3B_CA1002|3B_CA1026|3B_CAE1035|3B_CAR1041|3B_CB1308))| \
3691 (<1-2*DSB_3B_(CC1136|CA1002|CA1026|CAE1035|CAR1041|CB1308)L, \
3692 1-2*(DSB_3B_(AC29|AC42)|DSB_3B_AF185_AY186),DSB_3B_(AU162|AV249)L, \
3693 1-2*DSB_3B_(CM2006|CM2179|CA1002|CA1026|CAE1035|CAR1041|CB1308),DSB_3(_DC5142|BDD5201)(|L))| \
3694 (<DSB_3B_AL341L,DSB_3C_ABG286L,5*DSB_3C_BGC001L,DSB_3BDD5201L)| \
3695 (<DSB_3BDD5201,5*DSB_3C_BGC001,DSB_3C_ABG286,DSB_3C_ABG286L)
3696
3697 # EP 3C Passenger regional 4x push and pull
3698 $DEF DK3PC1L=(<DSB_3C_BHS827L,DSB_3C_ABG286L,DSB_3C_BG049L)
3699 $DEF DK3PC1R=(<DSB_3C_ABG286,DSB_3C_BG049,DSB_3B_AL341)
3700
3701 # EP 4 Freight short
3702 $DEF DK4FS=(3-5*(DSB_4(|A|B)_GS120(10|20|28|30)(|L)))|(3-5*(DSB_HBIKKS(1|2|3|4)))| \
3703 (3-5*(DSB_HBIS225GD|DSB_HBIS225SCISSORS|DSB_HBIS225PIANO|DSB_HBIS225ALBANI|DSB_ZB_TUBORG))| \
3704 (3-5*DSB_EAOS1)| \
3705 (3-5*((DSB_EM2|DSB_4A_E5000EB(|L)|DSB_4A_E5020EU|DSB_4A_ELO5110(|L))[OB:#SCRAP_1(3|2)(|[M]),,23]))
3706
3707 # EP 4 Freight long
3708 $DEF DK4FL=5*DK4FS
3709
3710 # EP 4 Passenger long
3711 $DEF DK4PL1=(<2*(DSB_A(F|G)|DSB_AL2),DSB_WRM601,DSB_BFG,3*DSB_BG,DSB_BU1)|(<3*DSB_4BNL,DSB_4ADNS)| \
3712 (<DSB_4AG037L,DSB_4ABG287L,4*DSB_4BGC005L)|(<4*DSB_4BGC005,DSB_4ABG287,DSB_4AG037)
3713
3714 # EP 6 Freight short
3715 $DEF DK6FS=(2-3*(DBAG_EALOS058L|DBAG_5_EALOST058FV))|(2-3*RAI_HABBIINS)|(2-3*ONRAIL_FCS2(|L))| \
3716 (2-3*ITL_RES3(|L))
3717
3718 # EP 6 Freight long
3719 $DEF DK6F=DBAG_EALOS058L,DBAG_5_EALOST058FV,ONRAIL_FCS2,ONRAIL_FCS2L,RAI_HABBIINS, \
3720 4*(DSB_SDKMSL [OB:(STRAIL_KLINE|STRAIL_NORFOLKLINE|STRAIL_HANGARTNER3|STRAIL_LEMAN|STRAIL_GWG| \
3721 STRAIL_VANDIEREN1),20,4][OB:STRAILST1,137,8]| \
3722 DSB_SDKMS[OB:(STRAIL_KLINEL|STRAIL_HANGARTNER1[!L]|STRAIL_LEMANL|STRAIL_PANEUROPA2L| \
3723 STRAIL_FERCAMFL|STRAIL_POSSOZL[!L]),10,4][OB:STRAILST1,24,8]),ITL_RES3L, \
3724 2*DSB_EAOS1[O:(GRAVEL10|BALLAST47)(|[M])],3-5*(DSB_HBIKKS1|DSB_HBIKKS2|DSB_HBIKKS3|DSB_HBIKKS4)
3725
3726 #------------------------------------------------------------------------------
3727 #
3728 # Sweden
3729 #
3730 # EP 3 Freight long
3731 $DEF S3FG2=5-15*SJ_ELOS
3732
3733 $DEF S3G1=2:SJ_GBS1|2:SJ_GBS_T|2:SJ_DV30F|3:SJ_GBS|SJ_GBS_ASG|SJ_GBS_EDET
3734 $DEF S3FG1=5-15*S3G1
3735 $DEF S3F=S3FG1|S3FG2
3736
3737 # EP 3 Passenger
3738 $DEF S3P11=<1-3*SJ_C3C,1-3*SJ_C3A1,|SJ_CF4A
3739 $DEF S3P12=SJ_F5A,1-2*SJ_C3DA,2-4*SJ_CD3A
3740 $DEF S3P13=<1-2*SJ_C4,2-4*SJ_C3A,SJ_CF4
3741 $DEF S3P14=SJ_DFO5,2-5*SJ_C3DB
3742 $DEF S3P15=<1-2*SJ_CC2,2-3*SJ_C3DC,SJ_CF3|SJ_DFO20
3743
3744 $DEF S3P21=<SJ_CO5A1,2-3*SJ_2C,SJ_2BC,|SJ_2C
3745 $DEF S3P22=<SJ_CO5A2,1-3*SJ_3C,|3:$DIR(SJ_3BCL,SJ_3BC),1-2*SJ_3B
3746 $DEF S3P23=SJ_DO2,6*SJ_CO1A|SJ_CO5|SJ_CO6|SJ_CO7
3747
3748 $DEF S3P1=S3P1(1|2|3|4|5)
3749 $DEF S3P2=S3P2(1|2|3)
3750 $DEF S3P=S3P1|S3P2
3751
3752 # EP 4 Freight short
3753 $DEF S4FK1=SJ_DV30A|SJ_OB|SJ_GBS_ASG|SJ_OR|(SJ_OMS|SJ_OP(1|2)[OB:BARREL11,,21])|SJ_KBPS741| \
3754 SJ_LGJS[OB:C2_SEALAND2,12,12][OB:C2_SEALAND,75,12]|SJ_GBS1, \
3755 SJ_ELOS|SJ_L|SJ_OMS|SJ_4_RS6(8|9)1[OB:PIP29,,12]
3756
3757 $DEF S4F=4-7*S4FK1
3758
3759 # EP 4 Freight long
3760 $DEF S4FL1=15-20*S4FK1
3761
3762 # EP 4 Passenger push and pull left
3763 $DEF S3PPL=<SJ_AFM7L,SJ_B7K,SJ_B7(B|IC),SJ_BR2,SJ_S1RT|SJ_S11R|SJ_S11RZ|SJ_R2B|SJ_R4B,SJ_A7(IC|B), \
3764 SJ_ABO24,SJ_F33Z|SJ_DF21Z
3765
3766 # EP 5 Freight short
3767 $DEF S5FS=(4-5*((SJ_5A_EAOS5400(|L)|SJ_EASOS)[OB:SCRAP(6|4|5)(|[M]),,32]))| \
3768 (4-5*(SJ_HABBINS941|SJ_HBBILLNS1|SJ_HBBILLNS2|SJ_HBBILLNS4|SZ_HBBILLNS))| \
3769 (4-5*(SJ_LGJS,SJ_LGJS1|SJ_LGNS2|SJ_DV30B|SJ_DV30A|SJ_DV30,SJ_HBBINSZ))
3770
3771 # EP 5 Freight long
3772 $DEF S5F1=(4-5*S5FS)
3773
3774 # EP 6 Freight short
3775 $DEF S6FS=(4-5*(SJ_HCCMRRS|SJ_LAAEILPRS|SJ_AUDICARS|SJ_SDGMS833(|L)))|(3-4*SJ_LGJS)| \
3776 (4-5*(SJ_HBBINSZ|SJ_HBBINS1Z|SJ_HBBINS2Z|SJ_HABINS|SJ_HABINS2|SJ_HABBINS941|SJ_HBBINS3Z|SJ_HBBINS| \
3777 SJ_HBBINS1|SJ_HBBINS2|SJ_HBBINS3~ARN|SJ_HBBINS3~KAR|SJ_HBBINS4|SJ_HBBILLNS3|SJ_HBBILLNS4))| \
3778 (4-5*(SJ_LGJS1[OB:(C4S_EVERGREEN|C4S_KLINE|C4S_PONED|C4R_CAPITAL|C4R_CHINA|C4R_CHINA2|C4R_CMACGM2| \
3779 C4R_COSCO1|C4R_EG2|C4R_GEE|C4R_HANJIN1|C4R_IFF1|C4R_KLINE1|C4R_MAERSK4|C4R_PO1|C4R_YANG2|C4R_UASC| \
3780 C4T_BERTSCHI5|C4T_03|C4T_RIWATRANS),,12]))|(4-5*(SJ_5B_EAOS5400(|L)[OB:SCRAP(6|4|5)(|[M]),,32]))| \
3781 (4-5*SJ_RMMNS3442028S(|L))|(4-5*(GC_HBBINS(1|2|3)|GC_HBBILLNS1|GC_HBINS1)(|L))
3782
3783 # EP 6 Freight long
3784 $DEF S6F1=5*S6FS
3785
3786 # EP 6 Freight long container
3787 $DEF S6F2=4-6*(AAE_SGGMRSS(90L|90AL|90A|90L|90B) \
3788 [O:(C2062|C2RT12|C2RT13|C2RT14|C2RT15|C2RS_TRANS_EUROPEAN_TRANSPORT|C2RS_TFG1|C2RO_TIPES),10,11] \
3789 [O:(C2_ANL2|C2RT16|C2RT_JUMBO|C2RT_BERTSCHI14|C2RT_BERTSCHI15|C2RT_BERTSCHI16|C2RT_BULKHAUL4| \
3790 C2RO_TRITON|C2RO_VECCI_ZIRONI),77,11] \
3791 [O:(C2_IBC1|C2T_JOT1|C2T_INTERFLOW2|C2RT_LFT2|C2RT_LINDE2|C2RT_MEURER|C2RT_RINNEN2|C2RO03|C2RO04| \
3792 C2R_EG3|C2R_EG6),156,11] \
3793 [O:(C2_VOLVO2|C2RT05|C2RT09|C2RT10|C2IT_CARGODOMINO1|C2RT_EUROTAINER3|C2RT_FOODFLOW|C2RT_GRUBAR| \
3794 C2RT_HOYER4|C2RT_HOYER5),222,11]), \
3795 4-6*(AAE_SGGMRSS(90L|90AL|90A|90L|90B) \
3796 [O:C3_UBC2|C3I_BERTSCHI6|C3I_BULKHAUL1|C3I_HANJIN1|C3I_KLINE1|C3I_MOL2|C3IP_FERCAM4|C3IT_DONATI1| \
3797 C3IT_GREIWING1|C3IT_RINNEN1|C3T_BUZZATTI,20,11] \
3798 [O:C3_EG2|C3_BERTSCHI4|C3_BERTSCHI5|C3_IBC1|C3_UBC1|C3_S2|C3I_BERTSCHI3|C3I_EG1|C3_IFF1| \
3799 C3I_KLINE2|C3_MOL|C3I_UASC1|C3T_DONATI|C3T_GIEZENDANNER|C3T_RAILROADS|C3T_RINNEN2|C3T_RIWATRANS, \
3800 184,11]), \
3801 4-6*(AAE_SGGMRSS(90L|90AL|90A|90L|90B) \
3802 [O:(C2I_CAI_IP|C2_CHINA|C2I_COSCO1|C2I_EVERGREEN2|C2I_KLINE4|C2I_MOL6|C2I_MOL4),10,11] \
3803 [O:(C2I_EVERGREEN1|C2I_GESEACO1|C2I_HANJIN2|C2I_KLINE3|C2I_MOL7|C2I_PO4|C2I_RCL1|C2I_SIEMENS1| \
3804 C2I_SITC1|C2I_UASC1|C2I_TTC1),77,11] \
3805 [O:(C2I_KLINE2|C2I_MOL6|C2I_PO3|C2I_SINOTRANS3|C2I_TRANS_CONTAINER1|C2I_TRITON2|C2I_UNIGLORY1| \
3806 C2I_PO2|C2I_SINOCON1|C2_SZDU3|C2_TEX|C2I_UNIK1),156,11] \
3807 [O:(C2I_MOL9|C2_MORFLOT4|C2I_NEDLLOYD1|C2I_PO1|C2_APL|C2I_CAI_IP|C2I_COSCO1|C2I_COSCO3|C2_EG4| \
3808 C2I_FCL1|C2I_HANJIN3|C2_KLINE1|C2_MOL|C2_MORFLOT2|C2I_SINOTRANS1),222,11])
3809
3810 #------------------------------------------------------------------------------
3811 #
3812 # Norway
3813 #
3814 # EP 3 Freight short
3815 $DEF N3FS1=(3-5*NSB_3_G4(|D1V1|S1|B|BV1|V1)(|L))|(3-5*NSB_3_G4(L1V1|D1L1V1|L1|BD1|BD1V1)(|L))| \
3816 (3-5*(NSB_3_L37894[OB:FR_ERZ(19|20),,28](|L)))|(3-5*NSB_3_G3(36|3345|3681|3602|3687|5843)(|L))
3817
3818 # EP 3 Freight long
3819 $DEF N3FL1=5*N3FS1
3820
3821 # EP 3 Passenger
3822 $DEF N3P=$DIR(NSB_BD3_B,NSB_BD3_BL)|NSB_BM93,0-3*NSB_B3_B(|L), \
3823 |NSB_AB3_B|NSB_AB3_BL|(<NSB_AB3_C,NSB_AB3_CL),1-3*NSB_B3_B(|L)
3824
3825 # EP 3 Passenger E3 B
3826 $DEF N3PB1=(<NSB_3(B3F3_21406|F3_21421)(|L)|NSB_3B(F10_21513|3BF12)L, \
3827 3*NSB_3B(2_25503|2_25504|3B3|3B4)L,NSB_3B3(BR_21202|R1)L,NSB_3B3AB1(1|2)L,NSB_3B3A2L, \
3828 NSB_3B3WLAB210(35|81)L)| \
3829 (<NSB_3B3WLAB210(35|81),NSB_3B3A2,NSB_3B3AB1(1|2),NSB_3B3(BR_21202|R1), \
3830 3*NSB_3B(2_25503|2_25504|3B3|3B4),NSB_3B(F10_21513|3BF12)|NSB_3(B3F3_21406|F3_21421)(|L))
3831
3832 # EP 4 Freight short
3833 $DEF N45G1=4-5*G_SHIM
3834 $DEF N45G2=4-5*(NSB_HBIKKS|NSB_HBIKKS1|NSB_RGS1[OB:PIPE(19|20),,10])
3835 $DEF N45G3=4-5*NSB_UADHS
3836 $DEF N45G4=4-5*NSB_RGS1
3837 $DEF N45G5=4-5*(NSB_4_EAOS5350(|L)[O:SCRAP(5|6|4)(|[M])])
3838 $DEF N45G6=4-5*(NSB_4_G4((|D1V1)|B|BV1|V1|BD1|BD1V1)(|L))
3839 $DEF N45G7=4-5*(NSB_4_G4(|V1|D1V1|B|BD1|BD1V1)(|L))
3840 $DEF N45G8=4-5*NSB_4B_GS(1200|1201|1201E|1202)(|L)
3841 $DEF N45G9=4-5*NSB_4B_HIS2102T(2D|2|1D|1|3)(|L)
3842
3843 $DEF N4FS=N45G(7|4|5|1|2|3|6|8|9)
3844
3845 # EP 4 Freight long
3846 $DEF N4F=4-5*(1:(4-5*S4FK1)|7:N45G(1|2|3|4|5|6|7))
3847
3848 # EP 4 Passenger
3849 $DEF N4P=(<NSB_BD3_BL,3*NSB_B3_B(|L),NSB_AB3_B(|L))|(<NSB_AB3_C(|L),3*NSB_B3_B(|L),NSB_BD3_B)| \
3850 (<NSB_4F3_214(20|07)(|L)|NSB_4BF10_21509L,3*NSB_4B(F10_21509|4|2_25510|2_25517)(|L),NSB_4AB11L)| \
3851 (<NSB_4AB11,3*NSB_4B(F10_21509|4|2_25510|2_25517)(|L),NSB_4BF10_21509|NSB_4F3_214(20|07)(|L))| \
3852 (<NSB_4BF14L,3*NSB_4B5(|L),NSB_4A3(|L))|(<NSB_4A3(|L),3*NSB_4B5(|L),NSB_4BF14)
3853
3854 # EP 5 Freight short
3855 $DEF N5FS=4-8*(G_SHIM|NSB_HBIKKS|NSB_HBIKKS1|NSB_RGS1[OB:PIPE(19|20),,10]|NSB_UADHS)
3856
3857 # EP 5 Freight long
3858 $DEF N5F=3*N5FS
3859
3860 # EP 5A Passenger
3861 $DEF N5PA1=(<NSB_5A_BF14L,3*NSB_5A_B5(|L),NSB_5A_A3(|L))|(<NSB_5A_A3(|L),3*NSB_5A_B5(|L),NSB_5A_BF14)
3862
3863 # EP 5B Passenger
3864 $DEF N5PB1=(<NSB_5BF12L,NSB_5B3L,NSB_5FR3_21266L,2*NSB_5CB1_2121(7|8)L,NSB_5WLAB21080L)| \
3865 (<NSB_5WLAB21080,NSB_5CB1_2121(7|8),NSB_5FR3_21266,NSB_5B3,NSB_5BF12)| \
3866 (<NSB_5B_BF14L,3*NSB_5B_B5(|L),NSB_5B_A3(|L))|(<NSB_5B_A3(|L),3*NSB_5B_B5(|L),NSB_5B_BF14)
3867
3868 # EP 6 Freight short
3869 $DEF N6FR=NSB_HBIKKS(|1)|NSB_UADHS|NSB_RGS1[O:PIPE59,,12]
3870 $DEF N6FS=1:S6FS|2:(4*NSB_HCCRRS(1|3|2|0))|2:(4*N6FR)
3871 # EP 6 Freight long
3872 $DEF N6FL=4-5*N6FS
3873
3874 # EP 6 Passenger
3875 $DEF N6P1=(<NSB_6FR521722(|L)|NSB_6BF1421715L,3*NSB_6(B526028|A526059|B526002)(|L))| \
3876 (<3*NSB_6(B526028|A526059|B526002)(|L),NSB_6FR521722(|L)|NSB_6BF1421715)
3877
3878 #------------------------------------------------------------------------------
3879 # Finnland
3880 #------------------------------------------------------------------------------
3881
3882 # EP 4 Passenger short
3883
3884 $DEF FI4PS1=(<VR_FOTL,VR_FOT|VR_CI|VR_CHTL,VR_CIL|VR_CHT,VR_CEI|VR_CEIL,VR_RKL,VR_RK|VR_EIN|VR_EINU, \
3885 VR_EINL|VR_EINUL,VR_EIT)
3886
3887 # EP 6 Freight short
3888 # EP 6 Freight
3889 $DEF FI6FS=(2-3*VR_HAIT4)|(2-3*VR_HBIKK(|2|3))|(2-3*VR_GBLNT(|2))|(2-3*RF_HCCMQQR)| \
3890 (2-3*(VR_SONK|VR_ZAGS))|(2-3*(VR_SONK|VR_ZAGS))|(2-3*VR_OB143007[OB:WOOD1(24|28|30|29),,12])
3891
3892 $DEF FI6FS1=2*FI6FS
3893
3894 # EP 6 Freight long
3895 $DEF FI6FL1=8*FI6FS
3896
3897 #------------------------------------------------------------------------------
3898 # Portugal
3899 #------------------------------------------------------------------------------
3900
3901 # EP 3 Freight short
3902 $DEF P3FS=(2-3*(CP_3_JV302U|CP_3_JFV310UH(|L)|CP_3_JV502U|CP_3_JV502(|L)|CP_3_JFV510H(|L)))
3903 $DEF P3FS1=2-3*P3FS
3904
3905 # EP 4 Freight short
3906 $DEF P4FS=(2-3*((CP_4_GLM1022|CP_4_GLM10230H|CP_4_GLM10230H3|CP_4_GLM10231|CP_4_GKKLMS1385| \
3907 CP_4_GKKLMS1385H3|CP_4_GKKLMS1385H|CP_4_U9402)(|L)))|(2-3*(CP_4_U9402(|L)))| \
3908 (2-3*(CP_4_GLM1024(|H|HL|L|U)))|(2-3*CP_US)|(2-3*CP_4_UHK7032(|L))|(2-3*CP_SGS(1|2))| \
3909 (2-3*(CP_G2|CP_GABS(1|2)))|(2-3*(CP_GBKKS(7|8)(|L)))| \
3910 (2-3*(CP_HIS(3|1|2|4|5)(|L)|CP_HIS2|CP_HIS(1|2)(|L)|CP_HIKKS))|(2-3*(CP_GBKKS(2|3)(|L)))| \
3911 (2-3*(CP_4_U9402(|L)))|(2-3*(CP_4_GLM1024(|H|HL|L|U)))|(2-3*CP_US)| \
3912 (2-3*(CP_EKKLS|CP_EKKLS2|CP_ELOS|CP_EKKLO)[OB:GRAVEL10,,27])|(2-3*(CP_KBS(|L)|CP_KBKKS1|CP_KBKKS2))
3913 $DEF P4FS1=2-3*P4FS
3914
3915 # EP 5/6 Freight long
3916
3917 $DEF P6FL1=(<RF_LAAEKS3,RF_LAAEKS0,SEMAT_LADKS,CP_RS,CP_KBKKMPS1, \
3918 RF_LAAGRSS1[O:C4_KS1,170,9][O:C4_KS2,20,9],RF_HBFIS239B,RF_LAAGRSS,CP_GABS4,CP_GABS2)
3919
3920 #------------------------------------------------------------------------------
3921 # Spain
3922 #------------------------------------------------------------------------------
3923 #
3924 $DEF E3OE1=(RF_XP_PONFEHL|RF_XP_EBROH|RF_X1H|RF_X2H|RF_X3H|RF_X4H)L[#E!OB:AG55,*42,28]| \
3925 (RF_XP_PONFEHL|RF_XP_EBROH|RF_X1H)[#E!OB:AG55,*38,28]|(RF_XP_PONFE|RF_XP_EBRO)[#E!OB:AG55,*38,28]
3926 $DEF E3O=(RF_X1|RF_X2|RF_X3|RF_X4|RF_X5A|RF_X5B|RF_X5C)[#E!OB:AG55,*38,28]| \
3927 (RF_X1H|RF_X2H|RF_X5HC)[#E!OB:AG55,*38,28]|(RF_X1H|RF_X2H|RF_X4H)L[#E!OB:AG55,*42,28]
3928 $DEF E3OG=RF_X1(P1|P2|P3|P4|P5|W1|W2)
3929 $DEF E3G1=RF_J200000(A|B|C)|RF_G(3|4)| \
3930 6:RF_J300000(E|E1|EB|EBL|EH|EHH|EHHL|EHL|T|T1|TB|TBL|TH|THH|THHL|THL|Y|Y1|YB|YH|YHH|YHHL)
3931
3932 $DEF E_UAS=RF_UAS(1|1E|2|3)
3933 $DEF E_EALOS=RF_EALOS(|1B|2|2B|2C|3|3B|3C|3D|3E|3F)[#E!O:AG120]
3934 $DEF E_HABIS=RF_HABISS(1|2|3|4)(A|B)
3935 $DEF E_SHIM=RF_SHIMMS4768AL|RF_SHIMMS4768A|RF_SHIMMS4768BL|RF_SHIMMS4768B|RF_SHIMMS|RF_G2
3936 $DEF E4G=RF_GS(1|2|3|4|5|6|7|8)
3937 $DEF E4T=RF_RRP_USAF(|L)
3938 $DEF E5C=RF_(4|5)SDGKKMSS(|L)[O:C40A,,12]
3939
3940 # EP 3 Freight long
3941 $DEF E3FL1=(<RF_TRFS1,RF_J600000A,NOR_G1,RF_J300000E1,RF_M_BAT,RF_M1H,RF_J300000Y1,RF_J300000YB, \
3942 RF_M1HL,RF_M_UNI_H,RF_X2,RF_X2HL,RF_CER1,RF_CER2,RF_CG1,RF_J1_NORTEL,RF_J1_NORTE,RF_XP3, \
3943 RF_X300000T1BL,RF_JT2BL,RF_JT1,RF_X300000T,RF_X300000TH,RF_XP2,RF_DV340200,RF_G4ANIS)
3944 $DEF E3FL2=5-6*((3-4*RF_R_CAMPSA(2|2H|2HL))|(3-4*RF_PRR5151(2|6)(|L))| \
3945 (3-4*(RF_(PR130006|PR510001|PR510010|RR1|PR_EXPLOSIVE)))|(3-4*(RF_PNN1(6704|7092|7091|6704L)))| \
3946 (3-4*(RF_PN(520061|520062|520063|520060|300000T|300000THL|17190|17283|16500)))| \
3947 (3-4*RF_J(1A|1C|1D|2|2A|1H|2(B|H)(|L))|(3-4*(RF_(J_G|GGH)))))
3948 $DEF E3FL=E3FL(1|2)
3949
3950 # EP 3 Freight short
3951 $DEF E3FS=1-5*E3G1|(|[!E])E3O|E3OG
3952
3953 # EP 3 Long Distance class 5000
3954 $DEF E3PL1=(<RF_AAWL5000_1,RF_AA5000_1,(RF_AAB5000_1|RF_AAC5000_1),RF_BB5000A_1,RF_AAR5000_1, \
3955 2*RF_BB5000B_1,2*RF_CC5000_1,(RF_CCD5000_1|RF_DD5000_1|RF_DDT5003_1|RF_DDT5027_1), \
3956 RF_DGDC1516(A|B|C)(|L)|RF_DGDC2000(A|B)(|L))| \
3957 (<RF_DGDC2000(A|B)(|L)|RF_DGDC1541(A|B|C)(|L), \
3958 (RF_CCD5000_1L|RF_DD5000_1L|RF_DDT5003_1L|RF_DDT5027_1L),2*RF_CC5000_1L,2*RF_BB5000B_1L, \
3959 RF_AAR5000_1L,RF_BB5000A_1L,(RF_AAB5000_1L|RF_AAC5000_1L),RF_AA5000_1L,RF_AAWL5000_1L)
3960
3961 # EP 4 Long Distance class 5000
3962 $DEF E4PL5=(<2*RF_BB4_5100_(2|3|4),RF_AAWL(|R)5000_(2|3),RF_AA5000_2,RF_AAR5000_(2|3), \
3963 3*RF_BB5000(A|B)_(4|3|2),RF_BBD4_5000_(2|3|4))| \
3964 (<RF_BBD4_5000_(2|3|4)L,3*RF_BB5000(A|B)_(4|3|2)L,RF_AAR5000_(2|3)L,RF_AA5000_2L, \
3965 RF_AAWL(|R)5000_(2|3)L,2*RF_BB4_5100_(2|3|4)L)| \
3966 (<2*RF_BB4_5100_(2|3|4),RF_AAB5000_(2|3|4),RF_AA5000_2,RF_AAR5000_(2|3),3*RF_BB5000(A|B)_(4|3|2), \
3967 RF_BB1_5200_(2|3|4),RF_DGDC1541(E|F)(|L)|RF_DGDC2000C(|L))| \
3968 (<RF_DGDC1529M(|L)|RF_DGDC2000C(|L),RF_BB1_5200_(2|3|4)L,3*RF_BB5000(A|B)_(4|3|2)L, \
3969 RF_AAR5000_(2|3)L,RF_AA5000_2L,RF_AAB5000_(2|3|4)L,2*RF_BB4_5100_(2|3|4)L)| \
3970 (<RF_DGDC2000C(|L)|RF_DGDC1516(D|E),3*RF_BB5000(A|B)_(2|3|4),RF_AAB4_5100_(2|3|4),RF_AA5000_2, \
3971 RF_AAR5058,2*RF_BB1_5200_(2|3|4),(RF_DD5000_2|RF_DDT5003_2|RF_DDTCE5015))| \
3972 (<(RF_DD5000_2L|RF_DDT5003_2L|RF_DDTCE5015L),2*RF_BB1_5200_(2|3|4)L,RF_AAR5058L,RF_AA5000_2L, \
3973 RF_AAB4_5100_(2|3|4)L,3*RF_BB5000(A|B)_(2|3|4)L,RF_DGDC1516(D|E)L|RF_DGDC2000C(|L))
3974
3975 # EP 4 Long Distance 1970s
3976 $DEF E4PL7=(<RF_B12R12L,2*RF_B12R11L,RF_A10R02L|RF_A10R03L,RF_A5B501L,RF_B12R13L,RF_D801(|L))| \
3977 (<(3*RF_(B12R12|B12R11|B10R03|B10R02|B12R03)L),RF_R80(1|2)G0L,RF_A10R02L|RF_A10R03L,RF_A5B501L, \
3978 RF_B12R13L)| \
3979 (<RF_D801(|L),RF_B12R13,RF_R80(1|2)G0,RF_A5B501,RF_A10R02|RF_A10R03, \
3980 (3*RF_(B12R12|B12R11|B10R03|B10R02|B12R03)))| \
3981 (<RF_8000D8_EST(1|2|3)(|L),2*RF_AA9(100|100A|009|000|000A),RF_AR7T1|RF_AAR9700|RF_BBR9800(|A), \
3982 4*RF_BB9(241|201|241A|207|201A))| \
3983 (<(4*(RF_BB9(241|201|241A|207|201A)L)),RF_AR7T1L|RF_AAR9700L|RF_AR7T1L|RF_BBR9800(|A)L, \
3984 2*RF_AA9(100|100A|009|000|000A)L,RF_8000D8_EST(1|2|3)(|L))| \
3985 (<RF_D11000A(|L),4*CIWL_T2(01|02),RF_R80(1|2)G0|RF_RRR8000G3, \
3986 6*(RF_BB8500G3|RF_BB8500G13|RF_BBL8100G3|RF_BBL8218G3))| \
3987 (<(6*(RF_BB8500G3|RF_BB8500G13|RF_BBL8100G3|RF_BBL8218G3)L),RF_R80(1|2)G0L|RF_RRR8000G3L, \
3988 4*CIWL_T2(01|02)L)
3989
3990 # EP 4 Long Distance 1980s
3991 $DEF E4PL8=(<(3*CIWL_T2A),6*RF_1260(0BC10|0BC10X|4BC10X),RF_12800BR6X,RF_12400D12(|L))| \
3992 (<(3*RF_WL4601),RF_12000R(1|2),6*RF_12750BC10XO,RF_BBR10800(|A),RF_12400D12)| \
3993 (<(3*CIWL_T2A),6*RF_BBL10(601|602),RF_BBR10800(|A),RF_DDE10400(|A))| \
3994 (<(3*CIWL_T2AL),6*RF_BBL10(601|602)L,RF_BBR10800(|A)L,RF_DDE10400(|A)L|RF_DGCT20(29|09)(|L))| \
3995 (<RF_8100D8_EST(|1)L,(6*RF_12(232B12|200B12A|200B12B|300B12X1|301B12X)L), \
3996 RF_12850AR5X1L|RF_12800BR6XL,(3*RF_12(000A10|100A10X1|100A10X3|100A10X2|000A12TV1|000A12TV2)L))| \
3997 (<(3*RF_AA100(00|01|02|02A|02B|22|02O)),RF_BBR10800(|A),6*RF_BB10(200O|218|200|200GC3D|212A), \
3998 RF_DDE10400(|A)|RF_DGCT20(29|09)(|L))| \
3999 (<RF_8100D8_EST(|1),(6*RF_12(232B12|200B12A|200B12B|300B12X1|301B12X)),RF_12850AR5X1|RF_12800BR6X, \
4000 (3*RF_12(000A10|100A10X1|100A10X3|100A10X2|000A12TV1|000A12TV2)))| \
4001 (<RF_DGCT20(29|09)(|L)|RF_12400D12(|L),RF_12800BR6XL,6*RF_1260(0BC10|0BC10X|4BC10X)L,3*CIWL_T2AL, \
4002 RF_DDE10400(|A)L)| \
4003 (<(3*RF_AA100(00|01|02|02A|02B|22|02O)L),RF_BBR10800(|A)L,6*RF_BB10(200O|218|200|200GC3D|212A)L, \
4004 RF_DDE10400(|A)L)| \
4005 (<(3*RF_WL4601L),RF_12000R(1|2)L,6*RF_12750BC10XOL,RF_BBR10800(|A)L,RF_12400D12L)| \
4006 (<4*RF_T2(01|02|03),RF_R805A,6*(RF_12600BC10|RF_12600BC10X|RF_12604BC10X|RF_12750BC10XO), \
4007 RF_D11000(C|D)(|L))| \
4008 (<RF_DGCT20(29|09)(|L)|RF_D11000(C|D)(|L),RF_R805AL, \
4009 6*(RF_12600BC10L|RF_12600BC10XL|RF_12604BC10XL|RF_12750BC10XOL),4*RF_T2(01|02|03)L)
4010
4011 # EP 4 Train Middle Distance 1980s
4012 $DEF E4PR1=(<(3*RF_BB9201(|A)),RF_R804(|A|B)|RF_R805(|A)|RF_RRR9900(|A),RF_AA9100(|A),RF_8000B12R_NI, \
4013 (RF_D8_8000PA(|1|2|3|4|5|6)|RF_D8_8100PA(|1|2|5|6)))| \
4014 (<(RF_D8_8000PA(|1|2|3|4|5|6)L|RF_D8_8100PA(|1|2|5|6)L),RF_8000B12R_NIL,RF_AA9100(|A)L, \
4015 RF_R804(|A|B)L|RF_R805(|A)L|RF_RRR9900(|A)L,(3*RF_BB9201(|A)))
4016 $DEF E4FS=1-5*E_EALOS(|[!E])|E4T|E4G
4017
4018 # EP 4 Freight short
4019 $DEF E4FS1=(3-4*(RF_MMQ_250273E|RF_MMQ_250273))|(3-4*(E_UAS))|(3-4*(E_EALOS(|[!E])))| \
4020 (3-4*(RF_T3(|L)))|(3-4*(E_HABIS))|(3-4*(E_SHIM))|(3-4*(RF_J60000(1|2)))|(3-4*(RF_EKKLOS))| \
4021 (3-4*(RF_RRP_USAF(L)))|(3-4*(RF_PT20017(L)))|(3-4*(RF_TRFS1))|(3-4*(RF_HEE2013))| \
4022 (3-4*(RF_J600000(A|C|B|H|HL)|RF_J500000(D|H1|H1L|DRH|DR|DW|DWH)))| \
4023 (3-4*(RF_MMQ_250273E|RF_MMQ_250273))| \
4024 (RF_RGS1[O:C2R_RF4,8,13][O:C2R_RF4,70,13][O:C2I_SIEMENS1,132,13], \
4025 RF_RGS1[O:C2_OBB,8,13][O:C2_EZ3,70,13][O:C2_DSR,132,13], \
4026 RF_RGS1[O:C2_DEUT1,8,13][O:C2037,70,13][O:C2031,132,13])| \
4027 (3-4*(RF_RGS2[OB:BOILERRINGS,14,13][OB:BOILERRINGS,68,13]|RF_RGS2[OB:BETON2,,13]))| \
4028 (3-4*(TF_4_HFHS2148(|F|B)(|L)|TF_4_HCFHS2141(|L)))
4029
4030 # EP 4 Freight long
4031 $DEF E4F0=10-16*(E_UAS|E_EALOS|E_HABIS|E_SHIM)
4032 $DEF E4F1=8-15*E_UAS
4033 $DEF E4F2=10-18*RF_T3(|L)
4034 $DEF E4F3=12-16*E_EALOS(|[!E])
4035 $DEF E4F4=10-15*(RF_EKKLOS|RF_PT20017(L)|RF_RRP_USAF(L)|RF_J60000(1|2)|RF_GS(1|2|3|4|5|6|7|8))
4036 $DEF E4F=E4F(3:0|1|2|3|4)
4037 $DEF E4FL1=5*E4FS1
4038
4039 # EP 5 Long Distance 1994
4040 $DEF E5PL4=(<(RF_WL26XGC_EST(|L)|RF_WL26X_EST(|L)),2*RF_AA100(22|02B|02A)(|L),RF_BBR10800(|A)(|L), \
4041 5*(RF_BBL9600(|O)(|L)|RF_BBL10(602|601)(|L)|RF_BB10(212|200GC3D|218|200)(|L)), \
4042 RF_DGDC3001O|RF_8100D8_EST(|1)|RF_DDE10400(|A)(|L)|RF_DDE10400(|A)(|L)|RF_(DGCT2005|PS2028)(|L))| \
4043 (<(3*RF_T2L),6*RF_BC11000(D|C|B|A),RF_BBR10800(|A),RF_D11000(C|A|B|D))| \
4044 (<(3*RF_WL5302),6*RF_BC11000(D|C|B|A)L,RF_BBR10800(|A)L,RF_D11000(C|A|B|D)L)| \
4045 (<(3*RF_WL4601),RF_12000R(1|2),6*RF_12750BC10XO,RF_BBR10800(|A),RF_12400D12)| \
4046 (<(3*RF_WL4601L),RF_12000R(1|2),6*RF_12750BC10XO,RF_BBR10800(|A),RF_12400D12)| \
4047 (<RF_(DGCT2005|PS2028)(|L)|RF_LR_DG90(1|2)(|L),(2*RF_T2B),RF_LR_R90(1|2|3), \
4048 (6*RF_LR_BC10X90(1|2|3)P))| \
4049 (<(6*RF_LR_BC10X90(1|2|3)D),RF_LR_R90(1|2|3)L,2*RF_T2B,RF_LR_DG90(1|2)(|L))| \
4050 (<(3*RF_LR_A9T0(1|2|3|4|5|6)),RF_LR_AR7T|RF_LR_BR4T|RF_LR_BR3T02|RF_LR_BR3T01, \
4051 (6*RF_LR_B1(0|1)T0(101|201|102|202)))| \
4052 (<(3*RF_LR_A12T0(1|2|3)),(6*RF_LR_B1(0|1)T0(101|201|102|202)))| \
4053 (<(6*RF_LR_B1(0|1)T0(101|201|102|202)L),(3*RF_LR_A12T0(1|2|3)L))| \
4054 (<(6*RF_LR_B1(0|1)T0(101|201|102|202)L),RF_LR_AR7TL|RF_LR_BR4TL|RF_LR_BR3T02L|RF_LR_BR3T01L, \
4055 3*RF_LR_A9T0(1|2|3|4|5|6)L)|(<3*RF_LR_T20(1|2|3)L,RF_LR_R90(1|2|3)L,6*RF_LR_BC10X90(1|2|3)D)| \
4056 (<6*RF_LR_BC10X90(1|2|3)P,3*RF_LR_T20(1|2|3))| \
4057 (<3*RF_LR_T20(1|2|3),6*RF_BC11000(D|C|B|A)L,RF_DDT9450(|A|O)(|L)|RF_(DGCT2005|PS2028)(|L))| \
4058 (6*RF_BC11000(D|C|B|A),RF_LR_R90(1|2|3),3*RF_LR_T20(1|2|3))
4059
4060 # EP 5 Long Distance 1998
4061 $DEF E5PL8=(<(3*RF_GL_A9T0(1|2|3|4)),RF_GL_AR7T,6*(RF_GL_B1(0|1)T0(101|201|102|202)))| \
4062 (<(6*RF_GL_B11T0(101|102|103|104|203)L),RF_GL_BR(4T|3T02|3T01)L,(3*RF_GL_A12T0(1|2|3|4)L))| \
4063 (<RF_DDT9450(|O|A)(|L),2*RF_T2B,RF_GL_R90(1|2|3),6*(RF_GL_BC10X90(1|2|3)))| \
4064 (<(6*RF_GL_B1(0|1)T0(101|201|102|202)L),RF_GL_AR7TL,(3*RF_GL_A9T0(1|2|3|4)L))| \
4065 (<(3*(RF_GL_A10X0(1|2|3|4)|RF_GL_A8LV0(1|2))),RF_GL_BR4X0(1|2|3),2*RF_GL_B11X0(1|2|3), \
4066 2*(RF_GL_BC10X0(1|2|3)))| \
4067 (<(3*(RF_GL_A10X0(1|2|3|4)L|RF_GL_A8LV0(1|2)L)),RF_GL_BR4X0(1|2|3)L,2*RF_GL_B11X0(1|2|3)L, \
4068 2*(RF_GL_BC10X0(1|2|3)L))| \
4069 (<(2*(RF_GL_B11X0(1|2|3)L)),2*(RF_GL_B11X0(1|2|3)L),RF_GL_BR4X0(1|2|3)L, \
4070 (3*(RF_GL_A10X0(1|2|3|4)L|RF_GL_A8LV0(1|2)L)))| \
4071 (<(3*RF_GL_A12T0(1|2|3|4)),RF_GL_BR(4T|3T02|3T01),(6*RF_GL_B11T0(101|102|103|104|203)))| \
4072 (<(6*RF_GL_BC10X90(1|2|3)L),RF_GL_R90(1|2|3)L,2*RF_T2B,RF_DDT9450(|O|A)(|L))| \
4073 (<(3*RF_BB10000GL|RF_NBBL10000GL),RF_BBR10000GL,4*RF_AA10000GL,RF_DD10000GL)| \
4074 (<3*RF_GL_T20(1|2|3|4|5)L,RF_GL_R90(1|2|3)L,6*(RF_GL_BC10X90(1|2|3)L|RF_BC10R_822(9|8)L), \
4075 RF_D8_8100LR(|L))| \
4076 (<RF_D8_8100LR(|L),6*(RF_GL_BC10X90(1|2|3)|RF_BC10R_822(9|8)),RF_GL_R90(1|2|3), \
4077 3*RF_GL_T20(1|2|3|4|5))
4078
4079 # EP 5 Freight short
4080
4081 $DEF E5FS=(1-3*E_HABIS|E_SHIM)|(1-3*E5C)|(1-3*(E_UAS|E_EALOS|E_HABIS|E_SHIM))| \
4082 (1-3*((RF_GBS_267(1154A|1154B|1154C|1154D)(|L))|(RF_GBGS_417(1154A|1154B|1154C|1154D)(|L))))| \
4083 (1-3*(CP_UACS_CIMPOR|CP_ZAES_TRANSFESA|RF_ZAES))| \
4084 (1-3*(RF_HABISS1A|RF_HABISS3A|RF_HABISS4A|RF_HABISS2A))|(1-3*(RF_HBIS|RF_G1))| \
4085 (1-3*(RF_TAGPPS|RF_TGPPS))|(1-3*(RF_EALOS2|RF_EALOS2B|RF_EALOS2C))| \
4086 (1-3*(RF_SHIMMS4774A|RF_SHIMMS4774B|RF_SHIMMS4768BL|RF_SHIMMS4768B),CP_SGS2[O:C4R_POST_CORREOS])
4087
4088 # EP 5 Freight long
4089 $DEF E5FL1=8-9*E5FS
4090 $DEF E5FL2=14-16*(RF_5SDGKKMSS[OB:(STRAIL_POWERCORE1|STRAIL_PANEUROPA2L|STRAIL_ESTRELLAL| \
4091 STRAIL_NORFOLKLINEL|STRAIL_COMBIPLANTL),10,4][OB:(STRAILST1),24,9]| \
4092 RF_5SDGKKMSSL[OB:STRAIL_SPAIN|STRAIL_BLUECARGO|STRAIL_ARCESE|STRAIL_CONTINENTAL| \
4093 STRAIL_CRAFTRANSPORT,20,4][OB:STRAILST1,137,9])
4094 $DEF E5FLM=5:E5FL1|1:E5FL2
4095
4096 # EP 6 Long Distance
4097 $DEF E6PL1=(<RF_DG9,6*RF_(B11T1|TR_B11T0102|B11T2),RF_AR7T,3*RF_(A9T|TR_A9T02))| \
4098 (<RF_RO_A9T0(1|2)L,2*RF_RO_A12T0(1|2)L,RF_RO_BR(3|4)TL,3*RF_RO_B10T0(1|2)01L,3*RF_RO_BC10X90(1|2)L)| \
4099 (<(6*RF_2000(A|B)(_OP)),RF_RO_BR4X0(1|2)L,RF_RO_A8LVL,RF_RO_A10X02L,RF_RO_A10X01L)| \
4100 (<RF_WL26X_RO2(|L),3*RF_RO_BC10X90(1|2),2*(RF_RO_B10T0(1|2)01),RF_RO_BR(3|4)T,2*RF_RO_A12T0(1|2), \
4101 RF_RO_A9T0(1|2))|(<RF_RO_A8LV,RF_RO_A10X02,RF_RO_A10X01,RF_RO_BR4X0(1|2),6*RF_2000BR_OP)| \
4102 (<(3*RF_(A9T|TR_A9T02)L,RF_AR7TL,6*RF_(B11T1|TR_B11T0102|B11T2)L,RF_DG9L))| \
4103 (<(RF_(A9T|TR_A9T02)L),RF_R9L,6*RF_BC10X9L,RF_RO_T20(1|2)L)| \
4104 (<RF_RO_T20(1|2),6*RF_BC10X9,RF_R9,RF_(A9T|TR_A9T02))
4105
4106 # EP 6 Freight Maintenance
4107 $DEF E6FM=(6*RF_MMQ_25027(3|4))|(6*RF_T3(|L))|(6*RF_U1)
4108
4109 #------------------------------------------------------------------------------
4110 #
4111 # ITALY
4112 #
4113 # EP 2 Passenger regional
4114 $DEF I2PR=FS_UM7022|FS_U4023|RA_DQU8602|FS_DUI96000, \
4115 (<FS_CT43491,FS_CT43223,FS_ABIY58616L|FS_ABIY58616,FS_BY256613)
4116
4117 # EP 2 Passenger long distance verde vagone
4118 $DEF I2PD=FS_DZ80000G,FS_CZ30000GD,FS_ABZ50100(|L),2*FS_BZ20000GD,FS_AZ10000G,CIWL_FS4161,2*FS_CZ30000GD
4119
4120 # EP 3 Treno Azzurro
4121
4122 $DEF I3PTA51W=FS_DUZ93100B(|L), \
4123 (<FS_CZ33010B(|L),4*FS_BZ23010B(|L),CIWL_WR2749L,CIWL_WSP4131(|L),4*FS_AZ13010B2(|L))
4124 $DEF I3PTA51O=FS_DUZ93100B(|L), \
4125 (<4*FS_AZ13010B2(|L),CIWL_WSP4131(|L),CIWL_WR2749,4*FS_BZ23010B(|L),FS_CZ33010B(|L))
4126 $DEF I3PTA60W=FS_DUZ93100AZU(|L), \
4127 (<3*FS_BZ33010AZU(|L),CIWL_WSPC4148L,CIWL_WSP4131(|L),CIWL_WR2749L,3*FS_AZ13010AZU(|L))
4128 $DEF I3PTA60O=FS_DUZ93100AZU(|L), \
4129 (<3*FS_AZ13010AZU(|L),CIWL_WR2749,CIWL_WSP4131(|L),CIWL_WSPC4148,3*FS_BZ33010AZU(|L))
4130 $DEF I3PTA62W=FS_DUZ93100AZU(|L), \
4131 (<3*FS_BZ45(0|1)00AZU(|L),CIWL_WSPC4148L,CIWL_WSP4131(|L),CIWL_WR2749L,3*FS_AZ23600AZU(|L))
4132 $DEF I3PTA62O=FS_DUZ93100AZU(|L), \
4133 (<3*FS_AZ23600AZU(|L),CIWL_WR2749,CIWL_WSP4131(|L),CIWL_WSPC4148,3*FS_BZ45(0|1)00AZU(|L))
4134 $DEF I3PTA6XO=FS_DUZ93100AZU(|L), \
4135 (<FS_BRZ45260AZU,3*FS_BZ45(0|1)00AZU(|L),CIWL_WSP4131(|L),CIWL_WSPC4148,CIWL_WR2749, \
4136 4*FS_AZ23600AZU(|L))
4137 $DEF I3PTA6XW=FS_DUZ93100AZU(|L), \
4138 (<4*FS_AZ23600AZU(|L),CIWL_WR2749L,CIWL_WSPC4148L,CIWL_WSP4131(|L),3*FS_BZ45(0|1)00AZU(|L), \
4139 FS_BRZ45260AZUL)
4140
4141 # EP 2/3 Passenger long Distance 1936-56 castano - isabella
4142 $DEF I3PLA=(<FS_3B_DUZ95000,3*FS_CZ33010B,FS_ABZ53000B,FS_ABZ50100IS,FS_AZ13010B,2*FS_CZ33010B, \
4143 FS_CZ33000B)| \
4144 (>FS_3B_DUZ95000,3*FS_CZ33010BL,FS_ABZ50100ISL,FS_ABZ53000BL,FS_AZ13010BL,2*FS_CZ33010BL, \
4145 FS_CZ33000BL)
4146
4147 # EP 3 Passenger long Distance 1956-58 castano - isabella
4148 $DEF I3PB6L=(<FS_DZ83000B,1*FS_AZ20500IS,FS_AZ23500,FS_ABZ64100IS1L,0-1*CIWL_WR3354(|L),2*FS_BZ23010B, \
4149 2*FS_BZ33010V2,2*FS_BZ330(10|00)BC)| \
4150 (>FS_DZ83000BL,2*FS_AZ23500L,FS_ABZ64100IS1,0-1*CIWL_WR3354(|L),2*FS_BZ23010BL,2*FS_BZ33010V2L, \
4151 2*FS_BZ330(10|00)BCL)
4152
4153 # EP 3 Passenger long Distance 1958-60 castano - isabella
4154 $DEF I3PL=(<FS_ABZ53000C(|L)|FS_ABZ52000B(|L),FS_AZ23010C|FS_AZ53010CL|FS_AZ13010CL, \
4155 FS_AZ13010C|FS_AZ23010CL|FS_AZ53010C,2*FS_BZ33010CL,3*FS_BZ33010C,FS_DUZ93100C)| \
4156 (<FS_3DZ80000BH,FS_BZ32000BC,FS_AZ(32010BC|52010BCL|13010BC),FS_ABZ53000BCL, \
4157 CIWL_W(SPC4148|SP4131|R2749)(|L),4*FS_BZ3(3000BC|3010BC|2000BC)L)| \
4158 (>FS_3DZ80000BHL,FS_BZ32000BCL,FS_AZ(32010BCL|52010BC|13010BCL),FS_ABZ53000BC, \
4159 CIWL_W(SPC4148|SP4131|R2749)(|L),4*FS_BZ3(3000BC|3010BC|2000BC))| \
4160 (<FS_3DZ80000BH,FS_ABZ64100IS2|FS_ABZ64500IS|FS_ABZ64500IS2|FS_ACBCZ64320,2*FS_AZ20500IS2, \
4161 0-1*CIWL_3_WR3000F(|L),3*FS_BZ45000IS|FS_BZ45100IS,2*FS_BCZ33901)| \
4162 (>FS_3DZ80000BHL,FS_ABZ64100IS2L|FS_ABZ64500ISL|FS_ABZ64500IS2L|FS_ACBCZ64320L,2*FS_AZ20500IS2L, \
4163 0-1*CIWL_3_WR3000F(|L),3*FS_BZ45000ISL|FS_BZ45100ISL,2*FS_BCZ33901L)
4164
4165 # EP 3 Passenger long Distance 1960-1964 - castano
4166 $DEF I3PCL=(<FS_DZ83000B2,3*FS_AZ(52010B|32010B|23600CA),FS_ABZ53000B2L|FS_ABZ52000BL, \
4167 CIWL_W(SPC4148|SP4131|R2749)(|L),2*FS_BZ32000B,3*FS_BZ33(000B|010B))| \
4168 (>FS_DZ83000B2L,3*FS_AZ(52010B|32010B|23600CA)L,FS_ABZ53000B2|FS_ABZ52000B, \
4169 CIWL_W(SPC4148|SP4131|R2749)(|L),2*FS_BZ32000BL,3*FS_BZ33(000B|010B)L)| \
4170 (<FS_DZ83000B2,2*FS_BZ33010BL,FS_UICY_BZ2099B,FS_UICY_ABZ3099B,FS_UICY_AZ1099B,FS_ABZ53000B2L, \
4171 FS_BZ33010BL,FS_BZ32000B)| \
4172 (>FS_DZ83000B2L,2*FS_BZ33010B,FS_UICY_BZ2099BL,FS_UICY_ABZ3099BL,FS_UICY_AZ1099BL,FS_ABZ53000B2L, \
4173 FS_BZ33010B,FS_BZ32000BL)
4174
4175 # EP 3 Passenger long Distance 1966
4176 $DEF I3PC6L=(<FS_DZ83000D(|L),4*FS_BZ33010D,FS_BRZ45260E,2*FS_4AZE,FS_4ABZ64100E)| \
4177 (>FS_DZ83000D(|L),4*FS_BZ33010DL,FS_BRZ45260EL,2*FS_4AZEL,FS_4ABZ64100EL)| \
4178 (<FS_DUZ93100DL,4*(FS_30000E|FS_4BZ20000E|FS_32000E|FS_4BZ50100E),FS_BZ33010D, \
4179 2*(FS_4AZ21000E|FS_4AZ20000E|FS_ABZ50100E),FS_4A_ABZ50100)| \
4180 (>FS_DUZ93100D,4*(FS_30000EL|FS_4BZ20000EL|FS_32000EL|FS_4BZ50100EL),FS_BZ33010DL, \
4181 2*(FS_4AZ21000EL|FS_4AZ20000EL|FS_ABZ50100EL),FS_4A_ABZ50100L)
4182
4183 # EP 3 Passenger regional
4184 $DEF I3PR=(<FS_EACIZ669202L|FS_EACIZ669202|FS_BCZ69100L|FS_BCZ69100|FS_BCZ69700L|FS_BCZ69700, \
4185 FS_CI35300DL|FS_CI35300D|FS_ECIZ634730D|FS_ECIZ634730DL|FS_ECIZ734800D|FS_BZ34100D|FS_BZ34100DL| \
4186 FS_BI35300D, \
4187 FS_CZ34700DL|FS_CZ38000DL|FS_CZ38000D|FS_CZ38244DL|FS_CZ38244D|FS_ECI735850DL|FS_ECI735850D| \
4188 FS_ECIZ734800DL,FS_TERR_BCDT2C|FS_TERR_BCDT3C)| \
4189 (<FS_BZ39000A,FS_BZ27000A,FS_ABZ66502,FS_BIY34000A,FS_BDIY67400A,FS_DI92000B)| \
4190 ((0-1*FS_DUZ93000V0),FS_30000IS|FS_31000IS,FS_BZ27000IS,FS_BZ32000CA|FS_BZ33010V2L, \
4191 FS_BI35300DL|FS_BZ38244DL,FS_BZ42000A|FS_AZ13000V0,FS_AZ13010BCL)| \
4192 (<(3*(FS_BZ34100NL|FS_BZ34100N|FS_BZ38000NL|FS_BZ38000N|FS_BZ38244N|FS_BZ69100NL|FS_BZ69100N| \
4193 FS_BZ69700NL|FS_BZ69700N)),FS_EABZ669202NL|FS_EABZ669202N,FS_BZ38900NL|FS_BZ38900N,FS_DUZ93100CL)
4194
4195 # EP 3 Freight short
4196 $DEF I3FS1=(2-3*(FS_HE2(A|B|C)))|(2-3*(FS_HCCKRSUV(A|B|C)))|(2-3*(FS_HFHS(|2)(A|B|C)))| \
4197 (2-3*(FS_HG4|FS_HGB|FSE_3GS029(|L)))|(2-3*(FS_TRAMOG(1|2)))|(2-3*(FS_DMB))|(2-3*(FS_L|FS_LH))| \
4198 (2-3*(FS_GHMS(A|7|2A|3A|3C|7C|8A|9A|10A|10C|11A|11C|4A|4C|6A|5A|6AL)))| \
4199 (2-3*FS_3_F(010|011(|L)|013(|L)|013R(|L)|014U|014(|L)|014R(|L)|034(|L)|035(|L)|MA037(|L)|MA038| \
4200 101(|L)|014RU|028(|L)|028E(|L)|029(|L)|029E(|L)|032(|L)|032E(|L)|033(|L)|033E(|L)))| \
4201 (2-3*FS_3_G00(3|4)(|L))|(2-3*FS_3_FB_F02(0|1)(|L))|(2-3*FS_3_HGB_H0(31|28|28T1|29|29T1)(|L))| \
4202 (2-3*FS_3_(HIS_H022|HG_H018(|V)|HG_H021|HG_H026|HG_H027|HG_H037)(|L))| \
4203 (2*(FS_FDIA(|L)|FS_HCCRSUZ(B|A|C)|FS_HCCQRSZ(B|A|C)))|(2-3*(FS_KS[O:(BOX6|BOX33|PIPE24),,17]))| \
4204 (2-3*((FS_E|FS_E_C(|1|2|3|4)|FS_L1|FS_EH_C1|FS_E_C5)))|(2-3*FS_HBILLNS(3|2)(|L))| \
4205 (2-3*(FS_M(4|3|1|2)))|(2-3*(FS_GS(A|C|2A)))|(2-3*(FS_3OHW[OB:WOOD105,,12]))| \
4206 (2-3*(FS_3B_(HG_MOT|GMHS1)(|L)))|(2-4*(FS_3_L1056(|H)(|A)(|L)[OB:FR_KO44,8,22]))| \
4207 (2-3*FS_3F(029Z1|029Z1E2|029Z2E1|029A|029AE2)(|L))| \
4208 (2-3*FS_3F(029Z1E1|029Z2|029Z2E2|029AE1|029AS)(|L))|(2-3*FS_3FI1403(|L))
4209
4210 $DEF I3FS=2*I3FS1
4211
4212 # EP 3 Freight long
4213 $DEF I3F1=6-7*I3FS1
4214
4215 # EP 4 Passenger long distance
4216 $DEF I4PL=(0-1*(FS_XDR|FS_DXE)),(1-2*(FS_4B_A1100KTL|FS_1070GA)),0-1*(FS_4B_AB3100KTL|FS_4B_BR8550T), \
4217 (3-5*(FS_4B_B2100K|FS_BZXB))| \
4218 (<(FS_DUZ93100D|FS_4A_UICX70DZ|FS_4A_UICX70UMIZ1)L|FS_4UIZ1550E,FS_4A_UICX68DZ,FS_4BCZ33901E, \
4219 2*(FS_4_UICX75AL|FS_4A_AUICX64B1L|FS_4A_UICX68A2L|FS_4A_UICX70AL), \
4220 (FS_4A_UICX75ABL|FS_4A_ABUICX64(A|B)1L|FS_4B_UICX70ABL),(FS_4A_BRUICX64AL|FS_4A_UICX70BR(1|2)L), \
4221 5*(FS_4_UICX75BL|FS_4A_UICX68B1L|FS_4A_UICX70B1L|FS_4A_BUICX64BL|FS_4A_UICX68B2L),FS_KZ48600)| \
4222 (<FS_KZ48600L,5*(FS_4_UICX75B|FS_4A_UICX70B1|FS_4A_BUICX64B|FS_4A_UICX68B1|FS_4A_UICX68B2), \
4223 (FS_4A_BRUICX64A|FS_4A_UICX70BR(1|2)),(FS_4A_ABUICX64(A|B)1|FS_4B_UICX70AB|FS_4A_UICX75AB), \
4224 2*(FS_4A_AUICX64B1|FS_4A_UICX68A2|FS_4A_UICX70A|FS_4_UICX75A),FS_4BCZ33901EL,FS_4A_UICX68DZL, \
4225 FS_4UIZ1550E,(FS_DUZ93100D|FS_4A_UICX70DZ|FS_4A_UICX70UMIZ1|FS_4A_UICX76UMIZ))| \
4226 (3*(FS_4A_BZ2102TL|FS_4A_BZ2102T|FS_4A_BZ2102KTL|FS_4A_BZ2102KT|FS_4A_BZ2103TL), \
4227 (FS_4A_AZ1101TL|FS_4A_AZ1101T|FS_4A_AZ1101KTL|FS_4A_AZ1101KT),FS_4A_BR8551K, \
4228 2*(FS_4A_BZ2102L|FS_4A_BZ2102|FS_4A_BZ2102KL|FS_4A_BZ2102K|FS_4A_BZ2103L), \
4229 (FS_4A_AB3100L|FS_4A_AB3100),FS_DZ83000DL)| \
4230 (<FS_DZ83000D|FS_DUZ93100D,FS_AZ23010D|FS_AZ20500|FS_AZ53010D|FS_4AZ23500E, \
4231 FS_AZ13010G|FS_AZ23010D,4*(FS_BZ33010G|FS_4ACBCZ64300E),FS_ABZ53000G|FS_4ABZ64100E,FS_4BZ33000E, \
4232 FS_4ACBCZ64300E)| \
4233 (<FS_4ACBCZ64300EL,FS_4BZ33000EL,FS_ABZ53000GL|FS_4ABZ64100EL,4*(FS_BZ33010GL|FS_4BZ33000EL), \
4234 FS_AZ13010GL|FS_AZ23010DL,|FS_AZ53010DL|FS_AZ53010DL|FS_4AZ23500EL,FS_DZ83000DL|FS_DUZ93100DL)| \
4235 (<FS_DUZ93100DL,3*FS_4A_B2100K,FS_4A_BR8550L,FS_4A_AZ1101L,FS_4A_AZ1101KL,3*FS_4A_BZ2103KL)| \
4236 (<2*FS_4B_UICX80BC,3*FS_4A_UICX68BC, \
4237 (FS_4ACBCZ64302EL|FS_4ACBCZ64320EL,FS_4ACBCZ64302E)|(2*FS_4A_UICX75ACBCL),FS_4_MU81L, \
4238 FS_4_T2S|FS_4_MU72L,FS_4_T2SL,CIWL_4_UH2,FS_4ABZ64191E,2*FS_4B_UICX80BCL,FS_4BRZ45991EL)| \
4239 (<FS_4BRZ45991E,2*FS_4B_UICX80BC,FS_4ABZ64191EL,CIWL_4_UH2L,FS_4_T2S,FS_4_T2SL, \
4240 FS_4_MU81|FS_4_MU72,(FS_4ACBCZ64302EL,FS_4ACBCZ64302E|FS_4ACBCZ64320E)|(2*FS_4A_UICX75ACBC), \
4241 3*FS_4A_UICX68BCL,2*FS_4B_UICX80BCL)| \
4242 (<FS_4BZ45100E[BC:-20,20,2,8,232],2*FS_4A_B2100KL,FS_UICX64WR, \
4243 FS_AZ52010G|FS_AZ32010G|FS_AZ32010TRF2|FS_AZ32010TRF1, \
4244 FS_UICY_AZ1099GC|FS_UICY_AZ1099G|FS_UICY_AZ1099R|FS_UICY_AZ1099, \
4245 FS_UICY_ABZ3099GL|FS_UICY_ABZ3099GL|FS_UICY_ACBCZ4099GL,FS_UICY_BZ2099G,FS_UICY_BCZ5099G)| \
4246 (>FS_4BZ45100EL[BC:-20,20,2,8,232],2*FS_4A_B2100K,FS_UICX64WR, \
4247 FS_AZ52010GL|FS_AZ32010GL|FS_AZ32010TRF2L|FS_AZ32010TRF1L, \
4248 FS_UICY_AZ1099GCL|FS_UICY_AZ1099GL|FS_UICY_AZ1099RL|FS_UICY_AZ1099L, \
4249 FS_UICY_ABZ3099G|FS_UICY_ABZ3099G|FS_UICY_ACBCZ4099G,FS_UICY_BZ2099GL,FS_UICY_BCZ5099GL)
4250
4251 # EP 4 Passenger regional
4252 $DEF I4PR=((1-2)*FS_BZ36000,FS_BZ38244E|FS_BZ69700E)| \
4253 ((3-5*(FS_BZ38244E|FS_BZ36000|FS_BZ69100EL)),FS_AZ50000E,(0-1*FS_DUZ93100E),(0-2*FS_GS))| \
4254 (3*FS_B36000C,FS_BZ38244E,FS_AZ50000E,0-1*(FS_4DZ88200E|FS_4UMIZ8500E(|L)|FS_DZ83000D(|L)))| \
4255 (FS_AZ_R,FS_BZ_G,FS_BZ38244E,FS_BZ32000E, \
4256 0-1*((FS_4DZ78RE|FS_4DZ80000E|FS_4UZ1315E|FS_4UZ1300E|FS_4DUZ93200E|FS_4DUZ93250E)(|L)))| \
4257 (4*(FS_BZ33010GL|FS_4B_B2100K|FS_4A_B2100T|FS_ABZ64000R(|L)|FS_AZ32010TRG(|L)))| \
4258 (3*FS_4BZ30800R(|L),FS_4AZ20500R(|L),0-1*FS_4R_DZ80200(|L))| \
4259 (<FS_4UIZ(1550|1582|1450|1400)E(|L)|FS_4DI92000E(|L)|FS_4DI90000E(|L)|FS_DI85411,2*FS_BZ39000C, \
4260 FS_4A_ABZ52000L,FS_ABZ66504,FS_32000EL)| \
4261 (<FS_32000E,FS_ABZ66504,FS_4A_ABZ52000,2*FS_BZ39000C,FS_4A_AZ50000, \
4262 FS_4UIZ(1550|1582|1450|1400)E(|L)|FS_4DI92000E(|L)|FS_4DI90000E(|L)|FS_DI85411)| \
4263 ((1-2)*FS_BZ36000,FS_BZ38244E|FS_BZ69700E)| \
4264 (<4*FS_4A_BUICX64A1,FS_4A_AUICX64A1,FS_4DUZ932(00|50)E(|L))| \
4265 (<FS_4DUZ932(00|50)E(|L),FS_4A_AUICX64A1L,4*FS_4A_BUICX64A1L)| \
4266 (<FS_4DZ80200LE,FS_BZ39000C,FS_4AZ20000E|FS_4AZ11000E|FS_4AZ21000E,FS_BZ38244EL,FS_4DI92000EL)| \
4267 (<FS_4DI92000E,FS_BZ38244E,FS_4AZ20000EL|FS_4AZ11000EL|FS_4AZ21000EL,FS_BZ39000C,FS_4DZ80200E)| \
4268 (<2*FS_4BZ30800E(|L),FS_4AZ20500E(|L),2*FS_4BZ30800E(|L))
4269
4270 $DEF SERVDIRETTI_IV=(1-2*SBB_4_2170,SBB_4_1970)|(DB_BCOH257,DB_4ABM225BBL,(0-1*DB_BM234PK))| \
4271 (2-3*FS_4B2071EUL)
4272
4273 # EP 4 Freight short
4274 $DEF I4FS1=(2-3*FS_GABS(|1|2|3|4))|(2-3*(FS_FCC1[O:FR_KO(13|12)(|[M])]))| \
4275 (2-3*(FS_MIGROS_GO|FS_4HABFISH23(|L)))|(2-3*(FNM_GBHS|FSE_GS))| \
4276 (2-3*(FS_ZE|VTG_4A_UHS0723203(|L)|VTG_4A_UHS0723205(|L)))| \
4277 (2-3*(FS_HCRS_UVY|FS_4_HCRSUYA|FS_4_HCKRUVY))|(2-3*FS_4_TMS210I(|L))| \
4278 (2-3*(FS_4_HFHS021(|L)|FSE_4GS029(|L)|FS_4_IBFS153))|(2-3*(FALCK_E[OB:FR_UHLI,,26]))| \
4279 (2-3*(FS_4E(|2)[O:(OMM_KOHLE_02|COAL9)(|[M]),,28]))|(3-4*CFL_FCS2M[OB:FER(3|4)M(|[M]),,40])| \
4280 (2-3*(FS_GHMS(2A|A|3A|3C|7C|8A|9A|10A|10C|11A|11C)|FS_GMA|FS_GM2C|FS_G(|L)M(|S)A|FS_GMS3A))| \
4281 (2-3*(FS_VSZ(|L)))|(2-3*FS_4_E220(M|N)(|L)[OB:COAL(40|42|20)(|[M]),,27])| \
4282 (2-4*(FS_4_ELMO1056(|A)(|H)(|L)[OB:FR_KO44,8,22]))|(2-4*FS_4A_G(S029Z2|S029A|S029C|HS1600)(|L))| \
4283 (2-4*FS_4_G(HK007|HK011(|L)|HM038|HMS014D1(|L)|HMS013D2(|L)|HMS037(|L)|HKKMS029(|L)|HMS033(|L)))| \
4284 (2-4*FS_4_G(HM014|HM014D2|M102(|L)|HKKMS028(|L)|LM101(|L)|M004(|L)|HMS032(|L)|HMS033A(|L)))| \
4285 (2-3*FS_4(_IBS145|_IBS148C|A_IMS150|A_IBES150D|A_IBES150D1)(|L))|(2-3*FS_4HCRSUVY2121(|L))
4286
4287 $DEF I4FS=3*I4FS1
4288
4289 # EP 4 Freight long
4290 $DEF I4FL1=8*I4FS1
4291
4292 # EP 5 Intercity
4293 $DEF I5PI=(<FS_D9590G,FS_B42071GL,FS_B42071C,FS_B42071G,FS_B42071CL,FS_4A1971O,FS_5A1971GL)| \
4294 (<FS_5A1971G,FS_4A1971OL,FS_B42071C,FS_B42071GL,FS_B42071CL,FS_B42071G,FS_D9590GL)
4295
4296 # EP 5 Freight short
4297 $DEF I5GS1=(3-4*(FS_RGMMS[OB:PIPE(33|10),15,12][OB:PIPE(33|10),75,12]))| \
4298 (3-4*(FS_SHIMMNS|FS_SHIMMS1|FS_SGNSS| \
4299 FS_SGNSS[O:BOX745H_SPINELLI(1|2|3),5,13][O:BOX745H_SPINELLI(1|2|3),119,13]))| \
4300 (3-4*(FS_SGNS_GLOBAL_SAINT|FS_SGS[OB:SAND(9|11|10)(|[M]),,16]))|(3-4*FS_FCC1M)| \
4301 (3-4*((FS_UASCITA(|L)|FS_UASSMG(|L)|FS_UAS_CITA2)))|(3-4*(FS_SPNNS[OB:WOOD33(|[M]),,13]))| \
4302 (3-4*(FS_HBBILLNS(|2|3)|FS_HABIS1|FS_HABBINSS_XMPR|FS_HBILLNS1))| \
4303 (3-4*FS_EANOS3[OB:SCRAP(4|5)(|[M]),,33])|(3-4*(FS_AUSILIARE_MILANO|FS_Z_AUSMIL2))| \
4304 (3-4*(FS_IBBEHKS|FS_5HABFISH23)(|L))|(3-4*(FS_UC_MONTEDISON))|(3-4*(FS_GABS|FS_GABS5))| \
4305 (3-4*(FS_TADGNS|FS_TAEMS))|(3-4*(FS_RGS(|L)))|(3-4*(FS_HBCCQ_W))| \
4306 (3-4*FS_4E(|2)[O:FR_KO14(|[M]),,28])|(3-4*(FS_GSC|GT08F|FS_RGS(|L)|FS_RGS|FS_SDGKKMMS|GT08OMV))
4307
4308 # EP 5 Freight long
4309 $DEF I5GMIX=5*I5GS1
4310
4311 # EP 6 Long distance Train
4312 $DEF I6PS=(<FS_9590X|FS_9590XNL|FS_9590XN,5*(FS_2190XN2|FS_2890XNL|FS_2890XN), \
4313 (FS_8890XL|FS_8890X|FS_8890XNL|FS_8890SXL|FS_8890SX),3*(FS_1990XL|FS_1990XNL))
4314
4315 # EP 6 Intercity
4316 $DEF I6PI=(<FS_6B2071B,FS_6B2071,FS_6A1971,FS_6A1971B,FS_6B2071L,2*FS_6B2071BL)| \
4317 (<(3*(FS_1898XL|FS_1898X|FS_1898XDL|FS_1898XD|FS_1898XNL|FS_1898XN|FS_1898XNDL|FS_1898XND| \
4318 FS_1898SXL|FS_1898SX|FS_1898SXDL|FS_1898SXD|FS_1898SXNL|FS_1898SXN|FS_1898SXNDL|FS_1898SXND| \
4319 FS_1898PL|FS_1898P|FS_1898PDL|FS_1898PD|FS_1898SPL|FS_1898SP|FS_1898SPDL|FS_1898SPD)), \
4320 (FS_8898XL|FS_8898X|FS_8898XDL|FS_8898XD|FS_8898XNL|FS_8898XN|FS_8898XNDL|FS_8898XND), \
4321 5*(FS_6B2171CL|FS_6A1971C|FS_6A1971CL))
4322
4323 # EP 6 Regional Double Deck push left
4324 $DEF I6PRDL=(<FS_ADP_NPB_XL,3*FS_ADP_NB_XL,FS_E633XMPR)| \
4325 (<FS_ADP_NPB_XNL,3*(FS_ADP_NB_XNL|FS_ADP_NB36XNL))|(<FS_ADP_NPBH_XAL,3*(FS_ADP_NB_XA|FS_ADP_NA_XA))
4326
4327 # EP 6 Regional Double Deck push right
4328 $DEF I6PRDR=(<(3*(FS_ADP_NB_X)),FS_ADP_NPB_X)|(<(3*(FS_ADP_NB_XN|FS_ADP_NB36XN)),FS_ADP_NPB_XN)| \
4329 (<(3*(FS_ADP_NB_XAL|FS_ADP_NA_XAL)),FS_ADP_NPBH_XA)
4330
4331 # EP 6 Regional
4332 $DEF I6PRU=(<FS_5_A1100(R|KR|RR|KRR)L,(FS_5_AB3100RRL|FS_5_AB3100KRRL),5*(FS_5_B2100RRL|FS_5_B2100KRRL))| \
4333 (<(5*(FS_5_B2100RR|FS_5_B2100KRR)),FS_5_A1100(R|KR|RR|KRR),(FS_5_AB3100RR|FS_5_AB3100KRR))
4334
4335 # EP 6 Freight short
4336 $DEF I6GS1=(3-4*(FS_RGMMS[OB:PIPE(33|10),15,12][OB:PIPE(33|10),75,12]))| \
4337 (3-4*(FS_SHIMMNS|FS_SHIMMS1|FS_SGNSS|(3-4*FS_UAGPPS_MONFERM)| \
4338 FS_SGNSS[O:BOX745H_SPINELLI(1|2|3),5,13][O:BOX745H_SPINELLI(1|2|3),119,13]))| \
4339 (3-4*(FS_SGNS_GLOBAL_SAINT|FS_SGS[OB:SAND(9|11|10)(|[M]),,16]))| \
4340 (3-4*((FS_UASCITA(|L)|FS_UASSMG(|L)|FS_UAS_CITA2)))|(3-4*(FS_SPNNS[OB:WOOD33(|[M]),,13]))| \
4341 (3-4*(FS_HBBILLNS(|2|3)|FS_HABIS1|FS_HABBINSS_XMPR|FS_HBILLNS1))| \
4342 (3-4*FS_EANOS3[OB:SCRAP(4|5)(|[M]),,33])|(3-4*(FS_AUSILIARE_MILANO|FS_Z_AUSMIL2))| \
4343 (3-4*(FS_LAADGRS(1|2)[OB:RENAULT_KERAX(6R|8Y),34,8][OB:RENAULT_KERAX(6R|8Y),160,8]))| \
4344 (3-4*(FS_IBBEHKS(|L)))|(3-4*(FS_UC_MONTEDISON))|(3-4*(FS_GABS|FS_GABS5))| \
4345 (3-4*(FS_TADGNS|FS_TAEMS))|(3-4*(FS_RGS(|L)))|(3-4*(FS_HBCCQ_W))
4346
4347 # EP 6 Freight long
4348 $DEF I6GMIX=5*I6GS1
4349
4350 $DEF I6GCA=(12*SITFA_LAAERS(1|2)[OB:FIAT_PUNTO(|YG),10,10][OB:FIAT_PUNTO(|YG),54,10] \
4351 [OB:FIAT_PUNTO(|YG),96,10][OB:FIAT_PUNTO(|YG),138,10][OB:FIAT_PUNTO(|YG),180,10] \
4352 [OB:FIAT_PUNTO(|YG),224,10][OB:FIAT_PUNTO(|YG),139,29][OB:FIAT_PUNTO(|YG),182,29] \
4353 [OB:FIAT_PUNTO(|YG),224,29][OB:FIAT_PUNTO(|YG),10,29][OB:FIAT_PUNTO(|YG),54,29] \
4354 [OB:FIAT_PUNTO(|YG),96,29]), \
4355 6*(FS_TA1[OB:FIAT_PUNTO(|YG),10,10][OB:FIAT_PUNTO(|YG),52,10][OB:FIAT_PUNTO(|YG),10,29] \
4356 [OB:FIAT_PUNTO(|YG),51,29][OB:FIAT_PUNTO(|YG),93,10][OB:FIAT_PUNTO(|YG),94,29])
4357
4358 $DEF I6GCO=15*(FS_SGNSS[O:BOX745H_SPINELLI(1|2|3),5,13][O:BOX745H_SPINELLI(1|2|3),119,13]| \
4359 FS_SAAGGNSS(2|1)[O:C20B,7,13][O:C20B,99,13][O:C20B,180,13][O:C20B,241,13][O:C20B,323,13] \
4360 [O:C20B,417,13]| \
4361 FS_SAAGGNSS(2|1)[O:C20B,7,13][O:C20B,99,13][O:C40B,180,13][O:C20B,323,13][O:C20B,417,13]| \
4362 FS_SAAGGNSS(2|1)[O:C40B,7,13][O:C40B,180,13][O:C40B,357,13]| \
4363 FS_SAAGGNSS(2|1)[O:C30A,7,13][O:C20B,99,13][O:C40B,180,13][O:C20B,323,13][O:C30A,387,13]| \
4364 (FS_SGGMRSS_CEMAT[O:C3P_EWALS12|C3P_FERCAM4|C3O_KEITEL2|C3IP_02|C3IP_EWALS4|C3IP_EWALS7| \
4365 C3IP_EWALS12|C3IP_RIWO1|C3IB_DE_VRIES1|C3IB_DE_VRIES2|C3P_EWALS01,8,11] \
4366 [O:C2R20|C2R_CAP|C2R_CAPITAL1|C2R_CMACGM2|C2R_COSCO2|C2R_DELMAS2|C2R_GOLD|C2R_HAPAG4|C2R_HYUNDAI3| \
4367 C2RT_DONATI,99,11] \
4368 [O:C3O_KEITEL1|C3B_RIWA|C3014|C3006|C3_LOBLEIN3|C3_LOBLEIN5|C3P_EWALS01|C3P_EWALS13|C3_HANG| \
4369 NORFOLKLINE,174,11] \
4370 [O:C2RT_GIEZENDANNER|C2R_EG7|C2R_EIMSKIP|C2R_HALINE|C2R_HAPAG3|C2R_HYUNDAI2|C2R_HYUNDAI3| \
4371 C2R_HYUNDAI5|C2R_JRF1|C2R_KMTC|C2R_MAV|C2RT11|C2RT18,265,11])| \
4372 (FS_SGGMRSS_XN[O:C2RT_DE_RIJKE|C2RT_HSFOOD1|C2T_INTERFLOW1|C2RT_SASOL|C2RT_VAN_DEN_BOSCH1|C2061| \
4373 C2_ANL|C2_HAPAG1|C2_IPEC,14,11] \
4374 [O:C3005|C3002|C3_BERTSCHI6|C3_BULKHAUL|C3_IBC3|C3_IFF4|C3_LOBLEIN2|C3_MVT|C3_SCHMIDT2,75,11] \
4375 [O:C2R_EIMSKIP|C2R_HYUNDAI4|C2R_KLINE|C2R_MAERSK1|C2R_MSC4|C2R_NORASIA1|C2R_OOCL3|C2R_OOCL1| \
4376 C2R_PO7|C2R_PONL1|C2R_TRITON,180,11] \
4377 [O:C3_BERTSCHI6|C3015|C3_BERTSCHI3|C3_VOS1|C3_EVALS1|C3P_EWALS06|C3P_EWALS11|C3P_KEITEL|C3_BELL1| \
4378 C3O_KEITEL1|C3O_LOEBLEIN3|C3_EUROFER,241,11])|(FS_SFFGGMRRSS1[O:C120H,21,9][O:C120H,176,9])| \
4379 (FS_SGGMRSS(|_X|_CEMAT|_XN)[O:C20A,17,11][O:C20A,78,11][O:C20A,202,11][O:C20A,263,11])| \
4380 (FS_SGGMRSS(|_X|_CEMAT|_XN)[O:C40B,17,11][O:C40B,202,11]))
4381
4382 $DEF I6G1=1:I6GCA|2:I6GCO|2:I6GMIX
4383
4384 # EP 6 Freight short
4385 $DEF I6G2=(<FS_H,FS_MIGROS_F|FS_MIGROS_G,FS_KS,FS_RGS1,FS_IBES615L,FS_IBES615,FS_HBBILLNS,FS_HABISB)
4386 # EP 6 Freight shunting
4387 $DEF I6GR=FS_HBBILLNS,FS_KS,ERMEWA_5_ZAEFS7899(|L)
4388
4389 # EP 6 Maintenance
4390 $DEF I6FM1=(6*(RFI_VRTZ(2|4A|4B)(|L)[O:RAIL6(|[M]),,12]))|(8*FS_4VT2)|(8*FS_Z5)| \
4391 (5*((FS_RGS1|FS_RGS2)[OB:RAIL_16M,,12]))|(6*ILVA_RMMS[OB:PYLON3,,12],G_G2)| \
4392 (5*((FS_RES1[OB:PYLON3,16,12][OB:PYLON3,103,12])|(FS_RES1[OB:FR_ST0(1|5|2|4|3),,16])))
4393
4394 #------------------------------------------------------------------------------
4395 #
4396 # TSCHECHIEN
4397 #
4398 # EP 2 Freight short
4399 $DEF CS2FS=(1-3*CSD_UZ5_859)|(3-5*(CSD_Z(|1_75473A|L|1_75473|1_52|1_52HL|1_1HL|1_1H)))| \
4400 (3-5*(WUE_NI3(S|V)_KWG))|(2*CSD_R8(|A|B|C))|(3-5*(WUE_OMKVN(|L)[OT:AG50D,,24]))| \
4401 (2*(CSD_PT[O:BOX(1|4|5)]))
4402
4403 # EP 2 Freight long
4404 $DEF CS2F=6*CS2FS
4405
4406 # EP 3 Freight short
4407 $DEF CS3G2=(2-3*CSD_3_Z(T107741|T190927|R|TR|TRH|R_B|R_H)(|L))|(2-3*(CSD_3_ZTFF(|_L)|CSD_3_ZT190618))| \
4408 (2-3*(CSD_UT[O:(FR_KO18|FR_KO18)]))|(2-3*(CSD_VTU4B[O:(FR_KO15|#FR_KO15),,27]))| \
4409 (2-3*(CSD_BUDVAR4(|L)|CSD_UHBROD|CSD_BUDVAR3))| \
4410 (2-3*(CSD_Z1_75473|CSD_Z1_75473A|CSD_Z|CSD_ZHL|CSD_ZH))|(2-3*(CSD_VUTC|CSD_VUTD))| \
4411 (2-3*(CSD_OK9_246W))|(2-3*(CSD_ND3_391PL|CSD_ND3_391P))|(2-3*(CSD_R8|CSD_R8C|CSD_R578347))| \
4412 (2-3*(CSD_UL6_68A))|(2-3*(CSD_ZSAB|CSD_ZDV2))|(2-3*(CSD_ST23))|(2-3*(CSD_UZ5_859))| \
4413 (2-3*(CSD_VZ4A[O:(FR_KO43|#FR_KO43),,26]))|(2-3*(CSD_VTDBL[OB:PIPE25,20,20]))| \
4414 (2-3*(CSD_VTD[OB:BARREL1,10,20][OB:BARREL6,35,20]))|(2-3*(CSD_PD1))| \
4415 (2-3*(CSD_PAOV[OB:SCRAP13(|[M]),,22]|CSD_PAOV2[OB:FR_MIX1,,22]| \
4416 CSD_PAOV1[OB:WOOD(228|114),12,11][OB:WOOD22(8|7),78,11]))|(2-3*(CSD_GA))| \
4417 (2-3*CSD_3ZTR(N|2|C|B1H)(|L))
4418
4419 # EP 3 Freight long
4420 $DEF CS3G1=CSD_DAAK,8*CS3G2
4421
4422 # EP 3 Passenger long distance
4423 $DEF CS3P1=(<2*CSD_BA65AL,3*CSD_3_BAIML,2*CSD_AA67L,3*CSD_3_BAIM,CSD_BDMS81L)| \
4424 (<CSD_3_AA50L,CSD_3_ABA50L,CSD_3_BRA59L,CSD_3_BA5(8|0)L)| \
4425 (<5*CSD_3_BA5(8|0),CSD_3_BRA59,CSD_3_ABA50,CSD_3_AA50)
4426
4427 # EP 4 Passenger regional short
4428 $DEF CS4PRS=(<CSD_Y4BDS,CSD_Y4BM(|L))|(<CSD_Y4BM(|L),CSD_Y4BDSL), \
4429 0-1*CSD_4_GBKKQS(1|2)|(<CSD_DSD~CD,3*CSD_4_BAI60(|A))|(3*CSD_BAP(1|2)(|L))| \
4430 ((<CSD_BDMEER87L,3*CSD_BMEE86)|(<(3*CSD_BMEE86L),CSD_BDMEER87))
4431
4432 # EP 4 Passenger long distance
4433 $DEF CS4PL1=CSD_DPOST|CSD_DMSPOST76L|CSD_DS74(|L), \
4434 (<(4*CSD_B(M65B|M65C|M77|M65A)L),CSD_WRM69AL,CSD_AB(65|84|84A)L,2*CSD_A(M67A|M67B|M72)L)| \
4435 (<(2*CSD_A(67|M67A|M67B|M72|M72A)),CSD_AB(65|84|84A),CSD_WRM69A,CSD_BR, \
4436 4*CSD_B(M65B|M65C|M77|M65A|A65B))| \
4437 (<CSD_4_DA60,CSD_POST61,3*CSD_BPZL,2*CSD_BA58,CSD_BRA59,2*CSD_AA58,CSD_ABA52,CSD_ABA58EXLAL)
4438
4439 # EP 4 Freight short
4440 $DEF CS4GS=(2-3*(CSD_4_HF2401(|L)))|(2-3*(CSD_4A_ZR1(13|13B|13H)|CSD_4GLM(U|NU|B1H|H|D|))(|L))| \
4441 ((CSD_HX(8|10|16)[O:(TARP10|TARP11|SZD_LOAD2),,8]),CSD_4_GBKKQS1,CD_ZTS)|(3*CSD_4_GLS1336U(|L))| \
4442 (3*(CSD_4_ES20(45B|45H|17)(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]))| \
4443 (2-3*(CSD_4_RES11(|L)[OB:BOX(16|28|18|22),14,15][OB:BOX(16|28|18|22),73,15] \
4444 [OB:BOX(16|28|18|22),133,15]))|(2-3*(CSD_UA|CSD_ND1937))|(2-3*(CSD_PAOJ1|CSD_RAJ1))| \
4445 (2-3*(CSD_SA7|CSD_ST23))|(2-3*(CSD_4_HF2401|CSD_LA_AB))|(2-3*(CSD_RAHI|CSD_RA_LOUH|CSD_RA1(|A|B)))
4446 $DEF CS4GS1=3*CS4GS
4447
4448 # EP 4 Freight long
4449 $DEF CS4GL1=7*CS4GS
4450 $DEF CS4GL2=16*(CSD_WAP[O:COAL32(|[M]),,41])
4451
4452 # EP 5 Freight short
4453 $DEF TS5GS=(2-3*(CD_5_ES9110(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]))|(2-3*CD_LP(1|2|3))| \
4454 (2-3*(CD_ZTS_OR|CD_ZTS))|(3-5*CD_GBGS(1|2|3|4))| \
4455 (2-3*(CD_5_RES11(|L)[OB:BOX(16|28|18|22),14,15][OB:BOX(16|28|18|22),73,15] \
4456 [OB:BOX(16|28|18|22),133,15]))|(2-3*CD_RESDSM[OB:GRAVEL1(|[M])])
4457 # EP 5 Freight long
4458 $DEF TS5F1=7*TS5GS|(12*(CD_FALLS1|CD_FALLS2|CD_FALLS3|CD_FALLS4|CD_WAP1|CD_WAP2|VIA_WAP))
4459
4460 # EP 6 Freight short
4461 $DEF CS6F1S=(4-6*CD_EAS(2|1))|(4-5*CD_UA(418|S428)(|L))|(4*CD_(HBBILLNS|HABBILLNS))| \
4462 (4*(CDC_RESDS|CDC_RES))|(2-3*CDC_RESDSM[OB:GRAVEL1(|[M])])|(4-5*(CDC_HBBILLNSS|ZSR_245HBBILLNNS))
4463
4464 # EP 6 Freight long
4465 $DEF CS6F1=5*CS6F1S
4466
4467 #------------------------------------------------------------------------------
4468 #
4469 # Slovak Republic
4470 #
4471
4472 # EP 5 Freight short
4473 $DEF SK5GS=(2-3*(ZSR_5_(UX|ES)9110(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]))| \
4474 (2-3*(ZSR_245HBBILLNNS,CFR_245HBBILLNNS,HENKEL03,G_EAS1A,G_EAS1E,G_EAS2B,M_595EAS1,SBB_5KS1, \
4475 DBAG_5_EALSX063EL,HENKEL04,SBB_HBILS_PONS,SBB_HBILS_PLING,G_HBBILLNS,M_246HBBILLNNS2,G_HABIS_WASA, \
4476 G_014))|(ZSSKC_HBIS2445108L|ZSSKC_HBIS2445108)| \
4477 (2-3*(ZSR_5_RES11(A|B)(|L)[OB:BOX(16|28|18|22),14,15][OB:BOX(16|28|18|22),73,15] \
4478 [OB:BOX(16|28|18|22),133,15]))
4479
4480 # EP 5 Freight long
4481 $DEF SK5F1=7*SK5GS
4482
4483 # EP 5 Passenger long distance
4484 $DEF SK5PD1=(<ZSSK_BDSL,3*ZSSK_A,ZSR_WRRM_M,5*ZSSK_B, \
4485 0-1*(ZSR_DS_ZB|ZSR_DPOST_ZB|ZSR_POSTW_MB|ZSR_POSTW_ZM95))| \
4486 (<(4*ZSSK_BC),ZSR_WRRM_ML,2*ZSSK_WLAB,ZSSK_BH2118(|L),ZS_B77,2*ZSSK_B)
4487
4488 # EP 5 Passenger regional
4489 $DEF SK5PR1=(<(3*(ZSSK_BDMTEE|ZSSK_BDGTMEE|ZSSK_BDTMEE2244L|ZSSK_BDTMEE2244)), \
4490 ZSSK_BDMSHEE|ZSSK_BDSHMEE|ZSSK_BDSHMEER)|(4*ZSR_BTE_CB)
4491
4492 # EP 6 Passenger long distance
4493 $DEF SK6PD1=(<ZSSK_AMEERL,ZSSK_AMPEER1970EL,ZSSK_WGMEER8970L|ZSSK_WRRMEER8870, \
4494 5*(ZSSK_BMPEER2070|ZSSK_BMEER|ZSSK_BMEER1|ZSSK_BMPEER2070E),ZSSK_BDGHMEER2870)| \
4495 (<ZSSK_BDGHMEER2870L,5*(ZSSK_BMEERL|ZSSK_BMEER1L|ZSSK_BMPEER2070L|ZSSK_BMPEER2070EL), \
4496 ZSSK_WRRMEER8870|ZSSK_WRRMEER8870L,ZSSK_AMEER,ZSSK_AMPEER1970E)| \
4497 (<ZSSK_BDSHEER61L,3*ZSSK_B1L,2*ZSSK_BEER61A,ZSSK_BDTEER1,3*ZSSK_APEER61L,0-1*ZSR_D(|S)POST_CB)
4498
4499 #------------------------------------------------------------------------------
4500 #
4501 # POLAND
4502
4503 # EP 3 Passenger long distance 3A
4504 $DEF PL3PDA=(<PKP_3A_F(|L),2*PKP_3A_CHUXZ,PKP_3A_ASHX|PKP_3A_ABHUXZ,PKP_3A_BHUXZ,PKP_3A_CHUXZ, \
4505 PKP_3A_BCHUXZ|PKP_3A_ABC4HUXZ)| \
4506 (<PKP_3A_ABC4HUXZL|PKP_3A_BCHUXZL,PKP_3A_CHUXZL,PKP_3A_ABHUXZL|PKP_3A_ASHXL,PKP_3A_BHUXZL, \
4507 2*PKP_3A_CHUXZL,PKP_3A_F(|L))
4508
4509 # EP 3 Passenger long distance 3B
4510 $DEF PL3PDB=(<PKP_3PW4U29,(2*PKP_3HECHT_B),PKP_3HECHT_AB|PKP_3B_ABSHXZ,PKP_3HECHT_A,PKP_3HECHT_B)| \
4511 (<PKP_3HECHT_BL,PKP_3HECHT_AL,PKP_3HECHT_ABL|PKP_3B_ABSHXZL,2*PKP_3HECHT_B,PKP_3PW4U29)
4512
4513 # EP 3 Passenger regional
4514 $DEF PL3PG=((<PKP_BIPAL,2*PKP_BIPAM,PKP_BIPA),PKP_4_PDN101CH1(|L))| \
4515 (PKP_BH_RYFL3,PKP_BH_RYFL2A,PKP_BH_RYFL3,PKP_3A_F(|L))
4516
4517 $DEF PL3FC=(2-4*PKP_WDDO[O:AG80,,29])|(2-4*PKP_(3_KPL(|V1|U|L|UV1|V1L)|GAGST))| \
4518 (2-4*PKP_3_KD(DN(|L)|TH_U(|L)|TH(|L)|TH_H(|L)|DN(|L)|N(|L)|NU|T(|L)|TH_U(|L)|TH_H(|L)|TU))| \
4519 (2-4*PKP_3B_KD(DT_B(|L)|DT(|L)|TH_H(|L)|TH(|L)|TH_U(|L)))|(2-4*PKP_23_KDT(U|VH(|L)|V(|L)))| \
4520 (2-3*PKP_3_KK(Z|S|UHO5)(|L))| \
4521 (2-4*PKP_3_KD(STO(|L)|DET105226(|L)|DET158205|DT104516|DT104534|DT153046(|L)|ST(|L)|STH(|L)))
4522
4523 # EP 3 Freight short
4524 $DEF PL3FK=2-3*PL3FC
4525
4526 # EP 3 Freight long
4527 $DEF PL3FL=6*PL3FC
4528
4529 # EP 4 Passenger long distance old cars
4530 $DEF PL4PH=(<PKP_3PW4U29,2*PKP_4HECHT_B, \
4531 (PKP_4HECHT_AL,PKP_4ABSHXZL|PKP_4HECHT_ABL)|(PKP_4ABSHXZ|PKP_4HECHT_AB,PKP_4HECHT_A), \
4532 2*PKP_4HECHT_BL)
4533
4534 # EP 4 Passenger long distance new cars
4535 $DEF PL4PD=(<PKP_4_PDN101CH1L|PKP_4_PDN101CH1),2*(PKP_4_ADU112AG1L|PKP_4_ADU112AG1), \
4536 (PKP_4WRBD1L|PKP_4WRBD1|PKP_4WRBD2L|PKP_4WRBD2|PKP_WR_JHIX), \
4537 5*(PKP_4_BDU111A1L|PKP_4_BDU111A1|PKP_4_BWXZD1L|PKP_4_BWXZD1)
4538
4539 $DEF PL4PG=(<PKP_4B_BHPD1L,2*PKP_4B_BHPM,PKP_4B_BHPD1)|(<PKP_4B_BHPL,2*PKP_4B_BHPM,PKP_4B_BHP)| \
4540 (<PKP_4_BHPL,2*PKP_4_BHPM,PKP_4_BHP)|(<PKP_4_BHPA1L,2*PKP_4_BHPMA1,PKP_4_BHPA1)| \
4541 (<PKP_4_BHPA1D1L,2*PKP_4_BHPMA1,PKP_4_BHPA1D1)|(2*(<PKP_4_BHPD1L,PKP_4_BHPD1))| \
4542 (2*(<PKP_4A_BIPD1L,PKP_4A_BIPD1))
4543
4544 # EP 4 Freight shunting
4545 $DEF PL4FK1=(2-3*(PKP_FD(1|2|3|4|5|6)(|L)))|(2-3*PKP_4A_EAMOS401ZB(|L))| \
4546 (2-3*(PKP_4A_GHST(|_H)(|L)|PKP_4A_GKKM(|_H|_VH|_V|_U|_HL|_VHL|_VL|L)|PKP_4A_GHST(|_H|_U)(|L)| \
4547 PKP_4A_GKLMR(|_B)(|L)|PKP_GBSL))|(2-3*PKP_UGPS)|(2-3*(PKP_4_HF2040(|L)))|(2-3*(DR_4A_Z8021(|L)))| \
4548 (2-3*(PKP_4_U(|TX)(|L)))|(2-3*(PKP_4_(G1003|GLTRHS|GLTRHSH|HBKR)(|L)))| \
4549 (2-3*((PKP_4_ZACS422R|PKP_4_ZAC408RB|PKP_4_ZACES408R|PKP_4_ZAES406RA|PKP_4_ZAES406RG)(|L)))| \
4550 (2-3*PKP_ES[O:AG85,,28])|(2-3*DR_IBHQSSZ(|2|3|4|5))|(2-3*PKP_4_HBK(|L|U|UV1|V1L|V1|UV2|V2L|V2))| \
4551 (2-3*PKP_4GB(ST1553|S1555|S1516|S1514|KKSX1755|KKS1755|KKS1536)(|L))| \
4552 (2-3*PKP_4A_RMMP401ZE(|L)[OB:STEEL(26|27|28|29|30|31|32|25),,12])
4553
4554 # EP 4 Freight short
4555 $DEF PL4FK=2-3*PL4FK1
4556
4557 # EP 4 Freight long
4558 $DEF PL4FL=7-8*PL4FK1
4559
4560 # EP 5 Passenger long distance new cars
4561 $DEF PL5PD=(<PKP_5_DS209C1,2*PKP_BDUNL,PKP_BDUNGL,2*PKP_BDUNG,PKP_5WRBD,PKP_ADMNUL,PKP_ADMNU)
4562
4563 # EP 5 Freight Z
4564 $DEF PL5FZ=15*((PKP_5_ZAESJT620_DEC|PKP_5_ZAES406RA_CTL|PKP_5_ZACS422R_AZIS|PKP_5_ZAES406RA_DEC| \
4565 PKP_5_ZAES406RA_GFR|PKP_5_ZAES406RA|PKP_5_ZAESRT500_KVG|PKP_5_ZAESRT500_PCC|PKP_5_ZAESJT620_GATX| \
4566 PKP_5_ZAESJT620_ABID)(|L))
4567
4568 # EP 5 Freight long coal
4569 $DEF PL5FF=(15*(((PKP_FALNS4|PKPC_FALS_452V_B1A|PKPC_FALS_452V_B2C|PKPC_FALS_452V_B3B| \
4570 PKPC_FALS_452V_E1A|PKPC_FALS_452V_E1B|PKPC_FALS_452V_E2A|PKPC_FALS_452V_E3C|PKPC_FALS_452V_E1E| \
4571 PKPC_FALS_452V_E1F|PKPC_FALS_452V_E2B)(|L))| \
4572 ((PKPC_FALNS40L|PKPC_FALNS38|PKPC_FALNS42|PKPC_FALNS19L|PKPC_FALNS22|PKPC_FALNS20L|PKPC_FALNS35| \
4573 PKPC_FALNS29L|PKPC_FALNS31L|PKPC_FALNS23)[O:COAL(32|28|27|30|31)(|[M])])))| \
4574 (15*(PKPC_FALNS(37|39|41|43|44|45|21|22|24|25|26|27|18|28|30|32|33|34|36)(|L) \
4575 [O:COAL(32|28|27|30)(|[M])]))
4576
4577 # EP 5 Freight Side Dump
4578 $DEF PL5FD=(12*((PKPC_WIEBE_FAS|PKP_FAS1|PKP_FAS2|PTK_FAS3092|PKPC_FAS2151|PCCA_FAS|PTK_FAS3092| \
4579 PCCA_FAS1|CTL_FAS2|CTL_FAS1|PCCA_FAS2)(|L))[O:GRAVEL(3|4|5|9)(|[M])])
4580
4581 # EP 5 Freight Shunting
4582 $DEF PL5FS=(2-3*(PKP_SMMS|PKP_45_EAMOS401ZB(|L)|PKP_5_EAMS401ZL(|L)|PKP_5EAMOS401ZK(|L))), \
4583 PKP_5_SIKKPS_4636131(|L),PKP_SIKKPS(|L), \
4584 2*(PKP_4A_RMMP401ZE(|L)[OB:STEEL(26|27|28|29|30|31|32|25),,12])
4585
4586 # EP 6 Freight Container
4587 $DEF PL6FC=15-18*((PKPC_SGNSS_(G|R|SW|SWR|EKKR)(|L)[OT:C30A,7,11][OT:C30A,99,11])| \
4588 (PKPC_SGNSS_(G|R|SW|SWR|EKKR)(|L)[OT:C20A,7,11][OT:C40B,68,11])| \
4589 (PKPC_SGNSS_(G|R|SW|SWR|EKKR)(|L)[OT:C20A,7,11][OT:C20A,68,11][OT:C20A,128,11])| \
4590 (PKPC_SGNSS_(G|R|SW|SWR|EKKR)(|L)[OT:C40B,7,11][OT:C20A,128,11])| \
4591 (PKPC_SGNSS_(G|R|SW|SWR|EKKR)(|L)[OT:C40B,7,11])| \
4592 (PKPC_SGNSS_(G|R|SW|SWR|EKKR)(|L)[OT:C40B,68,11])| \
4593 (G_SGGMRSG(|2|3|4|5|6|7|8|9|10|11|12)[O:C20A,9,11][O:C20A,70,11][O:C20A,164,11][O:C20A,226,11])| \
4594 (G_SGGMRSG(|2|3|4|5|6|7|8|9|10|11|12)[O:C40B,9,11][O:C40B,164,11])| \
4595 (G_SGGMRSG(|2|3|4|5|6|7|8|9|10|11|12)[O:C40B,9,11][O:C20A,164,11][O:C20A,226,11])| \
4596 (G_SGGMRSG(|2|3|4|5|6|7|8|9|10|11|12)[O:C20A,9,11][O:C20A,70,11][O:C40B,164,11])| \
4597 (G_SGGMRSG(|L|2|3|4|5|6|7|8|9|10|11|2L|3L|4L|5L|7L|11L)[O:C20A,(9|164),11]))
4598
4599 # EP 6 Freight short
4600 $DEF PL6FS=(3-5*(PKPC_EANOS_B(1|2|3|4|5)(|L)[OB:SCRAP(5|6|13|14|15)(|[M]),,32]))| \
4601 (3-5*PKP(|C)_6EAMOS401ZP(|L)[OB:SAND(5|15)(|[M])])| \
4602 (3-5*((PKPC_FAS2151|PKPC_WIEBE_FAS|PTK_FAS3092)(|L)[OB:SAND(5|15)(|[M]),,31]))|(2-3*PKP_SMMS)| \
4603 (3-5*(PKPC_EA(NOS415W|NOS445W|NS_WBL|NS_WBR|OS)(|L)[OB:SCRAP(7|_13|_14|_15)(|[M]),,32]))| \
4604 (2-4*(PKPC_6GBST1553|PKP_6U9415)(|L))|(2-4*(PKPC_6_SIKKPS4636003|PKP_6SIS4738_RENTRANS)(|L))
4605
4606 # EP 6 Freight mixed long
4607 $DEF PL6FM=6*PL6FS
4608
4609 # EP 6 Passenger regional
4610 $DEF PL6PR=PKP_EU07_2003,(3@PKP_BDHPUMN4M2(|L))|(3@PKPPR_BMNOPUX1(|L))
4611
4612 # EP 6 Passenger IC
4613 $DEF PL6PIC=(<PKP_B10NOUYBSUPERNET,PKP_B11MNOUZ136A_IC6W3,PKP_B11MNOUZ136AIC6WIFI4, \
4614 PKP_B10NOUZ141ANEWAGSUPERNET,PKP_BNOPUVZ111AROW1SUPERNET,PKP_BNOPUVZ111AROW2SUPERNET, \
4615 PKP_BNOPUVZ111AROW2WIFI4,PKP_A9MNOUZZ2AMGFPSSUPERNET,PKP_WRMNOUZ_NEWAG,PKP_A9MNOUZZ2AMG2FPSWIFI4, \
4616 PKP_BMNOPUZ152ASUPERNET)| \
4617 (<PKP_A9MNOUZ_166A(|L),PKP_A9MNOUZZ2AMGFPSWIFI4,PKP_A9MNOUZZ2AMG2FPSSUPERNET,PKP_WRIC1(|L), \
4618 PKP_B11MNOUZXBMGFPSSUPERNET,PKP_B11MNOUZ_Z2B_NEWAGW3,PKP_BMNOUZ2170,PKP_BMNOUZ2170, \
4619 PKP_B11MNOUZ_144A,PKP_BBMNOUZ_157A)
4620
4621 #------------------------------------------------------------------------------
4622 #
4623 # Romania
4624 #
4625 $DEF CFR_ESX=CFR_ESX(1|2|3|4|5)[#E!OB:AG85,*50,27]
4626 $DEF CFR_EAS4=CFR_EAOS(1|2|3|5|6|7)
4627 $DEF CFR_KS=CFR_KS(1|2|3|4|5|6|7|8)(|3:[OB:LD125,*69,12])
4628 $DEF CFR_FALS=CFR_FALS0(1|2|3|4|5)(|L)
4629 $DEF CFR_GAG=CFR_GAGS0(1|2|3|4|5|6)(|L)
4630 $DEF CFR_GSD=CFR_3_GSD(FWHV165H|HFWV1618|FWHV165)(|L)
4631 $DEF CFR_RGS=CFR_RGS(1|2)(|3:[OB:LD180,*100,12])
4632 $DEF CFR_TALS=CFR_TALS0(1|2|3|4)(|L)
4633 $DEF CFR_UAGPS=CFR_UAGPS(1|2|3|4|5|6|7)(|L)
4634 $DEF CFR_UCS=CFR_UCS1_(1|2|3|4|5)
4635 $DEF CFR_ZES=CFR_ZES(1|2|3|4|5)
4636 $DEF CFR_ZAS=CFR_ZAS(1|1L|2|2L|3|4|5|6|7|8)
4637 $DEF CFR_IA=CFR_IA(IIS|EGHS1|EGHS2|EGHS3)
4638 $DEF CFR_FOR=DR_3GMM14(A|B)|CD_VTDR(4|5|6)|CSD_VTU4(A|B|C)(|3:[OB:AG70,*43,27])|DR_GAGSV1994(|B)(|L)| \
4639 G_GGS|G_ES(1|2|B|BL)(|3:[OB:AG85,*49,27])
4640 $DEF RO3MIX=1-4*CFR_(FOR|IA|FALS|GAG|GSD|RGS|TALS|UAGPS|UCS|ZAS|ZES|KS|EAS4|ESX|GSD)
4641
4642 $DEF CFR_3DD=(<CSD_BP930A[B:68,22,95,9],2*CSD_BP930B[B:35,22,97,9],CSD_BP930C[B:35,22,97,9])
4643
4644 # EP 3 Freight long
4645 $DEF RO3F=[MAXP:1600]8-12*RO3MIX
4646
4647 # EP 4 Freight short
4648 $DEF RO4FS=(2-3*CFR_4_GGS147(5|5H|5D|5DH|6|6H|6A1|6A2|6A2H|9|9H)(|L))| \
4649 (2-3*(CFR_GAGS06(|L)|CFR_GAGS05(|L)|CFR_KS9|CFR_RGS3|CFR_RGS4|CFR_RGS5))| \
4650 (2-3*(CFR_FALS01L|CFR_FALS01|CFR_FALS02L|CFR_FALS02|CFR_FALS03L|CFR_FALS03|CFR_FALS04L|CFR_FALS04| \
4651 CFR_FALS05L|CFR_FALS05))| \
4652 (2-3*((CFR_EAOS(1|2|3|5|6|7)|CFR_EACS01(|L))[OB:SCRAP_1(2|3|4|5)(|[M]),,30]))
4653
4654 #EP 4 Freight long
4655 $DEF RO4FL=6-8*RO4FS
4656
4657 # EP 4 Passenger regional
4658 $DEF RO4PR1=(4*CFR_BMX2921,CFR_AMX1426,4*CFR_BFM2427)|(<4*CFR_BAFLD2991,CFR_AALD1722,3*CFR_BAFLD2921)| \
4659 (<CFR_AAFLD1722B1,CFR_AAFLD1722B2,5*CFR_2920DM(|L))| \
4660 (<CFR_BAFLD2921A,CFR_AAFLD1722,5*CFR_BAFLD2921A)| \
4661 (CFR_BAFMD2157A,CFR_BAFMD2147P,CFR_AAFMD1147G,CFR_BARBAFMD,2*CFR_BAFMD2147P,CFR_TFA9157G)| \
4662 (CFR_1947_01,CFR_2047_01)|(3*CFR_2147_01,CFR_1147_01,CFR_2147_01)| \
4663 (3*CFR_2147_01L,CFR_1147_01L,CFR_2147_01L)|(3*CFR_2047_02,CFR_1147_02,CFR_2147_02)| \
4664 (3*CFR_2147_02L,CFR_1147_02L,CFR_2147_02L)
4665
4666 # EP 4 Passenger long distance
4667 $DEF RO4PL1=(<CFR_4AM1950L,CFR_4ABM3950L,5*CFR_4BM2050L,CFR_POST1L)| \
4668 (<CFR_WLABMEEA,CFR_WRLM,5*CFR_4BCM5950L)|(<(5*CFR_4BM2050),CFR_4ABM3950,CFR_4AM1950)| \
4669 (<(5*CFR_4BCM5950),CFR_WLABMEE2,CFR_WLABMEEB)| \
4670 (<0-1*CFR_POST9257,4*(CFR_BA2057G|CFR_B2057IVA),CFR_WR8849, \
4671 2*(CFR_AAFLD1040G|CFR_A1947G|CFR_A1957IVA),CFR_ABAFLD3957GL|CFR_ABAFLD3040GL, \
4672 CFR_FAFMD9257G|CFR_TFA9160G)| \
4673 (<0-1*(CFR_DPOST9157|CFR_D9247),5*CFR_BA2921,CFR_ABAFLD3723H,CFR_AAFLD1722H)| \
4674 (<3*CFR_6BCM5950B,CFR_5941E(|L),CFR_7041(|L),3*CFR_2047C,CFR_3951ABL,CFR_2051M1)| \
4675 (3*CFR_2047_01,2*CFR_1947_01,3*CFR_2047_01)|(3*CFR_2047_01L,2*CFR_1947_01L,3*CFR_2047_01L)
4676
4677 # EP 5 Freight short
4678 $DEF RO5FS=(2-3*CFR_45_GGS147(5|5H|5D|5DH|6|6H|6A1|6A2|6A2H|9|9H)(|L))| \
4679 (2-3*CFR_5_GGS147(5|5H|5D|5DH|6|6H|6A1|6A2|6A2H|9|9H)(|L))| \
4680 (2-3*(CFR_EAOS4|CFR_EAOS8|CFR_KS9|CFR_RGS3|CFR_RGS4|CFR_RGS5|CFR_RILS|CFR_354RILS))| \
4681 (2-3*(CFR_EACS0(2|3)(|L)[OB:SCRAP_1(2|3|4|5)(|[M]),,30]))
4682
4683 # EP 5 Freight long
4684 $DEF RO5FL=6-8*RO5FS
4685
4686 # EP 5 Passenger long distance
4687 $DEF RO5PL1=(5*CFR_5BCM5950L,CFR_2051BL,CFR_5AM1950L)|(CFR_2051B,CFR_5AM1950,5*CFR_5BCM5950)| \
4688 (4*CFR_2041AL,CFR_WR2,CFR_3941A,CFR_1941AL,CFR_DPOST_MB0)| \
4689 (3*CFR_2047_03,2*CFR_1947_03,3*CFR_2047_03)|(3*CFR_2047_03L,2*CFR_1947_03L,3*CFR_2047_03L)| \
4690 (3*CFR_2047_02,2*CFR_1947_02,3*CFR_2047_02)|(3*CFR_2047_02L,2*CFR_1947_02L,3*CFR_2047_02L)| \
4691 (3*CFR_2047R1,2*CFR_1947_07,3*CFR_2047R(1|2))|(3*CFR_2047R1L,2*CFR_1947_07L,3*CFR_2047R(1|2)L)| \
4692 (3*CFR_2047_05,2*CFR_1947_05,3*CFR_2047_05)|(3*CFR_2047_05L,2*CFR_1947_05L,3*CFR_2047_05L)
4693
4694 # EP 5 Passenger Short
4695 $DEF RO5PS1=(3*CFR_2147_03,CFR_1147_03,2*CFR_2147_03)|(3*CFR_2147_03L,CFR_1147_03L,2*CFR_2147_03L)
4696
4697 # EP 6 Freight short
4698 $DEF RO6FS=(3-4*((PKP_ES|CFR_ESX1|CFR_ESX2|CFR_ESX3|CFR_ESX4)[O:(FER3|FER4|FR_SUTR),,27]))| \
4699 (3-4*CFR_GAGS05L|CFR_GAGS05|CFR_GAGS06L|CFR_GAGS06)|(3-4*CFR_KS(2|4)[OB:TARP(14|_BBCL),,14])| \
4700 (3-4*CFR_RGS(1|2)[OB:WOOD5(6|7),,12])|(3-4*CFR_354RILS|CFR_UAGPS2L|CFR_UAGPS2)| \
4701 (3-4*CFR_TALS02L|CFR_TALS02|CFR_TALS03L|CFR_TALS03|CFR_TALS04L|CFR_TALS04|CFR_UAGPS1L|CFR_UAGPS1| \
4702 CFR_UAGPS3L)|(3-4*(CFR_EAOS3|CFR_EAOS4|CFR_EAOS8|CFR_EAOS1|CFR_EAOS5)[O:(SCRAP6|SCRAP5)])| \
4703 (3-4*CFR_UACS|CFR_UCS1_1|CFR_UCS1_5|CFR_245HBBILLNNS)| \
4704 (2-3*(CFR_EACS0(4|5|6|7)(|L)[OB:SCRAP2(0|1)(|[M]),,30]))| \
4705 (2-3*((DBSR_RGSSO02|CFR_RGSSO02|CFR_RGSSO04|GFR_RGSSO02|SVT_RGSSO02|CTV_RGSSO02)(|L) \
4706 ([O:(BETON3(|[M]),40,BETON3(|[M])),,13]|[O:(BETON4(|[M]),40,BETON4(|[M])),,13]|[O:BETON2(|[M]),,13])))| \
4707 (2-3*((DBSR_RGSSO01|CFR_RGSSO01|CFR_RGSSO03|GFR_RGSSO01|SVT_RGSSO01|CTV_RGSSO01)(|L) \
4708 ([OB:(PIPE34,20,PIPE34,20,PIPE34,20,PIPE34),,13]| \
4709 [OB:(BOILERPARTS1,20,BOILERPARTS1,20,BOILERPARTS1),,13]|[OB:BOILERRINGS(|[M]),,13])))
4710
4711 # EP 6 Freight long 1
4712 $DEF RO6F1=6*RO6FS
4713
4714 # EP 6 Freight long coal transport
4715 $DEF RO6F3=12*CFR_FALS[OB:(FR_KO37|FR_COAL(1|2)(|[M])|COAL(33|34|35|3)(|[M]))]
4716
4717 # EP 6 Freight short
4718 $DEF RO6F2=(2*(CFR_ZAS7|CFR_ZAS8|G_ZAES_HR)), \
4719 4*(CFR_UAGPS4L|CFR_UAGPS4|CFR_UAGPS5L|CFR_UAGPS5|CFR_UAGPS6L|CFR_UAGPS6|CFR_UAGPS7L|CFR_UAGPS7)
4720
4721 # EP 6 Freight Tank
4722 $DEF RO6FT=20*((EEST|GFR|RP|RSCO|TIS|UFT|UTZ|VMET)_ZAES60SO01)(|L) \
4723 (|[BC:-15,-40,10,12,102]|[BC:-8,-20,10,12,102])| \
4724 (CFR_ZAES67SO0(1|2|3|4|5)(|L)(|[BC:-15,-40,9,12,115]|[BC:-8,-20,9,12,115])| \
4725 CFR_ZAS73SO0(1|2|3|4)(|L)(|[BC:-15,-40,9,12,115]|[BC:-8,-20,9,12,115])| \
4726 (GFR_ZAES67SO01|RP_ZAES67SO01|RSCO_ZAES67SO01|VMET_ZAES67SO01|GFR_ZAES67SO02|RSCO_ZAES67SO02| \
4727 GFR_ZAES67SO03)(|L)(|[BC:-15,-40,9,12,115]|[BC:-8,-20,9,12,115])| \
4728 CFR_ZAES60SO0(1|2|3|4|5|6|7|8)(|L)(|[BC:-15,-40,10,12,102]|[BC:-8,-20,10,12,102]))
4729
4730 # EP 6 Freight cerales short
4731 $DEF RO6FGS=8*((CFR_UAGPSSO01|CFR_UAGPSSO02|CFR_UAGPSSO03|CFR_UAGPSSO04|CFR_UAGPSSO06|CFR_UAGPSSO07| \
4732 CFR_UAGPSSO08|CFR_UAGPSSO09|CFR_UAGPSSO10|CFR_UAGPS7|RSTK_UAGPS01|RSCO_UAGPSSO02|CTV_UAGPSSO03| \
4733 CTV_UAGPS01|TRCR_UAGPSSO01|SVT_UAGPS01|VMET_UAGPS01)(|L) \
4734 (|[BC:-10,-40,8,12,131]|[BC:-5,-20,8,12,131]))
4735
4736 # EP 6 Freight cerales long
4737 $DEF RO6FGL=2*RO6FGS
4738
4739 # EP 6 Freight Scrap short
4740 $DEF RO6FRS=6*(CTV|UFT|TFG|SVT|GFR)_EACS01(|L)[OB:SCRAP2(0|1)(|[M]),,30]
4741
4742 # EP 6 Freight Scrap long
4743 $DEF RO6FRL=2*RO6FRS
4744
4745 # EP 6 Freight FALS
4746 $DEF RO6FR=16*((CFR_FALS05|CFR_FALSSO01|CFR_FALSSO02|CFR_FALSSO03|CTF_FALSSO01|DBSR_FALSSO01| \
4747 DBSR_FALSSO02|GFR_FALSSO01|GFR_FALSMSO01|GFR_FALSMSO02|LSD_FALS|RSCO_FALSSO01|SVT_FALS01| \
4748 SVT_FALSSO02|SVT_FALSSO03|SVT_FALSSO04|TFG_FALSSO01|UFT_FALS01|UTZ_FALSSO01|VMET_FALSSO01)(|L) \
4749 (|[BC:-10,-40,5,9,140]|[BC:-5,-20,5,9,140]))
4750
4751 # EP 6 Freight Bauzug
4752 $DEF RO6FB=(5*(CFR_KSSO(02|06|10)(|L)[O:BALLAST4(8|9)(|[M]),,18]), \
4753 4*(CFR_RESSO0(4|2|6)(|L)[O:SAND(4|23|3),,18]))|(6*(CFR_RESSO0(3|1|5)(|L)[OB:RAIL7,,16]))| \
4754 (2*(CFR_KSSO(01|05|09)(|L)[OB:PYLON3(|[M]),,16]), \
4755 3*(CFR_KSSO(08|04|12)(|L)[O:SIGNAL2,14,13][O:SIGNAL1,81,13]), \
4756 2*(CFR_KSSO(07|03|11)(|L)[OB:TRAVERSES01,13,13][OB:TRAVERSES01,42,13][OB:TRAVERSES01,71,13] \
4757 [OB:TRAVERSES01,99,13]))
4758
4759 # EP 6 Passenger short
4760 $DEF RO6P1=(4*(CFR_2047C|CFR_6BM2050(|L)),CFR_6AM1950,CFR_POST(|L))| \
4761 (3*CFR_2047_05,CFR_1947_05,CFR_2047_05)|(3*CFR_2047_05L,CFR_1947_05L,CFR_2047_05L)| \
4762 (3*CFR_2047B(1|2),CFR_1947B1,CFR_2047B(1|2))|(3*CFR_2047B(1|2)L,CFR_1947B1L,CFR_2047B(1|2)L)| \
4763 (3*CFR_2047R3,CFR_1947R3,CFR_2047R3)|(3*CFR_2047R3L,CFR_1947R3L,CFR_2047R3L)| \
4764 (3*CFR_2047R2,CFR_1947_07,CFR_2047R2)|(3*CFR_2047R2L,CFR_1947_07L,CFR_2047R2L)
4765
4766 # EP 6 Passenger short double
4767 $DEF RO6PD=(<CFR_4_BHPD1L,2*CFR_4_BHPM,CFR_4_BHPD1)|(<CFR_4_AHPL,2*CFR_4_BHPM,CFR_4_BHPL)| \
4768 (<CFR_4_AHP,2*CFR_4_BHPM,CFR_4_BHP)|(<CFR_4_BHPD2L,2*CFR_4_BHPM2,CFR_4_BHPD2)| \
4769 (<CFR_4_BHP2L,2*CFR_4_BHPM2,CFR_4_AHP2)|(<CFR_4_AHP2L,2*CFR_4_BHPM2,CFR_4_BHP2)| \
4770 (4*CFR_B2626MB|JZ_ZGLJ_ABM)
4771
4772 #------------------------------------------------------------------------------
4773 #
4774 # Yugoslavia / Serbia
4775 #
4776
4777 # EP 3 Passenger regional
4778 $DEF YU3PS1=JZ_3_GDV_HL,4@M_3_AAF1200(|L)
4779
4780 # EP 3 Freight short
4781 $DEF YU3FS1=(4-5*JZ_3_GDV(|_H)(|L))|(4-5*JZ_GDOVG(|L))|(4-5*JZ_3_GDRVY(|L|U))
4782
4783 # EP 3 Freight long
4784 $DEF YU3FL1=(4-5*YU3FS1)
4785
4786 # EP 4 Freight short
4787 $DEF YU4FS1=(4-5*JZ_4(_ES|EZ5002H)(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27])| \
4788 (4-5*(JZ_3_GDVL|JZ_3_GDV|JZ_3_GDV_HL|JZ_3_GDV_H|JZ_GBSZ2D|JZ_GBSZ1A|JZ_GBSZ1B|JZ_GBSZ1C|JZ_GBSZ1D, \
4789 JZ_GBSZ2A|JZ_GBSZ2B|JZ_GBSZ2C))|(4-5*JZ_GAS(|L))|(4-5*JZ_4A_GMRS(|L|U))
4790
4791 # EP 4 Freight long
4792 $DEF YU4FL1=(4-5*YU4FS1)
4793
4794 # EP 5 Freight long
4795 $DEF YU5FL1=7-9*(JZ_5_ES(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]),5-7*(JZ_GAS(|L))
4796
4797 #------------------------------------------------------------------------------
4798 #
4799 # Slovenia
4800 #
4801 # EP 5 Freight
4802
4803 $DEF SLO5FS=(3-5*SZ_GAS(1|2))|(3-5*(SZ_GAS(1|2)(|L)))| \
4804 (3-5*(SZ_5_ES(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]))|(3-5*SZ_292HIMRRSZ)|(3-5*SZ_HBBILLNS)
4805
4806 $DEF SLO5F1=5*SLO5FS
4807
4808 #------------------------------------------------------------------------------
4809 #
4810 # Croatia
4811 #
4812 # EP 5 Freight short
4813 $DEF HR5F1=3*HZ_5EAOSZ530(|L)|HZ_EASZL|HZ_5EASZ597(|L)[OB:SCRAP(6|7)(|[M])],HZ_5RILSZ354(|L), \
4814 HZ_5RSZ390(|L)[OB:WOOD129,,12],HZ_5RSZ390S(|L)
4815
4816 # EP 6 Passenger
4817 $DEF HR6P1=5*(HZ_2017|HZ_2100(|L)|HZ_2100|HZ_2100A(|L))
4818
4819 # EP 6 Freight short
4820 $DEF HR6F1=10-15*((HZ_EASZ|JZ_EAS|JZ_EAS_B|ZRS_EAS)[OB:SCRAP(6|7)(|[M]),,32]|ZSR_245HBBILLNNS| \
4821 SZ_GAS(1|2)|SZ_HBBINS_LASKO(1|2)|SZ_HBBILLNS|SZ_292HIMRRSZ)
4822
4823 #------------------------------------------------------------------------------
4824 #
4825 # Bulgaria
4826 #
4827 # EP 3 Freight long
4828 $DEF BG3FL=4*((4-5*(JZ_3_GDVL|JZ_3_GDV|JZ_3_GDV_HL|JZ_3_GDV_H))| \
4829 (4-5*(CSD_VTD|CSD_VTDBL|CSD_VTD4_705|CSD_VTD4_70))| \
4830 (4-5*(DR_4A_Z8021|DR_ZSW7361B|CSD_NP1A,CSD_NB|CSD_R8A|CSD_R56))| \
4831 (4-5*BDZ_3_F (F2_450|443B|443H|443|417B5V|417B2|417B1|F2_450L|443BL|443HL|443L|417B5VL|417B2L| \
4832 417B1L))|(4-5*BDZ_3_F2(47642|48646|46375|46226)(|L)))
4833
4834 # EP 4 Freight short
4835 $DEF BG4FS=(3-4*DR_GBS1500(E|F|G|H|I|J|K))|(3-4*DR_IBHQSSZ(5|4))|(3-4*DR_FCS1(A|B|C|D|E)(|L))| \
4836 (3-4*(JZ_GBSZ1(C|D)|BDZ_4A_GKGLM1190))|(3-4*BDZ_4_GS1(470|690)(|L))| \
4837 (3-4*BDZ_4A_GKLM1(191A|090|191B)(|L))|(3-4*(DR_4A_ZAGK7716|CSD_RA1A|DR_ZAEKK1|M_788ZAES_2))| \
4838 (3-4*CFR_ESX(1|2|3|4|5))
4839
4840 # EP 4 Freight long
4841 $DEF BG4FL=6-7*BG4FS
4842
4843 # EP 4 Passenger long distance
4844 $DEF BG4PL1=(<BDZ_4A_DLM1A,BDZ_4AM19(40A|50A|50050A),BDZ_4WRME1A,,4*BDZ_4BM2040A,2*BDZ_4BCM5940A, \
4845 BDZ_POST)| \
4846 (<2*BDZ_4BCM5940AL,4*BDZ_4BM2040AL,BDZ_4WRME1AL,BDZ_4AM19(40A|50A|50050A)L,BDZ_4A_DLM1AL)| \
4847 (<BDZ_4A_BM1AL,BDZ_4A_BM2AL,BDZ_4A_AM1AL,BDZ_4A_AM1A,BDZ_4WRME1AL,BDZ_4WRME1A|BDZ_4A_BM1A, \
4848 BDZ_4A_BM2A,BDZ_4A_DLM1AL|BDZ_4A_DLM1A)| \
4849 (<BDZ_BCM_Z2,BDZ_4BCM5940A,BDZ_4BM2040A,BDZ_4BM2040A,BDZ_4BM2040A,BDZ_4BM2040A,BDZ_4AM1940A, \
4850 BDZ_4AM1950050A,BDZ_POST)
4851
4852 # EP 5 Passenger long distance
4853 $DEF BG5PL1=(<2*(BDZ_5AME1A),BDZ_5ABME1A,BDZ_5WRME1A|BDZ_5BRME1AL,4*(BDZ_5BME1A|BDZ_BM2974(|L)))| \
4854 (<(4*BDZ_5BME1AL),BDZ_5WRME1AL|BDZ_5BRME1AL,BDZ_5ABME1AL,2*(BDZ_5AME1AL|BDZ_AME1940L))
4855
4856 #------------------------------------------------------------------------------
4857 #
4858 # Greece
4859 #
4860
4861 # EP 3 Freight short
4862 $DEF GR3FS=(3-5*OSE_3_Z(PT6101H|1_28501|1_104752)(|L))
4863
4864 # EP 3 Freight long
4865 $DEF GR3F1=GR3FS
4866
4867 # EP 4 Freight short
4868 $DEF GR4FS=(3-5*OSE_4_GGLM1077(|L))|(3-5*(OSE_4_E1007(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]))| \
4869 (3-5*OSE_4_HFG2044(|L))|(3-5*OSE_4_Z2GGS149(5|7H|7B1|7B2|7D1H|7D1B2|7D1B1)(|L))
4870
4871 # EP 4 Freight long
4872 $DEF GR4F1=GR4FS
4873
4874 #------------------------------------------------------------------------------
4875 #
4876 # Turkey
4877 #
4878
4879 # EP 3 Freight long
4880 $DEF TK3F1=(20*TCDD_FALSWU(1|2|3)[O:COAL(41|40|42)(|[M])])| \
4881 (5*TCDD_GBSU1,6*(G_K1|G_4631|G_G1|G_ES(2|1)),(5-6*TCDD_3_K(W_D2|W_D2L|W|WL|_D2U|U)))
4882
4883 # EP 4 Freight short
4884 $DEF TK4F1K=(5-6*TCDD_45_GBSWU15(12|11|107|105|102|00)(|L))|(5-6*(TCDD_4GLMV1030(|L)|TCDD_GBSU1))
4885
4886 # EP 4 Freight long
4887 $DEF TK4F1=4*TK4F1K
4888
4889 # EP 4 Passenger
4890 $DEF TK4P1=TCDD_A1PEF2,TCDD_1014,2*TCDD_YSE,2*TCDD_4CU
4891
4892 # EP 5 Freight short
4893 $DEF TK5F1K=(5-6*TCDD_5_HABIS(|5|2|3|4)(|L))|(5-6*TCDD_UADGSWU(1|2|3))|(5-6*TCDD_FA(1|2|3|4)(|L))| \
4894 (5-6*TCDD_45_GBSWU15(12|11|107|105|102|00)(|L))
4895
4896 # EP 5 Freight long
4897 $DEF TK5F1=4*TK5F1K
4898
4899 # EP 6 Freight short
4900 $DEF TK6F1K=(5-6*TCDD_UADGSWU(1|2|3))|(5-6*TCDD_FA(1|2|3|4)(|L))| \
4901 (5-6*TCDD_6GBSWU15(12|11|107|105|102|00)(|L))|(5-6*TCDD_6HBBILLNS(|L))
4902
4903 # EP 6 Freight long
4904 $DEF TK6F1=4*TK6F1K
4905
4906 #------------------------------------------------------------------------------
4907 #
4908 # Sovietunion / GUS broad gauge
4909 #
4910 # Sovietunion / Russia
4911 $DEF SUO1=SZD_31661(A|B|C|D|E|F|G|H|I)(|L)[O:SAND100]
4912 $DEF SUT1=SZD_15TS862(A|B|BH|C|D)(|L)
4913 $DEF SUT2=SZD_151443(A|B|C)(|L)
4914 $DEF SUT3=RZD_151443(B|C)(|L)
4915 $DEF SUT4=RZD_151443UT(1|2|3|4)_SFAT(|L)
4916
4917 $DEF SUF=(15-25*SUO1)|(10-20*SUT1)|(15-25*SUT(2|3|4))
4918
4919 # EP 1 Freight long Russia
4920 $DEF SU1F1=15-18*(((NZD_1B_NTV125B|NZD_1C_NTV180|NZD_1C_NTV180B|SIBZD_1C_NVR125B|YUZZD_1C_NTV125B)(|L))| \
4921 (NZD_1B_NTV125|NZD_1C_NTV180U|SIBZD_1C_NVR125|YUZZD_1C_NTV125|ZKV_1_449(|L)|RU_1_15731(|L)| \
4922 SZVM_1_34891(|L)))
4923
4924 # EP 2/3 Freight long Soviet Union Buffer
4925 $DEF SU2FLB=15*(SZD_T2_(2|4)(|L)|SZD_G1BUF(1|2|3)(|L)|SZD_GB(1|2|3)BUF(|L)|SZD_G)
4926
4927 # EP 3 Freight long Soviet Union
4928 $DEF SU3FL=6*((4-5*SZD_11066(A|AL|B|C|D|E|F|G|H))|(4-5*SZD_11K001(A|B|C|D|E|F|G))| \
4929 (4-5*SZD_11K001(A|B|C|D|E|F|G))| \
4930 (4-5*SZD_12119(A|B|C|D|E|F|G|H))[O:(FR_KO37|FR_COAL1|FR_COAL2|COAL34)(|[M])]| \
4931 (4-5*SZD_15TS862(A|B)(|H)(|L)))
4932
4933 # EP 4 Freight long Soviet Union
4934 $DEF SU4FL1=(15-20*SUO1)|(15-20*(SUT1|SUT2))| \
4935 (3-5*(SZD_11287(A|B|C|D)),2-3*SZD_ZB5651MK(4B|4A),1-2*SZD_KLEIMYONOVA(|L), \
4936 2-3*SZD_11066(_Y25|Y25A|Y25B|Y25C|Y25D), \
4937 3-4*(SZD_GAGSV|SZD_11K001A|SZD_11K001B|SZD_11K001D|SZD_11K001E|SZD_11K001F|SZD_11K001G| \
4938 SZD_11270BBL|SZD_11270BB|SZD_11270CB|SZD_11270DBL|SZD_11270DB|SZD_GAGSVL),4-5*SZD_17431(A|B|C), \
4939 3-4*SZD_12P152(F|E|D|C|B|A))|(15-20*(SZD_19752(D|C|B|A)(|L)))
4940
4941 # EP 4 Passenger long Soviet Union
4942 $DEF SU4PL1=(6-10*SZD2COACH)|(<SZD_SKKL,(7*SZD_3WLAB(1|2)))|(<(7*SZD_3WLAB(1|2)L),SZD_SKK,SZD_TVER)
4943
4944 # EP 5 Passenger long RUSSIA
4945 $DEF RUS5PL1=(6-10*(RZD_TVER|RZD_Y)), \
4946 (<RZD_614177_V1_PERESVETL,2*RZD_614177_V2_PERESVETL,3*RZD_KRK_PERESVETL,RZD_BAG_PERESVETL)
4947
4948 # EP 5 Freight short RUSSIA
4949 $DEF RUS5FS1=(3-5*(RZD_31656SO0(3|2|1|4|6|5|7|8)(|L)))|(3-5*(RZD_11217(RMA|B|A)(|L)))| \
4950 (3-5*(RZD_114164))|(3-5*(RZD_15P761_BZHRK|RZD_ZB5651MK4))|(3-5*(RZD_151597(|L)|SUT(3|4)))
4951
4952 # EP 5 Freight long RUSSIA
4953 $DEF RUS5FL1=4-5*RUS5FS1
4954
4955 # EP 6 Freight short RUSSIA
4956 $DEF RUS6FS1=3-4*(SUT3|SUT4)
4957 $DEF RUS6FS2=3-4*(SZD_119553|RZD_114164|RZD_132114|RZD_11217RMA(|L)|RZD_11217A(|L)|RZD_11217B(|L)| \
4958 RZD_ZB5651MK4)
4959 $DEF RUS6FS3=3-4*(RZD_31634SO0(1|2|3|4|5|6|7|8)(|L)|RZD_31656SO0(1|2|3|4|5|6|7|8)(|L))
4960 $DEF RUS6FS4=3-4*(RZD_TANK8_08|RZD_TANK8_12(|L)|RZD_TANK8_10(|L)|RZD_151597(|L)|RZD_151408(|L))
4961 $DEF RUS6FS5=3-4*RZD_151500(A|B|C|D|E)
4962
4963 # EP 6 Freight long RUSSIA
4964 $DEF RUS6FL1=1:(6*RUS6FS1)|3:(6*RUS6FS(2|3|4|5))
4965
4966 # EP 6 Passenger long distance
4967 $DEF RUS6PL1=(<RZD_6WLABM2~JMD,RZD_WLABMEE62A,3*RZD_WLABMEE62,3*RZD_WLSRMEE1,RZD_WRMNOUZ)| \
4968 (<(4*RZD_KRK_BAIKAL),RZD_61828_BAIKAL,5*RZD_KRK_BAIKAL)| \
4969 (<(5*RZD_KRK_BAIKALL),RZD_61828_BAIKALL,4*RZD_KRK_BAIKALL)| \
4970 (<RZD_6WLABM2L|RZD_WLABM_S,RZD_WLABMEE62AL,3*RZD_WLABMEE62L,3*RZD_WLSRMEE1L,RZD_WRMNOUZ)| \
4971 (<RZD_KB_SC,RZD_VR_SC245,(6*(RZD_6WLSRMEE1L|RZD_6WLABM52|RZD_6WLABMEE1L)))| \
4972 (<(5*RZD_6WLSRMEE1,RZD_6WLABMEE1),RZD_VR_SC245,(6*RZD_6WLABM(1|2)),RZD_K_SC)| \
4973 (<4*RZD_W_AUTO_SC,(6*(RZD_6WLSRMEE1L|RZD_6WLABM52|RZD_6WLABMEE1L)))| \
4974 (<2*RZD_A_NEVSKY,3*RZD_B_NEVSKY,RZD_WR_NEVSKY,3*(RZD_WL_NEVSKY2|RZD_WL_NEVSKY))
4975 #------------------------------------------------------------------------------
4976 #
4977 # Belarus
4978 #
4979 # EP 5 Passenger long
4980 $DEF BER5PL1=4*BCH_5WLABMEE(|L),4*BCH_WLABMEE62(|L)
4981
4982 #------------------------------------------------------------------------------
4983 #
4984 # Estonia
4985 #
4986 # EP 6 Freight long Estland
4987 $DEF EST6FL1=(15-20*(EVR_151500AL|EVR_151500A|EVR_151500BL|EVR_151500B|EVR_151500C|EVR_151500CL~JMD))
4988
4989 #------------------------------------------------------------------------------
4990 #
4991 # Georgia
4992 #
4993 # EP 6 Freight long Georgia
4994 $DEF GEO6FL1=RUS6FL1
4995
4996 #------------------------------------------------------------------------------
4997 #
4998 # Ukraine
4999 #
5000 # EP 5 Passenger long
5001 $DEF UZ5PL1=4-5*UZ_KRK(|L),UZ_KRK_WRW(|L),2*UZ_Y,UZ_KRK_DY(|L)|(8*(UZ_WLABM_(3|3)))
5002
5003 # EP 6 Passenger long
5004 $DEF UZ6PL1=(<UZ_WLABM4,UZ_WL1,2*UZ_WLABM2,UZ_KRK_WRW,4*UZ_KRK_Y)| \
5005 (<UZ_WLABD_3502358,UZ_617034RIC,(3*UZ_61788B),UZ_61788WR,3*UZ_61788B,UZ_61778)
5006
5007 #------------------------------------------------------------------------------
5008 #
5009 # Kasachstan Bogatyr
5010 #
5011 # EP 6 Freight Coal Bogatyr
5012 $DEF KAZ6FBO1=BOGATYR_COALCAR(|2)[O:COAL(5|3|3|34|35)(|[M])]
5013
5014 #------------------------------------------------------------------------------
5015 #
5016 # USA
5017 #
5018
5019 # universal trains
5020
5021 # freight E2 Wood
5022 $DEF USA2FWOODK=4-6*(WEYT_3FLAT[O:WOOD1(96|95|91|97|98|92|94|93)]),WEYT_3CAB
5023
5024 # freight E2
5025 $DEF USA2FMIXKS=(PRR_CH30|PRR_CH30Y)|SOU_CATTLE(1|2|3|4|8|7|6|5)|(CWC_1290_VAO13|MPA_510_XM)| \
5026 (VL_10320_XL1912|WLER_25050_ARA1923)(|L)|FGEX_RF_36000S(2|3|1|1R|1R2)(|L)| \
5027 SAL_(13055_PRE1932_B4|15747_PRE1932_B5|12399_PRE1932_B3)(|L)| \
5028 (FGEX_40532_RF1922|NX_R7_MATHEISON|NX_R7_8852_MATHEISON|FGEX_R7_43500|EKSX_1046_RF)| \
5029 NWP_1927_XM_USRADS|NWP_1952_XM_USRADS|NWP_1958_XM_USRADS|NWP_1978_XM_USRADS|PM_80742_XM_USRADS| \
5030 PM_81068_XM_USRADS|PM_81319_XM_USRADS|TOC_14029_XM_USRADS|AARB_12055_XM_USRASS| \
5031 AARB_90024_XM_USRASS|AARB_90117_XM_USRASS|CCO_8064_XM_USRASS|CCO_8137_XM_USRASS| \
5032 MCRR_80605_XM_USRASS|PMCKY_S81280_XM_USRASS|PREA_5136_XM_USRASS|LNE_8208_ARA1923|LNE_8263_ARA1923| \
5033 HPTD_400_ARA1923|CCCSTL_57500_XM_USRA|CCCSTL_59499_XM_USRA|CNOR_S4396_XM_USRA|HCRR_954_XM_USRAAB| \
5034 ((HCRR_954_XM_USRAK|MCRR_96371_XM_USRAAB|MCRR_96371_XM_USRAK|MCRR_S81674_XM_USRA| \
5035 PAE_3605_XM_USRAAB|PAE_3605_XM_USRAK)(|L))|BARR_(50312_XM_AB|50312_XM_K)(|L)| \
5036 (GARX_37_(ABRAHAM1|DUBUQUE1|DUBUQUE3|DUGDALE1|EMGE1|ESTHERVILLE1|KINGAN1|KINGAN2|SUPERIOR1|TOBIN1) \
5037 (|L))|(PRLW_611023_RF1915|PRLW_611072_RFUL1903|PRLW_611077_RFUL1915|NX_R7_8145)(|L)| \
5038 CWC_O14C_9042(|L)|((CHAX_107_TM_ACF11|CRWX_224_TM_ACF11|TCX_2890_TM_ACF11)(|L))| \
5039 MPA_(531|513|713|729)_XM|CAC_710_XL1909|CVRR_1232_XL1912|MPA_1150_XM|MPA_1153_XM|NCR_14068_XL1903| \
5040 PRLW_559941_XLSL1903|CCCSTL_56524_XM_USRADS|(CMO_36508_XM_USRADS|CMO_1720_XM|CMO_37095_XM_USRADS)| \
5041 (DTI_11049_XM_USRADS|DTI_11560_XM|DTI_11699_XM|DTI_11273_XM_USRADS)| \
5042 ((KNGX_3102_HYGRADE1|SRLX_GATC37_SWIFT1|SRLX_GATC37_SWIFT2|SRLX_GATC37_SWIFT3|URTX_5357_MAYER1| \
5043 URTX_63061)(|L))|PRLW_XA_278(|L)|CWC_1939_XMO18(|L)|AD_SU_524(|L)| \
5044 DMN_U14_22081[O:FR_KO46(|[M]),,31](|L)|(THB_FOWLER_4259|PGE_FOWLER_3530)(|L)| \
5045 WMR_(27001|27780|27007|27790|27010|27623)_XM_ARA1932(|L)| \
5046 ((ART_1911RS_11995|URT_1911RS_1599|WFEX_1911RS_54198|URTX_RS_4975|URTX_RS_88194|MDT_RS_7253)(|L))| \
5047 ((PFE_R302_1906|PFE_R302_1909|PFE_R302_1923|PFE_R302_1925|PFE_R304_1913|PFE_R304_1923| \
5048 PFE_R304_1925)(|L))| \
5049 ((PFE_R306_1913|PFE_R306_1923|PFE_R306_1925|PFE_R3011_1917|PFE_R3011_1923|PFE_R3011_1925)(|L))| \
5050 ((PFE_R3012_1920|PFE_R3012_1923|PFE_R3012_1925|PFE_R3013_1923|PFE_R3013_1925|PFE_R3013_1923WP| \
5051 PFE_R3013_1925WP)(|L))| \
5052 ((APPX_RS_327|MDT_RS_9308|MDT_RS_9884|MDT_RS_10465|MDT_RS_10886|MDT_RS_12027|MDT_RS_12072)(|L))| \
5053 ((MDT_RS_12498|MDT_RS_13325|MDT_RS_13373|MDT_RS_14205|NRC_RS_16211|NRC_RS_16326|NRC_RS_16557| \
5054 NRC_RS_20014)(|L))
5055
5056 $DEF USA2FMIXK=3-5*USA2FMIXKS
5057
5058 $DEF USA2FMIX=6*USA2FMIXK,(PMCKY_164|BN_10107|SMVR_210|ATSF_CAB3|CHW_6)(|L)
5059
5060 # Pullmann Passenger E3
5061 $DEF USAP3PU=(9-11*(PULL_63(COLE|GLENARBOR|GLENBAY|GLENCANYON|GLENCRAG|GLENCREEK|GLENDEVON|GLENDOLL| \
5062 GLENEAGLES|GLENROY|GLENTILT|HOLBEIN|MICHELANGELO|RUBENS)))| \
5063 (9-11*(PULL_63(COLE|GLENARBOR|GLENBAY|GLENCANYON|GLENCRAG|GLENCREEK|GLENDEVON|GLENDOLL|GLENEAGLES| \
5064 GLENROY|GLENTILT|HOLBEIN|MICHELANGELO|RUBENS)L))| \
5065 (9-11*(PULL_66(POPLARJUNCTION|POPLARLANE|POPLARROAD|POPLARTERRACE|POPLARVALLEY|POPLARWOODS)))| \
5066 (9-11*(PULL_66(POPLARJUNCTION|POPLARLANE|POPLARROAD|POPLARTERRACE|POPLARVALLEY|POPLARWOODS)L))| \
5067 (9-11*(PULL_(ARCHPEAK|LONEPEAK|PINTOPEAK|REDWOODPEAK|ALEXANDERHENRY|CENTIDA|CENTSALVA| \
5068 GENERALCANBY|ISAACISTEVENS|STGOTHARDPASS)))| \
5069 (9-11*(PULL_(ARCHPEAK|LONEPEAK|PINTOPEAK|REDWOODPEAK|ALEXANDERHENRY|CENTIDA|CENTSALVA| \
5070 GENERALCANBY|ISAACISTEVENS|STGOTHARDPASS)L))| \
5071 (9-11*((PULL_84(EMERALDPARK|EMERALDVALE))| \
5072 (PULL_831(BOKTOWER|BRESLINTOWER|CHIMESTOWER|DROMEDARYTOWER|KILCULLENTOWER|RATHAUSTOWER|ROUNDTOWER| \
5073 SIEBERSTOWER|TAITSTOWER))))| \
5074 (9-11*((PULL_84(EMERALDPARK|EMERALDVALE)L)| \
5075 (PULL_831(BOKTOWER|BRESLINTOWER|CHIMESTOWER|DROMEDARYTOWER|KILCULLENTOWER|RATHAUSTOWER|ROUNDTOWER| \
5076 SIEBERSTOWER|TAITSTOWER)L)))| \
5077 (9-11*(PULL_1012(FORTANDREWS|FORTBLISS|FORTCANBY|FORTCASEY|FORTCLARK|FORTCROOK|FORTDADE|FORTDAVIS| \
5078 FORTFOSTER|FORTGAINES|FORTGIBBON|FORTGRANT|FORTGREBLE|FORTKEOGH|FORTLISCUM|FORTMEADE|FORTPICKENS| \
5079 FORTSLOCUM|FORTTRAVIS|LAKEAINSLIE|LAKEAPOPKA|LAKEARIANA|LAKEARTHUR|LAKEBENTON|LAKEBUFFUM| \
5080 LAKECALLIOU|LAKECALUMET|LAKECHARLES|LAKEDRUMMOND|LAKEELMO|LAKEEUNICE|LAKEEUSTIS|LAKEFERGUSON| \
5081 LAKEFORTUNA|LAKEGEORGE|LAKEHANCOCK|LAKEHARNEY|LAKEHARRIET|LAKEHARRIS|LAKEHENDERSON|LAKEHURON| \
5082 LAKEJOE|LAKELONG|LAKEMAITLAND|LAKEMERRITT|LAKEMILTONA|LAKEMINNETONKA|LAKEMONROE|LAKEMOREAU| \
5083 LAKEPEARL|LAKEPEIGNEU|LAKEPONCHARTRAIN|LAKEVALE|LAKEWINNEBAGO)))| \
5084 (9-11*(PULL_1012(FORTANDREWS|FORTBLISS|FORTCANBY|FORTCASEY|FORTCLARK|FORTCROOK|FORTDADE|FORTDAVIS| \
5085 FORTFOSTER|FORTGAINES|FORTGIBBON|FORTGRANT|FORTGREBLE|FORTKEOGH|FORTLISCUM|FORTMEADE|FORTPICKENS| \
5086 FORTSLOCUM|FORTTRAVIS|LAKEAINSLIE|LAKEAPOPKA|LAKEARIANA|LAKEARTHUR|LAKEBENTON|LAKEBUFFUM| \
5087 LAKECALLIOU|LAKECALUMET|LAKECHARLES|LAKEDRUMMOND|LAKEELMO|LAKEEUNICE|LAKEEUSTIS|LAKEFERGUSON| \
5088 LAKEFORTUNA|LAKEGEORGE|LAKEHANCOCK|LAKEHARNEY|LAKEHARRIET|LAKEHARRIS|LAKEHENDERSON|LAKEHURON| \
5089 LAKEJOE|LAKELONG|LAKEMAITLAND|LAKEMERRITT|LAKEMILTONA|LAKEMINNETONKA|LAKEMONROE|LAKEMOREAU| \
5090 LAKEPEARL|LAKEPEIGNEU|LAKEPONCHARTRAIN|LAKEVALE|LAKEWINNEBAGO)L))| \
5091 (9-11*(PULL_121(ALHAMBRA|BARONROCHAMBEAU|BARONVONSTEUBEN|BERTHOLD|CHINOOK|EASTALHAMBRA| \
5092 EASTALLEGHANY|EASTALLENTOWN|EASTANGUS|EASTASCOT|EASTBANGOR|EASTBETHANY|EASTBRANCH|EASTCANDIA| \
5093 EASTCLINTON|EASTEND|FERRYFARM|LEWIS|LORDCORNWALLIS|LORDFAIRFAX|MARQUISLAFAYETTE|MCADAM|MCAFEE| \
5094 MCANDREWS|MCANNA|MCANULTY|MCARA|MCARTHUR|MCBETH|MCBRIDE|MCCAFFREY|MCCARR|MCCRANEY|MCCREADYVILLE| \
5095 MCCULLOUGH|MCCUNE|MCDANIEL|MCDONALD|MCGINTY|MCGIRR|MCGIVNEY|MCGRADY|MCKINLEY|MCKINLEYVILLE| \
5096 MCKOWEN|MCLOON|MCMARTINVILLE|MCMINNVILLE|MCPHETRES|MCQUEEN|MCSHERRYSTOWN|MCTAGGART|MCTAVISH| \
5097 MONMOUTH|SEATTLE|STALEXIS|STANTHONY|STAUBERT|STBRIDES|STCLOUD|STCROIX|STDENIS|STEVENS|STGENEVIEVE| \
5098 STGEORGE|STGERMAIN|STHELENA|STHILAIRE|STJOSEPH|STLEONARD|STLOUIS|STNICHOLAS|STNORBERT|STPIERRE| \
5099 STSERVAN|STTHOMAS|STVICTOR|SUPERIOR|UTICA|VANCOUVER|WAHPETON|WAKEFIELD|WILLISTON|WINNIPEG)))| \
5100 (9-11*(PULL_121(ALHAMBRA|BARONROCHAMBEAU|BARONVONSTEUBEN|BERTHOLD|CHINOOK|EASTALHAMBRA| \
5101 EASTALLEGHANY|EASTALLENTOWN|EASTANGUS|EASTASCOT|EASTBANGOR|EASTBETHANY|EASTBRANCH|EASTCANDIA| \
5102 EASTCLINTON|EASTEND|FERRYFARM|LEWIS|LORDCORNWALLIS|LORDFAIRFAX|MARQUISLAFAYETTE|MCADAM|MCAFEE| \
5103 MCANDREWS|MCANNA|MCANULTY|MCARA|MCARTHUR|MCBETH|MCBRIDE|MCCAFFREY|MCCARR|MCCRANEY|MCCREADYVILLE| \
5104 MCCULLOUGH|MCCUNE|MCDANIEL|MCDONALD|MCGINTY|MCGIRR|MCGIVNEY|MCGRADY|MCKINLEY|MCKINLEYVILLE| \
5105 MCKOWEN|MCLOON|MCMARTINVILLE|MCMINNVILLE|MCPHETRES|MCQUEEN|MCSHERRYSTOWN|MCTAGGART|MCTAVISH| \
5106 MONMOUTH|SEATTLE|STALEXIS|STANTHONY|STAUBERT|STBRIDES|STCLOUD|STCROIX|STDENIS|STEVENS|STGENEVIEVE| \
5107 STGEORGE|STGERMAIN|STHELENA|STHILAIRE|STJOSEPH|STLEONARD|STLOUIS|STNICHOLAS|STNORBERT|STPIERRE| \
5108 STSERVAN|STTHOMAS|STVICTOR|SUPERIOR|UTICA|VANCOUVER|WAHPETON|WAKEFIELD|WILLISTON|WINNIPEG)L))| \
5109 (9-11*(PULL_121BLACKSTOCKSL|PULL_121BROCKWAYL|PULL_121CAHOKIAL|PULL_121CULEBRAL|PULL_121DESERETL| \
5110 PULL_121DORCHESTERL|PULL_121EASTBUFFALOL|PULL_121EASTCLARENCEL|PULL_121EASTOSWEGOL| \
5111 PULL_121EASTPEMBROKEL|PULL_121ESPANOLAL|PULL_121ESSEXL|PULL_121FREMONTL|PULL_121FRESNOL| \
5112 PULL_121KASKASKIAL|PULL_121KNOLLWOODL|PULL_121LACONIAL|PULL_121MANITOUL|PULL_121MARIANAL| \
5113 PULL_121MONTAUKL|PULL_121ORANGEBLOSSOML|PULL_121ORANGECITYL|PULL_121ORANGECOVEL| \
5114 PULL_121ORANGEHEIGHTSL|PULL_121ORANGEHILLL|PULL_121ORANGESPRINGSL|PULL_121ORANGEVALLEYL| \
5115 PULL_121ORANGEVILLEL|PULL_121PONTIACL|PULL_121REDASHL|PULL_121REDBLUFFL|PULL_121REDBRANCHL| \
5116 PULL_121REDBUDL|PULL_121REDCLIFFL|PULL_121REDFORKL|PULL_121REDLEVELL|PULL_121REDLODGEL| \
5117 PULL_121REDRIVERL|PULL_121SAMOSETL|PULL_121SUSQUEHANNAL|PULL_121TUSCALOOSAL|PULL_121WIGWAML| \
5118 PULL_121COLUSAL|PULL_121EAUCLAIREL|PULL_121ECHOL|PULL_121PLACERVILLEL|PULL_121WHEATONL| \
5119 PULL_1211CLANDONALDL|PULL_1211VILLAALTAL|PULL_1211VILLACHEERL|PULL_1211VILLACOMFORTL| \
5120 PULL_1211VILLAPARKL))| \
5121 (9-11*(PULL_121BLACKSTOCKS|PULL_121BROCKWAY|PULL_121CAHOKIA|PULL_121CULEBRA|PULL_121DESERETL| \
5122 PULL_121DORCHESTER|PULL_121EASTBUFFALO|PULL_121EASTCLARENCE|PULL_121EASTOSWEGOL| \
5123 PULL_121EASTPEMBROKE|PULL_121ESPANOLA|PULL_121ESSEX|PULL_121FREMONT|PULL_121FRESNOL| \
5124 PULL_121KASKASKIA|PULL_121KNOLLWOOD|PULL_121LACONIA|PULL_121MANITOU|PULL_121MARIANAL| \
5125 PULL_121MONTAUK|PULL_121ORANGEBLOSSOM|PULL_121ORANGECITY|PULL_121ORANGECOVEL| \
5126 PULL_121ORANGEHEIGHTS|PULL_121ORANGEHILL|PULL_121ORANGESPRINGS|PULL_121ORANGEVALLEYL| \
5127 PULL_121ORANGEVILLE|PULL_121PONTIAC|PULL_121REDASH|PULL_121REDBLUFF|PULL_121REDBRANCHL| \
5128 PULL_121REDBUD|PULL_121REDCLIFF|PULL_121REDFORK|PULL_121REDLEVEL|PULL_121REDLODGEL| \
5129 PULL_121REDRIVER|PULL_121SAMOSET|PULL_121SUSQUEHANNA|PULL_121TUSCALOOSA|PULL_121WIGWAML| \
5130 PULL_121COLUSA|PULL_121EAUCLAIRE|PULL_121ECHO|PULL_121PLACERVILLE|PULL_121WHEATONL| \
5131 PULL_1211CLANDONALD|PULL_1211VILLAALTA|PULL_1211VILLACHEER|PULL_1211VILLACOMFORTL| \
5132 PULL_1211VILLAPARK))|(9-11*(PULL_1214OAKRUNL|PULL_1214OAKSHADEL|PULL_1214OAKWOODL))| \
5133 (9-11*(PULL_1214OAKRUN|PULL_1214OAKSHADE|PULL_1214OAKWOOD))| \
5134 (9-11*(PULL_16SALSUMAL|PULL_16SATASCADEROL|PULL_16SETNAL|PULL_16SGLEASONL|PULL_16SKAMSINL| \
5135 PULL_16SNANTESL|PULL_16SNEWCASTLEL|PULL_16SORIANNAL|PULL_16SRANKINL|PULL_16SRIVERDALEL| \
5136 PULL_16SSARDONYXL|PULL_16SSUPREMEL|PULL_16STROLLOPEL|PULL_16SVERDUNL|PULL_16SWANNASKAL))| \
5137 (9-11*(PULL_16SALSUMA|PULL_16SATASCADERO|PULL_16SETNA|PULL_16SGLEASON|PULL_16SKAMSIN| \
5138 PULL_16SNANTES|PULL_16SNEWCASTLE|PULL_16SORIANNA|PULL_16SRANKIN|PULL_16SRIVERDALE| \
5139 PULL_16SSARDONYX|PULL_16SSUPREME|PULL_16STROLLOPE|PULL_16SVERDUN|PULL_16SWANNASKA))
5140
5141 # USA Freigt E3 mixed hopper
5142 $DEF USA3FMIXH=(25-30*((CCCSTL_79262_HM_USRA|CCCSTL_79823_HM_USRA|CCO_43973_HM_USRA|CS_18067_HM_USRA| \
5143 FRDX_1800_HM_USRA|IHCX_396_HM_USRA|MTRR_15301_HM_USRA|MTRR_16042_HM_USRA|MTRR_17144_HM_USRA| \
5144 CI_454_HM|WLER_61445_HM|LSI_5161_HM|MTRR_18158_HM|MTRR_534_HM|TC_9499_HM|OW_696_HM_USRA| \
5145 PWV_3101_HM_USRA|CI_4750_HM|PWV_5000_HM_USRA|RDG_73592_HM_USRA|NSA_9149_HM|WA_11017_HM_USRA)(|L) \
5146 [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33]))| \
5147 (25-30*((FCI_3HOPN|FCI_3HOPE|UP_3HOPN|US_3HOPN|US_3HOPE)(|L) \
5148 [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M])]))| \
5149 (25-30*((DMIR_Q8_4971_PS2003|EJE_LO_3223_PS2003|FJLCX_34018_PS2003|LC_410_PS2003|LC_411_PS2003| \
5150 LNE_18167_PS2003|NAHX_LO_31060_PS2003|NAHX_LO_31110_PS2003|NAHX_LO_31323_PS2003| \
5151 PWV_LO_1955_PS2003|SLSF_84031_PS2003|SOU_280243_PS2003|SOU_319248_PS2003|SSW_77167_PS2003| \
5152 SSW_77131_PS2003|SSW_LO_77088_PS2003)(|L)))
5153
5154 # USA Freigt E3 Short mixed
5155 $DEF USA3FMIXK=(3-5*REXA_6(774|859|055)_BR(|L))|(3-5*SP_59830(1|2|3))|(3-5*LC_SU_503(|L))| \
5156 (3-5*(NOTM_17469|MI_4125|IGN_17156|LARW_15077|LARW_15027)_XM_ARA1932(|L))| \
5157 (3-5*((AESX_23_TM_ACF11|CHAX_107_TM_ACF11|CMCX_143_TM_ACF11|COSX_1018_TM_ACF11|CRWX_224_TM_ACF11| \
5158 LARW_8000_TM_ACF11|LTLX_3023_TM_ACF11|NOX_8027_TM_ACF11|SRDX_409_TM_ACF11|STLBM_20041_TM_ACF11| \
5159 SVX_558_TM_ACF11|TCX_2792_TM_ACF11|TCX_2890_TM_ACF11|TCX_4119_TM_ACF11|WOCX_217_TM_ACF11| \
5160 CDLX_763_TMI_ACF27|SHPX_4039_TMI_ACF27|SHPX_6117_TM_ACF27|SHPX_20605_TM_ACF27|LNAC_XM_10254| \
5161 MKT_XM_PS1_5585|WRNX_2840_TMPI_ACF27|UTLX_9871_TMVANDYKE|AESX_23_TM_ACF11|CHAX_107_TM_ACF11| \
5162 CMCX_143_TM_ACF11|CRWX_224_TM_ACF11|LARW_8000_TM_ACF11|NOX_8027_TM_ACF11|SRDX_409_TM_ACF11| \
5163 TCX_2890_TM_ACF11|CDLX_763_TMI_ACF27|SHPX_6117_TM_ACF27|UTLX_9871_TMVANDYKE)(|L)))| \
5164 (3-5*CCLX_LO_2045(|L))|(3-5*(COPR_XM_PS1_4010(|L)|SRCR_BOX1))| \
5165 (3-5*(CBQ_SK_50048|GSX_SK_4012|NISX_SK_479)(|L))|(3-5*(LC_XM_PS1_1008)(|L))| \
5166 (3-5*((MPA_(531|513|713|729)_XM|CAC_710_XL1909|CVRR_1232_XL1912|MPA_1150_XM|MPA_1153_XM| \
5167 NCR_14068_XL1903|PRLW_559941_XLSL1903|CCCSTL_56524_XM_USRADS|CMO_36508_XM_USRADS| \
5168 CMO_37095_XM_USRADS|DTI_11049_XM_USRADS|DTI_11273_XM_USRADS|NWP_1927_XM_USRADS|NWP_1952_XM_USRADS| \
5169 NWP_1958_XM_USRADS|NWP_1978_XM_USRADS|PM_80742_XM_USRADS|PM_1937AAR_XM_84202|PM_81068_XM_USRADS| \
5170 PM_81319_XM_USRADS|TOC_14029_XM_USRADS|AARB_12055_XM_USRASS|AARB_90024_XM_USRASS| \
5171 AARB_90117_XM_USRASS|CCO_8064_XM_USRASS|MWR_1341_XM|CCO_8137_XM_USRASS|MCRR_80605_XM_USRASS| \
5172 PMCKY_S81280_XM_USRASS|PREA_5136_XM_USRASS|LNE_8208_ARA1923|LNE_8263_ARA1923|HPTD_400_ARA1923| \
5173 CCCSTL_57500_XM_USRA|CCCSTL_59499_XM_USRA|SP_B5020_54394|CNOR_S4396_XM_USRA|HCRR_954_XM_USRAAB| \
5174 HCRR_954_XM_USRAK|MCRR_96371_XM_USRAAB|MCRR_96371_XM_USRAK|MCRR_S81674_XM_USRA|PAE_3605_XM_USRAAB| \
5175 PAE_3605_XM_USRAK)(|L)))|(3-5*TC_1937AAR_XM_7957(|L))| \
5176 (3-5*(OW_696_HM_USRA[O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]), \
5177 ,33]))|(3-5*MPA_115(1|2)_XM(ORIG|LATE)(|L))|(3-5*FDDMS_XM_PS1_12304(|L))| \
5178 (3-5*(HPTD_424_ARA1923(|L)|WIF_104_XM_ARA1923(|L)|TS_504_PS1(|L)|WP_(36001|3017)_PS1(|L)))| \
5179 (3-5*(PHD_XM_1275|TC_XM_7756)(|L))|(3-5*(WFEX_RF_67000S3(|L)))| \
5180 (3-5*SNA_GB_4500(|L)[O:SCRAP(5|6)(|[M])])|(3-5*ELS_GB_5033(|L)[O:SCRAP(4|5|6)(|[M])])| \
5181 (3-5*((CBQ_188850_GB_USRA|HVR_12412_GB_USRA|TNO_G5017_44277|MC_12200_GB_USRA)(|L) \
5182 [O:BALLAST(29|27|25|31)(|[M])]))|(3-5*(FCI_GON(|L)[O:SCRAP(14|15)(|[M])]))| \
5183 (3-5*(CWC_O14C_9042|FDDMS_15177_XM)(|L))| \
5184 (3-5*GARX_37_(ABRAHAM1|DUBUQUE1|DUBUQUE3|DUGDALE1|EMGE1|ESTHERVILLE1|KINGAN1|KINGAN2|SUPERIOR1| \
5185 TOBIN1)(|L))|(3-5*(MRSR_XM_(80|75)00|MWR_XM_(1287|1138))(|L))| \
5186 (3-5*(KNGX_3102_HYGRADE1|SRLX_GATC37_SWIFT1|SRLX_GATC37_SWIFT2|SRLX_GATC37_SWIFT3| \
5187 URTX_5357_MAYER1|URTX_63061)(|L))|(3-5*LAPX_XT_(3040|3019|2061|306|298)(|L))| \
5188 (3-5*(SHPX_6608_TMI|CDLX_764_TMI|CDLX_335_TMI|NATX_6604_TMI)(|L))
5189
5190 # USA Freigt E3 Car transport
5191 $DEF USA3FCAR=20*((BTTX_RFP_F89CH_904796|BTTX_RFP_F89CH_904797|KTTX_ACL_F89CH_903427| \
5192 KTTX_NYC_F89CH_902766|KTTX_PRR_F89CH_902180|TTKX_SCL_F89CH_904042|TTX_NW_F89CH_904697| \
5193 TTX_SOU_F89CH_904636)(|L))
5194
5195 # USA Freigt E3 long mixed
5196 $DEF USA3FMIXL=6*USA3FMIXK
5197 $DEF USA3FMIX=4:USA3FMIXL|1:USA3FMIXH|1:USA3FCAR
5198
5199 # USA Freigt E3/E4 Tank
5200 $DEF USA4FTANK=20-30*(((AESX_23_TM_ACF11|CHAX_107_TM_ACF11|CMCX_143_TM_ACF11|COSX_1018_TM_ACF11| \
5201 CRWX_224_TM_ACF11|LARW_8000_TM_ACF11|LTLX_3023_TM_ACF11|NOX_8027_TM_ACF11|SRDX_409_TM_ACF11| \
5202 STLBM_20041_TM_ACF11|SVX_558_TM_ACF11|TCX_2792_TM_ACF11|TCX_2890_TM_ACF11|TCX_4119_TM_ACF11| \
5203 WOCX_217_TM_ACF11|CDLX_763_TMI_ACF27|SHPX_4039_TMI_ACF27|SHPX_6117_TM_ACF27|SHPX_20605_TM_ACF27| \
5204 WRNX_2840_TMPI_ACF27|UTLX_9871_TMVANDYKE)(|L)|AESX_23_TM_ACF11|CHAX_107_TM_ACF11| \
5205 CMCX_143_TM_ACF11|CRWX_224_TM_ACF11|LARW_8000_TM_ACF11|NOX_8027_TM_ACF11|SRDX_409_TM_ACF11| \
5206 TCX_2890_TM_ACF11|CDLX_763_TMI_ACF27|SHPX_6117_TM_ACF27|UTLX_9871_TMVANDYKE(|L))| \
5207 GATX_TM_(71603|54532)(|L)|NYC_16017_TM_GATC12K(|L)|GATX_TM_98455(|L)|GATX_TM_98468(|L))|SCCX_T2| \
5208 GATX_T1|HOKX_T1|SVX_T5|SHPX_T4|SHPX_T5|GATX_T2|SCCX_T1|SHPX_T3|WRNX_T1|SVX_T6|SCCX_T3|SHPX_T2| \
5209 TROX_T1
5210
5211 # USA Freigt short E4
5212 $DEF USA4FMIXK=((3-4*(MP_58678_HM_USRA|PWV_3025_HM_USRA|RDG_73593_HM_USRA)(|L)))| \
5213 (4-5*((ATWR_50333|CTRN_501091|GWWR_3050|MVRY_4003)(|L)[O:SCRAP(6|4|5)(|[M])]))| \
5214 (4-5*(SHAY_GON(1|2|3|4|5|6)))|(4-5*((SP_LO_2600_1965A|SP_LO_2600_1965B)(|L)))| \
5215 (3-4*(RDG_74170_HM_USRA(|L)|TC_9099_HM_USRA(|L)|VGN_3233_HM_USRA(|L)|WABR_74050_HM_USRA(|L)))| \
5216 (3-4*(CPAA_XP_A302_204452|GNWR_XP_A302_300007|AGRW_XP_A302_1164|VC_XP_A302_9093)(|L))| \
5217 (3-4*(VTR_617|BN_5188|ATSF_3178|ADN_XP_A403_5889|ADN_XP_A403_5889L|GAEX_BOX1))| \
5218 (3-4*(WA_PS50C_5101|TLCX_PS50C_1001|PAE_PS150_4630)(|L))| \
5219 (3-4*GONX_GB_(310040|310080|310099|310100|310029)(|L))| \
5220 (3-4*((LSBC_XM_PS1_1(100|69809)|COPR_XM_PS1_4010|MSC_XM_PS1_5055|MB_XM_4202|MSE_XM_811)(|L)))| \
5221 (4-5*(TTX_F39(C_471100|C_471099|C_470930|A_470600|_470430|_470420|_470410)[OB:SEMI_USA4L,12,10] \
5222 [OB:SEMI_USA4L,121,10]))| \
5223 (4-5*(POTB_XM_159|RBOX_XAF10_12588|RBOX_XAF20A_32583|RBOX_XAF20A_32612)(|L))| \
5224 (3-4*(FUS_XM_1308|SBC_XM_3505|SBC_XM_3559|FUS_XM_1209|LRS_XM_7245|TLDX_PS50C_33|TLDX_PS50C_36)(|L))| \
5225 (3-4*(HBS_XM_39631|OPE_XM_1023|CSS_XM_1526|GAEX_XME_100000|GAEX_XM_74015|GMO_XM_103003|MNS_XM_563| \
5226 PAE_883B_4519|PLE_X44C_31700|RSP_XM_100015|TAG_XM_7001|TAG_XM_7029|TSE_XM_147)(|L))| \
5227 (4-5*(TTX_F39(C_471100|C_471099|C_470930|_470420|_470430|_470410)L[OB:SEMI_USA4R,12,10] \
5228 [OB:SEMI_USA4R,121,10]))|(4-5*(AECX|CEFX|KGLX|MBKX|MRDX)_AFLOOD2(|L))| \
5229 (3-4*(PHD_PS40(|L)|GN_35028|CPR_200055|WA_5000_PS1(|L)|DTI_15292_PS1(|L)|SN_2401_PS1(|L)| \
5230 LRS_XP_A302_4081(|L)|WCCL_XP_A302_25119(|L)|WLO_XP_A302_504460(|L)|ANRR_XP_A302_6018(|L)| \
5231 ANRR_XP_A302_6019(|L)|CNA_XP_A302_549304(|L)|LC_XP_A302_239(|L)|LEF_XP_A302_1436(|L)| \
5232 LOAM_XP_A302_88095(|L)|NHIR_XP_A302_721(|L)|WSOR_XP_A302_101501(|L)|WVRC_XP_A302_820(|L)| \
5233 NOPB_XP_3329(|L)|NOPB_XP_3447(|L)|NOKL_XP_525121(|L)|VR_XP_3135(|L)|AARB_XP_5199(|L)| \
5234 AGRW_XP_184(|L)|AGRW_XP_196|AGRW_XP_291(|L)|AGRW_XP_620(|L)|AGRW_XP_1796(|L)|AGRW_XP_2036(|L)| \
5235 ALAB_XP_13011(|L)|ALM_XP_531561(|L)|EEC_XP_5013(|L)|GRN_XP_8050(|L)|GTRA_XP_2044(|L)| \
5236 HS_XP_2170(|L)|HS_XP_4398(|L)|HS_XP_6328(|L)|LVRC_XP_5044(|L)|NLG_XP_5493(|L)|NOPB_XP_3896(|L)| \
5237 NOPB_XP_3897(|L)|SBVR_XP_2035(|L)|TASD_XP_9118(|L)|TNR_XP_6005(|L)))| \
5238 (4-5*(CDLX_763_TMI_ACF27(|L)|SHPX_4039_TMI_ACF27(|L)|SHPX_6117_TM_ACF27(|L)| \
5239 SHPX_20605_TM_ACF27(|L)|STLBM_20041_TM_ACF11(|L)|SVX_558_TM_ACF11(|L)|TCX_2792_TM_ACF11(|L)| \
5240 NOX_8027_TM_ACF11(|L)))|(4-5*TTX_F30D_(475264|475263)L[OB:SEMI_USA4R,,12])| \
5241 (4-5*TTX_F30D_(475264|475263)[OB:SEMI_USA4L,,12])| \
5242 (3-4*(BM_PS40|BO_PS40S|BO_PS40TS|CBQ_PS40|CBQ_120537_XM_USRADS|GRN_XM_8040)(|L))| \
5243 (3-4*(ITC_XM_7291|SLSF_XM_41298|AARB_XM_5072|ATWR_XF_1000|CAGY_XM_21500|CHP_XM_8170|HN_XF_5000| \
5244 WLO_XM_503462)(|L))| \
5245 (3-4*(CHP_XM_8170|IATR_XM_1810|JEFW_XM_1033|MCSA_XM_7104|NDEM_XM_102046|NDEM_XM_102465| \
5246 NDEM_XM_108556)(|L))| \
5247 (3-4*(RR_XM_458|TPW_XM_70006|VC_XP_1182|GMRC_XM_11092|HCRC_XM_818|WLO_XM_503462|NYSW_XF_104)(|L))
5248
5249 $DEF USA4FS=3-4*USA4FMIXK
5250
5251 # USA Freigt car trasport E4
5252 $DEF USA4CAR=20*ETTX_FA_907765_GT(|L)|ETTX_FA_902966_BN(|L)|UP_89AR2
5253
5254 # USA Freigt mixed long E4
5255 $DEF USA4FMIX=4:(6*USA4FMIXK)|1:USA4CAR
5256
5257 # USA Freigt short E5
5258 $DEF USA5FS=(3-4*ARR_FM12838)| \
5259 (3-4*(CEI_XL_253016|ADN_XM_8005|AGRW_XM_5193|AMR_XM_1010|ANRR_XM_5037|ASAB_XM_7120|ASAB_XM_7122| \
5260 AWP_XM_51428)(|L))| \
5261 (3-4*(WM_LO_604960|CEI_LO_706323|DRGW_LO_10070|PLE_LO_1875|SLSF_LO_78748|ROCK_LO_512076| \
5262 ROCK_LO_512011)(|L))|(3-4*(PGEX_BETHGON2(|L)|UP_BETHGON2(|L)|PSCX_BETHGON2(|L)|SOM_BETHGON2(|L)))| \
5263 (3-4*(KGLX_AFLOOD2(|L)|CEFX_AFLOOD2(|L)|MBKX_AFLOOD2(|L)|CNW_AFLOOD3(|L)|UCEX_RD6TRI(|L)))| \
5264 (3-4*(BM_PS40(|L)|BO_PS40S(|L)|BO_PS40TS(|L)|CBQ_120537_XM_USRADS(|L)|CPR_PS40(|L)))| \
5265 (3-4*(CENT_CBF1[O:(WRAPLUMBER(1|2|3)|WRAPTIE1),,9]))| \
5266 (3-4*(CNA_XP_A302_549402|MNJ_XP_A302_120949|NSL_XP_A302_101262|NSL_XP_101893))| \
5267 (3-4*(ACFX_ACF4650C|ACFX_ACF4650B|ACFX_LO_44071|NAHX_LO_35818|GFCX_LO_7|BCAX_TRI3281SO01| \
5268 CEFX_TRI3281SO01|HWCX_TRI3281SO01|MCEX_TRI3281SO01|TILX_TRI3281SO01|TILX_TRI3281SO02)(|L))| \
5269 (3-4*(TTZXW|CW_5147(|L)|NDYX_320798(|L)))| \
5270 (3-4*TTWX_PSH10A_993041[OB:SEMI_USA5R,16,11][OB:SEMI_USA5R,155,11])| \
5271 (3-4*TTWX_PSH10A_993041L[OB:SEMI_USA5L,18,11][OB:SEMI_USA5L,157,11])| \
5272 (3-4*KTTX_F89GH_912378(|L)[OB:SEMI_USA5L,12,11][OB:SEMI_USA5R,156,11])| \
5273 (3-4*(EACH_FMC50(|L)|CSX_XL_A332_486083(|L)|CNW_XP_A302_717253(|L)|CCR_FMC50(|L)| \
5274 BN_XP_A302_249762(|L)))|(3-4*CNA_PS50C_794383(|L))| \
5275 (3-4*(CHE_ACF4650(|L)|BN_ACF4650(|L)|VC_RBL_5200|VC_XM_5200L|GN_ACF4650(|L)|MRL_ACF4650(|L)| \
5276 NCLX_ACF4650(|L)|PCC_ACF4650(|L)|SHPX_ACF4650(|L)|SP_ACF4650(|L)|SSW_ACF4650(|L)))| \
5277 (5-6*(ADMX_TANK43(|L)|GATX_TANK43K(|L)|HOKX_TANK43(|L)|UTLX_TANK43B(|L)|KCPX_TANK54(|L)| \
5278 SHPX_TANK54(|L)|SUNX_TANK54(|L)))|(4-5*(CNA_PS50C_794383|DH_PS50C_50000|DTI_PS50C_81000)(|L))| \
5279 (3-4*(AMC_LU_552|AMR_LU_5016|BCHY_LU_733|BCHY_LU_817|FJG_LU_29018|LNAC_LU_6045|LOAM_LU_11381| \
5280 USLX_LU_50289)(|L))| \
5281 (3-4*(FGCX_RPL_11698|ARMN_R7020_765036|ARMN_R7020_765037|FGMR_RPL_13398|PFE_R7020H_457404| \
5282 VCY_RPL_25289)(|L))| \
5283 (3-4*(PFE_R7020K_457632|PFE_R7020H_456904|PFE_R7020K_467633|SPFE_R7020_456909|SPFE_R7020_456923| \
5284 UPFE_R7020_457980)(|L))| \
5285 (3-4*(SPFE_R7020_457232|LNAC_RBL_5046|SPFE_R7020_457233|UPFE_R7020_457508|UPFE_R7020_457533| \
5286 UPFE_R7020_457979)(|L))| \
5287 (3-4*(BCIT_RBL_800480|LNAC_RBL_5257|LNAC_RBL_5257|LRLX_RBL_222|RPCX_RBL_159|TPW_RBL_50567)(|L))| \
5288 (3-4*(TPW_RBL_50582|USLX_RBL_17097|WSOR_RBL_503052|WSOR_RBL_503056|WSOR_RBL_503081)(|L))
5289
5290 # USA Freigt E6 Car transport
5291 $DEF USA6FCAR=(20*(ATSF_AUTORACK|BN_AUTORACK~BC|BNSF_AUTORACK1|BNSF_AUTORACK2|BNSF_AUTORACK3))| \
5292 (20*(ARTAUTOMAX|BNSF_ARTAUTO|CSX_ARTAUTO|AUTOMAX|BNSF_AUTOMAX|BNSF_AUTOMAX2|CP_AUTOMAX| \
5293 CSX_AUTOMAX|KCS_AUTOMAX|UP_AUTOMAX))| \
5294 (20*(CTTX_MULTIMAX_NSA|AMTK_FA_9200|AMTK_FA_9208|CTTX_MULTIMAX_BNSF1|CTTX_MULTIMAX_BNSF2| \
5295 CTTX_MULTIMAX_CNR|CTTX_MULTIMAX_CSX|CTTX_MULTIMAX_KCS)(|L))
5296
5297 # USA Freigt E6 Container
5298 $DEF USA6FCON1=7*((2-4*TTX_INTER[OB:C40B,,4][O:C40B,,30])|(2-4*DTTX_SINGLE[OB:C40B,,4][O:C40B,,30])| \
5299 (2-4*(FEC|AWXX)_TW85(|L)[O:C40B,17,12][O:C40B,137,12])|(2-4*SP_GUMS48(|L)[OB:C40B,,3][OB:C40B])| \
5300 (2-4*TTX_GUMS48(|L)[OB:C40B,,3][OB:C40B])| \
5301 (2-4*(FEC|AWXX)_TW85(|L)[O:(LWT|USWX|DSEU|AWIU)_TRASHCONT(|L),14,13] \
5302 [O:(LWT|USWX|DSEU|AWIU)_TRASHCONT(|L),75,13][O:(LWT|USWX|DSEU|AWIU)_TRASHCONT(|L),136,13] \
5303 [O:(LWT|USWX|DSEU|AWIU)_TRASHCONT(|L),197,13])| \
5304 (<(SP_GUMS48(A|B)L[OB:C40B,,3][OB:C40B]),((1|3)*SP_GUMS48M(|L)[OB:C40B,,3][OB:C40B]), \
5305 (SP_GUMS48(A|B)[OB:C40B,,3][OB:C40B]))| \
5306 (<(DTTX_3PACKEL[OB:C40B,46,4][O:C40B,46,30]),((1|3)*DTTX_3PACKM[OB:C40B,29,4][O:C40B,29,30]), \
5307 (DTTX_3PACKE[OB:C40B,29,4][O:C40B,29,30]))| \
5308 (<(BRAN_GUMS48(A|B)L[OB:C40B,,3][OB:C40B]),((1|3)*BRAN_GUMS48M(|L)[OB:C40B,,3][OB:C40B]), \
5309 (BRAN_GUMS48(A|B)[OB:C40B,,3][OB:C40B]))| \
5310 (<(DTTX_GUMS48(A|B)L[OB:C40B,,3][OB:C40B]),((1|3)*DTTX_GUMS48M(|L)[OB:C40B,,3][OB:C40B]), \
5311 (DTTX_GUMS48(A|B)[OB:C40B,,3][OB:C40B]))|(2-4*OTTX_E(1|2)[O:C30A,6,10][O:C30A,97,10])| \
5312 (2-4*(CPR_524176|DTTX_25064|DTTX_CONT1) \
5313 (([O:C30A,20,13][O:C30A,111,13])|([O:C40A,20,13][O:C20A,141,13])|([O:C20A,20,13][O:C40A,81,13]))))
5314
5315 # USA Road-railer
5316 $DEF USA6FRRA1=(<TCSZ_HEADL,14*(TCSZ_TRAILER(1|2|3|4|5)(|L)),TCSZ_HEAD)
5317
5318 # USA Freigt E6 Tank
5319 $DEF USA6FTANK=20-30*(((ADMX|AFPX|CCLX|CRGX|DMIX|HOKX|PROX|SBLX|STSX)_TANK43(|L))| \
5320 ((UTLX_TANK43(A|B|T)|GATX_TANK43(H|K|E)|PROX_TANK43A|GATX_TANK54(A|B))(|L))| \
5321 ((ACFX|ACTX|ATSF|CPCX|EAGX|KCPX|OWIX|RACX|SHPX|SUNX)_TANK54(|L))| \
5322 ((WPHX_2009|PUBX_138|PUBX_151|WPHX_215)_T679(|L))|SHPX_206830_TM(|L)| \
5323 ((ADMX|AGPX|CCBX|BRCX|CGTX|CHSX|DNAX|GATX|MQPX|PROX|SHPX|UTLX)_TANK55(|L))| \
5324 ((PROX|ARPX|NATX)_TANK65(|L))|((VPCX|ACSX|ACFX|CITX|JJJX|GATX|PROX|GLNX|UTLX)_TANK67(|L))| \
5325 ((CNTX_TANK67(A|B)|PLMX_TANK65A|SHPX_TANK67A)(|L))|(STAX|ACFX|CGW|HCPX|HOKX|SP)_TANK50)
5326
5327 # USA Freigt E6 mixed short
5328 $DEF USA6FMIXK=(4-5*CEFX_3(2892|0288)(|L)[O:BALLAST_OLD1(|[M])])| \
5329 (4-5*(ACFX_LO_49369|FWD_LO_3190|GMO_LO_81028|CEI_LO_718519|ACY_LO_448|AEX_LO_7515| \
5330 ACFX_38806_LO5800|SEAB_LO_248664|VTR_LO_6003|FXE_TRI5161SO01|IAIS_TRI5161SO01|SIRX_TRI5161SO01| \
5331 DME_5161TRI)(|L))|(4-5*DSEX_TW85(|L)[O:(GIRDER_BELL|STEEL23),,12])|(4-5*AMGX_6028(|L))| \
5332 (4-5*(CNA_PS50C_794383|DH_PS50C_50000|DTI_PS50C_81000)(|L))| \
5333 (4-5*((ICER_320052(|L)|JTIX_9001(|L)|DMER_80197(|L)|MBKX_287011(|L))[O:SCRAP(6|4|5)(|[M])]))| \
5334 (4-5*(AOK_65420TRI3281|AGPX_TRI5161|FLIX_TRI5161)(|L))| \
5335 (4-5*(PRR_LO_260177|SHPX_LO_60419|SHPX_LO_60928|SHPX_LO_61066|TRLX_LO_5344)(|L))| \
5336 (4-5*((CRLE_8667_XPA|PRR_110126_XPA|MP_272009_XPA|CR_293792_XPA|BO_492069_XPA)(|L)))| \
5337 (4-5*TTPX_(GSH72A|NSH72)(|L)[OB:CELLULOSE(|[M]),,11])| \
5338 (4-5*(UTCX_PS4740SO01|TLCX_4700PS2|PLCX_PS4740SO0(1|2)|PTLX_PS4740SO01|PVGX_PS4740SO01| \
5339 PTLX_PS4750SO01|CATX_PS4740SO01|CRLE_PS4740SO01|GLCX_PS4740SO0(1|2)|IMRL_PS4740SO01)(|L))| \
5340 (4-5*(DME_PS4750SO01|DJTX_PS4750SO0(1|2)|CRDX_PS4750(|A|SO02|SO03|SO04|SO05)|CBRW_PS4750SO01| \
5341 CGRX_PS4750SO01|ATW_PS4750SO01|BCOL_PS4750SO0(1|2)|ACOX_PS4750SO01|ADMX_PS4750SO0(2|1)| \
5342 AGPX_PS4750SO02|AJPX_PS4750SO01|AM_PS4750SO0(2|1)|MNS_PS4740SO0(1|2)|MNS_PS4750SO01| \
5343 MOCX_PS4750SO01|MWCX_PS4750SO01)(|L))|(4-5*TPIX_2(10_RPL|20_RPL|30_RPL)(|L))| \
5344 (4-5*TLCX_PS4740SO(20|19|18|17|16|15|14|13|12|11|10|09|08|07|06|05|04|03|02)(|L))| \
5345 (4-5*(LCGX_PS4750SO01|LGIX_PS4750SO01|ITC_PS4750SO01|FGIX_PS4750SO01|FLIX_PS4750SO0(1|2|3)| \
5346 FPFX_PS4750SO01|FURX_PS4750SO01|GACX_PS4750SO0(1|2)|GELX_PS4750SO01|GLCX_PS4750SO01| \
5347 GNBC_PS4750SO0(1|2|3|4)|ITFX_PS4750SO01|JRSX_PS4750SO01|JWFX_PS4750SO01|GRPX_PS4750SO01| \
5348 MPA_126_MWF)(|L))|(4-5*TLDX_PS4740SO(09|08|07|06|05|04|03|02|01)(|L))| \
5349 (4-5*(SRY_NSC73CB(|L)[O:LUMBER(3|5)(|[M]),12,12][O:LUMBER(3|5)(|[M]),100,12] \
5350 [O:LUMBER4(|[M]),188,12]|SGLR_NSC73CB(|L)[O:LUMBER(1|2)(|[M]),12,12][O:WOOD30(|[M]),143,12]))| \
5351 (4-5*TTX_TW89(|L)[OB:#STRAIL_14,16,10][OB:STRAIL_14,143,10])| \
5352 (4-5*(AARB_PS4700|CBRW_PS4700|TCAX_PS47(00|40SO02|40SO03)|TLCX_4700PS2|AGPX_PS4750|UTCX_PS4750)(|L))| \
5353 (4-5*(SIRX_HS4550SO01|NOKL_HS4550SO01|KPLX_HS4550SO01|GTAX_HS4550SO01|ENDX_HS4550SO01| \
5354 FLIX_HS4550SO01|GCCX_HS4550SO01|SKPX_HS4550SO1|THB_HS4550SO01|SCOX_HS4550|GWIX_HS4550| \
5355 NAHX_HS4550(|SO02)|IMCX_HS4550)(|L))|(4-6*NP_(REF50WFE|REF60|PS4740SO01(|L)))| \
5356 (4-5*NAHX_PS4750SO(30|29|28|27|26|25|24|23|22|21|20|19|18|17|16|15|14|13|12|11|10|09|08|07|06|05| \
5357 04|03|02)(|L))| \
5358 (4-5*(MPA_XM_A302_7517|MPA_XP_A302_203|MPA_XM_A302_9248|MPA_300_PS1|MPA_7200_PS1|MPA_7300_PS1)(|L))| \
5359 (4-5*(BSEX_TRI6351SO01|CITX_TRI6351SO01|CRDX_TRI6351SO01|FURX_TRI6351SO01|MWTX_TRI6351SO01| \
5360 NAHX_TRI6351SO01|TILX_TRI6351SO02|TSAX_TRI6351SO01)(|L))| \
5361 (4-5*(ADMX_TRI5161SO02|ADMX_TRI5161SO03|BORX_TRI5161SO01|DJTX_TRI5161SO01|GACX_TRI5161SO02| \
5362 GACX_TRI5161SO03|GACX_TRI5161SO04|SIRX_TRI5161SO02|SOYX_TRI5161|SOYX_TRI5161SO02|TILX_TRI5161SO01| \
5363 TILX_TRI5161SO02|TIMX_TRI5161SO01)(|L))| \
5364 (4-5*(UNPX_HS4550SO0(2|1)|ALPX_HS4550(|SO02|SO03)|ACFX_LO_88|SHPX_LO_46011|NAHX_LO_38154| \
5365 SHPX_LO_6(0419|1066)|TRLX_LO_5344)(|L))| \
5366 (4-5*(USLX_PS4750SO0(1|2|3|4)|TPW_PS4750SO01|TRGX_PS4750SO01|UNPX_PS4750SO0(1|2)| \
5367 USLX_PS4750SO0(1|2|3|4|5)|PVGX_PS4750SO01|PCC_PS4750SO01|PLCX_PS4750SO0(1|2|3|4|5)| \
5368 SEAB_PS4750SO01|PLWX_PS4750SO0(1|2|3)|RRVW_PS4740SO01|NAHX_PS4750SO01)(|L))| \
5369 (4-5*PTLX_PS4750SO(44|43|42|41|40|39|38|37|36|35|34|33|32|31|30|29|28|27|26|25|24|23|22|21|20|19| \
5370 18|17|16|15|14|13|12|11|10|09|08|07|06|05|04|03|02)(|L))| \
5371 ((4-5*((AEX_4023_THRALL4000|DLWR_7042_THRALL4000|AMGX_4130_THRALL4000|AMGX_4184_THRALL4000| \
5372 ECXX_2135_THRALL4000|EAMX_5017_THRALL4000|LEF_4502_THRALL4000|PEPX_21_THRALL4000| \
5373 PEPX_80_THRALL4000|PMGX_5201_THRALL4000|PSCX_520_THRALL4000|SVGX_1010_THRALL4000| \
5374 APAX_550_THRALL4000|CUOH_3028_THRALL4000|DJJX_2407_THRALL4000|DJJX_10228_THRALL4000| \
5375 DJJX_18007_THRALL4000)(|L)[O:SAND(7|8|2)(|[M])])))|(4-5*(PRR_H45_259802|KRIX_TRI5161)(|L))| \
5376 (4-5*((NADX_RBL_60508(|L)|CRDX_20837TRI3281|ERCX_7008TRI3281|GACX_8593TRI3281|NRLX_TRI3281)))| \
5377 (4-5*((SSIX_ACF4650|ACFX_ACF4650A|AEX_8380_LO4650)(|L)))|(4-5*((CEFX_30276|CW_5136)(|L)))| \
5378 (4-5*((PDRR_XP_1083|PHD_XP_3001|PHD_XP_5029|SAN_XP_13065|RBOX_XP_15000|MSDR_XP_195473|ATW_XP_3385) \
5379 (|L)))|(4-5*(ALY_91686(|L)[O:WOOD1(29|24),,11]))|(4-5*((CEFX_30276|CW_5136)(|L)))| \
5380 (4-5*((AOK_THR73CB|BCOL_THR73CB|NOKL_THR73CB)(|L)[O:(WRAPLUMBER(1|2|3)|WRAPTIE1),,9]))| \
5381 (4-5*((CBRY_THR73CB|CRLE_TW73CB|CBRY_THR73CB)(|L)[O:WRAPLUMBER(1|2|3),,10]))| \
5382 (4-5*(TTX_AUTORACK2|BN_AUTORACK~BC|ATSF_AUTORACK|BNSF_AUTORACK1))| \
5383 (TTAX_RAF53[OB:VAN53_0(1|2|3|4|5)L,16,8][OB:VAN53_0(1|2|3|4|5)L,190,8] \
5384 [OB:VAN53_0(1|2|3|4|5)L,373,8][OB:VAN53_0(1|2|3|4|5)L,559,8][OB:VAN53_0(1|2|3|4|5),783,8])| \
5385 (TTAX_RAF53L[OB:VAN53_0(1|2|3|4|5)L,16,8][OB:VAN53_0(1|2|3|4|5),230,8] \
5386 [OB:VAN53_0(1|2|3|4|5),413,8][OB:VAN53_0(1|2|3|4|5),599,8][OB:VAN53_0(1|2|3|4|5),783,8])| \
5387 (2*((TTAX_RAF33L[OB:VAN53_0(1|2|3|4|5)L,16,8][OB:VAN53_0(1|2|3|4|5),230,8] \
5388 [OB:VAN53_0(1|2|3|4|5),409,8])| \
5389 (TTAX_RAF33[OB:VAN53_0(1|2|3|4|5)L,16,8][OB:VAN53_0(1|2|3|4|5)L,190,8][OB:VAN53_0(1|2|3|4|5),409,8])))| \
5390 (4-5*((DETX_BETHGON2|DJLX_BETHGON2|GEMX_BETHGON2|GSNX_BETHGON2|JECX_BETHGON2|KCLX_BETHGON2| \
5391 LLCX_BETHGON2)(|L)[OB:SPRUCE1(|[M]),,39]))|(4-5*((AGPX_PS4750|TLCX_4700PS2|TCAX_PS4700|CBRW_PS4700)))
5392 # USA Freigt E6 mixed long
5393 $DEF USA6FMIX=7*USA6FMIXK
5394 # USA Freigt E6 mixed long all
5395 $DEF USA6FREIGT=3:USA6FMIX|1:USA6FRRA1|3:USA6FTANK|3:USA6FCON1|2:USA6FCAR
5396
5397 # Railway companies
5398
5399 # USA Alaska AAR
5400 # Freight E2 short
5401 $DEF USA2FAARS=(4-5*ARR_11700_RF(|L))|2*USA2FMIXK|(5*(ARR_13200E_GB(|L)[O:(COAL7|FR32|COAL1)(|[M])]))
5402 # Freight E2 long
5403 $DEF USA2FAAR=4-5*USA2FAARS,AR_NE_309(|L)
5404 # freight E4 shunting;
5405 $DEF USA4FAARS=(4-5*ARR_FM12838[O:HIPRES_BURNER,,11])|USA4FMIXK|(4-5*ARR_BOX(2|1))| \
5406 (4-5*(ARR_13200(E|L)_GB(|L)[O:(COAL7|FR32|COAL1)(|[M])]))|(4-5*ARR_XP_10923(|L))| \
5407 (4-5*(ARR_13800(E|L)_GB(|L)[O:FR_ST(02|01)(|[M])]))|(4-5*ARR_HT_14301(|L))| \
5408 (4-5*ARR_XM(10708|10438|10240|10207|1552E|8000|8027|8012)(|L))|(4-5*ARR_BOX(3|5|4))
5409 # freight E4 long;
5410 $DEF USA4FAAR=5-6*USA4FAARS,ARR_CAB(|2|1|3)
5411 # freight E5 shunting;
5412 $DEF USA5FAARS=(4-5*ARR_11520_BR(|L))|(4-5*ARR_10800_RBL(1|2)(|L))|(4-5*WRNX_2840_TMPI_ACF27(|L))| \
5413 (4-5*ARR_13200L_GB(|L)[OB:SCRAP(1|2|3|4|5)(|[M]),,22])|USA5FS
5414 # Freight E5 long
5415 $DEF USA5FAAR=(25*(ARR_PS4700(|L)|ARR_LO4750))|(25*(ARR_HOP[O:(COAL7|FR32|COAL1)(|[M])]))| \
5416 (5-6*USA5FAARS)
5417
5418 # USA Ann Arbor
5419 # freight E3 shunting;
5420 $DEF USA3FAARBS=(4-5*AARB_(12055|90024|90117)_XM_USRASS(|L))| \
5421 (4-5*AARB_XM_PS1_(371|400)(|L)(0-1*[O:PANEL7_SUP_6FOOT,54,8]))|USA3FMIXK
5422 # freight E3 long;
5423 $DEF USA3FAARB=5-6*USA3FAARBS,WEYT_3CAB
5424 # freight E4 shunting;
5425 $DEF USA4FAARBS=(4-5*(AARB_XM_5072(|L)|AARB_BOX1))|(4-5*AARB_PS4700(|L))|USA2FMIXK
5426 # freight E4 long;
5427 $DEF USA4FAARB=5-6*USA4FAARBS,WEYT_3CAB
5428
5429 # USA Atlantic Coast Line
5430 # freight E3 shunting;
5431 $DEF USA3FACLS=(4-5*ACL_O25_200(00|25)(|L))|(4-5*ACY_3693_PS1(|L))|(4-5*ACL_XM_25200(|L))| \
5432 (4-5*(ACL_K1(1_93600|1_93696|2_93900|2_94249))(|L)[OB:BALLAST(24|44)(|[M])])| \
5433 (4-5*(ACL_17199_VAO17|ACL_17862_VAO17|ACL_17863_VAO17)(|L))|(4-5*ACL_K21_84073(|L))| \
5434 (4-5*(ACL_O17_ORIG|ACL_O14A_46000)(|L))|(4-5*(ACL_46751_XM_USRADS|ACL_46930_XM_USRADS))| \
5435 (4-5*(ACL_FM_760(2|0)(|L)[O:CABLE9,,11]))|(4-5*ACL_PS50C_35400,ACL_LC_PS1_28711(|L))| \
5436 (4-5*ACL_PS50C_35400(|L))|(4-5*ACL_O14B_18(87|54)(|L))|(4-5*ACL_GB_98027(|L)[O:SCRAP(5|6)(|[M])])
5437 # freight E3 long;
5438 $DEF USA3FACL=4-5*USA3FACLS,ACL_M5_0710(|L)
5439
5440 # USA Akron, Canton & Youngstown Railroad
5441 # freight E3 shunting;
5442 $DEF USA3FACYS=(4-5*ACY_XM_(1260|3000)(|L))|(4-5*ACY_XM_PS1_(757|726|845)(|L))|USA2FMIXK
5443 # freight E3 long;
5444 $DEF USA3FACY=5-6*USA3FACYS,ACY_NE_66(|L)
5445
5446 # USA Amtrack
5447 # passenger E4
5448 $DEF USA4PAMT=(<AMTK_1300_1,AMTK_106VOLUSIA2803_4167L,2*AMTK_COACH1P1L,AMTK_5BRLOUNGE_3230P1L, \
5449 AMTK_CAFE1P1L,2*AMTK_2252_METCALFL)| \
5450 (<(2*AMTK_2252_METCALF),AMTK_CAFE1P1,AMTK_5BRLOUNGE_3230P1,2*AMTK_COACH1P1, \
5451 AMTK_106VOLUSIA2803_4167,AMTK_1300_1)
5452 # passenger E5
5453 $DEF USA5PAMT=(<AMTK_MHB3,AMTK_BAGDORM_1626P3|AMTK_BAG_1800P3L|AMTK_BAG_1178P3|AMTK_BAGDORM_1610P3, \
5454 3*AMTK_COACH_4000L,AMTK_LOUNGE_31(13|18|00|06)L, \
5455 AMTK_DINER_85(01|21)P3L|AMTK_DINER_8505P3L|AMTK_BUFFET_8700L,3*AMTK_COACH_4000L,AMTK_SLP_2230P3L, \
5456 AMTK_SLP_2461L)| \
5457 (<AMTK_SLP_2461,AMTK_SLP_2230P3,3*AMTK_COACH_4000, \
5458 AMTK_DINER_85(01|21)P3|AMTK_DINER_8505P3|AMTK_BUFFET_8700,AMTK_LOUNGE_31(13|18|00|06), \
5459 3*AMTK_COACH_4000,AMTK_BAG_1178P3L|AMTK_BAGDORM_1626P3L|AMTK_BAGDORM_1610P3L|AMTK_BAG_1800P3, \
5460 AMTK_MHB3)|(<AMTK_HBB3,3*AMTK_SL13L~BC,3*AMTK_SB13L~BC,AMTK_SD13L~BC,4*AMTK_SC13L~BC)| \
5461 (<(4*AMTK_SC13~BC),AMTK_SD13~BC,3*AMTK_SB13~BC,3*AMTK_SL13~BC,AMTK_HBA3)| \
5462 (<AMTK_COACH1P3,AMTK_CAFE2P3L,AMTK_COACH1P3,3*AMTK_COACH1P3L,AMTK_COACH1P3,AMTK_COACH1P3L)| \
5463 (<AMTK_COACH1P3,AMTK_COACH1P3L,3*AMTK_COACH1P3,AMTK_COACH1P3L,AMTK_CAFE2P3,AMTK_COACH1P3)| \
5464 (<AMTK_COACH1P2L,AMTK_COACH1P1L,AMTK_CAFE1P3L,AMTK_COACH1P2,AMTK_COACH1P1L,AMTK_CAFE1P1, \
5465 AMTK_COACH1P1)| \
5466 (<AMTK_COACH1P1L,AMTK_CAFE1P1L,AMTK_COACH1P1,AMTK_COACH1P2L,AMTK_CAFE1P3,AMTK_COACH1P1, \
5467 AMTK_COACH1P2)
5468 # passenger E6
5469 $DEF USA6PAMT=(<AMTK_BAG_1800AC,5*AMTK_COACH1P5,AMTK_CAFE1P5,4*AMTK_BUS1P5)| \
5470 (<(4*AMTK_BUS1P5L),AMTK_CAFE1P5L,5*AMTK_COACH1P5L,AMTK_BAG_1800ACL)| \
5471 (<AMTK_HB(A|B)4|AMTK_BAG_1178P4L,4*AMTK_COACH2P4L, \
5472 AMTK_DINER_8505P4L|AMTK_CAFE1P4L|AMTK_CAFE2P4L|AMTK_DINER_8501P4BL|AMTK_DINER_8505P4B(|L), \
5473 5*AMTK_COACH1P4L)| \
5474 (<(5*AMTK_COACH1P4), \
5475 AMTK_DINER_8501P4B|AMTK_CAFE1P4|AMTK_CAFE2P4|AMTK_DINER_8521P4B|AMTK_DINER_8505P4,4*AMTK_COACH2P4, \
5476 AMTK_BAG_1178P4|AMTK_HB(A|B)4)
5477 # passenger E6 Superliner
5478 $DEF USA6PAMTS=(AMTK_SC14AL,AMTK_SC14A,AMTK_SL14A(|L),AMTK_SS14(|L),AMTK_MHB4)| \
5479 (<AMTK_SL2TSP4B_39000L,AMTK_SL1LNP4B_33100L,AMTK_SL2SLP4B_32070L,AMTK_SL2CHP4B_34102L, \
5480 AMTK_SL2DNP4B_38000L)| \
5481 (<AMTK_SL2DNP4B_38000,AMTK_SL2CHP4B_34102,AMTK_SL2SLP4B_32070,AMTK_SL1LNP4B_33100, \
5482 AMTK_SL2TSP4B_39000)
5483
5484 # USA AR
5485 # Freight E4 shunting
5486 $DEF USA4FARS=USA4FMIX|(4-5*AR_XM_1031(|L))
5487 # Freight E4
5488 $DEF USA4FAR=5-6*USA4FARS,AR_(NE_309(|L))
5489
5490 # USA Atchison,Topeka & Santa Fe Railway
5491 # Freigt E2
5492 $DEF USA2FATS=5*ATSF_PS40(|L),2*USA2FMIXK,10*(ATSF_3(7724|8165|9683)_XM_USRADS(|L)), \
5493 ATSF_CAB3(|L)|ATSF_CAB6(|L)
5494 # passenger E3
5495 $DEF USA3PATS2L=(<ATSF_3430,3*ATSF_ORABI,ATSF_LAGUNA,3*ATSF_COCHITI,2*ATSF_ACOMA,ATSF_NAVAJO)
5496 $DEF USA3PATS2=(<ATSF_NAVAJOL,2*ATSF_ACOMAL,3*ATSF_COCHITIL,ATSF_LAGUNAL,3*ATSF_ORABIL,ATSF_3430)
5497 # passenger E3 - El Capitan
5498 $DEF USA3PATS=(<ATSF_3480L,ATSF_700L,ATSF_650L,3*ATSF_575L,4*ATSF_528L,ATSF_3480,ATSF_3453)| \
5499 (<ATSF_3453L,ATSF_3480L,4*ATSF_528,3*ATSF_575,ATSF_650,ATSF_700,ATSF_3480)
5500 # Freigt E3 shunting
5501 $DEF USA3FATSS=(4-6*(ATSF_SK(2|3|5)(|L)))|(4-6*ATSF_BOX40(A|B|C|D|E|F|G|H))| \
5502 (4-6*ATSF_BX(3K|3AB|6AB|6K|11K_XM|11AB_XM|12_12XM|12_6XM)(|L))| \
5503 (4-6*ATSF_REF(1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18))| \
5504 (4-6*ATSF_BX(36_148771|28_138500|31_148190|32_148384|36_148594|28_138500L|31_148190L|32_148384L| \
5505 36_148594L))|(4-6*(ATSF_BX52_PS1_276(500|550|600|608)(|L)))|(4-6*ATSF_LO_310303(|L))| \
5506 (ATSF_BX57_PS1_31(250|250L|375|500|625|508|508L|699|699L|700|700L))| \
5507 (4-6*(ATSF_(42667_PS1|42619_PS1|42301_PS1|42070_PS1|12868_PS1|11477_PS1|PS40)(|L)))| \
5508 (4-6*ATSF_GA61_(169728|169555)(|L))|(4-6*(ATSF_3(7724|8165|9683)_XM_USRADS(|L)))|USA3FMIXK
5509 # Freigt E3 long
5510 $DEF USA3FATS=(4-6*USA3FATSS)|(20-25*ATSF_GA(105_82000|88_87227|101_87250)_PS2003(|L))| \
5511 (15*ATSF_78114_GA72(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])]), \
5512 (ATSF_CAB3(|L)|ATSF_CAB8|ATSF_CAB9|ATSF_CAB6(|L)|ATSF_CAB7(|L))
5513 # Freight E4 shunting
5514 $DEF USA4FATSS=(4-5*ATSF_AUTORACK)|(4-5*ATSF_G52[O:SAND4(|[M]),,29])| \
5515 (4-6*ATSF_FT7_90906(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11])
5516 # Freight E4
5517 $DEF USA4FATS=4-5*USA4FATSS,(ATSF_CAB3(|L)|ATSF_CAB8|ATSF_CAB9)
5518 # Freight E6 short
5519 $DEF USA6FATSS=(4-6*ATSF_(FMC50|NSC50HC2)(|L))|(4-6*ATSF_TANK54(|L))|(4-6*ATSF_AUTORACK)| \
5520 (4-6*ATSF_GA55(|L)[O:FR_ST(02|01)(|[M])])|(4-6*ATSF_PS4(427|750|750SO02|750SO03)(|L))| \
5521 (4-6*ATSF_LO_314803(|L))|(4-6*ATSF_HS4550(|L))|(4-6*ATSF_BX1440_36666(|L))| \
5522 (4-6*ATSF_BX187_375(02|84)(|L))
5523 # Freight E6 long
5524 $DEF USA6FATS=6*USA6FATSS
5525
5526 # USA Atlanta & West Point
5527 # Freight E3 short
5528 $DEF USA3FAWPS=(4-5*AWP_XM_38000(|L))|(4-5*(AWP_50001_PS1|AWP_51104_PS1)(|L))| \
5529 (4-5*(GT_10000GAL|GT_30F|TANK_SH_DOW|TANK_SH_FIRESTONE))|USA3FMIXK
5530 # Freight E3 long
5531 $DEF USA3FAWP=5-6*USA3FAWPS,WEYT_3CAB
5532
5533 # USA Bangor & Aroostook
5534 # Freight E3 short
5535 $DEF USA3FBARS=4-5*(BAR_XM(1A|1C|1B|2A|2B|2C|3A|3B|3C|4A|4B|4C|5C|5B|5A)_ARA1932(|L))|USA3FMIXK| \
5536 (4-5*BAR_BOX(3|2)|BAR_BOX1)
5537 # Freight E3 long
5538 $DEF USA3FBAR=5-6*USA3FBARS,BAR_C(10|86|92|99)(|L)
5539 # Freight E4 short
5540 $DEF USA4FBARS=(4-5*BAR_XP_(5599|5282)(|L))|USA4FS|(4-5*BAR_(3157AB|3157K)_XM(|L))|(4-5*BAR_REEFER)| \
5541 (4-5*BAR_XP_(5599|5282)(|L))|(4-5*BAR_PS50C_(6015|6117)(|L))|(4-5*BAR_BOX(3|2))
5542 # Freight E4 long
5543 $DEF USA4FBAR=5-6*USA4FBARS,BAR_C(10|86|92|99)(|L)
5544
5545 # USA Bessemer & Lake Erie Railroad
5546 # Freigt E4 shunting
5547 $DEF USA4BLES=USA4FMIXK|(5-6*BLER_PS40(|L))
5548 # Freigt E4 long
5549 $DEF USA4BLE=(5*USA4BLES)|(20-25*BM_LO_5333_PS2003(|L))| \
5550 (20*(BLER_43604_HM_USRA(|L) \
5551 [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33])),WEYT_3CAB
5552
5553 # USA Boston & Maine
5554 # Freigt E4 shunting
5555 $DEF USA4FBMS=(4-6*BM_1937AAR_XM_(73198|73000)(|L))|(4-6*BM_PS40(|L))|(3-4*BM_91250_GB_USRA(|L))| \
5556 (3-4*BO_XM_B209_486976(|L))|(4-6*(TCX_2890_TM_ACF11|TCX_4119_TM_ACF11|WOCX_217_TM_ACF11))| \
5557 (5-6*(BM_71968_ARA1923|BM_70115_XM_USRADS|BM_70285_XM_USRADS)(|L))| \
5558 (4-5*BM_34007_FM(|L)[O:BETONPIPE2,10,11][O:BETONPIPE2,98,11])|(4-5*BM_HT_10200(|L))| \
5559 (4-6*BM_7(1555|2662)(K|AB|MM)_XM(|L))|(4-5*BM_GB_9(2713|2881|865)(|L)[OB:SCRAP(14|1|2)(|[M]),,16])
5560 # Freigt E4 long
5561 $DEF USA4FBM=(5*USA4FBMS)|(20-25*BM_LO_5333_PS2003(|L)),BM_NE_C(5|9)(|L)
5562 # Freigt E5
5563 $DEF USA5FBMS=(5-7*(BM_XP_7900(0|5)(|L)))|(5-7*BM_(RBL_113|XM_78101)(|L))| \
5564 (5-7*(BM_77530_PS1|BM_77979_PS1)(|L))|USA5FS
5565 $DEF USA5FBM=5-6*USA5FBMS
5566
5567 # USA Burlington Northern Railroad
5568 # Freigt E4 shunting
5569 $DEF USA4FBNS=(4-5*BN_FM_610180(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11])| \
5570 (4-5*BN_(318976_XP|XL_321661|XM_214578|XM_249013|XM_249030)(|L))| \
5571 (4-5*(BN_BOXM|BN_BOX50|BN_BOX50HI1|BN_BOX50HI2))|(4-5*BN_281441_XL(|L))| \
5572 (4-5*BN_LO_(435668|435509)(|L))|(4-5*BN_XM_(133499|129500|132550)(|L))|(4-5*BN_HT_513391(|L))|
5573 # Freigt E4 long
5574 $DEF USA4FBN=(20*BN_2HOPC)|(20-25*BN_424913_PS2003(|L))|(5-6*USA4FBNS), \
5575 (BN_10(040|107)(|L)|BN_CABCW2|BN_10191(|L))
5576 # Freight E6
5577 $DEF USA6FBN1=,24*((BN_BETHGON2|BN_AEROFLO)(|L))
5578 $DEF USA6FBN2=25*((BN_PS4427|BN_LO4750)(|L))
5579 $DEF USA6FBN3=26*((BN_XP_A302_219360|BN_XP_A302_249735|BN_XP_A302_249762|BN_FMC50|BN_GU50HC)(|L))
5580 $DEF USA6FBN4A=8*(BN_BOX50HI1|BN_BOX50HI2)
5581 $DEF USA6FBN4B=10*(BN_CB60|BNFE_RPL_9071(|L)|BNFE_RPL_9381(|L))
5582 $DEF USA6FBN4C=6-8*(BN_XP_(249300|249290|332116|217707)(|L))
5583 $DEF USA6FBN4D=8*((BN_CBF1|BN_THR73CB(|L))[O:(WRAPLUMBER(1|2|3)|WRAPTIE1),,9])
5584 $DEF USA6FBN4E=6-8*(BN_575122_THRALL4000(|L)[OB:SCRAP(4|5|6)(|[M])])
5585 $DEF USA6FBN4H=6-8*BN_LO_(453100|453239|455800|455880)(|L)
5586 $DEF USA6FBN4F=7-9*(BN_PS4740SO0(1|2)|BN_PS4750SO02)(|L)
5587 $DEF USA6FBN4G=8*BN_XPA_395090(|L)
5588 $DEF USA6FBN4=3*USA6FBN4(A|B|C|D|E|F|G|H)
5589 $DEF USA6FBN=USA6FBN(1:1|1:2|1:3|2:4)
5590
5591 # USA Burlington Northern Santa
5592 # Freight E5 short
5593 $DEF USA5FBNSS=(5-8*BNSF_513048(|L)[O:SCRAP(5|6)])|(5-8*BNSF_FLAT[O:CABLE14,,12])| \
5594 (5-8*BNSF_CB60[OB:WOOD(130|124|127),,14])|(5-8*BNSF_CBF1[O:(WRAPLUMBER(1|2|3)|WRAPTIE1),,9])| \
5595 (5-8*BNSF_BOX60HI)|(5-6*BNSF_AR(2|3)[OB:CELLULOSE,,13])|(5-8*BNSF_AUTORACK(|1|2|3|4))| \
5596 (5-8*(BNSF_ARTAUTO|BNSF_AUTOMAX(|2)))|(5-8*BNSF_PS4740SO0(1|2)(|L))| \
5597 (5-8*(BNSF_FMC50|BNSF_XP_725107|BNSF_XP_723146|BNSF_GU60HC)(|L))| \
5598 (5-8*BNSF_(LO_405815|LO_405812|LO_424433|TRI5161SO03|TRI5161SO04|TRI5161SO02)(|L))| \
5599 (5-8*BNSF_(LO4750|PS4750SO02|PS4750SO03|PS4750SO04|PS4750SO05)(|L))| \
5600 (5-8*(BNSF_1BETHGON2|BNSF_3BETHGON2|BNSF_BETHGON2)(|L))| \
5601 (5-8*(BNSF_AFLOOD2A|BNSF_AFLOOD2B|BNSF_RD4TRI|BNSF_RD6TRI)(|L))| \
5602 (5-8*(BNSF_546054(|L)[O:WOOD1(29|24),,11]))|(5-8*(BNSF_ACF4650(|L)|BNSF_5161TRI|BNSF_TRI5161(|L)))
5603 # Freight E5 long
5604 $DEF USA5FBNS=4*USA5FBNSS
5605
5606 # USA Baltimore and Ohio Railroad
5607 # Passenger E2
5608 $DEF USA2PBO1=((BO_B21_19(38|53|47)(A|B)(|L)|BO_E7C_1929(A|AL|BL),USAP3PU))| \
5609 (BO_E7C_1929(A|BL|AL),3*BO_A19C_3664(|L),BO_F4BN_1056(|L),BO_106TYGART_4167(|L), \
5610 2*BO_A19C_3664(|L),BO_106TYGART_4167(|L))
5611 # Passenger E3
5612 $DEF USA3PBO1=(BO_B21_1947(A|B)(|L)|BO_E7C_1947(A|B)(|L),USAP3PU)
5613 $DEF USA3PBO2=(BO_B21_1953(A|B)(|L)|BO_E7C_1953(A|B)(|L),5*BO_106TYGART_4167(|L),6*BO_F4BN_1056(|L))
5614 $DEF USA3PBO3=(<BO_106TYGART_4167L,5*BO_GULL_SLEEPERL,BO_106SCHUYLKILL_4167L,BO_7500_NAPPANEEL)| \
5615 (<BO_7500_NAPPANEE,BO_106SCHUYLKILL_4167,5*BO_GULL_SLEEPER,BO_106TYGART_4167)
5616
5617 # Freight E3 short
5618 $DEF USA3FBOS=(4-5*BO_M26(|A|B)_19(26|37|40|40B|45|46|55|62TS|62STN|62)(|L))| \
5619 (4-5*BO_M26(C|D)_19(28|37|40|40B|45|46|55|62TS|62STN|62)(|L))| \
5620 (4-5*((BO_429407_N35A|BO_636285_N35A|BO_823499_N35A|BO_823500_N35A|BO_825098_N41|BO_825099_N41) \
5621 (|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])]))|(4-5*BO_M67A_468700(|L))| \
5622 (4-5*BO_SK_11(2435|0580)(|L))|(4-5*BO_P11_106268[O:CABLE(1|6),12,11][O:CABLE(1|6),69,11])
5623 # Freight E3 long
5624 $DEF USA3FBO=5-6*USA3FBOS,BO_C26_C(3700|3714|3718|3774|3771)(|L)|BO_I1_19(13|16|16_RBT|41|45|55|62)(|L)
5625 # Freight E4 short
5626 $DEF USA4FBOS=(4-5*BO_(X97_485250|RBL_894124|X97_485200)(|L))|(4-5*(BO_187359_XM_USRASS)(|L))| \
5627 USA4FMIXK|(4-5*(BO_HT_W2A_532000|BO_HT_W2A_A)(|L))|(4-5*(BO_PS40S|BO_PS40TS)(|L))| \
5628 (4-5*BO_M61_282346(|L))
5629 # Freight E4 long
5630 $DEF USA4FBO=(5-6*USA4FBOS)|(20-25*BO_H29_1(52193|0392)(|L)[O:COAL(32|22)(|[M]),,33])| \
5631 (20-25*BO_(N43_631113|N43_631173|N43_631513|631247)_PS2003(|L)),BO_C26(_C3827|A_C3828)(|L)
5632 # Freight E5 shunting
5633 $DEF USA5FBOS=USA6FMIXK|(4-6*(BO_492020_XPA|BO_492026_XPA|BO_492069_XPA|BO_492080_XPA)(|L))| \
5634 (4-6*BO_LO_(606539|837043|836037)(|L))|(4-6*BO_PS4740SO01(|L))|(4-6*BO_PS4750SO01(|L))| \
5635 (4-6*BO_RBL_897449(|L))
5636 # Freight E5 long
5637 $DEF USA5FBO=(25*(BO_HT_W2A_532000|BO_HT_W2A_A)(|L))|(25*(BO_PS40S|BO_PS40TS)(|L))|(5*USA5FBOS)
5638
5639 # USA Chicago, Burlington & Quincy Railroad
5640 # Freight E3 shunting
5641 $DEF USA3FCBQS=USA3FMIXK|(4-5*CBQ_19871_XL(|L))|(4-5*(CBQ_188850_GB_USRA|CBQ_PS40)(|L))| \
5642 (4-5*CBQ_120537_XM_USRADS(|L))|(4-5*CBQ_XM33(B_24203|C_24601|C_24518)(|L))
5643 # Freight E3 long
5644 $DEF USA3FCBQ=5-6*USA3FCBQS,CBQ_13597(|L)
5645 # Freight E5 shunting
5646 $DEF USA5FCBQS=(4-5*CBQ_LO_183977(|L))|USA6FMIXK| \
5647 (4-7*(CBQ_PS40(|L)|CBQ_120960_XM_USRADS(|L)|CBQ_BOX))|(4-7*(CBQ_LO_2600_1965)(|L))| \
5648 (4-6*CBQ_PS4740SO01(|L))|(4-6*CBQ_LO_85400(|L))|(4-6*CBQ_LO_86274(|L))
5649 # Freight E5 long
5650 $DEF USA5FCBQ=5*USA5FCBQS
5651
5652 # USA Chicago & Eastern Illinois
5653 # Freigt E3 shunting
5654 $DEF USA3FCEIS=(4-5*CEI_1937AAR_XM_(64100|64180|64190|64400|64480|64490)(|L))|(4-5*CEI_XM_66500(|L))| \
5655 (4-5*CEI_5(557|309)_PS1(|L))|(4-5*CEI_5(309|557)_PS1(|L))|(4-5*CEI_XM_PS1_65581(|L))|(2*USA4FMIXK)
5656 # Freigt E3 long
5657 $DEF USA3FCEI=(5-6*USA3FCEIS)| \
5658 (20*(CEI_975(00|33)_HM(|L) \
5659 [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33])),WEYT_3CAB
5660
5661 # USA Central of Georgia Railway
5662 # Freigt E3 shunting
5663 $DEF USA3FCGS=(4-6*CG_1937AAR_(XM_4500|XM_6000|XAF_6600|XM_4510|XM_6010|XAF_6610)(|L))| \
5664 (4-6*(CG_57239_VA_1932|CG_58459_VA_1926)(|L))|(4-6*CG_(1000|1050|LO_1475)_PS2003(|L))| \
5665 (4-6*(CG_4(254|422|095|117)_XM_ARA1932)(|L))|(2*USA3FMIXK)|(4-6*CG_XM_(7300|8699)(|L))| \
5666 (4-6*(CG_GB_17675(|L)[O:SCRAP(4|5|6)(|[M])]))
5667 # Freigt E3 long
5668 $DEF USA3FCG=5*USA3FCGS,WEYT_3CAB
5669 # Freigt E5 short
5670 $DEF USA5FCGS=(5-7*CG_XPA_8818(|L))|(5-7*CG_5548_PS1(|L))|(5-7*CG_1570)|(2*USA5FS)
5671 # Freigt E5 long
5672 $DEF USA5FCG=4*USA5FCGS
5673
5674 # USA Chicago Great Western
5675 # Freigt E3 shunting
5676 $DEF USA3FCGWS=(4-5*CGW_XM_PS1_(5200|5202|5325|5450|5601|93251)(|L))| \
5677 (4-5*CGW_8(5688|6198)_ARA1923(|L))|USA3FMIXK| \
5678 (4-5*(CGW_(40022ABM|40022KM|43022KD|43022ABD)_XM(|L)))|(4-5*CGW_89252_XM_ARA1932(|L))| \
5679 (4-5*CGW_XM_PS1_(93251|5200|5202|5325|5450|5601)(|L))
5680 # Freight E3 long
5681 $DEF USA3FCGW=(5-6*USA3FCGWS)|(25*CGW_LO_705_PS2003(|L)),CGW_NE_604(|L)
5682 # Freight E4 short
5683 $DEF USA4FCGWS=(3-4*(CGW_TANK50|GATX_TT|HCPX_TANK50|SP_TANK50))|USA4FMIXK
5684 # Freight E4 long
5685 $DEF USA4FCGW=(5-6*USA4FCGWS),CGW_NE_604(|L)
5686
5687 # USA Chicago & Illinois Midland Ry. Co.
5688 # Freight E4 short
5689 $DEF USA4FCIMS=(4-5*CIM_XM_8103(|L))|(4-5*CIM_XM_PS1_160(01|21)(|L))|USA4FMIXK
5690 # Freight E4 long
5691 $DEF USA4FCIM=5-6*USA4FCIMS,CIM_76(|L)
5692
5693 # USA Central Railroad Company of New Jersey
5694 # Freight E3 short
5695 $DEF USA3FCNJS=(2*USA3FMIXK)|(4-5*(CNJ_21660_ARA1923|CNJ_19029_XA_ARA1923)(|L))| \
5696 (4-5*CNJ_GBJ_(86000|80144|87611)(|L))|(4-5*CNJ_10293_HM(|L))| \
5697 (4-5*CNJ_(PS40|20176_XM_USRASS|20473_XM_USRASS)(|L))| \
5698 (4-5*CNJ_GBJ_(87611|86000|80144)(|L) \
5699 [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33])| \
5700 (4-5*CNJ_LO_752_PS2003(|L)),(4-5*CNJ_NE_915(40|00|39|35|02)(|L))
5701 # Freight E3 long
5702 $DEF USA3FCNJ=(4*USA3FMIXK,5-7*(CNJ_(21660|19029_XA)_ARA1923(|L)))| \
5703 (30*(CNJ_10293_HM(|L) \
5704 [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33]))| \
5705 (30*CNJ_LO_752_PS2003(|L)),CNJ_NE_915(40|00|39|35|02)(|L)
5706
5707 # USA Chicago & North Western
5708 # Passenger E3
5709 $DEF USA3PCNW=CNW_1711(|L),3*CNW_BLC,3*CNW_BLT,3*CNW_BLCL
5710 # Freight E4 short
5711 $DEF USA4FCNWS=(4-5*(CNW_LO_2600_1965(|L)))|USA4FMIXK| \
5712 (4-5*(CNW_PS40|CNW_XP_A402_155653|CNW_3387_XM)(|L))| \
5713 (4-5*CNW_LO_(175025|175017|175062|175265)(|L))| \
5714 (4-6*(CNW_144804_XM_USRASS|CNW_144894_XM_USRASS|CNW_141258_XM_USRADS|CNW_141422_XM_USRADS)(|L))| \
5715 (4-5*CNW_(LO_95330_PS2003|4253_PS1|XP_155000|XP_155162|XP_155249)(|L))| \
5716 (4-5*CNW_XM_(25100|25050)(|L))| \
5717 (4-5*CNW_XM_PS1_(658|656|1444|1456|1480|1650|7317|8689|8691|8907|24200)(|L))
5718 # Freight E4 long
5719 $DEF USA4FCNW=5-6*USA4FCNWS,CNW_(NE_10521|NE_10521L|CAB1)
5720 # Freight E6 short
5721 $DEF USA6FCNWS=(4-6*CNW_G52[O:SCRAP9(|[M]),,29])|(4-6*(CNW_AFLOOD3(|L))|USA6FMIXK|(4-6*CNW_LO4750))| \
5722 (4-6*CNW_XPA_92(068|052|178)(|L))|(4-6*CNW_(PS4740SO0(2|1)|RBL_33277)(|L))| \
5723 (4-6*CNW_PS4750(|SO02|SO03|SO04)(|L))|(4-6*CNW_LO_(175595|180015|180021|180130)(|L))| \
5724 (4-6*(CNW_XP_A302_717253|CNW_XP_A302_155773|CNW_XP_A302_155844|CNW_XP_718051|CNW_XP_718447)(|L))
5725 # Freight E6 long
5726 $DEF USA6FCNW=6*USA6FCNWS
5727
5728 # USA Chesapeake & Ohio Railway
5729 # Freigt E2 shunting
5730 $DEF USA2FCOS=(4-6*CO_29855_GB_USRA(|L)[OB:SCRAP(4|5|6)(|[M]),,22])|(4-6*CO_(668|1200)_XM_USRASS(|L))| \
5731 USA2FMIXK|(4-6*CO_62340_HM_USRA(|L)[O:FR_ERZ(21|20|22)(|[M])])|(4-6*CO_3(168|325)(|L))| \
5732 (4-6*CO_1937AAR_XM_(3300|4000|5250|5400)(|L))
5733 # Freight E2 long
5734 $DEF USA2FCO=5*USA2FCOS,CO_CAB1|CO_CAB6
5735
5736 # Passenger E3
5737 $DEF USA3PCO=(7*DRGW_106JOHNEVANS1270_4167)|(7*DRGW_106JOHNEVANS1270_4167L)
5738 # Freigt E3 shunting
5739 $DEF USA3FCOS=(4-6*CO_8000_ARA1923(|L))|(4-5*CO_H23_(108923|106080)[O:COAL2(7|8)(|[M]),,33](|L))| \
5740 (4-5*CO_(126655|126657|126651|126650|120620|120600)_HM(|L) \
5741 [O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])|(4-5*CO_7(299|438)_XM_ARA1932(|L))| \
5742 (4-5*CO_XM_PS1_15(000|050)(|L))|(4-5*CO_1937AAR_XM_(3350|4020|5251|5410)(|L))
5743 # Freight E3 long
5744 $DEF USA3FCO=5-6*USA3FCOS,CO_(3187|3187L|CAB4|CAB9|CAB1|CAB3|CAB7)
5745 # Freight E4 short
5746 $DEF USA4FCOS=(4-6*(CO_29855_GB_USRA(|L)[OB:SCRAP(4|5|6)(|[M]),,22]))|(4-6*CO_BOX(1|2))| \
5747 (4-6*(CO_HOPP[OB:SCRAP_(13|14|13)(|[M]),,33]))|(4-6*CO_XL_A332_486083(|L))|USA4FMIXK, \
5748 (4-6*CO_22211_PS1(|L))|(4-6*CO_XM_(23757|18035)(|L))|(4-6*CO_RBL_(893846|890128)(|L))
5749 # Freight E4 long
5750 $DEF USA4FCO=(5-6*USA4FCOS)| \
5751 (CO_HC5_2211_PS2003,CO_HC5_2203_PS2003L,CO_HC5_2203_PS2003L,CO_HC5_2211_PS2003L, \
5752 CO_HC5_2203_PS2003,CO_HC5_2211_PS2003L,CO_HC5_2203_PS2003L,CO_HC5_2211_PS2003,CO_HC5_2211_PS2003, \
5753 CO_HC5_2211_PS2003L,CO_HC5_2203_PS2003L,CO_HC5_2203_PS2003,CO_HC5_2211_PS2003L,CO_HC5_2203_PS2003, \
5754 CO_HC5_2211_PS2003L,CO_HC5_2211_PS2003L,CO_HC5_2211_PS2003,CO_HC5_2211_PS2003L, \
5755 CO_HC5_2203_PS2003L,CO_HC5_2203_PS2003L,CO_HC5_2211_PS2003,CO_HC5_2211_PS2003,CO_HC5_2203_PS2003L), \
5756 CO_(3187L|3168L|3186L|3325L|3187|3168|3186|3325|CAB8|CAB2|CAB5)
5757 # Freight E6 short
5758 $DEF USA6FCOS=(4-8*CO_37000_GB(|L)[OB:SCRAP(4|5|6)(|[M]),,22])|(1-2*USA6FMIXK)| \
5759 (4-8*(CO_21157_PS1|CO_B35MOD_PS1|CO_B35ORIG_PS1)(|L))|(4-8*CO_28000_PS1(|L))|(4-8*CO_XPA_493935(|L))
5760 # Freight E6 long
5761 $DEF USA6FCO=5*USA6FCOS
5762
5763 # USA Consolidated Rail Corporation (Conrail)
5764 # Freigt E4
5765 $DEF USA4FCRS=(4-6*CR_BR55A_363645(|L))|(4-6*CR_X58C_(265915|230778|164380|209893)(|L))| \
5766 (4-6*CR_F41(B|A)(|L)[O:GIRDER3,,11])|(4-6*CR_BR50L_231628(|L))|(4-5*CR_LO_8(76322|89828)(|L))| \
5767 (4-5*CR_G51B_521040(|L)[O:SCRAP(5|6)(|[M])])| \
5768 (4-5*CR_X7(1_166160|1_166290|1_166967|1_208121|4_157591|4_167396)(|L))
5769 # Freigt E4 long
5770 $DEF USA4FCR=(6*USA4FCRS)|(20-25*CR_879818_PS2003(|L)), \
5771 CR_2213(0|1)(|L)|CR_NE210(11|26|28)(|L)|CR_NE_18747(|L)|CR_N8B_23620(|L)
5772 # Freigt E6 short
5773 $DEF USA6FCRS=(4-5*CO_(LO_607039|HC15_2761)(|L))|(4-5*CR_PS4750SO01(|L))| \
5774 (4-5*(CR_293(792|779)_XPA)(|L))|(4-5*CR_B63B_2234(01|35)(|L))| \
5775 (4-5*CR_LO_8(76340|84744|84143|84322)(|L))|(4-5*CR_G32C(|L)[O:WOOD(139|61|62)(|[M])])|USA6FMIXK| \
5776 (4-5*CR_PS4740SO0(1|2)(|L))|(4-5*CR_X60G_(237651|237912|237618|239836)(|L))
5777 # Freigt E6 long
5778 $DEF USA6FCR=6*USA6FCRS
5779
5780 # USA Clinchfield R.R. Co.
5781 # Freight E4 short
5782 $DEF USA4FCRRS=(4-6*CRR_FH8_52541(|L))|(4-6*CRR_X5F_7300(|L))|(4-6*CRR_5676_PS1(|L))|(2*USA4FMIXK)| \
5783 (4-5*CRR_5249_XM_ARA1932(|L))
5784 # Freight E4 long
5785 $DEF USA4FCRR=5-6*USA4FCRRS|(20-25*CRR_FL5_60112_PS2003(|L))| \
5786 (20*CRR_4(9999|7403)_HM(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])]),CRR_1065(|L)
5787
5788 # USA CSX Corporation
5789 # Freight E4 short
5790 $DEF USA4FCSXS=(4-6*(CSX_XL_A432_134142|CSX_XL_A332_142742|CSX_XL_A432_143138|CSX_XP_A302_164114| \
5791 CSX_XP_A302_507098)(|L))|USA4FMIXK|(4-6*CSX_477213(|L)[O:SCRAP(5|6)(|[M])])| \
5792 (4-6*CSX_HT_807179(|L)[O:COAL(32|22)(|[M])])|(4-6*CSX_XM_136136(|L))|(4-6*CSX_LO_226691(|L))
5793 # Freight E4 long
5794 $DEF USA4FCSX=6*USA4FCSXS,CSX_903180
5795 # Freight E6 short
5796 $DEF USA6FCSXS=(4-6*(CSX_XL_A332_142742(|L)|CSX_XL_A332_(486083|142742)(|L)|CSX_XP_A302_164114(|L)| \
5797 CSX_XL_A432_134142(|L)|CSX_XP_142819|CSX_XP_141436(|L)))|USA6FMIXK|(4-6*CSX_PS4750SO01(|L))| \
5798 (4-6*(CSX_BETHGON2(|B)(|L)|CSX_AFLOOD2(|L)|CSX_AFLOOD2(|L)))|(4-6*CSX_5161TRI(|L))| \
5799 (4-6*(GACX_TRI5161|BRIX_TRI5161)(|L))|(4-6*CSX_243125TRI3281(|L))|(4-6*CSX_PS4740SO01(|L))| \
5800 (4-6*CSX_LO_225370(|L))|(4-6*CSX_XPA_180407(|L))|(4-6*CSX_XL_161010(|L))| \
5801 (4-6*CSX_XM_(129903|136000)(|L))|(4-6*CSX_(LO_203160|LO_203161|LO_247725|TRI5161SO02)(|L))
5802 # Freight E6 long
5803 $DEF USA6FCSX=(18*(ARTAUTOMAX|CSX_ARTAUTO))|(6*USA6FCSXS)
5804
5805 # USA Delaware and Hudson Railroad
5806 # Freight E3 shunting
5807 $DEF USA3FDHS=USA3FMIXK|(5-6*DH_(17028|17194|51394)_XM_USRASS(|L))| \
5808 (5-6*DH_17(626|724|628|725)_XM_ARA1932(|L))|(5-6*DH_PS40(|L))
5809 # Freight E3 long
5810 $DEF USA3FDH=5-6*USA3FDHS,DH_357(11|12|95)(|L)|DH_NE_3501(|L)
5811 # Freight E4 shunting
5812 $DEF USA4FDHS=(5-6*DH_(22053_PS1|PS50C_29113)(|L))|(4-5*DH_XP_27347(|L))
5813 # Freight E4 long
5814 $DEF USA4FDH=5-6*USA4FDHS|(20-25*DH_LO_12(034|109)_PS2003(|L)),DH_357(14|96)(|L)|DH_NE_3501(|L)
5815 # Freight E5 short
5816 $DEF USA5FDHS=(4-6*DH_PS4750SO01(|L))|(4-6*DH_XP_27347(|L))| \
5817 (4-6*(RBOX_50A|RBOX_XP_A302_40461(|L)|RBOX_XP_A302_(40464|17031)(|L)))
5818 # Freight E5 long
5819 $DEF USA5FDH=6*USA5FDHS
5820
5821 # USA Delaware, Lackawanna & Western
5822 # Freight E3 shunting
5823 $DEF USA3FDLWS=(4-5*DLW_XM_PS1_35000(|L))|(4-5*DLW_47787_XM_USRA(|L))|(2*USA3FMIXK)| \
5824 (4-5*(DLW_44072_XM_USRADS|DLW_11505_XAR)(|L))|(4-5*DLW_XM_PS1_35000(|L))| \
5825 (4-5*DLW_GB_68611(|L)[O:SCRAP(5|6)(|[M])])|(4-5*DLW_1937AAR_XM_(49000|49202|49086|51780|51788)(|L))
5826 # Freight E3 long
5827 $DEF USA3FDLW=5-6*USA3FDLWS,WEYT_3CAB
5828
5829 # USA Depew, Lancaster & Western R.R. Co., Inc.
5830
5831 # USA Detroit & Mackinak Railroad
5832 # Freight E3 shunting
5833 $DEF USA3FDMS=USA3FMIXK|(4-6*DM_1937AAR_XM_(3057|2913|2825)(|L))|(4-6*(DM_XP_2232|DM_XM_3418)(|L))
5834 # Freight E3 long
5835 $DEF USA3FDM=6*USA3FDMS,WEYT_3CAB
5836
5837 # Freight E4 shunting
5838 $DEF USA4FDMS=USA4FMIXK|(4-6*DM_1937AAR_XM_(2825|2913|3057)(|L))|(4-6*DM_X(P_2232|M_3418)(|L))
5839 # Freight E4 long
5840 $DEF USA4FDM=6*USA4FDMS,WEYT_3CAB
5841
5842 # USA Duluth, Missabe & Iron Range Railway
5843 # Freight E3 long
5844 $DEF USA4FDMI=(20*DMIR_Q8_4971_PS2003(|L)),DMIR_C222(|L)
5845 # Freight E4 shunting
5846 $DEF USA4FDMIS=USA4FMIXK|DMIR_MINIQUAD
5847
5848 # USA Denver & Rio Grande Western Railroad
5849 # Freigt E2-3 short
5850 $DEF USA3FDRS=(4-5*(DRGW_50056_GB(|L)[O:(COAL7|FR32|COAL1)]))|USA2FMIXK|(4-5*DRGW_PS40(|L))| \
5851 (4-5*DRGW_LO_18325_PS2003(|L))|(4-5*DRGW_4HOP)|(4-5*DRGW_(67422_XL|XM_65300)(|L))
5852 # Freigt E2-3 long
5853 $DEF USA3FDR=5-6*USA3FDRS,(DRGW_CAB2|DRGW_01500(|L)|DRGW_01504(|L))
5854 # Passenger E2
5855 $DEF USA2PDR=(DRGW_OVBAG|DRGW_T_COMB,DRGW_OVBUSINESS,DRGW_OVCOACH,DRGW_T_COACH,DRGW_OVSLEEPER, \
5856 DRGW_OVSLEEPER1)
5857 # Freigt E6 short
5858 $DEF USA6FDRGS=(4-6*DRGW_AUTORACK)|(4-6*(DRGW_5013_THRALL4000(|L)|DRGW_13386_THRALL4000(|L)))| \
5859 USA6FMIXK|(4-6*((DRGW_4700PS2(|L)|DRGW_HOP)))|(4-6*DRGW_63500_PS1(|L))|(4-6*DRGW_63930_XPA(|L))| \
5860 (4-6*DRGW_PS4750SO01(|L))|(4-6*DRGW_XPA_63959(|L))|(4-6*DRGW_XP_63889(|L))| \
5861 (4-6*(DRGW_LO_10070|WSOR_TRI3281SO01|WW_TRI3281SO01)(|L))
5862 # Freigt E6 long
5863 $DEF USA6FDRG=6*USA6FDRGS
5864
5865 # USA Durango & Silverton railroad
5866 # Freigt E3 short
5867 $DEF USA3FDSRS=(4*DS_FLAT(|B)(|L))|(4*DS_BOX(|1|2)(|L))|(4*DS_GONH1(|L)|DS_FLAT_TRACTOR|DS_TANK(2|1))| \
5868 (4*(DS_REF(3|4)0(|L)|DS_STOCK(|L)|DS_FLAT_BOX|DS_FLAT_LUMB))|(5*DS_BOX(9|8|7|7L))| \
5869 (4*(DS_PIPEGON(|1)|DS_K37(|L)|DS_GON(4|5|H|HL)|DS_FLAT2))
5870 # Freigt E3 long
5871 $DEF USA3FDSRL=6*USA3FDSRS,DS_CAB17(|A)|DSOU_NE_X86(|L)|DSOU_NE_X85(|L)|DS_CAB30(|L)
5872
5873 # USA Duluth, South Shore & Atlantic Railway
5874 # Freight E3 shunting
5875 $DEF USA3FDSSS=USA3FMIXK|(4-5*DSSA_GB_4099(|L)[O:SCRAP(4|5|6)(|[M])])|(4-5*DSSA_16032_XM_USRADS(|L))| \
5876 (4-5*DSSA_15564_PS1(|L))|(4-5*DSSA_XM_PS1_(15041|15192)(|L))
5877 # Freight E3 long
5878 $DEF USA3FDSS=5-6*USA3FDSSS,WEYT_3CAB
5879
5880 # USA Detroit, Toledo & Ironton R.R. Co.
5881 # Freight E3 shunting
5882 $DEF USA3FDTIS=USA3FMIXK|(4-5*DTI_X37B_67247(|L))|(4-5*DTI_X(M_720|AP_13000|AP_13020)(|L))
5883 # Freight E3 long
5884 $DEF USA3FDTI=5-6*USA3FDTIS,WEYT_3CAB
5885 # Freigt E6 short
5886 $DEF USA6FDTIS=USA6FMIXK|(4-5*DTI_XPA_2610(3|1)(|L))|(4-5*DTI_PS50C_81000(|L))| \
5887 (4-5*DTI_GB_9131(|L)[O:SCRAP(5|6)(|[M])])|(4-5*DTI_LO_10325(|L))
5888 # Freigt E6 long
5889 $DEF USA6FDTI=(5-6*USA6FDTIS)|(15*DTI_AUTORACK)
5890
5891 # USA Detroit & Toledo Short Line Railroad
5892 # Freight E3
5893 $DEF USA3FDTSL=7*USA3FMIXK,DTS_NE_129(|L)|DTS_133(|L)
5894
5895 # USA Elgin, Joliet and Eastern
5896 # Freigt E3 short
5897 $DEF USA3FEJES=(4-6*EJE_(7627_XM|7504_XM_USRADS)(|L))|(4-6*EJE_PS150_6203(5|6)(|L))
5898 # Freigt E3 long
5899 $DEF USA3FEJE=6*(USA3FEJES|USA3FMIXK)
5900 # Freigt E6
5901 $DEF USA6FEJE=7*USA6FMIXK
5902
5903 # USA Erie Lackawanna Railroad
5904 # Freigt E4 short
5905 $DEF USA4FELS=(4-5*EL_GB_12549(|L)[O:SCRAP(5|6)(|[M])])|(4-5*EL_HOP(|L)~NEK)| \
5906 (4-5*(PLE_XM_39517|EL_63570_PS1)(|L))|USA4FMIXK|(4-5*EL_67961_PS1(|L))|(4-5*EL_LO_21367(|L))| \
5907 (4-5*EL_XM_(63014|66484|66485|67531)(|L))
5908 # Freigt E4 long
5909 $DEF USA4FEL=5-6*USA4FELS,EL_CABB
5910 # Freigt E5 short
5911 $DEF USA6FELS=(4-6*(EL_RBL_360582|ERIE_93870_XM_USRASS|ERIE_92506_XM_USRASS)(|L))|(4-6*EL_ACF_SILO)| \
5912 USA6FMIXK|(4-6*EL_REF50)|(4-6*EL_PS4740SO01(|L))|(4-6*EL_LO_20006(|L))
5913 # Freigt E5 long
5914 $DEF USA6FEL=6*USA6FELS
5915
5916 # USA Erie Railroad
5917 # Freigt E3 shunting
5918 $DEF USA3FERIES=(4-5*ERIE_7(5656|5700|6012)_ARA1923(|L))|(2*USA3FMIXK)|(5-10*ERIE_67586_PS1(|L))| \
5919 (4-6*ERIE_1937AAR_XM_(78041|78047|78500|78541|78547|78000)(|L))| \
5920 (4-5*ERIE_XM_19(32|42|45|47)_ARA1932(|L))|(4-5*ERIE_XM_(63200|65500)(|L))| \
5921 (4-5*ERIE_FM_8000(|L)[O:BETONPIPE2,10,11][O:BETONPIPE2,98,11])| \
5922 (5*ERIE_(24000|24050|26699|27040|28000|28051)_HM(|L) \
5923 [O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])| \
5924 (4-5*ERIE_FOWLER_(80830|91465|80830_1923|91465_1923)(|L))
5925 # Freigt E3 long
5926 $DEF USA3FERIE=4:(5-6*USA3FERIES)|1:(30*2:(ERIE_2HOP(6|7)[O:COAL(42|39|62)(|[M])]|1:ERIE_3HOP5)), \
5927 WEYT_3CAB
5928
5929 # USA Florida East Coast
5930 # Freigt E3 shunting
5931 $DEF USA3FFECS=(4-6*FEC_1937AAR_BX_6(39|10)(|L))|(4-6*FEC_1937AAR_XM_2100(1|9)(|L))| \
5932 (4-6*FEC_17002_VA(|L)(|[O:FEC_17002_VADOOR,37,9]))
5933 # Freigt E3 long
5934 $DEF USA3FFEC=(5*USA3FFECS),WEYT_3CAB
5935 # Freigt E4 shunting
5936 $DEF USA4FFECS=(4-6*FEC_17002_VA(|L))|(2*USA3FMIXK)|(4-6*FEC_20611_XMUSRACLONE(|L))| \
5937 (4-6*(FEC_FLT89A[OB:#STRAIL_(R1|B1),10,9][OB:STRAIL_(R1|B1),148,9]))| \
5938 (4-6*FEC_GB_12000(|L)[O:SAND(10|9|11|12)(|[M])])| \
5939 (4-6*FEC_XM_23076(|L)[T:(1|2|3|4|5|6|7|8|9|0)(1|2|3|4|5|6|7|8|9|0),49,19,FEC_XM_23000_ABC5])
5940 # Freigt E4 long
5941 $DEF USA4FFEC=4:(5*USA4FFECS)|1:(20-25*FEC_(14146|LO_14085)_PS2003(|L))|1:(25*ERIE_4HOP(1|3)),WEYT_3CAB
5942 # Freigt E6
5943 $DEF USA6FFEC=10-15*(FEC_FLT89A[OB:#STRAIL_(R1|B1),10,9][OB:STRAIL_(R1|B1),148,9]| \
5944 FEC_FLT89(B|AL)[OB:STRAIL_(R1|B1),10,9][OB:#STRAIL_(R1|B1),148,9]| \
5945 FEC_TW89(|L)[OB:#STRAIL_14,16,10][OB:STRAIL_14,143,10]), \
5946 10-15*((FEC|AWXX)_TW85(|L)[O:C40B,17,12][O:C40B,137,12])|(OTTX_E(1|2)[O:C30A,6,10][O:C30A,97,10])
5947
5948 # Erie Mining Company
5949 $DEF USA3FEMC=20*ERIE_(24000|24050|26699|27040|28000|28051)_HM(|L) \
5950 [O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])],WEYT_3CAB
5951
5952 # USA Georgia Railroad Co.
5953 # Freigt E4 shunting
5954 $DEF USA4FGAS=(4-6*GA_O35B_55217(|L))|(4-6*GA_X5F_55400(|L))|(4-6*GA_O35B_55217(|L))| \
5955 (4-6*GA_19(715|522)_XM_USRASS(|L))|USA3FMIXK
5956 # Freigt E4 long
5957 $DEF USA4FFGA=(20*GA_21245_HM(|L)[O:COAL(32|22)(|[M])])|(5*USA4FGAS),WEYT_3CAB
5958
5959 # USA Green BAY_BIX734 & Western Railroad
5960 # Freight E3 short
5961 $DEF USA3FGBWS=(4-6*GBW_X(L_7268|M_PS1_904|M_PS1_909)(|L))|USA3FMIXK
5962 # Freight E3 long
5963 $DEF USA3FGBW=5-6*USA3FGBWS
5964 # Freigt E6
5965 $DEF USA6FGBW=7-10*((GBW_XP_A302_7536|GBW_XP_A302_7552)(|L)),4-6*GBW_FMC50(|L),7-10*GBW_XP_1731(|L)
5966
5967 # USA Gulf, Mobil & Ohio Railroad
5968 # Freight E3 shunting
5969 $DEF USA3FGMOS=(4-6*GMO_1937AAR_XM_(5070|5076|8000)(|L))|(4-5*GMO_XM_7520(|L))|(4-5*GMO_9756_PS1(|L))| \
5970 USA3FMIXK|(4-5*GMO_PS50C_59370(|L))
5971 # Freight E3 long
5972 $DEF USA3FGMO=5-6*USA3FGMOS|(20*GMO_32375_HM(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])]), \
5973 GMO_2954(|L)
5974
5975 # USA Great Northern Railroad
5976 # Passenger E3
5977 $DEF USA3PGN1=(<GN_1290DL,GN_1370D,GN_1260D,GN_1370D,GN_1320D,GN_1250D,GN_1240D,GN_1390D,,GN_1170D, \
5978 3*(GN_1120D|GN_1215D),GN_1209D,GN_1100DL,GN_40D)| \
5979 (<GN_40DL,GN_1100D,GN_1209DL,3*(GN_1120DL|GN_1215DL),GN_1170DL,GN_1390DL,GN_1240DL,GN_1250DL, \
5980 GN_1320DL,GN_1370DL,GN_1260DL,GN_1370DL,GN_1290D)| \
5981 (<GN_1200D(|L),GN_1252,GN_1254,GN_1162,4*GN_1120D(|L),GN_1250D(|L),2*GN_1160D(|L),2*GN_1198D(|L))
5982 # Freigt E4 shunting
5983 $DEF USA4FGNS=(4-6*(GN_PS40A|GN_23715_XM_USRADS|GN_24853_XM_USRADS|GT_108103_XM_USRADS)(|L))| \
5984 USA4FMIXK|(4-6*(GN_71470_PS2003|GNRR_XM_11026)(|L))|(4-6*GN_LO_71782(|L))| \
5985 (4-6*GN_PS50C_39816(|L))|(4-6*FEC_GB_12000[O:SAND(10|9|11|12)(|[M])])|(4-6*GN_HT_70025(|L))| \
5986 (4-6*GN_XM_(10900|10901|10902|10903|10904|10905|11301|11302|11303|11304|11305|11306|20593|20594| \
5987 20595|20596|20597|20598|21850|21850|21851|21852|21853|21854|21855)(|L))|(4-6*GN_LO_173857(|L))
5988 # Freigt E4 long
5989 $DEF USA4FGN=5-6*USA4FGNS,GN_10088(|L)
5990 # Freigt E6 shunting
5991 $DEF USA6FGNS=(5-7*GN_PS4740SO0(1|2)(|L))|(5-7*GN_ACF4650(|L))|USA6FMIXK|(5-7*GN_HS4550(|L))| \
5992 (5-7*GN_PS40B(|L))|(5-7*GN_FM_160003(|L)[O:SILO1,8,11][O:SILO1,97,11])
5993 # Freigt E6 long
5994 $DEF USA6FGN=6*USA6FGNS
5995
5996 # USA Grand Trunk Western Railroad
5997 # Freigt E3 shunting
5998 $DEF USA3FGTWS=(4-5*GTW_460(523_XM_USRADS|305_XM)(|L))|(5-6*GTW_GB_(145400|145617)(|L))|(2*USA3FMIXK)
5999 # Freigt E3 long
6000 $DEF USA3FGTW=6*USA3FGTWS,WEYT_3CAB
6001 # Freigt E5 shunting
6002 $DEF USA5FGTWS=(5-6*GTW_PS50C_309(000|231)(|L))|(5-6*GTW_LO4750(|L))|(5-6*GTW_FMC50(|L))| \
6003 (5-6*GTW_XM_598346(|L))|(5-6*GTW_LO_(315066|138112|138068)(|L))|(5-6*GTW_378224_XPA(|L))| \
6004 (5-6*(LW_62104(|L)[O:WOOD1(29|24),,11]))|(5-6*GTW_LO_315066(|L))|(5-6*GTW_XPA_126145(|L))| \
6005 (5-6*GTW_LO_315302(|L))|USA5FS
6006 # Freigt E5 long
6007 $DEF USA5FGTW=6*USA5FGTWS
6008
6009 # USA Illionis Central Railroad
6010 # Freigt E4 shunting
6011 $DEF USA4FICS=(4-5*IC_PS150_12077(|L))|(4-5*IC_XM_(PS1_222500|43000|43122|43162|43357|41846)(|L))| \
6012 (4-5*IC_55050_PS2003(|L))|(4-5*IC_(15474_XL|RBL_150063)(|L))| \
6013 (4-6*((ICG_FM_910330|IC_FM_910317|IC_FM_62630)(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11]))
6014 # Freigt E4 long
6015 $DEF USA4FIC=(20-25*IC_(70779|74500|80973|219560)_HM(|L)[O:COAL(32|22)(|[M])])|(5-6*USA4FICS), \
6016 ICG_199041(|L)|IC_NE_(9403|9408|9444)(|L)
6017 # Freigt E6 shunting
6018 $DEF USA6FICS=USA6FMIXK|(4-6*IC_TRI5161(|L))|(4-6*ICG_(LO4750|PS4750SO02)(|L))| \
6019 (4-6*(IC_GU50HC|ICG_XP_531638|IC_GU50HC|ICG_XP_531638)(|L))|(4-6*IC_PS4740SO0(1|2|3)(|L))
6020 # Freigt E6 long
6021 $DEF USA6FIC=6*USA6FICS
6022
6023 # USA Illionis Central Gulf F3;
6024 # Freigt E4 shunting
6025 $DEF USA4FICGS=(4-6*ICG_PS50C_59(2129|1522)(|L))|(4-6*(ICG_BOXM|ICG_480068_XL(|L)))| \
6026 (4-6*ICG_199041(|L))|USA4FMIXK
6027 # Freigt E4 long
6028 $DEF USA4FICG=5-6*USA4FICGS,(ICG_199041|ICG_NE_199419)(|L)
6029
6030 # USA Indiana Harbor Belt
6031 # Freigt E3 long
6032 $DEF USA3FIHBS=(4-6*IHB_GB_(6056|6000)(|L))|(4-6*IHB_1937AAR_XM_100(60|00)(|L))|USA3FMIXK
6033 # Freigt E3 long
6034 $DEF USA3FIHB=5-6*USA3FIHBS,IHB_31(|L)
6035 # USA Illinois Terminal
6036 # Freigt E4 shunting
6037 $DEF USA4FITS=(4-6*IT_1937AAR_XM_6000(|L))|USA4FMIXK
6038 # Freigt E4 long
6039 $DEF USA4FIT=5-6*USA4FITS,IHB_31(|L)
6040
6041 # USA Kansas City Southern Railway Company
6042 # Freigt E3 shunting
6043 $DEF USA3FKCS=(2*USA3FMIXK)|(4-5*KCS_(1937AAR_XM_17450|15599_XM|XM_PS1_18746)(|L))| \
6044 (4-5*KCS_(25771_PS1|XL_152072)(|L))
6045 # Freigt E3 long
6046 $DEF USA3FKC=5-6*USA3FKCS,WEYT_3CAB
6047 # Freigt E6 short
6048 $DEF USA6FKCS=(4-6*KCS_AUTOMAX)|USA6FMIXK|(4-6*KCS_PS4750SO0(1|2)(|L))| \
6049 (4-6*(KCS_XP_A302_750921|KCS_XP_A302_750603|KCS_XP_A302_750921|KCS_XP_61136|KCS_XP_749161))| \
6050 (4-6*KCS_(LO_301957|TRI5161SO01)(|L))|(4-6*KCS_XP_(749161|61136)(|L))|(4-6*KCS_PS4740SO01(|L))
6051 # Freigt E6 long
6052 $DEF USA6FKC=6*USA6FKCS
6053
6054 # USA Lehigh & Hudson River Railway (noch keine Lok)
6055 # Freigt E4
6056 $DEF USA4FLHR=USA4FTANK|USA4FMIX,LHR_NE_1(7|6)(|L)
6057
6058 # USA Long Island Railroad
6059 # Freigt E2
6060 $DEF USA2FLIR=20*LIRR_(3275_XL1912|3308_XL1909)(|L),LIRR_CAB2|LIRR_N52_(30|32|34|35|36)(|L)
6061 # Freigt E3
6062 $DEF USA3FLIR=25*LIRR_5088_HM_USRA(|L),LIRR_CAB2|LIRR_N52_(30|32|34|35|36)(|L)
6063 # Freigt E4 short
6064 $DEF USA4FLIRS=(4-5*(LIRR_5088_HM_USRA|LN_86035_HM_USRA)(|L))|USA4FMIXK
6065 # Freigt E4 long
6066 $DEF USA4FLIR=USA4FLIRS,LIRR_CAB2|LIRR_N52_(30|32|34|35|36)(|L)
6067
6068 # USA Louisville and Nashville Railroad
6069 # Freigt E4 shunting
6070 $DEF USA4FLNS=(4-5*LN_HT_(180758|73750)(|L))|(4-5*LN_97(1|2)99_PS1(|L))|(4-5*LN_PS50C_100392(|L))| \
6071 (4-5*LN_1(2580|4380)(K|AB)_XM(|L))|USA4FMIXK|(4-6*LN_XM_(7070|7023)(|L))|(4-6*LN_98325_PS1(|L))| \
6072 (4-5*LN_(XM_114525|XM_PS1_17300|XM_PS1_17247|XM_114525)(|L))|(4-5*LN_SK_88074(|L))
6073 # Freigt E4 long
6074 $DEF USA4FLN=(5-6*USA4FLNS)| \
6075 (25*((LN_60850_HM|LN_60850_HM_HS|LN_60898_HM|LN_60898_HM_HS|LN_60899_HM|LN_60899_HM_HS| \
6076 LN_64041_HM|LN_86035_HM_USRA|LN_86050_HM_USRA|LN_87475_HM_USRA|LN_89750_HM_USRA)(|L) \
6077 [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33])),LN_649(3|4)(|L)
6078 # Freigt E5 short
6079 $DEF USA5FLNS=USA5FS|(4-6*LN_XPA_104600(|L))|(4-6*(LN_97199_PS1|LN_97299_PS1)(|L))| \
6080 (4-6*LN_PS4750SO01(|L))|(4-6*LN_LO_241555(|L))
6081 # Freigt E5 long
6082 $DEF USA5FLN=USA5FLNS
6083
6084 # USA Lehigh and New England Railway
6085 # Freigt E3
6086 $DEF USA3FLNE=(20*LNE_1(3213|4299|4335)_HM(|L))| \
6087 (10*LNE_18167_PS2003(|L), \
6088 10*(LNE_8(263|208|009)_ARA1923(|L) \
6089 [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M])])),LNE_NE_58(1|0)(|L)
6090
6091 # USA Lake Superior & Ishpeming
6092 # Freigt E4 short
6093 $DEF USA4FLSIS=USA4FMIXK|(4-5*LSI_XM_PS1_2266(|L))
6094 # Freigt E4 long
6095 $DEF USA4FLSI=(5-6*USA4FLSIS)| \
6096 (20*LSI_5161_HM(|L) \
6097 [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33]),WEYT_3CAB
6098
6099 # USA Lehigh Valley Railroad
6100 # Freigt E4 short
6101 $DEF USA4FLVS=(6-9*LV_X(58_7113|58B_8243|65_8300)(|L))|(6-9*LV_BOXM)|(6-9*LV_GON)|(6-9*LV_HOP_CEMENT)| \
6102 (6-9*LV_GB_32600(|L))|(6-9*LV_XM_8633(|L))|(6-9*LV_LO_50701_PS2003(|L))
6103 # Freigt E4 long
6104 $DEF USA4FLV=3*USA4FLVS,LV_NE_(95000|95027|1776|95023|95077|95009|95077|95084)(|L)
6105 # Freigt E6
6106 $DEF USA6FLV=2*USA6FMIXK,5*(LV_HOPO|ROCK_CHOP),2*USA6FMIXK
6107
6108 # USA Maine Central Railroad
6109 # Freigt E3 shunting
6110 $DEF USA3FMECS=(4-6*(MEC_36107_XM_USRASS|MEC_36285_XM_USRASS(|L)))|(2*USA3FMIXK)| \
6111 (4-6*MEC_1937AAR_XM_(6240|6444)(|L))|(4-6*(MEC_5032_ARA1923(|L)|MEC_5064_ARA1923(|L)))| \
6112 (4-6*BAR_BOX40)|(4-6*MEC_GB_3(244|365|366)(|L)[O:SAND(10|9|11|12)(|[M])])|(4-6*MEC_9358_PS1(|L))| \
6113 (4-6*MEC_(4500|4505|4997|14547|24024|14242)_XM_ARA1932(|L))
6114 # Freigt E3 long
6115 $DEF USA3FMEC=(5*USA3FMECS)|(20-25*MEC_LO_2476_PS2003(|L)),MEC_(642|643|644)(|L)
6116 # Freigt E5 short
6117 $DEF USA5FMECS=(6-8*MEC_XP_(29000|29012)(|L))|(6-8*MEC_FMC50PAN(|L))|(6-8*MEC_9358_PS1(|L))| \
6118 (6-8*MMA_XP_(1|4)(|L))|(6-8*MEC_FMC50G1(|L))|(2*USA6FMIXK)
6119 # Freigt E5 long
6120 $DEF USA5FMEC=3*USA5FMECS
6121
6122 # USA Chicago, Milwaukee, St. Paul and Pacific Railroad
6123 # Freigt E3 shunting
6124 $DEF USA3FMILWS=(4-5*MILW_XM_PS1_(29408|17560|30005|30437|30250)(|L))| \
6125 (4-5*MILW_X(L_3500|M_50342|MEI_2541|MEI_2539)(|L))|(4-5*MILW_70(1936|3425)_XM_USRASS(|L))| \
6126 (4-5*(MILW_4611_XL(|L)|MILW_BOX1))|USA3FMIXK
6127 # Freigt E3 long
6128 $DEF USA3FMILW=(20*MILW_9(6061|4212)_HM(|L)[O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])])| \
6129 (5-6*USA3FMILWS),MILW_NE_(992120|02135|992122)(|L)
6130 # Freigt E4 shunting
6131 $DEF USA4FMILWS=USA3FMIXK|(4-5*MILW_XM_PS1_35000(|L))|(4-5*MILW_PS50C_2325(|L))| \
6132 (4-5*MILW_XP_4292(|L))| \
6133 (4-5*(MILW_701936_XM_USRASS(|L)|MILW_703425_XM_USRASS(|L)|MILW_XP_50742(|L)))| \
6134 (4-5*MILW_(6582_XA|13967_XA|9038_XA|22945_XM|13644_XA|13500_XA|13252_XA|21190_XM|18861_XM| \
6135 18753_XM|18463_XM)(|L))|(4-5*MILW_(LO_99610|98925)_PS2003(|L))| \
6136 (4-5*WP_2001_FM(|L)[O:STEEL3(4|5|6|7|8),12,11][O:STEEL3(4|5|6|7|8),67,11])| \
6137 (4-5*MILW_49042_FM(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11])|
6138 # Freigt E4 long
6139 $DEF USA4FMILW=5-6*USA4FMILWS,WEYT_3CAB
6140 # Freigt E5 short
6141 $DEF USA5FMILWS=USA5FS|(4-6*MILW_XP_4292(|L))|(4-6*MILW_4987_XPA(|L))|(4-6*MILW_PS4740SO01(|L))| \
6142 (4-6*MILW_XPA_4982(|L))
6143 # Freigt E5 long
6144 $DEF USA5FMILW=(25*MILW_(PS4427|LO4750|PS4740SO01)(|L))|6*USA5FMILWS
6145
6146 # USA Missouri-Kansas-Texas Railroad Company
6147 # Freigt E4 shunting
6148 $DEF USA4FMKTS=USA3FMIXK|(4-5*MKT_90135_PS1(|L))|(4-5*(MKT_BOX|MKT_REF50))| \
6149 (4-5*MKT_(LO_34317|188)_PS2003(|L))|(4-5*MKT_XM_PS1_9(2000|7701)(|L))|(4-5*MKT_PS50C_1404(|L))
6150 # Freigt E4 long
6151 $DEF USA4FMKT=(5-6*USA4FMKTS),MKT_115(|L)
6152 # Freigt E6
6153 $DEF USA6FMKT=MKT_103(|L),2*USA6FMIXK,4-7*MKT_CHOP,4-7*MKT_PS4750(|L),4-7*MKT_LO_439(|L)
6154
6155 # USA Chicago Indianapolis & Louisville Railroad Co. (Monon R.R.)
6156 # Freigt E3 shunting
6157 $DEF USA3FMONS=(2*USA3FMIXK)|(4-5*MON_81530(|L))|(4-5*MON_GB_3(117|0005)(|L)[O:SCRAP(4|5|6)(|[M])])| \
6158 (4-5*MON_4099_HM(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])| \
6159 (4-6*(MON_GB_3001(|L)[O:SCRAP(4|5|6)(|[M])]))|(4-6*MON_XM_PS1_(541|750)(|L))
6160 # Freigt E3 long
6161 $DEF USA3FMON=5-6*USA3FMONS
6162 # Freigt E4 short
6163 $DEF USA4FMONS=USA4FMIXK|(4-5*MON_LO_52087(|L))
6164 # Freigt E4 long
6165 $DEF USA4FMON=5-6*USA4FMONS,MON_81530(|L)
6166
6167 # Minneapolis, Northfield & Southern
6168 # Freigt E4 short
6169 $DEF USA4FMNSS=USA4FMIXK|(4-5*MNS_XM_PS1_1(050|231|234)(|L))|(4-5*MNS_(500_PS1|XM_49813)(|L))| \
6170 (4-5*MNS_XP_49726(|L))
6171 # Freigt E4 long
6172 $DEF USA4FMNS=5-6*USA4FMNSS,MPA_200(6|7|7A)(|L)
6173 # Freigt E6 short
6174 $DEF USA6FMNS=(5*MNS_LU_(2516|2037)(|L))|USA6FMIXK
6175 # Freigt E6 long
6176 $DEF USA6FMN=(25*MNS_PS47(40SO02|40SO01|50SO01)(|L))|5*USA6FMNS
6177
6178 # Maryland & Pennsylvania R.R. Co.
6179 # Freigt E4 short
6180 $DEF USA4FMPAS=(4-5*(MPA_X130_MWB|MPA_X131_MWB(|L)|MPA_1021_ARA1923(|L)))|USA4FMIXK| \
6181 (5*((MPA_510_XM|MPA_513_XM|MPA_531_XM|MPA_713_XM|MPA_729_XM|MPA_1150_XM|MPA_1151_XMLATE| \
6182 MPA_1151_XMORIG|MPA_1152_XMORIG|MPA_1153_XM)(|L)))| \
6183 (4-5*((MPA_XM_PS1_4142|MPA_XM_PS1_3107|MPA_XF_PS1_5534|MPA_XM_PS1_26068)(|L)))
6184 # Freigt E4 long
6185 $DEF USA4FMPA=5-6*USA4FMPAS,MPA_200(6|7|7A)(|L)
6186 # Freigt E6
6187 $DEF USA6FMPA=2*MPA_126_MWF(|L), \
6188 20*((MPA_XM_A302_7517|MPA_XP_A302_203|MPA_XM_A302_9248|MPA_300_PS1|MPA_7200_PS1|MPA_7300_PS1)(|L))
6189
6190 # USA Missouri Pacific R.R.
6191 # Freigt E3 shunting
6192 $DEF USA3FMPS=(2*USA3FMIXK)|(5*MP_3(0943|1999)_XM_ARA1932(|L))| \
6193 (4-5*((MP_45231_XM_USRADS|MP_45233_XM_USRADS|MP_81828_PS1)(|L)))| \
6194 (4-5*MP_X(P_367124|L_253479|M_366763)(|L))|(4-5*MP_BOX1)
6195 # Freigt E3 long
6196 $DEF USA3FMP=(25*((MP_58678_HM_USRA|MP_58679_HM_USRA|MP_59446_HM|MP_60247_HM)(|L) \
6197 [O:(FR_KO45|OMM_KOHLE_03|FR_KO35|BALLAST15)(|[M]),,33]))|(5-6*USA3FMPS),WEYT_3CAB
6198 # Freigt E6 short
6199 $DEF USA6FMPS=(USA6FMIXK|(4-6*MP_82015_PS1(|L))|(4-6*MP_(LO4700|PS4740SO02)(|L))| \
6200 (4-6*MP_LO_(718155|706396|706397|706404)(|L))|(4-6*(MP_272006_XPA|MP_272007_XPA|MP_272009_XPA)(|L)))| \
6201 (4-6*MP_PS4750SO0(1|2)(|L))|(4-6*(MP_FM_815080(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11]))| \
6202 (4-6*MP_XP_269459(|L))
6203 # Freigt E6 long
6204 $DEF USA6FMP=6*USA6FMPS
6205
6206 # USA Montana Raillink Inc.
6207 # Freigt E6
6208 $DEF USA6FMRL=USA6FMIXK,5-10*MRL_ACF4650,USA6FMIXK,5-10*MRL_NSC50HC2,MRL_1104(|L)
6209
6210 # USA Minneapolis & St.Louis R.R.
6211 # Freigt E3
6212 $DEF USA3FMST=(6-8*(MSTL_2515_PS1|MSTL_22518_XM_USRADS|MSTL_25538_XM_USRADS)(|L), \
6213 6-8*MSTL_65327_HM_USRA(|L)[O:COAL(39|37|38|9)(|[M]),,33],4-6*MSTL_24984(K|AB)_XM(|L),2*MSTL_BOX1)| \
6214 (20-25*MSTL_(70395|70407|LO_70333)_PS2003(|L)),WEYT_3CAB
6215
6216 # USA Nashville, Chattanooga, and St. Louis railway
6217 # Freigt E3 shunting
6218 $DEF USA3FNCS=(4-5*NC_FOWLER_15(397|337)(|L))|USA3FMIXK
6219 # Freigt E4 shunting
6220 $DEF USA4FNCS=(USA4FMIXK)|(4-5*NC_18303_XM_ARA1932(|L))| \
6221 (4-5*NC_GB_4(4288|3079)(|L)[O:SCRAP(4|5|6)(|[M])])|(4-5*NC_18(300|261|399)_XM_ARA1932(|L))| \
6222 (4-5*NC_XM_PS1_22210(|L))
6223 # Freigt E4 long
6224 $DEF USA4FNC=(5-6*USA4FNCS)|(20*NC_48316_HM (|L)[O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])]), \
6225 WEYT_3CAB
6226
6227 # USA New Heaven R.R. Co.
6228 # Freigt E3 shunting
6229 $DEF USA3FNHS=(4-6*NH_1937AAR_XM_(30000|31000|30010|31010)(|L))|(4-5*NH_PS40(|L))|USA3FMIXK| \
6230 (4-5*NH_LO_117091_PS2003(|L))
6231 # Freigt E3 long
6232 $DEF USA3FNH=(20-25*NH_120662_HM_USRA(|L)[O:COAL(39|37|38|9)(|[M])])|(5-6*USA3FNHS), \
6233 NH_NE5_(548|547|C535)(|L)
6234 # Freigt E4 shunting
6235 $DEF USA4FNHS=(4-6*NH_1937AAR_XM_(36000|36100|37000|37100|38000|38100)(|L))|USA4FMIXK
6236 # Freigt E4 long
6237 $DEF USA4FNH=5-6*USA4FNHS,NH_NE5_(548|547|C535)(|L)
6238
6239 # USA New York, Chicago & St. Louis R.R. (Nickel Plate Road)
6240 # Freigt E3 short
6241 $DEF USA3FNKPS=(4-6*NKP_33799_HM(|L)[O:COAL(39|37|38|9)(|[M])])|(4-6*NKP_1937AAR_XM_15000(|L))
6242 # Freigt E3 long
6243 $DEF USA3FNKP=6*USA3FNKPS,WEYT_3CAB
6244
6245 # USA Northern Pacific
6246 # Freigt E2 shunting
6247 $DEF USA2FNPS=(4-5*NP_XM_39153(|L))|(4-5*NP_PS40R(|L))
6248 # Freigt E2 long
6249 $DEF USA2FNP=6*USA2FNPS,NP_CABC2
6250 # Freigt E3 shunting
6251 $DEF USA3FNPS=(4-5*NP_659996_XL(|L))|(4-5*NP_XM_PS1_3055(|L))|(4-5*NP_XM_39730(|L))| \
6252 (4-5*NP_SK_800(40|88)(|L))| \
6253 (4-5*(NP_40XM|NP_BOX3|NP_PS40GL|NP_PS40R|NP_PS40G|NP_PS40RL|NP_BOX1|NP_BOX2))| \
6254 (4-5*NP_LO_(75864|75273_PS2003)(|L))|(2*USA3FMIXK)|(4-5*NP_XM_(13070|1100|13000)(|L))| \
6255 (4-6*NP_1937AAR_XM_1578(7|8)(|L))|(NP_XA_4700L,NP_XM_5900L,NP_XM_30402L,NP_XM_30402,NP_XM_30402L)
6256 # Freigt E3 long
6257 $DEF USA3FNP=5-6*USA3FNPS,NP_10036(|L)|NP_CABC2
6258 # Freigt E4 shunting
6259 $DEF USA4FNPS=(2*USA4FMIXK)|(4-5*NP_LO_75034(|L))|(4-5*NP_PS4740SO01(|L))
6260 # Freigt E4 long
6261 $DEF USA4FNP=(20*NP_70277_HM(|L)[O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])])| \
6262 (5-6*USA4FNPS),NP_10036(|L)|NP_CABC2
6263 # Freigt E5 short
6264 $DEF USA5FNPS=USA5FS|(4-6*(NP_REF50WFE|NP_REF60))|(4-6*NP_PS4740SO01(|L))
6265 # Freigt E5 l0ng
6266 $DEF USA5FNP=6*USA5FNPS
6267
6268 # USA Northern Pacific North coast limited
6269 # Passenger E3
6270 $DEF USA3PNCLL=(<NP_400,NP_425,,NP_459,NP_494,NP_500,NP_550,NP_551,NP_586,NP_588,NP_589,NP_367,NP_350, \
6271 NP_308,NP_307,NP_390)
6272 $DEF USA3PNCL=(<NP_390L,NP_307L,NP_308L,NP_350L,NP_367L,NP_425L,NP_459L,NP_494L,NP_500L,NP_550L, \
6273 NP_551L,NP_586L,NP_588L,NP_589L,NP_400L,NP_F9A)
6274
6275 # USA Norfolk Southern Railway Company
6276 # Freigt E3 short
6277 $DEF USA3FNSAS=(4-6*NSO_XM_(2401|2154)(|L))|(4-6*NSA_BP8_650129(|L))| \
6278 (4-6*NSA_1937AAR_XM_25(634|587)(|L))|(4-5*NSA_194010(|L)[O:BALLAST(33|28)(|[M])])|USA2FMIXK| \
6279 (4-5*NSA_GB_7201(|L)[O:SAND(10|9|11|12)(|[M])])
6280 # Freigt E3 long
6281 $DEF USA3FNSA=5-6*USA3FNSAS,NSO_NE_(385|383|389)(|L)|NSA_NE_39(3|4)(|L)
6282 # Freigt E6 short
6283 $DEF USA6FNSAS=(4-6*NSA_200881(|L)[O:BALLAST(33|28)(|[M])])|(4-6*NSA_BETHGON2)| \
6284 (4-6*NSA_RD6TRI[O:SOIL(21|14)(|[M]),,41])|(4-6*NSA_236178TRI3281(|L))|(4-6*NSA_PS4750(|SO02)(|L))| \
6285 (4-6*NSA_XP_450667(|L))|(4-6*NSA_GU60HC(|L))|(4-6*NSA_PS4740SO01(|L))|(4-6*NSA_XPA_488168(|L))| \
6286 (4-6*NSA_TRI5161SO01(|L))
6287 # Freigt E6 long
6288 $DEF USA6FNSA=6*USA6FNSAS
6289
6290 # USA Norfolk and Western Railway
6291 # Freigt E3 short
6292 $DEF USA3FNWS=(4-6*NW_(57300B11|57439B11|54820B9A|54825B9A|54830B9A|54835B9A|55800B9A|55820B9A| \
6293 55835B9A|55870B10|55884B10|54810B9A)_PS1(|L))| \
6294 (4-6*(NW_54822_PS1|NW_55860_PS1|NW_57150B11_PS1)(|L))| \
6295 (4-6*(NW_XM_57611|NW_XM_57810|NW_120026_XM_USRASS|NW_120600_XM_USRASS|NW_120688_XM_USRASS)(|L))| \
6296 (4-6*NW_(PS40|B8_42000|B8_42030|B8_42040)(|L))|(4-5*NW_GB_89000(|L)[O:SCRAP(5|6)(|[M])])| \
6297 (4-6*NW_CS3_17000(0|6)(|L)[O:NW_CS3_HOOD(1|2),13,19][O:NW_CS3_HOOD(1|2),86,19])| \
6298 (4-6*NW_PS50C_(57446B12|57447B12|164379B114|164390B114)(|L))|(4-6*NW_B(2_49201|1_46146)(|L))| \
6299 (4-6*NW_B3_52200(|L))|(4-6*NW_G4_70600(|L))
6300
6301 # Freigt E3 long
6302 $DEF USA3FNW=(6*USA3FNWS)|(25*NW_HT55(|L)[O:COAL(39|37|38|9)(|[M]),,34])| \
6303 (25*NW_(514372|HC6_71233)_PS2003(|L)), \
6304 (NW_CG_518(393|382|402|395|392)(|L))|NW_NE_500832(|L)|NW_CG_518400(|L)
6305 # Freigt E6 short
6306 $DEF USA6FNWS=(4-6*NW_PS47(00|40SO02|50SO02|50SO01)(|L))|(4-6*NW_B131_60500(4|0)(|L))| \
6307 (4-6*(NW_120026_XM_USRASS|NW_120600_XM_USRASS|NW_120688_XM_USRASS)(|L))|USA6FMIXK| \
6308 (4-6*NW_B139_6045(22|38)(|L))|(4-6*(NW_FM_300431(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11]))| \
6309 (4-6*NW_XPA_(868297|52952)(|L))|(4-6*NW_LO_(180300|171717)(|L))
6310 # Freigt E6 long
6311 $DEF USA6FNW=6*USA6FNWS
6312
6313 # USA New York Central Railway
6314 # Freigt E3 short
6315 $DEF USA3FNYCS=(4-5*(NYC_160108_XM_USRASSL|NYC_160108_XM_USRASS|NYC_277418_XM_USRASSL| \
6316 NYC_277418_XM_USRASS|NYC_234718_XM_USRADSL|NYC_234718_XM_USRADS))| \
6317 (4-5*NYC_(701B_64000|815B_71000|820B_71543|855B_41500|862B_45740|864B_52461|895B_47025|907B_43666) \
6318 (|L))|(4-5*NYC_(896B_47591|742B_80868|850B_72521|850B_72522|854B_40505)(|L))| \
6319 (4-5*NYC_GB_(643703|643000|643001|643515|643517|711000|711451)(|L))| \
6320 (4-5*(NYC_837996_HM_USRAL|NYC_837996_HM_USRA|NYC_837997_HM_USRAL|NYC_837997_HM_USRA| \
6321 NYC_847268_HM_USRAL|NYC_847268_HM_USRA|NYC_850126_HM_USRAL|NYC_850126_HM_USRA))
6322 # Freigt E3 long
6323 $DEF USA3FNYC=(5-6*USA3FNYCS)| \
6324 (20*NYC_(867399_HM|3HOP1|867399_HML)[O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])]), \
6325 NYC_19969(|L)
6326 # Freigt E4 short
6327 $DEF USA4FNYCS=(5-6*((4*NYC_349627_GB_USRA|NYC_666044_GAUSRA)(|L))| \
6328 (5-6*((NYC_PS40|NYC_PS40P|NYC_107378_XM_AB|NYC_107378_XM_K|NYC_109445_XM_AB|NYC_189509_XM_USRAAB| \
6329 NYC_189509_XM_USRAK|NYC_160108_XM_USRASS|NYC_277418_XM_USRASS|NYC_234718_XM_USRADS)(|L))))| \
6330 (5-6*NYC_RBL_78532(|L))|(4-6*NYC_XPA_67106(|L))|(4-6*NYC_LO_885954(|L))|(4-6*NYC_67553_XPA(|L))| \
6331 (5-6*(NYC_888F(|L)[O:(SHIPMOTORAXLE|BOILERRINGS|BETON2|CHIMNEY2),,11])| \
6332 (5-6*NYC_LO_883466_PS2003(|L)))| \
6333 (5-6*NYC_XM_PS1_1(69739|69722|69749|69800|69802|69809|70746|80000|80039|80149|80174)(|L))
6334 # Freigt E4 long
6335 $DEF USA4FNYC=(20-25*(NYC_(847268|837997|837996|850126)_HM_USRA(|L) \
6336 [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33]))| \
6337 (5-6*USA4FNYCS),NYC_19008(|L)|NYC_20132(|L)|NYC_20144(|L)|NYC_NE21049(|L)|NYC_19969(|L)
6338
6339 # USA New York, Susquehanna and Western Railroad Company
6340 # Freigt E3 shunting
6341 $DEF USA3NYSS=USA3FMIXK|(4-5*NYSW_XM_PS1_(526|411)(|L))|(4-5*NYSW_FOWLER_1546(|L))|(4-5*NYSW_BOX1)
6342 # Freigt E3 long
6343 $DEF USA3NYS=5-6*USA3NYSS,WEYT_3CAB
6344
6345 # Freigt E4 shunting
6346 $DEF USA4NYSS=USA4FMIXK|(4-5*NYSW_XF_104(|L))
6347 # Freigt E4 long
6348 $DEF USA4NYS=5-6*USA4NYSS,WEYT_3CAB
6349
6350 # USA Paducah & Louisville Railway
6351 # Freigt E4
6352 $DEF USA4FPAL=15*PAL_246028(|L)[O:BALLAST_OLD1(|[M])],WEYT_3CAB
6353
6354 # USA Penn Central Railway
6355 # Freigt E4 shunting
6356 $DEF USA4FPCS=(4-5*PC_X7(4_167015|1_166418|1_166419)(|L))|(4-5*(PC_X58C_164246|PC_X58C_266109)(|L))| \
6357 (4-5*PC_(161B_174239|XM_155026|293770_XPA|X73_369118)(|L))|(4-5*PC_F41A(|L)[O:GIRDER3,,11])| \
6358 (4-5*PC_G32C(|L)[O:SAND(7|11|12)(|[M])])|(4-5*PC_74216_PS2003(|L))|(4-5*PC_XM_PS1_112178(|L))| \
6359 (4-5*PC_GB_512204(|L)[O:SCRAP(5|6)(|[M])])
6360 # Freigt E4 long
6361 $DEF USA4FPC=5-6*USA4FPCS,PC_NE210(08|41|70)|PC_N8B_23505(|L)|PC_NE_184(23|03)(|L)|PC_NE21070(|L)
6362 # Freigt E6 short
6363 $DEF USA6FPCS=(4-6*PC_293770_XPA(|L))|(4-6*PC_F41(|L)[O:GIRDER3,,11])|(4-6*PC_PS4750SO01(|L))| \
6364 (4-6*PC_LO_885(122|237)(|L))|(4-6*PC_X(78_221018|60P_295506)(|L))|(4-6*WP_XP_3763 (|L))
6365 # Freigt E6 long
6366 $DEF USA6FPC=6*USA6FPCS
6367
6368 # USA Pickens Railway
6369 # Freigt E4 short
6370 $DEF USA4FPICS=(4-6*PICK_XP_A302_54042(|L))|USA4FMIXK|USA4FMIXK
6371 # Freigt E4 short
6372 $DEF USA4FPIC=5-6*USA4FPICS,WEYT_3CAB
6373
6374 # USA The Pittsburgh & Lake Erie R.R. Co.
6375 # Freigt E3 shunting
6376 $DEF USA3FPLES=(4-6*PLE_889F(|L)[O:STEEL22])|USA2FMIXK|(4-6*PLE_1560_PS2003(|L))| \
6377 (4-6*PLE_1937AAR_XM_300(58|00|01)(|L))
6378 # Freigt E3 long
6379 $DEF USA3FPLE=5-6*USA3FPLES,WEYT_3CAB
6380
6381 # USA Pennsylvania Railroad
6382 # Freigt E2 shunting
6383 $DEF USA2FPRRK=(5*((PRR_F22(|L)|PRR_FB|PRR_FD|PRR_F30(|E)(|L)|PRR_FM) \
6384 [O:(TANK1|TANK2|BOILER5|BOILER4|BOILER1),,12]))|(5-6*PRR_XE(|L))| \
6385 (5-6*((PRR_GR_ASBUILT|PRR_GR_ASBUILT_LW|PRR_GR_POST1911)(|L)[O:SCRAP_1(3|5|4)(|[M]),,20]))| \
6386 (5-6*((PRR_GRA_ASBUILT|PRR_GRA_ASBUILT_LW|PRR_GRA_POST1911|PRR_GRA_MOW1|PRR_GRA_MOW2)(|L) \
6387 [O:BALLAST(42|41|51)(|[M]),,20]))|(5-6*PRR_X(A_1876|A_GSD|A_69947|B|C)(|L))| \
6388 (5-6*((PRR_G24_USRA|PRR_G24_USRARBT)(|L)[O:BALLAST(42|41|51)(|[M]),,20]))| \
6389 (6-8*((PRR_X28|PRR_X28A|PRR_X29_1923|PRR_X29_1924|PRR_X29_1924CK|PRR_X29_1924MS2|PRR_X29_1924REA| \
6390 PRR_X29_1924SK1A|PRR_X29_1928|PRR_X29_1928CK|PRR_X29_1928MS2|PRR_X29_1928REA|PRR_X29_1928SK1A| \
6391 PRR_X29_1928SVC|PRR_X29_1932BATTERY|PRR_X29_1932BOND|PRR_X29_1932CK|PRR_X29_1932KEROSENE| \
6392 PRR_X29_1932MS2|PRR_X29_1932REA|PRR_X29_1932SK1A|PRR_24709_XL1928|PRR_27361_XL1909| \
6393 PRR_28030_XL1912|PRR_49039_XLC1906|PRR_60264_XLEL1903|PRR_72805_XM1903|PRR_72810_XM1915| \
6394 PRR_97301_XL1903|VL_10320_XL1912)(|L)))|(6-8*(PRR_F(22|B|22L)[O:BOX(8|6),,12]))| \
6395 (5-6*((PRR_4087_RFAREX1918|PRR_100502_RF1915|PRR_110003_RFEL1903|PRR_110006_RFEL1915| \
6396 PRR_119501_RF1903|PRR_R7_1913|PRR_R7_1913LW|PRR_R7_1915|PRR_R7_1915LW)(|L)))|(2*USA2FMIXK)| \
6397 (5-6*(CHP_X25_5704|PRR_X25_88449|PRR_X25_88450|PRR_X25_32358|PRR_X25_35093|PRR_X25_35095| \
6398 SBC_X25_3318)(|L))|(5-6*PRR_X31(_60101|_60130|A_68074|A_68077|A_77556|F_81738)(|L))
6399
6400 # Freigt E2 long
6401 $DEF USA2FPRR=5*USA2FPRRK, \
6402 PRR_N8S2|PRR_NX23(|L)|PRR_479814_NDA(|L)|PRR_476052_ND(|L)|PRR_CAB1|PRR_CAB2|PRR_CAB6
6403 # Passenger E3
6404 $DEF USA3PPRR=(<(2*PRR_442IMPERIAL_4069BL),3*PRR_125BROOK_4066BL,PRR_RAPIDS_106SLPL, \
6405 2*PRR_18BRCITY_4068L,(PRR_442IMPERIALFOM_4069BL|PRR_125BROOKFOM_4066BL|PRR_18BRCITYFOM_4068L))| \
6406 (<(PRR_18BRCITYFOM_4068|PRR_125BROOKFOM_4066B|PRR_442IMPERIALFOM_4069B),(2*PRR_18BRCITY_4068), \
6407 PRR_RAPIDS_106SLP,3*PRR_125BROOK_4066B,2*PRR_442IMPERIAL_4069B)
6408
6409 # Freigt E3
6410 $DEF PRR_BOX1=(PRR_X28|PRR_X28A|PRR_X29_1923|PRR_X29_1924|PRR_X29_1924CK|PRR_X29_1924MS2| \
6411 PRR_X29_1924REA|PRR_X29_1924SK1A|PRR_X29_1928CK|PRR_X29_1928|PRR_X29_1928MS2|PRR_X29_1928REA| \
6412 PRR_X29_1928SK1A|PRR_X29_1928SVC|PRR_X29_1932BATTERY|PRR_X29_1932BOND|PRR_X29_1932CK| \
6413 PRR_X29_1932KEROSENE|PRR_X29_1932MS2|PRR_X29_1932REA|PRR_X29_1932SK1A|PRR_PS40| \
6414 PRR_X26_44076_USRASS|PRR_X26_86854_USRASS|PRR_X26_540132_USRASS|PRR_X26_540371_USRASS| \
6415 PRR_X26_564287_USRASS)(|L)
6416 # Freigt E3 short
6417 $DEF USA3FPRRS=(4-5*PRR_G31(_36340(0|1|2)|B_37195(0|2|4))(|L)[O:SCRAP(5|6)(|[M])])| \
6418 (4-5*PRR_X58_11(2383|2383_MOD|2383_LATE|7942|7942_MOD|7942_LATE)(|L))| \
6419 (4-5*PRR_X58(A_113961|A_113961_MOD|A_113961_LATE|B_112630|B_112630_MOD|B_112630_LATE|B_114242| \
6420 B_114242_MOD|B_114242_LATE)(|L))|(4-5*PRR_BOX1)|(4-5*PRR_LO_261419(|L))| \
6421 (4-5*PRR_H34(B_257482|C_258089)_PS2003(|L))|(4-5*PRR_K(8|7|7A)(|L))| \
6422 (4-5*(PRR_F30D(1|2)|TTX_F30D_(475264|475263)L[OB:SEMI_USA4R,,12]))| \
6423 (4-5*(PRR_F30D(1|2)L|TTX_F30D_(475264|475263)[OB:SEMI_USA4L,,12]))| \
6424 (4-5*PRR_X(37_65400|37B_67360|43_603925|43_603926|43A_602000|43A_602003|43C_603925|43C_71162| \
6425 46_87087|46_87088|46A_72325|46A_72328)(|L))| \
6426 (4-5*PRR_X(38C_74595|38C_74598|41B_118753|41B_119677|41B_119894|44_604000|38_73764|38_75923| \
6427 38F_45671|41_84536|41_84805|44_604005|45_73312|ME_47100)(|L))| \
6428 (4-5*PRR_G(29A_357354|29A_357358|29B_349499|29C_357600|29C_357606|29C_357620|30_362384|30_362853| \
6429 29_357854|29_357857|29_357860|30A_363303|30A_363313|30A_363360)(|L))|PRR_F30D(1|2)| \
6430 (TTX_F30D_(475264|475263)[OB:SEMI_USA4L,,12])|(4-5*PRR_X32(D_49250|A_58800|B_48300)(|L))| \
6431 (3-4*(PRR_F39_470400|PRR_F39A_470600|TTX_F39_470400)L[OB:F39_HITCH,32,10][OB:F39_HITCH,143,10] \
6432 [OB:SEMI_USA3L,30,8][OB:SEMI_USA3L,139,8])| \
6433 (3-4*(PRR_F39_470400|PRR_F39A_470600|PRR_F39A_470650|TTX_F39_470400|ATTX_F39_470735) \
6434 [OB:#F39_HITCH,94,10][OB:#F39_HITCH,203,10][OB:SEMI_USA3R,30,8][OB:SEMI_USA3R,139,8])
6435 # Freigt E3 long
6436 $DEF USA3FPRR=(5-6*USA3FPRRS)|(25-28*(PRR_3HOP(E|N)(|L)[O:BALLAST(24|44)(|[M])])), \
6437 PRR_N8S2|PRR_NX23(|L)|PRR_479814_NDA(|L)|PRR_476052_ND(|L)|PRR_CAB5|PRR_CAB4|PRR_CAB1|PRR_CAB3| \
6438 PRR_CAB2|PRR_CAB6
6439 # Freigt E4
6440 $DEF USA4FPRRS=(4-6*(PRR_3HOP(E|N)(|L)[O:BALLAST(24|44)(|[M])]))|(4-6*PRR_110126_XPA(|L))| \
6441 (4-6*PRR_X60_110175(|L))|(4-6*PRR_GON(|L))|(4-6*PRR_439038_GBG26(|L)[O:FR_ST01(|[M])])| \
6442 (4-6*PRR_X40(_36991|A_36989)(|L))|(4-6*PRR_H45_259802(|L))|(4-6*PRR_G24_USRARBT_CK(|L))| \
6443 (4-6*PRR_F41(ORIG|LATE)(|L)[O:(SHIPMOTORAXLE|BOILERRINGS|BETON2|PIPE53),,11])| \
6444 (4-6*PRR_340041_X23A(|L)[O:SOIL(17|20|11|13|16|18|10),,37])| \
6445 (4-6*PRR_F47(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11])|(4-6*PRR_LO_260177(|L))
6446 $DEF USA4FPRR=5*USA4FPRRS,PRR_CAB5|PRR_CAB4
6447
6448 # USA The Pittsburgh & Shawmut R.R. Co.
6449 # Freigt E3 shunting
6450 $DEF USA3FPSRS=(4-5*PSR_3133_HM(|L)[O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])])
6451 # Freigt E3 long
6452 $DEF USA3FPSR=(5-6*USA3FPSRS),WEYT_3CAB
6453
6454 # USA Pittsburgh & West Virginia Ry.
6455 # Freigt E3 shunting
6456 $DEF USA3FPWVS=(4-5*PWV_LO_1955_PS2003(|L))|USA3FMIXK|(4-5*PWV_XM_PS1_1300(|L))
6457 # Freigt E3 long
6458 $DEF USA3FPWV=(20*PWV_(3025_HM_USRA|3101_HM_USRA|5000_HM_USRA|6736_HM|6735_HM|300_HM)(|L) \
6459 [O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])])|(5-6*USA3FPWVS),PWV_NE_839(|L)
6460
6461 # USA Reading Blue Mountain & Northern Railroad Company SD40-2
6462 # Freigt E4 shunting
6463 $DEF USA4FRBMS=(4-6*RBMN_PS47(40SO01|50SO01)(|L))|USA4FMIXK
6464 # Freigt E4 long
6465 $DEF USA4FRBM=6*USA4FRBMS,WEYT_3CAB
6466
6467 # USA Reading Company
6468 # Freigt E4 shunting
6469 $DEF USA4FRDGS=(4-5*RDG_XLJ_20(178|042|029)(|L))|(4-5*RDG_RBLA_17039(|L))|(4-5*RDG_102(751|646)(|L))
6470 # Freigt E4 long
6471 $DEF USA4FRDG=(20*RDG_LOA_72914(|L))| \
6472 (20*RDG_8(5140|7255)_HTV(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])| \
6473 (4-5*USA4FRDGS),RDG_(94113|NMD_90730|NMG_90709|NMK_92855|NMN_92936|NMJ_92836)(|L)
6474 # Freigt E6 long
6475 $DEF USA6FRDG=(25*(((RDG_73592_HM_USRA|RDG_73593_HM_USRA|RDG_74170_HM_USRA)(|L) \
6476 [O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])])))| \
6477 (25*(((RDG_5083_XM_USRASS|RDG_5092_XM_USRASS)(|L))))|(5-6*(RDG_LOJ_79981(|L))|USA6FMIXK)
6478
6479 # USA Richmond, Fredricksburg & Potomac Railroad
6480 # Passenger E3 regional
6481 $DEF USA3PRFPR=RFP_PB_25,4*RFP_PA_401
6482 # Passenger E3 long distance
6483 $DEF USA3PRFPL=RFP_PA_501A(|L),RFP_PA_501B(|L),RFP_PA_501C(|L),RFP_PA_77LATE(|L),RFP_PA_77ORIG(|L), \
6484 RFP_PA_513B(|L),RFP_PA_513A(|L),RFP_PA_559B(|L),RFP_PA_559A(|L),RFP_PA_513C(|L)
6485
6486 # Freigt E3 short
6487 $DEF USA3FRFPS=(4-5*RFP_356(6|7)_HM_USRA(|L)[O:COAL(39|37|38|9)(|[M])])| \
6488 (4-5*RFP_XM_PS1_28(48|08|36|70)(|L))|(4-5*RFP_(1023|1137|2719|5051|2330)_XM_USRASS(|L))| \
6489 (4-5*RFP_PS50C_2392(|L))|(4-5*RFP_LP_3846(|L)[OB:PIPE(55|61),,11])| \
6490 (4-5*RFP_(8265|8242)_HT[O:COAL2(7|8)(|[M]),,33](|L))
6491 # Freigt E3 long
6492 $DEF USA3FRFP=5-6*USA3FRFPS,RFP_81(3|6|8|9)(|L)|RFP_90(3|1|4|7)(|L)|RFP_82(1|0)(|L)
6493 # Freigt E4 short
6494 $DEF USA4FRFPS=(4-6*RFP_PS4700(|L))| \
6495 (4-6*(RFP_PS40(|L)|RFP_2902_PS1(|L)|RFP_2905_PS1(|L)|RFP_XL_A432_5200(|L)|RFP_XL_A332_2100(|L)| \
6496 RFP_XL_A432_2000(|L)|RFP_XP_4000(|L)))
6497 # Freigt E4 long
6498 $DEF USA4FRFP=6*USA4FRFPS,RFP_81(3|6|8|9)(|L)|RFP_90(3|1|4|7)(|L)|RFP_82(1|0)(|L)
6499
6500 # USA Rock Island Railroad
6501 # Passenger E3
6502 $DEF USA3PRI=RI_BAG,RI_BILEV,2*RI_SLP,RI_DINER,3*RI_COACH,2*RI_CHAIR
6503 # Freigt E3 short
6504 $DEF USA3FRIS=(4-5*RI_RS_67999(|L))|USA4FMIXK
6505 # Freigt E3 long
6506 $DEF USA3FRI=5-6*USA3FRIS,RI_CAB1
6507 # Freigt E4 short
6508 $DEF USA4FRIS=(4-5*RI_LO_12236(|L))|(4-5*RI_LO_7(643|200)_PS2003(|L))|USA4FS| \
6509 (4-5*RI_1(56294_XM_USRADS|34781_XM)(|L))|(4-5*RI_GB_(900|1297|3494)(|L))|(4-5*RI_XL_62914(|L))| \
6510 (4-5*RI_(64399_PS1|140564AB_XM|140564K_XM|141542AB_XM|141542K_XM)(|L))|(4-5*RI_HT_9215(|L))| \
6511 (4-5*RI_XM_PS1_2(5557|1895|2250)(|L))|(4-5*RI_PS50C_35028(|L))|(4-5*RI_XM_273(70|60)(|L))
6512 # Freigt E4 long
6513 $DEF USA4FRI=5-6*USA4FRIS,RI_CAB1
6514 # Freigt E5 short
6515 $DEF USA5FRIS=(4-6*RI_32964_XPA(|L))
6516 # Freigt E5 long
6517 $DEF USA5FRI=6*USA5FRIS
6518
6519 # USA Chicago, Rock Island and Pacific Ry. Co
6520 # Freigt E4 short
6521 $DEF USA4FROCKS=(4-6*ROCK_LO_800499(|L))|(4-6*ROCK_ACF4650(|L))|(4-6*ROCK_PS(4750|4740SO01)(|L))| \
6522 (4-5*ROCK_ACF4650(|L))|(4-5*ROCK_LO_(512011|512076|800499)(|L))| \
6523 (4-5*ROCK_(GB_680255|HT_700000)(|L))| \
6524 (4-5*ROCK_(XM_58094|XM_301000|XP_302148|XP_A302_300573|XP_301896)(|L))|USA4FMIXK
6525 # Freigt E3 long
6526 $DEF USA4FROCK=5-6*USA3FRIS,BN_10107
6527
6528 # USA Raritan River R.R. Co. (noch keine Lok)
6529 # Freigt E4
6530 $DEF USA4FRR=USA4FMIX,RR_NE_9(|L)
6531
6532 # USA Rutland Railroad
6533 # Freigt E4 short
6534 $DEF USA4FRUTS=(4-6*RUT_PS40(|L))|(4-6*RUT_LO_508_PS2003(|L))
6535 # Freigt E4 long
6536 $DEF USA4FRUT=5-6*USA4FRUTS,RUT_51(|L)
6537
6538 # USA Seaboard Air Line
6539 # Freigt E2 short
6540 $DEF USA2FSALS=(4-5*(SAL_(12399_1932(K|AB)_B3|13055_1932(K|AB)_B4|15747_1932(K|AB)_B5)(|L)))| \
6541 (4-6*SAL_B6(A|B|C|D|E|F)_ARA1932(|L))|(4-5*SAL_B6X_ARA1932(|L))|USA2FMIXK| \
6542 (4-6*SAL_B6(A|B|C|D|E|F)_ARA1932(|L))
6543 # Freigt E2 long
6544 $DEF USA2FSAL=5-6*USA2FSALS,SAL_(NE_5247|NE_5248|NE_5249|5702|5700|5703)(|L)
6545 # Passenger E3
6546 $DEF USA3PSAL=(9*(SAL_1214OAKCITY|SAL_1214OAKDOME|SAL_1214OAKGROVE|SAL_1214OAKHALL), \
6547 SAL_831WEEPERSTOWERL)| \
6548 (SAL_831WEEPERSTOWER,9*(SAL_1214OAKCITYL|SAL_1214OAKDOMEL|SAL_1214OAKGROVEL|SAL_1214OAKHALLL))| \
6549 (<5*SAL_6238,SAL_REDMOUNTAIN_106,SAL_PALMBEACH,3*SAL_6218)| \
6550 (<3*SAL_6218L,SAL_PALMBEACHL,SAL_REDMOUNTAIN_106L,5*SAL_6238L)
6551
6552 # Freigt E3 shunting
6553 $DEF USA3FSALS=(4-6*SAL_90030_G10(|L)[O:COAL2(2|4|5|6|1)(|[M])])|(2*USA3FMIXK)| \
6554 (4-6*SAL_PS50C_1(5008|6000)(|L))|(4-6*SAL_(12399_RS_B3|13055_RS_B4)(|L))| \
6555 (4-6*SAL_XM_PS1_22458(|L))| \
6556 (4-6*SAL_B(8_19500|8_19500_1963|8_19500_1964|9_19550|9_19550_1963|9_19550_1964)(|L))| \
6557 (4-6*SAL_(21267_PS1|21438_PS1|21642_PS1|21691_PS1|26000_PS1|26734_PS1|30550_PS2003|30689_PS2003) \
6558 (|L))|(4-6*SAL_(AF1A|AF1B|AF1C|AF1D|AF2A|AF2B|AF2C|AF2D|B7A|B7B|B7C|B7D)(|L))
6559 # Freigt E3 long
6560 $DEF USA3FSAL=6*USA3FSALS,SAL_57(02|00|03)(|L)|SAL_(NE_5247|NE_5248|NE_5249|5702|5700|5703)(|L)
6561 # Freigt E4 shunting
6562 $DEF USA4FSALS=(4-6*SAL_PS50C_1(5008|6000)(|L))|(4-6*SAL_XMI_(25099|25257|25303|25403)(|L))
6563 # Freigt E4 long
6564 $DEF USA4FSAL=(5-6*USA4FSALS),SAL_57(02|00|03)(|L)
6565
6566 # USA Seaboard System
6567 # Freigt E4 shunting
6568 $DEF USA4FSBDS=(4-6*SEAB_XPA_180228(|L))|(4-6*SEAB_HT_323319(|L))|(4-6*SEAB_BOX1)|USA4FMIXK
6569 # Freigt E4 long
6570 $DEF USA4FSBD=(5-6*USA4FSBDS),SEAB_M5_21006(|L)
6571
6572 # USA Seaboard Coast Line
6573 # Freigt E3 shunting
6574 $DEF USA3FSCLS=(4-5*SCL_131808G5(|L)[O:SCRAP(5|6)(|[M])])|(4-5*SCL_LC_PS1_10811(|L))| \
6575 (4-5*SCL_(LC_PS1_10811|20107_PS1)(|L))|USA3FMIXK|(4-6*SCL_X5F_29061(|L))|(4-6*SCL_X4D_99350(|L))
6576 # Freigt E3 long
6577 $DEF USA3FSCL=5-6*USA3FSCLS,SCL_057(40|06)(|L)|SCL_M5_0(787|788)(|L)
6578 # Freigt E4 short
6579 $DEF USA4FSCLS=USA4FMIXK|(4-6*SCL_PS47(40SO01|50SO01|50SO02)(|L))|(4-6*SCL_X4D_99350(|L))| \
6580 (4-6*SCL_LO_242510(|L))
6581 # Freigt E4 long
6582 $DEF USA4FSCL=(6*USA4FSCLS),SCL_05747(|L)|SCL_M5_0(1018|894|925)(|L)
6583
6584 # USA Saint Louis - San Francisco Railway Company (Frisco)
6585 # Freigt E3 short
6586 $DEF USA3FSLSS=(4-5*SLSF_462(|L))|(4-5*SLSF_85885_GB_USRA(|L))| \
6587 (4-5*SLSF_85887_GB_USRARBT(|L)[O:SOIL(12|9|15|19)(|[M])])| \
6588 (4-5*SLSF_(129171_XM|130157_XM|130254_XM|130474_XM|130109_XM_USRADS|128209_XM_USRADS|40005_PS1| \
6589 PS40|XM_18050)(|L))|(4-5*SLSF_84031_PS2003(|L))
6590 # Freigt E3 long
6591 $DEF USA3FSLS=(20*SLSF_9(0849|1921)_HM(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])| \
6592 (5-6*USA3FSLSS),SLSF_1280(|L)
6593 # Freigt E4 short
6594 $DEF USA4FSLSS=(4-6*SLSF_XPA_9125(|L))|(4-6*(SLSF_XP_44115(|L)|SLSF_7566_PS1(|L)))| \
6595 (4-6*SLSF_PS4750SO0(1|2)(|L))
6596 # Freigt E4 long
6597 $DEF USA4FSLS=6*USA4FSLSS,SLSF_1280(|L)
6598
6599 # USA St. Marys R.R. Co. RS3
6600 # Freigt E4 short
6601 $DEF USA4FSMS=USA4FMIXK|(4-6*SM_X(M_4200|L_2101|L_2147|M_4222)(|L))
6602 # Freigt E4 long
6603 $DEF USA4FSM=5-6*USA4FSMS,WEYT_3CAB
6604
6605 # USA Soo Line Railroad
6606 # Freigt E3 short
6607 $DEF USA3FSOOS=(4-5*SOO_66695_HM(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])| \
6608 (4-5*SOO_6877_PS2003(|L))|(4-5*SOO_(41850|42204|41800)_XM_ARA1932(|L))
6609 # Freigt E3 long
6610 $DEF USA3FSOO=6*USA3FSOOS,SOO_44(|L)|SOO_52(|L)|SOO_114(|L)|SOO_122(|L)
6611 # Freigt E6 shunting
6612 $DEF USA6FSOOS=(6-8*SOO_1(77514_PS1|5564_PS1)(|L))|(6-8*SOO_PS(4427|40)(|L))| \
6613 (6-8*SOO_LO(_74236|4750)(|L))
6614 # Freigt E6 long
6615 $DEF USA6FSOO=3*USA6FSOOS
6616
6617 # USA Southern Railway System
6618 # Passenger E3
6619 $DEF USA3PSOU=(<SOU_BAG,(3*SOU_52COACH_855),SOU_DINER_3307,3*SOU_52COACH_855)| \
6620 (<(3*SOU_52COACH_855L),SOU_DINER_3307L,3*SOU_52COACH_855L,SOU_BAG)| \
6621 (8*(SOU_1012LAKEPEARL(|L)|SOU_2496MCQUADE(|L)))
6622 # Freigt E3 shunting
6623 $DEF USA3FSOUS=(4-5*SOU_GB_6109(9|8)(|L)[O:SCRAP(5|6)(|[M])])|(4-6*SOU_1937AAR_XM_30000(|L))| \
6624 (4-5*(SOU_35658_PS1|SOU_263407_PS1|SOU_34884_PS1)(|L))|(4-5*SOU_(BS180_531879|XM_531876)(|L))| \
6625 (2*USA3FMIXK)|(4-5*(SOU_198672_GB_USRA(|L)[O:BALLAST(24|44)(|[M])]))|(4-5*SOU_RBL_798219(|L))| \
6626 (4-5*SOU_G(A_286500|A_286539|B_286600)(|L))|SOU_HT_73790, \
6627 (4-5*(SOU_HT_73790(|L)[T:(1|2|3|4|5|6|7|8|9|0)(1|2|3|4|5|6|7|8|9|0),77,14,SOU_HT_NUMBERS4] \
6628 [O:COAL(34|35|48|47)(|[M])]))|(4-5*(SOU_12(6154|6155|8101)_LP(|L)[OB:WOOD(23|22),,12]))| \
6629 (4-5*SOU_SU_156(525|500)(|L))|(4-5*SOU_XM_PS1_30(453|500)(|L))|(4-5*SOU_X(M_527704|L_527904)(|L))
6630 # Freigt E3 long
6631 $DEF USA3FSOU=(5-6*USA3FSOUS)|(25-28*SOU_3HOP(E|N)(|L)[O:BALLAST(24|44)(|[M])]), \
6632 (SOU_CAB|SOU_NE_X604(|L)|SOU_CAB1)
6633 # Freigt E4 short
6634 $DEF USA4FSOUS=USA4FMIXK|(4-6*(SOU_GON(|L)[O:SCRAP_1(3|5|4)(|[M])]))| \
6635 (4-6*(SOU_XP_43490|SOU_XPA_42955|SEAB_XPA_180228)(|L))|(4-6*SOU_XP_43490(|L))| \
6636 (4-6*SOU_XP(_43490|A_42955)(|L))|(4-6*SOU_PS4750SO01(|L))|(4-6*SOU_XPA_42954(|L))
6637 # Freigt E4 long
6638 $DEF USA4FSOU=5-6*USA4FSOUS,SOU_CAB
6639
6640 # USA Southern Pacific Railroad
6641 # passenger E3
6642 $DEF USA4PSP=(<5*SP_MDLP1,2*SP_MDLP3,4*SP_MDLP2)|(8*(SP_BL_PS|SP_BL_ACF))
6643 # Freigt E4 short
6644 $DEF USA4FSPS=(4-5*SP_G708_(160200|160140|320230)(|L)[O:SCRAP(5|6)(|[M])])| \
6645 (4-5*SP_LO_2600_1965(A|B)(|L))|(4-5*SP_BOX8)| \
6646 (4-5*(SP_PS40|SP_26685_XM_USRASS|SP_27310_XM_USRASS|SP_B5015_TK_XM|SP_B5015_TK2_XM| \
6647 SP_B5015_TAB_XM|SP_B5015_TAB2_XM|SP_B5015_TABR_XM|SP_B5015_TABR2_XM|SP_B5015_BK_XM| \
6648 SP_B5015_BK2_XM|SP_B5015_BAB_XM|SP_B5015_BAB2_XM|SP_B5015_BABR_XM|SP_B5015_BABR2_XM| \
6649 SP_B5015_ON_XM|SP_B5015_ON2_XM)(|L))|(4-5*SP_B5020_(83550|83646|83717|83735)(|L))|(4-5*SP_TANK50)| \
6650 (4-5*SP_H70(18_401472|18_401520|16_401211)_PS2003(|L))| \
6651 (4-5*SP_(XP_659500|B5047_651679|B5047_651400|B5047_651663)(|L))| \
6652 (4-5*SP_A5017_(190000|192000|208360|208366)(|L))
6653 # Freigt E4 long
6654 $DEF USA4FSP=5-6*USA4FSPS,SP_CAP_BAY2
6655 # Freigt E6 short
6656 $DEF USA6FSPS=(5-6*(SP_XP_A302_16768|SP_26685_XM_USRASS|SP_27310_XM_USRASS)(|L))| \
6657 (4-5*SP_B10046_654809(|L))|(4-5*SP_LO_490123(|L))
6658 # Freigt E6 long
6659 $DEF USA6FSP=(20*SP_AUTORACK(2|1))|(25-28*SP_ACF4650(|L))|(5-6*(USA6FMIXK|USA6FSPS))
6660
6661 # USA Spokane Portland & Seattle Railroad
6662 # Freigt E4
6663 $DEF USA4FSPSLS=USA4FMIXK|(4-6*SPS_10(011|106|237)_XM_USRADS(|L))|(4-6*SPS_40XM)
6664 # Freigt E4 long
6665 $DEF USA4FSPSL=6*USA4FSPSLS
6666
6667 # USA St. Louis Southwestern Railway (Cotton Belt)
6668 # Freigt E3 short
6669 $DEF USA3FSSWS=(4-5*SSW_XP_61144(|L))|(4-5*SSW_XM_33950(|L))|USA3FMIXK
6670 # Freigt E3 long
6671 $DEF USA3FSSW=5-6*USA3FSSWS,SSW_1(0|1)(|L)
6672 # Freigt E4 short
6673 $DEF USA4FSSWS=(4-5*SSW_(48266|47570|48266)_PS1(|L))|(4-5*SSW_(LO_77088|77131|77167)_PS2003(|L))| \
6674 (4-5*SSW_XM_33950(|L))|USA4FMIXK
6675 # Freigt E4 long
6676 $DEF USA4FSSW=5-6*USA4FSSWS,SSW_1(0|1)(|L)
6677 # Freigt E6 short
6678 $DEF USA6FSSWS=(4-5*SSW_7(8656|4179)_LO4650(|L))|(4-5*SSW_ACF4650(|L))|(4-5*SSW_NSC50HC2(|L))| \
6679 (4-5*SSW_XPA_65085(|L))|(4-5*(SSW_FM_85500(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11]))
6680 # Freigt E6 long
6681 $DEF USA6FSSW=6*USA6FSSWS
6682
6683 # USA Texas Pacific
6684 # Freigt E2 short
6685 $DEF USA2FTPS=(4-5*TP_17899_GB(|L)[O:SCRAP(5|6)(|[M])])|(4-6*TP_1937AAR_XM_40692(|L))|USA2FMIXK
6686 # Freigt E2 long
6687 $DEF USA2FTP=5-6*USA2FTPS,WEYT_3CAB
6688 # Freigt E4 short
6689 $DEF USA4FTPS=(4-5*TP_LO_706059(|L))|(4-5*TP_17899_GB(|L)[O:SCRAP(5|6)(|[M])])|USA4FMIXK
6690 # Freigt E4 long
6691 $DEF USA4FTP=5-6*USA4FTPS,WEYT_3CAB
6692
6693 # USA Trona Railway
6694 # Freigt E3 short
6695 $DEF USA3FTRCS=(4-6*TRC_XM_200(|L))|USA3FMIXK
6696 # Freigt E3 long
6697 $DEF USA3FTRC=6*USA3FTRCS,WEYT_3CAB
6698
6699 # USA Union Pacific Railroad
6700 # Freigt E2
6701 $DEF USA2FUP=2*UP_(B5019_1937|S4012_46863D)(|L), \
6702 ((8*BOX_(11|12|18|21|13|17|24|25|26|19|20|23|14|15|22|33))|(8*(UP_PS40(|BS)(|L)|UP_BOX(6|5|7)))), \
6703 3*USA2FMIXK,UP_CABBB|UP_CAB8B
6704 # passenger E3 left
6705 $DEF USA3PUPL=(<UP_RPO,UP_COACH,UP_CS_COACH,UP_DINER,UP_DOME1,UP_COACH,UP_DOODLEBUG)
6706 # passenger E3 right
6707 $DEF USA3PUPR=(<UP_DOODLEBUGL,UP_CS_COACH,UP_CHAIR,UP_DOMEDIN8000L,UP_CS_COACH,UP_DOME2,UP_BAG)
6708 # Freigt E3 short
6709 $DEF USA3FUPS=(4-5*UP_FLT_HZ~NEK)|(4-5*(((UP_GON~KDS|UP_GONL)[O:SAND(2|13|11|12)(|[M])])))| \
6710 (4-5*(UP_REF50|UP_BOX13))|(4-5*UP_CHOP)|(4-5*UP_162300_PS1(|L))|(4-5*UP_BOX(6|5|7|40BD))| \
6711 (4-5*UP_(PS40(|BS)|S4017_42600)(|L))|USA3FMIXK|(4-5*UP_(CH7014_11740|LO_1148)_PS2003(|L))| \
6712 (4-5*UP_XM_PS1_B5040(|L))|(4-6*UP_B5019_19(47|49|53|56|63)(|L))|(4-5*UP_(BOX11|EXP4|BOX10))| \
6713 (4-6*UP_XM_PS1_B5040_19(53|56|63)(|L))|(4-6*UP_(XP_517142|XP_517141|BI7016_451276)(|L))
6714 # Freigt E3 long
6715 $DEF USA3FUP=(20*((UP_2HOP1[O:COAL(27|5|3|34)(|[M])])|(UP_HOPBB|UP_3HOP(N|E)(|L)[O:COAL(27|5|3|34)(|[M])])))| \
6716 (5-6*USA3FUPS),UP_TCAB2|UP_CABOOSE|UP_CABBB|UP_CAB3|UP_CAB8B
6717 # Freigt E4 short
6718 $DEF USA4FUPS=(4-6*UP_G52)|(4-6*(UP_162300_PS1(|L)|UP_BOX12))|(4-6*UP_BETHGON2)| \
6719 (4-6*(BNSF_546054(|L)([O:PIPE19,,11]|[O:PIPE44,20,11][O:PIPE44,84,11])))| \
6720 (4-6*UP_B5052_126(030|000)(|L))|(4-6*UP_G904_(98299|98250)(|L))
6721 # Freigt E4 long
6722 $DEF USA4FUP=5-6*USA4FUPS,UP_CABBB|UP_CAB8B
6723 # Freigt E6 short
6724 $DEF USA6FUPS=(4-6*UP_89AR(|2))|(4-6*UP_AUTORACK(|1|2))|USA6FMIXK|(4-6*UP_PS4750SO0(2|3|4|1)(|L))| \
6725 (4-6*UP_BETHGON2(|L)[O:SAND(2|13|11|12)(|[M]),,39])|(4-6*UP_AUTOMAX)|(4-6*UP_LO_21328(|L))| \
6726 (4-6*UP_BOX60A|UP_GU60HC(|L))|(4-6*UP_CB60)|(4-6*(UP_ACF_SILO|UP_CHOP1))|(4-6*UP_NSC50HC2(|L))| \
6727 (4-6*UP_980212_XPA(|L))|(5*UP_THR73CB(|L)[O:(WRAPLUMBER(1|2|3)|WRAPTIE1),,9])| \
6728 (4-6*UP_89FLAT2[O:TANK3|TARP12|MACHINE(2|1|2)])|(5*(UP_G52[O:SCRAP_1(2|3|4|5)(|[M]),,29]))| \
6729 (4-6*UP_F7015_54600(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11])|(4-6*UP_PS4740SO0(2|1)(|L))| \
6730 (4-6*UP_LO_(21483|21498|78758)(|L))
6731 # Freigt E6 long
6732 $DEF USA6FUP=6*USA6FUPS
6733
6734 # Union R.R. Co. (Pittsburgh, PA)
6735 # Freigt E3 short
6736 $DEF USA3FURRS=(4-5*URR_527_FM(|L)[O:BETONPIPE2,10,11][O:BETONPIPE2,98,11])|USA3FMIXK
6737
6738 # USA Utah Railway Company
6739 # Freigt E4 short
6740 $DEF USA4FUTAS=5-6*(UTAH_HT_3100(|L)[O:COAL(32|22)(|[M]),,33])|USA2FMIXK
6741 # Freigt E4 long
6742 $DEF USA4FUTA=5*USA4FUTAS,WEYT_3CAB
6743
6744 # USA Virginian Railroad
6745 # Freigt E3 short
6746 $DEF USA3FVIRS=USA3FMIXK|(5-6*VGN_BX15_63100(|L))|(5-6*VIRG_AX1_62023(|L))|(4-6*VIRG_BX12_63041(|L))| \
6747 (4-6*VGN_3233_HM_USRA(|L))
6748 # Freigt E3 long
6749 $DEF USA3FVIR=6*USA3FVIRS,WEYT_3CAB
6750
6751 # USA The Western Railway of Alabama
6752 # Freigt E3 short
6753 $DEF USA3FWAS=USA3FMIXK|(4-6*WA_XM_18250(|L))
6754 # Freigt E3 long
6755 $DEF USA3FWA=5-6*USA3FWAS,WEYT_3CAB
6756
6757 # USA Wabash Railroad
6758 # Freigt E4 short
6759 $DEF USA4FWABS=(4-5*WABR_GB_1263(3|0)(|L)[O:SCRAP(5|6)(|[M])])|(4-6*WABR_GB_13191(|L))| \
6760 (4-5*(WABR_79834_XM_USRADS|WABR_PS40)(|L))|USA4FMIXK| \
6761 (4-5*(WABR_FM_437(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11]))| \
6762 (4-5*WABR_(74050|35500|35599)_HM_USRA(|L)[O:COAL(39|37|38|9)(|[M])])| \
6763 (4-5*((WABR_79834_XM_USRADS|WABR_PS40)(|L)))
6764 # Freigt E4 long
6765 $DEF USA4FWAB=5-6*USA4FWABS,WEYT_3CAB
6766
6767 # USA Wisconsin Central Limited GP30
6768 # Freigt E4 short
6769 $DEF USA4FWCS=USA4FMIXK|(4-5*WC_(GU50HC(|L)|BOX50HI|XP_29039(|L)))
6770 # Freigt E4 long
6771 $DEF USA4FWC=5-6*USA4FWCS,WEYT_3CAB
6772
6773 # USA Wheeling & Lake Erie Railway Company
6774 # Freigt E3 short
6775 $DEF USA3FWLES=(4-5*WLER_GB_52013(|L)[O:SCRAP(5|6)(|[M])])|USA3FMIXK
6776 # Freigt E3 long
6777 $DEF USA3FWLE=USA4FTANK|(6*USA3FWLES),WEYT_3CAB
6778
6779 # USA Western Maryland Railway
6780 # Freigt E2
6781 $DEF USA2FWMR=(5-10*WMR_26(541|309)_XM_USRASS(|L),4-6*WMR_34066_PS1(|L),3*USA3FMIXK)| \
6782 (20-25*WMR_5355_PS2003(|L)),WMR_NE_1800_1936(|L)
6783 # Freigt E3
6784 $DEF USA3FWMR=(5-10*WMR_26(541|309)_XM_USRASS(|L),4-6*WMR_34066_PS1(|L),3*USA3FMIXK)| \
6785 (20-25*WMR_5355_PS2003(|L)),WEYT_3CAB|WMR_NE_1811_1946(|L)|WMR_NE_1816_1953(|L)|WMR_NE_1821_1957(|L)
6786 # Freigt E4 short
6787 $DEF USA4FWMRS=(4-5*WMR_26(541|309)_XM_USRASS(|L))|(4-6*WMR_34066_PS1(|L))|USA3FMIXK| \
6788 (4-5*WMR_5355_PS2003(|L))|(4-5*WMR_PS50C_(34088|35069)(|L))| \
6789 (4-6*WMR_G31_58097(|L)[O:(SCRAP_1(5|2|3|4)(|[M]),SCRAP_1(5|2|3|4)(|[M]))])
6790 # Freigt E4 long
6791 $DEF USA4FWMR=5-6*USA4FWMRS,WMR_NE_18(51_1969|61_1973)(|L)
6792
6793 # USA Western Pacific Railroad
6794 # Freigt E4 short
6795 $DEF USA4FWPS=(4-5*WP_GB_6815(|L)[O:SCRAP(5|6)(|[M])])|(4-5*(WP_PS40|WP_36001_PS1|WP_3017_PS1))| \
6796 (5-7*(WP_66003_RBL|WP_66021_RBL|WP_66036_RBL)(|L))|USA4FMIXK| \
6797 (4-5*WP_2001_FM(|L)[O:MACHINE(1|2|3),,11])|(4-5*(WP_3801_PS1|WP_3983_PS1|WP_35001_PS1)(|L))| \
6798 (4-5*WP_(11301|LO_11203|LO_11201)_PS2003(|L))|(4-8*(WP_PS40|WP_XP_3102(|L)))
6799 # Freigt E4 long
6800 $DEF USA4FWP=5-7*USA4FWPS,WP_CAB(B2|4|5|7)
6801 # Freigt E6 short
6802 $DEF USA6FWPS=(4-8*WP_LO_11975(|L))|(4-8*WP_CHOP)|(4-8*WP_PS40)|(4-8*WP_XPA_8607(3|4)(|L))| \
6803 (4-8*WP_12006_LO4650(|L))|(1-2*USA6FMIXK)|(4-5*WP_XP_3770(|L))
6804 # Freigt E6 long
6805 $DEF USA6FWP=5*USA6FWPS
6806
6807 #------------------------------------------------------------------------------
6808 #
6809 # Canada
6810 #
6811
6812 # Canada Freigt E4 Mixed
6813 $DEF CAN4FMIX=6*USA4FMIXK|(5-7*CPR_HS4550(A|B|SO03|SO04)(|L))
6814
6815 # British Columbia Railway
6816 # Freigt E4 short
6817 $DEF CAN4FBCOS=(4-5*BCOL_T(2|3|1)C(|L))|USA4FMIXK
6818 # Freigt E4 long
6819 $DEF CAN4FBCO=5-6*CAN4FBCOS,WEYT_3CAB
6820
6821 # Canadian National Railway
6822 # Freigt E3 short
6823 $DEF CAN3FCNS=(4-5*CN_1937AAR_XM_(471000|471010|471020|471030|471040|472000|472010|472020|472030| \
6824 472040|472500|472520|472525|472530|472540|474000|474010|474020|474030|474040|474600|474610|474620| \
6825 474630|474640|476625|476626|476627|476628|476629|480715|480716|480717|480718|484165|484166|484167| \
6826 484168|485515|485516|485517|485518)(|L))|(4-5*CN_BX_1105(2|1)(|L))|USA3FMIXK| \
6827 (4-5*CN_FOWLER_404962(|L))
6828 # Freigt E3 long
6829 $DEF CAN3FCN=5-6*CAN3FCNS,CN_CAB_STEEL|CN_78102(|L)|CN_79707(|L)
6830 # Canadian National Railway
6831 # Freigt E4 short
6832 $DEF CAN4FCNS=4-5*(CN_BOX1|CN_BOX5|CN_BOX6|CN_BX_11053(|L))|USA4FMIXK
6833 # Freigt E4 long
6834 $DEF CAN4FCN=5-6*CAN4FCNS,CN_CAB_STEEL|CN_78102(|L)|CN_79707(|L)
6835 # Freigt E6 short
6836 $DEF CAN6FCNS=(8-12*(CN_HS4550SO01|CN_HS4550SO02|CN_HS4550SO03|CNLX_HS4550SO01)(|L))| \
6837 (8-12*CN_PS4750SO0(1|2)(|L))|(8-12*CN_4HOP1)|(8-12*CN_GU50HC(|L))|(8-12*CN_PS4740SO01(|L))
6838 # Freigt E6 long
6839 $DEF CAN6FCN=(25*CN_INTER([O:C40B,,13]|[O:C30A,21,13][O:C30A,111,13]))|(3*CAN6FCNS)
6840
6841 # Canada Canadian Pacific Railway
6842 # Freigt E3 short
6843 $DEF CAN3FCPRS=(4-6*CPR_1937AAR_XM_(222010|221000|222005|222000|248350|248360|249000|249010)(|L))| \
6844 (4-5*(CPR_PS(40|1_31201)(|L)|CPR_XP_21120(1|5)(|L)))| \
6845 (4-5*CPR_XM_PS1_26(8800|8830|9000|9100|9450|9300)(|L))| \
6846 (4-5*CPR_22(5621|5069|5068|5623)_XM_ARA1932(|L))|(4-5*CPR_FOWLER_123456(|L))| \
6847 (4-6*CPR_357124_HM(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])
6848 # Freigt E3 long
6849 $DEF CAN3FCPR=5-6*CAN3FCPRS,CPR_CAB(2|1)
6850 # Freigt E4 short
6851 $DEF CAN4FCPRS=(4-6*CPR_1937AAR_XM_(228200|252200)(|L))|(4-6*CPR_PS50C_89917(|L))| \
6852 (4-6*CPR_XM_PS1_26(9099|9630)(|L))|(4-6*CPR_XP_207125(|L))
6853 # Freigt E4 long
6854 $DEF CAN4FCPR=CAN4FCPRS,CPR_CAB(2|1)
6855 # Freigt E6 short
6856 $DEF CAN6FCPRS=(5-8*CPR_G52)|(5-8*CPR_5161TRI(|L))|(5-8*CPR_PS40(|L))|(5-8*CPR_HS4550B(|L))| \
6857 (5-8*CPAA_XPA_(205917|205945)(|L))|(5-8*CPR_XP_211(201|205)(|L))| \
6858 (5-7*(CPR_CBF(1|2)[O:WRAPLUMBER(1|2|3),,10]))|(5-8*CPR_GAS)
6859 # Freigt E6 long
6860 $DEF CAN6FCPR1=25*(CPR_CBF(1|2)[O:(WRAPLUMBER(1|2|3)|WRAPTIE1),,9])
6861 $DEF CAN6FCPR2=25*((CPR_524176[O:C40B,,13])|(CPR_524176[O:C30A,21,13][O:C30A,111,13]))
6862 $DEF CAN6FCPR3=23*CPR_GU60HC(|L)
6863 $DEF CAN6FCPR4=4*CAN6FCPRS
6864 $DEF CAN6FCPR=CAN6FCPR(1|2|3|4)
6865
6866 # Canada Ontario Northland Railway
6867 # Freigt E4 short
6868 $DEF CAN4FONTS=CAN4FCNS|(4-6*ONT_1937AAR_XM_90(820|645|644)(|L))
6869 # Freigt E4 long
6870 $DEF CAN4FONT=6*CAN4FONTS,WEYT_3CAB
6871 # Freigt E6
6872 $DEF CAN6FONT=(25*ONT_XP_A302_7839(|L))
6873
6874 # Canada Freigt E6 Tank
6875 $DEF CAN6FTANK=20*(CPWX_HS4550(|SO2)|CGLX_HS4550(|SO02|SO03|SO04)|CNWX_HS4550(A|B)|CPR_HS4550A)(|L)
6876
6877 #------------------------------------------------------------------------------
6878 #
6879 # Mexiko
6880 #
6881
6882 # Ferrocarril del Pacifico, S.A. de C.V.
6883 # Freigt E4 short
6884 $DEF MEX4FFCPS=(4-6*FCP_XM_PS1_(3600|3500|3400)(|L))|(4-6*FCP_XM_(16216|16014|17604)(|L))| \
6885 (4-6*(FCP_XM_4427|FUS_XM_1017|FUS_XM_1380|FCP_XM_17604)(|L))
6886 # Freigt E4 long
6887 $DEF MEX4FFCP=5-6*MEX4FFCPS,WEYT_3CAB
6888
6889 # Freigt E6 Ferrocarril Mexicano, S.D. de C.V.
6890 $DEF MEX6FFXE=(25*FXE_XP_A302_872004(|L))
6891
6892 # Ferrocarril Chihuahua al Pacifico
6893 # Freight E3 short
6894 $DEF MEX3FCGWS=(5-6*(CHP_X25_5704|CHP_XM_6041|CHP_XM_6217)(|L))|(4-6*CHP_XM_8007(|L))
6895 # Freight E3 long
6896 $DEF MEX3FCGW=(5-6*MEX3FCGWS),WEYT_3CAB
6897 # Freigt E4 short
6898 $DEF MEX4FCHPS=(4-6*CHP_XM_(8170|8007)(|L))|(4-6*FUS_XM_1380(|L))
6899 # Freight E4 long
6900 $DEF MEX4FCHP=5-6*MEX4FCHPS
6901
6902 # Freigt E6 Compania de Ferrocarriles Chiapas Mayab S.A. de C.V.
6903 $DEF MEX6FFNDM=5*FCCM_XP_180164(|L), \
6904 (20*((NDEM_XP_A302_100932|NDEM_XP_A302_104073|NDEM_XP_A302_104090)(|L)))
6905
6906 # Ferrocarriles Nacionales de Mexico
6907 # Freigt E3 short
6908 $DEF MEX3FFNDMS=(5-6*NDEM_XM_(60000|60009|67000)(|L))|(5-6*NDEM_XM_(63004|63005|68183)(|L))| \
6909 (5-6*FCM_XM_9416(|L))
6910 # Freigt E3 long
6911 $DEF MEX3FFNDM=5-6*MEX3FFNDMS,NDEM_44139(|L)
6912 # Ferrocarriles Nacionales de Mexico
6913 # Freigt E4 short
6914 $DEF MEX4FNDEMS=(4-5*NDEM_XP_A302_100932(|L))|(4-5*NDEM_XM_(66001|66896|78005|77810|76010|93484)(|L))
6915 # Freigt E4 long
6916 $DEF MEX4FNDEM=5-6*MEX4FNDEMS,NDEM_44139(|L)|FNDM_44071(|L)
6917 # Freigt E6
6918 $DEF MEX6FNDEM=(25*((NDEM_XP_A302_104073|NDEM_XP_A302_104090)(|L)))
6919
6920 #------------------------------------------------------------------------------
6921 #
6922 # Japan
6923 #
6924 $DEF KOKI_1=JR_KOKI100AL|JR_KOKI100A|JR_KOKI101AL|JR_KOKI101A|JR_KOKI102_5AL|JR_KOKI102_5A| \
6925 JR_KOKI103AL|JR_KOKI103A|JR_KOKI104AL|JR_KOKI104A|JR_KOKI104MAL|JR_KOKI104MA|JR_KOKI104L~OP| \
6926 JR_KOKI104~OP|JR_KOKI106BAL~YUM|JR_KOKI106BA~YUM|JR_KOKI106BAL~OP|JR_KOKI104L~FOM
6927 $DEF KOKI_2=JR_KOKI100BL|JR_KOKI100B|JR_KOKI101BL|JR_KOKI101B|JR_KOKI102_5BL|JR_KOKI102_5B| \
6928 JR_KOKI103BL|JR_KOKI103B|JR_KOKI104BL|JR_KOKI104B|JR_KOKI104MB|JR_KOKI106BBL~YUM|JR_KOKI106BB~YUM
6929 $DEF KOKI_5=JR_KOKI50000NL[BC:-30]
6930 $DEF KOKI_56=JRF_KOKI5500
6931 $DEF KOKI_5D=JR_KOKI50000NDL|JR_KOKI50000ND
6932
6933 $DEF KOKI11=KOKI_1 [OB:C37_25,*99,10]
6934 $DEF KOKI12=KOKI_1 [OB:C37_25,*61,10][OB:C37_25,*137,10]
6935 $DEF KOKI13=KOKI_1[OB:C37_25,*23,11][OB:C37_25,*99,10][OB:C37_25,*175,10]
6936 $DEF KOKI14=KOKI_1[OB:C37_25,*23,11][OB:C37_25,*61,10][OB:C37_25,*137,10][OB:C37_25,*175,10]
6937 $DEF KOKI15=KOKI_1[OB:C37_25,*23,11][OB:C37_25,*61,10][OB:C37_25,*99,10][OB:C37_25,*137,10] \
6938 [OB:C37_25,*175,10]
6939 $DEF KOKI16=KOKI_1[OB:C37_25,*23,11][OB:C61_25J,*99,10][OB:C37_25,*175,10]
6940
6941 $DEF KOKI21=KOKI_2 [OB:C61_25J,*98,10]
6942 $DEF KOKI22=KOKI_2[OB:C61_25J,*34,10][OB:C61_25J,*162,10]
6943 $DEF KOKI23=KOKI_2[OB:C61_25J,*34,10][OB:C61_25J,*98,10][OB:C61_25J,*162,10]
6944 $DEF KOKI24=KOKI_2[OB:(C94,1,C94),*98,10]
6945 $DEF KOKI25=KOKI_2[OB:C40B,*98,10]
6946 $DEF KOKI26=KOKI_2[OB:C37_25,*34,10][OB:C61_25J,*162,10]
6947
6948 $DEF KOKI55=KOKI_5[OB:C37_25,<9,10][OB:C37_25,*65,10][OB:C37_25,*103,10][OB:C37_25,*141,10] \
6949 [OB:C37_25,>198,10]
6950 $DEF KOKI54=KOKI_5[OB:C37_25,<9,10][OB:C37_25,*65,10][OB:C37_25,*141,10][OB:C37_25,>198,10]
6951 $DEF KOKI53=KOKI_5[OB:C37_25,<9,10][OB:C37_25,*103,10][OB:C37_25,>198,10]
6952 $DEF KOKI52=KOKI_5 [OB:C37_25,*65,10][OB:C37_25,*141,10]
6953 $DEF KOKI51=KOKI_5 [OB:C37_25,*103,10]
6954
6955 $DEF KOKI521=KOKI_5[OB:(C61_25J,1,C61_25J,1,C61_25J),*103,10]
6956 $DEF KOKI522=KOKI_5[OB:(C61_25J,13,C37_25,13,C61_25J),*103,10]
6957 $DEF KOKI523=KOKI_5[OB:C37_25,<9,10][OB:C61_25J,*103,10][OB:C37_25,>198,10]
6958 $DEF KOKI524=KOKI_5[OB:C61_25J,*103,10]
6959
6960 $DEF KOKIA=KOKI(10:55|3:54|3:53|52|51)
6961 $DEF KOKIB=KOKI(55|54|2:521|522|523|524)
6962 $DEF KOKIE=KOKI(55|54|53|52|51)
6963
6964 $DEF KOKIC=10:KOKI15|3:KOKI14|3:KOKI13|1:KOKI12|1:KOKI11
6965 $DEF KOKIF=10:KOKI23|3:KOKI22|2:KOKI21
6966 $DEF KOKIG=KOKIC|KOKIF
6967
6968 $DEF KOKIH=KOKI_56[OB:C33_24,*25,11][OB:C33_24,*59,11][OB:C33_24,*93,11][OB:C33_24,*127,11] \
6969 [OB:C33_24,*161,11]
6970 $DEF KOKII=KOKI(7:24|21|22|23|25|26)
6971
6972 $DEF KOKI5D5=KOKI_5D[OB:C37_25D,<9,10][OB:C37_25D,*65,10][OB:C37_25D,*103,10][OB:C37_25D,*141,10] \
6973 [OB:C37_25D,>198,10]
6974 $DEF KOKI5D4=KOKI_5D[OB:C37_25D,<9,10][OB:C37_25D,*65,10][OB:C37_25D,*141,10][OB:C37_25D,>198,10]
6975 $DEF KOKI5D3=KOKI_5D[OB:C37_25D,<9,10][OB:C37_25D,*103,10][OB:C37_25D,>198,10]
6976 $DEF KOKI5D2=KOKI_5D [OB:C37_25D,*65,10][OB:C37_25D,*141,10]
6977 $DEF KOKI5D1=KOKI_5D [OB:C37_25D,*103,10]
6978
6979 $DEF KOKID=10:KOKI5D5|3:KOKI5D4|3:KOKI5D3|1:KOKI5D2|1:KOKI5D1
6980 #
6981 # Train
6982 #
6983 # Freight E2
6984 $DEF J2FS1=(3-5*(J_FC0003_3,J_FC0008_1,JR_WAMU23000,JR_GO1,JR_TOMU50000))| \
6985 (3-5*(JR_G(1|3|4)|JR_TOM(1L|4)),3-6*(JR_GT2|JR_TM42))| \
6986 (3-5*(JR_TOM7[O:BOX6,,11]|JR_TOM8[OB:WOOD18(3|4)(|[M]),,11]))| \
6987 (3-5*(JR_TOM10|JR_G8|JR_G9|JR_G6|JR_G7|J_FC0003_2|JR_TORA60000A))
6988
6989 $DEF J2FL1=J_FC0009_(1|3)(|A)|J_FC0004_(1|2)|JR_YO8000HL|J_FC0011_(1|2)(|A),5*J2FS1
6990 # Passenger long distance E2
6991 $DEF J2PL1=JNR_KANI29L_0|JNR_KANI29_0, \
6992 (<JNR_SUYUNI30AL|JNR_SUYUNI30A,JNR_OHA31L|JNR_OHA31,JNR_OHA27BL|JNR_OHA27B, \
6993 JNR_OROHA30L|JNR_OROHA30|JNR_ORO30L|JNR_ORO30|JNR_ORO31L|JNR_ORO31,JNR_OHA26|JNR_OHA26L, \
6994 JNR_OHA27AL|JNR_OHA27A)
6995 # Passenger regional E2
6996 $DEF J2PR1=(<JNR_OHAYUNI71L,JNR_OHA70BL,JNR_OHA71BL,JNR_OHA70AL,JNR_OHA71AL,JNR_OHAYUNI71L)| \
6997 (<JNR_OHAYUNI71,JNR_OHA70B,JNR_OHA71B,JNR_OHA70A,JNR_OHA71A)
6998
6999 # Freight E6 Container
7000 $DEF J6FLC1=15*KOKID
7001
7002 # Freight E6 short
7003 $DEF J6FS1=(2-3*(JR_TAKI88(50J|53AD|53AK|58|55|60|61)|JR_TAKI9250D(1|2|K)(|L)|JR_TAKI9250D(1|2|K)(|L)))| \
7004 (2-3*(JR_TAKI3700D0L|JR_TAKI3700D0|JR_TAKI3700D1L|JR_TAKI3700D1|JR_TAKI3700D2L|JR_TAKI3700D2| \
7005 JR_TOKI29400S|JR_TOKI25000NEW|JR_TOKI29400|JR_TOKI25000NS|JR_TOKI29400K))|(2-3*(JR_G5|JR_G16))| \
7006 (2-3*(JR_HOKI9800B|JR_HOKI98|SEIBU_HOKI))| \
7007 (2-3*(JR_WAKI10000TEST1|JR_WAKI10000TEST2|JR_WAKI10000A2|JR_WAKI10000A3|JR_WAKI10000A| \
7008 JR_WAKI10000B2|JR_WAKI10000B3|JR_WAKI10000B|JR_WAKI10000|JR_WAKI10000CARTRAIN|JR_WAKI50000A2| \
7009 JR_WAKI50000A3|JR_WAKI50000B2|JR_WAKI50000B3|JNR_WAKI8000L|JNR_WAKI8000|JR_WAKI8000))| \
7010 (2-3*(JR_N8000AL,JR_N8000A,JR_N8000BL,JR_N8000B))|(JRF_KOKI71)| \
7011 (2-3*(JR_TAKI1000G|JR_TAKI1000G2|JR_TAKI1000O3L|JR_TAKI1000O3|JR_TAKI1000B1|JR_TAKI1000B2| \
7012 JR_TAKI1000B3))| \
7013 (2-3*(JR_TAKI1900CL|JR_TAKI1900C|JR_TAKI1900CTL|JR_TAKI1900CT|JR_TAKI1900DL|JR_TAKI1900D| \
7014 JR_TAKI1900H1L|JR_TAKI1900H1|JR_TAKI1900H2L|JR_TAKI1900H2|JR_TAKI1900ML|JR_TAKI1900M| \
7015 JR_TAKI1900MS1L|JR_TAKI1900MS1|JR_TAKI1900MS2L|JR_TAKI1900MS2|JR_TAKI1900MTL|JR_TAKI1900MT| \
7016 JR_TAKI1900NL|JR_TAKI1900N|JR_TAKI1900O1L|JR_TAKI1900O1|JR_TAKI1900O2L|JR_TAKI1900O2| \
7017 JR_TAKI1900O3L|JR_TAKI1900O3|JR_TAKI1900STL|JR_TAKI1900ST|JR_TAKI1900A|JR_TAKI1900SUMITOMO))| \
7018 (2-3*((JR_TAKI20600J|JR_TAKI21350H)(|L)|(JR_TAKI205(18NY|13NY2|13NY1|00J|00N|00MT2|00MT1)(|L))| \
7019 JR_TAKI9200(SH|J|KD)))
7020
7021 # Freight E6 Car
7022 $DEF J6FLA1=14*(JR_K5000B|JR_KU5000D|JR_KU5000E)
7023
7024 # Freight E6 open
7025 $DEF J6FLO1=15*((JR_HOKI9500YAHASHI2|JR_HOKI9500YAHASHI1)[OB:(SAND16|FR_SAND1|SAND15)(|[M]),,23]| \
7026 J_LIME|J_HOKI95(A|B|C|D|E|F|G|H|I|J|K|L))
7027
7028 # Freight E6 long mixwd
7029 $DEF J6FLM1=7*J6FS1
7030
7031 # Freight E6 long all
7032 $DEF J6FLA=J6FLM1|J6FLC1|J6FLA1|J6FLO1
7033
7034 #------------------------------------------------------------------------------
7035 #
7036 # Australia
7037 #
7038 # Freight 1435 mm EP 4 Victorian Railway
7039 $DEF AUS4FV=3-4*VIC_ELX,4-6*(VIC_GY3|VIC_GY4|VIC_GY2|VIC_GY6|VIC_I), \
7040 4-6*(VIC_IT205L|VIC_IT205|VIC_IT205WL|VIC_IT205W|VIC_IC12137), \
7041 4-6*(VIC_T154|VIC_B|VIC_B102|VIC_B328|VIC_T252|VIC_T457),3-4*VIC_BLF130(|L)
7042
7043 # Freight 1435 mm EP 4
7044 $DEF AUS4F1=6-8*(VIC_GY3|VIC_GY4|VIC_GY2|VIC_GY6|VIC_I), \
7045 6-8*(VIC_IT205L|VIC_IT205|VIC_IT205WL|VIC_IT205W|VIC_IC12137), \
7046 6-8*(VIC_T154|VIC_B|VIC_B102|VIC_B328|VIC_T252|VIC_T457)
7047
7048 # Freight 1435 mm EP 6 Freight Australia
7049 $DEF AUS6FFA=(12-15*(FA_VPBX(|L)))
7050
7051 # Freight 1435 mm EP 6 Australian National Railway
7052 $DEF AUS6FNR=(12-15*(ANR_RBFX|ANR_RBFX1|ANR_VFX|ANR_ABFX))|(16-18*(ANR_83(22|45|15)(|L)))
7053
7054 # Passenger 1435 mm EP 6 Australian National Railway
7055 $DEF AUS6PNR=(ANR_IPBL,4*ANR_IPCL,ANR_IPDL,ANR_IPSL,3*ANR_IPCL)| \
7056 (ANR_IPB,3*ANR_IPC,ANR_IPD,ANR_IPS,4*ANR_IPC)
7057
7058 # Freight 1435 mm EP 6 Freight Australia Pacific National
7059 $DEF AUS6FPN=(16-18*PN_VH(G|Q)F(|L))|(16-18*PN_VPBX(|L))
7060
7061 # Freight 1435 mm EP 6 V-Line
7062 $DEF AUS6FVL=(16-18*(VL_DT331|VL_VLCX))|(16-18*VL_VPBX(|L))
7063
7064 # Freight 1435 mm EP 6 Victorian Railway
7065 $DEF AUS6FVI=(16-18*(VIC_VPCX|VIC_VPFXL|VIC_VPFX|VIC_VPFXBUL|VIC_VPFXBU))| \
7066 (16-18*(VIC_VHGY1|VIC_VHGFL|VIC_VHGF|VIC_VHGF2L|VIC_VHGF2|VIC_VHGY2))| \
7067 (16-18*(VIC_JAFL|VIC_JAF|VIC_VHBYL|VIC_VHBY|VIC_JDFL|VIC_JDF))|
7068
7069 # Freight 1435 mm EP 6 Container Victorian Railway
7070 $DEF AUS6FCVI=16-18*(VIC_VQDW[O:C40A,11][O:C40A,131,10]|FA_V(QL|QF|EC)X[O:C40A]| \
7071 FA_V(QL|QF|EC)X[O:C30A,10,10][O:C30A,100,10])
7072
7073 # Freight 1435 mm EP 6 Container Freight Australia
7074 $DEF AUS6FCF=16-18*(FA_VEDW[O:C40A,11][O:C40A,131,10]|(FA_V(QL|QF|EC)X[O:C30A,10,10][O:C30A,100,10])| \
7075 ((FA_V(QL|QF|EC)X)[O:C40A])| \
7076 FA_VEKX(([O:C40A,18,9][O:C20A,139,9])|([O:C40A,18,9])|([O:C20A,18,9][O:C40A,79,9]))| \
7077 FA_VEKX(([O:C2_FREIGHTAUSTR(2|1|3|4|5|6),17,9][O:C2_FREIGHTAUSTR(2|1|3|4|5|6),79,9] \
7078 [O:C2_FREIGHTAUSTR(2|1|3|4|5|6),141,9])))
7079
7080 # Freight 1435 mm EP 6 Container New South Wales
7081 # shunting
7082 $DEF AUS6FCNSS=4-5*NSW_NQOX([O:C40A,10][O:C20A,131,13]|[O:C40B,70]|[O:C30A,10][O:C30A,101,13]| \
7083 [O:C20A,10][O:C20A,61,13])
7084 # long
7085 $DEF AUS6FCNS=16-18*NSW_NQOX([O:C40A,10][O:C20A,131,13]|[O:C40B,70]|[O:C30A,10][O:C30A,101,13]| \
7086 [O:C20A,10][O:C20A,61,13])
7087
7088 # Freight 1435 mm EP 6 Container Australia Pacific National
7089 $DEF AUS6FPNC=16-18*((FA_VEDW[O:C40A,11][O:C40A,131,10])|(PN_RQHY(|L)[O:C40A])| \
7090 (PN_RQHY(|L)[O:C30A,10,10][O:C30A,100,10]))
7091
7092 # Freight 1435 mm EP 6 Container Chicago Freight Car Leasing Australia
7093 $DEF AUS6FCP=16-18*((CFCLA_CQBY(1|2)(|L)[O:C40A])|(FCL_PRRY(|L)[O:C20A,23,11][O:C20A,83,11])| \
7094 (FCL_PRRY(|L)[O:C40A,,11])|(CFCLA_CQBY(1|2)(|L)[O:C30A,10,10][O:C30A,100,10]))
7095
7096 # Freight 1435 mm EP 6
7097 $DEF AUS6FS=(4*VL_VHCX(|L))|(2*AWB_NGXH,2*VIC_ELX)|(3*FA_VHBF)|(5*ANR_(VFX|RBFX1|RBFX))| \
7098 (4-5*FA_VHGF(|2)(|L))|(4-5*FA_VHJX(|L))|(4-5*PN_VHQF(|L))| \
7099 (4-5*(VIC_VHCA16L|VIC_VHCA16|VIC_VHJA|VIC_VHC131|VIC_VHC131L))|(4-5*NSW_NGMF(1|2|3|4|5|6))| \
7100 (4-5*(NSW_NODY1T|NSW_NODY(1|2)))|(6-8*NSW_NHGF)|(5-7*NSW_NGTY(|L))|(5-7*NSW_NODY(3T|2T|2T1))| \
7101 (4-5*NSW_NKHY(1|2|1S|2S))
7102 $DEF AUS6F1=4-5*AUS6FS
7103
7104 # Freight 1000
7105 # Freight 1000 mm EP 6 Queensland Rail short
7106 $DEF AUS6FQRS=(4-6*(QR_QLXSO(01|02|03|04|05|06|07|08|09|10)(|L)))|(4-6*(QR_KOJXSO0(1|2|3|4|5|6)(|L)))| \
7107 (4-6*(QR_QCSSO0(1|2|3|4)(|L)))|(4-6*(QR_KLEXSO0(1|2|3|4|5|6)(|L)))|(4-6*(QR_PJZY1(|L)))| \
7108 (4-6*(QR_GN(01|02|SO03|SO04)(|L)[O:SAND(6|9|10|12|7|11)(|[M])]))| \
7109 (4-6*(QR_VOSO0(1|2|3|4)(|L)[O:SAND(6|9|10|12|7|11)(|[M])]))| \
7110 (4-6*(QR_VAJQSO0(1|2|3|4|5|6)(|L)[O:SAND(6|9|10|12|7|11)(|[M])]))| \
7111 (4-6*(QR_VSASO0(1|2|3|4)(|L)[O:SAND(17|18|19|21|22|20)(|[M]),,31]))|(4-6*(QR_VMOSO0(1|2|3|4)(|L)))
7112 # Freight 1000 mm EP 6 Queensland Rail long
7113 $DEF AUS6FNQ1=5:(5*AUS6FQRS)|1:(15-20*QR_BEZY1(|L)[O:C60B,,10])
7114
7115 #---------------------------------------------------------------------------
7116 #
7117 # New Zeeland
7118 #
7119
7120 $DEF NZEF6FS=(4-6*(QR_QLXSO(06|10)(|L)))|(4-6*(QR_GN02(|L)[O:SAND(|[M])(6|9|10|12|7|11)]))| \
7121 (4-6*(QR_VOSO0(3|4)(|L)[O:SAND(|[M])(6|9|10|12|7|11)]))
7122 $DEF NZEF6F=(5*NZEF6FS)
7123
7124 #------------------------------------------------------------------------------
7125 #
7126 # Marokko
7127 #
7128 # Passenger EP 5
7129 $DEF MAR5P1=2*ONCF_YRZ,2*ONCF_YZ
7130
7131 # Freight EP 5
7132 $DEF MAR5F1=(15*(ONCF_TDD|ONCF_TDGW93|ONCF_TAEMS))
7133
7134 #------------------------------------------------------------------------------
7135 #
7136 # SOUTH AFRICA
7137 #
7138 # Freight long EP 5
7139 $DEF SAR5FL1=(20*SAR_HOP(1|2|3|4))|(10*SAR_FLAT1,10*SAR_TANK1)
7140
7141 #------------------------------------------------------------------------------
7142 #
7143 # Israel
7144 #
7145 # Freight EP 5
7146 $DEF ISR5F1=10*(IR_SG|IR_SGGNSS|IR_GS|IR_GBS|IR_TDS|IR_TAOOS|IR_UACS|IR_UAPPS|IR_RS)
7147
7148 #------------------------------------------------------------------------------
7149 #
7150 # Asia
7151 #
7152 # Freight Asia EP 5
7153 $DEF ASI5F1=3*((6*(JR_TOKI15000|JR_TOKI15000A))|(7*JR_SEKI3000)|(6*JR_HOKI2200B)|(5*JR_N8000A)| \
7154 (7*(JR_TAKI3734CS|JR_TAKI3743D1|JR_TAKI7750SD2N|JR_TAKI1900K))|(5*JR_TEC931S(|L))| \
7155 (6*(J_HOKI95A|J_HOKI95C|J_HOKI95B|J_HOKI95D|J_HOKI95E|J_HOKI95F|J_HOKI95H|J_HOKI95I|J_HOKI95J| \
7156 J_HOKI95K|J_HOKI95L)))
7157
7158 #------------------------------------------------------------------------------
7159 #
7160 # India
7161 #
7162 $DEF INDP1=(INR_LR2,2*INR_CS1,INR_C31,INR_C32,INR_CS1)|(2*INR_CC1,INR_CC2,3*INR_CC1)
7163
7164 # Freight EP 6
7165 $DEF INDF1=<(4-5*INR_BXN(1|2|3)),INR_BCAL[O:C40C,*80,10],(2*INR_BCB[O:C40C,*64,11]), \
7166 INR_BCA[O:C40C,*65,10],4-5*INR_BTP(1|2),4-5*INR_BCN(1|2|3)
7167
7168 $DEF INDF2S=(2-4*INR_UTC_BCCWC_RCU44(6|5)(|L))|(2-4*INR_BVZI(|L))| \
7169 (2-4*INR_BLC(B|A)M(|L)[O:C40C,*64,10])|(2-4*INR_BCMCBAA(M|E)(|L))|(2-4*INR_(S|E)R_BCN(|L))| \
7170 (2-4*INR_BCNA(|HS)(|L))|(2-4*INR_BCC(W_V|W_V200|_BCCN)(|L))|(2-4*INR_ACC_BCCM_BC(09137|95081)(|L))
7171
7172 $DEF INDF2L=8*INDF2S
7173
7174 #------------------------------------------------------------------------------
7175 #
7176 # China
7177 #
7178 # Freight EP 4
7179 $DEF CHN4FS=(2-3*CR_25BY)|(2-3*CR_B4)|(2-3*CR_22K2)|(2-3*CR_22)|(2-3*CR_B3)| \
7180 (2-3*CR_C63T|CR_C63|CR_C62C|CR_C60)|(2-3*CR_COKE)|(2-3*CR_COAL)|(2-3*CR_BOX(1|2))| \
7181 (2-3*CR_T17|CR_T17E|CR_T17Y)|(2-3*CR_HOP)|(2-3*CR_FLAT|CR_FLATWE|CR_FLATS|CR_FLATW)|(2-3*CR_25B)
7182
7183 $DEF CHN4FS1=2*CHN4FS
7184 $DEF CHN4FL1=CR_CAB,7*CHN4FS
7185
7186 # Passenger EP 4
7187 $DEF CHN4P1=(<CR_XL22,2*CR_YZ22,CR_YW22,CR_CA23,CR_RW22,CR_RZ22,2*CR_YZ22)
7188
7189 #------------------------------------------------------------------------------
7190 #
7191 # Malaysia
7192 #
7193 # Freight Nalaysia EP5
7194 $DEF MAL5FS1=(3*KTM_BLW)|(3*KTM_BCF[O:C40C,*79,9])
7195
7196 #------------------------------------------------------------------------------
7197 #
7198 # Myanmar / Burma
7199 #
7200 # Passenger Myanmar EP5
7201 $DEF MYA5P1=6*(MYA_P(1|2|2O|3|4|5|5A|6|8|7))
7202
7203 # Freight Myanmar EP5
7204 $DEF MYA5F1=4*MYA_G1,6*MYA_T1,5*MYA_G2
7205
7206 #------------------------------------------------------------------------------
7207 #
7208 # South America
7209 #
7210 # Freight South America 1672 mm EP 3
7211 $DEF SAM3F1=(10*(SEFEPA_BOX1|PRR_F22(|L)|WEYT_3FLAT[O:WOOD1(96|95|91|97|98|92|94|93)]|SHAY_GON(4|3|1|2)))| \
7212 (10*(LC_410_PS2003(|L)))
7213
7214 # Freight South America 1672 mm EP 4
7215 $DEF SAM4F1=(10*SEFEPA_BOX1)|(10*PRR_GR_ASBUILT_LW(|L))|(10*PRR_X29_1932KEROSENE(|L))| \
7216 (10*CDLX_763_TMI_ACF27(|L))
7217
7218 # Freight South America 1672 mm EP 6
7219 $DEF SAM6F1=(12*(GATX_TANK55|CCBX_TANK55L|OWIX_TANK54L|CPCX_TANK54L|ACFX_TANK50|HOKX_TANK43L))| \
7220 (15*(CNA_XP_A302_549304L|HS_GU50HC|HS_GU50HCL|MMA_GU50HC, \
7221 HS_GU50HC|LRS_XP_A302_4081|HS_GU50HCL|HS_GU50HCL|MMA_GU50HC|HS_GU50HC))| \
7222 (12*SHAY_GON(1|2|3|4|5|6))|(15*(MRDX_AFLOOD2(|L)))| \
7223 (13*(BNSF_5161TRI|IC_TRI5161|BNSF_LO4750|WP_CHOP|ATSF_COVHOP)|(15*(US_3HOP(E|N)(|L))))
7224
7225 #-------------------------------------------------------------------------------------------------------
7226 #
7227 # Brasilia
7228 #
7229 # Freight 1000 mm EP 6
7230 $DEF BRA6F=5*(2-4*(EFVM_TCD|EFVM_HFE|FCA_HFE1|FCA_HFE2|FCA_TCD))
7231
7232 # Freight 1000 mm EP 6 ALL Brasilia
7233 $DEF BRA6NA=8*((2-3*(ALL_HFE(1|2|3)))|(2-3*(ALL_GF(C|D)))|(2-3*(ALL_FFD_(2|1|3)))|(2-3*(ALL_HAD))| \
7234 (2-3*(ALL_HFD(2|1)))|(2-3*(ALL_TSC))|(2-3*(ALL_FBD)))
7235
7236 # Freight 1000 mm EP 6 FEP Brasilia
7237 $DEF BRA6NP=4*FEP_GFC,5*FEP_HFD,3*FEP_GFC
7238
7239 # Freight 1000 mm EP 6 RFFSA Brasilia
7240 $DEF BRA6NR=2*RFFSA_HAF,3*RFFSA_HFD1,RFFSA_GFD,4*RFFSA_HAD2,2*RFFSA_HAD1,2*RFFSA_HFD2,3*RFFSA_GFC, \
7241 RFFSA_PED3,RFFSA_PED1,RFFSA_PED2
7242
7243 # Freight 1600 mm EP 6 FCA Brasilia
7244 $DEF BRA6NO=EFVM_TCD,FCA_TCD,FCA_TCD2,FCA_HFD2,EFVM_TCD,2*FCA_HFD1,ALL_HFE1,4*EFVM_HFD(1|2),5*FCA_HAD
7245
7246 #-------------------------------------------------------------------------------------------------------
7247 #
7248 # Chile
7249 #
7250 # Passenger Chile EFE 1672 mm EP 6
7251 $DEF CHI6P1=(<EFE_C2L,EFE_C3L,EFE_C4L,EFE_C5,EFE_C6,EFE_D1,EFE_D2,EFE_C1,EFE_TA(1|2),EFE_B(1|2))| \
7252 (<EFE_B(1|2),EFE_TA(1|2),EFE_C1,EFE_D2,EFE_D1,EFE_C6,EFE_C5,EFE_C4,EFE_C3,EFE_C2)
7253
7254 # ) ] }
