faqs.org.ru

 Главная > Программное обеспечение > Программы для Фидонет >

FleetStreet Script FAQ

Секция 2 из 2 - Предыдущая - Следующая

M$VJX![=.](0%<7JBK\=FV5;PK9<>DLOPT#@M/E1K`2]Q(V/I1[)([&AH?->L
M9U\6.;TS`."5O;NBW>>#%&@6VK_',:7Z7#DK])-J:O@U?Y:LS'C!+U6R2<G.
M'J?"]1N'C<:VU<A(N8%:@58VE7%"/I4G>?T>?C7O54+P\M-\4[2Y1]-2@LKM
MMN*Y?F#8A2EJNN]!@]9H7#1L*S`@T<0,O5I`)=I(3:N,?9`<EJ"LKPN1D<OM
M]?1H_.;F`6J/<S^]I?-WXU>1E<GWN1[V1D^_Z7]/.S^OH=&C2H>[[GX@@[AT
M$(`J`,@+``"G(````9UXHV,X9IHF%#4*`"````!S;F%M97,N9G)X_Z*$0B(A
MD9@``C/]B>]//\%R;)'>Z&H%J`;!-M$4!)LDU#;1(W""(31;J%K>K=3WA<$4
MD4&*`P&`R=M$D0F($P0B=]]]]]]]$$R0<(Q1SON/-@);PI_U5WF9>9NH$_3T
M^:^"W+RZNKKFZYO/PJZ_KJLRJK/^O>R[^VFT;":('_Z6_DC"6M_@Q/[>!FO5
M]0II:$*:C71BUETZ&.#A<+"W^$<ZDNXF*U0E2KD"JL@14WC5*RC1:(:L5/60
M=H5$"HJJ3EG(%JJ6RLGBK-40D7K>]$>MXPXTE5>52K3HTYN5Q\3I<Y0JRLYN
ML57GM"MNI:GNLX85H\[1K0MUARM4W5#ST-5>0LM&*FKH+],7YIKG1!Z^3'(2
MJX_6VQDQ+H<VX]!4$-!*[XC,"RFY/%Z(Y%XJ7&`;/,0]Q$BV,B/$HTK0**Y)
M&+1BA'-7FJLE4V;B9!4'SK*L`['GE@^=C>$10:],NJ:6Z7B%LZN9-<Q8%_,>
M:9;=8/#PM]Q/!P_`+!23_X(-OO1E6Q#GYRLKCXW%*Q5%LT67*NV-;$M[F-I3
M`MC?S`A.U$E:_$P:G#W9.^LW&'VYA5Y$EW`DXBWK.&\WYSSO7H10_1Z2#6:7
M35L*NT^HU/8=CJM77]EV?:6'GMG;;3TWI_48'J?5>KP?6;GO]UA>MW>\\#>[
M[?^"*@;PN'Z[U_L/8^R]G[3P\/B>U]M[?$XN*+'1Q^1C^+R>4*.'F>X]S[KW
M?O/>^^]_\#X/POA_$^+\;X_R/D_*^7\SYOSOG_0^C]+Z?U/J_6^O]C[/VOM_
M<^[][[_X/P_B_'^3\OYOS\T1#/&Y_Z?U=#Q_U]']GD=++_;Y/[OW_P_C_+^?
M]/Z_V_O_C_/^O]H6+V;*'&Z>VU=_W<]W96OHMEZ/7]OW#S(VMCL==9]KVWH/
M0P_2^DUO=>?V%HX$EDU3*V3,9_I.GQ:]!J=[4./HU\Z45,ODL0VD21&0M[#8
M7LXUT\]VG9+&1(2+V[*"Z&5I*DS;G2UIC;+Y8O%F6AYE&//&*_D<JHRSV'(%
MS!Q'N3J&02G>-4Z34LO4>_L&3'Z7+J,CL67J13JCV3%\02C500&K++_0..>7
MQ:@TX1<OT9/)Z:S05R\FJY4\XV-R<3INKC3N</=X>YP=]O<$TK#C-*8)S12'
M#/#=`F4B[34)_S'N&(FVVTN->/W>9'@MWKFCFEG)8I#IA^#0+VM0$7'I,RW8
M&`6G#&EB0(FL/KN)+F1F`WR\WZFJA\K8GR+>5=2'S6L>@X.9#66#.O;F/1`P
M6A8ME\K/-U,(H',FTKDO]QMMU%/`'Y,_43;S%LE<AZJ1+STX&!W5*(0EYBKV
M_!/:1U)>B6(O0`E?`DGS]Z*P34"`V1T:3%3Y.>$@''5$6ZQI2M[3%BRKUB+'
MF1-M1-%UFS0\#4;0T?&,1_F(Y,QR)%)38BZ5$!,.]"`T&E.ER6V;^#P-]Q-W
MP-R;_KPM[O,)C,.%O.#P\,60\=/,OV#\!32)U:5>)B:5;TTJ16<#27NY0,A4
M5H1`F&X,:H$#`VAJQH9"]N;,95"]LPI#9IBQMQ<N+F**^YA[V-?N8+1SRL_*
ML?*%-;N`H8-]6A*\8Z\_VQ2WI2OOC>"A#1J/3CD1KB:_4\T!HP6"W\0UX4`Q
M.#P?@@\WWD21.C/QHX$`:6M2,DIB6RU#I/%^60J`9:!Z";%Q8VKY#!*I:W$!
M7-IH*/\7'4.FF6JFI(0%/:V</8)*A*.&RP6*`V*2(>K"0]K>!YLKI7C9,\[N
MP49^NH4BT)Q5@PUS,HW?3J:#F*+'N+A*R2TA*G`:Z0R>@:;E8(/:,'N6>ANW
MFY!],*)4?&>5V6?FK3':=9I+F-<1)TB:DO%8#>,J:%B7Z=#/AK'0]^UJT0`U
M&G8+O-T@*J,69DL)VCW3H6T#D%)0+K6<P>&*=I2'<XL"N4.\FIKA\^.6XCR'
M2NJ6\:,L^<DR+E)XYQ`JG+I^`Z#3KMQU"")5V971*+2X<HM;*QUVRKT+PB">
M%G#D;@:'6@$)(#<,RV?JA_S50]D=D!A@,/?;7L[FN0D51%RP=3TC$)(Q;`"V
MKJ3>UJ?9F]<29;#,[>0$C&^)DSBFVY<0/M\ZV%0J.>M>\<&D4#55N=_?8&`$
M3P4[V!`UQX7Y5HUB5>69(&V:"3MM*5DJ;3%E3J*]8<A^W+)U1<3C::UGH%7A
ME\XK,MQL3G91KC<6Q%`G;8^!XQ[M^;Q,O>*E$.640R/JM#2I4C"$N.$)DXKI
MD)[P-4K1Z@M-18*3,BGV0LA[^DKM[EH9:@LND1QL1PRR`Y\UR>OQE"4<'-YI
M]8<T92;IG$*A:B$@-%U#+>:2@[TV6$Z!V^G0?=BH>@D)FPL\_0Y55!ZYF^2=
MOEJX76/!H+AGE>./A,M56=X88=FZO8[B^",8DP(;?&M]E6NN:J+8*UE"PF"K
M"%F6RWBWIHUY\F&N$XQI6:Z*!2P$YM<266V$S3HG(U,!N1,W7!X7`[_A8._W
M^&J0M5";JC255>X"MKYG*%DO.VL-=)^?1*M=/+CO#(:AYIAX4)LI.WLX]#)N
MP3$Y*:>5%@*-U:SIB^:4>"FZY$XS!?7`/+4WL68H4)C5)D`7,EVM)?86T5K^
MP<`#W81KUY%]UO$%8UEC!5N<"`I+`UFA$KJO29/V"ZHBJ)"DI)HN&)2?ZU>:
M><ALG-J-U'/BU#4=F'AJ4))0FJ5*LK6U[>U=OR@_!G29L>08%8,5FH$L&7EV
M;#7C;*?UK!8<+]1O[LY(T$#>H4_U8.(ZC!'P:971QJ8</IVZ\*/K&#[/P98:
MT&$^T!G[T[+/B[03&5P=H(^UC=$"<54;8ZGIE?BC>L&G'=U'DSIC=&T;ZIOU
M5A^M*#8@EX$S`37I;K45;2<%-:R7L:!3A!3MN!@&)#*-KED7H2P\&VM",/NI
MYQ@0]1O9[/UCC;2@V'5V+#_R#T-58Q3KYZ37%P2);&9T9*M+F%\K*UVGQ&!E
MOP/("-*:<C6`!FI6"AZH;IPI+=?.K'6>,30%UI3&?&Y!20CI2QQ0A[FHG%8A
MOF-:P_+ZIUZ4!Q3Y\*7JI(;*X<2I,8:]&:JJJF&SFW%B5#K5!23RUM&X**G#
MI\FLKI(SW06;/P^7L_U:)`K/7YGT3/FJQ#,*ED9!:-#:.]"LHPV?(;-(;-X;
M-8;/\T*HF"DB:EE:&RD&3U9E5W`6Y>)R$],`F\REU_KJ\R/9A\%([M3CE[.4
M@P`+48!O+!VPJB1AJ`*N@-V,UN;^==JOXJ9O!J=/>2A!]?H5_W*=F'Q8O/8.
M\YCU@IW9C%D"=YE03#*$RITT]*E^P#?N*;D:\C2S8+S;VAU_*=(0.U74'E.Y
ME50IP,!(X88<'3F44J&7E!(0U@0W0.:?%102J5_;`M()7:3MYMR9!+5T+5A+
M>()?+=8,^>'S>W(/2+'O`?I6EPSL32RGC<MS=6MRJ0,B%0^`D?(I[->!9+Y2
M%QL@,4T^KH;(XUVQ0#$8JK9_7D71=MN&EGW78O1YN('`6/C=<^)8+=<.U[WL
MVSKB-+/%F.5(O6#>,"ZE>E^G5FYR]!E>!>MHWW5;VM=8F]VJ["2ARIVC4L+J
MS\T#<%I(,Y&58K^JZE\W4V4]B<+OB_].Z`[3PK3DGQIS4\9"''0_KN\4_L[L
MW>(.RRYI]:JW]C>_"F4]_<P+^`7Q[M&%*_F8_0RO'Q^?0K%R?)..&??F489&
M/IN07;*"T.Y#'%RN3BA\@]D:I*\Z!-%:C,'T^":H0YPZ%`+A:WD*X5'E'5/=
M]>QI<V_G1Y5).9%N-O<]YWLC<7UO>;:3=$@_/^DW2]`<B751Z);N46'D=`^V
M@(.'7KE]$%BK?8A)NH]'5]?#L'+BK2I\2[N\P%N#%V[)Z:X:1=B;M4#.'_.W
M1K=4*M@-P6O9GT%_FIFA%)0XX"?6X/$:VQUO;619SKH(4@R3.?NB>;N2@`;9
M[(%+;XWNU"J)7R*JT.`>`,3MHL?CB>#B/>6T\E]OM/ZSN>W_JGYNM+`K3&(7
H2N/8X_/,!KH#B;Z+82'EGUSQ0IE4[7;H!.!:.>2XTV=+DL2XTWS/F`
`
end
sum -r/size 37840/5845 entire input file


>Q7: <*Д*>обавление описаний в FleetStreet`кий areas.ini (понимает DZ и NA
>   форматы описания эх) и установка атрибута "foreign characters
>   allowed". (Nestyurkin Nikolay, 2:5020/1404.77)

   Вот тут скриптик ниписал добавляющий описания в area.ini и
устанавливающий атрибут "foreign characters allowed", понимающий 2
формата описания эх + работает как конвертер этих описаний,
поддерживающий одновременно несколько файлов с описаниями эх.

=========[dsc2flt.ha]=========
begin 644 dsc2flt.ha
M2$$!`"+X!0``L0T``#37H4"4J^@V`&1S8S)F;'0N8VUD``(!("]"&NH>06\K
MIP(&JIUD#HS="FJQ:;G>$Z0\DN&?";329T/7@6\#\K=6+W^QF<HX8$X/^CM"
M[!62-^>$%AX.,8:1HFM=%9M6#'56>_.#N^"'CW6?;'MQ2#4#!(::=P3A_>FI
MM`I"A\:Y[#]QA0O=[150/"!3':%7Y0X"]*`B>,Z0Z,*;K@S*V@"BN`8FVEEI
MB=_(LLD^.GGKBSK;.%OY?)&%L*#H-:A(8OGX3N%!6G`]B*&/2RM,E$MRB.3$
MTT$U1+0%@7@MYN)D`5#382FJ'&3B[[^>Q\!24$%ZVE&'[Q2?E*4,\_O\O!Q@
MT32A[ZHRY*#8WR3#=-*^6>$NV-R"".;2)V\S.4_44;B5;EK0ZZ;MD)\69$4V
M:@G1G5[P5#PG)L/^4#>X5<<"48"WTQI^:9H.V?F54"6RL,-+FR#\+JW+2X'E
MKB#AYW06#R?V:R1IYF*SZYC<D"9'F,2N;V;QQ#B&=X!B_QJ[XN]4FC)VK2F;
M0@[VKZ^RKWMVZU[8\2/)YX$F@;RPWLKGI3H\LZ=$/+_=Z[C]R)EZJR$D)S5A
M:QO?2K$)79JQ,0V))2C0656O6L=07D$[,O*H6OU9DQ"=7L^BRDX*RD2:`#=\
MFL+5H1H^J6&13,L:M'(SX/2@`MZ5H)#WC$`AO9#)J\E_-N$VD]F@A(GV0(1R
MMF>@O.=_$!':Y`Y'!I*>6#&IQ\6A]+!-1[3:/VN^79E=^`N=/]G6F7<,=<!J
M-#EP>6P04`LV%5&PR'&9\=!5:_&C;#'?NAR6!W9&Q+E_F9L5IM`[DG[+4(GU
M%S^DF%^EU308'3#V#:<J)1VBCI:<`(\RK*I0:<G\7AO@I2['L0[;7BYX59W=
M=#TAFY5-QKYRM6=WPCU(&8(ZI"G3@:<92A$)\$5$&ID>1^O9K#/'-^O3Y\1-
MJL"9TN?O#B8I'X1F/>0\Y1Q7J-ZX@H.GPPSATNSN;AZ,>8FU4=!9[$1]GN"/
M[#^PEQ*1I(2:!(L7J5=#?U$=(>#G$37FI^W3IL$UW(6L$=:=OL38FG.3=A._
MYL?1EZ:*'&=Y%KT&7-)=$%/>$[=('F>*"E8B\^)^&B!]4MV[',W,@>**+!H4
MV.6!5[KWTSOV(92!$YC4`B\C.KJ[-8T@>R:W<B>^8O*WR5@U7;CFX8M+9EUY
M&RN4V%%0_),MJ/36_W`L"5^`C>\!6K2/*!\`]@S.C^1/>"LTB\7_^!,8>\-A
M51\#L=@\[%'^NQ!VJ6&TVAJZK1"][1YN^10?8^>7M@T\PD,8B/+UD4N'X;"O
MRR#<.N%;_I&C_NV7YP3W]M&WA?.L.ED6R.OGS5\X/O5E[?:I#&=0]5W4F_=6
MA0^-H+C?%NJ=`UPXVNCK(!`IW`J=A/2J@X&R&[N.RNEN2Y,*R,9-SB(R46PL
M>U)`A;F%["V^DPHO)S`S47T]?&Q7VJ=;@&.XCX'EX+T12\$P[H!&D*EEX_)@
M!9^14#:Y#&<<2A[)[9&:*=?U"-<_D4=,YO?E50KTX2U#S!I-],?3IHJ+CD%\
MI6&^D-=]8I?!#>85PE3*+[.AI*;DK8:BA]TY@NCM?'(Z^*3))(?R]G?A,SY'
M[.#I2A'X]*V`P$W(R'6?`<H*J!+[<\(`J^18L/(@0NO5#T+:"!&\/M07GHTZ
MS*B?$WXC'@V0^BJ$+5G1#]++$:)YWG)J*?:('`2<`-[4UTOEF&G^4QP/U[8Q
M?SK=A_0!UOW%I#GCJR+V$[+LP7-)^V1)W>D"!2I-N*ZNGRMBG_6;N)Y@'8@[
MR5P.FW*F.JOVF\6]P]11$V&NRM9)$LH)XO4=N(R@\I,DG>%<86B'/QQ"1$,%
M'Y\EMS7>/Q^]4T+P;H9'ABFI,:`P,'87!,HZ+!:JN'.^2_T3Y0].VR@>!04T
M*H5DX:(NP_3BR$YE.KT29:HDLWW6QZK8*N21-;.ZBCLPBRL_[:@1A3]@8BNY
MNBKJ0"\[[WGBY`$L;7*3(:[PJXR9`9YRP5Q"VL7E7CZNT"<T+7\<!!@2+?%R
C,W"D?=5Z9DY!4(&/KVLNJ^\F`205*)]KLM=+R@]_"L2J7\`
`
end
sum -r/size 50346/1565 entire input file
=========[dsc2flt.cmd]=========

>Q8: <*Б*>ыстро сохраняет письмо в предопределённую директорию.
>   (Nestyurkin Nikolay, 2:5020/1404.77)

============[QMsgSave.Ha]============
begin 644 QMsgSave.Ha
M2$$!`"+#!0``#PX``!I[:"#NSNDV`%%M<V=3879E+F9R>``"`2`O0AKJ(6G(
M\J_A\_)LQ2<5R:,YSF*=.>-1#GVZ8E2_V;GFZ"'#J39=!*5$>5H2"0UI@Q3^
MC@F#!Y4[:#NONU=5D-7A'(5!$A6&#VO6MX[<@#SK:)@ZZ.3>5$OUH9FN,WWL
M!API";S5)EI`R^=#]P@CQGR)M,\NB%RU;,M8UF/V@F:I2!:79F7,O5!98%L=
M@H*JR6[^.>2""E.AYHLT[(.:?-[0G'2>!S,A7P_]@G?&`M#G.TD-M3N2Q8/P
MJH@:44(I,!@,/ZQS?@K->9K,BN$Y<MA,#GIESFPQF7SQ'2+Y:*R#@_\6)J8C
MJ4^I9M3D'$:39AM6VTGZ9#39SM06P""*2C,2'E!I4-+.0$Q;E$[-.K:)%&Z.
M?M+.Z1J$-="?T7M%S[D`E*-TEX_[82>\"XP5)28=DUN0FWO+)R4"/7?B]=9[
M=`C&(>$:&8?1S2#*$EYO%\!JM*W@0PQA`Y1&P,@3I+:@$/L&D;N]R`MB'V>I
MTP`B)['5@WC%VL7[]8IHKNS0IZA[VE].8\X09KI-1U87B:V(IZVV0L-LE=9Y
M>S`6/W!(&D*=.IQ<4VA-)NCY!,OWE^)\_HJ$>SR=\E5ORFQA]`^0FJ-IM4K4
M5L^`#NLH"H3WBGLZ9.C.QJON+D^M,UY/(&3+\Q&9XJHCUX^CFIG"?XR_N8R:
M+AK#J$*^M>>>+_C5V&`#6,=#'PUX9GB7<]5D?><0=(X)<)5**8?.<$L_!F`I
MIXD$#2/V,%`N-$MKPC)_,I--@*GAGTQ?^#&B)3QVW-VTV"Q9T4NO7=UJ+@A2
M/CL)]V^<@OHW_AKF``(WI5+;RMKDFJ,8\5H3@9)KG"XCDD[P).Q.M_\_(&+E
M7QT?IG/,#RV?7![<>2"F0B8JQ&E"@J%1"C62T%IV<A`@U:?5@VD5#Q9T^+$'
MO?ZP*\W:0$9'`B-YVCE[)78Y)QGAK_LO=N90^3A[W[JUTL7]"H-5F$CT^4]7
M"BN#[9*-C9]@^>K<DISQ"%J=A-8FOM7;^E/3TEIS!S]2E$%QYB2LCQE+44A3
M([]@5'L;9OY3$*:?SGGNL2")J787G18#!R<)-SY'=K0,C*![W^`9QPFHB#`W
M)%.QP8%W!;!VAL=PR<7/KSC8MP7B,4"I._=^/`DH]>KWU?0=;8*A,SE2AL**
M*+T4'F/UH4#:=%__T!UBAQS(%GA_@IYVX/&A()KD#XE_K3().>)PE_&6;*,G
M`-6EB!""$K8#?=_YVD;VG:'AXWY6U=-E5DA91Q(OJ?PP7^UU#`85<,OV*F.G
M&KU:1T=RL=M1_VOLFDF!"T!R7\QZ1LHEV5@N+V`C_X<RR9=4^(T?M>RQ>P3I
MSLY0W]U<W-V;^99JL\_P@51A)M,1&-20"5,EA(?!?J!]?K/#<CC<H"\Q:<D2
MG?L?;>:UE:OZ7,<%H+Q`7G4C5]>K>`"P^^Q(2KS74SJ@&(7J[0LZ*34;C%L#
M`^B\U8@KX).1<5-!K+1NAV@D7,%#+FRQ:?I#N=C+D#4VGS]\B8I?"Q`TA6=+
MK.8.F3U$6:5CJ"[V=CCK<;QQ?H>62B\FDY^RAV15R`UZ%R:+.)]H:^$'T@J`
MZODGU]7)(R892\:,#'BZ:9?:RIO=:L@=>4%[0`F:%A#OSWS?+=HO\X8%"]6N
M1(J:=Y=-&_U)CYZ#+@!RWBD./2+6";TC?;*CU`'KQ\YC@E34VTW%AU]`&50&
M5%DE_MQIKG==7L`.OH*?F()1#HXL)""@D.0S;W(W;9`LDRQL=WSL9Y0^!<J*
M'>RA%8V"RX?/@2`]T2B\"/K")FGNTP$8,A*'5N>)@56166H-Z1AL(B61=8$!
M2.'^:\T\(HO`,"7MO9OU@=*C7E/Q.'H/OSP0HP]>>D+[,/L'FSX=^?EDW".W
M]47I?81PH[!(WKP>@)&"G\N(?<P\-;R:LI_RBPKZ#":TP_N?!R-V>J,S;O\G
<F<!E:1C?./-.82?_>(_^;5*"SPV$<,IOTB@J8`
`
end
sum -r/size 54722/1513 entire input file
============[QMsgSave.Ha]============


>Q9: <*П*>роверка правописания в письмах посредством ISpell.
>   (Max Alekseyev, 2:5015/60)

   Я прикрутил!!! Мой скрипт предоставляет практически все возможности
iSpell (показ и выбор вариантов, возможность ручной правки, пополнение
словаря и т.д.) и достаточно (насколько это позволяет FleetStreet REXX
API) удобен в работе.

   ЗЫ. Для тех, кто еще не в курсе, данный скрипт осуществляет проверку
орфографии при помощи iSpell/2 by Roman Trunov.

begin 644 ISPELL04.RAR
M4F%R(1H'`#O0<P@`#0````````!!EG0`@"L`Y@```*0````!<TC+('"1=2<4
M-0L`(````&9I;&5?:60N9&EZ$!V5$,R-```5U_\JCP>R2JF)#32:9";!L3V/
M1LH=4$`;"!M45LI-/`>`FDHL2&/:*VIILF[-DA"&]^^XT+&L$FT_)5T@,-9&
MP\#$`FUEXM^N\O,6)]#INS_%5">%WSG+YV^YR\7A?[[G3Z^5S*Y59X`3BQTT
MYF1,EC[)CS555(L@F1*3CQR<3+3C=121TB*QI:DJ9O=X1WXH<A@\7'YY.JG+
M9G)\M]!]WSP^C/R0^%9"9.<3D1>L3#*]U%4\Y/JP"7^!P;Z'P87O7S)WA_LB
M7T9,O,5+*?E(UB"-#FY=3(E)QX^]W@`U<700@"H`=00``&((```!X[$,G(B1
M=2<4-0H`(````')E861M92YT>'0JI+KYQ?_%<O-K=V`\WSUMD-V3OK#/67YE
MM+2U>Z2K1J,:=8FG47GTZM9:=2UUS?]6HUF-1>UC!)U5>STZ&C3T-($#"$"U
M%ITZ*U`@W]7/IU"%/G+%(*E6ISH#PN\1*E?4V1W3)&<4RU3-;+2TE])@JE6D
MRMF>N$%6@SX+\?TZ@UJ8,`CWVDL7YE?BLY/OM&#B@58ZN74"<7GV[L/E8S/:
M[/,\JQ)Q<%FCZR\$S1=I<,J5>J.2\5`<8.5T4-@L1H1F'>ISV&J0::2VHM27
M=VU%:AGE]&7UALM)U*;`8DIYO&C7)06TZ[*02Y%B<7K)A>[1`BHH0-?RW\&-
MF94$GRDK+42:!7VB!]T@H^L$;<3.HU%2M2&LIV^:,!Q<*[5E,&50SXK?4\0%
MN/A&G1I:S-V>0K6(\2HLKM6O4"PT67UF-+N+'<+VT1A#]S01+TM/M@6N!64P
M:L\GW,3Z?@TM4-]6M#/+)6U<"TYW='^UM1?NDK+T1NG74CO#-R%);(:W#]@N
MM#26$(*E>J).$1@,YH-*(>3VHS/I8[P:G2.C]*N9P]!;17V22DL%R!O:Y+.E
M<9(/X=1'WVSV)P@^S75M]+(5MFP43P+GBF>.>J4JV_7\*Y5VYQ/-9T()@4NR
M=)HX8<RD62"3[!)D>9$@FQ!I<DLK>*KKE1HB'$J6G>JQ>JFY16^+\5`)N>(0
MAVNFM4'$UJGF.1)D*3),L-GAS=C)&CR54WX@)V'M3M<4;K">)F;5.POL^DP)
M&:)G*=^N_$RS0%4,^&%+""79;+;8@TQ,\&@!+J"3_7<@(6FG4^ZGW&2?<PP9
M]1W-4\]G$ZEYI;AQ`*]7GK(://U3SFSCUW,EM-//4HPRJWSLW7!\=YXGA=/`
MX5JO`,YVH<S$%!*#26[HX@<L%8J,3]!@?]98*B'",NE$^_6@Z9YBOM-`L<"%
MYJA@\;(Y6+Q^.0!5DY.1"OR\5B8\G,`K',ES9$GJO5N!L&W:1JE$RYDR5@0H
M6;9(,J7)ZV<S""RZ$J`$(N9"R5)$)0X>W`AW]]+@_G4E,QZ)S`?<&9-CLMD)
MS(4U4#`F0<*Q?ID!9?HH-9B;`T;JEM^V[HZN`;6AOR?6).[,P??`0%KM=K8"
MK"&-//;=S:ML*=NDTTK))YA?`;VT,CF8F-\)Z!3@J+F/!P7<7@D^D2/'I1;0
MQA!:L\`?5O$84>>"W0$,QYTJ$&R`.X#(F!E,4%I6I,'#S`+%1B<(>50:%=\(
M``<#`>QW+C3=#^%RL[@3A?&::_L'8;AD@?W@08<&_O@J[,Z>@:IEC6L&?LRE
MK5AR(<DA>-0*7.14'HDUZ&K17*<'4^(F?7HSM4GD@>.W1]=-RT/`)=CZN620
MTFK6"0JM`U>Y26`)0D27[H".718THE&[9P;ZITRMHL&39"\::_@"HMT7:^L$
M".#,J=6E7U%C0"I,:C`KII^!C/-;N,-6%J,%X:WP:W_WCW'B[=P0>U>\X'L"
M1`R*UHVK&$,CL,^O6".+3L0K$."21\<(RRZIHY+P/G?P=[O`W4UT$(`K`!4!
M```W`@```28(3_L"DG4G%#4+`"````!H:7-T;W)Y+G1X=.,HJ`*\X2CC`%-?
M!OX<&'9N%PCWV;PT8IZ]30$)W1^#JK3-4^W;.UR><LXIU\Z-M(P$WU9<2UEU
M+A6>6YC7O#%PDVGFC:#8\=#NUG"PV9ZC?!+,\<P7C7_EP3::S1F@Q"JT1:D$
M;M??/T+-7G+AX)@1A#BHW?S0,<-_?/&&-1RRL,+.N.X,WG`-P\/W_-G?'M[!
M^E35,TS%P.T704N6D:6!VRK26J^)L>Q9$`@.RA#:-M;07;%*%-S3]4#4-X:Z
M[P,S7<8H2)>`R&N+F9(&E(00SQ?_'$-<=\/[P;U^9?K^Q/NV"^N0[9(84A"J
M)5^S421L4]-G-,2YG%H0RJSMZ\R.A^6^X$&^X5AC#&G#&IJ+TF*&]WBKGW00
M@"L`/@```%@````!-X"9LR8+(R<4-0L`(````&ES<&5L;#(N8VUDA;\G8-@'
ME*U#`GL$R,7(R,;D_"@$SD\WF$W\(U6F)))R^;BV7$?-PJ)RHLM5/89HJ_5;
MT<B+G&\L61E;W>!6J700@"H`L@<``.,5```!.ZRQ9)>1=2<4-0H`(````&ES
M<&5L;"YF<G@J^__!_@4`I^URU?7LT+;9A_HX]/FKD])\\_7K.;OYO][#G'^Q
MM?[/\]#<?KM;O#X->]N\OVHQYY*9).3,BM3)Y3*I=KMNC_9;Q7J5?__+U'HW
M^%SGG6'LGSL^[67WUD([J_33T1F<&K1/T(5K&#R!D[2,B(E[%&*[KVN%W)?2
M;0+9'$2C8'05SE9LQ2/T&V61_(*8Z+][E$EHAW>VYNBIE2=CS+-^3RY`2:1U
M%[1L^`!K:.O<Z8^0[?&1Q9Z7RV<3R\7&Q.3T'E270;VU>@\O]I$(=--]*`95
MU+/[X&_W'I)G3_$DQYN9(5B<$YJB[F+"%)AP.+`)#:P&']@DOA_36H#FYJ$>
M7-DS$XD-#T_J1T#EX3G0%&/\T)W&[89Q6=4YWQ\.1%CR>E$/T-=G8]AUZG9L
M(Z+[`MAN(5NQ"8X108RGN]^T93>YX/#0[W_/N%G`+O2GZ'WZ^I5T1<2S];R?
MM_E^_Z?G[/ZOZ?U_9_'^W\/[]CY>U]OV?5\WZ_\_[_GV_K^C]W^/T_Z\;G$=
MJGX*1[<XSD-'16/PP&&+';L'0..^SD*]*#S$^M,@G[X&-T3[G,M_BGH^K$=)
M>,G%RDY<'(FY/3>=^O%C@<,Y5(L8;_^8E'&YD2'8CCE2Z4S+?(<\_P22C/;,
M@@1\V0)9V2Q'?0B[*Y4E5\.+$ACAG`S($-_`1IM\%`E/SHF9>2G#D,%,PK%C
MS??$UFIT<YQ%"4%)PZ,C4/T?EY?]>!NGI*MH@MT/C\CY_!D[B-0Y[CI]&8Z>
MWM^7#KH2..\9]W4=:"XAPQTK"OVV:MYA!.;6+(RF_)'@/XWL(NEV7:P<#Z,R
M)?8).H;ZDV$8DXD4UOMD\67RYJ=E1>T;@V^C1$DK<G7/X<MWQY]@03*-QFS"
MG'/")?`EAQHR<HM:F"VJYR3J6(D8)F+^&3,/3&^4;=XX<?F2YDN+(5CQ1M'6
MQ2`DO\Z6P>3QEM0B[+AXF)CC!I(8$M`([.NNDY;!V427UOD,D$KIA\/)R9:?
M5?*E-^!][;\I[<PEWA%(X$+86TS;>EME'37.RRLL^?.8;V$)#?<<=BV2;?#M
MS1NGJD^U:AGL5!GE#I=T\_PG[5&QD/G_KGJR&(Q;23C(]>5SC.J5,JQW:.LR
M\><ULUVI>0\&Y(P<T-2D>814TW:6_O&GG**6>2MW*/<_'8P[5DXR]S')^*+'
M$/E2A*3,LD%IY+--_I`^I/152P!YYKAATW*^WE?O3L>,0&4-*`S2`S6!T[N@
M3IN*9:J)B)QS46F)+>`6W;4)$,2W)4`4-(?&)3`FG2P6@>0HJ>S.GE)75)2'
M(NN-93[;;^/97$!P;SCK>74D20YMXL:26#L4AQPCO/<DH:<O-4"6-F.@X5FR
MI4F7;*RB6GE[(P$B*[4+C%ZRDQ``Z!U;>_#PC3&NB+#B><SS*5#D'YYK7RF%
MU#UJA:,*2_?NM);B;3S4+T)E2`">`@=0R"/\$YSSV8[%"]H+$\GC1.)Z`X,'
M%R.)'5<=D%*4<B:V#]EQ9?)FS"0%#28DNF9/9KNR5(UHZX4&=$VKWJ4\>*"2
M3C`J">9Y(ANW'&UTKG%N(4.+$OID#M$OFV%^BPS&,QDF:'[FH-,#&?B,J(X6
MR+UV<&.[1$)8^FV*Y:_!&N.@2^CN<`:(AY_7[]^\KO!-'O.!N"`NJ2'W3''P
MH3F),AU`6:X2W;?XZG2RYAC6!E6U[X2GMVTW:7;BFF<99_C9%`CO7LW%@'/-
M&X6VY(_BCHUW1%N*D!\Z%'2O2R-Z9GAHU30M2=E\;H_X<BW5DIR\(G#:*F&_
MK['?IRFO(P&_PWY[6&R,9_;/M7YUS;!&BR@.R_FJ;.MO\]_L23U:;CX6PQ(P
MIFO':U4`'\V4.KB@!7CCI?8TA\_;`<C.E+T>$CH.T9T>9YLN5((^=2(+L$F(
M\!?NP_GB+QT(STB-.Z3B29<L*:>:DGM`+[VB#K&31`'.'KV4KHP16FU_,#T)
M>=Q5+9#,\VZ(NK$<;7U2PX;T5S<5?S(F9>0[K11@RYCT>1Y@8>JY+E^J?#ZW
MF$GD%D-TS[AFM;5'[EF7;HM2(+?EDS2#WX4PAGY1LNW;TDU=\,3528.]UM(,
M;@U9L)#FNXW.,]QP]I@"7#-&7U&@)0[_@>[P?>_%[_"%+"`*;I8159&X>;(V
MSR]L\TTA^W`QC7D.X!F3:&!YNO3.?.-6=TG.ER1Z,=NN7?/32Y=(]1/[C2(R
M)_]@5E%-RKI#'4V\W5]1LWFX'41S.,/DIDW+-C,[>Y4RW:\>="H]V<#2]?K]
M6S-APHUT6`&_^O[TQ,[9T#S#IF[C1S;%MYM%R`@B]O_<#^L8$.ZTBNYBQXT8
M3M&S;]#9N6))D)F=59=QHIB;3/4OBL<8)SLF3=SH?'E3NZ&%(FWZ!SIRA4S=
MNMSV7CS\H"@/>=:1O<%P0_OMZS?Y.)O>VF_)J-[EX?ACU]:]I,9].Z_!\'YQ
MKGY.E>Q4%'I7K@=QE+(E=+6D]WVV[>$+>@"-O&>!6[(-@77M'L%OH3047S\=
MGTV7(,8.9\6`21\DB)AR^D^1&>YZ+`1J-MHN:-G1(9R2Z[+#(X!LRX1()8JX
K5VL+Y$VQ=?A5]CE#9/G-,X@`G1+,-<W<"\X?;)8KAQ!KO]JG3^,@E]O=X`
`
end
sum -r/size 190/3913 entire input file

>Q10: <*У*>правление флитом из REXX. (Oleg Deribas, 2:461/13)

   Иногда может понадобиться обойтись без fleetcom.exe. Вот pезультат
моих скpомных тpудов на эту тему.

begin 644 PipeCtrl.Ha
M2$$!`"+[!```N0X``,1<I!,(K!,X`%!I<&5#=')L+D-M9``"`2`O0B0)4?5I
M/)6+YYB%S@'2,4!K[H>2#9\!S1_*XSCL,.,)T-GHQ/M87:B;&WP?X+!HY@Q[
MI#^%%2?\G_0-38QR]]TZB,(D'GZ$*C$9[>I+PX27-!-@(BN^)^&]MI"8ESLC
M:##71=LF$Q#MOT_0O#:<);9IVFK3?>WCP$9O4LA3"S?YT>-HD`[OFE#:JJU1
M+DW_^TO?!`2<;Y80$D"J="*AB,YP-^65-"C?UZ[Z5NB&0%=XEY.BATD1Z,^2
MPU.SJJJ,9E$=$KUUN(^N`]($$&IXB]:?/%H_6J+)$0"%BEJ/G92Q2>X(P13?
M]'=[*"BV<4S,C*47*_D(>+^D7Q$Q%J^&-\HIX0ZY-SW"N=O7+8P!<LT)9I13
M9&FXFXXN4>__IGU$;#-;&@.XZ(8H?DX!/84,AL11/R"5_Z1W`VUP=!P57DUE
MLO`2`.KT2)GZ)7X'?@7OBU2X.WFU&E9H`.G7'F6Q`+NUZX&$3?K`R#'B<OSE
M<"4,[GR\K@<K-\KKM.23]0U'UFK6`6&N*H<`S73LGVO,;RU^>B!+V*UXPIV[
MYJ&_>OA)]D[:?!7KYJ'83EX%%V#;$080F"EGCOM\2DVUM,7]0KY`/0V!<?R/
MP\YXOO]?#Q.+K,]J:=_+N7U=KD\(&+!MR%.M&V*J@OW<3"ALS=ZNDGZ3;4Z$
M@0R%PS7-"+_OO/8]RPEM(,<EU.V>:T*Z7GKY$^V'8P=C1L0<OLU5=0&W*2BJ
MV,/FF!C8C"M]S;-4@$@6W],9-'%XW0I3QF*V-GC]N\^?\AI#/T@[M*4W5ZW?
MW>P=YLA0<<7,,R`F=C@V=D\S'L^F_M,LZBM2,%!HWQT6A\6MEQ;866__+4/<
M>KB7Q2*@XI/&#0*DA6KG`2#&XIO>7L:B_`2=SQQ^GX^&2^SN29V/4*G&]H,-
M^IK6E<"E(]UJ%G[.K(^%,5ML3XAC(()K'&I_BXD0IMP@HWZ-"4M$#4NC/O.S
MNA)[G?*#UMD!PD=42U>6A=,Q![:=I1=SJHP&P!%YXD65O=6(`J592@%1VJF.
M='#<Z!#FPWC;^8;:'H`V(,$)%IYM,$,1R5X[9'E&0]`B$62)%%)-:_?4]_R\
M/XDUEM[3@Q@C3EU].D;_LJE8S_^,O38&A$,\JE5%[3=`343.#RU:LG^Z)""V
MX@^PJD6#Y(KP+3.*(0.;SQLBV0*(M("2GGI_'+!>70&NYZL>&&+P#QQ)@"'I
MZA7MSD>D]89Q2J-QU#<";9[E#E@KO]"BWJ:=_3>]!Q1GB<J>BWLIWW5?`'V$
MJ-:*`]!5Z$T></#9QB5;&"W8L,*DQ2V=J-O%L2I+:P867QK;&E_JKFXWP5,0
M3D=!P\N+&MI],W6('V+-?""NW=B#K*7/4Q:VK"RPZZUPB-#8CO>UQ#&2^.V2
M?5,VJ\(F9$KX^#T?L7/.@P1&KK'M-YGY$*>JUT;BK6%WHX?V)EKIF$#0ER`6
M(MN_+MK<!.JQ)SNFEO$!T0>>&3/;_QC>[BP&'N2E.A.+EWGBQY-,2LP=LKB4
M"25MG;L5\T#)#=%DI?F.1=EX@6LN:[YXBJ\\?_J(KVZPUJ">W-9366U,2Y0Q
M8'WE),VK$&)0N-(O!\@9JAC!AJFUB`O.&5"NLK>),E]RY6@G`W1`$`E%%Z7(
M[W.]@\Q%K34G]'(4_F-RR)#_X+^"T,QR2<I1%7_TQ,I5S<*.V3R@+^6/:\=H
(B8VY6BGXC(`
`
end
sum -r/size 47863/1313 entire input file

>Q11: <*У*>даление лишнего из AREAS.INI (Dmitry Malenok, 2:5030/9.22)

   Это работает только для областей, находящихся в конфиге у fleet'а,
т.е. область редактировалась или переносилась в другую папку. Есть способ
лучше. Ниже приведен скрипт, позволяющий удалить запомненные fleet'ом
адреса при глобальной замене, т.е. адреса опять беруться из конфига
тоссера (FE).

begin 644 AreasNil.Ha
M2$$!`"(?`@``#P4``'^T2J[(7Z4V`$%R96%S3FEL+D-M9``"`2`O0B0C0IAU
M,_CC-TF31G,T&S<PIBC.^"[6*54?_;/^9NZ!T8OQ\E"CPF@"TE.M\0KE2+@F
M<$$R7>-0W,U(.2<B,A9[V`@&(J1Q59DZ<DZB:@31(;L:.6UD/>Y9V0,Q3,;W
M)\`:@L8OE/YF)C5+:]KBPVO)"P#TUM:[9[KSZ":;Y/&<1^:S(3%,,T2&D4)"
MZAF`>EW?:W)`C]UX>,^:07`76X:*H?M1%AXQJFM",=,Y!5U8K&B_]8]X^.5/
M=9I2\)VN10Q:/GI9+6,,JS7$PS54S\@+/T#`7PQX(D0H,/#_(BIU=HKJ3,)N
MMS(0&3]LQ1JUC\P)=`>0WQIG'NP1%@('EZI?5&.<(@Y)[/GP=:&QC4?X,'?D
MD%:M`SEJ>P+EAJ@,2I4"#%D%HSS<8610GHCZ(#3]QJE3_74DFL]9TG?,6="'
M1R1LA+&7=WU=_CEHH[WV!#F>2,$G-\9L@5%=K6VZTXF7U/:@72O<+VXJFI,K
MI87[2MSI=@BI7`>HPA^3W(S*'9UTX/K."7_D/KJ$V:*)@'?K7'5+[4RX']:D
M\@*3O/6/3PWNU:Y-FURQ^=861D)[(*!HB#O'S'+`DYO&5?O.##G07+<Y#%@(
MTU<BSXUAYQ*6,$M;29KU`WY]5;U`3YXBJ(=HS'<,("^9(W55DE.]\0@H7W9*
IN:7D5/QF'ZN/4#57&X\X$MV8\X[Z>0X((NEK>!)G8UVRAF/@_)BJEHP
`
end
sum -r/size 95/581 entire input file

Секция 2 из 2 - Предыдущая - Следующая

Вернуться в раздел "Программы для Фидонет" - Обсудить эту статью на Форуме
Главная - Поиск по сайту - О проекте - Форум - Обратная связь

© faqs.org.ru