home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / OB3.2D3.DMS / in.adf / Interfaces / Input.mod < prev    next >
Encoding:
Text File  |  1992-11-02  |  1.1 KB  |  38 lines
  1. (*-------------------------------------------------------------------------*)
  2. (*                                                                         *)
  3. (*  Amiga Oberon Interface Module:                    Date: 02-Nov-92      *)
  4. (*                                                                         *)
  5. (*   © 1992 by Fridtjof Siebert                                            *)
  6. (*                                                                         *)
  7. (*-------------------------------------------------------------------------*)
  8.  
  9. MODULE Input;
  10.  
  11. IMPORT e * := Exec;
  12.  
  13. CONST
  14.  
  15.   addHandler  * = e.nonstd+0;
  16.   remHandler  * = e.nonstd+1;
  17.   writeEvent  * = e.nonstd+2;
  18.   setThresh   * = e.nonstd+3;
  19.   setPeriod   * = e.nonstd+4;
  20.   setMPort    * = e.nonstd+5;
  21.   setMType    * = e.nonstd+6;
  22.   setMTrig    * = e.nonstd+7;
  23.  
  24. VAR
  25.  
  26. (*
  27.  *  You have to put a pointer to the input.device here to use the input
  28.  *  procedures:
  29.  *)
  30.  
  31.   base * : e.DevicePtr;
  32.  
  33. (*--- functions in V36 or higher (distributed as Release 2.0) ---*)
  34. PROCEDURE PeekQualifier*{base,-42}(): INTEGER;
  35.  
  36. END Input.
  37.  
  38.