home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / OB3.2D3.DMS / in.adf / Interfaces / BattClock.mod < prev    next >
Encoding:
Text File  |  1992-11-02  |  1.2 KB  |  39 lines
  1. (*-------------------------------------------------------------------------*)
  2. (*                                                                         *)
  3. (*  Amiga Oberon Interface Module:                    Date: 02-Nov-92      *)
  4. (*                                                                         *)
  5. (*   © 1992 by Fridtjof Siebert                                            *)
  6. (*                                                                         *)
  7. (*-------------------------------------------------------------------------*)
  8.  
  9. MODULE BattClock;
  10.  
  11. IMPORT e * := Exec;
  12.  
  13. CONST
  14.  
  15.   battClockName * = "battclock.resource";
  16.  
  17.  
  18. VAR
  19.  
  20. (*
  21.  *  You have to put a pointer to the battclock.resource here to use the battclock
  22.  *  procedures:
  23.  *)
  24.  
  25.   base * : e.APTR;
  26.  
  27. (* "battclock.resource" *)
  28. PROCEDURE ResetBattClock    *{base,-  6}();
  29. PROCEDURE ReadBattClock     *{base,- 12}(): LONGINT;
  30. PROCEDURE WriteBattClock    *{base,- 18}(time{0}   : LONGINT);
  31. PROCEDURE ReadBattClockMem  *{base,- 24}(offset{1} : LONGINT;
  32.                                          length{2} : LONGINT): LONGINT;
  33. PROCEDURE WriteBattClockMem *{base,- 30}(offset{1} : LONGINT;
  34.                                          length{2} : LONGINT);
  35.  
  36. END BattClock.
  37.  
  38.  
  39.