Article View: comp.os.msdos.programmer
Article #6260Pop-up program for writing whole screen or part of it to a text file.
From: bob
Date: Fri, 01 Jan 1993 14:33
Date: Fri, 01 Jan 1993 14:33
154 lines
9632 bytes
9632 bytes
This pop-up program lets you to write all screen or part of it
to text file. To activate it use Shift-Control-Print Screen.
Happy New Year.
V. Udintsev, bob@diorit.msk.su
begin 777 writescr.com
MZ5L+5U))5$530U)%14XP,2\P,2\Y,U8N561I;G1S978@*&,I`)``````````
M````````````````````````````````````````````````````````````
M````````````````````````0DL``````'!R;G1S8W(N9&%T````````````
M````````````````````````````````````````````````````````````
M``````````````"0+H`^;@$`=13Z+OX&;@'[+H`^;P$`=0HN_@YN`2[_+C0!
M4QXNQ1Y@`8-__P`?6W7G4+`@YB!8Z)@"^B[^#FX!SRZ`/FX!`'4D+H`^;P$`
M=!PN_@9N`1Y3+L4>8`&#?_\`6Q]T`^AJ`B[^#FX!+O\N7`&`_,EU$X#\`'4$
MN+JPSSP!=08.![BZL,\N_RY``9PN_@9N`2[_'C`!G"[^#FX!G<H"`,^P`,^`
M_"!U$CP!=PYT!R[^!FX!ZP4N_@YN`2[_+E`!^E#D8#PW=`98+O\N5`&T`LT6
M)`8\!G7P+OX&<`'D85`,@.9A6.9AL"#F(%@N_@YP`74B+OX&<`$N@#YN`0!U
M#U,>+L4>8`&#?_\`'UMT!R[^!F\!S\\N_@9N`>BP`2[^#FX!SU!04E-7!IS\
MB]CV)N<",MN&WP/8T>.X`+B.P`,>:@&'^Y**!SP`=`BK0XH'/`!U^)T'7UM:
M6,,Q,C,T.C4V-S@`4%%2N00`B]$#^<8%`$^+PR4/`#T*`'(#!0<`!3``B`73
MZTIUZ%I96,-04U%25E<&G(O8,N3V)N<"AM\R_P/#T>`#!FH!B_BX`+B.P(KB
MB]DSR;I0`"K7T>**SZRKXOP#^O[+=?2=!U]>6EE;6,-04U%25E<&G(O8,N3V
M)N<"AM\R_P/#T>`#!FH!B_BX`+B.P(KBB]DSR;I0`"K7T>**SZVKXOP#^O[+
M=?2=!U]>6EE;6,-04U%25E<&G(O^B]@RY/8FYP*&WS+_`\/1X`,&:@&+\+@`
MN!X>!X[8BN*+V3/)NE``*M?1XHK/K:OB_`/R_LMU]!^=!U]>6EE;6,-04U%2
M5E<&59R+_HO8,N3V)N<"AM\R_P/#T>`#!FH!B_"X`+@>'@>.V(KBB]DSR;I0
M`"K7T>**SZVJXOP#\@OM=`.+Q:O^RW7M'YU=!U]>6EE;6,-14%(RY,T:`]IR
M"#+DS1H[VG?X6EA9PRZ`/CP,`'0#Z7\'+OX&/`P>#A]0^L8&;P$`C!9D`8DF
M9@&,R([0O&(=4U%25U8&59RT8LTAB1YH`;10C,O-(;@C-<TAB1Y$`8P&1@&Z
M8P*X(R7-(;@D-<TAB1Y(`8P&2@&Z9`*X)"7-(;@(-<TAB1XX`8P&.@&Z,@RX
M""7-(;@)-<TAB1Y8`8P&6@&Z-PRX"27-(?NT#\T0/`-W!#P"<P/I@@:T#\T0
M,\"*Q[D,`-/@HVH!_(`^'0<`=!P>![I^!KD+`+@4`,TSC`8="HD6'PJ)#B$*
MZ,4!Z+,!Z*T`Z%\!Z+D!,N3-%KM!!XL/"\ET\X/#!#O(=?.#ZP*+#__1Z^-8
MZ(D!Z#@!Z(``Z(\!Z?<%P^@/`*$\!Z,^!\8&0`<!D.L+D.AG`>@6`>A>`,/H
M6@#H#`'H9@'#Z.G_Q@9`!P"0Z^OHWO^@/0?^R'D"_L"B/0?KVNC-_Z`]!_[`
M/!E\`O[(HCT'Z\?HNO^@/`?^R'D"_L"B/`?KMNBI_Z`\!_[`/%!\`O[(HCP'
MZZ.`/D`'`'1;BA8\!XHV/0>*#CX'BBX_!SK1<@*&T3KU<@*&]8K&]B;G`HK:
M,O\#P]'@0`,&:@&+\+@`N([`*LHJ[HK!,N2*U3+V0$+H50"+_HO()H`U,X/'
M`N+W@<:@`$IU[,,.'XO8@^,!="*+V;$#T^O3ZE!34NB)`.B#_UI;B!8]!X@>
M/`?H=O_HA0!8B]B#XP)T!.CO_LLE"`!T^N@,_\L`4E"ZV@/L)`AU^^PD"'3[
M6%K#4%-14@:`/AT'`'4CH#T']B;G`HH./`<R[0/!T>!``P9J`8O8N`"XCL`F
M@#?_ZQB@/`<RY(H6/0<R]K$#T^#3XHO(N`0`S3,'6EE;6,,!@#X=!P!T!U"X
M`@#-,UC#@#X=!P!T^%"X`0#-,UC#``!/&`%&(54(11*1!4(PH05+)=L'9B%5
M"&42D05B,*$%:R7;!U(3R`53'Z(%<A/(!7,?H@57$=L'=Q';!P!(TP4`4.0%
M`$T(!@!+]P4;`9$%``````!((@L`4"(+`$TB"P!++@L(#NL*#1P]"P!2Y`H`
M````4%)7M!ZP#K8DOY8(Z"C[7UI8Z<O]4%)7M!ZP#K8DOZ$(Z!/[7UI8Z;;]
M@#Y`!P!U`^FL_>AM`+0]NG,!L`+-(7,)M#RY(`#-(7*UHR8!B]BT0C/),]*P
M`LTA<KF*)CP'H#T'BBX^!XH./P<ZP7("AL$ZY7("AN4JR/[!*NS^Q;Y8#+T-
M"NCM^XK%!`+VX8O(M$"+'B8!NE@,S2%R:[0^S2'I//WHQO[H=?ZP"K0&L06U
M0[)QOE@,Z'#[OLX(Z.#ZNQD`4%)7M`>P#;8POW,!Z&7Z7UI8Z)H!OE@,Z`?[
MZ#[^Z)C^PT]P96X@97)R;W(`3'-E96L@97)R;W(`5W)I=&4@97)R;W(`4%)7
MM!ZP#K8DOZT(Z"#Z7UI8Z</\R<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-
MS<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-N[H@("`@
M("`@5'EP92!F:6QE(&YA;64@86YD('!R97-S($5N=&5R.B`@("`@("`@("`@
M("`@("`@("`@("`@("`@(+JZ("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@(""ZNB`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("`@("`@("`@("`@NLC-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-
MS<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S;P```````!0
M4U%25E<&H#P'BB8]!U`>![I9"[D!`+@,`,TSQ@8\!P?&!CT'#;]S`8OWN4``
M,L#RKD^+QRO&``8\!^C,_.AL_#+DS1;HL_SH8OR_<P&*'CP',O^`ZP<#^[N1
M!XL/"\ET$(/#!#O(=?.#ZP*+#__AZ\\\`'3+)H`]`'4(JB;&!0#K()"`/E@+
M`'074)PRP(OWN4``\JZ+SRO.B_=._?.DG5BJ_@8\!U!25[0'L`VV,+]S`>@/
M^%]:6.CQ^^A+_.N`@#98"P'K\8OW3H`\`'3IA_=7K*H*P'7Z3[`@JB;&!0!0
M4E>T![`-MC"_<P'HU?=?6EA/)L8%`%_^#CP'ZZB`/0!TM4?^!CP'ZZY73X`]
M`%]TID_^#CP'ZY^Z?@:Y"P"X#`#-,UBB/`>()CT'!U]>6EE;6,,`#A_HP/N+
MV;$#T^N`^P=_#;,'B!X\!^A>^^BX^\L&'@=7OW,!,L"Y0`"+U_SRKBOZ@\<&
MD(?77P<ZVG_:Z]3+QP9J`0``@#X=!P!T$8X&'0J+%A\*BPXA"K@,`,TS^K10
MBQYH`<TA'HL61`&A1@&.V+@C)<TA'QZ+%D@!H4H!CMBX)"7-(1\>BQ8X`:$Z
M`8[8N`@ES2$?'HL66`&A6@&.V+@))<TA'YU=!UY?6EE;BR9F`:%D`8[06/X.
M<`'^#CP,'\,>#A]04E>T'K`.MB2_2@SHN_9?6E@?PR[_+C0!+O\N5`$`5&5S
M="!M97-S86=E`%!A;FEC(&UE<W-A9V4````Z&=0!M`_-$#P#=P0\`G,(NIL9
MM`G-(<.[+`"+'X[#,_\RP+G_?/*NKG7[N`$`KW0%NL49Z]T>!A^+U[@`/<TA
M'W,%NO`9Z\N+V+@"0C/2,\G-(3L&6@QT!;H.&NNUN`!",](SR<TAN``_NCD:
MB_*+#EH,S2'1Z3/2K3/0XONT/LTA"])T!;HE&NN(NX``B@<*P'5$L`*T!;$4
MM46R);XY&NC=]KZ!#NA-]E`SP,T66+XY&NB&]K`%M`6Q#K5%LB6^.1KHN_:^
MY1/H*_90,\#-%EB^.1KH9/:X`<G-+SVZL'4MOP,!B_>Y(@#\\Z9U(.CA`','
MOU$8Z%<`P_KHI`#[OZP7Z$L`Z#L`N`!)S2'#^NA@`+0TS2&)'F`!C`9B`;_V
M&.@L`#/`S3.B'0>[+`"+'X[#M$G-(>@*`+IB'4+&!@$`)\.T`<T6=`8RY,T6
MZ_3#L`JT%[$%M2&R);XY&N@@]HOWZ)'UNQD`Z+3VOCD:Z,KUPU974%-2!IR^
M6P[\K3W__W074+0US2&MB_B)'8Q%`JV+T%BT)<TAZ^.=!UI;6%]>PU974%-2
M!IR^6P[\K3W__W074*V+^%@>!A^+%8M=`H[;M"7-(1^MZ^.=!UI;6%]>PU97
M4%-2!IR^6PZ,PORM/?__=!*T-<TAC,`[PG4$K:WK[)WYZP*=^`=:6UA?7L,O
M`$`!,0((`#0!P`$3`#`!3@(H`%P!``(5`%`!9P()`%0!@P+__\G-S<W-S<W-
MS<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-
MS<W-S<W-S<W-S<W-S<W-N[H@("`@5U))5$530U)%14X@+2!P;W`M=7`@<')O
M9W)A;2!W:&EC:"!W<FET92!W:&]L92!T97AT('-C<F5E;B`@("`@NKH@("`@
M("`@("`@("`@("`@("`@;W(@<&%R="!O9B!I="!I;G1O(&$@=&5X="!F:6QE
M+B`@("`@("`@("`@("`@("`@NKH@(&QO860@=&\@;65M;W)Y("`@("`M(&5X
M96-U=&4@=W)I=&5S8W(N8V]M+B`@("`@("`@("`@("`@("`@("`@("`@NKH@
M('5N;&]A9"!F<F]M(&UE;6]R>2`M(&5X96-U=&4@=W)I=&5S8W(N8V]M(&EN
M('-E8V]N9"!T:6UE+B`@("`@("`@NKH@(&QO860H=6YL;V%D*7=I=&AO=70@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
MNKH@(&AE;'`@;65S<V%G92`@("`@("`M('=R:71E<V-R("]L("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@NKH@($%C=&EV871E("`@("`@("`@
M("`M(%-H:69T*T-T<FPK4')I;G138W)E96X@("`@("`@("`@("`@("`@("`@
M("`@NKH@(%-E="!A<F5A("`@("`@("`@("`M(%,@;W(@3&5F=$UO=7-E0F]T
M=&]N("`@("`@("`@("`@("`@("`@("`@("`@NKH@(%)E<V5T(&%R96$@("`@
M("`@("`M(%(@;W(@4FEG:'1-;W5S94)O='1O;B`@("`@("`@("`@("`@("`@
M("`@("`@NKH@("`@("`@07)R;W=S(&%N9"!-;W5S92!C:&%N9V4@87)E82P@
M:68@:70@=V%S('-E="`@("`@("`@("`@("`@("`@NKH@($1E86-T:79A=&4@
M("`@("`@("`M($4@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("`@("`@NKH@(%=R:71E(&%R96$@=&\@9FEL92`M(%<@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@NKH@("`@("`@069T
M97(@<')E<W-I;F<@5R!&:6QE3F%M95=I;F1O=R!A<'!E<G,@;VX@=&AE('-C
M<F5E;BX@("`@("`@NKH@("`@("!%9&ET(&9I;&4@;F%M92!A;F0O;W(@<')E
M<W,@16YT97(N("`@("`@("`@("`@("`@("`@("`@("`@("`@NKH@("`@("!!
M<F5A('=I;&P@8F4@=W)I='1E;B!I;G1O('1H92!F:6QE(&%N9"!P<F]G<F%M
M('=I;&P@8F4@("`@("`@NKH@("`@("!D96%C=&EV871E9"X@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@NKH@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@NKH@("`@("`@("`@("`@("`@4')E<W,@86YY
M(&ME>2!F;W(@8V]N=&EN=64@+BXN("`@("`@("`@("`@("`@("`@("`@NLC-
MS<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-
MS<W-S<W-S<W-S<W-S<W-S<W-S<W-O,G-S<W-S<W-S<W-S<W-S<W-S<W-S<W-
MS<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-
MN[H@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@NKH@("`@("`@("`@5V4@87)E(')E
M861Y('1O(&1E<VEG;B!F;W(@>6]U(&%N>2!S;V9T=V%R92`@("`@("`@("`@
M("`@NKH@("`@("`@("`@("`@("`@("`@("`@("`@(&9A<W0@86YD(&9O<B!L
M97-S+B`@("`@("`@("`@("`@("`@("`@("`@NKH@("`@("`@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("`@NKH@1F]R(&-O;7!A;FEE<R!W:&\@=V]U;&0@;&EK92!T;R!D:6=E
M<W0@4G5S<VEA;B!C;VUP=71E<B!M87)K970@+2`@NKH@("!W92!C86X@8F4@
M>6]U<B!G=6ED92`M(&UA<FME=&EN9RP@<F5P<F5S96YT871I;VX@86YD('-O
M(&]N+B`@("`@NKH@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@NKH@("`@("`@("`@
M("`@("`@("!792!A<F4@<F5A9'D@9F]R(&-O;W!E<F%T:6]N+B`@("`@("`@
M("`@("`@("`@("`@NKH@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@NKH@("`@1$E/
M4DE4(&-O<G`N+"!-;W-C;W<L(%)U<W-I82`@("`@("`@($4M;6%I;"!B;V)`
M9&EO<FET+FUS:RYS=2`@NKH@("`@("`@("`@("`@("`@("`@("`@("`@("`@
M("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@("`@NKH@("`@
M("`@("`@("`@("`@4')E<W,@86YY(&ME>2!F;W(@8V]N=&EN=64@+BXN("`@
M("`@("`@("`@("`@("`@("`@NLC-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-
MS<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-O`#)
MS<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S;NZ("`@(D1)3U))5"!C
M;W)P+B(L("!3)E4@4T]&5"`@(+JZ(%8N561I;G1S978@@BZ3I*BMYJ6B("AC
M*2`Q.3DR(+JZ("`@("!74DE415-#4D5%3B!I<R!U;FQO861E9"`@(+K(S<W-
MS<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S;S)S<W-S<W-S<W-S<W-S<W-
MS<W-S<W-S<W-S<W-S<W-S;NZ("`@("`@5U))5$530U)%14X@:7,@;F]T("`@
M("`@(+JZ("`@("`@("`@(&]N('1H92!T;W`@+2`@("`@("`@(+JZ("`@("`@
M(&-A;B=T(&)E('5N;&]A9&5D("`@("`@(+K(S<W-S<W-S<W-S<W-S<W-S<W-
MS<W-S<W-S<W-S<W-S;S)S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-
MS;NZ("`@(D1)3U))5"!C;W)P+B(L("`@4R95(%-/1E0@(+JZ(%8N561I;G1S
M978@@BZ3I*BMYJ6B("AC*2`Q.3DR(+JZ("`@("!74DE415-#4D5%3B!I<R!L
M;V%D960@("`@(+K(S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S<W-S;Q%
M<G)O<CH@5U))5$530U)%04X@=V]R:W,@:6X@;6]D92`R+#,@;VYL>21%<G)O
M<CH@5U))5$530U)%04X@;F5E9',@1$]3(#,N,"!O<B!H:6=H97(D17)R;W(Z
M($-A;B=T(&]P96X@<V]U<F-E(&9I;&4D17)R;W(Z($)A9"!F:6QE(&QE;F=T
7:"1%<G)O<CH@0F%D(&-H96-K<W5M)``D
`
end
Technical Details
Message-ID:
<ABHP5HhGX8@diorit.msk.su>Path:
arc1-ca.pugleaf.net!sparky!uunet!demos!news-serverShow Full Headers
Complete Article Headers
Newsgroups: comp.os.msdos.programmer Path: arc1-ca.pugleaf.net!sparky!uunet!demos!news-server From: bob@diorit.msk.su (bob) Subject: Pop-up program for writing whole screen or part of it to a text file. Date: Fri, 1 Jan 1993 14:33:54 GMT Reply-To: bob@diorit.msk.su Organization: Diorit Ltd. Sender: news-server@kremvax.hq.demos.su Message-ID: <ABHP5HhGX8@diorit.msk.su> Lines: 155