TTFIL poolsec.ttt
1 # { [ (
2
3 $REQUIRE POOLDEF.TTT
4 %*DEF(PSEC(A, N)=
5 $SECTION NAME=%N;; LC=14; %SECFIN; BL=20; SEQ=D;
6 POOL=%A;;
7 $ENDSECTION
8 )
9
10 $SPOOL N=RWMODE; SEQ=RSEQ;
11 {RW0?
12 AB=5; \
13 VAR=BGTYPE=0; DIS=5; ST=0.4;
14 }
15 {RW2?
16 AB=25; \
17 VAR=BGTYPE=2; DIS=10; ST=0.5;
18 }
19 {RW3?
20 AB=25; \
21 VAR=BGTYPE=3,BGUP=83; DIS=20; ST=1;
22 }
23 {RW4?
24 AB=100; \
25 VAR=BGTYPE=4,BGUP=158; DIS=20;
26 }
27 {RW5?
28 AB=340; \
29 VM=CONT,JUMP; DX=5000; VAR=BGTYPE=5,BGUP=398; DIS=50;
30 }
31 $ENDPOOL
32
33 $SECTION \
34 NAME=POOLSEC; \
35 LC=1; \
36 POOL=RWMODE;
37 {D|BRD|DDR?
38 $SECTION \
39 NAME=P_D; \
40 LC=1;
41 {D?
42 {E1|E2?
43 %PSEC(POOL_GHIST,P_GHIST)
44 }
45 }
46 {D|BRD?
47 {E3|E4?
48 %PSEC(POOL_BRD,P_BRD1)
49 }
50 }
51 {D|DDR?
52 {E3|E4?
53 %PSEC(POOL_DDR,P_DDR)
54 }
55 }
56 {D|BRD?
57 {E3|E4?
58 %PSEC(POOL_BRD,P_BRD2)
59 }
60 }
61 {E5|E6?
62 %PSEC(POOL_GER,P_GER)
63 }
64 $ENDSECTION
65 }
66 {F?
67 %PSEC(POOL_F,P_F)
68 }
69 {CH|A|I?
70 $SECTION \
71 NAME=P_CH_A_I; \
72 LC=1;
73 {CH?
74 %PSEC(POOL_CH,P_CH1)
75 }
76 {I?
77 %PSEC(POOL_I,P_I1)
78 }
79 {A?
80 %PSEC(POOL_A)
81 }
82 {CH?
83 %PSEC(POOL_CH,P_CH2)
84 }
85 {I?
86 %PSEC(POOL_I,P_I2)
87 }
88 $ENDSECTION
89 }
90 {DK|N|S|SF|B|L|NL|GB|IE|HR|SLO?
91 $SECTION \
92 NAME=P_MIX1; \
93 LC=1;
94 {GB|DK?
95 $SECTION \
96 NAME=P_GB_DK; \
97 LC=1;
98 {GB?
99 %PSEC(POOL_GB,P_GB1)
100 }
101 {DK?
102 %PSEC(POOL_DK,P_DK)
103 }
104 {GB?
105 %PSEC(POOL_GB,P_GB2)
106 }
107 $ENDSECTION
108 }
109 {B?
110 %PSEC(POOL_B,P_B)
111 }
112 {NL?
113 %PSEC(POOL_NL,P_NL)
114 }
115 {L|S|N|SF|HR|SLO?
116 $SECTION \
117 NAME=P_N_HR; \
118 LC=1;
119 {HR?
120 %PSEC(POOL_HR,P_HR)
121 }
122 {S?
123 %PSEC(POOL_S,P_S1)
124 }
125 {SLO?
126 %PSEC(POOL_SLO,P_SLO)
127 }
128 {L?
129 %PSEC(POOL_L,P_L)
130 }
131 {S?
132 %PSEC(POOL_S,P_S2)
133 }
134 {N?
135 %PSEC(POOL_N,P_N)
136 }
137 {SF?
138 %PSEC(POOL_SF; VH=62,P_SF)
139 }
140 $ENDSECTION
141 }
142 $ENDSECTION
143 }
144 {P|E|H|CSD|CS|SK|PL|RO|BG|GR|YU|HSH|TR|ASSD|IE?
145 $SECTION \
146 NAME=P_MIX2; \
147 LC=1;
148 {E?
149 %PSEC(POOL_E,P_E)
150 }
151 {H?
152 %PSEC(POOL_HUN,P_H)
153 }
154 {CSD|CS?
155 %PSEC(POOL_CS,P_CS)
156 }
157 {PL?
158 %PSEC(POOL_PL,P_PL)
159 }
160 {RO|GR|P?
161 $SECTION \
162 NAME=P_RO_GR_P; \
163 LC=1;
164 {RO?
165 %PSEC(POOL_RO,P_RO)
166 }
167 {GR?
168 %PSEC(POOL_GR,P_GR)
169 }
170 {P?
171 %PSEC(POOL_P,P_P)
172 }
173 $ENDSECTION
174 }
175 {SK|BG|YU|HSH|TR|IE|ASSD?
176 $SECTION \
177 NAME=P_MIX2_1; \
178 LC=1;
179 {SK?
180 %PSEC(POOL_SK,P_SK)
181 }
182 {YU?
183 %PSEC(POOL_YU,P_YU);
184 }
185 {TR?
186 %PSEC(POOL_TR,P_TR);
187 }
188 {BG?
189 %PSEC(POOL_BG,P_BG)
190 }
191 {HSH|IE|ASSD?
192 $SECTION \
193 NAME=P_MIX2_1_1; \
194 LC=14; SEQ=D; BL=20; %SECFIN;
195 {HSH?
196 POOL=POOL_HSH;
197 }
198 {ASSD?
199 POOL=POOL_OTH;
200 }
201 {IE?
202 POOL=POOL_IR;
203 }
204 $ENDSECTION
205 }
206 $ENDSECTION
207 }
208 $ENDSECTION
209 }
210 {USA|J?
211 $SECTION \
212 NAME=P_USA_J; \
213 LC=1;
214 {USA?
215 %PSEC(POOL_USA,P_USA1)
216 }
217 {J?
218 %PSEC(POOL_JP,P_J)
219 }
220 {USA?
221 %PSEC(POOL_USA,P_USA2)
222 }
223 $ENDSECTION
224 }
225 {SU|RZD|UZ|BCH|EVR|LDZ|LG|GEO|AZ|KAZ|MD|SA|AS|NE|AF|CN|IND|FAN|AUS?
226 $SECTION \
227 NAME=P_SU_AUS_WORLD; \
228 LC=1;
229 {SU|RZD|UZ|BCH|EVR|LDZ|LG|GEO|AZ|KAZ|MD?
230 %PSEC(POOL_SU,P_SU)
231 }
232 {AUS?
233 %PSEC(POOL_AUS,P_AUS)
234 }
235 {SA|AS|NE|AF|CN|FAN|IND?
236 $SECTION \
237 NAME=P_WORLD; \
238 LC=1;
239 {SA?
240 %PSEC(POOL_SA)
241 }
242 {AS?
243 %PSEC(POOL_AS)
244 }
245 {NE?
246 %PSEC(POOL_NE)
247 }
248 {IND?
249 %PSEC(POOL_IND)
250 }
251 {SA?
252 %PSEC(POOL_SA)
253 }
254 {AF?
255 %PSEC(POOL_AF)
256 }
257 {CN?
258 %PSEC(POOL_CN)
259 }
260 {FAN?
261 %PSEC(POOL_PHA)
262 }
263 $ENDSECTION
264 }
265 $ENDSECTION
266 }
267
268 {MMCT?
269 {OWN??
270 $SECTION \
271 NAME=P_CITY; \
272 LC=1;
273 $INCLUDE ZSZ_CITYS.TTT
274
275 $SECTION \
276 NAME=P_CITYG; \
277 SEQ=D; AB=30; POOL=CYMODE; %SECFIN;
278 $INCLUDE ZSZ_CITYG.TTT
279 $ENDSECTION
280
281 $SECTION \
282 NAME=P_MLGCITY; \
283 LC=1; \
284 VAR=BGTYPE=1;
285 $INCLUDE MLG_URBAN.TTT
286 $ENDSECTION
287 $ENDSECTION
288 }
289 }
290
291 $ENDSECTION
292
293 # ) ] }