home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / E / TFF-A32R.LZX / AmigaE3.2a / ModulesSrc / devices / inputevent.e < prev    next >
Encoding:
Text File  |  1996-08-29  |  3.5 KB  |  136 lines
  1. OPT MODULE
  2. OPT EXPORT
  3.  
  4. MODULE 'devices/timer',
  5.        'intuition/screens',
  6.        'utility/hooks',
  7.        'utility/tagitem'
  8.  
  9. CONST IECLASS_NULL=0,
  10.       IECLASS_RAWKEY=1,
  11.       IECLASS_RAWMOUSE=2,
  12.       IECLASS_EVENT=3,
  13.       IECLASS_POINTERPOS=4,
  14.       IECLASS_TIMER=6,
  15.       IECLASS_GADGETDOWN=7,
  16.       IECLASS_GADGETUP=8,
  17.       IECLASS_REQUESTER=9,
  18.       IECLASS_MENULIST=10,
  19.       IECLASS_CLOSEWINDOW=11,
  20.       IECLASS_SIZEWINDOW=12,
  21.       IECLASS_REFRESHWINDOW=13,
  22.       IECLASS_NEWPREFS=14,
  23.       IECLASS_DISKREMOVED=15,
  24.       IECLASS_DISKINSERTED=16,
  25.       IECLASS_ACTIVEWINDOW=17,
  26.       IECLASS_INACTIVEWINDOW=18,
  27.       IECLASS_NEWPOINTERPOS=19,
  28.       IECLASS_MENUHELP=20,
  29.       IECLASS_CHANGEWINDOW=21,
  30.       IECLASS_MAX=21,
  31.       IESUBCLASS_COMPATIBLE=0,
  32.       IESUBCLASS_PIXEL=1,
  33.       IESUBCLASS_TABLET=2,
  34.       IESUBCLASS_NEWTABLET=3
  35.  
  36. OBJECT iepointerpixel
  37.   screen:PTR TO screen
  38.   positionx:INT
  39.   positiony:INT
  40. ENDOBJECT     /* SIZEOF=8 */
  41.  
  42. OBJECT iepointertablet
  43.   rangex:INT  -> This is unsigned
  44.   rangey:INT  -> This is unsigned
  45.   valuex:INT  -> This is unsigned
  46.   valuey:INT  -> This is unsigned
  47.   pressure:INT
  48. ENDOBJECT     /* SIZEOF=10 */
  49.  
  50. OBJECT ienewtablet
  51.   callback:PTR TO hook
  52.   scaledx:INT  -> This is unsigned
  53.   scaledy:INT  -> This is unsigned
  54.   scaledxfraction:INT  -> This is unsigned
  55.   scaledyfraction:INT  -> This is unsigned
  56.   tabletx:LONG
  57.   tablety:LONG
  58.   rangex:LONG
  59.   rangey:LONG
  60.   taglist:PTR TO tagitem
  61. ENDOBJECT     /* SIZEOF=32 */
  62.  
  63. CONST IECODE_UP_PREFIX=$80,
  64.       IECODEB_UP_PREFIX=7,
  65.       IECODE_KEY_CODE_FIRST=0,
  66.       IECODE_KEY_CODE_LAST=$77,
  67.       IECODE_COMM_CODE_FIRST=$78,
  68.       IECODE_COMM_CODE_LAST=$7F,
  69.       IECODE_C0_FIRST=0,
  70.       IECODE_C0_LAST=31,
  71.       IECODE_ASCII_FIRST=$20,
  72.       IECODE_ASCII_LAST=$7E,
  73.       IECODE_ASCII_DEL=$7F,
  74.       IECODE_C1_FIRST=$80,
  75.       IECODE_C1_LAST=$9F,
  76.       IECODE_LATIN1_FIRST=$A0,
  77.       IECODE_LATIN1_LAST=$FF,
  78.       IECODE_LBUTTON=$68,
  79.       IECODE_RBUTTON=$69,
  80.       IECODE_MBUTTON=$6A,
  81.       IECODE_NOBUTTON=$FF,
  82.       IECODE_NEWACTIVE=1,
  83.       IECODE_NEWSIZE=2,
  84.       IECODE_REFRESH=3,
  85.       IECODE_REQSET=1,
  86.       IECODE_REQCLEAR=0,
  87.       IEQUALIFIER_LSHIFT=1,
  88.       IEQUALIFIER_RSHIFT=2,
  89.       IEQUALIFIER_CAPSLOCK=4,
  90.       IEQUALIFIER_CONTROL=8,
  91.       IEQUALIFIER_LALT=16,
  92.       IEQUALIFIER_RALT=$20,
  93.       IEQUALIFIER_LCOMMAND=$40,
  94.       IEQUALIFIER_RCOMMAND=$80,
  95.       IEQUALIFIER_NUMERICPAD=$100,
  96.       IEQUALIFIER_REPEAT=$200,
  97.       IEQUALIFIER_INTERRUPT=$400,
  98.       IEQUALIFIER_MULTIBROADCAST=$800,
  99.       IEQUALIFIER_MIDBUTTON=$1000,
  100.       IEQUALIFIER_RBUTTON=$2000,
  101.       IEQUALIFIER_LEFTBUTTON=$4000,
  102.       IEQUALIFIER_RELATIVEMOUSE=$8000,
  103.       IEQUALIFIERB_LSHIFT=0,
  104.       IEQUALIFIERB_RSHIFT=1,
  105.       IEQUALIFIERB_CAPSLOCK=2,
  106.       IEQUALIFIERB_CONTROL=3,
  107.       IEQUALIFIERB_LALT=4,
  108.       IEQUALIFIERB_RALT=5,
  109.       IEQUALIFIERB_LCOMMAND=6,
  110.       IEQUALIFIERB_RCOMMAND=7,
  111.       IEQUALIFIERB_NUMERICPAD=8,
  112.       IEQUALIFIERB_REPEAT=9,
  113.       IEQUALIFIERB_INTERRUPT=10,
  114.       IEQUALIFIERB_MULTIBROADCAST=11,
  115.       IEQUALIFIERB_MIDBUTTON=12,
  116.       IEQUALIFIERB_RBUTTON=13,
  117.       IEQUALIFIERB_LEFTBUTTON=14,
  118.       IEQUALIFIERB_RELATIVEMOUSE=15
  119.  
  120. OBJECT inputevent
  121.   nextevent:PTR TO inputevent
  122.   class:CHAR
  123.   subclass:CHAR
  124.   code:INT  -> This is unsigned
  125.   qualifier:INT  -> This is unsigned
  126. -> a) next four CHARs are unioned as "eventaddress:LONG"
  127. -> b) next two CHARs are unioned as "x:INT"
  128.   prev1downcode:CHAR
  129.   prev1downqual:CHAR
  130. -> b) next two CHARs are unioned "y:INT"
  131.   prev2downcode:CHAR
  132.   prev2downqual:CHAR
  133.   timestamp:timeval
  134. ENDOBJECT     /* SIZEOF=22 */
  135.  
  136.