home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #6 / amigamamagazinepolishissue1998.iso / coders / jËzyki_programowania / amigae / e_v3.2a / modulessrc / intuition / intuition.e < prev    next >
Text File  |  1977-12-31  |  15KB  |  650 lines
  1. OPT MODULE
  2. OPT EXPORT
  3.  
  4. OPT PREPROCESS
  5.  
  6. MODULE 'devices/keymap',
  7.        'exec/ports',
  8.        'graphics/clip',
  9.        'graphics/gfx',
  10.        'graphics/rastport',
  11.        'graphics/text',
  12.        'intuition/screens',
  13.        'intuition/sghooks',
  14.        'utility/tagitem'
  15.  
  16. OBJECT menu
  17.   nextmenu:PTR TO menu
  18.   leftedge:INT
  19.   topedge:INT
  20.   width:INT
  21.   height:INT
  22.   flags:INT  -> This is unsigned
  23.   menuname:PTR TO CHAR
  24.   firstitem:PTR TO menuitem
  25.   jazzx:INT
  26.   jazzy:INT
  27.   beatx:INT
  28.   beaty:INT
  29. ENDOBJECT     /* SIZEOF=30 */
  30.  
  31. CONST MENUENABLED=1,
  32.       MIDRAWN=$100
  33.  
  34. OBJECT menuitem
  35.   nextitem:PTR TO menuitem
  36.   leftedge:INT
  37.   topedge:INT
  38.   width:INT
  39.   height:INT
  40.   flags:INT  -> This is unsigned
  41.   mutualexclude:LONG
  42.   itemfill:LONG
  43.   selectfill:LONG
  44.   command:CHAR
  45.   subitem:PTR TO menuitem
  46.   nextselect:INT  -> This is unsigned
  47. ENDOBJECT     /* SIZEOF=34 */
  48.  
  49. CONST CHECKIT=1,
  50.       ITEMTEXT=2,
  51.       COMMSEQ=4,
  52.       MENUTOGGLE=8,
  53.       ITEMENABLED=16,
  54.       HIGHFLAGS=$C0,
  55.       HIGHIMAGE=0,
  56.       HIGHCOMP=$40,
  57.       HIGHBOX=$80,
  58.       HIGHNONE=$C0,
  59.       CHECKED=$100,
  60.       ISDRAWN=$1000,
  61.       HIGHITEM=$2000,
  62.       MENUTOGGLED=$4000
  63.  
  64. OBJECT requester
  65.   olderrequest:PTR TO requester
  66.   leftedge:INT
  67.   topedge:INT
  68.   width:INT
  69.   height:INT
  70.   relleft:INT
  71.   reltop:INT
  72.   reqgadget:PTR TO gadget
  73.   reqborder:PTR TO border
  74.   reqtext:PTR TO intuitext
  75.   flags:INT  -> This is unsigned
  76.   backfill:CHAR
  77.   reqlayer:PTR TO layer
  78.   reqpad1[32]:ARRAY
  79.   imagebmap:PTR TO bitmap
  80.   rwindow:PTR TO window
  81.   reqimage:PTR TO image
  82.   reqpad2[32]:ARRAY
  83. ENDOBJECT     /* SIZEOF=112 */
  84.  
  85. CONST POINTREL=1,
  86.       PREDRAWN=2,
  87.       NOISYREQ=4,
  88.       SIMPLEREQ=16,
  89.       USEREQIMAGE=$20,
  90.       NOREQBACKFILL=$40,
  91.       REQOFFWINDOW=$1000,
  92.       REQACTIVE=$2000,
  93.       SYSREQUEST=$4000,
  94.       DEFERREFRESH=$8000
  95.  
  96. CONST GD_LEFTEDGE=4
  97.  
  98. OBJECT gadget
  99.   nextgadget:PTR TO gadget
  100.   leftedge:INT
  101.   topedge:INT
  102.   width:INT
  103.   height:INT
  104.   flags:INT  -> This is unsigned
  105.   activation:INT  -> This is unsigned
  106.   gadgettype:INT  -> This is unsigned
  107.   gadgetrender:LONG
  108.   selectrender:LONG
  109.   gadgettext:PTR TO intuitext
  110.   mutualexclude:LONG
  111.   specialinfo:LONG
  112.   gadgetid:INT  -> This is unsigned
  113.   userdata:LONG
  114. ENDOBJECT     /* SIZEOF=44 */
  115.  
  116. OBJECT extgadget
  117.   nextgadget:PTR TO extgadget
  118.   leftedge:INT
  119.   topedge:INT
  120.   width:INT
  121.   height:INT
  122.   flags:INT  -> This is unsigned
  123.   activation:INT  -> This is unsigned
  124.   gadgettype:INT  -> This is unsigned
  125.   gadgetrender:LONG
  126.   selectrender:LONG
  127.   gadgettext:PTR TO intuitext
  128.   mutualexclude:LONG
  129.   specialinfo:LONG
  130.   gadgetid:INT  -> This is unsigned
  131.   userdata:LONG
  132.   moreflags:LONG
  133.   boundsleftedge:INT
  134.   boundstopedge:INT
  135.   boundswidth:INT
  136.   boundsheight:INT
  137. ENDOBJECT     /* SIZEOF=56 */
  138.  
  139. CONST GFLG_GADGHIGHBITS=3,
  140.       GFLG_GADGHCOMP=0,
  141.       GFLG_GADGHBOX=1,
  142.       GFLG_GADGHIMAGE=2,
  143.       GFLG_GADGHNONE=3,
  144.       GFLG_GADGIMAGE=4,
  145.       GFLG_RELBOTTOM=8,
  146.       GFLG_RELRIGHT=16,
  147.       GFLG_RELWIDTH=$20,
  148.       GFLG_RELHEIGHT=$40,
  149.       GFLG_RELSPECIAL=$4000,
  150.       GFLG_SELECTED=$80,
  151.       GFLG_DISABLED=$100,
  152.       GFLG_LABELMASK=$3000,
  153.       GFLG_LABELITEXT=0,
  154.       GFLG_LABELSTRING=$1000,
  155.       GFLG_LABELIMAGE=$2000,
  156.       GFLG_TABCYCLE=$200,
  157.       GFLG_STRINGEXTEND=$400,
  158.       GFLG_IMAGEDISABLE=$800,
  159.       GFLG_EXTENDED=$8000,
  160.       GACT_RELVERIFY=1,
  161.       GACT_IMMEDIATE=2,
  162.       GACT_ENDGADGET=4,
  163.       GACT_FOLLOWMOUSE=8,
  164.       GACT_RIGHTBORDER=16,
  165.       GACT_LEFTBORDER=$20,
  166.       GACT_TOPBORDER=$40,
  167.       GACT_BOTTOMBORDER=$80,
  168.       GACT_BORDERSNIFF=$8000,
  169.       GACT_TOGGLESELECT=$100,
  170.       GACT_BOOLEXTEND=$2000,
  171.       GACT_STRINGLEFT=0,
  172.       GACT_STRINGCENTER=$200,
  173.       GACT_STRINGRIGHT=$400,
  174.       GACT_LONGINT=$800,
  175.       GACT_ALTKEYMAP=$1000,
  176.       GACT_STRINGEXTEND=$2000,
  177.       GACT_ACTIVEGADGET=$4000,
  178.       GTYP_GADGETTYPE=$FC00,
  179.       GTYP_SYSGADGET=$8000,
  180.       GTYP_SCRGADGET=$4000,
  181.       GTYP_GZZGADGET=$2000,
  182.       GTYP_REQGADGET=$1000,
  183.       GTYP_SIZING=16,
  184.       GTYP_WDRAGGING=$20,
  185.       GTYP_SDRAGGING=$30,
  186.       GTYP_WUPFRONT=$40,
  187.       GTYP_SUPFRONT=$50,
  188.       GTYP_WDOWNBACK=$60,
  189.       GTYP_SDOWNBACK=$70,
  190.       GTYP_CLOSE=$80,
  191.       GTYP_BOOLGADGET=1,
  192.       GTYP_GADGET0002=2,
  193.       GTYP_PROPGADGET=3,
  194.       GTYP_STRGADGET=4,
  195.       GTYP_CUSTOMGADGET=5,
  196.       GTYP_GTYPEMASK=7,
  197.       GTYP_SYSTYPEMASK=$F0,
  198.       GTYP_WDEPTH=$40,
  199.       GTYP_SDEPTH=$50,
  200.       GTYP_WZOOM=$60,
  201.       GTYP_SUNUSED=$70,
  202.       GMORE_BOUNDS=1,
  203.       GMORE_GADGETHELP=2,
  204.       GMORE_SCROLLRASTER=4
  205.  
  206. OBJECT boolinfo
  207.   flags:INT  -> This is unsigned
  208.   mask:PTR TO INT  -> Target is unsigned
  209.   reserved:LONG
  210. ENDOBJECT     /* SIZEOF=10 */
  211.  
  212. CONST BOOLMASK=1
  213.  
  214. OBJECT propinfo
  215.   flags:INT  -> This is unsigned
  216.   horizpot:INT  -> This is unsigned
  217.   vertpot:INT  -> This is unsigned
  218.   horizbody:INT  -> This is unsigned
  219.   vertbody:INT  -> This is unsigned
  220.   cwidth:INT  -> This is unsigned
  221.   cheight:INT  -> This is unsigned
  222.   hpotres:INT  -> This is unsigned
  223.   vpotres:INT  -> This is unsigned
  224.   leftborder:INT  -> This is unsigned
  225.   topborder:INT  -> This is unsigned
  226. ENDOBJECT     /* SIZEOF=22 */
  227.  
  228. CONST AUTOKNOB=1,
  229.       FREEHORIZ=2,
  230.       FREEVERT=4,
  231.       PROPBORDERLESS=8,
  232.       KNOBHIT=$100,
  233.       PROPNEWLOOK=16,
  234.       KNOBHMIN=6,
  235.       KNOBVMIN=4,
  236.       MAXBODY=$FFFF,
  237.       MAXPOT=$FFFF
  238.  
  239. OBJECT stringinfo
  240.   buffer:PTR TO CHAR
  241.   undobuffer:PTR TO CHAR
  242.   bufferpos:INT
  243.   maxchars:INT
  244.   disppos:INT
  245.   undopos:INT
  246.   numchars:INT
  247.   dispcount:INT
  248.   cleft:INT
  249.   ctop:INT
  250.   extension:PTR TO stringextend
  251.   longint:LONG
  252.   altkeymap:PTR TO keymap
  253. ENDOBJECT     /* SIZEOF=36 */
  254.  
  255. OBJECT intuitext
  256.   frontpen:CHAR
  257.   backpen:CHAR
  258.   drawmode:CHAR
  259.   leftedge:INT
  260.   topedge:INT
  261.   itextfont:PTR TO textattr
  262.   itext:PTR TO CHAR
  263.   nexttext:PTR TO intuitext
  264. ENDOBJECT     /* SIZEOF=20 */
  265.  
  266. OBJECT border
  267.   leftedge:INT
  268.   topedge:INT
  269.   frontpen:CHAR
  270.   backpen:CHAR
  271.   drawmode:CHAR
  272.   count:CHAR  -> This is signed
  273.   xy:PTR TO INT
  274.   nextborder:PTR TO border
  275. ENDOBJECT     /* SIZEOF=16 */
  276.  
  277. CONST IG_LEFTEDGE=0
  278.  
  279. OBJECT image
  280.   leftedge:INT
  281.   topedge:INT
  282.   width:INT
  283.   height:INT
  284.   depth:INT
  285.   imagedata:PTR TO INT  -> Target is unsigned
  286.   planepick:CHAR
  287.   planeonoff:CHAR
  288.   nextimage:PTR TO image
  289. ENDOBJECT     /* SIZEOF=20 */
  290.  
  291. OBJECT intuimessage
  292.   execmessage:mn
  293.   class:LONG
  294.   code:INT  -> This is unsigned
  295.   qualifier:INT  -> This is unsigned
  296.   iaddress:LONG
  297.   mousex:INT
  298.   mousey:INT
  299.   seconds:LONG
  300.   micros:LONG
  301.   idcmpwindow:PTR TO window
  302.   speciallink:PTR TO intuimessage
  303. ENDOBJECT     /* SIZEOF=52 */
  304.  
  305. OBJECT extintuimessage
  306.   intuimessage:intuimessage
  307.   tabletdata:PTR TO tabletdata
  308. ENDOBJECT     /* SIZEOF=NONE !!! */
  309.  
  310. CONST IDCMP_SIZEVERIFY=1,
  311.       IDCMP_NEWSIZE=2,
  312.       IDCMP_REFRESHWINDOW=4,
  313.       IDCMP_MOUSEBUTTONS=8,
  314.       IDCMP_MOUSEMOVE=16,
  315.       IDCMP_GADGETDOWN=$20,
  316.       IDCMP_GADGETUP=$40,
  317.       IDCMP_REQSET=$80,
  318.       IDCMP_MENUPICK=$100,
  319.       IDCMP_CLOSEWINDOW=$200,
  320.       IDCMP_RAWKEY=$400,
  321.       IDCMP_REQVERIFY=$800,
  322.       IDCMP_REQCLEAR=$1000,
  323.       IDCMP_MENUVERIFY=$2000,
  324.       IDCMP_NEWPREFS=$4000,
  325.       IDCMP_DISKINSERTED=$8000,
  326.       IDCMP_DISKREMOVED=$10000,
  327.       IDCMP_WBENCHMESSAGE=$20000,
  328.       IDCMP_ACTIVEWINDOW=$40000,
  329.       IDCMP_INACTIVEWINDOW=$80000,
  330.       IDCMP_DELTAMOVE=$100000,
  331.       IDCMP_VANILLAKEY=$200000,
  332.       IDCMP_INTUITICKS=$400000,
  333.       IDCMP_IDCMPUPDATE=$800000,
  334.       IDCMP_MENUHELP=$1000000,
  335.       IDCMP_CHANGEWINDOW=$2000000,
  336.       IDCMP_GADGETHELP=$4000000,
  337.       IDCMP_LONELYMESSAGE=$80000000,
  338.       CWCODE_MOVESIZE=0,
  339.       CWCODE_DEPTH=1,
  340.       MENUHOT=1,
  341.       MENUCANCEL=2,
  342.       MENUWAITING=3,
  343.       OKOK=1,
  344.       OKABORT=4,
  345.       OKCANCEL=2,
  346.       WBENCHOPEN=1,
  347.       WBENCHCLOSE=2
  348.  
  349. OBJECT ibox
  350.   left:INT
  351.   top:INT
  352.   width:INT
  353.   height:INT
  354. ENDOBJECT     /* SIZEOF=8 */
  355.  
  356. OBJECT window
  357.   nextwindow:PTR TO window
  358.   leftedge:INT
  359.   topedge:INT
  360.   width:INT
  361.   height:INT
  362.   mousey:INT
  363.   mousex:INT
  364.   minwidth:INT
  365.   minheight:INT
  366.   maxwidth:INT  -> This is unsigned
  367.   maxheight:INT  -> This is unsigned
  368.   flags:LONG
  369.   menustrip:PTR TO menu
  370.   title:PTR TO CHAR
  371.   firstrequest:PTR TO requester
  372.   dmrequest:PTR TO requester
  373.   reqcount:INT
  374.   wscreen:PTR TO screen
  375.   rport:PTR TO rastport
  376.   borderleft:CHAR  -> This is signed
  377.   bordertop:CHAR  -> This is signed
  378.   borderright:CHAR  -> This is signed
  379.   borderbottom:CHAR  -> This is signed
  380.   borderrport:PTR TO rastport
  381.   firstgadget:PTR TO gadget
  382.   parent:PTR TO window
  383.   descendant:PTR TO window
  384.   pointer:PTR TO INT  -> Target is unsigned
  385.   ptrheight:CHAR  -> This is signed
  386.   ptrwidth:CHAR  -> This is signed
  387.   xoffset:CHAR  -> This is signed
  388.   yoffset:CHAR  -> This is signed
  389.   idcmpflags:LONG
  390.   userport:PTR TO mp
  391.   windowport:PTR TO mp
  392.   messagekey:PTR TO intuimessage
  393.   detailpen:CHAR
  394.   blockpen:CHAR
  395.   checkmark:PTR TO image
  396.   screentitle:PTR TO CHAR
  397.   gzzmousex:INT
  398.   gzzmousey:INT
  399.   gzzwidth:INT
  400.   gzzheight:INT
  401.   extdata:PTR TO CHAR
  402.   userdata:PTR TO CHAR
  403.   wlayer:PTR TO layer
  404.   ifont:PTR TO textfont
  405.   moreflags:LONG
  406. ENDOBJECT     /* SIZEOF=136 */
  407.  
  408. CONST WFLG_SIZEGADGET=1,
  409.       WFLG_DRAGBAR=2,
  410.       WFLG_DEPTHGADGET=4,
  411.       WFLG_CLOSEGADGET=8,
  412.       WFLG_SIZEBRIGHT=16,
  413.       WFLG_SIZEBBOTTOM=$20,
  414.       WFLG_REFRESHBITS=$C0,
  415.       WFLG_SMART_REFRESH=0,
  416.       WFLG_SIMPLE_REFRESH=$40,
  417.       WFLG_SUPER_BITMAP=$80,
  418.       WFLG_OTHER_REFRESH=$C0,
  419.       WFLG_BACKDROP=$100,
  420.       WFLG_REPORTMOUSE=$200,
  421.       WFLG_GIMMEZEROZERO=$400,
  422.       WFLG_BORDERLESS=$800,
  423.       WFLG_ACTIVATE=$1000,
  424.       WFLG_RMBTRAP=$10000,
  425.       WFLG_NOCAREREFRESH=$20000,
  426.       WFLG_NW_EXTENDED=$40000,
  427.       WFLG_NEWLOOKMENUS=$200000,
  428.       WFLG_WINDOWACTIVE=$2000,
  429.       WFLG_INREQUEST=$4000,
  430.       WFLG_MENUSTATE=$8000,
  431.       WFLG_WINDOWREFRESH=$1000000,
  432.       WFLG_WBENCHWINDOW=$2000000,
  433.       WFLG_WINDOWTICKED=$4000000,
  434.       WFLG_VISITOR=$8000000,
  435.       WFLG_ZOOMED=$10000000,
  436.       WFLG_HASZOOM=$20000000,
  437.       SUPER_UNUSED=$FCFC0000,
  438.       DEFAULTMOUSEQUEUE=5
  439.  
  440. OBJECT nw
  441.   leftedge:INT
  442.   topedge:INT
  443.   width:INT
  444.   height:INT
  445.   detailpen:CHAR
  446.   blockpen:CHAR
  447.   idcmpflags:LONG
  448.   flags:LONG
  449.   firstgadget:PTR TO gadget
  450.   checkmark:PTR TO image
  451.   title:PTR TO CHAR
  452.   screen:PTR TO screen
  453.   bitmap:PTR TO bitmap
  454.   minwidth:INT
  455.   minheight:INT
  456.   maxwidth:INT  -> This is unsigned
  457.   maxheight:INT  -> This is unsigned
  458.   type:INT  -> This is unsigned
  459. ENDOBJECT     /* SIZEOF=48 */
  460.  
  461. OBJECT extnewwindow
  462.   leftedge:INT
  463.   topedge:INT
  464.   width:INT
  465.   height:INT
  466.   detailpen:CHAR
  467.   blockpen:CHAR
  468.   idcmpflags:LONG
  469.   flags:LONG
  470.   firstgadget:PTR TO gadget
  471.   checkmark:PTR TO image
  472.   title:PTR TO CHAR
  473.   screen:PTR TO screen
  474.   bitmap:PTR TO bitmap
  475.   minwidth:INT
  476.   minheight:INT
  477.   maxwidth:INT  -> This is unsigned
  478.   maxheight:INT  -> This is unsigned
  479.   type:INT  -> This is unsigned
  480.   extension:PTR TO tagitem
  481. ENDOBJECT     /* SIZEOF=52 */
  482.  
  483. CONST WA_LEFT=$80000064,
  484.       WA_TOP=$80000065,
  485.       WA_WIDTH=$80000066,
  486.       WA_HEIGHT=$80000067,
  487.       WA_DETAILPEN=$80000068,
  488.       WA_BLOCKPEN=$80000069,
  489.       WA_IDCMP=$8000006A,
  490.       WA_FLAGS=$8000006B,
  491.       WA_GADGETS=$8000006C,
  492.       WA_CHECKMARK=$8000006D,
  493.       WA_TITLE=$8000006E,
  494.       WA_SCREENTITLE=$8000006F,
  495.       WA_CUSTOMSCREEN=$80000070,
  496.       WA_SUPERBITMAP=$80000071,
  497.       WA_MINWIDTH=$80000072,
  498.       WA_MINHEIGHT=$80000073,
  499.       WA_MAXWIDTH=$80000074,
  500.       WA_MAXHEIGHT=$80000075,
  501.       WA_INNERWIDTH=$80000076,
  502.       WA_INNERHEIGHT=$80000077,
  503.       WA_PUBSCREENNAME=$80000078,
  504.       WA_PUBSCREEN=$80000079,
  505.       WA_PUBSCREENFALLBACK=$8000007A,
  506.       WA_WINDOWNAME=$8000007B,
  507.       WA_COLORS=$8000007C,
  508.       WA_ZOOM=$8000007D,
  509.       WA_MOUSEQUEUE=$8000007E,
  510.       WA_BACKFILL=$8000007F,
  511.       WA_RPTQUEUE=$80000080,
  512.       WA_SIZEGADGET=$80000081,
  513.       WA_DRAGBAR=$80000082,
  514.       WA_DEPTHGADGET=$80000083,
  515.       WA_CLOSEGADGET=$80000084,
  516.       WA_BACKDROP=$80000085,
  517.       WA_REPORTMOUSE=$80000086,
  518.       WA_NOCAREREFRESH=$80000087,
  519.       WA_BORDERLESS=$80000088,
  520.       WA_ACTIVATE=$80000089,
  521.       WA_RMBTRAP=$8000008A,
  522.       WA_WBENCHWINDOW=$8000008B,
  523.       WA_SIMPLEREFRESH=$8000008C,
  524.       WA_SMARTREFRESH=$8000008D,
  525.       WA_SIZEBRIGHT=$8000008E,
  526.       WA_SIZEBBOTTOM=$8000008F,
  527.       WA_AUTOADJUST=$80000090,
  528.       WA_GIMMEZEROZERO=$80000091,
  529.       WA_MENUHELP=$80000092,
  530.       WA_NEWLOOKMENUS=$80000093,
  531.       WA_AMIGAKEY=$80000094,
  532.       WA_NOTIFYDEPTH=$80000095,
  533.       WA_OBSOLETE=$80000096,
  534.       WA_POINTER=$80000097,
  535.       WA_BUSYPOINTER=$80000098,
  536.       WA_POINTERDELAY=$80000099,
  537.       WA_TABLETMESSAGES=$8000009A,
  538.       WA_HELPGROUP=$8000009B,
  539.       WA_HELPGROUPWINDOW=$8000009C,
  540.       HC_GADGETHELP=1
  541.  
  542. OBJECT remember
  543.   nextremember:PTR TO remember
  544.   remembersize:LONG
  545.   memory:PTR TO CHAR
  546. ENDOBJECT     /* SIZEOF=12 */
  547.  
  548. OBJECT colorspec
  549.   colorindex:INT
  550.   red:INT  -> This is unsigned
  551.   green:INT  -> This is unsigned
  552.   blue:INT  -> This is unsigned
  553. ENDOBJECT     /* SIZEOF=8 */
  554.  
  555. OBJECT easystruct
  556.   structsize:LONG
  557.   flags:LONG
  558.   title:PTR TO CHAR
  559.   textformat:PTR TO CHAR
  560.   gadgetformat:PTR TO CHAR
  561. ENDOBJECT     /* SIZEOF=20 */
  562.  
  563. #define MENUNUM(n) ((n) AND $1F)
  564. #define ITEMNUM(n) (Shr((n),5) AND $3F)
  565. #define SUBNUM(n)  (Shr((n),11) AND $1F)
  566.  
  567. #define SHIFTMENU(n) ((n) AND $1F)
  568. #define SHIFTITEM(n) (Shl((n) AND $3F,5))
  569. #define SHIFTSUB(n)  (Shl((n) AND $1F,11))
  570.  
  571. #define FULLMENUNUM(menu,item,sub) (SHIFTSUB(sub) OR SHIFTITEM(item) OR \
  572.                                     SHIFTMENU(menu))
  573.  
  574. #define SRBNUM(n)  (8-Shr((n),4))
  575. #define SWBNUM(n)  (8-((n) AND $F))
  576. #define SSBNUM(n)  (1+Shr((n),4))
  577. #define SPARNUM(n) (Shr((n),4))
  578. #define SHAKNUM(n) ((n) AND $F)
  579.  
  580. CONST NOMENU=31,
  581.       NOITEM=$3F,
  582.       NOSUB=31,
  583.       MENUNULL=$FFFF,
  584.       CHECKWIDTH=19,
  585.       COMMWIDTH=27,
  586.       LOWCHECKWIDTH=13,
  587.       LOWCOMMWIDTH=16,
  588.       ALERT_TYPE=$80000000,
  589.       RECOVERY_ALERT=0,
  590.       DEADEND_ALERT=$80000000,
  591.       AUTOFRONTPEN=0,
  592.       AUTOBACKPEN=1,
  593.       AUTODRAWMODE=1,
  594.       AUTOLEFTEDGE=6,
  595.       AUTOTOPEDGE=3,
  596.       AUTOITEXTFONT=0,
  597.       AUTONEXTTEXT=0,
  598.       SELECTUP=$E8,
  599.       SELECTDOWN=$68,
  600.       MENUUP=$E9,
  601.       MENUDOWN=$69,
  602.       MIDDLEUP=$EA,
  603.       MIDDLEDOWN=$6A,
  604.       ALTLEFT=16,
  605.       ALTRIGHT=$20,
  606.       AMIGALEFT=$40,
  607.       AMIGARIGHT=$80,
  608.       AMIGAKEYS=$C0,
  609.       CURSORUP=$4C,
  610.       CURSORLEFT=$4F,
  611.       CURSORRIGHT=$4E,
  612.       CURSORDOWN=$4D,
  613.       KEYCODE_Q=16,
  614.       KEYCODE_Z=$31,
  615.       KEYCODE_X=$32,
  616.       KEYCODE_V=$34,
  617.       KEYCODE_B=$35,
  618.       KEYCODE_N=$36,
  619.       KEYCODE_M=$37,
  620.       KEYCODE_LESS=$38,
  621.       KEYCODE_GREATER=$39,
  622.       TABLETA_DUMMY=$8003A000,
  623.       TABLETA_TABLETZ=$8003A001,  -> Data for this tag is unsigned INT
  624.       TABLETA_RANGEZ=$8003A002,
  625.       TABLETA_ANGLEX=$8003A003,
  626.       TABLETA_ANGLEY=$8003A004,
  627.       TABLETA_ANGLEZ=$8003A005,
  628.       TABLETA_PRESSURE=$8003A006,
  629.       TABLETA_BUTTONBITS=$8003A007,
  630.       TABLETA_INPROXIMITY=$8003A008,
  631.       TABLETA_RESOLUTIONX=$8003A009,
  632.       TABLETA_RESOLUTIONY=$8003A00A
  633.  
  634. OBJECT tabletdata
  635.   xfraction:INT  -> This is unsigned
  636.   yfraction:INT  -> This is unsigned
  637.   tabletx:LONG
  638.   tablety:LONG
  639.   rangex:LONG
  640.   rangey:LONG
  641.   taglist:PTR TO tagitem
  642. ENDOBJECT     /* SIZEOF=24 */
  643.  
  644. OBJECT tablethookdata
  645.   screen:PTR TO screen
  646.   width:LONG
  647.   height:LONG
  648.   screenchanged:LONG
  649. ENDOBJECT     /* SIZEOF=16 */
  650.