TTFIL pooldef.ttt
1 $REQUIRE GETOPT.TTT
2 $REQUIRE REPLACE.TTT
3 $REQUIRE BG_DEF.TTT
4 $REQUIRE JMD_DEF.TTT
5 {MLGS??
6 $REQUIRE REPLACE_MLG.TTT
7 }
8 #==============================================================================
9 %*DEF(POOLFLAGS=F=SDEGLMFPUOXWZNBRCATR1234567;)
10 # 1 - 7 Epoche
11
12 # A Winter (f. e. Snowplow)
13 # B Night
14 # C Stadtverkehr/city traffic
15 # D Diesel
16 # E Elektrisch
17 # F Freight
18 # G Gleichstrom / andere Oberleitung
19 # L Niedrigere Oberleitung
20 # M Stromschiene
21 # N Narrow gauge/secondary line
22 # O Operation - not M=SIMPLE
23 # P Personenzug
24 # R Regional passenger train (stops at small stations)
25 # S Steam
26 # T Open door (stops behind the plattform)
27 # U Wendezug
28 # W Bahndienst (Work)
29 # X andere Oberleitung ( Landabhängig )
30 # Z Opaque
31 #------------------------------------------------------------------------------
32 {H? $POOL N=POOL_HUN; %POOLFLAGS; AP2=M_ENV; }
33 {D&(E1|E2)? $POOL N=POOL_GHIST; %POOLFLAGS; AP2=DE_ENV; }
34 {(D|BRD)&(E3|E4)? $POOL N=POOL_BRD; %POOLFLAGS; AP2=DE_ENV; }
35 {D&(E5|E6)? $POOL N=POOL_GER; %POOLFLAGS; AP2=DE_ENV; }
36 {(D|DDR)&(E3|E4)? $POOL N=POOL_DDR; %POOLFLAGS; AP2=DR_ENV; }
37 {CH? $POOL N=POOL_CH; %POOLFLAGS; AP2=CH_ENV; }
38 {A? $POOL N=POOL_A; %POOLFLAGS; AP2=A_ENV; }
39 {GB? $POOL N=POOL_GB; %POOLFLAGS; AP2=GB_ENV; }
40 {IE? $POOL N=POOL_IR; %POOLFLAGS; AP2=IR_ENV; }
41 {F? $POOL N=POOL_F; %POOLFLAGS; AP2=F_ENV; }
42 {B? $POOL N=POOL_B; %POOLFLAGS; AP2=B_ENV; }
43 {L? $POOL N=POOL_L; %POOLFLAGS; AP2=L_ENV; }
44 {NL? $POOL N=POOL_NL; %POOLFLAGS; AP2=NL_ENV; }
45 {DK? $POOL N=POOL_DK; %POOLFLAGS; AP2=DK_ENV; }
46 {N? $POOL N=POOL_N; %POOLFLAGS; AP2=N_ENV; }
47 {S? $POOL N=POOL_S; %POOLFLAGS; AP2=S_ENV; }
48 {SF? $POOL N=POOL_SF; %POOLFLAGS; AP2=FI_ENV; }
49 {P? $POOL N=POOL_P; %POOLFLAGS; AP2=P_ENV; }
50 {E? $POOL N=POOL_E; %POOLFLAGS; AP2=E_ENV; }
51 {I? $POOL N=POOL_I; %POOLFLAGS; AP2=I_ENV; }
52 {CSD|CS? $POOL N=POOL_CS; %POOLFLAGS; AP2=CS_ENV; }
53 {SK? $POOL N=POOL_SK; %POOLFLAGS; AP2=SK_ENV; }
54 {PL? $POOL N=POOL_PL; %POOLFLAGS; AP2=PL_ENV; }
55 {RO? $POOL N=POOL_RO; %POOLFLAGS; AP2=RO_ENV; }
56 {SLO? $POOL N=POOL_SLO; %POOLFLAGS; AP2=SLO_ENV;}
57 {HR? $POOL N=POOL_HR; %POOLFLAGS; AP2=HR_ENV; }
58 {YU? $POOL N=POOL_YU; %POOLFLAGS; AP2=YU_ENV; }
59 {HSH? $POOL N=POOL_HSH; %POOLFLAGS; AP2=YU_ENV; }
60 {BG? $POOL N=POOL_BG; %POOLFLAGS; AP2=BG_ENV; }
61 {GR? $POOL N=POOL_GR; %POOLFLAGS; AP2=GR_ENV; }
62 {TR? $POOL N=POOL_TR; %POOLFLAGS; AP2=TR_ENV; }
63 {SU|RZD|UZ|BCH|EVR|LDZ|LG|GEO|AZ|KAZ|MD|UZB|ARM?
64 $POOL N=POOL_SU; %POOLFLAGS; AP2=SU_ENV; }
65 {USA|MEX|CAN? $POOL N=POOL_USA; %POOLFLAGS; AP2=US_ENV; }
66 {J? $POOL N=POOL_JP; %POOLFLAGS; AP2=J_ENV; }
67 {CN? $POOL N=POOL_CN; %POOLFLAGS; AP2=CN_ENV; }
68 {IND? $POOL N=POOL_IND; %POOLFLAGS; AP2=IND_ENV; }
69 {SA? $POOL N=POOL_SA; %POOLFLAGS; AP2=SA_ENV; }
70 {ASSD? $POOL N=POOL_OTH; %POOLFLAGS; AP2=YU_ENV; }
71 {AS? $POOL N=POOL_AS; %POOLFLAGS; AP2=AS_ENV; }
72 {AF? $POOL N=POOL_AF; %POOLFLAGS; AP2=AF_ENV; }
73 {NE? $POOL N=POOL_NE; %POOLFLAGS; AP2=NE_ENV; }
74 {AUS? $POOL N=POOL_AUS; %POOLFLAGS; AP2=AUS_ENV;}
75 {FAN? $POOL N=POOL_PHA; %POOLFLAGS; AP2=YU_ENV; }
76 #------------------------------------------------------------------------------
77 $DEF Q_H=[POOL=POOL_HUN:#O#T]
78 $DEF Q_D=[POOL=POOL_GHIST:#O#T]|[POOL=POOL_BRD:#O]|[POOL=POOL_DDR:#O#T]|[POOL=POOL_GER:#O#T]
79 $DEF Q_CH=[POOL=POOL_CH:#O#T]
80 $DEF Q_F=[POOL=POOL_F:#O#T]
81 $DEF Q_A=[POOL=POOL_A:#O#T]
82 $DEF Q_B=[POOL=POOL_B:#O#T]
83 $DEF Q_L=[POOL=POOL_L:#O#T]
84 $DEF Q_NL=[POOL=POOL_NL:#O#T]
85 $DEF Q_N=[POOL=POOL_N:#O]|[POOL=POOL_S:#O]|[POOL=POOL_SF:#O#T]
86 $DEF Q_I=[POOL=POOL_I:#O#T]
87
88 $DEF QP=Q_H|Q_D|Q_F|Q_NL
89 $SET QP={H|BRD|DDR|F|NL?1?0}
90
91 $DEF QH=Q_D|Q_F|Q_B|Q_L|Q_I
92 $SET QH={BRD|DDR|F|B|L|I?1?0}
93
94 $DEF QM=Q_CH|Q_A|Q_I
95 $SET QM={CH|I?1?0}
96
97 $DEF QN=Q_N
98 $SET QN={N|S|SF?1?0}
99 #------------------------------------------------------------------------------
100 %*DEF(ADDPOOL(N,E)=$ADDPOOL N=%N;; %POOLFLAGS; AP2=%E;;)
101 %*DEF(ENDPOOL=$ENDPOOL)
102 #------------------------------------------------------------------------------
103 {(D|BRD)?
104 $REQUIRE MLG_DE3B.TTT
105 $REQUIRE MLG_DE4A.TTT
106 $REQUIRE MLG_DE4B.TTT
107 $REQUIRE MLG_DE5A.TTT
108 $REQUIRE MLG_DE5B.TTT
109 $REQUIRE MLG_DE6.TTT
110 $REQUIRE MLG_DR9193.TTT
111 }
112 {CH?
113 $REQUIRE MLG_CH45A.TTT
114 $REQUIRE MLG_CH5B6.TTT
115 }
116 {A?
117 $REQUIRE MLG_A.TTT
118 }
119 {F?
120 $REQUIRE MLG_SNCF3B.TTT
121 $REQUIRE MLG_SNCF4A.TTT
122 $REQUIRE MLG_SNCF4B.TTT
123 $REQUIRE MLG_SNCF5A.TTT
124 $REQUIRE MLG_SNCF5B.TTT
125 $REQUIRE MLG_SNCF6.TTT
126 $REQUIRE MLG_FRVM.TTT
127 }
128 {L?
129 $REQUIRE MLG_L.TTT
130 }
131 {B?
132 $REQUIRE MLG_B.TTT
133 $REQUIRE MLG_B3B.TTT
134 }
135 {NL?
136 $REQUIRE MLG_NL.TTT
137 }
138 {DK?
139 $REQUIRE MLG_DK.TTT
140 }
141 {I?
142 $REQUIRE MLG_IT45A.TTT
143 $REQUIRE MLG_IT5B6.TTT
144 }
145 {SK?
146 $REQUIRE MLG_SK.TTT
147 }
148 {SLO?
149 $REQUIRE MLG_SLO.TTT
150 }
151 {CSD|CS?
152 $REQUIRE MLG_CS.TTT
153 }
154
155 {H?
156 $REQUIRE JMD_HUNGARY.TTT
157 $REQUIRE LB_HUNGARY.TTT
158 }
159 {D&(E1|E2)?
160 $REQUIRE JMD_GHIST.TTT
161 $REQUIRE LB_GHIST.TTT
162 }
163 {(D|BRD|DDR)&(E3|E4|E5|E6)?
164 $REQUIRE JMD_BRD.TTT
165 $REQUIRE LB_BRD.TTT
166 $REQUIRE JMD_DDR.TTT
167 $REQUIRE LB_DDR.TTT
168 }
169 {CH?
170 $REQUIRE JMD_SWISS.TTT
171 $REQUIRE LB_SWISS.TTT
172 }
173 {A?
174 $REQUIRE JMD_AUSTRIA.TTT
175 $REQUIRE LB_AUSTRIA.TTT
176 }
177 {GB?
178 $REQUIRE JMD_BRITAIN.TTT
179 $REQUIRE LB_BRITAIN.TTT
180 }
181 {F?
182 $REQUIRE JMD_FRANCE.TTT
183 $REQUIRE LB_FRANCE.TTT
184 }
185 {B|L|NL?
186 $REQUIRE JMD_BENELUX.TTT
187 $REQUIRE LB_BENELUX.TTT
188 }
189 {DK|N|S|SF?
190 $REQUIRE JMD_EUNORD.TTT
191 $REQUIRE LB_EUNORD.TTT
192 }
193 {P|E?
194 $REQUIRE JMD_HISP.TTT
195 $REQUIRE LB_HISP.TTT
196 }
197 {I?
198 $REQUIRE JMD_ITALY.TTT
199 $REQUIRE LB_ITALY.TTT
200 }
201 {CSD|CS|SK?
202 $REQUIRE JMD_CS.TTT
203 $REQUIRE LB_CS.TTT
204 }
205 {PL?
206 $REQUIRE JMD_POLAND.TTT
207 $REQUIRE LB_POLAND.TTT
208 }
209 {IE|RO|SLO|HR|YU|BG|GR|HSH|TR|ASSD?
210 $REQUIRE JMD_EUOTHER.TTT
211 $REQUIRE LB_EUOTHER.TTT
212 }
213 {SU|RZD|UZ|BCH|EVR|LDZ|LG|GEO|AZ|KAZ|MD|ARM?
214 $REQUIRE JMD_SU.TTT
215 $REQUIRE LB_SU.TTT
216 }
217 {USA?
218 $REQUIRE JMD_USA.TTT
219 $REQUIRE LB_USA.TTT
220 }
221 {AUS|J|CN|IND?
222 $REQUIRE JMD_ASIA.TTT
223 }
224 {SA?
225 $REQUIRE JMD_SA.TTT
226 }
227 {J|CN|SA|USA|AS|AF|NE?
228 $REQUIRE LB_OTHER.TTT
229 }
230 {FAN?
231 $REQUIRE LB_PHA.TTT
232 }
233 {CH|E|YU|BG|ASSD|SA|F|SU|CN|AS|AF?
234 $REQUIRE ZSZ_OTHPOOL.TTT
235 }
236 {J?
237 $REQUIRE ZSZ_JAPAN.TTT
238 }
239
240 {%FILEX(MM_OWN.ttt)?
241 $REQUIRE MM_OWN.TTT
242 }
243
