Path: utzoo!utgpu!news-server.csri.toronto.edu!mailrus!uunet!samsung!usc!elroy.jpl.nasa.gov!decwrl!shelby!unix!hplabs!hpda!hpcuhb!hpsqf!hpqtdla!jdg
From: jdg@hpqtdla.HP.COM (James Gentles)
Newsgroups: comp.sys.handhelds
Subject: Re: HP28: EXACT Utility for real time clock
Message-ID: <1270014@hpqtdla.HP.COM>
Date: 22 Mar 90 10:43:00 GMT
References: <1270013@hpqtdla.HP.COM>
Organization: HP, Queensferry Telecomms (UK)
Lines: 32

My apologies, The EXACT program quoted on the basenote is not the correct
revision, this one should now be correct.

EXACT  2470
<< TIME EXLST DATE -> s bn n bo d              ! get time and date NOW
  << n s HMS- HMS-> bn B->R bo B->R - DIVR     ! COMPUTE ERROR AND time since
  / -> er tm                                   ! last exact, er & tm
    << er tm / 1 + DIVR * 'DIVR' STO TIME      ! modify DIVR to new value
    SWAP DROP er ->HMS HMS- SETTIME d SETDATE  ! update TIME and DATE
    bn 'EXLST' STO                             ! Store time now in EXLST
    >>
  >>
>>
 
SYMBOL KEY:
->  141:-Right_hand_arrow 
<<  146:-Start_program_construct 
>>  147:-End_program_construct 


---------------------------------------------------------------------
      I have no professional connection with Hewlett-Packard's 
    calculator operations other than as a user of their products.
---------------------------------------------------------------------
Opinions expressed are my own, and are not intended to be an official
              statement by Hewlett-Packard Company
---------------------------------------------------------------------
Name:         James Gentles   GM4WZP
Organization: Hewlett-Packard  Queensferry Telecomunications Division
Email:        jdg@hpqtdla.hpsqf.hp.com                         hp-sdd 
Address:      Station Road, South Queensferry, West Lothian, Scotland
---------------------------------------------------------------------