src/int/nonstand.h

   1 /**
   2  * @file
   3  */
   4 /**
   5  * @defgroup IIUWGRAPH
   6  * @brief Standard class IIUWGRAPH graphics primitives
   7  */
   8 /** @{ */
   9 /** GRON:procedure(mode:integer) */
  10 #define GRON            100
  11
  12 /** GROFF:procedure */
  13 #define GROFF           101
  14
  15 /** CLS:procedure */
  16 #define CLS             102
  17
  18 /** POINT:procedure(x, y:integer) */
  19 #define POINT           103
  20
  21 /** MOVE:procedure(x, y:integer) */
  22 #define MOVE            104
  23
  24 /** DRAW:procedure(x, y:integer) */
  25 #define DRAW            105
  26
  27 /** HFILL:procedure(x:integer) */
  28 #define HFILL           106
  29
  30 /** VFILL:procedure(y:integer) */
  31 #define VFILL           107
  32
  33 /** COLOR:procedure(color:integer) */
  34 #define COLOR           108
  35
  36 /** STYLE:procedure(style:integer) */
  37 #define STYLE           109
  38
  39 /** PATERN:procedure(p1, p2, p3, p4:integer) */
  40 #define PATERN          110
  41
  42 /** INTENS:procedure(intens:integer) */
  43 #define INTENS          111
  44
  45 /** PALLET:procedure(p:integer) */
  46 #define PALLET          112
  47
  48 /** BORDER:procedure(b:integer) */
  49 #define BORDER          113
  50
  51 /** VIDEO:procedure(buffer:arrayof integer) */
  52 #define VIDEO           114
  53
  54 /** HPAGE:procedure(p, q, r:integer) */
  55 #define HPAGE           115
  56
  57 /** NOCARD:function:integer */
  58 #define NOCARD          116
  59
  60 /** PUSHXY:procedure */
  61 #define PUSHXY          117
  62
  63 /** POPXY:procedure */
  64 #define POPHXY          118
  65
  66 /** INXPOS:function:integer */
  67 #define INXPOS          119
  68
  69 /** INYPOS:function:integer */
  70 #define INYPOS          120
  71
  72 /** INPIX:function(x, y:integer):integer */
  73 #define INPIX           121
  74
  75 /** GETMAP:function(x, y:integer):arrayof integer */
  76 #define GETMAP          122
  77
  78 /** PUTMAP:procedure(arrayof integer) */
  79 #define PUTMAP          123
  80
  81 /** ORMAP:procedure(arrayof integer) */
  82 #define ORMAP           124
  83
  84 /** XORMAP:procedure(arrayof integer) */
  85 #define XORMAP          125
  86
  87 /** TRACK:procedure(x, y:integer) */
  88 #define TRACK           126
  89
  90 /** INKEY:function:integer */
  91 #define INKEY           127
  92
  93 /** HASCII:procedure(ch:integer) */
  94 #define HASCII          128
  95
  96 /** HFONT:procedure(off, seg:integer) */
  97 #define HFONT           129
  98
  99 /** HFONT8:procedure(output off, seg:integer) */
 100 #define HFONT8          130
 101
 102 /** OUTSTRING:procedure(s:string) */
 103 #define OUTSTRING       131
 104
 105 /** CIRB:procedure(x, y, r:integer, alpha, beta:real, b, i, p, q:integer) */
 106 #define CIRB            132
 107 /** @} */
 108
 109 /**
 110  * @defgroup MOUSE
 111  * @brief Standard class MOUSE mouse support
 112  */
 113 /** @{ */
 114 /** INIT:function(output butttons:integer):boolean */
 115 #define INIT            200
 116
 117 /** SHOWCURSOR:procedure */
 118 #define SHOWCURSOR      201
 119
 120 /** HIDECURSOR:procedure */
 121 #define HIDECURSOR      202
 122
 123 /** STATUS:procedure(output x,y:integer, l,r,c:boolean) */
 124 #define STATUS          203
 125
 126 /** SETPOSITION:procedure(x, y:integer) */
 127 #define SETPOSITION     204
 128
 129 /** GETPRESS:procedure(b:integer; output x,y,p:integer, l, r, c:boolean) */
 130 #define GETPRESS        205
 131
 132 /** GETRELEASE:procedure(b:integer; output x,y,p:integer, l, r, c:boolean) */
 133 #define GETRELEASE      206
 134
 135 /** SETWINDOW:procedure(l, r, t, b:integer) */
 136 #define SETWINDOW       207
 137
 138 /** DEFCURSOR:procedure(select, p, q:integer) */
 139 #define DEFCURSOR       210
 140
 141 /** GETMOVEMENT:procedure(output x, y:integer) */
 142 #define GETMOVEMENT     211
 143
 144 /** SETSPEED:procedure(x, y:integer) */
 145 #define SETSPEED        215
 146
 147 /** SETMARGINS:procedure(l, r, t, b:integer) */
 148 #define SETMARGINS      216
 149
 150 /** SETTHRESHOLD:procedure(t:integer) */
 151 #define SETTHRESHOLD    219
 152 /** @} */