[comp.sys.att] AT&T 6300 Clock Device Driver

jrs2p@amsun26.apma.Virginia.EDU (Jonathan R. Senning) (06/01/90)

Hi,

I've seen several postings recently regarding the clock on the AT&T 6300.
I started using a generic MS-DOS on a 6300 several years ago an noticed
the clock problem.  I wrote a program to read the 6300 clock and set the
DOS clock during bootup, but then had the problem of the DOS clock running
too fast.  I lived with this for a year or more until I got the following
package.  It is a device driver for the AT&T 6300 hardware clock so that
whenever MS-DOS tries to read the date or time it reads it from the hard-
ware clock.  This works with MS-DOS 3.3 and probably 3.0-4.xx.  I've
been using it for some time and never had a problem.

Jonathan Senning				jrs2p@virginia.edu
University of Virginia				uunet!virginia!jrs2p
(804) 924-4580

------------------------------------------------------------------------------

Attached is a uunencoded ARC file containing a loadable device driver
for running generic MS-DOS on an AT&T 6300.  It includes instructions
for adding the driver to your config.sys file.  Also buried somewhere
in the assembly code is how to use the BIOS calls to read and write
the hardware clock.

Peter Fales			AT&T, Room 5B-420
N9IYJ            		2000 N. Naperville Rd.
UUCP:	...att!ihlpb!psfales	Naperville, IL 60566
Domain: psfales@ihlpb.att.com	work:	(708) 979-8031

begin 600 clk63.arc
M&@A#3$LV,RY!4TT`7EY>`@T``/@2`;9_M=PA```,">BDH<.F3`(R9!HH2``G
MS!F#-7"PB#%#AL(=*B`YN7@Q00(H4IXP>7*$HX(=":@@23(%!$L009RX=#*%
M2A`F3(((85($!)$B5I(,Z4E$2A(K1:2`,/)$:1`00T8.6>+3*%(I'9DJ5=DS
M"!435$!`&=+"Q@P8,%R``&$2Y14Y`^F4<0-"3!ZQ9>3*61JFX)RU8>C0"0$G
M;QDY+LST+?-W+0P:+V3<>('C1D<9:&&`D.DD3&$Y=M*P*0A""AD6(&H(:4$#
M,^K.GT./+H,Z"9.U-F#4L&&C;0(A=423`7%G(!H=OA.T"3.G#8@Q;-:8W=$Q
M`9LT;M8\CSZ]>AD\962(P;Y=^@P7W\N4-^MB3IXY;3-N5*!PR)0B1Q+</]*D
MB!,J'P4A11`?5;&34`F<,,03/YV@T$7R)==$$$.$-$5\&CVH0$U>53%%`A-6
M^(1^-E%1!&I)28&:%$-HF$`21B1!A!,)\,"AB3Z@Q@,13SA1A`\*>=14`D5,
MH<,531$A%A5*32$%$E]P^(413!"QA1!8=($:##&@A420_A$!HXLPRDBCC27^
MJ*,0'F8!Y$()#%GDD4DNV>234=HT99579KDE9C!\N5"88]*W4)DSUIABCB#P
MD&)3;PHI!9%&(BF%DE`P"8*34$I)I958:@D"#ID)2J038AI!IA%."%$CBY'&
M.>F<EF*J*:=Y!K$GJ'Z6UN*@J!:J4)A-:(A1AB=U)$4101#QPA5&F8CA?`IQ
MZE$14521``P>[;!IB4*5AFT5R]8$`A+,_M2D35)042V>/-%(9+8)4-3MMUZ%
MNVRVY8:%;K-)@1#O$2J]"V6\N\ZKK;4)>'NCON/V>VZZ`0^LTE))%%&EP5]4
M,001"8^KWY,KQ'#OPT.(RV^1_E*L5!5.)!'6@C]AK#$1'`_Q<<CT<KJ"#">#
MF_*^Y+(\,<!*+=C$A*A"Q6!/,=[,L:=5*CPR$BO,$'2^0T=L]+_JXDN%AS9O
MO"&>Y?*\,,DU;$T%Q"N;"W;`Y2:%E)(",ELVS@HT0<2U/9.,:[P-@]"?F$_]
M-$6%263:%`A"9"%MWR`3;K7)A1^>1.)%,NZX4I&;*+!_!`M*A$V`:^OW"GY_
M0;BW8DY!%9,Q36%$P,T65>2%"IRNJ^4BTW"O[Z,[47I]3\`,H-6^K^"[Z_X5
M'GH1+]PW!!6/+Z@\\LI#3Z/(0$LO.?768Y]T\O\5?_R&4\@KLO;_K0`_%=X7
MSF&[21B_:1'7/^Y$%4T00E*JU;[Z62U\#F/7V_17/O\!4(!*L9B@((0LZIS$
M(_F3V;0T!#.9?<AJ/AN<?Q3202I,H7XBBX%"A""%+^2NA=P260FGL((9>F^%
M+7SA%TPF,A:ZD`A%^0(,?H;#'P:1<,%;(12$\(5,M?`)1C""U7RHPR%2$8@M
MC)<2F>C$*.%GBDML(I.^`$4C$-%0%)R/!5'B$0$>(7]0D0I5BG*4@(&$)`,J
M5K).$B%#68$(LOM(2(:0`",(R$5!F,(4`%B$!-A'!_;!#XJ,%,DCH`:0D-R/
MAMR8/^08ZGX`$AD)C-7'-7ID"E#@W^9N\Y.@#.5HZMJ@H7R$!?JU,@%`3$`+
M,.<M*#PA?R;:RA,V4X1:^@0H0BF"0KS"I"2PR42XO$("2`4#'"#A7D-`@H`H
M%$P41.4)4TG!,5VIS`W1SD1'R$(T<0F4/`T(G>KLY2__$S#LC3.9WWHG?K*@
M$&"FJ`J96F<KOP#,>_G2G\*\YRL1*@6`^BLF1.`)5GK73B<$H3^X=)6"Y$B"
MM3A(`7@JHT>((,T?W(MH7W,9",IX'W>!M%-?7*=)"X=2N:ET/_WYCX:NH#&E
M-3*C]9K!1&`0)*">(`ENF`,=^E*0X0R!#6\8@W:(`!<['`8$9GC#7IHPA1;P
MJ"5OH,M8S(*6CXY4HVM9"Q0,LQ<C+.8O+0#!8R(SF<J8%:@4&2H+3D""CZ8Q
M.4:`V?62T",0V&0GY5QC'Q42V/_HQ",Y$2`3?C,^%ZTS@\OS%F97F00MY*M'
M124IB(J`N"]DDW]+R!QI-P<5=$T%!"C8"3BITB,F9"$%H94FFVP#,B$L47I5
MX"WDEIC;%X&3"DP@*(TT>]S;Y`\*57#I2*7YW.C>J[IA0<&RFH5;.(FV==@M
MG!,*JS@F>>QM2)D)=,,R7A!<(0@R@VTV!;12)]BVN]-]D1-RE5GU1E=L9/.F
M-I52V]L6-W][\M`U->N$]2Z%"0J6[X#K>]_B)H\*Z[W7A1V,`FC)K`CX7>>%
MOW`5&,5SI='EL(=-),XKR`P)("BQ$?CI76F.^$:%V_!_;Q3@^1+8O@:N<9RB
MF^`I+!C%&/XOE2(L8?H6.,2B)>SUDGOAPDD9N4A>KX9(6<'JM!*?-=%G.F6I
MD(&&V2O[]&20FO`$*SC22'C:SR1/%H3TXM0_88&BRJJ04J2)99[!7'.;WZR#
MD$81-5BB<WI96H0\&V'/?0[;0>DYT00LRZ5_W2,;O[Q02C<T4^>"J$3)3%$K
M*)<*:N9CER\HR"+9K2<A6HF/Q-:3PN)9"C16++*"%!6^%<C(O\%"D*`+;$`.
M6\&4.C:P@R#LA1#[FD-H]J^O201I/QN725#V-:>0;4,=2XU>'B97(#<@)V03
M)CI+4OZ.8%AQHVLI@GU;8:&0R/OP3=?4<C:R[3/L)T`!E[P3M)MO,DD=]*D+
M/[O7$1H-;W/+6R;3"U)()DMP$&"N<`MWM!%:.A-['I8G0>()@<2$FL8>5N$,
M?^'N5OKHQ@ZVL!\O9P*P,*0@(`$U-@]2[K"-<VDKH0G_KI6=MB"F+G`9W*S&
M+*DQZ\EIO[G?_ZZV1PHW!'(M*WWV:;=/I"WR!#`;-4)W8HQCEUIO91PF6%RY
MGL/$\JK4L=)L=G-44$,#B=<<"ZB)RM1A=Q09]21R%K<!;.D]H",,"`HPUDH3
M\+OS:O=\[VA7DCVK+H6KSZPE5K@)GP7N=;P3=2%QIY0.KAA$&!S\\3M@(;-H
M&\66<GY.I&]A#$Z_]<P%80D]48E7#/MNU=\^\N5JB29!/VC',SHL/&6"3QL&
M!;BX@0[N+0,;QO"&-JC'^G.8@T/*P'F;LR`'02JH#&(P0>*[N4@K@FE^:,JR
MIO0$]EC0>DU;AC3.8RG]9(RBBWC\(1[YZ#5/\"@J(E?VPW#\YUYU@@+^=R*;
M$8"5UQ3X]7/_5DP:Y&VE5!WCQA0X\00NIC^WEC$MD3<-&!:+!`6^U"ZD!3E9
MP'LOP6F)E6D*`5X-%EV>=&7)U4G]U%QD1(,QN%JZ<EI3H0-3IUJ(TUJH!5NR
M]5I/MD+!525?X%M"4(/[=2-26&1(X$DW5B)82&0RE@5;2#]+9F1-QW^XU",,
M.%X"N"6%,S92(!,P]VX+"#D5F``22"184(%;IFI(QT;?]%K;=6\PJ`#8U737
M5B1[-P5A8%6E82K7AB5!TGUX-R?-(P,'URU04`?01SSD@4F.:'X`QP+,9G^1
M:"2^<W`N<FV`=(B)J!Z^HVW!UGTW!P.W<TW=(@2$U1)#P%0@0`=O``)R4`9A
M,!P"87WA]Q_UDG.>^'6)UBV(J(A$$`0K:`=]40?<9R@?X6^OZ&S8F(K=(@6,
MP8N_Z!,V85E[ESAA<!?45P?/!P)O8`8@H`>'T8MI\!=9M1<QL$LM@`-U!R>'
MV(O!.!SD,0.\D34V4`,J,`,ZETM?%P,T8`,JY(EAQR2GQVS=0@3G:'_C,W18
M\C-:HG<[T`38@8F,@9&BXT1]DC4=N6!(\`9U(`?PX8G3HY%8L`(TH"41U3!(
MH(YD\(MD0`=H\!?MN"EE0'UN0`8O"2*#%I,FN9$U8),+-@5#&59&>8K8N(P-
MXXU*I57J\210EVS62(8+"(!I2(#>PH9N*!/C%H>V*%UU2(&89H&KQH=RY%[1
M\H)ZJ"$ZAFI#F&,I]E\=5I?XY8I%XHJ=F`"0R`*2:!,_4XD-`Y69:"18LHN]
M"`=O@!W0QXOB&`2<!TB@*&VA=W^)&02F:(VA]W41*06,N0,6>1<H0`5ET`:4
M*0=A(`=Y@%^+Y"H+V9`7MP-7H!Y9&8ZK^1?,P8YF8`9SD!=8)0?55U1[%P,O
MX)SZ>$E/T!)U<)Q_X9S0^7E(*7=,P`)**9$;*0-=``(-`Y)N())'&7K9Y)T9
MN90S.0-=@),LZ9*BV)E[MYHN4IJQ&$6TV#"V.)U0H8N8>9R7F0;$>"C&&`/(
MV)6%Z4L3&'`+`99F*)8/.(#<4I;D<I:\1Q1F*(=L"71VB(=WJ6D>H31L)A-N
M26IN28C8R&U=*28O:FW8&&U=&8K:^*`ORCO7^&^%>6E'IR%%0$9-E&K?)B$4
M$A):=Q-)<`1H^6Y!T2Y5<!,^P1*T)1-/07A!8'A!@'B0@S[/B&NDE@;NB`(D
MT`*@)$YLIB0QT!O6V!3Y0:9FJD`I4#(VT`(H`*=G:C@,$GC=I1!S009BJB%_
M1*56,TI^!$BI%290\*.&4DFG8FS6&":_@1_YHQ`:"$-,2S8S+D1/0P!>7EZ#
M`@``FPXXK5$6;P,```P-%"0!@2:,G3(@YI0IXP9$&!!NZK014T8.B#=F0,"1
M\^:,G#!MYH`PP^9-&#IIW)QQR+&.&S(@Z!2DH[&.'#AOY-"D\R;@G#=L#L9$
M@W#C&S%LRK2YF%&.2S<I5YYA6#'-&!!-IK0@\F3*18M0AFSM>K&A3(1!J)B@
M$C!L"QLS8,!P`0($DC=WRAR4P\(A&S9,AY912-`@0C9IVJ2A<S+-&S<B99X$
M,;"@4#-O7)()&,:-FS=YHM(%024/'*MA_N8!L3AFF#6#'2:$4V9,FM0:.7H$
M&?--PC(T<X*04R;,9@5G"\LA<R<,<1!C2HY9X_!E]=5OSEJL@Q(QRMB2:7)/
M@U@/PN1<IP1$V09A9YAD3B(TXW(,RL<BB9NIR'`,PL=LK);<3V;0T=QST;TQ
M75])&135>D0IQYQS""4X'0@N\53'&$21,1IEA0F5!W"]_>:>&WG(%-50DY'Q
MQF`!M9:<"'*D<08:=(@`0G.KW8&&56B`J*(;U*41F6_$P<%&&/X)!D)Z(`S!
MQ!-#+$$""&34N%=`=RP6Y$-NE'%'6>?-!,(:G]TA4AAB9+93A`4M=V"%TJTQ
M6D`!&0%425VJ-)21K+E!!T=D;,B3'*M]1@="@";71!!3-)%09G(TB9E%4BX!
MEPN0-L&9=<G544=_;Y!1!DQ'J5$;39=&R82F,[@PQ!--C*9$'7/0!`=W(`1$
M1!%6)#%$$3UDNND467B5$@AY4!KE$TX8D<01+B#KE1GDE='7>\QFEA`:F;%!
MAALGT$210TB5L9YOB_[E)!EIF+$?<6XT29&!"S4T59@U7I756%[)X$(,7X&P
MY*(6O0<A0OO6D1)::E$!PEYS..:&"W@JH`$:"$-,2S8S+E-94P!>7EXS`0``
MJ@Y4DB@Y0`$```S_`OY#``@/@$$`AC!Y,F0)"1`@`$@$T$!!$C=SZ(1APZ8,
M&1!#V+P9LP8$$3EI[)21`\+,&Y9-IK0@\F0*B#=N0$`98F,&#!@5H92ALQ*$
MD8UEYH!H`0(&C1<R;KS`<:,B"4\`FF7=:FVK5JT(`GSU"L`%(P,4RB;R(`'`
M,GY3/!B`$D7*%2L./IA0=$0`-&"-?'@!((/<`'S_2CC0TL@`D`"Q"$Q#-@`:
M+HDF$AUQD/D*!%T6`-!*T"R$([0`%K$%8"+0DP$``JPC`XFU:]BRM]0V,,7$
MHB,0'&'S_<6!ARFT_#73L&C8E@\%:A5(=`#1$P&(W@Q`=(4`HCL%MAQH_3KV
MNA2[>_\./GQ1\44'6DA7=%V1]D78:/U;+IX\[G4!U.;%%UID@<4!'VRQ#`"0
M'``:`D-/3D9)1RY365,`7EX2````AA.@M./E$@```$1%5DE#13U#3$LV,RY3
M65,-"AH(1$])5"Y"050`7EY>7D,```#"#I&T=2A/````#&W"S&D#8@R;-39F
M[&B@@$T:-VL*'DRX4$$9/&5DB'DH$>$,%Q?+=$SH8DZ>.0S;V!GYT>0<$"_(
ME+&39DP9E`HT`!H`"@U<Z(*I0B0767WE=O#)'0C4P#J;T.4P(JB#:I)#'!&`
MP'=.TMGFT.*?##((/IRBR!(_!!\4",9Y;2&#:.1`!H^5#PY5:8.&ROB8@`S@
2<Z\)VM!LTJE/E>$%1]R-:@8%
`
end
-- 
Peter Fales			AT&T, Room 5B-420
N9IYJ            		2000 N. Naperville Rd.
UUCP:	...att!ihlpb!psfales	Naperville, IL 60566
Domain: psfales@ihlpb.att.com	work:	(708) 979-8031