Path: utzoo!genat!maccs!darel
From: darel@maccs.UUCP (Darel Mesher)
Newsgroups: comp.sys.ibm.pc
Subject: Re: Need Clock reading prog for Leading Edge Model D
Keywords: clock leading edge pc
Message-ID: <908@maccs.UUCP>
Date: 16 Dec 87 18:05:58 GMT
References: <651@pdp.cs.OHIOU.EDU>
Reply-To: darel@maccs.UUCP (Darel Mesher)
Organization: DCSS, McMaster University, Hamilton, Ontario, Canada
Lines: 90
In article <651@pdp.cs.OHIOU.EDU> shapiro@oucs.UUCP writes:
>
>
>I have recently installed a new 30MB drive into my fathers Leading Edge
>model D. When I installed his new version of MS-DOS 3.2 (not IBM PC-DOS)
>I found that his clock is no longer read automatically at boot up.
>
>Does anyone on the net have a program that will read the clock on the Leading
>Edge model D?
>
>Thanks in Advance.
>
>Brian.
>
Since the Leading Edge PC and the SPERRY PC are the same Mitsubishi box
marketed by two different corporations, the following utility should work
without modification.
This is a small utility that I wrote for my SPERRY PC Model 20 that uses
BIOS calls (from the SPERRY reference manual) to extract the TOD clock value,
this value is then passed to the DOS set time interrupt...simple. Just put
CLOCK in your autoexec.bat file and a message will be printed confirming
TOD/DOS time synchronization.
The following uuencoded '.arc' file (uudecode first, then de-arc) contains
two files...
clock.asm
clock.com
I've included the source file because of the recent warnings on the net
regarding viruses and trojan horses, I've become a little wary of blindly
running any compiled utility on my machines.
It's amazing how much frustration such a small utility can avoid :-).
Darel
cut on the dotted line...
-------------8<--------------8<--------------8<-------------
begin 640 clock.arc
M&@A#3$]#2RY!4TT`)24E#0<``)`/ZE&$164/```,"=R$:5,&1((A3)X,6=)`
M`9TT=-@4/)AP(8@6(*;DF4.G3!L00]B\&;,&Q`L01)Y,`2F29,8\;L:@D?/&
M31H]9>0TW*$"DI.=.T&`H)*$"I,B.H2"K+@$!%`%.X0&$3*%BI0@0Z@DI8(F
MS1P0<&B>D3,0Q)PR=+[205.03)B.(,*X(0/B(4$0;\R`:#+E2\J5=-[41?-V
M9P*E0O,.+C@%2A$I4K*`@#($KQL08MZ$D4.7RA,B(,:T7.-B:->O8>R\24-F
M3E!(#,RPV5R&;L'>!H51)`J5)`\D9)4*!':;/:6F9,>
MQ!87`(901QW%T1%"&P6^(<>!88PQQAPAN+5=?@HZAQ\0;33XH`L#C@%'%Z\Q
M4(1$8]`A1QJ\Y6<"2.;!40=S(!3AQAG@&7?BC(8AMM<8383!44X@5&&3';I!
ME$>(2`R4!AN!7?;$`3>R!`0@$3(#P!DGL@@"E496(Z
MD=%09*I)14;L]?23`D$)Q5<+?X$`'G-RU`%'6M0U)$02*B501!15)!!#$$@D
MD$!4C3T6V625#:H2",J9*!P:D9OCY4TU<--40944T4
M<6L",,BP*Z5#I7$7LS$YZX:T0Q`1!!76'IHH##1L2QE*LH(`[J\U25N5%$X<
M<2T,.;A[(QUFF0C>&=+"9RZZU\H@Q+97G`C7?7#-*V[!5%";;JDR$,&PPP51
MX6U!$@,;+51*->'5&&6P,5MQ;_@V\A!2[*NQHU$%,<402201VF8GAG%&0=O1
M48<S?GG``;-7D#B`)DHQ*K52$2`<
ML5?8;BH%&ME&@*"SFCJ_J7.:<6Y)IP)#?&;M%$4<4:T35#24@,U35%'M05/H
MD#<11;"`4N*+-QXCY'H[/@7EC(_,D]T[O';!V&6?37;:]I'Y9A!US]G>9&_,
M`1&PR,&!EUX<-5C2;&*D')<9,(;UQEAEG74&0-VSX@('.+`A
M#SHPS!!6TH/'@:"#1>!@1D0H$N31I25O$=GYM&:WAB!$(4V!@A04`@(G%"$(
M4JB:$IH`A01D3PI4<)2JE%`'W,2%)@2BRW.B0YLP)*!\G'L-!=0G)M"T#TQD
M*UT0V+1%J8!@?F1#W0HWISJE#.%9_RL(0>8P!ZRYYFY32,(1G/`$)R2`"$)(
MP`FT00Q(;.`7)V`!S%AP-,'A48^S$$JD(".9=X5D)"6IPD.@1@?A@&`6@1QD
M(170)03@L4L&.$$BA=*,1[I$(S&924UN4IMF(`:3@I0"(8U@R#R>`!A]W$`V
M,BG+H[%`@20XPHLW1+0A"=8P8=08$%>S'`6
M@&&/"MI3U130$KO9J9,D@L/"?.Z(!1:$2HA1:<(;B`2"ZE4/"<@IJ6)JYY*!
MZD0!"8!"%:;0J)C
M_4QH1H,9W^3A!X)3@A8,(H3*UM6BML6K4"O666NIR@EO`!!8?*26P)HVITY5
M+>`,`BJ54%8+EL6L%:*[V8-9%U*@%:UXAB+'6]WRUE')U4("FHO>U_ZVNQT3KF@@6=PY'/>YZST(7F_Z6B?`0+NBX4YS
MW)*'%N2E!>)IP1V,4Q(SI"%E5`-J$(A`A(.T-`8YP`$,7ML=NLAE=F4%F&)P
MK...4/&[&H)'SQDT:/67(-&MH4B$P
M@QNR*01!@A>``#.D2=$U(`"M!,U"T!+03`./?W3PT6H1E1:!JE>SU@(0*!BO
(`[161-T)&@"`
`
end
-----------8<----------------8<----------------8<------------