TTFIL zsz_mono.ttt
1 {FILELEVEL=1?
2 $BGCOLOR #000000
3 $OPTGDEF 1
4 $VAR BGTYPE=0;
5 }
6
7 $REQUIRE ZSZ_DEF.TTT
8 $REQUIRE BG_DEF.TTT
9
10 {D|BRD?
11 $SECTION LC=1;
12 #------------------------------------------------------------------------------
13 #
14 # Wuppertal Schwebebahn 1900-1950
15 # (Lars Boßhammer)
16 $SCENE \
17 NAME=D_WUP1; \
18 DX=5850; DY=250; YDIR=U; SEQ=2; VM=HEAD; \
19 BG=(BGCITYDWU1:,-7;BGCITYDWU2:,-7;BGCITYDWU3:,-7; TREES_SUMMER:..,+6,#; \
20 BGCITYDR2,BGCITYDR1:..,+6,#;TREE83,10,TREE38,85:,-7;TREE80:,+6; TREE65,1839,TREE65; \
21 BgPic/WUPPERTAL2.jpg:..,0,<=>;); \
22 FG=(STREET01:..,-6;25*FENCE8,140,75*FENCE8,140,3*FENCE8,30,70*FENCE8,140,63*FENCE8,11:,-4; \
23 STREET01:..,-4; \
24 D_FABRIK01A,80,D_FABRIK01A,2075,D_FABRIK01A,80,D_FABRIK01A,2045,D_FABRIK01A,80,D_FABRIK01A, \
25 1035:,-40; LAMP10,300:..,-14;598,5*Schwebpillar2:,-10;); \
26 V=5-7; \
27 LC=5;
28 $PATH Y=31; LC=3;
29 POOL=POOL_WUP1900R; D=R;
30 $ENDPATH
31 $PATH Y=31; LC=3; \
32 FG=5*WSCHWEB3TR8:,43;
33 TX=Wuppertal Schwebebahn 1900-1950; \
34 POOL=POOL_WUP1900L; D=L;
35 $ENDPATH
36 $ENDSCENE
37 #------------------------------------------------------------------------------
38 #
39 # Wuppertal Schwebebahn 1950-1956
40 # (Lars Boßhammer)
41 $SCENE \
42 NAME=D_WUP2; \
43 DX=5850; DY=250; YDIR=U; SEQ=2; VM=HEAD; \
44 BG=(BGCITYDR1:..,+6,#; 1-40*1,TREES_SUMMER:..,+6,#;BGCITYDR2:..,+6,#;TREE83,10,TREE38,85:,-7; \
45 TREE80:,+6; TREE65,1839,TREE65;BgPic/WUPPERTAL2.jpg:..,0,<=>;); \
46 FG=(STREET01:..,-6;25*FENCE8,140,75*FENCE8,140,3*FENCE8,30,70*FENCE8,140,63*FENCE8,11:,-4; \
47 STREET01:..,-4; \
48 D_FABRIK01A,80,D_FABRIK01A,2075,D_FABRIK01A,80,D_FABRIK01A,2045,D_FABRIK01A,80,D_FABRIK01A, \
49 1035:,-40; LAMP10,300:..,-14;WUP_ST_WERTHERBRB,304,:,-4; \
50 598,(Schwebpillar2,Schwebpillar1,Schwebpillar2):,-10;); \
51 LC=5; \
52 V=5-7;
53 $PATH Y=31; LC=3;
54 M=STOP; POOL=POOL_WUP1950R; D=R; P=*-140;
55 $ENDPATH
56 $PATH Y=31; LC=3; \
57 FG=2*WSCHWEB3TR8,20,2*WSCHWEB3TR8:,43;
58 TX=Wuppertal Schwebebahn 1950-1957; \
59 M=STOP; POOL=POOL_WUP1950L; D=L; P=*-140;
60 $ENDPATH
61 $ENDSCENE
62 #------------------------------------------------------------------------------
63 #
64 # Wuppertal Schwebebahn 1957-1962
65 # (Lars Boßhammer)
66 $SCENE \
67 NAME=D_WUP3; \
68 DX=5850; DY=250; YDIR=U; SEQ=2; VM=HEAD; \
69 BG=(BGCITYDR3:..,+6,#;1-40*1,TREES_SUMMER:..,0,#;BGCITYDR4:..,+6,#;TREE83,10,TREE38,85:,-7; \
70 TREE80:,+6; TREE65,1839,TREE65;BgPic/WUPPERTAL2.jpg:..,0,<=>;); \
71 FG=(25*FENCE8,140,75*FENCE8,140,3*FENCE8,30,70*FENCE8,140,63*FENCE8,11:,-4;STREET01:..,-4; \
72 D_FABRIK01A,80,D_FABRIK01A,2075,D_FABRIK01A,80,D_FABRIK01A,2045,D_FABRIK01A,80,D_FABRIK01A, \
73 1035:,-40; LAMP10,300:..,-14;WUP_ST_WERTHERBRB,304,:,-4; \
74 598,(Schwebpillar2,Schwebpillar1,Schwebpillar2):,-10;); \
75 LC=5; \
76 V=5-7;
77 $PATH Y=31; LC=3;
78 M=STOP; POOL=POOL_WUP1958R; D=R; P=*-140;
79 $ENDPATH
80 $PATH Y=31; LC=3; \
81 FG=2*WSCHWEB3TR8,20,2*WSCHWEB3TR8:,43;
82 TX=Wuppertal Schwebebahn 1957-1962; \
83 M=STOP; POOL=POOL_WUP1958L; D=L; P=*-140;
84 $ENDPATH
85 $ENDSCENE
86 #------------------------------------------------------------------------------
87 #
88 # Wuppertal Schwebebahn 1960-71
89 # (Lars Boßhammer)
90 $SCENE \
91 NAME=D_WUP4; \
92 DX=5850; DY=250; YDIR=U; SEQ=2; VM=HEAD; \
93 BG=(LAMP10,300:..; BGCITYDR3:..,+6,#; 1-40*1,TREES_SUMMER:..,0,; BGCITYDR4:..,+6,#; \
94 TREE83,10,TREE38,85:,-7; TREE80:,+6; TREE65,1839,TREE65; BgPic/WUPPERTAL2.jpg:..,0,<=>;); \
95 V=5-7; \
96 LC=5; \
97 TXY=-200;
98 $PATH Y=6; LC=3; \
99 FG=(STREET01:..,-6; FL_SP_F:..,-4; W_STOP3R:30;);
100 M=STOP; POOL=POOL_WUPSTRAB3R; D=R; P=*-240;
101 $ENDPATH
102 $PATH Y=6; LC=3; \
103 BG=(W_STOP3L:49; 25*FENCE8,140,75*FENCE8,140,3*FENCE8,30,70*FENCE8,140,63*FENCE8,11:,; \
104 D_FABRIK01A,80,D_FABRIK01A,2075,D_FABRIK01A,80,D_FABRIK01A,2045,D_FABRIK01A,80,D_FABRIK01A, \
105 1035:,-34; 598,SCHWEBPILLAR2,SCHWEBPILLAR1,SCHWEBPILLAR2:,-7;);
106 M=STOP; POOL=POOL_WUPSTRAB3L; D=L; P=*-260;
107 $ENDPATH
108 $PATH Y=40; LC=3; \
109 FG=(WUP_ST_WERTHERBRB,304:,-34;);
110 M=STOP; POOL=POOL_WUP(1950|1958|1964|1966|1972)R; D=R; P=*-140;
111 $ENDPATH
112 $PATH Y=40; LC=3; \
113 FG=(2*WSCHWEB3TR8,20,2*WSCHWEB3TR8:,43;);
114 TX=Wuppertal Schwebebahn + Straßenbahn 1960-1971; \
115 M=STOP; POOL=POOL_WUP(1950|1958|1964|1966|1972)L; D=L; P=*-140;
116 $ENDPATH
117 $ENDSCENE
118 #------------------------------------------------------------------------------
119 #
120 # Wuppertal Schwebebahn 1963-1965
121 # (Lars Boßhammer)
122 $SCENE \
123 NAME=D_WUP5; \
124 DX=5850; DY=250; YDIR=U; SEQ=2; VM=HEAD; \
125 BG=(BGCITYDR3:..,+6,#; 1-40*1,TREES_SUMMER:..,0,#;BGCITYDR4:..,+6,#; TREE83,10,TREE38,85:,-7; \
126 TREE80:,+6; TREE65,1839,TREE65; BgPic/WUPPERTAL2.jpg:..,0,<=>;); \
127 FG=(25*FENCE8,140,75*FENCE8,140,3*FENCE8,30,70*FENCE8,140,63*FENCE8,11:,-4;STREET01:..,-4; \
128 D_FABRIK01A,80,D_FABRIK01A,2075,D_FABRIK01A,80,D_FABRIK01A,2045,D_FABRIK01A,80,D_FABRIK01A, \
129 1035:,-40; LAMP10,300:..,-14;WUP_ST_WERTHERBRB,304,:,-4; \
130 598,(Schwebpillar2,Schwebpillar1,Schwebpillar2):,-10;); \
131 V=5-7; \
132 LC=5;
133 $PATH Y=31; LC=3;
134 M=STOP; POOL=POOL_WUP1964R; D=R; P=*-140;
135 $ENDPATH
136 $PATH Y=31; LC=3; \
137 FG=2*WSCHWEB3TR8,20,2*WSCHWEB3TR8:,43;
138 TX=TX=Wuppertal Schwebebahn 1963-1965; \
139 M=STOP; POOL=POOL_WUP1964L; D=L; P=*-140;
140 $ENDPATH
141 $ENDSCENE
142 #------------------------------------------------------------------------------
143 #
144 # Wuppertal Schwebebahn 1980-84
145 # (Lars Boßhammer)
146 $SCENE \
147 NAME=D_WUP6; \
148 DX=5850; DY=250; YDIR=U; SEQ=2; VM=HEAD; \
149 BG=(LAMP10,300:..; BGCITYDR3:..,+6,#; 1-40*1,TREES_SUMMER:..,0,; BGCITYDR4:..,+6,#; \
150 TREE83,10,TREE38,85:,-7; TREE80:,+6; TREE65,1839,TREE65; BgPic/WUPPERTAL2.jpg:..,0,<=>;); \
151 LC=5; \
152 V=5-7; \
153 TXY=-200;
154 $PATH Y=6; LC=3; \
155 FG=(STREET01:..,-6; FL_SP_F:..,-4;#DU_STOP1:45;B_SHELTER:45,3);
156 M=STOP; POOL=POOL_WUPSTRAB4R; D=R; P=*-240;
157 $ENDPATH
158 $PATH Y=6; LC=3; \
159 BG=(B_SHELTER:49,3;DU_STOP1:49; \
160 25*FENCE8,140,75*FENCE8,140,3*FENCE8,30,70*FENCE8,140,63*FENCE8,11:,; \
161 D_FABRIK01A,80,D_FABRIK01A,2075,D_FABRIK01A,80,D_FABRIK01A,2045,D_FABRIK01A,80,D_FABRIK01A, \
162 1035:,-34; 598,SCHWEBPILLAR2,SCHWEBPILLAR1,SCHWEBPILLAR2:,-7;);
163 M=STOP; POOL=POOL_WUPSTRAB4L; D=L; P=*-260;
164 $ENDPATH
165 $PATH Y=40; LC=3; \
166 FG=(WUP_ST_WERTHERBRB,304:,-34;);
167 M=STOP; POOL=POOL_WUP1985R; D=R; P=*-140;
168 $ENDPATH
169 $PATH Y=40; LC=3; \
170 FG=(2*WSCHWEB3TR8,20,2*WSCHWEB3TR8:,43;);
171 TX=Wuppertal Schwebebahn + Straßenbahn 1980-84; \
172 M=STOP; POOL=POOL_WUP1985L; D=L; P=*-140;
173 $ENDPATH
174 $ENDSCENE
175 #------------------------------------------------------------------------------
176 #
177 # Wuppertal Schwebebahn 1984-85
178 # (Lars Boßhammer)
179 $SCENE \
180 NAME=D_WUP7; \
181 DX=5850; DY=280; YDIR=U; SEQ=2; VM=HEAD; \
182 BG=(LAMP10,300:..; BGCITYDR3:..,+6,#; 1-40*1,TREES_SUMMER:..,+6,#; BGCITYDR4:..,+6,#; \
183 TREE83,10,TREE38,85:,-7; TREE80:,+6; TREE65,1839,TREE65; BgPic/WUPPERTAL2.jpg:..,0,<=>;); \
184 LC=5; \
185 TXY=-200;
186 $PATH Y=6; LC=3; \
187 FG=(STREET01:..,-6; FL_SP_F:..,-4;#DU_STOP1:45;B_SHELTER:45,3);
188 M=STOP; POOL=POOL_WUPSTRAB5R; D=R; P=*-240;
189 $ENDPATH
190 $PATH Y=6; LC=3; \
191 BG=(B_SHELTER:49,3;DU_STOP1:49; \
192 25*FENCE8,140,75*FENCE8,140,3*FENCE8,30,70*FENCE8,140,63*FENCE8,11:,; \
193 D_FABRIK01A,80,D_FABRIK01A,2075,D_FABRIK01A,80,D_FABRIK01A,2045,D_FABRIK01A,80,D_FABRIK01A, \
194 1035:,-34; 598,SCHWEBPILLAR2,SCHWEBPILLAR1,SCHWEBPILLAR2:,-7;);
195 M=STOP; POOL=POOL_WUPSTRAB5L; D=L; P=*-260;
196 $ENDPATH
197 $PATH Y=40; LC=3; \
198 FG=(WUP_ST_WERTHERBR4,304:,-34;);
199 M=STOP; POOL=POOL_WUP1985R; D=R; P=*-140;
200 $ENDPATH
201 $PATH Y=40; LC=3; \
202 FG=(2*WSCHWEB3TR8,20,2*WSCHWEB3TR8:,43;);
203 TX=Wuppertal Schwebebahn + Straßenbahn 1984-85; \
204 M=STOP; POOL=POOL_WUP1985L; D=L; P=*-140;
205 $ENDPATH
206 $ENDSCENE
207 #------------------------------------------------------------------------------
208 #
209 # Wuppertal Schwebebahn 2000
210 # (Lars Boßhammer)
211 $SCENE \
212 NAME=D_WUP8; \
213 DX=5850; DY=250; YDIR=U; SEQ=2; \
214 BG=(LAMP10,300:..; BGCITYDR5:..,+6,#; 1-40*1,TREES_SUMMER:..,0,; BGCITYDR6:..,+6,#; \
215 TREE83,10,TREE38,85:,-7; TREE80:,+6; TREE65,1839,TREE65; BgPic/WUPPERTAL2.jpg:..,0,<=>;); \
216 LC=5; \
217 TXY=-200;
218 $PATH Y=6; LC=3; \
219 FG=(STREET01:..,-6;#DU_STOP1:35;B_SHELTER:35,3);
220 M=STOP; \
221 C=WUP_IK417A; \
222 D=R; P=*-240;
223 $ENDPATH
224 $PATH Y=6; LC=3; \
225 BG=(B_SHELTER:49,3;DU_STOP1:49; \
226 25*FENCE8,140,75*FENCE8,140,3*FENCE8,30,70*FENCE8,140,63*FENCE8,11:,; \
227 D_FABRIK01A,80,D_FABRIK01A,2075,D_FABRIK01A,80,D_FABRIK01A,2045,D_FABRIK01A,80,D_FABRIK01A, \
228 1035:,-34; 598,SCHWEBPILLAR2,SCHWEBPILLAR1,SCHWEBPILLAR2:,-7;);
229 M=STOP; \
230 C=WUP_SG221UL_STINNESL; \
231 D=L; P=*-260;
232 $ENDPATH
233 $PATH Y=40; LC=3; \
234 FG=(WUP_ST_WERTHERBR,304:,-34;);
235 M=STOP; POOL=POOL_WUP2000R; D=R; P=*-140;
236 $ENDPATH
237 $PATH Y=40; LC=3; \
238 FG=(2*WSCHWEB3TR8,20,2*WSCHWEB3TR8:,43;);
239 TX=Wuppertal Schwebebahn 2000; \
240 M=STOP; POOL=POOL_WUP2000L; D=L; P=*-140;
241 $ENDPATH
242 $ENDSCENE
243 #------------------------------------------------------------------------------
244 #
245 # Wuppertal Schwebebahn 2016
246 # (Lars Boßhammer)
247 $SCENE \
248 NAME=D_WUP9; \
249 DX=5850; DY=250; YDIR=U; SEQ=2; VM=HEAD; \
250 BG=(BGCITYDR5:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;BGCITYDR6:..,0,#;TREE83,10,TREE38,85:,-7; \
251 TREE80:,+6;TREE65,1839,TREE65;BgPic/WUPPERTAL2.jpg:..,0,<=>;); \
252 FG=(STREET01:..,-4; LAMP10,300:..,-14; (Schwebpillar5,Schwebpillar6):..,0,-1026); \
253 LC=5;
254 $PATH Y=34; LC=3;
255 POOL=POOL_WUP20(16|00)R; D=R; $ENDPATH;
256 $ENDPATH
257 $PATH Y=34; LC=3; \
258 FG=WSCHWEB6TR8:..,43,-734;
259 TX=Wuppertal Schwebebahn 2000-2016 Landstrecke; \
260 POOL=POOL_WUP20(16|00)L; D=L;
261 $ENDPATH
262 $ENDSCENE
263 $ENDSECTION
264 }
265 #------------------------------------------------------------------------------
266 {I|USA|J?
267 {I?
268 # Torino GHIA
269 #------------------------------------------------------------------------------
270 $SECTION \
271 NAME=GHIA; \
272 LC=1; %TITLE(Torino);
273 $GROUP LC=2; AB=130; BL=60; \
274 BG=(GREEN1:..,^-39,#; GREEN1:..,-39,#; GREEN2:..,14,<=>,88,1120; ATMT_GHIAW:..,^14); \
275 AP=$SKYM(-100);
276 C=ATMT_GHIA; \
277 V=8-11;
278 $ENDGROUP
279 $ENDSECTION
280 }
281 #------------------------------------------------------------------------------
282 {USA?
283 #
284 # Disney monorail (Brian Clough)
285 #
286 #------------------------------------------------------------------------------
287 $SECTION LC=1;
288 $GROUP \
289 NAME=DISNEY1; \
290 LC=2; AB=130; BL=61; \
291 BG=(GREEN1:..,^-39,#; GREEN1:..,-39,#; GREEN2:..,14,<=>,88,1120; DMR_BEAMWAY:..,^14,0; \
292 310[OMV:,DMR_COLUMN,,13,,50]:..,^-11,0); \
293 AP=$SKYM(-100);
294 C=<DMR_(RED|BLK|BLU|GLD|ORG|PUR|SIL|YEL|GRN|PIN|LIM|COR)(L,4*T,); \
295 D=L; V=6-9;
296 $ENDGROUP
297 $ENDSECTION
298 }
299 {J?
300 #------------------------------------------------------------------------------
301 #
302 # Yurikamome
303 # (Hayato)
304 $SECTION LC=1;
305 $SCENE \
306 NAME=YURIKAMOME; \
307 DY=130; YDIR=U; \
308 BG=(FIELD01:..,6; RAIL_YURIKAMOME:..,6,0; SEE03:..,9,0; STREET01:..); \
309 FG=RAIL_YURIKAMOME2:..,70;
310 $PATH Y=70; LC=2; \
311 BG=ST_YURIKAMOME:<0,-64;
312 M=STOP; \
313 C=<NTYU_CL,3*NTYU_M,NTYU_01,NTYU_C; \
314 D=L; P=>0+286;
315 $ENDPATH
316 $PATH Y=70; LC=2;
317 M=OPEN; \
318 C=<NTYU_CL,3*NTYU_M,NTYU_01,NTYU_C; \
319 D=R; P=>0+286;
320 $ENDPATH
321 $ENDSCENE
322 $ENDSECTION
323 #------------------------------------------------------------------------------
324 #
325 # Tokyo Monorail
326 # (Hayato)
327 $SECTION LC=1;
328 $SPOOL N=POOL_TOKM;
329 C=<TOKM_700TC1L,TOKM_700M1,TOKM_700M2,TOKM_700M3,TOKM_700M4,TOKM_700TC2;
330 C=<TOKM_1000TCL,TOKM_1000M1,TOKM_1000M2,TOKM_1000M1,TOKM_1000M2,TOKM_1000TC;
331 C=<TOKM_1000NTCL,TOKM_1000NM1,TOKM_1000NM2,TOKM_1000NM1,TOKM_1000NM2,TOKM_1000NTC;
332 C=<TOKM_2000TCL,4*TOKM_2000M1,TOKM_2000TC;
333 $ENDPOOL
334
335 $SCENE \
336 NAME=TOKYOMONO; \
337 DY=130; YDIR=U; \
338 BG=(FIELD01:..,6; SEE03:..,9,0; STREET01:..); \
339 FG=ST_TOKYOMONO:<0,6;
340 $PATH Y=67; LC=2; \
341 BG=RAIL_TOKYOMONO:..,-61,0;
342 M=OPEN; POOL=POOL_TOKM; D=L; P=>0+286;
343 $ENDPATH
344 $PATH Y=67; LC=2;
345 M=STOP; POOL=POOL_TOKM; D=R; P=>0+286;
346 $ENDPATH
347 $ENDSCENE
348 $ENDSECTION
349 #------------------------------------------------------------------------------
350 #
351 # Ueno Zoo Monorail
352 # (ZSz)
353 $SECTION LC=1;
354 $GROUP \
355 NAME=UENO1; \
356 LC=2; DX=1600; IMGY=50; AB=200; BL=70; \
357 BG=(FOREST05[SM:0.4]:..,-(55-95),<=>; FOREST09[SM:0.4]:..,-(25-65),<=>; \
358 @@EMB(3|4|5|6):..,^-25; SCENE_UENOZOOB1:..,-28;); \
359 AP=$SKYM(-30),$EVAL($W/14)*[BG<=TREE_AUTUMN[SM:0.3-0.6]:1-99+,-25;], \
360 5-8*[FG+=BUSH(10|12)|SHRUBBERY(6|7):1-99+,^-5--15;];
361 C=UENO_H; \
362 D=L; V=2;
363 C=UENO_M; \
364 D=L; V=2;
365 C=UENO_30; \
366 D=L; V=2;
367 $ENDGROUP
368 $GROUP \
369 NAME=UENO2; \
370 LC=2; DX=1600; IMGY=50; AB=400; BL=28; \
371 BG=(BgPic/SXC1226606.JPG:,-28;SCENE_UENOZOOB1:..,-28;);
372 C=UENO_H; \
373 D=L; V=2;
374 C=UENO_M; \
375 D=L; V=2;
376 C=UENO_30; \
377 D=L; V=2;
378 $ENDGROUP
379 $ENDSECTION
380 }
381 #------------------------------------------------------------------------------
382 }