1 /* Standard class IIUWGRAPH graphics primitives
3 GRON:procedure(mode:integer)
6 POINT:procedure(x, y:integer)
7 MOVE:procedure(x, y:integer)
8 DRAW:procedure(x, y:integer)
9 HFILL:procedure(x:integer)
10 VFILL:procedure(y:integer)
11 COLOR:procedure(color:integer)
12 STYLE:procedure(style:integer)
13 PATERN:procedure(p1, p2, p3, p4:integer)
14 INTENS:procedure(intens:integer)
15 PALLET:procedure(p:integer)
16 BORDER:procedure(b:integer)
17 VIDEO:procedure(buffer:arrayof integer)
18 HPAGE:procedure(p, q, r:integer)
19 NOCARD:function:integer
22 INXPOS:function:integer
23 INYPOS:function:integer
24 INPIX:function(x, y:integer):integer
25 GETMAP:function(x, y:integer):arrayof integer
26 PUTMAP:procedure(arrayof integer)
27 ORMAP:procedure(arrayof integer)
28 XORMAP:procedure(arrayof integer)
29 TRACK:procedure(x, y:integer)
30 INKEY:function:integer
31 HASCII:procedure(ch:integer)
32 HFONT:procedure(off, seg:integer)
33 HFONT8:procedure(output off, seg:integer)
34 OUTSTRING:procedure(s:string)
35 CIRB:procedure(x, y, r:integer, alpha, beta:real, b, i, p, q:integer)
74 /* Standard class MOUSE mouse support
76 INIT:function(output butttons:integer):boolean
79 STATUS:procedure(output x,y:integer, l,r,c:boolean)
80 SETPOSITION:procedure(x, y:integer)
81 GETPRESS:procedure(b:integer; output x,y,p:integer, l, r, c:boolean)
82 GETRELEASE:procedure(b:integer; output x,y,p:integer, l, r, c:boolean)
83 SETWINDOW:procedure(l, r, t, b:integer)
84 DEFCURSOR:procedure(select, p, q:integer)
85 GETMOVEMENT:procedure(output x, y:integer)
86 SETSPEED:procedure(x, y:integer)
87 SETMARGINS:procedure(l, r, t, b:integer)
88 SETTHRESHOLD:procedure(t:integer)
94 #define SHOWCURSOR 201
95 #define HIDECURSOR 202
97 #define SETPOSITION 204
99 #define GETRELEASE 206
100 #define SETWINDOW 207
101 #define DEFCURSOR 210
102 #define GETMOVEMENT 211
104 #define SETMARGINS 216
105 #define SETTHRESHOLD 219