home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C128CPM / SGTOOL13.ARC / CIA.ARC / CIATODS.C < prev    next >
Encoding:
C/C++ Source or Header  |  1993-08-28  |  456 b   |  24 lines
  1. /*
  2. SG C Tools 1.3
  3.  
  4. (C) 1993 Steve Goldsmith
  5. All Rights Reserved
  6.  
  7. Compiled with HI-TECH C 3.09 (CP/M-80).
  8. */
  9.  
  10. #include <sys.h>
  11. #include <hitech.h>
  12. #include <cia.h>
  13.  
  14. /* set cia time of day clock */
  15.  
  16. void settodcia (ushort C, uchar *TOD)
  17. {
  18.   outp(C+ciaControlB,(inp(C+ciaControlB) & 0x7F)); /* bit 7 = 0 sets tod clock */
  19.   outp(C+ciaTODHrs,TOD[0]);
  20.   outp(C+ciaTODMin,TOD[1]);
  21.   outp(C+ciaTODSec,TOD[2]);
  22.   outp(C+ciaTODTen,TOD[3]);
  23. }
  24.