Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!mnetor!seismo!rochester!kodak!ektools!bruce From: bruce@ektools.UUCP (Bruce D. Nelson ) Newsgroups: comp.sys.atari.st Subject: DTR control Message-ID: <515@ektools.UUCP> Date: Sun, 18-Jan-87 17:21:33 EST Article-I.D.: ektools.515 Posted: Sun Jan 18 17:21:33 1987 Date-Received: Mon, 19-Jan-87 04:07:48 EST Distribution: na Organization: Eastman Kodak, Dept. 47, Rochester N.Y. Lines: 171 The following is a program I put together (with the help of the TOS listing in the ABACUS Internals book) to turn the DTR line on and off. Bruce D. Nelson, Sr. Appl. Analyst: Software Maintenance, Product Line Systems EASTMAN KODAK COMPANY, 901 Elmgrove Rd., Rochester, NY 14650, 716 726-7890 UUCP: {allegra, seismo}!rochester!kodak!ektools!bruce ARPA: kodak!ektools!bruce@rochester.ARPA -------------------------------- cut here ------------------------------- begin 644 dtr.arc M&@AD='(N8P $0 @ E04 #(.UHFTJ-X) ,+U0T:* !*0!1*A( 3'F MC1LZ:LH?,& MSD8I9=QD+ ."YDN%+J!(.3*P(*0#:.B MJ,$!'3_J\'HP0<*%>T0X%,%'K1DS(OJ0'1!DSIPZ;6*"< L7JE(W;T"$D7,& M;TXZ70D6O2(G#1TZ.4&(R0-"B)PZ3E]N=*)RCD,0,5[$P/$"QPT03'2&TI-\48=;H@T!!IIP$&CFPID MN&&'8I@5 PM?)L#G$?Z!L.89((RPJ(UA%.I"I"/$4 .E,5BJXJ8@P-""J9]> M^>BHDK)0(@PH\MD?2&/0H:EJL3;:(!NTEDJI#*H6"=EROX9!Q@MW- :99(X% MFX 88XR1 'D 0C&$F46>$=B:SEJ+):1F!2G#K>""$*UC/)$!8Q@]!>89H2*- M@:BBFSI97;#MKU8V*@9&"5#=[;=\BLM?IL!A MS6A12+NQ-,%E.-WIJTM6RB=N90Q6'T176[MUG+@=>)ZW[8I-M]UE!UN4UP+7 MG*4+;*2+\H@X\XEFB_UZ+ ?-LG*H8XB0EREYFBX&C7FC..K(HX]Y[ESDD4DN MV>234?(45=$@%_PT#:A"#$=+O@91>X>-?]GYB;J"7KBG65\[AQP)3)AMA2@ M+KE*9?1*$>]3_DIZ)W3=RXM<6^""4,9G]:$036Q:6A%BU#?S+.V#FXO?8\C$_'.!+K*58># M-@.1B&38KLG][$4;+%]C3->C'P5)=49"DI*81 8G04E*L\.A[4J%.R[I#GN^ M@^"L@B>#X;7K22T*7__^Y[SMS"%Z8#L3]:RWN_UED5%LVU[WI :^:GE*#..S M5JB$$RGTJ6]ZOBJ;%-NVHQ[-+W=\NM^T?-+&WNF-C $T(QK;94">(%"!#,S- M ^$8P0^63$@55-$%7_9#T?W.@W.$X?>*1$)22"H:*HJ UAB H( M6O 2_VRE#5&1G5(&4YB\/ 0J,U*+&T3 $I?P100;J-I(U&Q4%EU%! 3''P )BVB$%19G=-L\P MAO0H0%]V4X$]M] %?T((0TF1)V'& (?@ 8$)C"!B^0PAC; 0:%GL,,68M % M%BA3!"GH00]P==!&@:@.<)A.]5!@@K0E"$,)J,CLE(("$9P%!&AHD&3*$)D8 M6>K/!!@U 44Q:H0 &@AD='(N='1P $0 @ YA4 #(.Q8EQB4\= M ,8#0 ,!!% !( P@-/*#HH ,G^0X.L %Q(9.* H@PGC '$8#H#C*^"@" M8P%Q&#=(4_%$11L !$"T , 6BL %&P2A,9K8 @ (@!(:R2,US^$_EP$>0'@ M10,A9W[P *#$29!O_"0R /$2@XBNT]H1E(ES"J W!B: B(+L'S^N ""0Y6!6 M" :V;E&\A)!-+(<43=RZ!(# R4T8(-BX18(& " GNA90P_+H!8M_]GYRD#I!S /@< (#D'!A 0?+]^X<(9P!A4Q] "#1. M )F!!B( 2 3EP(3+X%,&#D6VLZ$, ,1$#GG78 )FJ# _ Z]FPY#EX(" /@ MGRT2'P )D..(_3]6U:,#.-!:/'G8L@& GGKV20(?,//5UQXB^7VS7VM.6#$0 M VX $ !A;PR$ Q)L# 1"A0J\@ ),D%U "12/,+ < &8,Y $2>O FF@F002 * M:!R2J,L%'E#VG08P_F/&C#4:@F.'')0H &M>0"@A #^X0!AD#Z! 18IN#+*= M&P; ,!4 8'@0)6&B^5"C&I3E $0^LIS1)0^[@4& EZ,U64>$__B3HPTO2%G8 MC@2@J 009X"1(P]]3JF+!?((2J@3.0J1Z)\6@./H&3Q -:EH/-3( (H] )&G MB@.QP4 .;N3)II=QX@"#E P PP<(4$+I0IZ0.8"#CQ[0*8 ,L HSJV.H->5G MKM* %FJ>K^)J9X0#C8F :!?I\@ J3#J9YPL+!,&./D*$!X8%,*P @ *R C# M&0APVYD*E%F3%04@=/NM$"(@($U/&=$"2R!M8",M9/^XE"<$:(YAH 60-N4";$&N?^8"X#D/D#"0!75OQF MG'-^B;#"3@Y46P 0.$S8QNCRH:X9"%S\'28N3.#)*@!T:6[0CIUA!=#I"F#& MS!C;0;70!)P!06I"G*(R39 M@ R*/QSP0LACL[RH)RBJN-O51@,AP!K__'$N M# <@ 4PT3#L !@D,H(P0 V]P(%H &Q- !!!^,]5VV7R@>,)R#IC M $GPT0G M -$A\-C";C4,8N=S/EWUU0"@O)P"6Y/'KM$6*@"&%+$C<(8']7H+[LN(!#*O MM_G8$PTP04 # @(F ')YTV"HL+$$D0, &0,24-;\\P8P ,A!!!#=.F'G@F' M^!"YW1 M_J"(WT M")S=Z4D@$ PC((0%A% "$, @PFF,(1Q"((,^J#"$& @1Q<"X SD*J0 _G$& M!U"#7P( !D,( Y%2"&/XJ@D.!1A#"2^8PA($ (A!@D!67V/$) 3 @@$$9T! M_,.-T++>DVH##T!\B# @\(I<*L0 $F# !!!0 B#4@ C ,((@4 , #P 24( M@IA&$(01!H$ 83!3$H.(!"NE\P"% 8$=^?!&SFASCG\ XY8($ $O20"!< CB M'(*H)C-A$$5U( &5-H .H;0R0,P<$$$PG&(89PI@8D]' $$' M$4!'$90AFW\" !B6*((U^# ?PC!$**DTP?&$0A?"*(,!C"# G!A"#$80 I! MX 0A*G$(<3Q"')3 "SI(P+@(Q (*V@D $F)9&W.BDYWNA*<\/T!/AMX3"/G< M9S\9209UTD2@!#4H0A7J5(="5*(4]><9B& )CO[#&D5 @0"00 05]*T(,B" M,(I!2& M"$,G6A!&CH0R,Z MT>,6]A R@( X'&%3$AC !G,BP,N*X 8*F($ O#@$&W15 !8,=@ N$ !XO0N# M2"CA$&?@ S$"X BL.N!S'0#!,#QBLS. @@(&,@#SB (AR"&H> 0M4R]HX MSO$H V 1YP+A64/QT8^ %&1=#8G($2^RD8\W0&%Y0)@CLPTP(D $!P M/J#0B/+$+@JE;\PN,',+H( 9/;?''V9@ !+:W!E"^$@!B\9,9WP0YSG;H\YW M3E1ZI 0[/Y4#-^#$!33."04GO Q%T0D ?[SP@BNL#V/^11FP/ P&<(( $O MA9 J?;1 "6ZI%PB D (HY(,:*7AB/K#1 MI28]X-7SAFA%"$(\Q9'CZ8 #J> MX(R*GF$@@/"$695P!#<@P!=\^$<_VB"!'$JA"!S*ASM$R \I0.$)8*#&%&!. MVYE'3!?\ ,;-P4 ,$TP@'(,XQR :9T]#('@8S"3Y9(E@\570"0;C& 09!" % M(% &%:F ).S/HXHL& /@@ V:.P=FL88AI'D(;08$"!8.!%'$)H.0&DT.]F MZ6-W^G:+$ YA/@ID!092. 0(#@ LG" A&/]J@SOR#@8Q@.!6_+"!E"B A&% M8Q!2 0)@/ AMT @T$, R0*P5%: &'!B" !,XEA2Q2SX%"0Q4\2L^/TZ=^ M[F: 0.#?HH#0F\#KVS #/W9^>;=HWO&>'\3 A;#+N,"@$-%A #CDS8^=W7O? MJ>K]!'X/ #$0K0?#->0+MK/_GO< 8*R/_]8?@8"*8""0($U0@@ M,&&T,'K> SYFH *^(P0D@ 1@ $PH (<(S0#@%SC0@WS @(*D(#YLB\#40#^ M C#>@($:J"_\XH&1IP#[!S[?(0]"P KY0 M"H ;GPF]Y @'F(E3OMP*)AG[, MD2< ((,9)D3N!V!W8 88$"6E&&!P @\!W^ (XB8 8\0"$6XHZ )FH , N4CZ<#7!6)"8AY"W4I(+ M*30D^9#Z$)'*2)'N8)'GE)$$<(\G 9R8)!FH 8)208,:7KC" \H%(8&'IJ MAAE@H 3@Z -F$&@+$'H#!XT !I5RH0!4 A+*0]#"0]@L!7%QY6BPH*I I82 M ),R.9&X49-@<)&*0 '34"_KQS=2< 1\ PNIX@\OX0^FD'?-9P]GP ()" )( M$ /(>"Z%>9A\$$D 0#VB* 0YP@5](FDC! &P1A/-)P\"Y#M68)B(R1SGPB'Z M,#6W @_LXBT X 7+8SZJF4/M8BSS!AG]@ V9:5J;T77!D!4$4#VB,51OJ J@ MD0)KY@-3$0 !P32$.\([-AP_0D#]"^CJ#,Y)W1J:W0@]G>BYJ5C[P>&?L MLG]'X7^6QVFP,(ST\ 8ODBKR0(T*\#)^*CE^(AI X*,:<)M0H:.M9=@8 /-X@\4R0[X( BC%F1F( *[VJN_&JS.6*R@A@^-!79H&I8# MZ@\ R01YT@;"<)[WJ4?*ZBW'"G80H)>$\8[;ZJO "@Q" 71.JW5*@WGF38^ MX"?HQSAYPJV"( )(( TCZ@M0X"98@ 2S@ QF8 ]-)0 ^\ 'GF2-B@(8'8 J. MHE+HIR5Y\AV>D"-HH+"*T+ *@'Z"L!N[.!""D"-NH+!NT+ (H+'^$+%F8&6Q M@HQG ,*JPLF9#%P@C%@H"F).A6=H@L 0 =H R53828ZBP:4H;+I,@!["*M: MUAE0 "JBX@^<.D7[:3080+3#DD9(Z \MXP=#>X=NE ))@ ]^D )*@ ]ZD )? M@ ]VX 1.( )L +8DT+9Z8!EHVQI>"[9B2[9F.[=!P+9N"[=RF[9O=%8[TS/@ M=U96A@ 1@8,!@8(8)SEXP*,"V!UL+B-.Q6VXP&1*S1O0+F.BP!@(#B(*S1X ML+@$X+@0P #YTSX0P 8J )#'@0!F0"_U#&!>)=KMS)!$/ ;T#X*H(IQ<7! 3 $+ER-T$'/4(!4(0 "000]&@*F:V@&BX@U65GQ MD$:1!@Z1)@Z+%A>040]&D)D.H$#_X UWRL*U2\9<_'ZK)P%D/ [/R\+#* Y! MI00 V2*P.Q#@\*[_ [> "+8>0"P0%O@@!82E@_@ 8"P#=/V+P $+7'J0!W6W7K_]@_P$&GP0# D0!G+H@Z!!P]H#0 N8(1N#7!Q?98$ MLR2/L"P[=99[S09C'9#F<-9(30 > "2'<-.$\0_XT+R**P'-N[D,T+RCVSV- M6 =8V"SF<*P9FP +277!" MK'#88!D+Y]_4T,73DMVR#708D)D0 4_;5H',-3C;4M^8JB6K9?_H X= @". MT"SL< 8D@-T57I^$(0G#B ^<,,+M>]SC/8SO, 7EG5+N4'EE"K[J, 5)%@S0 M$ A+20]+"0\LX"><,.)@P $Q;@ T_G@W7I6[5-U3X*?D#7:9]6MUOH [-!P]*N1S/* $MT@^L@$[41XT((.'\D'T/O3#^X ^T&&EJ MU ]HP+1O/BERWADX@"*O\N:N*N"D:04$8PRY>&M=7(M*V \F4.CC-&RTZ.#/ M>,UI!!GL( 2@@4[JO7V&#ALUG6^\]!TOM0AG/0$?]QP3( '4$PBI%P0?5^'W M9P'4,P@ODT<#(0#99SV;KL+X1@)+\!U[QWX3H,#+N ODY&U?NNNBJH $ 20 M@0_& !J<.CLS:SZY_26N"@;1_3 FO<,Y.A4-D!K-[@C=B^*1CD8^RQS-;@=; M2Q/(S #AW.:-/D'D#HU6.Q5,K OX@ 3KS@#M'L[<<.WR'MY$+>GGWH?XK@'[ MWN] 8 ;_[J*UH>L@PNNJR95(4&A9LAUF8 $X*D+_0 /*4B$.$+$6P@04LK'A MJO%2DAX_AS$??V)\#LX1F$#,+ M/Q"F\!V4L->]R]P8*.'Z & \ :D5Z@ ,(SZD&9E69GZ4)GR("V*"AGW0 2W MR:E^D^6<6333/A"H<,BR$ U[69GV\ +\-P "X/53L:BZ< \.,/9K(@ND(@ R M&R=T$*VMAX%+J0^*7/A4OPC@Z@!ET!YDT(#U\GP.8 S\LAN?-WI-7_7*B/7S MIO5<;_?D 8NLP/=L4O;%&/@8XX 3UO9[.:JRL*O(;B=#<"\BD!7])P/P>?O@ MH_OZH_M:PONYO_NX3P"^#Q3%K_L!\"O\$/S)SP^1)/S&3_R]SP_+#_S(7_V1 M) W\4 !X<(R1-(HIT"%(('/C#SKY( _G;W#J\/_\#P!>@0S\OY[_S_\ H +_S_^/^?_\3Q/_GP)" MTW\OV!IO\,I$0 52 )H$ 9S )B4 9EX 8@0 =U( =N0 8@\ 9NH #0014 M( 4@@ 9A, <@( 9E4 9N )T4 =RX 9E0 8@\ 9FH%(#,01/X 0Z,!!!4 58 MH ,#@:Y4H ,# 00DH ,#@:Y4H ,'H0 E