[comp.sys.ibm.pc] Program to SET long PATHs

mlord@bnr-public.uucp (Mark Lord) (08/09/89)

This SHORT posting contains a program & .DOC which will allow
setting of PATH and other environment variables to longer than
the DOS command line limit of ~127 characters.  Works under
DOS 3.3 & 4.01, but not under 3.20.  A more polished version
with TurboC source will be posted to Comp.binaries.ibm.pc at a
later date.  NOT a TSR.  Suggestions for improvment are welcome.

-Mark

begin 644 appenv.arc
M&@A!4%!%3E8N0T]-`"4E'P8```D3!P11UM0'```,C)2Y2&3!F@!:,)J%6.1"+
M`(!%'E@`<*1M5)X#C`S<.9#(PQR.+B8=.&:@SX%__]!-"$#,1YP#BXXMPI;KU
MWQ\3@7K@N%$G@XE%500`TM>C#@1`YK[]*WD`D+\L=0@L-2G/U;@P0TS@*%#':
M&J!F@.YE2^3@9:X``*:-&S0,P:!Q^#K6P:AMA;I%/@@A"/0/@("/O_PFRKOWW
M&#4$<E`,\"$(L8A8!*:].[+CG9P,@P@#H',@<V,`=1P$AE!YXZ)^ZP:D`Q!@+
MT;<!VCHNXNCAT8%0&U=@<P2,EI(K"K],.Z?/D;1%Y_;-`.;"D0&#OQPAR'5X)
MQ;-YJAS\LX`(`3IN`=`1.PB@F0:"?S@Z"'32`B,$_VR\.6FC#?TU!]#Q`@`%@
M7:``S7E@$#I;`*"=!8H@L`@[M#"AB!$"*)2+`P!``H`N+QR0SB$`>(`+`#4H6
MU-$6&!G0Q0&X$!!B"!U]46(8*!:P8D=CE%@&B@;,Z,$9)::!(@`E!$21+C9$K
M&,('PW@(9#$6D*C0!QX24`*3+C[I80%36E"CE;@8D"6/3PY#DDD``+#,,+0`5
ML8M#"@V3BP<57MC#`0$.F,X_N`S`'SI*]`5`%0L.P@X#5ERQB`T;K6,`,5[08
M\],-BUB#BP4`)&*%/8D80<],C@CSTP$[&%,'.8MXX\@PNTCTTP7+6:I/IO@L>
MXH4^2YRZBYX__0#9<.M(900^3S"*CPF`_`#:/,(2^P=:=:2SB`4;X1)(I5;XU
MDRD_C/)#[`\@U#'`/T;PLPX`3_AA0;;@:JO(`<*".RPB!_#00!WG)&O,`0#\Y
MXP0^]N*K+[9>:%ML`W04@`M:ZPBP7'\(`)#%%UXL4DX7PPP#*#OK*`"1(0A$U
M,\X_ET@7"L?_.,#Q`L#4L<YV?,!G@1\N`P*?'02@,\53%%=H@`N/&`#-`"XP/
MXH$T`_#CW$:^``*`#.28P`H0C!1SB#63'/K2(,8(<!8`@/APT0!R1.#<1XOX4
M$\L?,@!3U3AV`!+/'X(*<#```PPS0#`E^///(ORL@(\<8"#'"#".8,,(-+Q%_
MD<0\I*2MBB/='"+/(=DL,LPBT`R!3@8`;"0'$.A(T'D^/(!`!P+RTD$`#PG4>
M@4[:ZY"#,F="J*)`R@$,80@X:><S3@6L),&""'0\0(`(/'`Q%R`\B%"'`,$OH
M8,\PZ=CPU``".3+T`!WA-\0`VRRR*3LKK".'.1(GXH)]XSB0B!T`#%*,`#:P8
M<CLX^M`!3ZM&`.#"/R;XV2+*<H`HH.,(`<C"(O`Q.Q)XP`,'T-Y'9F`/?C#NW
M`PLT0'SF@HX4!&`0XYG)`48Q'Y1Y*QW)Z,=R:O*/1/R`+0*HBE:X0H]$',!B,
M@?(!Q[IE,(158!%&(,#&.C:.1!Q".DOAV'+&1;&+%6H1?A!B$0PP"F@@8`?'Y
MJ`,"2&+%,JT#`HN("D2LF(@[$"`49"2"`2#6Q`4],8I`-$`*"K"(&@S@'G$$<
M0B((D`@^""`4SKAB%@V0"!L$<AT*\L<`_$#(YRW"&`4@``#&Q48<LL,*0"3`;
M#*11`I0$0AQEDD)_Z.$P!<)C$'J+RA(Q`$@$)(((`LBD'OEH2`2T,I*3!(`7<
MVGC)3&ZRD__X9"C[<XM2+N*4J=0D,-91@4)*PY6UE.4>'XG+<>W2DF\DP`+^`
MH<IE:B$F!5@`D/"Q-WQDYIF@.<`5T!&*?V1A'4(XE!4?.;L8+$*(UQB$,%"PQ
M`V'((0%7L`(Z&N#.=Y+@GEB4@P,$&HVG_$.(D)3D%Q=!!P/LP`96K,,SUBD"I
M=U+RFA?+Y"*H$0AUL*:?'QE%(0ZPQ`609`\':!@N4,)$2XK4"@88@`%6.@AI!
M/`09@0@&:WH*@`5(HPX*V`$SYF"`0^ST`.MPJ0%@*E.:`H"7_Z`9.C[AT:O:#
M-(B9$"4Z9+&W<M2T0@Z@0AWD((8WM&`((&@!"(;P!CCD00YI.`,:Z``"%(PA#
M!2"(00YP@`,0".$-<F!#&-Q`!A`DP0UT8(,+`$"$--@A#60H`PC*(`<Y(+8!/
M"@B"&-R`V#:$@0T@@(-GSR"',+3!=)QM0QK<$`8ZI.$-;@!MA5!PF-XV#!+SX
M`,4`A"O<,@$``F6"A0"4>PN'0,((&@A!4%!%3E8N1$]#`"4E(00```D3KT6LG
M42(&```,#10$@0*EB!,K(%J`&`BEC!LR(.B\`6'02AHY;]RT<4@'1,(6,5S``
M:*$0Q)`W</+(27,&34<48U*`:!)&SAH03-[((<,"1(P<.'($#&BD3!DV(,S(M
M,1IQXAB4>7K6F5,&1)B'+W2":/.&3!HS>2*B23,GJ=:K8=UD;/&TS48Y8]*$[
M81,03ATY<-Y013$GA0N/4-B4"4,5Q!JC<,22!?$TY<J6'=$,)E-&#H@T;D#`1
M81-F3!D70Q5X!$%E;%F,=>A@KCKF*@@Q5:>6@2@1Q!L[E=M6I2,9!)$G4WS*1
MN,$83<W.="HS?N/V*IF`H]FL!B&]31HZ851G!'%'<F:J=%2[.0/"H9V+&3>ZB
MZ6BGIEPQ@LO.J3,&C=6R4()000):`72/5WA7!FZ6-3'%;\&A,(,+,\@T11%4_
ME.6:>>AIQ!$([:T4!GQE]'3=91*R<4<8>93%%6[/B>91;;Q5Y1!$;Y@A5E72A
MS=$19C.6Y\9Y&%FX'@ASP-'99QZ5MAAJXE751AB'S?$?"++9)B-OBYF!7%-6Q
MP0''BR"0D5T86+:H(XQ3]B8F5S:"L)1GZ[&1QY,/4H&A>QL*=EEF9Q*6G&4HG
M#/%$$TT$X001+OC9A$P4]J@>'?T]^41F9>!Q74]B%B&%%$](P4015A3!!'=I(
ML($4;$"6T5%M,%PFXX"5Y4'E>"#:ML9?("119AE/SI&&'E7%V.676)(:AI8O`
MSE8>'I[-5I:82C$5Y)!6M1=JG57AV.*3B:;'$:6]>8E=K'3(48<;K27'DU4/%
MY6@IIIIRZFFLX&$94FA%X!%&&YOU*F.4=UPW5F9!5$'%$T5@4<00+@BAGPZA[
MC19O?OOU,(8.7(B!V0X3<T&&7CN003&5<W!!%A=A?$%@'ESH*BK*;&1TAI"\D
M/3GLECN"@#'%LUW7,<5P8-16&SN4\;%I,*,A<LAGF"K>&5RT/%YE3WY5GAP8C
MR2$8;DC%4%Y]$Q6Q8X6+@OO&1',L*6H(:,M,;,T[<T''&&W304;<A`$M-,D/)
M->TRU"JJ.G755Q_ET]9H=/VUHA<N)A'99K.!=@BA&5E6ST>E89T;-85%H*[;G
M+;:&6G?@.=$=.MTT+F4%'@@<"`O.T!-AW!U%EP*P0S$$@B#0(%)('B'QQAVL4
MRN'AC65]_GMF3CPA9VVDVP3E0\H9B/N",L#`0D#.@6!<66IU!)M#$95AH[&G"
M*X>6;2U:MGD:&97E*QYX(-BH`I+'FKR<8%(QA12T3J&3'&'9T!M2DZ-"_0E(R
MNZH*7Z0#&3=11WS+,DYF9+"$%%Q/`6(@X(=&=)K!K*P\A`E+;39V)]+<10QO>
M:`'"//*HK>@E,C6!B%?FL(8Y#`]4H@J(C4*%%#-\"#.U`9.NQF.G,;!A*GOJ9
=R1PF(B9=\:I+;Q"?&T[0D:7,Q8%+"D]EYJ<!&@`!>
``
end