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