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