source: branch/egtra-gdiplus/gl/glu.sbp@ 548

Last change on this file since 548 was 1, checked in by (none), 18 years ago
File size: 10.9 KB
Line 
1#ifndef _INC_GLU
2#define _INC_GLU
3
4Function gluErrorStringWIN(errCode As GLenum) As PSTR
5 gluErrorStringWIN = gluErrorString(errCode) As PSTR
6End Function
7
8Declare Function gluErrorString Lib "glu32" (errCode As GLenum) As *GLubyte
9Declare Function gluErrorUnicodeStringEXT Lib "glu32" (errCode As GLenum) As PWSTR
10Declare Function gluGetString Lib "glu32" (name As GLenum) As *GLubyte
11
12Declare Sub gluOrtho2D Lib "glu32" (left As GLdouble, right As GLdouble, bottom As GLdouble, top As GLdouble)
13Declare Sub gluPerspective Lib "glu32" (fovy As GLdouble, aspect As GLdouble, zNear As GLdouble, zFar As GLdouble)
14Declare Sub gluPickMatrix Lib "glu32" (x As GLdouble, y As GLdouble, width As GLdouble, height As GLdouble, viewport As *GLint)
15Declare Sub gluLookAt Lib "glu32" (eyex As GLdouble, eyey As GLdouble, eyez As GLdouble, centerx As GLdouble, centery As GLdouble, centerz As GLdouble, upx As GLdouble, upy As GLdouble, upz As GLdouble)
16Declare Function gluProject Lib "glu32" (objx As GLdouble, objy As GLdouble, objz As GLdouble, modelMatrix As *GLdouble, projMatrix As *GLdouble, viewport As *GLint, winx As *GLdouble, winy As *GLdouble, winz As *GLdouble) As Long
17Declare Function gluUnProject Lib "glu32" (winx As GLdouble, winy As GLdouble, winz As GLdouble, modelMatrix As *GLdouble, projMatrix As *GLdouble, viewport As *GLint, objx As *GLdouble, objy As *GLdouble, objz As *GLdouble) As Long
18Declare Function gluScaleImage Lib "glu32" (format As GLenum, widthin As GLint, heightin As GLint, typein As GLenum, datain As VoidPtr, widthout As GLint, heightout As GLint, typeout As GLenum, dataout As VoidPtr) As Long
19Declare Function gluBuild1DMipmaps Lib "glu32" (target As GLenum, components As GLint, width As GLint, format As GLenum, type_ As GLenum, data As VoidPtr) As Long
20Declare Function gluBuild2DMipmaps Lib "glu32" (target As GLenum, components As GLint, width As GLint, height As GLint, format As GLenum, type_ As GLenum, data As VoidPtr) As Long
21
22TypeDef GLUnurbs = VoidPtr
23TypeDef GLUquadric = VoidPtr
24TypeDef GLUtesselator = VoidPtr
25
26TypeDef GLUnurbsObj = GLUnurbs
27TypeDef GLUquadricObj = GLUquadric
28TypeDef GLUtesselatorObj = GLUtesselator
29TypeDef GLUtriangulatorObj = GLUtesselator
30
31Declare Function gluNewQuadric Lib "glu32" () As *GLUquadric
32Declare Sub gluDeleteQuadric Lib "glu32" (state As *GLUquadric)
33Declare Sub gluQuadricNormals Lib "glu32" (quadObject As *GLUquadric, normals As GLenum)
34Declare Sub gluQuadricTexture Lib "glu32" (quadObject As *GLUquadric, textureCoords As GLboolean)
35Declare Sub gluQuadricOrientation Lib "glu32" (quadObject As *GLUquadric, orientation As GLenum)
36Declare Sub gluQuadricDrawStyle Lib "glu32" (quadObject As *GLUquadric, drawStyle As GLenum)
37Declare Sub gluCylinder Lib "glu32" (qobj As *GLUquadric, baseRadius As GLdouble, topRadius As GLdouble, height As GLdouble, slices As GLint, stacks As GLint)
38Declare Sub gluDisk Lib "glu32" (qobj As *GLUquadric, innerRadius As GLdouble, outerRadius As GLdouble, slices As GLint, loops As GLint)
39Declare Sub gluPartialDisk Lib "glu32" (qobj As *GLUquadric, innerRadius As GLdouble, outerRadius As GLdouble, slices As GLint, loops As GLint, startAngle As GLdouble, sweepAngle As GLdouble)
40Declare Sub gluSphere Lib "glu32" (qobj As *GLUquadric, radius As GLdouble, slices As GLint, stacks As GLint)
41TypeDef PFN_QUADRICCALLBACK = *Sub()
42Declare Sub gluQuadricCallback Lib "glu32" (qobj As *GLUquadric, which As GLenum, fn As PFN_QUADRICCALLBACK)
43Declare Function gluNewTess Lib "glu32" () As *GLUtesselator
44Declare Sub gluDeleteTess Lib "glu32" (tess As *GLUtesselator)
45Declare Sub gluTessBeginPolygon Lib "glu32" (tess As *GLUtesselator, polygon_data As VoidPtr)
46Declare Sub gluTessBeginContour Lib "glu32" (tess As *GLUtesselator)
47Declare Sub gluTessVertex Lib "glu32" (tess As *GLUtesselator, coords As *GLdouble, data As VoidPtr)
48Declare Sub gluTessEndContour Lib "glu32" (tess As *GLUtesselator)
49Declare Sub gluTessEndPolygon Lib "glu32" (tess As *GLUtesselator)
50Declare Sub gluTessProperty Lib "glu32" (tess As *GLUtesselator, which As GLenum, value As GLdouble)
51Declare Sub gluTessNormal Lib "glu32" (tess As *GLUtesselator, x As GLdouble, y As GLdouble, z As GLdouble)
52TypeDef PFN_TESSCALLBACK = *Sub()
53Declare Sub gluTessCallback Lib "glu32" (tess As *GLUtesselator, which As GLenum, fn As PFN_TESSCALLBACK)
54Declare Sub gluGetTessProperty Lib "glu32" (tess As *GLUtesselator, which As GLenum, value As *GLdouble)
55Declare Function gluNewNurbsRenderer Lib "glu32" () As *GLUnurbs
56Declare Sub gluDeleteNurbsRenderer Lib "glu32" (nobj As *GLUnurbs)
57Declare Sub gluBeginSurface Lib "glu32" (nobj As *GLUnurbs)
58Declare Sub gluBeginCurve Lib "glu32" (nobj As *GLUnurbs)
59Declare Sub gluEndCurve Lib "glu32" (nobj As *GLUnurbs)
60Declare Sub gluEndSurface Lib "glu32" (nobj As *GLUnurbs)
61Declare Sub gluBeginTrim Lib "glu32" (nobj As *GLUnurbs)
62Declare Sub gluEndTrim Lib "glu32" (nobj As *GLUnurbs)
63Declare Sub gluPwlCurve Lib "glu32" (nobj As *GLUnurbs, count As GLint, array As *GLfloat, stride As GLint, type_ As GLenum)
64Declare Sub gluNurbsCurve Lib "glu32" (nobj As *GLUnurbs, nknots As GLint, knot As *GLfloat, stride As GLint, ctlarray As *GLfloat, order As GLint, type_ As GLenum)
65Declare Sub gluNurbsSurface Lib "glu32" (nobj As *GLUnurbs, sknot_count As GLint, sknot As *Single, tknot_count As GLint, tknot As *GLfloat, s_stride As GLint, t_stride As GLint, ctlarray As *GLfloat, sorder As GLint, torder As GLint, type_ As GLenum)
66Declare Sub gluLoadSamplingMatrices Lib "glu32" (nobj As *GLUnurbs, modelMatrix As *GLfloat, projMatrix As *GLfloat, viewport As *GLint)
67Declare Sub gluNurbsProperty Lib "glu32" (nobj As *GLUnurbs, property As GLenum, value As GLfloat)
68Declare Sub gluGetNurbsProperty Lib "glu32" (nobj As *GLUnurbs, property As GLenum, value As *GLfloat)
69TypeDef PFN_NURBSCALLBACK = *Sub()
70Declare Sub gluNurbsCallback Lib "glu32" (nobj As *GLUnurbs, which As GLenum, fn As PFN_NURBSCALLBACK)
71
72TypeDef GLUquadricErrorProc= *Sub(e As GLenum)
73TypeDef GLUtessBeginProc= *Sub(e As GLenum)
74TypeDef GLUtessEdgeFlagProc= *Sub(b As GLboolean)
75TypeDef GLUtessVertexProc= *Sub(pv As VoidPtr)
76TypeDef GLUtessEndProc= *Sub()
77TypeDef GLUtessErrorProc= *Sub(e As GLenum)
78TypeDef GLUtessCombineProc= *Sub(dbl As *GLdouble, v As *VoidPtr, f As *GLfloat, ppv As VoidPtr)
79TypeDef GLUtessBeginDataProc= *Sub(e As GLenum, pv As VoidPtr)
80TypeDef GLUtessEdgeFlagDataProc= *Sub(b As GLboolean, pv As VoidPtr)
81TypeDef GLUtessVertexDataProc= *Sub(pv As VoidPtr, pv As VoidPtr)
82TypeDef GLUtessEndDataProc= *Sub(pv As VoidPtr)
83TypeDef GLUtessErrorDataProc= *Sub(e As GLenum, pv As VoidPtr)
84TypeDef GLUtessCombineDataProc= *Sub(dbl As GLdouble, v As VoidPtr, f As *GLfloat, ppv As *VoidPtr, ppv As *VoidPtr)
85TypeDef GLUnurbsErrorProc= *Sub(e As GLenum)
86
87Const GLU_VERSION_1_1 = 1
88Const GLU_VERSION_1_2 = 1
89
90Const GLU_INVALID_ENUM = 100900
91Const GLU_INVALID_VALUE = 100901
92Const GLU_OUT_OF_MEMORY = 100902
93Const GLU_INCOMPATIBLE_GL_VERSION = 100903
94
95Const GLU_VERSION = 100800
96Const GLU_EXTENSIONS = 100801
97
98'Const GLU_TRUE = GL_TRUE
99'Const GLU_FALSE = GL_FALSE
100
101Const GLU_SMOOTH = 100000
102Const GLU_FLAT = 100001
103Const GLU_NONE = 100002
104
105Const GLU_POINT = 100010
106Const GLU_LINE = 100011
107Const GLU_FILL = 100012
108Const GLU_SILHOUETTE = 100013
109
110Const GLU_OUTSIDE = 100020
111Const GLU_INSIDE = 100021
112
113Const GLU_TESS_MAX_COORD = 1.0e150
114
115Const GLU_TESS_WINDING_RULE = 100140
116Const GLU_TESS_BOUNDARY_ONLY = 100141
117Const GLU_TESS_TOLERANCE = 100142
118
119Const GLU_TESS_WINDING_ODD = 100130
120Const GLU_TESS_WINDING_NONZERO = 100131
121Const GLU_TESS_WINDING_POSITIVE = 100132
122Const GLU_TESS_WINDING_NEGATIVE = 100133
123Const GLU_TESS_WINDING_ABS_GEQ_TWO = 100134
124
125Const GLU_TESS_BEGIN = 100100
126Const GLU_TESS_VERTEX = 100101
127Const GLU_TESS_END = 100102
128Const GLU_TESS_ERROR = 100103
129Const GLU_TESS_EDGE_FLAG = 100104
130Const GLU_TESS_COMBINE = 100105
131Const GLU_TESS_BEGIN_DATA = 100106
132Const GLU_TESS_VERTEX_DATA = 100107
133Const GLU_TESS_END_DATA = 100108
134Const GLU_TESS_ERROR_DATA = 100109
135Const GLU_TESS_EDGE_FLAG_DATA = 100110
136Const GLU_TESS_COMBINE_DATA = 100111
137
138Const GLU_TESS_ERROR1 = 100151
139Const GLU_TESS_ERROR2 = 100152
140Const GLU_TESS_ERROR3 = 100153
141Const GLU_TESS_ERROR4 = 100154
142Const GLU_TESS_ERROR5 = 100155
143Const GLU_TESS_ERROR6 = 100156
144Const GLU_TESS_ERROR7 = 100157
145Const GLU_TESS_ERROR8 = 100158
146
147Const GLU_TESS_MISSING_BEGIN_POLYGON = GLU_TESS_ERROR1
148Const GLU_TESS_MISSING_BEGIN_CONTOUR = GLU_TESS_ERROR2
149Const GLU_TESS_MISSING_END_POLYGON = GLU_TESS_ERROR3
150Const GLU_TESS_MISSING_END_CONTOUR = GLU_TESS_ERROR4
151Const GLU_TESS_COORD_TOO_LARGE = GLU_TESS_ERROR5
152Const GLU_TESS_NEED_COMBINE_CALLBACK = GLU_TESS_ERROR6
153
154Const GLU_AUTO_LOAD_MATRIX = 100200
155Const GLU_CULLING = 100201
156Const GLU_SAMPLING_TOLERANCE = 100203
157Const GLU_DISPLAY_MODE = 100204
158Const GLU_PARAMETRIC_TOLERANCE = 100202
159Const GLU_SAMPLING_METHOD = 100205
160Const GLU_U_STEP = 100206
161Const GLU_V_STEP = 100207
162
163Const GLU_PATH_LENGTH = 100215
164Const GLU_PARAMETRIC_ERROR = 100216
165Const GLU_DOMAIN_DISTANCE = 100217
166
167Const GLU_MAP1_TRIM_2 = 100210
168Const GLU_MAP1_TRIM_3 = 100211
169
170Const GLU_OUTLINE_POLYGON = 100240
171Const GLU_OUTLINE_PATCH = 100241
172
173Const GLU_NURBS_ERROR1 = 100251
174Const GLU_NURBS_ERROR2 = 100252
175Const GLU_NURBS_ERROR3 = 100253
176Const GLU_NURBS_ERROR4 = 100254
177Const GLU_NURBS_ERROR5 = 100255
178Const GLU_NURBS_ERROR6 = 100256
179Const GLU_NURBS_ERROR7 = 100257
180Const GLU_NURBS_ERROR8 = 100258
181Const GLU_NURBS_ERROR9 = 100259
182Const GLU_NURBS_ERROR10 = 100260
183Const GLU_NURBS_ERROR11 = 100261
184Const GLU_NURBS_ERROR12 = 100262
185Const GLU_NURBS_ERROR13 = 100263
186Const GLU_NURBS_ERROR14 = 100264
187Const GLU_NURBS_ERROR15 = 100265
188Const GLU_NURBS_ERROR16 = 100266
189Const GLU_NURBS_ERROR17 = 100267
190Const GLU_NURBS_ERROR18 = 100268
191Const GLU_NURBS_ERROR19 = 100269
192Const GLU_NURBS_ERROR20 = 100270
193Const GLU_NURBS_ERROR21 = 100271
194Const GLU_NURBS_ERROR22 = 100272
195Const GLU_NURBS_ERROR23 = 100273
196Const GLU_NURBS_ERROR24 = 100274
197Const GLU_NURBS_ERROR25 = 100275
198Const GLU_NURBS_ERROR26 = 100276
199Const GLU_NURBS_ERROR27 = 100277
200Const GLU_NURBS_ERROR28 = 100278
201Const GLU_NURBS_ERROR29 = 100279
202Const GLU_NURBS_ERROR30 = 100280
203Const GLU_NURBS_ERROR31 = 100281
204Const GLU_NURBS_ERROR32 = 100282
205Const GLU_NURBS_ERROR33 = 100283
206Const GLU_NURBS_ERROR34 = 100284
207Const GLU_NURBS_ERROR35 = 100285
208Const GLU_NURBS_ERROR36 = 100286
209Const GLU_NURBS_ERROR37 = 100287
210
211Declare Sub gluBeginPolygon Lib "glu32" (tess As *GLUtesselator)
212Declare Sub gluNextContour Lib "glu32" (tess As *GLUtesselator, type_ As GLenum)
213Declare Sub gluEndPolygon Lib "glu32" (tess As *GLUtesselator)
214
215Const GLU_CW = 100120
216Const GLU_CCW = 100121
217Const GLU_INTERIOR = 100122
218Const GLU_EXTERIOR = 100123
219Const GLU_UNKNOWN = 100124
220
221Const GLU_BEGIN = GLU_TESS_BEGIN
222Const GLU_VERTEX = GLU_TESS_VERTEX
223Const GLU_END = GLU_TESS_END
224Const GLU_ERROR = GLU_TESS_ERROR
225Const GLU_EDGE_FLAG = GLU_TESS_EDGE_FLAG
226
227#endif '_INC_GLU
Note: See TracBrowser for help on using the repository browser.