mim/development/mim/vax/vs/vsudefs.mud

   1 <DEFINITIONS "VSUDEFS">
   2
   3 <USE "NEWSTRUC">
   4
   5 ; "Function codes"
   6 <MSETG GX-CLEAR 0>
   7 <MSETG GX-AND 1>
   8 <MSETG GX-AND-REVERSE 2>
   9 <MSETG GX-COPY 3>
  10 <MSETG GX-AND-INVERTED 4>
  11 <MSETG GX-NOOP 5>
  12 <MSETG GX-XOR 6>
  13 <MSETG GX-OR 7>
  14 <MSETG GX-NOR 8>
  15 <MSETG GX-EQUIV 9>
  16 <MSETG GX-INVERT 10>
  17 <MSETG GX-OR-REVERSE 11>
  18 <MSETG GX-COPY-INVERTED 12>
  19 <MSETG GX-OR-INVERTED 13>
  20 <MSETG GX-NAND 14>
  21 <MSETG GX-SET 15>
  22
  23 ; "Drawing codes"
  24 <MSETG VERTEX-RELATIVE 1>
  25 <MSETG VERTEX-DONT-DRAW 2>
  26 <MSETG VERTEX-CURVED 4>
  27 <MSETG VERTEX-START-CLOSED 8>
  28 <MSETG VERTEX-END-CLOSED 16>
  29 <MSETG VERTEX-DRAW-LAST-POINT 32>
  30
  31 ; "Some cursors"
  32 <MSETG I-BEAM-CURSOR
  33        [<BYTES 255 0 255 0 24 0 24 0 24 0 24 0 24 0 24 0 24 0 24 0 24 0
  34                24 0 24 0 255 0 255 0>
  35         8 15 0 0]>
  36 <MSETG ICONIFY-CURSOR
  37        [<BYTES 0 0
  38                *252* *52*
  39                *124* *125*
  40                *252* *52*
  41                *364* *137*
  42                *372* *77*
  43                *364* *137*
  44                *372* *77*
  45                *364* *137*
  46                *372* *77*
  47                *364* *137*
  48                *372* *77*
  49                *124* *125*
  50                *252* *52*
  51                *124* *125*
  52                0 0>
  53         16 16 7 7 <>]>
  54 <MSETG CROSS-CURSOR
  55        [<BYTES 128 1 128 1 128 1 128 1 128 1 128 1 128 1
  56                255 255 255 255
  57                128 1 128 1 128 1 128 1 128 1 128 1 128 1>
  58         16 16 7 7
  59         <BYTES *300* 3 *300* 3 *300* 3 *300* 3 *300* 3 *300* 3 255 255
  60                255 255 255 255
  61                255 255 *300* 3 *300* 3 *300* 3 *300* 3 *300* 3 *300* 3>
  62         ]>
  63 <MSETG DEFAULT-CURSOR [T]>
  64 <MSETG NULL-CURSOR [<>]>
  65 <MSETG MDL-CURSOR
  66        [<BYTES 0 0 *321* *23* *233* *24* *225* *24* *221* *24* *321* *363* 0 0>
  67         16 7 3 8
  68         <BYTES *377* *377* *377* *377* *377* *377* *377* *377* *377* *377* *377*
  69                *377* *377* *377*>
  70         ,GX-COPY-INVERTED]>
  71
  72 ; "Event stuff"
  73 <MSETG ME-LEFT-PRESSED 1>
  74 <MSETG ME-LEFT-RELEASED 2>
  75 <MSETG ME-MIDDLE-PRESSED 4>
  76 <MSETG ME-MIDDLE-RELEASED 8>
  77 <MSETG ME-RIGHT-PRESSED 16>
  78 <MSETG ME-RIGHT-RELEASED 32>
  79 <MSETG ME-MOVED 64>
  80 <MSETG ME-ENTER-WINDOW 128>
  81 <MSETG ME-LEAVE-WINDOW 256>
  82 <MSETG ME-PRESSED-MASK <+ ,ME-LEFT-PRESSED ,ME-MIDDLE-PRESSED ,ME-RIGHT-PRESSED>>
  83 <MSETG ME-RELEASED-MASK <+ ,ME-LEFT-RELEASED ,ME-MIDDLE-RELEASED
  84                            ,ME-RIGHT-RELEASED>>
  85
  86 <MSETG CONTROL-DOWN <LSH <HEX "4000"> -8>>
  87 <MSETG META-DOWN <LSH <HEX "2000"> -8>>
  88 <MSETG SHIFT-DOWN <LSH <HEX "1000"> -8>>
  89 <MSETG SHIFT-LOCK-DOWN <LSH <HEX "800"> -8>>
  90 <MSETG MOUSE-LEFT <LSH <HEX "400"> -8>>
  91 <MSETG MOUSE-CENTER <LSH <HEX "200"> -8>>
  92 <MSETG MOUSE-RIGHT <LSH <HEX "100"> -8>>
  93
  94 <MSETG WE-EXPOSE-WINDOW 1>
  95 <MSETG WE-EXPOSE-REGION 2>
  96 <MSETG WE-EXPOSE-COPY 3>
  97 <MSETG WE-RESIZE-WINDOW 4>
  98 <MSETG WE-UNMAP-WINDOW 5>
  99
 100 <END-DEFINITIONS>