TXMACS

SeqSORTBYCOL Source TXMNAMESORTBYCOL TXMBODY
14 %ABG %LBG(%B,ENV_WAYA)
16 %ADDPOOL $ADDPOOL N=%N;; %POOLFLAGS; AP2=%E;;
32 %BDHWLST2 %BDWH(ag_107m,>,,BWU1) %BDWH(ag_110a,<,,BWU2) %BDWH(ag_110b,>,,BWU3) %BDWH(ag_159b,>,,BWU4) %BDWH(ag_186a,<,,BWU5) %BDWH(ag_186b,>,,BWU6) %BDWH(cm_116a,<,,BWU7) %BDWH(cm_116b,>,,BWU8) %BDWH(cm_117m,>,,BWU9) %BDWH(cm_118m,>,,BWU10) %BDWH(cm_121m,<,,BWU11) %BDWH(cm_124m,>,,BWU12) %BDWH(cm_139a,<,,BWU13) %BDWH(cm_139b,>,,BWU14) %BDWH(cm_172m,<,,BWU15) %BDWH(cm_173b,<,,BWU16) %BDWH(cm_183m,<,,BWU17) %BDWH(cm_193a,<,,BWU18) %BDWH(cm_193b,>,,BWU19) %BDWH(cm_196a,<,,BWU20) %BDWH(cm_196b,>,,BWU21) %BDWH(cm_97a,<,,BWU22) %BDWH(hl_166m,<,,BWU23) %BDWH(in_164a,<,,BWU24) %BDWH(in_164b,>,,BWU25) %BDWH(in_90a,<,,BWU26) %BDWH(in_90b,>,,BWU27)
34 %BDWH $SECTION ML=1; $GROUP NAME=%NAM;; LC=2; SEQ=D; AB=407; BL=40; BG=(BDWH/%BG.JPG:,,%SIDE,20; @@ TRBED12:..,^0); Y=*; \ DX=1832; VM=HEAD,JUMP; POOL=(POOL_USA:DF)|US_FR1; $ENDGROUP $ENDSECTION
31 %BDWHLST1 %BDWH(ag_134m,>,QP,BWP1) %BDWH(ag_144a,<,QP,BWP2) %BDWH(ag_158m,>,QM,BWM1) %BDWH(ag_159a,<,QP,BWP3) %BDWH(ag_165a,<,QP,BWP4) %BDWH(ag_165b,>,QP,BWP5) %BDWH(ag_197a,<,QH,BWH1) %BDWH(ag_197b,>,QH,BWH2) %BDWH(ag_198a,<,QP,BWP6) %BDWH(ag_198b,>,QP,BWP7) %BDWH(ag_79a,<,QP,BWP8) %BDWH(ag_79b,>,QP,BWP9) %BDWH(ag_87a,<,QP,BWP10) %BDWH(ag_88a,<,QP,BWP11) %BDWH(ag_89a,<,QP,BWP12) %BDWH(cm_142m,<,QH,BWH3) %BDWH(hills_981227,>,QP,BWP13) %BDWH(hl_132a,<,QH,BWH4) %BDWH(hl_132b,>,QH,BWH5) %BDWH(hl_133a,<,QP,BWP14) %BDWH(hl_133b,>,QP,BWP15) %BDWH(hl_140a,<,QP,BWP16) %BDWH(hl_140b,>,QP,BWP17) %BDWH(hl_141a,<,QH,BWH6) %BDWH(hl_141b,>,QH,BWH7) %BDWH(hl_162a,<,QP,BWP18) %BDWH(hl_162b,>,QP,BWP19) %BDWH(hl_162c,>,QP,BWP20) %BDWH(hl_120a,<,QN,BWN1) %BDWH(hl_130m,>,QP,BWP21) %BDWH(hl_175a,<,QH,BWH8) %BDWH(hl_175b,>,QH,BWH9) %BDWH(hl_180m,>,QH,BWH10) %BDWH(hl_199a,<,QH,BWH11) %BDWH(hl_199b,>,QH,BWH12) %BDWH(hl_981014a,<,QP,BWP22) %BDWH(hl_981014b,>,QP,BWP23) %BDWH(mh_113m,>,QM,BWM2) %BDWH(mh_137d,<,QH,BWH13) %BDWH(mh_137e,>,QH,BWH14) %BDWH(mh_143c,<,QH,BWH15) %BDWH(mh_143d,>,QH,BWH16) %BDWH(mh_145a,<,QP,BWP24) %BDWH(mh_145b,>,QH,BWH17) %BDWH(mh_146m,>,QP,BWP25) %BDWH(mh_147b,>,QH,BWH18) %BDWH(mh_169m,<,QH,BWH19) %BDWH(mh_174a,<,QM,BWM3) %BDWH(mh_174b,>,QM,BWM4) %BDWH(mh_24m,>,QN,BWN2) %BDWH(mh_83a,<,QM,BWM5) %BDWH(mh_83d,>,QM,BWM6) %BDWH(mh_83e,>,QM,BWM7) %BDWH(mh_83f,>,QM,BWM8) %BDWH(mh_86d,>,QM,BWM9) %BDWH(mh_86e,>,QM,BWM10) %BDWH(mh_86f,>,QM,BWM11) %BDWH(mt_195a,<,QM,BWM12) %BDWH(mt_200a,<,QM,BWM13) %BDWH(mt_200b,>,QM,BWM14) %BDWH(mt_41a,<,QM,BWM15) %BDWH(mts_980510,>,QM,BWM16) %BDWH(mts_981205a,<,QM,BWM17) %BDWH(mts_981205b,>,QM,BWM18) %BDWH(rh_100a,<,QN,BWN3) %BDWH(rh_184m,<,QN,BWN4)
10 %BGPDEF $DEF BGP%N=$FLG(B,BGP%N;N,$FLG(A,BGP%N;A,$FLG(T,BGP%N;T,$FLG(O,BGP%N;O,$FLG(1,BGP%N;1,\ $FLG(2,BGP%N;2,$FLG(3,BGP%N;3,$FLG(4,BGP%N;4,$FLG(5,BGP%N;5,BGP%N;6)))))))))
24 %CZ_GRPFIN LC=3;
25 %CZ_SECFIN LT=30; FIN=S;
26 %CZ1 $GROUP %CZ_GRPFIN; AP=CZ_BG101,SKYP; TX=%YEAR;: 101; POOL=CZ_C101; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG102,SKYP; TX=%YEAR;: 102/101; POOL=CZ_C101; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG103,SKYP; TX=%YEAR;: 103/101; POOL=CZ_C101; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG104,SKYP; TX=%YEAR;: 104/101; POOL=CZ_C101; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG105,SKYP; TX=%YEAR;: 105/101; POOL=CZ_C101; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG106,SKYP; TX=%YEAR;: 106/101; POOL=CZ_C101; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG107,SKYP; TX=%YEAR;: 107/101; POOL=CZ_C101; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG108,SKYP; TX=%YEAR;: 108; POOL=CZ_C108; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG109,SKYP; TX=%YEAR;: 109; POOL=4:CZ_C109|CZ_M998_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG110,SKYP; TX=%YEAR;: 110; POOL=CZ_C110; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG111,SKYP; TX=%YEAR;: 111; POOL=4:CZ_C111|CZ_T997_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG114,SKYP; TX=%YEAR;: 114; POOL=CZ_C114; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG115,SKYP; TX=%YEAR;: 115; POOL=CZ_C115; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG116,SKYP; TX=%YEAR;: 116; POOL=4:CZ_C116|CZ_M992_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG117,SKYP; TX=%YEAR;: 117; POOL=4:CZ_C117|CZ_M989_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG118,SKYP; TX=%YEAR;: 118; POOL=4:CZ_C118|CZ_M999_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG211,SKYP; TX=%YEAR;: 211; POOL=6:CZ_C211|CZ_T997_%YEAR;|CZ_E987_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG217,SKYP; TX=%YEAR;: 217; POOL=5:CZ_C217|CZ_M991_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG901,SKYP; TX=%YEAR;: 901; POOL=CZ_C901; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG903,SKYP; TX=%YEAR;: 903; POOL=CZ_C903; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG904,SKYP; TX=%YEAR;: 904; POOL=CZ_C904; $ENDGROUP
27 %CZ2 $GROUP %CZ_GRPFIN; AP=CZ_BG119,SKYP; TX=%YEAR;: 119/101; POOL=CZ_C101; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG120,SKYP; TX=%YEAR;: 120/101; POOL=CZ_C101; $ENDGROUP #-VLAKY V KRAJINE NOVE DEFINOVANE--------------------------------------------------------------------- $GROUP %CZ_GRPFIN; AP=CZ_BG201,SKYP; TX=%YEAR;: 201; POOL=CZ_C201; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG202,SKYP; TX=%YEAR;: 202/201; POOL=CZ_C201; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG203,SKYP; TX=%YEAR;: 203/201; POOL=CZ_C201; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG204,SKYP; TX=%YEAR;: 204/201; POOL=CZ_C201; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG205,SKYP; TX=%YEAR;: 205/201; POOL=CZ_C201; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG206,SKYP; TX=%YEAR;: 206/201; POOL=CZ_C201; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG207,SKYP; TX=%YEAR;: 207; POOL=CZ_C207; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG209,SKYP; TX=%YEAR;: 209; POOL=4:CZ_C209|CZ_M998_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG210,SKYP; TX=%YEAR;: 210; POOL=CZ_C210; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG214,SKYP; TX=%YEAR;: 214; POOL=CZ_C214; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG215,SKYP; TX=%YEAR;: 215; POOL=CZ_C215; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG216,SKYP; TX=%YEAR;: 216; POOL=4:CZ_C216|CZ_M992_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG218,SKYP; TX=%YEAR;: 218; POOL=4:CZ_C218|CZ_M999_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG225,SKYP; TX=%YEAR;: 225/217; POOL=5:CZ_C217|CZ_M991_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG226,SKYP; TX=%YEAR;: 226; POOL=5:CZ_C226|CZ_M990_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG227,SKYP; TX=%YEAR;: 227/217; POOL=5:CZ_C217|CZ_M991_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG227,SKYP; TX=%YEAR;: 227/226; POOL=5:CZ_C226|CZ_M990_%YEAR;; $ENDGROUP
28 %CZ3 $GROUP %CZ_GRPFIN; AP=CZ_BG201,SKYP; TX=%YEAR;: 201/301; POOL=CZ_C301; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG202,SKYP; TX=%YEAR;: 202/301; POOL=CZ_C301; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG203,SKYP; TX=%YEAR;: 203/301; POOL=CZ_C301; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG204,SKYP; TX=%YEAR;: 204/301; POOL=CZ_C301; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG205,SKYP; TX=%YEAR;: 205/301; POOL=CZ_C301; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG206,SKYP; TX=%YEAR;: 206/301; POOL=CZ_C301; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG207,SKYP; TX=%YEAR;: 207/307l POOL=CZ_C307; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG209,SKYP; TX=%YEAR;: 209/309; POOL=4:CZ_C309|CZ_M998_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG210,SKYP; TX=%YEAR;: 210/310; POOL=CZ_C310; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG211,SKYP; TX=%YEAR;: 211/311; POOL=6:CZ_C311|CZ_S996_%YEAR;|CZ_T997_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG214,SKYP; TX=%YEAR;: 214/314; POOL=CZ_C314; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG215,SKYP; TX=%YEAR;: 215/315; POOL=CZ_C315; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG216,SKYP; TX=%YEAR;: 216/316; POOL=4:CZ_C316|CZ_M992_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG217,SKYP; TX=%YEAR;: 217/317; POOL=6:CZ_C317|CZ_M991_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG218,SKYP; TX=%YEAR;: 218/318; POOL=4:CZ_C318|CZ_M999_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG225,SKYP; TX=%YEAR;: 225/317; POOL=6:CZ_C317|CZ_M991_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG226,SKYP; TX=%YEAR;: 226/326; POOL=6:CZ_C326|CZ_M990_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG227,SKYP; TX=%YEAR;: 227/317; POOL=6:CZ_C317|CZ_M991_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG227,SKYP; TX=%YEAR;: 227/326; POOL=6:CZ_C326|CZ_M990_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG401,SKYP; TX=%YEAR;: 401; POOL=CZ_C401; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG402,SKYP; TX=%YEAR;: 401/402; POOL=CZ_C401; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG403,SKYP; TX=%YEAR;: 403/404; POOL=CZ_C404; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG405,SKYP; TX=%YEAR;: 405; POOL=CZ_C405; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG406,SKYP; TX=%YEAR;: 406; POOL=CZ_C406; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG407,SKYP; TX=%YEAR;: 407; POOL=CZ_C407; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG406,SKYP; TX=%YEAR;: 406/408; POOL=CZ_C408; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG407,SKYP; TX=%YEAR;: 407/409; POOL=CZ_C409; $ENDGROUP
29 %CZ4 $GROUP %CZ_GRPFIN; AP=CZ_BG228,SKYP; TX=%YEAR;: 228/217; POOL=5:CZ_C217|CZ_M991_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG229,SKYP; TX=%YEAR;: 229/226; POOL=5:CZ_C226|CZ_M990_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG222,SKYP; TX=%YEAR;: 222/217; POOL=5:CZ_C217|CZ_M991_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG223,SKYP; TX=%YEAR;: 223/226; POOL=5:CZ_C226|CZ_M990_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG224,SKYP; TX=%YEAR;: 224/209; POOL=4:CZ_C209|CZ_M998_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG228,SKYP; TX=%YEAR;: 228/317; POOL=6:CZ_C317|CZ_M991_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG229,SKYP; TX=%YEAR;: 229/326; POOL=6:CZ_C326|CZ_M990_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG222,SKYP; TX=%YEAR;: 222/317; POOL=6:CZ_C317|CZ_M991_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG223,SKYP; TX=%YEAR;: 223/326; POOL=6:CZ_C326|CZ_M990_%YEAR;; $ENDGROUP $GROUP %CZ_GRPFIN; AP=CZ_BG224,SKYP; TX=%YEAR;: 224/309; POOL=4:CZ_C309|CZ_M998_%YEAR;; $ENDGROUP
17 %ENDPOOL $ENDPOOL
9 %ENVDEF $DEF %N=[BG#=@@;],$IF($BGTYPE>=1,($IF($BGTYPE>=3,%B,$IF($BGTYPE==2,TRACK)),%C))
11 %ETA ENV=&IF(BGTYPE>=3,%B),&IF(BGTYPE>=1,[WT=%T][WA=ENV_WAYA])
20 %FAK M=FOLLOW;TX/=%T;;TXX=<10;TXY=20;BL=25;C=($SELECT(CAT=%K;;D=S;WAY=A;MIN=4;MAX=10;DELIM=";"))![SS:10];
21 %FAV M=FOLLOW;TX/=%T;;TXX=<10;TXY=20;BL=25;C=($SELECT(SAMECAT=%V;;D=S;WAY=A;MIN=4;MAX=10;DELIM=";"))![SS:10];
18 %FOLLOW2 M=FOLLOW; D=X; C=%N;*%VEH;; TX=%TX;; M=FOLLOW; D=X; C=%N;*%VEH;; TX=%TX;;
7 %FOOTER TITLE; M=NONE; AB=0; BL=15; IMGY=10; TX=%TX;; TXX=>95; TXS=12; Y=_; T=5000;
5 %FOREST30_30LST FOREST14I,FOREST14M
4 %FOREST39_30LST FOREST14E,FOREST14H,FOREST14K,FOREST14Q
3 %FOREST39LST FOREST14B,FOREST14C,FOREST14D,FOREST14F,FOREST14G,FOREST14J,FOREST14N,FOREST14O, \ FOREST14P,FOREST15C,FOREST15D,FOREST15H
12 %GBG ENV=[BG#=@@] &IF(BGTYPE>=1,(&IF(BGTYPE>=3,%B),%C));
13 %LBG AP=[BG=@@] &IF(BGTYPE>=1,(&IF(BGTYPE>=3,%B),%C));
34 %LTBG BG=100[B:0,20,100,160,#00C0FF][B:0,18,100,2,#C0C0C0][B:0,0,100,18,#705050]:..,-20;
52 %LTC  
49 %LTD M=PASS; C1=%B;; D1=R; V1=10-15; C2=%B;L; D2=L; V2=10-15; P=*50; T1=0.1; T2=0.1; %LTBG; FG=(%LTFF(%B); %LTFB(%B););
48 %LTDB M=PASS; C1=%B;; D1=R; V1=10-15; C2=%B;L; D2=L; V2=10-15; P=*50; T1=0.1; T2=0.1; %LTBG; FG=(%LTFB(%B););
47 %LTDF M=PASS; C1=%B;; D1=R; V1=10-15; C2=%B;L; D2=L; V2=10-15; P=*50; T1=0.1; T2=0.1; %LTBG; FG=(%LTFF(%B););
46 %LTDX M=PASS; C1=%B;; D1=R; V1=10-15; C2=%B;L; D2=L; V2=10-15; P=*50; T1=0.1; T2=0.1; %LTBG;
37 %LTFB 120[B:0,20,120,160,%LTSIDE][B:0,18,120,2,#C0C0C0][B:0,0,120,18,#604040]:>100,-20;%B;B:*100-60;
36 %LTFF 120[B:0,20,120,160,%LTSIDE][B:0,18,120,2,#C0C0C0][B:0,0,120,18,#604040]:<0,-20;%B;F:*0+60;
38 %LTL C=%B;L; D=L; V=10-15; %LTBG;
40 %LTLB C=%B;L; D=L; V=10-15; FG=(%LTFB(%B);); %LTBG;
41 %LTLD C=%B;L; D=L; V=10-15; %LTBG; FG=(%LTFF(%B); %LTFB(%B););
39 %LTLF C=%B;L; D=L; V=10-15; FG=(%LTFF(%B);); %LTBG;
42 %LTR C=%B;; D=R; V=10-15; %LTBG;
44 %LTRB C=%B;; D=R; V=10-15; %LTBG; FG=(%LTFB(%B););
45 %LTRD C=%B;; D=R; V=10-15; %LTBG; FG=(%LTFF(%B);%LTFB(%B););
43 %LTRF C=%B;; D=R; V=10-15; FG=(%LTFF(%B);); %LTBG;
50 %LTSB $SECTION LC=1; IMGY=150; BL=20; AB=10; DY=180;
51 %LTSE $ENDSECTION
35 %LTSIDE #0080FF
56 %MMC $SECTION NAME=MM_%N;; LC=%L;; POOL=POOL_%N:#Z&#O:NOAP2; $ENDSECTION
53 %NIGHTSKY $SECTION LC=1; DX=%W;; IMGY=230; AB=%EVAL((%H-230)/2); BL=%EVAL((%H-230)/2); \ BG=BGSKY/%N;(|[M]):,-%EVAL((%H-230)/2); POOL=SPACE; AP=[D#=X]; $ENDSECTION
8 %PLPDEF $DEF %N=[BG<=$1[OMH:%E,%M,#%E,,0]:,^$2;]
15 %POOLFLAGS F=SDEGLMFPUOXWZNBRCATR1234567;
30 %PSEC $SECTION NAME=%N;; LC=14; %SECFIN; BL=20; SEQ=D; POOL=%A;; $ENDSECTION
1 %REPLACE {%PICEX(%A)??$DEF %A=%B }
22 %SAK TX/=%T;;TXX=<10;TXY=20;BL=25;C=($SELECT(CAT=%K;;WAY=A;MAX=1;))[SS:10];
23 %SAV TX/=%T;;TXX=<10;TXY=20;BL=25;C=($SELECT(SAMECAT=%V;;WAY=A;MAX=1;))[SS:10];
19 %SECFIN LT=45; FIN=S;
2 %SKYDEF # $DEF %N;=([BGC=(180,210,234)],[BG-=BgSky/SKY(55|114|115|122|138|154|171|176|177|179).JPG:,%Y;;]) | # ([BGC=(157,193,229)],[BG-=BgSky/CLOUD(59|60|61|62|63|64|65|66|67|68|69|70).JPG:,%Y;;]) #
54 %TBFB M=FOLLOW; D=L; C=6-10*(%LST;); W=A; TX=%TXT;;
55 %TBFBN M=FOLLOW; D=L; C=%N;*(%LST;); W=A; TX=%TXT;;
6 %TITLE TITLE; M=NONE; AB=0; BL=30; IMGY=10; TX=%TX;; TXX=*50; TXS=20; Y=^; T=1000;