W8SDZ@SIMTEL20.ARMY.MIL (Keith Petersen) (11/19/88)
Posting-number: Volume 01 Issue 024 Originally-from: Mark D. Pickerill <no email address> Submitted-by: Keith Petersen <W8SDZ@SIMTEL20.ARMY.MIL> Archive-name: elf/part1 ELF is a program will set the specified error level for batch files. It was written to fulfill two needs: The need to allow operator input in batch files, in the form of Yes/No answers, and the need to force ERRORLEVEL to a specified value. The former function is available in several programs, but the latter is not. ELF combines both into one easy to use program. It has two modes of operation: 1. If invoked by: ELF <CR> it will display: (Y/N)? on the screen & wait for one of these keys to be pressed. It will then exit with errorlevel 255 if N was pressed, or error level 0 if Y was pressed. With careful editing of prompts in a batch file, this can be used to make run-time operator decisions in batch files. 2. If invoked by: ELF XX <CR> where XX is a two digit HEXADECIMAL number. ELF will terminate with the specified error level. This can add error level processing to programs that do not support it by chaining to ELF upon termination. The ARC contains source code (A86 assembler), doc file, and executable. --Keith Petersen Maintainer of the CP/M & MSDOS archives at WSMR-SIMTEL20.ARMY.MIL [26.0.0.74] Arpa: W8SDZ@WSMR-SIMTEL20.ARMY.MIL Uucp: {ames,decwrl,harvard,rutgers,ucbvax,uunet}!wsmr-simtel20.army.mil!w8sdz [ Enignmatic public-domain-but-can't-be-sold status. By Mark D. Pickerill, 9 Sept 1988. checksum size (bytes) file 23974 6107 this uuencoded posting 13212 4412 elf.arc -- R.D. ] BEGIN--cut here--cut here begin 0600 elf.arc M&@A%3$8N03@V`%Y>7EY>KP@```<1``#;<8`.```,.U1`0M)`0<`$D!*H*'BP M"!,C+H+@L.$"!`@J:-+,`3&'3ATX:<B`@"/GS1DY8=J`N).N.9>B`H(.F M#$<X9<:D,9.FC,@R<DK*`<&FC)TR;!8:5)'`S)NA8L+0&8,&!,^B<RJ"2"(3 M39B-=.Z\`='F#9DR&]^8`?$&)THZ:=ZXT6$QR=HT;NR\6>,3A)@\.I0V?`B" MQQ`I/D"DD<G2)0@R&N&P"0,8!(HL+YRD^,'6S<R:',?(*5/&LXF5819;?=JY MC$*&3-5^1FN3;QZP8\78)(EVCD^M7%>V?$FS-(@R>%2SI'D\Z-.B1U\*9BJC M1@W%:YV@WLA[CF\R+-@.!2J4J%&D(&!@!Y%E^\C1WG];O+(8S>NE"<:$&6VF MSDN?B^%U!EMKD?1&&W#0L1%>((3AEU146=52&>'1I!$(^GFF&PAU?'??072, MU488?($@1QUNM`!7&S:U!914K)VETQQQN;&@AA!6=15:+B3P(5,8V>3;&'*) MA)=>^L$EEV)ST`6"0T:`@`46A1WF0P)7U#2:E%1>Z&!88T%VAFK3)8!$$5@D M04010R311!!,@.!&'6WH)H=64`KG&!U`M8&75#8M5U5Q-^6T4T]D_)@`>:Q! MAY16&%V888-D_.3<4(Z^9.`8O0DXTU@&GI32'(K2)-5C8[GQADQS?`3'4S*I M]A>&7N'E:8A/$O;1DGS*X:<;4M788YE2E,%BG4!]=BJA44VEXX1/2B'%$U(P M4805#F%XX(ANB"07&WDT.`:G"9):IHQIC/@22I#AT:`<9]!9FH):(8&<>QWV MY=10>;Y1ATRRP5'':(I.I@=>O74VVTC[`;P6H:&BU`:+<H0`@H^*7B''8GQJ M6!D(3>RW!@A$5`1%&F/PM;%+">0`PA1E)%A1##G@@`.DH.4+51G[F0M;`F$X M!M^K-J8A!AN+A;OO3&C!Y<:`I^6+)V$=A='M1DNC4$0*ERJ*`A,IG/<2"D:D M,&%X0=/D[QF#@@8LB^[A-0=(HXDT*Q5OL+%&3VZPH&A96YKJF=5Y6/CT<6SX MIM403TSQYA`<^B8'6"3:I"J?(?A89D+3#500Q@GL4-!A.B101!15)``#$4CX MN`,(0^RW<1AGV#2:1W*X4=!#I9^>.@Q!M!XZ"$P@;!5I9!14Q!-&](YZ`C$$ M[_J3W1(H85&?8RRZ`@E0>X3J,<``@_"O3T%'P];3`4<8V;NN/.\)*-$$%`E, M04404E`QO1)TPL%P1\<YPUB&I"3=<4][GR."$!)P&!8\A`4G@%)XBG`IXHD- M!$:8T`D2N,`&/O`$0@A7$UQ0,BA4Q&4PDQD(:&:S$[!@>49H7^@*8C_\4:%T M4*C"%%HWA"E,#V8R(8-4'.2;,[#(#73X'!2>0#\B^'!X7#G!1GR31.[E<(<) M<.+TCA"3SURHB$>L8@*62+\B//%U0:@>%8^SD:^L!"EL^%P3GF"%^B6!!>+# MP?B&!X4WX$4FN%J?Q&*2+)X@Q4B>@</<Y$A'!C*!!5N80A*ZL,4N"C(EA,14 M:<Y`D\]1RY$L&`(3IF>$IW#**I,YPQP^IP0M),`)3,1?$\Y(LK'DX04&3,`< MZS@$).!QC\/3`E#&0I7=/8&),2A=$IPP!#M.KX]__!1'SB<'AS%LD+U:)?=V MF0`X05*2E!P>%V7R%SY9I20JN22+>B6A0WYN"//KYB-/`((3_'!]G/K!YYAP M3"BXDI_(G-X54B,3%,'E)7GP%PAJ)Q,'J2I%<PO#*:FR'U:Z$I90D"4MB6!+ M7#*RCL%C`9PJV95[450.GUMF,R4Y/2<@IZ3N.NE'Y?G-29*4*'/(Y1#@-,HC M%($*9\+"](8@EZ-44YHUP</GL-#+[X5TI,,SWU-L<IK;;>P\9,GI.WF:`)\" M%4U#+2I0Q,A4)#C5EU`MWW(B%)64?2X(1"!"-]%*/M@=""<V`A2'X.`6.>5! M#$<KPUOC.E>1DF^P<GWJ8;D'U\32=7I/6$-XT@`&E<"E;M8KR?GX-(<0>%(* M-)7>\"+[1CF]X0X@\,I1V#(P.=')3C,-*0UZ.;TF=*@J9'@#6/KT)SZEU`GZ MDT$,ZDH%W@++G((JE$X,::GR9$J&V_-J4$L'3_IY4P9&J"L/9&`&?7)/":.D M0A&DT(2P(K$D;)CL&50UFG?&TYLTL$%=?1!?[\;O>^(E[_2JP%>@M$`_OEFH M>!HDAC<<1;WL%2SWJDO3&>1`NPZV+WB+\,HJ-$$(XYU>%-OH6F2A=,'O?20- MACL]'HQ8PN$=;WFA2`<I-F@D*!J#1X(EE_#$9`RO2\-ZI[J[G^:W=(VE*0P> M/#V7C8@O8`%-XMS0@Z2"P*@T6I)L\"*P*CK!PAB6`I"=D-A'PB"[/Z3#QOS7 MAIR&Y\AHZ;"=-N+DTY"A?]H$W>NJX!NL;*3,GEE:4>B0S<])X:?:`X%+*WI` M]RD@OTTH'3>#@`46S!8&)'[=$?83E=I=$Y-]YMXR@TOB&1;:TTTPXQ2"X%,= M*#`!)[A,9C9#`GN^+@IU:%J-H%L0C&I4!XOVY9#K"H6-(7&:OAY0?]P@XUES MSUI!R&*C0SV%4?N4CWY$XF\Y75>.*L;*3"R"HAL94DC7E:@VRIM-J/RO:2=` MN'4=)ZT(W4TNT[0&8!Y>R$KDJF0!6,$,##$$LV#/X64!+1)V91;,.+U_QYG! MWCR!$_K].B>\(>"O?$+!T<+*>&*4PN*D-.THI)@=M_?3VQOX%*C+U<,\Q'53 M*`*785>M&&Z3VXU^]!Y?1T'G7E`]2\L#Q34-W'-W^G57*,,)MI21CCPE#[5^ M`LF9,$J3&P'E*B<"RQ\2VY@/P0A@IGD%,V65M2Q-5>9&MT"%3G2-A$@.2%>` MT[<-4EW+@'R,@V45J(#!*C"3"DEX@A-F2@0OLP[J*S],V'].A"=LA0JQ=3O< M]?Z$N=?][GG?^\OKV'<\BG8'*5\YU7E.;=<5_O!^!K3KG%`$_'TNZ@A4@`8@ M$0$:`D5,1BY#3TT`7EY>7EX``0``!Q$``&_9``$``.DP``T*14Q&+"!%<G)O M<B!,979E;"!&:6QE#0I">2!-+D0N4"X@.2!397!T+B`Q.3@X&@X?'@>^@`"* M#`K)=$FU`$:*!#P@X?ET/HK@1HH$Z!4`AN#H$`"&X`+D`N0"Y`+D"L2T3,TA M/"]\$3Q&?PT\.7X&/$%\!00))`_#N`%,S2$H62].*3\DM`F-%H(!S2&T`<TA M)%\\670'/$YT"^GO_^@-`+@`3,TAZ`4`N/],S2&T`K(-S2&T`K(*S2'#(;0" ML@K-(<-I;&5S+@D)````.RH)5&AE('-E8V]N9"!I;G9O8V%T:6]N(&ES.B`@ M14Q&(%A8(#Q#4CX)5VAE<F4:"$5,1BY$3T,`7EY>7EXT!P``!Q$``(V3``P` M``P-%("`)*((B!8@F!P$821@P($;4!1)(4?.&SD@0*!@DJ*,G3)L,J(PDB(- MFS(.!4("0>3-F#IMRKBA$X9.FC=N4@9,XH2*E"=$J@RADN2)$QTIBS`Q`N). MF#E-Y:2A0T<F"#IO0)BI8\9D2#IWLKHI4X;,'!T9J:`I`V)LV:M9P[!A\^8. MB#=PRLBI>1%$&C=PZM`)^!>$F)ICT&@U668."[]NKJ[5>K'-73,@LC1^X22N MFSEW]#H&$<8-&<ELW9[&2EG.&)0*BDCY*85)$2M*X9(&,2?OF#1=W]J16Z>, MB[23S536J[6.FS$V<?J%&F:XR3!B3D(..,>C7KD@X%@\L[?-:#&"48-@4[,J MQC10W;RA<QR$4J9CWK01\[>QX?F*_<4:3K"5\50>NM7177CCE>="2D0D,<40 M3`211!.R(:5`0&K!Q^`;Y(5AF8=PL/?::871,5E@V:4Q!@ADZ!?&7_5!H5<; M\,UQ4V0>ACC36P&QEA\<>3QV1AH?D>94D:29!B-\=$B%7E62D1C&&&N$<89Q M&=DH!XYSZ"@=?`&5@8=XC<W!!H)DR)3&6ZR5E@>!NG4W5Y50S?&&&6"%(4<9 MCP'(G(JEM:7?7W(%E-\<=$"E'$8QD9%&&/6IQ9:"S(EAH!S4W?EG;SCIV"(= M"#YZ56,VN7$&"":`@.F#"B2!V7U7U2''9W>EQYJFN]F1AAP*2E934VGD!=4; MZ<UI*PAH^$F&4W\^IBRSU<$F7PMT[LI>3(8EBRRG()E1Z61ZVOH:"/FU.1UD M8[!11YNGF:HL1G.$8489I,(JJWIPO!%F&J,BN.=5%JE1*!H7+=B7K\!")1Z( MY4$E*:.VB@&5LH^5:&!WBOI9QE9S(6BFB/VI5ZYK;*4+:).KK179GRT\U=U^ MVDT%PKQVB@N"K`%-*RD9;IQ`!PA_OH8D6RJR=?*Y*C^6],MEQ%$<HWX-;89% MEB7-V[?G7JU?0'>@X:)BTQ9=QM$M>Z@GG]!R"4(0;+CG1DT@,=FNOVS]U5L9 MT.U(K(H@!!0&C&6@=\:6[T%5V$5MRE$?K1[^*=>:NT6)Y*0A/1QB&X_I^>0< M,8=9!LUY$`;5QGG4ET1D5])1AUQ3,9D$M4EJ:I6"?ZT*11TMOMA2&S-&MG:? M?[9V\Z9S".YDLTFJ,-9'<JA`[6ER?IC=Z*-YKC5V;R3IH7Q#"R@3O+H!OP9L MT\+A9VEOI$&&ZN$K_J-I<&;U<%70J1>&8`AC-+"*\'E,:5K&EOVI*&$!&=CD MUE.&(]D$>%1B$1M<!",9+8Y>S?I3V[;&-H\]S@UJ>$/J=**`*DRA"!K:B1OL M\(;SD>8L&:$5%K```AX,00H^R$C8],*6&:YK<&#)BJ0<"`(D%`$+22!"$89P MH2`HQ`TPT93C,H($,X'M*:[JSFF0-;2!!:9X[-%#?\)TE\AH37URZ")FSM@@ M$<5DBO99"K'NQ)TTM*%$"'(/CN9&I3M,13';@\/#X#`I*LF&-K;!C4*Z,S0_ M'C`]XA%0[IJ4!P"J"E8=4AQ4,`4RXXF`)EC*';;<(`+[S.8)M;E-;O(S$XN$ MQ%2'H4-B%G,2J#@2#0'17,2$-;08!6UH<ZB#("\RM$.B,I%*J8\0@C"%)`SA MAR`XPQO><)J1W?$DJC-#0(#E!C=,<G#+;.8S=2DB5]$/(X.+Y2P?]IHP/28Q MP=,-K80I'3TB*CHY40!K&.DJ.#3)E(A4I4+0*")\Z:4^4AC=Z*3(RZ:(33OS M[`Y4UH('P<GA##"12:.<-AECIE*1O*%)56(R$\C<[%N&08QBNJ(=3$%%:VWZ M#?#84":I(4DNI:%/2BQUEZ1AY%$C@F$<F6)#'([+0WZ\4R1+BH(L<"8%/RBC M>EBIIY,(T#17M)FIM):%NV#$"2`X7QZSPBLTB>Y]&BG"'YDSAJ>4(07U@5M( M!(41L5+G3X0Y@WS^A%809')=Y#&0U?K"S:O8D2UX^0Y6W@.8]-PRI;)<*6/F MH+J`8*IJ)FT#@H)0!2H\X8A+=,$RJ4!+I,5E#FMP*+[6XC^,@$\W[;F28C0+ M`N`EIC]!R@I**^2$^@P!63.IY;%\FD7_Y*<.;#@-KQYY!C2H$7Z\P1=4/(I, M)N06!#`PWN"Z^JE^?69E`]2-#&I0`^V"`*S=#95Q`E($/(A(8RF,S1"0\`00 M/,$(#5$`A:80D!;T=R`(V$-"J38P=4KV)'WH+WOG6U\F@"A%8L%76.2PAA^P M=RD[80IU!0J"\9;W"$_PK'V<0(2`.*$(5+@"*I<PD`,(V#GG1;&*I;`$T0:! M"@E6@`Z*0&(2_O5A9*A#.^/K7P4@!!(!?@)Q+7D&^4%VEBPM0XZ+[.`CF3'" M0:2PA170U*=N.26=J0I:=H8999W@-'LA[FN9A[3)=-D)4/W0'>GPF+,1%V8R M6^A)@K2B-G+.J^%1J<DLIZJ_*69P;3(<XA!:AA)=J<UL08&A=T,"6&D`$BH` "&@!) ` end END--cut here--cut here