🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.sys.atari.st
Article #25327

Re: auto clock that sets IKBD and bios time

#25327
From: braner
Date: Thu, 26 Feb 1987 04:29
90 lines
5559 bytes
[]

Whoever recently posted the correction to Settime was right.
The faulty version sets the IKBD clock one day back if the time
is after 4pm.  The correction to the source is in one line,
which now reads:

	datime = ((long)Tgetdate()<<16) + ((long)Tgettime()&0xffffL);

The reason Tgettime() gets sign-extended to a long, though,
is because osbind.h defines it as "(int)gemdos(44)".  If they
left it alone, there would have been no problem since gemdos()
is of type 'long' already...

Here is the corrected binary for AUTODISK (copies the whole floppy
disk to the ('Eternal' type) RAMdisk, and also sets the time.
Put it in the 'auto' folder).

- Moshe Braner

~~~~~~~~~~~~~~~~~~~ cut here ~~~~~~~~~~~~~~~
begin 644 autodisk.arc
M&@A!551/1$E32RY04D< < L  %D.3+;9/GX/   ,8#0  -" V\  @ 8>0 ( 
MD@,G^1H.8 !Q8 ,S*IZH: .  (@6 !A :P6 PD@ '*#Q&A@"@ @ TAH)X_4/
MT@!_+H*\ /"B@9 S/W@ 4.(DR#=^$AF X(A!!--I[5!^+#D%T!L#$T!$0?:/
MWU( $*9RJ"H$P]:N*#A"R!:50XHF73<"0."$I $0;+HB00, D!-=!S!@>?2"
MQ3][/PSK^RL #Y='00?^/6 E<I#( HH.=E+'B96!/PX(.0)FH  8!Z0< >%F
M+C1@$""8 ?!/'NHI0$H#$.#C@Q,OG#T/?.%B;N0$?Q7 >(R$#6BAR'4I$/$X
M<H#D&*@\^OG7@#OMOX-_!H#DW ,()EHC>+'@;TT @WV$/-*1(P )#.@7.#-0
M07X !KPQD &Z </!!$@8P@D? ,#0#%(*2+ "  $@$8@D#,+ 31 :3"@ $H5H
MDN$R$$H(P  68MB@-D'\9\!L (" P80$($$()ADF4^*$!:28(39!Z$: $$0P
M8,1 ]JE@)  7M.82 T4@.9 &4 *P@Y/X$2$E /YIN8.  .HF PP&G -$.$#(
M4, Z04 3A P$B-/F90!$UL)?";@P& ,)04( C,H)!8!N&#1WWW%X.O 8#$(%
MH)L 3'R# #SA=39>>>>E-Q=[?_DC2'SS <A?F /)@@&"-^:X(X4^-@@DC@! 
MP8&'"2[8X(-<FHCBA1ENV&%'((K8((FY\M@J#"PRH"4 22H+P!U.BK!D /91
M>20#6%9);7]5?@ F@0.Y  ,!XYR9I@%LN@E-$3_4*=0*?R'@PYY]_MD?HP,1
M:B@0B.J"@ >+-OIHI)-6ZED_QI1W  1!L . &RT@T0\TAA+2[P'P5"?4!9,I
MHUT+0/1##0@NB P.("?W ,0_[) L,C KT?:/RO^H X,++ /#X <, #'0J$C<
MS+(Z0.@,P ,]_SR0#3_@S$YD\ *&";T-V0N !TW7;.=D@%#M)XS@PM0!@P?T
MPXVAIESL!7-NF!V9 I-!\1@$)7>#!"!!N-./-Z\)P;#>W("  !6 [/17/RH,
MI@00L_TCC*'&7 SP(TBTS<W;DT$P=]UWY[UWWW^;+3CAANO2#SZ*,TZ;,)&I
MT)TXVB$!3#B T+Y39"QT!XUV+X'P 1+!S#30/_] $PC((A,G<F06=$<)<\Z1
MTZ\!HF@,0 ;=8:(=S?!D#<]/UE7>CSG@"T5 =T)X@Y0#?%8]*@.&HO,7/R8,
M)@,/ 8!5LCQW&_W/,+ I63SZQZ#B!8%F_J!;/^9!0-K0C!\\P-]]2E8/"PFC
M@,T(1@^,@# .E(P>"6)& ;G1-F,HT!X-G-G*]'&__"D0'RD$H +OD4(WT0P?
M+=1?/_01PP#V(Q\U/.#*[)%#!?:CAPKD1Q!I1H\BENP?2"R9/Y:X,GDXT1\5
M H3_9.@"?Y!'BP6TX<K<H0.A@& 9[O@'/F#0(V $(HW^T $ A'"*R(#@+SUZ
M#/*P 0(&=<0%)H""\K!A1SRZX#$@6 #(_F$.UC 2!A" A1O^X8_W-2< Y].%
M/J0Q&$>:@P%H" (1 N /&,&/#0$@P5_TH8M.3M(<,>"#*$GIR1A,$BFGP9D_
M@I%&K[PR!C[SR"^C=)=?3I(><Q$:/:!AA%KZ+%"[X>4_Z.%):/#% ,QT9D@N
M28-^$8 1C[D&4G;3(%T&(V' N 8PA*8/:=)#&_S"6?<,\(,"L*=\'?D+ 4B@
M/@"PKU[O4QXT5HF P7"C"#X0R@!D@#-[2,((SP@&OA:ZD& ,HI? &P0NW22?
M1TWA"*@!P1)>$YN[P<*/_/F'.X2VRV+(3IT,[<HP<(F:8 1#/CI82#$6@90!
ML#&F#C4"+(( )@3HH*&:,(+W?D!/>RX GYD< "+Z^4_W#80! OU+/M@PF$LB
MH5\#X,1CA. *D>G& %(H*S48X(J!# ,*(N-(;0@&#H-9"C3%H8LN!."Q1V!K
M$ -!@!L,@*]!82VOD?'!7P8 A<'D  CYH,<9",L#XH&! (4UV'B:9ARA,&&Q
MB7N$9BG)GH;I0P@F0 (8+ "#"2G : ,XPWK:HPL A-8:2*% (DTK!!$@0!HQ
M*P M8!&(-A RK^YQA79,\ 7-#F<!FIKM7P! A-1-EE&6A4%KN60T")Q! 2^8
MD '^$@#4;6<-7/K!A"BBBW^P0#N+NVYE_W'9PC+7N>0Y1P#0HY[MOI9! S #
M K!+WX%@P@43\,0J .1?HP'B#%9H,(,$8 ;*6M8.$N[(&2" &3JJ-R3310,4
M('. \ +HP^P5 #I&W#/B59C 8 "" -;PCS]P"36RB\:"'0 &$C  O39AP!LX
M8)WM$H (0)#=[=8[70Z,^ 0^<X )%FP (: 7LX(BF%^ 8ZG:8$LB"&"# D!0
M63_IQA^<=0!GUU,<!41&".0U13\5L$A^M,]/;4  R;JB&VE89\T>%@J<=1$ 
M/LQYD?C #*#K*&CRBN'0*Z/'E_/G #,X8,_X@$9;Z?S,'G]9 /ZT])Z7N6F0
M<0D,#KB9/V5+YIH0  QB(!F78.&*:;[! Y6KC:P5  D U)H>MT.L4( P77[T
MDP'@RRMQTMOHVIICSG<F0!> 8;0 /#:RWVVUF14 !@0(@0V1W35^EXV R"1A
MNJIXS&C](81)^@,,)F!I.?#&#GP0XS60E.1<+"UO>MN[;U"0@KN_S 1*MD$:
MZPZ-#_+: SX$  :4;)B]18 $:<#1%U"8+!:0, MDF,$>,$#!;GI3J10D 1_ 
M2($2\,&+%'P!'[AP0A-$P :4DZ#FO"@,S#EC<I2KG.4NW[D3:&YSG.L\YG7H
M><I7WO*7QSP(1 ?&S5E^=/'DBP:LF4M) 7%2+EDZ,@W C'N,X<JYI%7K$+A;
MN\3>7E<,1M4,F$)K&+ X,P #OV# 0-81<'8$;'WMYG-/UQX!=[F'I.[<P+O>
MU=/WO[L+  5PCQ3>7IRXSQWQH^7?.1JD*0608 D-*W3$#O/7P)K! FGF5'MI
M\)@>M,8!E"Q- )B +4'\8]^H+XX#5$_?UK\^]A1R0>V]B(#3IYZV_X"#[_T)
M_/VV8 G_.*V[U]PI+<!7=0 PA6XH 0$)F)1!"H"1(4# :U]'O^L > ,0R-_K
M6O,0&(N4!W&B/W]YK#DRQ-:%/PR-% 9<&X3 0&NU(5LP-A"H  ,L$%G1X&[S
M9P\O(!0V(0#W-VR=8@3']G])(P#R95ET('"4) 6*0'Z+I ]@(  @R'X L CZ
MY@!E0!MD  9AL0 VH'O&$#/$ PV#0 +K5W[N)SOQ-W_Z4'\3" #YUP_D<(&0
M!8 "* \;2%\0@( *Z&[?%EDL%2D,  "5,@3L<%HB@!1^(@/CU(55 X8 D !@
M"%AB^(5AZ(4$0(8NP89@&  "<(9O.(;\ &IIV(9K:(=R2(=Y"(:@)@W\4 !X
MD -\ &KZ0&QUT  *H  )@ 1I0 <@$ 9ND <@L 9E8(D6H0!)P 9L4 9G$ 9L
M  )TD 9M4 8@@ )B$ 9D  )F\ 9RT 9A((FP" )O4 >T: 8@( >4> 9ED *,
M2!"<Z(F@*(H@0 :SB(JJR(JN"(NR2(MR8(NX:(NZR(MNX(O J !<4@1R( >U
M* =EP(II<(W'F 9SL 8M 0 ;4 2,Z(A!4 54\ 1$D 13L 0)( :6V 1O, =H
M@(I"8(UE( ?M*(P)4 1N0 <!28K]2(JFJ(QH@ 9MT 9;, =ST 4IH ,@L(D%
M>9 )20<+B8P(F8IYD <1209D<)$9*8S]P8W>&(W@*([D* 9O\ :2. =E, 9T
M (LMH0!$8(YK,(ENT(I2$ 1-0 8^"0+C. 9OT 9P,(MI( :?N),)\ 1L()1$
M68[G*)5#\ 9PD ?C> ;'.(MAX (V$8SN"(_R2(]+X(KC:([]2 8LP!IO  (!
BV9)S$(P , 1/X 1R! #OB 5]&7!4T)?!" D%(  &   :    
 
end
Technical Details
Message-ID: <279@batcomputer.tn.cornell.edu>
Path: arc1-ca.pugleaf.net!utzoo!utgpu!water!watnot!watmath!clyde!cbatt!ihnp4!ptsfa!lll-lcc!seismo!rochester!cornell!batcomputer!braner

Show Full Headers
Complete Article Headers
Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: arc1-ca.pugleaf.net!utzoo!utgpu!water!watnot!watmath!clyde!cbatt!ihnp4!ptsfa!lll-lcc!seismo!rochester!cornell!batcomputer!braner
From: braner@batcomputer.UUCP
Newsgroups: comp.sys.atari.st
Subject: Re: auto clock that sets IKBD and bios time
Message-ID: <279@batcomputer.tn.cornell.edu>
Date: Wed, 25-Feb-87 23:29:03 EST
Article-I.D.: batcompu.279
Posted: Wed Feb 25 23:29:03 1987
Date-Received: Sun, 1-Mar-87 12:58:52 EST
Reply-To: braner@batcomputer.UUCP (braner)
Distribution: world
Organization: Theory Center, Cornell University, Ithaca NY
Lines: 90
Summary: A corrected version of AUTODISK