w8sdz@WSMR-SIMTEL20.ARMY.MIL (Keith Petersen) (02/25/89)
Posting-number: Volume 01, Issue 169
Originally-from: Keith Petersen <w8sdz@WSMR-SIMTEL20.ARMY.MIL>
Submitted-by: Keith Petersen <w8sdz@WSMR-SIMTEL20.ARMY.MIL>
Archive-name: rs232off/rs232of2.uue
[ Steve Parker pointed out that for compatibility with other moderated
newsgroups, the Posting-number header needs a comma. Added from now
on.
This small program shuts of all serial communication ports (COM1 up to
COM4). This avoids problems with Procomm when used with COM3 or COM4,
because Procomm does not disable the ports when exiting, causing
conflicts with COM1 and COM2 later. Run it after exiting from Procomm
or similar trouble-making program and before you run the next one.
This was originally written in 10 lines of C, leading to 4K of
executable code. Keith Petersen rewrote it in assembly language,
reducing the size to 38 bytes.
-- R.D
Checksums obtained with the 4.3BSD "sum" or System V "sum -r" command.
checksum size (bytes) file (between BEGIN--cut and END--cut lines)
9110 2505 this uuencoded posting
checksum size (bytes) file
5686 1797 rs232of2.arc
]
BEGIN--cut here--cut here
begin 644 rs232of2.arc
M&@A24S(S,D]&1BY!4TT`_`$``$L2$1`6_S<#```,#13LD#)%Q@P93XP8<1%D
M2A,0(%I`I%)'CAL0;\R8`4'0H`R,%\.P80."!H@A3Q[">2.'SIR`.X3D`;&D
M3!HZ:$!`*4.GC)PY9=RP`'$%QQ0B6B!*!&&DC!@Y=<+(F1DCQM`8.7#D"`@S
MR!R@;<2P*0/BSLV<07#8`#$'C=0R=]Z""/.U3-BQ<K@J@,AW#)LT("`UV'&'
M+)DW;D[0*1O&S6(Z;T"((9O&L4^H<'J2*8LFS=BRAB/C3/-R+U\0;=[8F<N&
M!8S`"':<X3D7A!Z?D<VP!"&G#%`Z="J?`5'&CL\\H]V<T;O#2)J?CRM>S+@1
M)]DJ0:10`5&YIQS,+D&R)JF[(HB5+4L'/(U:-0@R>%S/,),C)]\=8]ZTB;'^
M])LZB\''@DAZL9?::@+"(`-]]D&$GWXR],?7?P'&1Z`"$D)TX'OQP3!#&?6=
M]F`;,V2($8`<#LA&@:=MF*`,(#8(PH@TF$AABA?"Y,0;=X!`AW08:00"$51(
M,9<;FVDWA7@BD?>?'.>QY!*+?+G8X7QCR#@B?Z9-B**`.7:IH7LOFI&EB/FU
M$:&8)U:H(I5C(GAE&6?>EV:);-X(YHH8LFFE:S#6Z6":->;YI85\PG1%&2?T
M]AYB9<#)G6,@R`!#3I`DL,,<=#1&AE2;!;49''*\<88<8;0QJ7?@!:0!&@A2
M4S(S,D]&1BY#`%Y>:P```#8.?&')K;H````,;<*D<0,"18H&"O:`2/"F#ATX
M;^30$8,"!IX99G*P@)%B!T*&#B%*I&A11L:-'3\V?!AQ8L6+931R]*@`),N1
M+V7$1$ESX4J1+BUB',-39<B6)/&8)#K3Z,V@,)FFK/D3:<XR4FGV08A0`QH(
M4E,R,S)/1D8N0T]-`!\```!+$A$0",PE````#/I@`="5;X`[@@(.IC.H*UU"
M7?P8\GO(CB&[A,U``!H(4E,R,S)/1D8N1$]#``D$``!+$@$/6)-;!@``#`T4
M&)'SIHT.$$3"V"D#`DD9.7/0B'EXYJ&+@`&3@$"CD*&;-W32C"E#!D08-R7-
MO*F#TB0(,VGPO'PCQR4<@F+8E&D#X@X:D6A`O!DSI@[$GFC*N`F89R6(.G,8
M0I'R9,B3)DV$N@%AM<D,DRA?T.1ZE88+LE[!ENQ*@P52I4^CD@EX)PV=H%.K
M7LTJPX59&6XCAI'#\"[#.6':,$SCALY#.77@S#$YN6L,M6C[!J3"D0Z(-'/<
M6L;<]:M@PI\;/X[L.8F4*#20IM&9F739@*<9NHXRXRQGT)\GPW3#,,QD-F_<
MG*%LD@T;$#??G)&3>+)/H'$+)PW8%3I-.I,=.P=A&$25(%*HD'\#0D3$.IXC
MB\!<T?,;,V;()TWM6`YD.'0$)`94($RD$FKE13===>0]U`9C83AVUA.&R5%7
M5&X-.-D8R3G66!K)@=!&&'D$-%11<OAV!WOGI;?A206"%-1$Y,F11@MST!$A
M2>TE-Q\=<N3!V')TL$>&C0OI5P9NB2VFFG^LG:411TER5%*"..G$$U1#@I!7
M5UF%6)I:`84!`A/2V57&&$&UL5)46J%U65UW@7"$4@^)Q%489)!Q5A!F]!=7
MEV/2B49`7^[EUH&IY7C22&X9MM4<!941DF*3:<1A'6R4])%GD&UU)W$VCL$=
MGR5QJ9R2(K[)D)A7Q2"E9W<8Q]Q=*YT1U&BU3O:IDH25Z48>;A)VUA1I/,C&
M8&SD$5BEEY8Q61B!/C3HJJ/F.<:>?5Y+Y'8*N`G5JUM9)MI57Y&1AJ<@@1#5
M3NL5J-U##*FZ7*)87:3`$$Y0(043+03!!!4M$%$$$\&!\.L<=>`G4AI*>58D
M"&/H-!BKT>6TDV_[)=<L723&6W$9%Y>G(<4=1@SB5KW&2X=16R7XQAW6WF=&
M""``VE]`'+IAQF-=&NJ2&38J51(*2B0+0A-`X2F'6SZQ5]^&A*GKV8%TV1C2
MJN6)(,44,LP@PQ-&&#&?@M2UD8);9E+*!GPK]V2K2BSY"0)G2RKP==ACEPT=
M00OR-$>R<#3KKM'3MO=>?'#,QV$;([8T<1CCT2U'0"U2,0?'AQ%.FX<ML,$8
M0R*,,1^E1HV$,AG%65?&>+8:QG-!<,S&HPM%8%'$2[9/BQIC%=?!NMU)Y-=4
M'1MU]+=T:5OW$YMELM&?&SL:/JZ<+XPY5E<R9(^N6VI`!2I+(.PM-ME&R$L'
MS4H%9%@;^F*D0$*.'61$&6)`-E@>(,00@ULQR`$.<A"0@13D($LH@UWP8JF'
M1,4-;KD"#J9`!"W(3R.$N0-!'(,QP*4M-92)2ALT5I.)5:T.JK/+9`:GAS+H
JJPIPRDVM4!,$'-@@A#LAH5!JPKH!$8D]A(D.&5`X+^Y<A7<ZT9<&`!H`
`
end
END--cut here--cut here