' ########################################################################################
' Microsoft Windows
' File: GL.inc
' Contents: Procedure declarations, constant definitions and macros for the OpenGL component.
' Copyright (c) 2011 Jos? Roca
' Portions Copyright (c) Microsoft Corporation.
' All Rights Reserved.
' THIS CODE AND INFORMATION IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER
' EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF
' MERCHANTABILITY AND/OR FITNESS FOR A PARTICULAR PURPOSE.
' ########################################################################################
#IF NOT %DEF(PBX_GL_PBI)
#DEFINE PBX_GL_PBI
%EQUATE `GL_INC = 1
#INCLUDE ONCE "Core/Windows.inc"
'/*
'** Copyright 1996 Silicon Graphics, Inc.
'** All Rights Reserved.
'**
'** This is UNPUBLISHED PROPRIETARY SOURCE CODE of Silicon Graphics, Inc.;
'** the contents of this file may not be disclosed to third parties, copied or
'** duplicated in any form, in whole or in part, without the prior written
'** permission of Silicon Graphics, Inc.
'**
'** RESTRICTED RIGHTS LEGEND:
'** Use, duplication or disclosure by the Government is subject to restrictions
'** as set forth in subdivision (c)(1)(ii) of the Rights in Technical Data
'** and Computer Software clause at DFARS 252.227-7013, and/or in similar or
'** successor clauses in the FAR, DOD or NASA FAR Supplement. Unpublished -
'** rights reserved under the Copyright Laws of the United States.
'*/
'typedef unsigned int GLenum;
'typedef unsigned char GLboolean;
'typedef unsigned int GLbitfield;
'typedef signed char GLbyte;
'typedef short GLshort;
'typedef int GLint;
'typedef int GLsizei;
'typedef unsigned char GLubyte;
'typedef unsigned short GLushort;
'typedef unsigned int GLuint;
'typedef float GLfloat;
'typedef float GLclampf;
'typedef double GLdouble;
'typedef double GLclampd;
'typedef void GLvoid;
'/*************************************************************/
'/* Version */
%EQUATE `GL_VERSION_1_1 = 1
'/* AccumOp */
%EQUATE `GL_ACCUM = &H0100
%EQUATE `GL_LOAD = &H0101
%EQUATE `GL_RETURN = &H0102
%EQUATE `GL_MULT = &H0103
%EQUATE `GL_ADD = &H0104
'/* AlphaFunction */
%EQUATE `GL_NEVER = &H0200
%EQUATE `GL_LESS = &H0201
%EQUATE `GL_EQUAL = &H0202
%EQUATE `GL_LEQUAL = &H0203
%EQUATE `GL_GREATER = &H0204
%EQUATE `GL_NOTEQUAL = &H0205
%EQUATE `GL_GEQUAL = &H0206
%EQUATE `GL_ALWAYS = &H0207
'/* AttribMask */
%EQUATE `GL_CURRENT_BIT = &H00000001
%EQUATE `GL_POINT_BIT = &H00000002
%EQUATE `GL_LINE_BIT = &H00000004
%EQUATE `GL_POLYGON_BIT = &H00000008
%EQUATE `GL_POLYGON_STIPPLE_BIT = &H00000010
%EQUATE `GL_PIXEL_MODE_BIT = &H00000020
%EQUATE `GL_LIGHTING_BIT = &H00000040
%EQUATE `GL_FOG_BIT = &H00000080
%EQUATE `GL_DEPTH_BUFFER_BIT = &H00000100
%EQUATE `GL_ACCUM_BUFFER_BIT = &H00000200
%EQUATE `GL_STENCIL_BUFFER_BIT = &H00000400
%EQUATE `GL_VIEWPORT_BIT = &H00000800
%EQUATE `GL_TRANSFORM_BIT = &H00001000
%EQUATE `GL_ENABLE_BIT = &H00002000
%EQUATE `GL_COLOR_BUFFER_BIT = &H00004000
%EQUATE `GL_HINT_BIT = &H00008000
%EQUATE `GL_EVAL_BIT = &H00010000
%EQUATE `GL_LIST_BIT = &H00020000
%EQUATE `GL_TEXTURE_BIT = &H00040000
%EQUATE `GL_SCISSOR_BIT = &H00080000
%EQUATE `GL_ALL_ATTRIB_BITS = &H000fffff
'/* BeginMode */
%EQUATE `GL_POINTS = &H0000
%EQUATE `GL_LINES = &H0001
%EQUATE `GL_LINE_LOOP = &H0002
%EQUATE `GL_LINE_STRIP = &H0003
%EQUATE `GL_TRIANGLES = &H0004
%EQUATE `GL_TRIANGLE_STRIP = &H0005
%EQUATE `GL_TRIANGLE_FAN = &H0006
%EQUATE `GL_QUADS = &H0007
%EQUATE `GL_QUAD_STRIP = &H0008
%EQUATE `GL_POLYGON = &H0009
'/* BlendingFactorDest */
%EQUATE `GL_ZERO = 0
%EQUATE `GL_ONE = 1
%EQUATE `GL_SRC_COLOR = &H0300
%EQUATE `GL_ONE_MINUS_SRC_COLOR = &H0301
%EQUATE `GL_SRC_ALPHA = &H0302
%EQUATE `GL_ONE_MINUS_SRC_ALPHA = &H0303
%EQUATE `GL_DST_ALPHA = &H0304
%EQUATE `GL_ONE_MINUS_DST_ALPHA = &H0305
'/* BlendingFactorSrc */
'/* GL_ZERO */
'/* GL_ONE */
%EQUATE `GL_DST_COLOR = &H0306
%EQUATE `GL_ONE_MINUS_DST_COLOR = &H0307
%EQUATE `GL_SRC_ALPHA_SATURATE = &H0308
'/* GL_SRC_ALPHA */
'/* GL_ONE_MINUS_SRC_ALPHA */
'/* GL_DST_ALPHA */
'/* GL_ONE_MINUS_DST_ALPHA */
'/* Boolean */
%EQUATE `GL_TRUE = 1
%EQUATE `GL_FALSE = 0
'/* ClearBufferMask */
'/* GL_COLOR_BUFFER_BIT */
'/* GL_ACCUM_BUFFER_BIT */
'/* GL_STENCIL_BUFFER_BIT */
'/* GL_DEPTH_BUFFER_BIT */
'/* ClientArrayType */
'/* GL_VERTEX_ARRAY */
'/* GL_NORMAL_ARRAY */
'/* GL_COLOR_ARRAY */
'/* GL_INDEX_ARRAY */
'/* GL_TEXTURE_COORD_ARRAY */
'/* GL_EDGE_FLAG_ARRAY */
'/* ClipPlaneName */
%EQUATE `GL_CLIP_PLANE0 = &H3000
%EQUATE `GL_CLIP_PLANE1 = &H3001
%EQUATE `GL_CLIP_PLANE2 = &H3002
%EQUATE `GL_CLIP_PLANE3 = &H3003
%EQUATE `GL_CLIP_PLANE4 = &H3004
%EQUATE `GL_CLIP_PLANE5 = &H3005
'/* ColorMaterialFace */
'/* GL_FRONT */
'/* GL_BACK */
'/* GL_FRONT_AND_BACK */
'/* ColorMaterialParameter */
'/* GL_AMBIENT */
'/* GL_DIFFUSE */
'/* GL_SPECULAR */
'/* GL_EMISSION */
'/* GL_AMBIENT_AND_DIFFUSE */
'/* ColorPointerType */
'/* GL_BYTE */
'/* GL_UNSIGNED_BYTE */
'/* GL_SHORT */
'/* GL_UNSIGNED_SHORT */
'/* GL_INT */
'/* GL_UNSIGNED_INT */
'/* GL_FLOAT */
'/* GL_DOUBLE */
'/* CullFaceMode */
'/* GL_FRONT */
'/* GL_BACK */
'/* GL_FRONT_AND_BACK */
'/* DataType */
%EQUATE `GL_BYTE = &H1400
%EQUATE `GL_UNSIGNED_BYTE = &H1401
%EQUATE `GL_SHORT = &H1402
%EQUATE `GL_UNSIGNED_SHORT = &H1403
%EQUATE `GL_INT = &H1404
%EQUATE `GL_UNSIGNED_INT = &H1405
%EQUATE `GL_FLOAT = &H1406
%EQUATE `GL_2_BYTES = &H1407
%EQUATE `GL_3_BYTES = &H1408
%EQUATE `GL_4_BYTES = &H1409
%EQUATE `GL_DOUBLE = &H140A
'/* DepthFunction */
'/* GL_NEVER */
'/* GL_LESS */
'/* GL_EQUAL */
'/* GL_LEQUAL */
'/* GL_GREATER */
'/* GL_NOTEQUAL */
'/* GL_GEQUAL */
'/* GL_ALWAYS */
'/* DrawBufferMode */
%EQUATE `GL_NONE = 0
%EQUATE `GL_FRONT_LEFT = &H0400
%EQUATE `GL_FRONT_RIGHT = &H0401
%EQUATE `GL_BACK_LEFT = &H0402
%EQUATE `GL_BACK_RIGHT = &H0403
%EQUATE `GL_FRONT = &H0404
%EQUATE `GL_BACK = &H0405
%EQUATE `GL_LEFT = &H0406
%EQUATE `GL_RIGHT = &H0407
%EQUATE `GL_FRONT_AND_BACK = &H0408
%EQUATE `GL_AUX0 = &H0409
%EQUATE `GL_AUX1 = &H040A
%EQUATE `GL_AUX2 = &H040B
%EQUATE `GL_AUX3 = &H040C
'/* Enable */
'/* GL_FOG */
'/* GL_LIGHTING */
'/* GL_TEXTURE_1D */
'/* GL_TEXTURE_2D */
'/* GL_LINE_STIPPLE */
'/* GL_POLYGON_STIPPLE */
'/* GL_CULL_FACE */
'/* GL_ALPHA_TEST */
'/* GL_BLEND */
'/* GL_INDEX_LOGIC_OP */
'/* GL_COLOR_LOGIC_OP */
'/* GL_DITHER */
'/* GL_STENCIL_TEST */
'/* GL_DEPTH_TEST */
'/* GL_CLIP_PLANE0 */
'/* GL_CLIP_PLANE1 */
'/* GL_CLIP_PLANE2 */
'/* GL_CLIP_PLANE3 */
'/* GL_CLIP_PLANE4 */
'/* GL_CLIP_PLANE5 */
'/* GL_LIGHT0 */
'/* GL_LIGHT1 */
'/* GL_LIGHT2 */
'/* GL_LIGHT3 */
'/* GL_LIGHT4 */
'/* GL_LIGHT5 */
'/* GL_LIGHT6 */
'/* GL_LIGHT7 */
'/* GL_TEXTURE_GEN_S */
'/* GL_TEXTURE_GEN_T */
'/* GL_TEXTURE_GEN_R */
'/* GL_TEXTURE_GEN_Q */
'/* GL_MAP1_VERTEX_3 */
'/* GL_MAP1_VERTEX_4 */
'/* GL_MAP1_COLOR_4 */
'/* GL_MAP1_INDEX */
'/* GL_MAP1_NORMAL */
'/* GL_MAP1_TEXTURE_COORD_1 */
'/* GL_MAP1_TEXTURE_COORD_2 */
'/* GL_MAP1_TEXTURE_COORD_3 */
'/* GL_MAP1_TEXTURE_COORD_4 */
'/* GL_MAP2_VERTEX_3 */
'/* GL_MAP2_VERTEX_4 */
'/* GL_MAP2_COLOR_4 */
'/* GL_MAP2_INDEX */
'/* GL_MAP2_NORMAL */
'/* GL_MAP2_TEXTURE_COORD_1 */
'/* GL_MAP2_TEXTURE_COORD_2 */
'/* GL_MAP2_TEXTURE_COORD_3 */
'/* GL_MAP2_TEXTURE_COORD_4 */
'/* GL_POINT_SMOOTH */
'/* GL_LINE_SMOOTH */
'/* GL_POLYGON_SMOOTH */
'/* GL_SCISSOR_TEST */
'/* GL_COLOR_MATERIAL */
'/* GL_NORMALIZE */
'/* GL_AUTO_NORMAL */
'/* GL_VERTEX_ARRAY */
'/* GL_NORMAL_ARRAY */
'/* GL_COLOR_ARRAY */
'/* GL_INDEX_ARRAY */
'/* GL_TEXTURE_COORD_ARRAY */
'/* GL_EDGE_FLAG_ARRAY */
'/* GL_POLYGON_OFFSET_POINT */
'/* GL_POLYGON_OFFSET_LINE */
'/* GL_POLYGON_OFFSET_FILL */
'/* ErrorCode */
%EQUATE `GL_NO_ERROR = 0
%EQUATE `GL_INVALID_ENUM = &H0500
%EQUATE `GL_INVALID_VALUE = &H0501
%EQUATE `GL_INVALID_OPERATION = &H0502
%EQUATE `GL_STACK_OVERFLOW = &H0503
%EQUATE `GL_STACK_UNDERFLOW = &H0504
%EQUATE `GL_OUT_OF_MEMORY = &H0505
'/* FeedBackMode */
%EQUATE `GL_2D = &H0600
%EQUATE `GL_3D = &H0601
%EQUATE `GL_3D_COLOR = &H0602
%EQUATE `GL_3D_COLOR_TEXTURE = &H0603
%EQUATE `GL_4D_COLOR_TEXTURE = &H0604
'/* FeedBackToken */
%EQUATE `GL_PASS_THROUGH_TOKEN = &H0700
%EQUATE `GL_POINT_TOKEN = &H0701
%EQUATE `GL_LINE_TOKEN = &H0702
%EQUATE `GL_POLYGON_TOKEN = &H0703
%EQUATE `GL_BITMAP_TOKEN = &H0704
%EQUATE `GL_DRAW_PIXEL_TOKEN = &H0705
%EQUATE `GL_COPY_PIXEL_TOKEN = &H0706
%EQUATE `GL_LINE_RESET_TOKEN = &H0707
'/* FogMode */
'/* GL_LINEAR */
%EQUATE `GL_EXP = &H0800
%EQUATE `GL_EXP2 = &H0801
'/* FogParameter */
'/* GL_FOG_COLOR */
'/* GL_FOG_DENSITY */
'/* GL_FOG_END */
'/* GL_FOG_INDEX */
'/* GL_FOG_MODE */
'/* GL_FOG_START */
'/* FrontFaceDirection */
%EQUATE `GL_CW = &H0900
%EQUATE `GL_CCW = &H0901
'/* GetMapTarget */
%EQUATE `GL_COEFF = &H0A00
%EQUATE `GL_ORDER = &H0A01
%EQUATE `GL_DOMAIN = &H0A02
'/* GetPixelMap */
'/* GL_PIXEL_MAP_I_TO_I */
'/* GL_PIXEL_MAP_S_TO_S */
'/* GL_PIXEL_MAP_I_TO_R */
'/* GL_PIXEL_MAP_I_TO_G */
'/* GL_PIXEL_MAP_I_TO_B */
'/* GL_PIXEL_MAP_I_TO_A */
'/* GL_PIXEL_MAP_R_TO_R */
'/* GL_PIXEL_MAP_G_TO_G */
'/* GL_PIXEL_MAP_B_TO_B */
'/* GL_PIXEL_MAP_A_TO_A */
'/* GetPointerTarget */
'/* GL_VERTEX_ARRAY_POINTER */
'/* GL_NORMAL_ARRAY_POINTER */
'/* GL_COLOR_ARRAY_POINTER */
'/* GL_INDEX_ARRAY_POINTER */
'/* GL_TEXTURE_COORD_ARRAY_POINTER */
'/* GL_EDGE_FLAG_ARRAY_POINTER */
'/* GetTarget */
%EQUATE `GL_CURRENT_COLOR = &H0B00
%EQUATE `GL_CURRENT_INDEX = &H0B01
%EQUATE `GL_CURRENT_NORMAL = &H0B02
%EQUATE `GL_CURRENT_TEXTURE_COORDS = &H0B03
%EQUATE `GL_CURRENT_RASTER_COLOR = &H0B04
%EQUATE `GL_CURRENT_RASTER_INDEX = &H0B05
%EQUATE `GL_CURRENT_RASTER_TEXTURE_COORDS = &H0B06
%EQUATE `GL_CURRENT_RASTER_POSITION = &H0B07
%EQUATE `GL_CURRENT_RASTER_POSITION_VALID = &H0B08
%EQUATE `GL_CURRENT_RASTER_DISTANCE = &H0B09
%EQUATE `GL_POINT_SMOOTH = &H0B10
%EQUATE `GL_POINT_SIZE = &H0B11
%EQUATE `GL_POINT_SIZE_RANGE = &H0B12
%EQUATE `GL_POINT_SIZE_GRANULARITY = &H0B13
%EQUATE `GL_LINE_SMOOTH = &H0B20
%EQUATE `GL_LINE_WIDTH = &H0B21
%EQUATE `GL_LINE_WIDTH_RANGE = &H0B22
%EQUATE `GL_LINE_WIDTH_GRANULARITY = &H0B23
%EQUATE `GL_LINE_STIPPLE = &H0B24
%EQUATE `GL_LINE_STIPPLE_PATTERN = &H0B25
%EQUATE `GL_LINE_STIPPLE_REPEAT = &H0B26
%EQUATE `GL_LIST_MODE = &H0B30
%EQUATE `GL_MAX_LIST_NESTING = &H0B31
%EQUATE `GL_LIST_BASE = &H0B32
%EQUATE `GL_LIST_INDEX = &H0B33
%EQUATE `GL_POLYGON_MODE = &H0B40
%EQUATE `GL_POLYGON_SMOOTH = &H0B41
%EQUATE `GL_POLYGON_STIPPLE = &H0B42
%EQUATE `GL_EDGE_FLAG = &H0B43
%EQUATE `GL_CULL_FACE = &H0B44
%EQUATE `GL_CULL_FACE_MODE = &H0B45
%EQUATE `GL_FRONT_FACE = &H0B46
%EQUATE `GL_LIGHTING = &H0B50
%EQUATE `GL_LIGHT_MODEL_LOCAL_VIEWER = &H0B51
%EQUATE `GL_LIGHT_MODEL_TWO_SIDE = &H0B52
%EQUATE `GL_LIGHT_MODEL_AMBIENT = &H0B53
%EQUATE `GL_SHADE_MODEL = &H0B54
%EQUATE `GL_COLOR_MATERIAL_FACE = &H0B55
%EQUATE `GL_COLOR_MATERIAL_PARAMETER = &H0B56
%EQUATE `GL_COLOR_MATERIAL = &H0B57
%EQUATE `GL_FOG = &H0B60
%EQUATE `GL_FOG_INDEX = &H0B61
%EQUATE `GL_FOG_DENSITY = &H0B62
%EQUATE `GL_FOG_START = &H0B63
%EQUATE `GL_FOG_END = &H0B64
%EQUATE `GL_FOG_MODE = &H0B65
%EQUATE `GL_FOG_COLOR = &H0B66
%EQUATE `GL_DEPTH_RANGE = &H0B70
%EQUATE `GL_DEPTH_TEST = &H0B71
%EQUATE `GL_DEPTH_WRITEMASK = &H0B72
%EQUATE `GL_DEPTH_CLEAR_VALUE = &H0B73
%EQUATE `GL_DEPTH_FUNC = &H0B74
%EQUATE `GL_ACCUM_CLEAR_VALUE = &H0B80
%EQUATE `GL_STENCIL_TEST = &H0B90
%EQUATE `GL_STENCIL_CLEAR_VALUE = &H0B91
%EQUATE `GL_STENCIL_FUNC = &H0B92
%EQUATE `GL_STENCIL_VALUE_MASK = &H0B93
%EQUATE `GL_STENCIL_FAIL = &H0B94
%EQUATE `GL_STENCIL_PASS_DEPTH_FAIL = &H0B95
%EQUATE `GL_STENCIL_PASS_DEPTH_PASS = &H0B96
%EQUATE `GL_STENCIL_REF = &H0B97
%EQUATE `GL_STENCIL_WRITEMASK = &H0B98
%EQUATE `GL_MATRIX_MODE = &H0BA0
%EQUATE `GL_NORMALIZE = &H0BA1
%EQUATE `GL_VIEWPORT = &H0BA2
%EQUATE `GL_MODELVIEW_STACK_DEPTH = &H0BA3
%EQUATE `GL_PROJECTION_STACK_DEPTH = &H0BA4
%EQUATE `GL_TEXTURE_STACK_DEPTH = &H0BA5
%EQUATE `GL_MODELVIEW_MATRIX = &H0BA6
%EQUATE `GL_PROJECTION_MATRIX = &H0BA7
%EQUATE `GL_TEXTURE_MATRIX = &H0BA8
%EQUATE `GL_ATTRIB_STACK_DEPTH = &H0BB0
%EQUATE `GL_CLIENT_ATTRIB_STACK_DEPTH = &H0BB1
%EQUATE `GL_ALPHA_TEST = &H0BC0
%EQUATE `GL_ALPHA_TEST_FUNC = &H0BC1
%EQUATE `GL_ALPHA_TEST_REF = &H0BC2
%EQUATE `GL_DITHER = &H0BD0
%EQUATE `GL_BLEND_DST = &H0BE0
%EQUATE `GL_BLEND_SRC = &H0BE1
%EQUATE `GL_BLEND = &H0BE2
%EQUATE `GL_LOGIC_OP_MODE = &H0BF0
%EQUATE `GL_INDEX_LOGIC_OP = &H0BF1
%EQUATE `GL_COLOR_LOGIC_OP = &H0BF2
%EQUATE `GL_AUX_BUFFERS = &H0C00
%EQUATE `GL_DRAW_BUFFER = &H0C01
%EQUATE `GL_READ_BUFFER = &H0C02
%EQUATE `GL_SCISSOR_BOX = &H0C10
%EQUATE `GL_SCISSOR_TEST = &H0C11
%EQUATE `GL_INDEX_CLEAR_VALUE = &H0C20
%EQUATE `GL_INDEX_WRITEMASK = &H0C21
%EQUATE `GL_COLOR_CLEAR_VALUE = &H0C22
%EQUATE `GL_COLOR_WRITEMASK = &H0C23
%EQUATE `GL_INDEX_MODE = &H0C30
%EQUATE `GL_RGBA_MODE = &H0C31
%EQUATE `GL_DOUBLEBUFFER = &H0C32
%EQUATE `GL_STEREO = &H0C33
%EQUATE `GL_RENDER_MODE = &H0C40
%EQUATE `GL_PERSPECTIVE_CORRECTION_HINT = &H0C50
%EQUATE `GL_POINT_SMOOTH_HINT = &H0C51
%EQUATE `GL_LINE_SMOOTH_HINT = &H0C52
%EQUATE `GL_POLYGON_SMOOTH_HINT = &H0C53
%EQUATE `GL_FOG_HINT = &H0C54
%EQUATE `GL_TEXTURE_GEN_S = &H0C60
%EQUATE `GL_TEXTURE_GEN_T = &H0C61
%EQUATE `GL_TEXTURE_GEN_R = &H0C62
%EQUATE `GL_TEXTURE_GEN_Q = &H0C63
%EQUATE `GL_PIXEL_MAP_I_TO_I = &H0C70
%EQUATE `GL_PIXEL_MAP_S_TO_S = &H0C71
%EQUATE `GL_PIXEL_MAP_I_TO_R = &H0C72
%EQUATE `GL_PIXEL_MAP_I_TO_G = &H0C73
%EQUATE `GL_PIXEL_MAP_I_TO_B = &H0C74
%EQUATE `GL_PIXEL_MAP_I_TO_A = &H0C75
%EQUATE `GL_PIXEL_MAP_R_TO_R = &H0C76
%EQUATE `GL_PIXEL_MAP_G_TO_G = &H0C77
%EQUATE `GL_PIXEL_MAP_B_TO_B = &H0C78
%EQUATE `GL_PIXEL_MAP_A_TO_A = &H0C79
%EQUATE `GL_PIXEL_MAP_I_TO_I_SIZE = &H0CB0
%EQUATE `GL_PIXEL_MAP_S_TO_S_SIZE = &H0CB1
%EQUATE `GL_PIXEL_MAP_I_TO_R_SIZE = &H0CB2
%EQUATE `GL_PIXEL_MAP_I_TO_G_SIZE = &H0CB3
%EQUATE `GL_PIXEL_MAP_I_TO_B_SIZE = &H0CB4
%EQUATE `GL_PIXEL_MAP_I_TO_A_SIZE = &H0CB5
%EQUATE `GL_PIXEL_MAP_R_TO_R_SIZE = &H0CB6
%EQUATE `GL_PIXEL_MAP_G_TO_G_SIZE = &H0CB7
%EQUATE `GL_PIXEL_MAP_B_TO_B_SIZE = &H0CB8
%EQUATE `GL_PIXEL_MAP_A_TO_A_SIZE = &H0CB9
%EQUATE `GL_UNPACK_SWAP_BYTES = &H0CF0
%EQUATE `GL_UNPACK_LSB_FIRST = &H0CF1
%EQUATE `GL_UNPACK_ROW_LENGTH = &H0CF2
%EQUATE `GL_UNPACK_SKIP_ROWS = &H0CF3
%EQUATE `GL_UNPACK_SKIP_PIXELS = &H0CF4
%EQUATE `GL_UNPACK_ALIGNMENT = &H0CF5
%EQUATE `GL_PACK_SWAP_BYTES = &H0D00
%EQUATE `GL_PACK_LSB_FIRST = &H0D01
%EQUATE `GL_PACK_ROW_LENGTH = &H0D02
%EQUATE `GL_PACK_SKIP_ROWS = &H0D03
%EQUATE `GL_PACK_SKIP_PIXELS = &H0D04
%EQUATE `GL_PACK_ALIGNMENT = &H0D05
%EQUATE `GL_MAP_COLOR = &H0D10
%EQUATE `GL_MAP_STENCIL = &H0D11
%EQUATE `GL_INDEX_SHIFT = &H0D12
%EQUATE `GL_INDEX_OFFSET = &H0D13
%EQUATE `GL_RED_SCALE = &H0D14
%EQUATE `GL_RED_BIAS = &H0D15
%EQUATE `GL_ZOOM_X = &H0D16
%EQUATE `GL_ZOOM_Y = &H0D17
%EQUATE `GL_GREEN_SCALE = &H0D18
%EQUATE `GL_GREEN_BIAS = &H0D19
%EQUATE `GL_BLUE_SCALE = &H0D1A
%EQUATE `GL_BLUE_BIAS = &H0D1B
%EQUATE `GL_ALPHA_SCALE = &H0D1C
%EQUATE `GL_ALPHA_BIAS = &H0D1D
%EQUATE `GL_DEPTH_SCALE = &H0D1E
%EQUATE `GL_DEPTH_BIAS = &H0D1F
%EQUATE `GL_MAX_EVAL_ORDER = &H0D30
%EQUATE `GL_MAX_LIGHTS = &H0D31
%EQUATE `GL_MAX_CLIP_PLANES = &H0D32
%EQUATE `GL_MAX_TEXTURE_SIZE = &H0D33
%EQUATE `GL_MAX_PIXEL_MAP_TABLE = &H0D34
%EQUATE `GL_MAX_ATTRIB_STACK_DEPTH = &H0D35
%EQUATE `GL_MAX_MODELVIEW_STACK_DEPTH = &H0D36
%EQUATE `GL_MAX_NAME_STACK_DEPTH = &H0D37
%EQUATE `GL_MAX_PROJECTION_STACK_DEPTH = &H0D38
%EQUATE `GL_MAX_TEXTURE_STACK_DEPTH = &H0D39
%EQUATE `GL_MAX_VIEWPORT_DIMS = &H0D3A
%EQUATE `GL_MAX_CLIENT_ATTRIB_STACK_DEPTH = &H0D3B
%EQUATE `GL_SUBPIXEL_BITS = &H0D50
%EQUATE `GL_INDEX_BITS = &H0D51
%EQUATE `GL_RED_BITS = &H0D52
%EQUATE `GL_GREEN_BITS = &H0D53
%EQUATE `GL_BLUE_BITS = &H0D54
%EQUATE `GL_ALPHA_BITS = &H0D55
%EQUATE `GL_DEPTH_BITS = &H0D56
%EQUATE `GL_STENCIL_BITS = &H0D57
%EQUATE `GL_ACCUM_RED_BITS = &H0D58
%EQUATE `GL_ACCUM_GREEN_BITS = &H0D59
%EQUATE `GL_ACCUM_BLUE_BITS = &H0D5A
%EQUATE `GL_ACCUM_ALPHA_BITS = &H0D5B
%EQUATE `GL_NAME_STACK_DEPTH = &H0D70
%EQUATE `GL_AUTO_NORMAL = &H0D80
%EQUATE `GL_MAP1_COLOR_4 = &H0D90
%EQUATE `GL_MAP1_INDEX = &H0D91
%EQUATE `GL_MAP1_NORMAL = &H0D92
%EQUATE `GL_MAP1_TEXTURE_COORD_1 = &H0D93
%EQUATE `GL_MAP1_TEXTURE_COORD_2 = &H0D94
%EQUATE `GL_MAP1_TEXTURE_COORD_3 = &H0D95
%EQUATE `GL_MAP1_TEXTURE_COORD_4 = &H0D96
%EQUATE `GL_MAP1_VERTEX_3 = &H0D97
%EQUATE `GL_MAP1_VERTEX_4 = &H0D98
%EQUATE `GL_MAP2_COLOR_4 = &H0DB0
%EQUATE `GL_MAP2_INDEX = &H0DB1
%EQUATE `GL_MAP2_NORMAL = &H0DB2
%EQUATE `GL_MAP2_TEXTURE_COORD_1 = &H0DB3
%EQUATE `GL_MAP2_TEXTURE_COORD_2 = &H0DB4
%EQUATE `GL_MAP2_TEXTURE_COORD_3 = &H0DB5
%EQUATE `GL_MAP2_TEXTURE_COORD_4 = &H0DB6
%EQUATE `GL_MAP2_VERTEX_3 = &H0DB7
%EQUATE `GL_MAP2_VERTEX_4 = &H0DB8
%EQUATE `GL_MAP1_GRID_DOMAIN = &H0DD0
%EQUATE `GL_MAP1_GRID_SEGMENTS = &H0DD1
%EQUATE `GL_MAP2_GRID_DOMAIN = &H0DD2
%EQUATE `GL_MAP2_GRID_SEGMENTS = &H0DD3
%EQUATE `GL_TEXTURE_1D = &H0DE0
%EQUATE `GL_TEXTURE_2D = &H0DE1
%EQUATE `GL_FEEDBACK_BUFFER_POINTER = &H0DF0
%EQUATE `GL_FEEDBACK_BUFFER_SIZE = &H0DF1
%EQUATE `GL_FEEDBACK_BUFFER_TYPE = &H0DF2
%EQUATE `GL_SELECTION_BUFFER_POINTER = &H0DF3
%EQUATE `GL_SELECTION_BUFFER_SIZE = &H0DF4
'/* GL_TEXTURE_BINDING_1D */
'/* GL_TEXTURE_BINDING_2D */
'/* GL_VERTEX_ARRAY */
'/* GL_NORMAL_ARRAY */
'/* GL_COLOR_ARRAY */
'/* GL_INDEX_ARRAY */
'/* GL_TEXTURE_COORD_ARRAY */
'/* GL_EDGE_FLAG_ARRAY */
'/* GL_VERTEX_ARRAY_SIZE */
'/* GL_VERTEX_ARRAY_TYPE */
'/* GL_VERTEX_ARRAY_STRIDE */
'/* GL_NORMAL_ARRAY_TYPE */
'/* GL_NORMAL_ARRAY_STRIDE */
'/* GL_COLOR_ARRAY_SIZE */
'/* GL_COLOR_ARRAY_TYPE */
'/* GL_COLOR_ARRAY_STRIDE */
'/* GL_INDEX_ARRAY_TYPE */
'/* GL_INDEX_ARRAY_STRIDE */
'/* GL_TEXTURE_COORD_ARRAY_SIZE */
'/* GL_TEXTURE_COORD_ARRAY_TYPE */
'/* GL_TEXTURE_COORD_ARRAY_STRIDE */
'/* GL_EDGE_FLAG_ARRAY_STRIDE */
'/* GL_POLYGON_OFFSET_FACTOR */
'/* GL_POLYGON_OFFSET_UNITS */
'/* GetTextureParameter */
'/* GL_TEXTURE_MAG_FILTER */
'/* GL_TEXTURE_MIN_FILTER */
'/* GL_TEXTURE_WRAP_S */
'/* GL_TEXTURE_WRAP_T */
%EQUATE `GL_TEXTURE_WIDTH = &H1000
%EQUATE `GL_TEXTURE_HEIGHT = &H1001
%EQUATE `GL_TEXTURE_INTERNAL_FORMAT = &H1003
%EQUATE `GL_TEXTURE_BORDER_COLOR = &H1004
%EQUATE `GL_TEXTURE_BORDER = &H1005
'/* GL_TEXTURE_RED_SIZE */
'/* GL_TEXTURE_GREEN_SIZE */
'/* GL_TEXTURE_BLUE_SIZE */
'/* GL_TEXTURE_ALPHA_SIZE */
'/* GL_TEXTURE_LUMINANCE_SIZE */
'/* GL_TEXTURE_INTENSITY_SIZE */
'/* GL_TEXTURE_PRIORITY */
'/* GL_TEXTURE_RESIDENT */
'/* HintMode */
%EQUATE `GL_DONT_CARE = &H1100
%EQUATE `GL_FASTEST = &H1101
%EQUATE `GL_NICEST = &H1102
'/* HintTarget */
'/* GL_PERSPECTIVE_CORRECTION_HINT */
'/* GL_POINT_SMOOTH_HINT */
'/* GL_LINE_SMOOTH_HINT */
'/* GL_POLYGON_SMOOTH_HINT */
'/* GL_FOG_HINT */
'/* GL_PHONG_HINT */
'/* IndexPointerType */
'/* GL_SHORT */
'/* GL_INT */
'/* GL_FLOAT */
'/* GL_DOUBLE */
'/* LightModelParameter */
'/* GL_LIGHT_MODEL_AMBIENT */
'/* GL_LIGHT_MODEL_LOCAL_VIEWER */
'/* GL_LIGHT_MODEL_TWO_SIDE */
'/* LightName */
%EQUATE `GL_LIGHT0 = &H4000
%EQUATE `GL_LIGHT1 = &H4001
%EQUATE `GL_LIGHT2 = &H4002
%EQUATE `GL_LIGHT3 = &H4003
%EQUATE `GL_LIGHT4 = &H4004
%EQUATE `GL_LIGHT5 = &H4005
%EQUATE `GL_LIGHT6 = &H4006
%EQUATE `GL_LIGHT7 = &H4007
'/* LightParameter */
%EQUATE `GL_AMBIENT = &H1200
%EQUATE `GL_DIFFUSE = &H1201
%EQUATE `GL_SPECULAR = &H1202
%EQUATE `GL_POSITION = &H1203
%EQUATE `GL_SPOT_DIRECTION = &H1204
%EQUATE `GL_SPOT_EXPONENT = &H1205
%EQUATE `GL_SPOT_CUTOFF = &H1206
%EQUATE `GL_CONSTANT_ATTENUATION = &H1207
%EQUATE `GL_LINEAR_ATTENUATION = &H1208
%EQUATE `GL_QUADRATIC_ATTENUATION = &H1209
'/* InterleavedArrays */
'/* GL_V2F */
'/* GL_V3F */
'/* GL_C4UB_V2F */
'/* GL_C4UB_V3F */
'/* GL_C3F_V3F */
'/* GL_N3F_V3F */
'/* GL_C4F_N3F_V3F */
'/* GL_T2F_V3F */
'/* GL_T4F_V4F */
'/* GL_T2F_C4UB_V3F */
'/* GL_T2F_C3F_V3F */
'/* GL_T2F_N3F_V3F */
'/* GL_T2F_C4F_N3F_V3F */
'/* GL_T4F_C4F_N3F_V4F */
'/* ListMode */
%EQUATE `GL_COMPILE = &H1300
%EQUATE `GL_COMPILE_AND_EXECUTE = &H1301
'/* ListNameType */
'/* GL_BYTE */
'/* GL_UNSIGNED_BYTE */
'/* GL_SHORT */
'/* GL_UNSIGNED_SHORT */
'/* GL_INT */
'/* GL_UNSIGNED_INT */
'/* GL_FLOAT */
'/* GL_2_BYTES */
'/* GL_3_BYTES */
'/* GL_4_BYTES */
'/* LogicOp */
%EQUATE `GL_CLEAR = &H1500
%EQUATE `GL_AND = &H1501
%EQUATE `GL_AND_REVERSE = &H1502
%EQUATE `GL_COPY = &H1503
%EQUATE `GL_AND_INVERTED = &H1504
%EQUATE `GL_NOOP = &H1505
%EQUATE `GL_XOR = &H1506
%EQUATE `GL_OR = &H1507
%EQUATE `GL_NOR = &H1508
%EQUATE `GL_EQUIV = &H1509
%EQUATE `GL_INVERT = &H150A
%EQUATE `GL_OR_REVERSE = &H150B
%EQUATE `GL_COPY_INVERTED = &H150C
%EQUATE `GL_OR_INVERTED = &H150D
%EQUATE `GL_NAND = &H150E
%EQUATE `GL_SET = &H150F
'/* MapTarget */
'/* GL_MAP1_COLOR_4 */
'/* GL_MAP1_INDEX */
'/* GL_MAP1_NORMAL */
'/* GL_MAP1_TEXTURE_COORD_1 */
'/* GL_MAP1_TEXTURE_COORD_2 */
'/* GL_MAP1_TEXTURE_COORD_3 */
'/* GL_MAP1_TEXTURE_COORD_4 */
'/* GL_MAP1_VERTEX_3 */
'/* GL_MAP1_VERTEX_4 */
'/* GL_MAP2_COLOR_4 */
'/* GL_MAP2_INDEX */
'/* GL_MAP2_NORMAL */
'/* GL_MAP2_TEXTURE_COORD_1 */
'/* GL_MAP2_TEXTURE_COORD_2 */
'/* GL_MAP2_TEXTURE_COORD_3 */
'/* GL_MAP2_TEXTURE_COORD_4 */
'/* GL_MAP2_VERTEX_3 */
'/* GL_MAP2_VERTEX_4 */
'/* MaterialFace */
'/* GL_FRONT */
'/* GL_BACK */
'/* GL_FRONT_AND_BACK */
'/* MaterialParameter */
%EQUATE `GL_EMISSION = &H1600
%EQUATE `GL_SHININESS = &H1601
%EQUATE `GL_AMBIENT_AND_DIFFUSE = &H1602
%EQUATE `GL_COLOR_INDEXES = &H1603
'/* GL_AMBIENT */
'/* GL_DIFFUSE */
'/* GL_SPECULAR */
'/* MatrixMode */
%EQUATE `GL_MODELVIEW = &H1700
%EQUATE `GL_PROJECTION = &H1701
%EQUATE `GL_TEXTURE = &H1702
'/* MeshMode1 */
'/* GL_POINT */
'/* GL_LINE */
'/* MeshMode2 */
'/* GL_POINT */
'/* GL_LINE */
'/* GL_FILL */
'/* NormalPointerType */
'/* GL_BYTE */
'/* GL_SHORT */
'/* GL_INT */
'/* GL_FLOAT */
'/* GL_DOUBLE */
'/* PixelCopyType */
%EQUATE `GL_COLOR = &H1800
%EQUATE `GL_DEPTH = &H1801
%EQUATE `GL_STENCIL = &H1802
'/* PixelFormat */
%EQUATE `GL_COLOR_INDEX = &H1900
%EQUATE `GL_STENCIL_INDEX = &H1901
%EQUATE `GL_DEPTH_COMPONENT = &H1902
%EQUATE `GL_RED = &H1903
%EQUATE `GL_GREEN = &H1904
%EQUATE `GL_BLUE = &H1905
%EQUATE `GL_ALPHA = &H1906
%EQUATE `GL_RGB = &H1907
%EQUATE `GL_RGBA = &H1908
%EQUATE `GL_LUMINANCE = &H1909
%EQUATE `GL_LUMINANCE_ALPHA = &H190A
'/* PixelMap */
'/* GL_PIXEL_MAP_I_TO_I */
'/* GL_PIXEL_MAP_S_TO_S */
'/* GL_PIXEL_MAP_I_TO_R */
'/* GL_PIXEL_MAP_I_TO_G */
'/* GL_PIXEL_MAP_I_TO_B */
'/* GL_PIXEL_MAP_I_TO_A */
'/* GL_PIXEL_MAP_R_TO_R */
'/* GL_PIXEL_MAP_G_TO_G */
'/* GL_PIXEL_MAP_B_TO_B */
'/* GL_PIXEL_MAP_A_TO_A */
'/* PixelStore */
'/* GL_UNPACK_SWAP_BYTES */
'/* GL_UNPACK_LSB_FIRST */
'/* GL_UNPACK_ROW_LENGTH */
'/* GL_UNPACK_SKIP_ROWS */
'/* GL_UNPACK_SKIP_PIXELS */
'/* GL_UNPACK_ALIGNMENT */
'/* GL_PACK_SWAP_BYTES */
'/* GL_PACK_LSB_FIRST */
'/* GL_PACK_ROW_LENGTH */
'/* GL_PACK_SKIP_ROWS */
'/* GL_PACK_SKIP_PIXELS */
'/* GL_PACK_ALIGNMENT */
'/* PixelTransfer */
'/* GL_MAP_COLOR */
'/* GL_MAP_STENCIL */
'/* GL_INDEX_SHIFT */
'/* GL_INDEX_OFFSET */
'/* GL_RED_SCALE */
'/* GL_RED_BIAS */
'/* GL_GREEN_SCALE */
'/* GL_GREEN_BIAS */
'/* GL_BLUE_SCALE */
'/* GL_BLUE_BIAS */
'/* GL_ALPHA_SCALE */
'/* GL_ALPHA_BIAS */
'/* GL_DEPTH_SCALE */
'/* GL_DEPTH_BIAS */
'/* PixelType */
%EQUATE `GL_BITMAP = &H1A00
'/* GL_BYTE */
'/* GL_UNSIGNED_BYTE */
'/* GL_SHORT */
'/* GL_UNSIGNED_SHORT */
'/* GL_INT */
'/* GL_UNSIGNED_INT */
'/* GL_FLOAT */
'/* PolygonMode */
%EQUATE `GL_POINT = &H1B00
%EQUATE `GL_LINE = &H1B01
%EQUATE `GL_FILL = &H1B02
'/* ReadBufferMode */
'/* GL_FRONT_LEFT */
'/* GL_FRONT_RIGHT */
'/* GL_BACK_LEFT */
'/* GL_BACK_RIGHT */
'/* GL_FRONT */
'/* GL_BACK */
'/* GL_LEFT */
'/* GL_RIGHT */
'/* GL_AUX0 */
'/* GL_AUX1 */
'/* GL_AUX2 */
'/* GL_AUX3 */
'/* RenderingMode */
%EQUATE `GL_RENDER = &H1C00
%EQUATE `GL_FEEDBACK = &H1C01
%EQUATE `GL_SELECT = &H1C02
'/* ShadingModel */
%EQUATE `GL_FLAT = &H1D00
%EQUATE `GL_SMOOTH = &H1D01
'/* StencilFunction */
'/* GL_NEVER */
'/* GL_LESS */
'/* GL_EQUAL */
'/* GL_LEQUAL */
'/* GL_GREATER */
'/* GL_NOTEQUAL */
'/* GL_GEQUAL */
'/* GL_ALWAYS */
'/* StencilOp */
'/* GL_ZERO */
%EQUATE `GL_KEEP = &H1E00
%EQUATE `GL_REPLACE = &H1E01
%EQUATE `GL_INCR = &H1E02
%EQUATE `GL_DECR = &H1E03
'/* GL_INVERT */
'/* StringName */
%EQUATE `GL_VENDOR = &H1F00
%EQUATE `GL_RENDERER = &H1F01
%EQUATE `GL_VERSION = &H1F02
%EQUATE `GL_EXTENSIONS = &H1F03
'/* TextureCoordName */
%EQUATE `GL_S = &H2000
%EQUATE `GL_T = &H2001
%EQUATE `GL_R = &H2002
%EQUATE `GL_Q = &H2003
'/* TexCoordPointerType */
'/* GL_SHORT */
'/* GL_INT */
'/* GL_FLOAT */
'/* GL_DOUBLE */
'/* TextureEnvMode */
%EQUATE `GL_MODULATE = &H2100
%EQUATE `GL_DECAL = &H2101
'/* GL_BLEND */
'/* GL_REPLACE */
'/* TextureEnvParameter */
%EQUATE `GL_TEXTURE_ENV_MODE = &H2200
%EQUATE `GL_TEXTURE_ENV_COLOR = &H2201
'/* TextureEnvTarget */
%EQUATE `GL_TEXTURE_ENV = &H2300
'/* TextureGenMode */
%EQUATE `GL_EYE_LINEAR = &H2400
%EQUATE `GL_OBJECT_LINEAR = &H2401
%EQUATE `GL_SPHERE_MAP = &H2402
'/* TextureGenParameter */
%EQUATE `GL_TEXTURE_GEN_MODE = &H2500
%EQUATE `GL_OBJECT_PLANE = &H2501
%EQUATE `GL_EYE_PLANE = &H2502
'/* TextureMagFilter */
%EQUATE `GL_NEAREST = &H2600
%EQUATE `GL_LINEAR = &H2601
'/* TextureMinFilter */
'/* GL_NEAREST */
'/* GL_LINEAR */
%EQUATE `GL_NEAREST_MIPMAP_NEAREST = &H2700
%EQUATE `GL_LINEAR_MIPMAP_NEAREST = &H2701
%EQUATE `GL_NEAREST_MIPMAP_LINEAR = &H2702
%EQUATE `GL_LINEAR_MIPMAP_LINEAR = &H2703
'/* TextureParameterName */
%EQUATE `GL_TEXTURE_MAG_FILTER = &H2800
%EQUATE `GL_TEXTURE_MIN_FILTER = &H2801
%EQUATE `GL_TEXTURE_WRAP_S = &H2802
%EQUATE `GL_TEXTURE_WRAP_T = &H2803
'/* GL_TEXTURE_BORDER_COLOR */
'/* GL_TEXTURE_PRIORITY */
'/* TextureTarget */
'/* GL_TEXTURE_1D */
'/* GL_TEXTURE_2D */
'/* GL_PROXY_TEXTURE_1D */
'/* GL_PROXY_TEXTURE_2D */
'/* TextureWrapMode */
%EQUATE `GL_CLAMP = &H2900
%EQUATE `GL_REPEAT = &H2901
'/* VertexPointerType */
'/* GL_SHORT */
'/* GL_INT */
'/* GL_FLOAT */
'/* GL_DOUBLE */
'/* ClientAttribMask */
%EQUATE `GL_CLIENT_PIXEL_STORE_BIT = &H00000001
%EQUATE `GL_CLIENT_VERTEX_ARRAY_BIT = &H00000002
%EQUATE `GL_CLIENT_ALL_ATTRIB_BITS = &Hffffffff
'/* polygon_offset */
%EQUATE `GL_POLYGON_OFFSET_FACTOR = &H8038
%EQUATE `GL_POLYGON_OFFSET_UNITS = &H2A00
%EQUATE `GL_POLYGON_OFFSET_POINT = &H2A01
%EQUATE `GL_POLYGON_OFFSET_LINE = &H2A02
%EQUATE `GL_POLYGON_OFFSET_FILL = &H8037
'/* texture */
%EQUATE `GL_ALPHA4 = &H803B
%EQUATE `GL_ALPHA8 = &H803C
%EQUATE `GL_ALPHA12 = &H803D
%EQUATE `GL_ALPHA16 = &H803E
%EQUATE `GL_LUMINANCE4 = &H803F
%EQUATE `GL_LUMINANCE8 = &H8040
%EQUATE `GL_LUMINANCE12 = &H8041
%EQUATE `GL_LUMINANCE16 = &H8042
%EQUATE `GL_LUMINANCE4_ALPHA4 = &H8043
%EQUATE `GL_LUMINANCE6_ALPHA2 = &H8044
%EQUATE `GL_LUMINANCE8_ALPHA8 = &H8045
%EQUATE `GL_LUMINANCE12_ALPHA4 = &H8046
%EQUATE `GL_LUMINANCE12_ALPHA12 = &H8047
%EQUATE `GL_LUMINANCE16_ALPHA16 = &H8048
%EQUATE `GL_INTENSITY = &H8049
%EQUATE `GL_INTENSITY4 = &H804A
%EQUATE `GL_INTENSITY8 = &H804B
%EQUATE `GL_INTENSITY12 = &H804C
%EQUATE `GL_INTENSITY16 = &H804D
%EQUATE `GL_R3_G3_B2 = &H2A10
%EQUATE `GL_RGB4 = &H804F
%EQUATE `GL_RGB5 = &H8050
%EQUATE `GL_RGB8 = &H8051
%EQUATE `GL_RGB10 = &H8052
%EQUATE `GL_RGB12 = &H8053
%EQUATE `GL_RGB16 = &H8054
%EQUATE `GL_RGBA2 = &H8055
%EQUATE `GL_RGBA4 = &H8056
%EQUATE `GL_RGB5_A1 = &H8057
%EQUATE `GL_RGBA8 = &H8058
%EQUATE `GL_RGB10_A2 = &H8059
%EQUATE `GL_RGBA12 = &H805A
%EQUATE `GL_RGBA16 = &H805B
%EQUATE `GL_TEXTURE_RED_SIZE = &H805C
%EQUATE `GL_TEXTURE_GREEN_SIZE = &H805D
%EQUATE `GL_TEXTURE_BLUE_SIZE = &H805E
%EQUATE `GL_TEXTURE_ALPHA_SIZE = &H805F
%EQUATE `GL_TEXTURE_LUMINANCE_SIZE = &H8060
%EQUATE `GL_TEXTURE_INTENSITY_SIZE = &H8061
%EQUATE `GL_PROXY_TEXTURE_1D = &H8063
%EQUATE `GL_PROXY_TEXTURE_2D = &H8064
'/* texture_object */
%EQUATE `GL_TEXTURE_PRIORITY = &H8066
%EQUATE `GL_TEXTURE_RESIDENT = &H8067
%EQUATE `GL_TEXTURE_BINDING_1D = &H8068
%EQUATE `GL_TEXTURE_BINDING_2D = &H8069
'/* vertex_array */
%EQUATE `GL_VERTEX_ARRAY = &H8074
%EQUATE `GL_NORMAL_ARRAY = &H8075
%EQUATE `GL_COLOR_ARRAY = &H8076
%EQUATE `GL_INDEX_ARRAY = &H8077
%EQUATE `GL_TEXTURE_COORD_ARRAY = &H8078
%EQUATE `GL_EDGE_FLAG_ARRAY = &H8079
%EQUATE `GL_VERTEX_ARRAY_SIZE = &H807A
%EQUATE `GL_VERTEX_ARRAY_TYPE = &H807B
%EQUATE `GL_VERTEX_ARRAY_STRIDE = &H807C
%EQUATE `GL_NORMAL_ARRAY_TYPE = &H807E
%EQUATE `GL_NORMAL_ARRAY_STRIDE = &H807F
%EQUATE `GL_COLOR_ARRAY_SIZE = &H8081
%EQUATE `GL_COLOR_ARRAY_TYPE = &H8082
%EQUATE `GL_COLOR_ARRAY_STRIDE = &H8083
%EQUATE `GL_INDEX_ARRAY_TYPE = &H8085
%EQUATE `GL_INDEX_ARRAY_STRIDE = &H8086
%EQUATE `GL_TEXTURE_COORD_ARRAY_SIZE = &H8088
%EQUATE `GL_TEXTURE_COORD_ARRAY_TYPE = &H8089
%EQUATE `GL_TEXTURE_COORD_ARRAY_STRIDE = &H808A
%EQUATE `GL_EDGE_FLAG_ARRAY_STRIDE = &H808C
%EQUATE `GL_VERTEX_ARRAY_POINTER = &H808E
%EQUATE `GL_NORMAL_ARRAY_POINTER = &H808F
%EQUATE `GL_COLOR_ARRAY_POINTER = &H8090
%EQUATE `GL_INDEX_ARRAY_POINTER = &H8091
%EQUATE `GL_TEXTURE_COORD_ARRAY_POINTER = &H8092
%EQUATE `GL_EDGE_FLAG_ARRAY_POINTER = &H8093
%EQUATE `GL_V2F = &H2A20
%EQUATE `GL_V3F = &H2A21
%EQUATE `GL_C4UB_V2F = &H2A22
%EQUATE `GL_C4UB_V3F = &H2A23
%EQUATE `GL_C3F_V3F = &H2A24
%EQUATE `GL_N3F_V3F = &H2A25
%EQUATE `GL_C4F_N3F_V3F = &H2A26
%EQUATE `GL_T2F_V3F = &H2A27
%EQUATE `GL_T4F_V4F = &H2A28
%EQUATE `GL_T2F_C4UB_V3F = &H2A29
%EQUATE `GL_T2F_C3F_V3F = &H2A2A
%EQUATE `GL_T2F_N3F_V3F = &H2A2B
%EQUATE `GL_T2F_C4F_N3F_V3F = &H2A2C
%EQUATE `GL_T4F_C4F_N3F_V4F = &H2A2D
'/* Extensions */
%EQUATE `GL_EXT_vertex_array = 1
%EQUATE `GL_EXT_bgra = 1
%EQUATE `GL_EXT_paletted_texture = 1
%EQUATE `GL_WIN_swap_hint = 1
%EQUATE `GL_WIN_draw_range_elements = 1
'// #define GL_WIN_phong_shading 1
'// #define GL_WIN_specular_fog 1
'/* EXT_vertex_array */
%EQUATE `GL_VERTEX_ARRAY_EXT = &H8074
%EQUATE `GL_NORMAL_ARRAY_EXT = &H8075
%EQUATE `GL_COLOR_ARRAY_EXT = &H8076
%EQUATE `GL_INDEX_ARRAY_EXT = &H8077
%EQUATE `GL_TEXTURE_COORD_ARRAY_EXT = &H8078
%EQUATE `GL_EDGE_FLAG_ARRAY_EXT = &H8079
%EQUATE `GL_VERTEX_ARRAY_SIZE_EXT = &H807A
%EQUATE `GL_VERTEX_ARRAY_TYPE_EXT = &H807B
%EQUATE `GL_VERTEX_ARRAY_STRIDE_EXT = &H807C
%EQUATE `GL_VERTEX_ARRAY_COUNT_EXT = &H807D
%EQUATE `GL_NORMAL_ARRAY_TYPE_EXT = &H807E
%EQUATE `GL_NORMAL_ARRAY_STRIDE_EXT = &H807F
%EQUATE `GL_NORMAL_ARRAY_COUNT_EXT = &H8080
%EQUATE `GL_COLOR_ARRAY_SIZE_EXT = &H8081
%EQUATE `GL_COLOR_ARRAY_TYPE_EXT = &H8082
%EQUATE `GL_COLOR_ARRAY_STRIDE_EXT = &H8083
%EQUATE `GL_COLOR_ARRAY_COUNT_EXT = &H8084
%EQUATE `GL_INDEX_ARRAY_TYPE_EXT = &H8085
%EQUATE `GL_INDEX_ARRAY_STRIDE_EXT = &H8086
%EQUATE `GL_INDEX_ARRAY_COUNT_EXT = &H8087
%EQUATE `GL_TEXTURE_COORD_ARRAY_SIZE_EXT = &H8088
%EQUATE `GL_TEXTURE_COORD_ARRAY_TYPE_EXT = &H8089
%EQUATE `GL_TEXTURE_COORD_ARRAY_STRIDE_EXT = &H808A
%EQUATE `GL_TEXTURE_COORD_ARRAY_COUNT_EXT = &H808B
%EQUATE `GL_EDGE_FLAG_ARRAY_STRIDE_EXT = &H808C
%EQUATE `GL_EDGE_FLAG_ARRAY_COUNT_EXT = &H808D
%EQUATE `GL_VERTEX_ARRAY_POINTER_EXT = &H808E
%EQUATE `GL_NORMAL_ARRAY_POINTER_EXT = &H808F
%EQUATE `GL_COLOR_ARRAY_POINTER_EXT = &H8090
%EQUATE `GL_INDEX_ARRAY_POINTER_EXT = &H8091
%EQUATE `GL_TEXTURE_COORD_ARRAY_POINTER_EXT = &H8092
%EQUATE `GL_EDGE_FLAG_ARRAY_POINTER_EXT = &H8093
%EQUATE `GL_DOUBLE_EXT = %GL_DOUBLE
'/* EXT_bgra */
%EQUATE `GL_BGR_EXT = &H80E0
%EQUATE `GL_BGRA_EXT = &H80E1
'/* EXT_paletted_texture */
'/* These must match the GL_COLOR_TABLE_*_SGI enumerants */
%EQUATE `GL_COLOR_TABLE_FORMAT_EXT = &H80D8
%EQUATE `GL_COLOR_TABLE_WIDTH_EXT = &H80D9
%EQUATE `GL_COLOR_TABLE_RED_SIZE_EXT = &H80DA
%EQUATE `GL_COLOR_TABLE_GREEN_SIZE_EXT = &H80DB
%EQUATE `GL_COLOR_TABLE_BLUE_SIZE_EXT = &H80DC
%EQUATE `GL_COLOR_TABLE_ALPHA_SIZE_EXT = &H80DD
%EQUATE `GL_COLOR_TABLE_LUMINANCE_SIZE_EXT = &H80DE
%EQUATE `GL_COLOR_TABLE_INTENSITY_SIZE_EXT = &H80DF
%EQUATE `GL_COLOR_INDEX1_EXT = &H80E2
%EQUATE `GL_COLOR_INDEX2_EXT = &H80E3
%EQUATE `GL_COLOR_INDEX4_EXT = &H80E4
%EQUATE `GL_COLOR_INDEX8_EXT = &H80E5
%EQUATE `GL_COLOR_INDEX12_EXT = &H80E6
%EQUATE `GL_COLOR_INDEX16_EXT = &H80E7
'/* WIN_draw_range_elements */
%EQUATE `GL_MAX_ELEMENTS_VERTICES_WIN = &H80E8
%EQUATE `GL_MAX_ELEMENTS_INDICES_WIN = &H80E9
'/* WIN_phong_shading */
%EQUATE `GL_PHONG_WIN = &H80EA
%EQUATE `GL_PHONG_HINT_WIN = &H80EB
'/* WIN_specular_fog */
%EQUATE `GL_FOG_SPECULAR_TEXTURE_WIN = &H80EC
'/* For compatibility with OpenGL v1.0 */
%EQUATE `GL_LOGIC_OP = %GL_INDEX_LOGIC_OP
%EQUATE `GL_TEXTURE_COMPONENTS = %GL_TEXTURE_INTERNAL_FORMAT
'/*************************************************************/
' ========================================================================================
' WINGDIAPI void APIENTRY glAccum (GLenum op, GLfloat value);
' Operates on the accumulation buffer.
' ========================================================================================
DECLARE SUB glAccum LIB "opengl32.dll" ALIAS "glAccum" ( BYVAL op AS QUAD ' GLenum op , BYVAL value AS SINGLE ' GLfloat value ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glAlphaFunc (GLenum func, GLclampf ref);
' Enables your application to set the alpha test function.
' ========================================================================================
DECLARE SUB glAlphaFunc LIB "opengl32.dll" ALIAS "glAlphaFunc" ( BYVAL func AS QUAD ' GLEnum func , BYVAL ref AS SINGLE ' GLclampf ref ) ' void
' ========================================================================================
' WINGDIAPI GLboolean APIENTRY glAreTexturesResident (GLsizei n, const GLuint *textures,
' GLboolean *residences);
' Determines whether specified texture objects are resident in texture memory.
' ========================================================================================
DECLARE FUNCTION glAreTexturesResident LIB "opengl32.dll" ALIAS "glAreTexturesResident" ( BYVAL n AS LONG ' GLsizei n , BYREF textures AS QUAD ' const GLuint *textures , BYREF residences AS BYTE ' GLboolean *residences ) AS BYTE ' GLboolean
' ========================================================================================
' WINGDIAPI void APIENTRY glArrayElement (GLint i);
' Specifies the array elements used to render a vertex.
' ========================================================================================
DECLARE SUB glArrayElement LIB "opengl32.dll" ALIAS "glArrayElement" ( BYVAL i AS LONG ' GLint i ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glBegin (GLenum mode);
' The glBegin and glEnd functions delimit the vertices of a primitive or a group of like
' primitives.
' ========================================================================================
DECLARE SUB glBegin LIB "opengl32.dll" ALIAS "glBegin" ( BYVAL mode AS QUAD ' GLEnum mode ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glBindTexture (GLenum target, GLuint texture);
' Enables the creation of a named texture that is bound to a texture target.
' ========================================================================================
DECLARE SUB glBindTexture LIB "opengl32.dll" ALIAS "glBindTexture" ( BYVAL target AS QUAD ' GLEnum target , BYVAL texture AS QUAD ' GLuint texture ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glBitmap (GLsizei width, GLsizei height, GLfloat xorig,
' GLfloat yorig, GLfloat xmove, GLfloat ymove, const GLubyte *bitmap);
' Draws a bitmap.
' ========================================================================================
DECLARE SUB glBitmap LIB "opengl32.dll" ALIAS "glBitmap" ( BYVAL width AS LONG ' GLsizei width , BYVAL height AS LONG ' GLsizei height , BYVAL xorig AS SINGLE ' GLfloat xorig , BYVAL yorig AS SINGLE ' GLfloat yorig , BYVAL xmove AS SINGLE ' GLfloat xmove , BYVAL ymove AS SINGLE ' GLfloat ymove , BYREF bitmap AS BYTE ' const GLubyte *bitmap ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glBlendFunc (GLenum sfactor, GLenum dfactor);
' Specifies pixel arithmetic.
' ========================================================================================
DECLARE SUB glBlendFunc LIB "opengl32.dll" ALIAS "glBlendFunc" ( BYVAL sfactor AS QUAD ' GLEnum sfactor , BYVAL dfactor AS QUAD ' GLEnum dfactor ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glCallList (GLuint list);
' Executes a display list.
' ========================================================================================
DECLARE SUB glCallList LIB "opengl32.dll" ALIAS "glCallList" ( BYVAL list AS QUAD ' GLuint list ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glCallLists (GLsizei n, GLenum type, const GLvoid *lists);
' Executes a list of display lists.
' ========================================================================================
DECLARE SUB glCallLists LIB "opengl32.dll" ALIAS "glCallLists" ( BYVAL n AS LONG ' GLsizei n , BYVAL type AS QUAD ' GLEnum type , BYREF lists AS ANY ' const GLvoid *lists ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glClear (GLbitfield mask);
' Clears buffers to preset values.
' ========================================================================================
DECLARE SUB glClear LIB "opengl32.dll" ALIAS "glClear" ( BYVAL mask AS QUAD ' GLbitfield mask ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glClearAccum (GLfloat red, GLfloat green, GLfloat blue, GLfloat alpha);
' Specifies the clear values for the accumulation buffer.
' ========================================================================================
DECLARE SUB glClearAccum LIB "opengl32.dll" ALIAS "glClearAccum" ( BYVAL red AS SINGLE ' GLfloat red , BYVAL green AS SINGLE ' GLfloat green , BYVAL blue AS SINGLE ' GLfloat blue , BYVAL alpha AS SINGLE ' GLfloat alpha ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glClearColor (GLclampf red, GLclampf green, GLclampf blue, GLclampf alpha);
' Specifies clear values for the color buffers.
' ========================================================================================
DECLARE SUB glClearColor LIB "opengl32.dll" ALIAS "glClearColor" ( BYVAL red AS SINGLE ' GLclampf red , BYVAL green AS SINGLE ' GLclampf green , BYVAL blue AS SINGLE ' GLclampf blue , BYVAL alpha AS SINGLE ' GLclampf alpha ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glClearDepth (GLclampd depth);
' Specifies the clear value for the depth buffer.
' ========================================================================================
DECLARE SUB glClearDepth LIB "opengl32.dll" ALIAS "glClearDepth" ( BYVAL depth AS DOUBLE ' GLclampd depth ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glClearIndex (GLfloat c);
' Specifies the clear value for the color-index buffers.
' ========================================================================================
DECLARE SUB glClearIndex LIB "opengl32.dll" ALIAS "glClearIndex" ( BYVAL c AS SINGLE ' GLfloat c ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glClearStencil (GLint s);
' Specifies the clear value for the stencil buffer.
' ========================================================================================
DECLARE SUB glClearStencil LIB "opengl32.dll" ALIAS "glClearStencil" ( BYVAL s AS LONG ' GLint s ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glClipPlane (GLenum plane, const GLdouble *equation);
' Specifies a plane against which all geometry is clipped.
' ========================================================================================
DECLARE SUB glClipPlane LIB "opengl32.dll" ALIAS "glClipPlane" ( BYVAL plane AS QUAD ' GLEnum plane , BYREF equation AS DOUBLE ' const GLdouble *equation ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3b (GLbyte red, GLbyte green, GLbyte blue);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3b LIB "opengl32.dll" ALIAS "glColor3b" ( BYVAL red AS BYTE ' GLbyte red , BYVAL green AS BYTE ' GLbyte green , BYVAL blue AS BYTE ' GLbyte blue ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3bv (const GLbyte *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3bv LIB "opengl32.dll" ALIAS "glColor3bv" ( BYREF v AS BYTE ' GLbyte *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3d (GLdouble red, GLdouble green, GLdouble blue);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3d LIB "opengl32.dll" ALIAS "glColor3d" ( BYVAL red AS DOUBLE ' GLdouble red , BYVAL green AS DOUBLE ' GLdouble green , BYVAL blue AS DOUBLE ' GLdouble blue ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3dv (const GLdouble *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3dv LIB "opengl32.dll" ALIAS "glColor3dv" ( BYREF v AS DOUBLE ' GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3f (GLfloat red, GLfloat green, GLfloat blue);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3f LIB "opengl32.dll" ALIAS "glColor3f" ( BYVAL red AS SINGLE ' GLfloat red , BYVAL green AS SINGLE ' GLfloat green , BYVAL blue AS SINGLE ' GLfloat blue ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3fv (const GLfloat *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3fv LIB "opengl32.dll" ALIAS "glColor3fv" ( BYREF v AS SINGLE ' GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3i (GLint red, GLint green, GLint blue);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3i LIB "opengl32.dll" ALIAS "glColor3i" ( BYVAL red AS LONG ' GLint red , BYVAL green AS LONG ' GLint green , BYVAL blue AS LONG ' GLint blue ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3iv (const GLint *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3iv LIB "opengl32.dll" ALIAS "glColor3iv" ( BYREF v AS LONG ' GLint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3s (GLshort red, GLshort green, GLshort blue);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3s LIB "opengl32.dll" ALIAS "glColor3s" ( BYVAL red AS INTEGER ' GLshort red , BYVAL green AS INTEGER ' GLshort green , BYVAL blue AS INTEGER ' GLshort blue ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3sv (const GLshort *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3sv LIB "opengl32.dll" ALIAS "glColor3sv" ( BYREF v AS INTEGER ' GLshort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3ub (GLubyte red, GLubyte green, GLubyte blue);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3ub LIB "opengl32.dll" ALIAS "glColor3ub" ( BYVAL red AS BYTE ' GLubyte red , BYVAL green AS BYTE ' GLubyte green , BYVAL blue AS BYTE ' GLubyte blue ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3ubv (const GLubyte *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3ubv LIB "opengl32.dll" ALIAS "glColor3ubv" ( BYREF v AS BYTE ' GLubyte *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3ui (GLuint red, GLuint green, GLuint blue);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3ui LIB "opengl32.dll" ALIAS "glColor3ui" ( BYVAL red AS QUAD ' GLuint red , BYVAL green AS QUAD ' GLuint green , BYVAL blue AS QUAD ' GLuint blue ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3uiv (const GLuint *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3uiv LIB "opengl32.dll" ALIAS "glColor3uiv" ( BYREF v AS QUAD ' GLuint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3us (GLushort red, GLushort green, GLushort blue);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3us LIB "opengl32.dll" ALIAS "glColor3us" ( BYVAL red AS WORD ' GLushort red , BYVAL green AS WORD ' GLushort green , BYVAL blue AS WORD ' GLushort blue ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor3usv (const GLushort *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor3usv LIB "opengl32.dll" ALIAS "glColor3usv" ( BYREF v AS WORD ' GLushort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4b (GLbyte red, GLbyte green, GLbyte blue, GLbyte alpha);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4b LIB "opengl32.dll" ALIAS "glColor4b" ( BYVAL red AS BYTE ' GLbyte red , BYVAL green AS BYTE ' GLbyte green , BYVAL blue AS BYTE ' GLbyte blue , BYVAL alpha AS BYTE ' GLbyte alpha ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4bv (const GLbyte *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4bv LIB "opengl32.dll" ALIAS "glColor4bv" ( BYREF v AS BYTE ' GLbyte *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4d (GLdouble red, GLdouble green, GLdouble blue, GLdouble alpha);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4d LIB "opengl32.dll" ALIAS "glColor4d" ( BYVAL red AS DOUBLE ' GLdouble red , BYVAL green AS DOUBLE ' GLdouble green , BYVAL blue AS DOUBLE ' GLdouble blue , BYVAL alpha AS DOUBLE ' GLdouble alpha ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4dv (const GLdouble *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4dv LIB "opengl32.dll" ALIAS "glColor4dv" ( BYREF v AS DOUBLE ' GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4f (GLfloat red, GLfloat green, GLfloat blue, GLfloat alpha);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4f LIB "opengl32.dll" ALIAS "glColor4f" ( BYVAL red AS SINGLE ' GLfloat red , BYVAL green AS SINGLE ' GLfloat green , BYVAL blue AS SINGLE ' GLfloat blue , BYVAL alpha AS SINGLE ' GLfloat alpha ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4fv (const GLfloat *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4fv LIB "opengl32.dll" ALIAS "glColor4fv" ( BYREF v AS SINGLE ' GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4i (GLint red, GLint green, GLint blue, GLint alpha);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4i LIB "opengl32.dll" ALIAS "glColor4i" ( BYVAL red AS LONG ' GLint red , BYVAL green AS LONG ' GLint green , BYVAL blue AS LONG ' GLint blue , BYVAL alpha AS LONG ' GLint alpha ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4iv (const GLint *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4iv LIB "opengl32.dll" ALIAS "glColor4iv" ( BYREF v AS LONG ' GLint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4s (GLshort red, GLshort green, GLshort blue, GLshort alpha);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4s LIB "opengl32.dll" ALIAS "glColor4s" ( BYVAL red AS INTEGER ' GLshort red , BYVAL green AS INTEGER ' GLshort green , BYVAL blue AS INTEGER ' GLshort blue , BYVAL alpha AS INTEGER ' GLshort alpha ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4sv (const GLshort *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4sv LIB "opengl32.dll" ALIAS "glColor4sv" ( BYREF v AS INTEGER ' GLshort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4ub (GLubyte red, GLubyte green, GLubyte blue, GLubyte alpha);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4ub LIB "opengl32.dll" ALIAS "glColor4ub" ( BYVAL red AS BYTE ' GLubyte red , BYVAL green AS BYTE ' GLubyte green , BYVAL blue AS BYTE ' GLubyte blue , BYVAL alpha AS BYTE ' GLubyte alpha ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4ubv (const GLubyte *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4ubv LIB "opengl32.dll" ALIAS "glColor4ubv" ( BYREF v AS BYTE ' GLubyte *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4ui (GLuint red, GLuint green, GLuint blue, GLuint alpha);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4ui LIB "opengl32.dll" ALIAS "glColor4ui" ( BYVAL red AS QUAD ' GLuint red , BYVAL green AS QUAD ' GLuint green , BYVAL blue AS QUAD ' GLuint blue , BYVAL alpha AS QUAD ' GLuint alpha ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4uiv (const GLuint *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4uiv LIB "opengl32.dll" ALIAS "glColor4uiv" ( BYREF v AS QUAD ' GLuint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4us (GLushort red, GLushort green, GLushort blue, GLushort alpha);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4us LIB "opengl32.dll" ALIAS "glColor4us" ( BYVAL red AS WORD ' GLushort red , BYVAL green AS WORD ' GLushort green , BYVAL blue AS WORD ' GLushort blue , BYVAL alpha AS WORD ' GLushort alpha ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColor4usv (const GLushort *v);
' Sets the current color.
' ========================================================================================
DECLARE SUB glColor4usv LIB "opengl32.dll" ALIAS "glColor4usv" ( BYREF v AS WORD ' GLushort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColorMask (GLboolean red, GLboolean green, GLboolean blue, GLboolean alpha);
' Enables and disables writing of frame-buffer color components.
' ========================================================================================
DECLARE SUB glColorMask LIB "opengl32.dll" ALIAS "glColorMask" ( BYVAL red AS BYTE ' GLboolean red , BYVAL green AS BYTE ' GLboolean green , BYVAL blue AS BYTE ' GLboolean blue , BYVAL alpha AS BYTE ' GLboolean alpha ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColorMaterial (GLenum face, GLenum mode);
' Causes a material color to track the current color.
' ========================================================================================
DECLARE SUB glColorMaterial LIB "opengl32.dll" ALIAS "glColorMaterial" ( BYVAL face AS QUAD ' GLEnum face , BYVAL mode AS QUAD ' GLEnum mode ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glColorPointer (GLint size, GLenum type, GLsizei stride, const GLvoid *pointer);
' Defines an array of colors.
' ========================================================================================
DECLARE SUB glColorPointer LIB "opengl32.dll" ALIAS "glColorPointer" ( BYVAL size AS LONG ' GLint size , BYVAL type AS QUAD ' GLEnum type , BYVAL stride AS LONG ' GLsizei stride , BYREF pointer AS ANY ' const GLvoid *pointer ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glCopyPixels (GLint x, GLint y, GLsizei width, GLsizei height, GLenum type);
' Copies pixels in the framebuffer.
' ========================================================================================
DECLARE SUB glCopyPixels LIB "opengl32.dll" ALIAS "glCopyPixels" ( BYVAL x AS LONG ' GLint x , BYVAL y AS LONG ' GLint y , BYVAL width AS LONG ' GLsizei width , BYVAL height AS LONG ' GLsizei height , BYVAL type AS QUAD ' GLEnum type ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glCopyTexImage1D (GLenum target, GLint level,
' GLEnum internalFormat, GLint x, GLint y, GLsizei width, GLint border);
' Copies pixels from the framebuffer into a one-dimensional texture image.
' ========================================================================================
DECLARE SUB glCopyTexImage1D LIB "opengl32.dll" ALIAS "glCopyTexImage1D" ( BYVAL target AS QUAD ' GLEnum target , BYVAL level AS LONG ' GLint level , BYVAL internalFormat AS QUAD ' GLEnum internalFormat , BYVAL x AS LONG ' GLint x , BYVAL y AS LONG ' GLint y , BYVAL width AS LONG ' GLsizei width , BYVAL border AS LONG ' GLint border ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glCopyTexImage2D (GLenum target, GLint level,
' GLEnum internalFormat, GLint x, GLint y, GLsizei width, GLsizei height, GLint border);
' Copies pixels from the framebuffer into a two-dimensional texture image.
' ========================================================================================
DECLARE SUB glCopyTexImage2D LIB "opengl32.dll" ALIAS "glCopyTexImage2D" ( BYVAL target AS QUAD ' GLEnum target , BYVAL level AS LONG ' GLint level , BYVAL internalFormat AS QUAD ' GLEnum internalFormat , BYVAL x AS LONG ' GLint x , BYVAL y AS LONG ' GLint y , BYVAL width AS LONG ' GLsizei width , BYVAL height AS LONG ' GLsizei height , BYVAL border AS LONG ' GLint border ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glCopyTexSubImage1D (GLenum target, GLint level, GLint xoffset,
' GLint x, GLint y, GLsizei width);
' Copies a sub-image of a one-dimensional texture image from the framebuffer.
' ========================================================================================
DECLARE SUB glCopyTexSubImage1D LIB "opengl32.dll" ALIAS "glCopyTexSubImage1D" ( BYVAL target AS QUAD ' GLEnum target , BYVAL level AS LONG ' GLint level , BYVAL xoffset AS LONG ' GLint xoffset , BYVAL x AS LONG ' GLint x , BYVAL y AS LONG ' GLint y , BYVAL width AS LONG ' GLsizei width ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glCopyTexSubImage2D (GLenum target, GLint level, GLint xoffset,
' GLint yoffset, GLint x, GLint y, GLsizei width, GLsizei height);
' Copies a sub-image of a two-dimensional texture image from the framebuffer.
' ========================================================================================
DECLARE SUB glCopyTexSubImage2D LIB "opengl32.dll" ALIAS "glCopyTexSubImage2D" ( BYVAL target AS QUAD ' GLEnum target , BYVAL level AS LONG ' GLint level , BYVAL xoffset AS LONG ' GLint xoffset , BYVAL yoffset AS LONG ' GLint yoffset , BYVAL x AS LONG ' GLint x , BYVAL y AS LONG ' GLint y , BYVAL width AS LONG ' GLsizei width , BYVAL height AS LONG ' GLsizei height ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glCullFace (GLenum mode);
' Specifies whether front- or back-facing facets can be culled.
' ========================================================================================
DECLARE SUB glCullFace LIB "opengl32.dll" ALIAS "glCullFace" ( BYVAL mode AS QUAD ' GLEnum mode ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glDeleteLists (GLuint list, GLsizei range);
' Deletes a contiguous group of display lists.
' ========================================================================================
DECLARE SUB glDeleteLists LIB "opengl32.dll" ALIAS "glDeleteLists" ( BYVAL list AS QUAD ' GLuint list , BYVAL range AS LONG ' GLsizei range ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glDeleteTextures (GLsizei n, const GLuint *textures);
' Deletes named textures.
' ========================================================================================
DECLARE SUB glDeleteTextures LIB "opengl32.dll" ALIAS "glDeleteTextures" ( BYVAL n AS LONG ' GLsizei n , BYREF textures AS QUAD ' const GLuint *textures ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glDepthFunc (GLenum func);
' Specifies the value used for depth-buffer comparisons.
' ========================================================================================
DECLARE SUB glDepthFunc LIB "opengl32.dll" ALIAS "glDepthFunc" ( BYVAL func AS QUAD ' GLEnum func ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glDepthMask (GLboolean flag);
' Enables or disables writing into the depth buffer.
' ========================================================================================
DECLARE SUB glDepthMask LIB "opengl32.dll" ALIAS "glDepthMask" ( BYVAL flag AS BYTE ' GLboolean flag ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glDepthRange (GLclampd zNear, GLclampd zFar);
' Specifies the mapping of z values from normalized device coordinates to window coordinates.
' ========================================================================================
DECLARE SUB glDepthRange LIB "opengl32.dll" ALIAS "glDepthRange" ( BYVAL zNear AS DOUBLE ' GLclampd zNear , BYVAL zFar AS DOUBLE ' GLclampd zFar ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glDisable (GLenum cap);
' Disables an OpenGL capability.
' ========================================================================================
DECLARE SUB glDisable LIB "opengl32.dll" ALIAS "glDisable" ( BYVAL cap AS QUAD ' GLEnum cap ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glDisableClientState (GLenum array);
' Disables an array.
' ========================================================================================
DECLARE SUB glDisableClientState LIB "opengl32.dll" ALIAS "glDisableClientState" ( BYVAL array AS QUAD ' GLEnum array ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glDrawArrays (GLenum mode, GLint first, GLsizei count);
' Specifies multiple primitives to render.
' ========================================================================================
DECLARE SUB glDrawArrays LIB "opengl32.dll" ALIAS "glDrawArrays" ( BYVAL mode AS QUAD ' GLEnum mode , BYVAL first AS LONG ' GLint first , BYVAL count AS LONG ' GLsizei count ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glDrawBuffer (GLenum mode);
' Specifies which color buffers are to be drawn into.
' ========================================================================================
DECLARE SUB glDrawBuffer LIB "opengl32.dll" ALIAS "glDrawBuffer" ( BYVAL mode AS QUAD ' GLEnum mode ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glDrawElements (GLenum mode, GLsizei count, GLenum type,
' const GLvoid *indices);
' Renders primitives from array data.
' ========================================================================================
DECLARE SUB glDrawElements LIB "opengl32.dll" ALIAS "glDrawElements" ( BYVAL mode AS QUAD ' GLEnum mode , BYVAL count AS LONG ' GLsizei count , BYVAL type AS QUAD ' GLEnum type , BYREF indices AS ANY ' GLvoid *indices ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glDrawPixels (GLsizei width, GLsizei height, GLenum format,
' GLEnum type, const GLvoid *pixels);
' Writes a block of pixels to the framebuffer.
' ========================================================================================
DECLARE SUB glDrawPixels LIB "opengl32.dll" ALIAS "glDrawPixels" ( BYVAL width AS LONG ' GLsizei width , BYVAL height AS LONG ' GLsizei height , BYVAL format AS QUAD ' GLEnum format , BYVAL type AS QUAD ' GLEnum type , BYREF pixels AS ANY ' GLvoid *pixels ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEdgeFlag (GLboolean flag);
' Flag edges as either boundary or nonboundary.
' ========================================================================================
DECLARE SUB glEdgeFlag LIB "opengl32.dll" ALIAS "glEdgeFlag" ( BYVAL flag AS BYTE ' GLboolean flag ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEdgeFlag (GLboolean flag);
' Flag edges as either boundary or nonboundary.
' ========================================================================================
DECLARE SUB glEdgeFlagPointer LIB "opengl32.dll" ALIAS "glEdgeFlagPointer" ( BYVAL stride AS LONG ' GLsizei stride , BYREF pointer AS ANY ' GLvoid *pointer ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEdgeFlagv (const GLboolean *flag);
' Flag edges as either boundary or nonboundary.
' ========================================================================================
DECLARE SUB glEdgeFlagv LIB "opengl32.dll" ALIAS "glEdgeFlagv" ( BYREF flag AS BYTE ' *GLboolean *flag ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEnable (GLenum cap);
' Enables an OpenGL capability.
' ========================================================================================
DECLARE SUB glEnable LIB "opengl32.dll" ALIAS "glEnable" ( BYVAL cap AS QUAD ' GLEnum cap ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEnableClientState (GLenum array);
' Enables an array.
' ========================================================================================
DECLARE SUB glEnableClientState LIB "opengl32.dll" ALIAS "glEnableClientState" ( BYVAL array AS QUAD ' GLEnum array ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEnd (void);
' The glBegin and glEnd functions delimit the vertices of a primitive or a group of like
' primitives.
' ========================================================================================
DECLARE SUB glEnd LIB "opengl32.dll" ALIAS "glEnd" () ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEndList (void);
' The glNewList and glEndList functions create or replace a display list.
' ========================================================================================
DECLARE SUB glEndList LIB "opengl32.dll" ALIAS "glEndList" () ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEvalCoord1d (GLdouble u);
' Evaluates enabled one-dimensional maps.
' ========================================================================================
DECLARE SUB glEvalCoord1d LIB "opengl32.dll" ALIAS "glEvalCoord1d" ( BYVAL u AS DOUBLE ' GLdouble u ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEvalCoord1dv (const GLdouble *u);
' Evaluates enabled one-dimensional maps.
' ========================================================================================
DECLARE SUB glEvalCoord1dv LIB "opengl32.dll" ALIAS "glEvalCoord1dv" ( BYREF u AS DOUBLE ' const GLdouble *u ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEvalCoord1f (GLfloat u);
' Evaluates enabled one-dimensional maps.
' ========================================================================================
DECLARE SUB glEvalCoord1f LIB "opengl32.dll" ALIAS "glEvalCoord1f" ( BYVAL u AS SINGLE ' GLfloat u ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEvalCoord1fv (const GLfloat *u);
' Evaluates enabled one-dimensional maps.
' ========================================================================================
DECLARE SUB glEvalCoord1fv LIB "opengl32.dll" ALIAS "glEvalCoord1fv" ( BYREF u AS SINGLE ' const GLfloat *u ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEvalCoord2d (GLdouble u, GLdouble v);
' Evaluates enabled two-dimensional maps.
' ========================================================================================
DECLARE SUB glEvalCoord2d LIB "opengl32.dll" ALIAS "glEvalCoord2d" ( BYVAL u AS DOUBLE ' GLdouble u , BYVAL v AS DOUBLE ' GLdouble v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEvalCoord2dv (const GLdouble *u);
' Evaluates enabled two-dimensional maps.
' ========================================================================================
DECLARE SUB glEvalCoord2dv LIB "opengl32.dll" ALIAS "glEvalCoord2dv" ( BYREF u AS DOUBLE ' const GLdouble *u ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEvalCoord2f (GLfloat u, GLfloat v);
' Evaluates enabled two-dimensional maps.
' ========================================================================================
DECLARE SUB glEvalCoord2f LIB "opengl32.dll" ALIAS "glEvalCoord2f" ( BYVAL u AS SINGLE ' GLfloat u , BYVAL v AS SINGLE ' GLfloat v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEvalCoord2fv (const GLfloat *u);
' Evaluates enabled two-dimensional maps.
' ========================================================================================
DECLARE SUB glEvalCoord2fv LIB "opengl32.dll" ALIAS "glEvalCoord2fv" ( BYREF u AS SINGLE ' const GLfloat *u ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEvalMesh1 (GLenum mode, GLint i1, GLint i2);
' Compute a one-dimensional grid of points or lines.
' ========================================================================================
DECLARE SUB glEvalMesh1 LIB "opengl32.dll" ALIAS "glEvalMesh1" ( BYVAL mode AS QUAD ' GLEnum mode , BYVAL i1 AS LONG ' GLint i1 , BYVAL i2 AS LONG ' GLint i2 ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEvalMesh2 (GLenum mode, GLint i1, GLint i2, GLint j1, GLint j2);
' Compute a two-dimensional grid of points or lines.
' ========================================================================================
DECLARE SUB glEvalMesh2 LIB "opengl32.dll" ALIAS "glEvalMesh2" ( BYVAL mode AS QUAD ' GLEnum mode , BYVAL i1 AS LONG ' GLint i1 , BYVAL i2 AS LONG ' GLint i2 , BYVAL j1 AS LONG ' GLint j1 , BYVAL j2 AS LONG ' GLint j2 ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEvalPoint1 (GLint i);
' Generate and evaluate a single point in a mesh.
' ========================================================================================
DECLARE SUB glEvalPoint1 LIB "opengl32.dll" ALIAS "glEvalPoint1" ( BYVAL i AS LONG ' GLint i ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glEvalPoint2 (GLint i, GLint j);
' Generate and evaluate a single point in a mesh.
' ========================================================================================
DECLARE SUB glEvalPoint2 LIB "opengl32.dll" ALIAS "glEvalPoint2" ( BYVAL i AS LONG ' GLint i , BYVAL j AS LONG ' GLint j ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glFeedbackBuffer (GLsizei size, GLenum type, GLfloat *buffer);
' controls feedback mode.
' ========================================================================================
DECLARE SUB glFeedbackBuffer LIB "opengl32.dll" ALIAS "glFeedbackBuffer" ( BYVAL size AS LONG ' GLsizei size , BYVAL type AS QUAD ' GLEnum type , BYREF buffer AS SINGLE ' GLfloat *buffer ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glFinish (void);
' Blocks until all OpenGL execution is complete.
' ========================================================================================
DECLARE SUB glFinish LIB "opengl32.dll" ALIAS "glFinish" () ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glFlush (void);
' Forces execution of OpenGL functions in finite time.
' ========================================================================================
DECLARE SUB glFlush LIB "opengl32.dll" ALIAS "glFlush" () ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glFogf (GLenum pname, GLfloat param);
' Specify fog parameters.
' ========================================================================================
DECLARE SUB glFogf LIB "opengl32.dll" ALIAS "glFogf" ( BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS SINGLE ' GLfloat param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glFogfv (GLenum pname, const GLfloat *params);
' Specify fog parameters.
' ========================================================================================
DECLARE SUB glFogfv LIB "opengl32.dll" ALIAS "glFogfv" ( BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' const GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glFogi (GLenum pname, GLint param);
' Specify fog parameters.
' ========================================================================================
DECLARE SUB glFogi LIB "opengl32.dll" ALIAS "glFogi" ( BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS LONG ' GLint param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glFogiv (GLenum pname, const GLint *params);
' Specify fog parameters.
' ========================================================================================
DECLARE SUB glFogiv LIB "opengl32.dll" ALIAS "glFogiv" ( BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS LONG ' GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glFrontFace (GLenum mode);
' Defines front- and back-facing polygons.
' ========================================================================================
DECLARE SUB glFrontFace LIB "opengl32.dll" ALIAS "glFrontFace" ( BYVAL mode AS QUAD ' GLEnum mode ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glFrustum (GLdouble left, GLdouble right, GLdouble bottom,
' GLdouble top, GLdouble zNear, GLdouble zFar);
' Multiplies the current matrix by a perspective matrix.
' ========================================================================================
DECLARE SUB glFrustum LIB "opengl32.dll" ALIAS "glFrustum" ( BYVAL left AS DOUBLE ' GLdouble left , BYVAL right AS DOUBLE ' GLdouble right , BYVAL bottom AS DOUBLE ' GLdouble bottom , BYVAL top AS DOUBLE ' GLdouble top , BYVAL zNear AS DOUBLE ' GLdouble zNear , BYVAL zFar AS DOUBLE ' GLdouble zFar ) ' void
' ========================================================================================
' WINGDIAPI GLuint APIENTRY glGenLists (GLsizei range);
' Generates a contiguous set of empty display lists.
' ========================================================================================
DECLARE FUNCTION glGenLists LIB "opengl32.dll" ALIAS "glGenLists" ( BYVAL range AS LONG ' GLsizei range ) AS QUAD ' GLuint
' ========================================================================================
' WINGDIAPI void APIENTRY glGenTextures (GLsizei n, GLuint *textures);
' Generates texture names.
' ========================================================================================
DECLARE SUB glGenTextures LIB "opengl32.dll" ALIAS "glGenTextures" ( BYVAL n AS LONG ' GLsizei n , BYREF textures AS QUAD ' GLuint *textures ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetBooleanv (GLenum pname, GLboolean *params);
' Return the value or values of a selected parameter.
' ========================================================================================
DECLARE SUB glGetBooleanv LIB "opengl32.dll" ALIAS "glGetBooleanv" ( BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS BYTE ' GLboolean *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetClipPlane (GLenum plane, GLdouble *equation);
' Returns the coefficients of the specified clipping plane.
' ========================================================================================
DECLARE SUB glGetClipPlane LIB "opengl32.dll" ALIAS "glGetClipPlane" ( BYVAL plane AS QUAD ' GLEnum plane , BYREF equation AS DOUBLE ' GLdouble *equation ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetDoublev (GLenum pname, GLdouble *params);
' Return the value or values of a selected parameter.
' ========================================================================================
DECLARE SUB glGetDoublev LIB "opengl32.dll" ALIAS "glGetDoublev" ( BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS DOUBLE ' GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI GLenum APIENTRY glGetError (void);
' Returns error information.
' ========================================================================================
DECLARE FUNCTION glGetError LIB "opengl32.dll" ALIAS "glGetError" ( ) AS QUAD ' GLenum
' ========================================================================================
' WINGDIAPI void APIENTRY glGetFloatv (GLenum pname, GLfloat *params);
' Return the value or values of a selected parameter.
' ========================================================================================
DECLARE SUB glGetFloatv LIB "opengl32.dll" ALIAS "glGetFloatv" ( BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetIntegerv (GLenum pname, GLint *params);
' Return the value or values of a selected parameter.
' ========================================================================================
DECLARE SUB glGetIntegerv LIB "opengl32.dll" ALIAS "glGetIntegerv" ( BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS LONG ' GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetLightfv (GLenum light, GLenum pname, GLfloat *params);
' Return light source parameter values.
' ========================================================================================
DECLARE SUB glGetLightfv LIB "opengl32.dll" ALIAS "glGetLightfv" ( BYVAL light AS QUAD ' GLEnum light , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetLightiv (GLenum light, GLenum pname, GLint *params);
' Return light source parameter values.
' ========================================================================================
DECLARE SUB glGetLightiv LIB "opengl32.dll" ALIAS "glGetLightiv" ( BYVAL light AS QUAD ' GLEnum light , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS LONG ' GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetMapdv (GLenum target, GLenum query, GLdouble *v);
' Return evaluator parameters.
' ========================================================================================
DECLARE SUB glGetMapdv LIB "opengl32.dll" ALIAS "glGetMapdv" ( BYVAL target AS QUAD ' GLEnum target , BYVAL query AS QUAD ' GLEnum query , BYREF v AS DOUBLE ' GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetMapfv (GLenum target, GLenum query, GLfloat *v);
' Return evaluator parameters.
' ========================================================================================
DECLARE SUB glGetMapfv LIB "opengl32.dll" ALIAS "glGetMapfv" ( BYVAL target AS QUAD ' GLEnum target , BYVAL query AS QUAD ' GLEnum query , BYREF v AS SINGLE ' GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetMapiv (GLenum target, GLenum query, GLint *v);
' Return evaluator parameters.
' ========================================================================================
DECLARE SUB glGetMapiv LIB "opengl32.dll" ALIAS "glGetMapiv" ( BYVAL target AS QUAD ' GLEnum target , BYVAL query AS QUAD ' GLEnum query , BYREF v AS LONG ' GLint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetMaterialfv (GLenum face, GLenum pname, GLfloat *params);
' Return material parameters.
' ========================================================================================
DECLARE SUB glGetMaterialfv LIB "opengl32.dll" ALIAS "glGetMaterialfv" ( BYVAL face AS QUAD ' GLEnum face , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetMaterialiv (GLenum face, GLenum pname, GLint *params);
' Return material parameters.
' ========================================================================================
DECLARE SUB glGetMaterialiv LIB "opengl32.dll" ALIAS "glGetMaterialiv" ( BYVAL face AS QUAD ' GLEnum face , BYVAL pname AS QUAD ' GLEnum pname , BYREF LONG ' GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetPixelMapfv (GLenum map, GLfloat *values);
' Return the specified pixel map.
' ========================================================================================
DECLARE SUB glGetPixelMapfv LIB "opengl32.dll" ALIAS "glGetPixelMapfv" ( BYVAL map AS QUAD ' GLEnum map , BYREF values AS SINGLE ' GLfloat *values ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetPixelMapuiv (GLenum map, GLuint *values);
' Return the specified pixel map.
' ========================================================================================
DECLARE SUB glGetPixelMapuiv LIB "opengl32.dll" ALIAS "glGetPixelMapuiv" ( BYVAL map AS QUAD ' GLEnum map , BYREF values AS QUAD ' GLuint *values ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetPixelMapusv (GLenum map, GLushort *values);
' Return the specified pixel map.
' ========================================================================================
DECLARE SUB glGetPixelMapusv LIB "opengl32.dll" ALIAS "glGetPixelMapusv" ( BYVAL map AS QUAD ' GLEnum map , BYREF values AS WORD ' GLushort *values ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetPointerv (GLenum pname, GLvoid* *params);
' Returns the address of a vertex data array.
' ========================================================================================
DECLARE SUB glGetPointerv LIB "opengl32.dll" ALIAS "glGetPointerv" ( BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS ANY ' GLvoid *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetPolygonStipple (GLubyte *mask);
' Returns the polygon stipple pattern.
' ========================================================================================
DECLARE SUB glGetPolygonStipple LIB "opengl32.dll" ALIAS "glGetPolygonStipple" ( BYREF mask AS BYTE ' GLubyte *mask ) ' void
' ========================================================================================
' WINGDIAPI const GLubyte * APIENTRY glGetString (GLenum name);
' Returns a string describing the current OpenGL connection.
' ========================================================================================
DECLARE FUNCTION glGetString LIB "opengl32.dll" ALIAS "glGetString" ( BYVAL name AS QUAD ' GLEnum name ) AS QUAD ' const *GLubyte
' ========================================================================================
' WINGDIAPI void APIENTRY glGetTexEnvfv (GLenum target, GLenum pname, GLfloat *params);
' Return texture environment parameters.
' ========================================================================================
DECLARE SUB glGetTexEnvfv LIB "opengl32.dll" ALIAS "glGetTexEnvfv" ( BYVAL target AS QUAD ' GLEnum target , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetTexEnviv (GLenum target, GLenum pname, GLint *params);
' Return texture environment parameters.
' ========================================================================================
DECLARE SUB glGetTexEnviv LIB "opengl32.dll" ALIAS "glGetTexEnviv" ( BYVAL target AS QUAD ' GLEnum target , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS LONG ' GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetTexGendv (GLenum coord, GLenum pname, GLdouble *params);
' Return texture coordinate generation parameters.
' ========================================================================================
DECLARE SUB glGetTexGendv LIB "opengl32.dll" ALIAS "glGetTexGendv" ( BYVAL coord AS QUAD ' GLEnum coord , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS DOUBLE ' GLdouble *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetTexGenfv (GLenum coord, GLenum pname, GLfloat *params);
' Return texture coordinate generation parameters.
' ========================================================================================
DECLARE SUB glGetTexGenfv LIB "opengl32.dll" ALIAS "glGetTexGenfv" ( BYVAL coord AS QUAD ' GLEnum coord , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetTexGeniv (GLenum coord, GLenum pname, GLint *params);
' Return texture coordinate generation parameters.
' ========================================================================================
DECLARE SUB glGetTexGeniv LIB "opengl32.dll" ALIAS "glGetTexGeniv" ( BYVAL coord AS QUAD ' GLEnum coord , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS LONG ' GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetTexImage (GLenum target, GLint level, GLenum format,
' GLEnum type, GLvoid *pixels);
' Returns a texture image.
' ========================================================================================
DECLARE SUB glGetTexImage LIB "opengl32.dll" ALIAS "glGetTexImage" ( BYVAL target AS QUAD ' GLEnum target , BYVAL level AS LONG ' GLint level , BYVAL format AS QUAD ' GLEnum format , BYVAL type AS QUAD ' GLEnum type , BYREF pixels AS ANY ' GLvoid *pixels ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetTexLevelParameterfv (GLenum target, GLint level,
' GLEnum pname, GLfloat *params);
' Return texture parameter values for a specific level of detail.
' ========================================================================================
DECLARE SUB glGetTexLevelParameterfv LIB "opengl32.dll" ALIAS "glGetTexLevelParameterfv" ( BYVAL target AS QUAD ' GLEnum target , BYVAL level AS LONG ' GLint level , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetTexLevelParameteriv (GLenum target, GLint level,
' GLEnum pname, GLint *params);
' Return texture parameter values for a specific level of detail.
' ========================================================================================
DECLARE SUB glGetTexLevelParameteriv LIB "opengl32.dll" ALIAS "glGetTexLevelParameteriv" ( BYVAL target AS QUAD ' GLEnum target , BYVAL level AS LONG ' GLint level , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS LONG ' GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetTexParameterfv (GLenum target, GLenum pname, GLfloat *params);
' Return texture parameter values.
' ========================================================================================
DECLARE SUB glGetTexParameterfv LIB "opengl32.dll" ALIAS "glGetTexParameterfv" ( BYVAL target AS QUAD ' GLEnum target , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glGetTexParameteriv (GLenum target, GLenum pname, GLint *params);
' Return texture parameter values.
' ========================================================================================
DECLARE SUB glGetTexParameteriv LIB "opengl32.dll" ALIAS "glGetTexParameteriv" ( BYVAL target AS QUAD ' GLEnum target , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS LONG ' GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glHint (GLenum target, GLenum mode);
' Specifies implementation-specific hints.
' ========================================================================================
DECLARE SUB glHint LIB "opengl32.dll" ALIAS "glHint" ( BYVAL target AS QUAD ' GLEnum target , BYVAL mode AS QUAD ' GLEnum mode ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glIndexMask (GLuint mask);
' Controls the writing of individual bits in the color-index buffers.
' ========================================================================================
DECLARE SUB glIndexMask LIB "opengl32.dll" ALIAS "glIndexMask" ( BYVAL mask AS QUAD ' GLuint mask ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glIndexPointer (GLenum type, GLsizei stride, const GLvoid *pointer);
' Defines an array of color indexes.
' ========================================================================================
DECLARE SUB glIndexPointer LIB "opengl32.dll" ALIAS "glIndexPointer" ( BYVAL type AS QUAD ' GLEnum type , BYVAL stride AS LONG ' GLsizei stride , BYREF pointer AS ANY ' const GLvoid *pointer ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glIndexd (GLdouble c);
' Sets the current color index.
' ========================================================================================
DECLARE SUB glIndexd LIB "opengl32.dll" ALIAS "glIndexd" ( BYVAL c AS DOUBLE ' GLdouble c ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glIndexdv (const GLdouble *c);
' Sets the current color index.
' ========================================================================================
DECLARE SUB glIndexdv LIB "opengl32.dll" ALIAS "glIndexdv" ( BYREF c AS DOUBLE ' const GLdouble *c ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glIndexf (GLfloat c);
' Sets the current color index.
' ========================================================================================
DECLARE SUB glIndexf LIB "opengl32.dll" ALIAS "glIndexf" ( BYVAL c AS SINGLE ' GLfloat c ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glIndexfv (const GLfloat *c);
' Sets the current color index.
' ========================================================================================
DECLARE SUB glIndexfv LIB "opengl32.dll" ALIAS "glIndexfv" ( BYREF c AS SINGLE ' *GLfloat c ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glIndexi (GLint c);
' Sets the current color index.
' ========================================================================================
DECLARE SUB glIndexi LIB "opengl32.dll" ALIAS "glIndexi" ( BYVAL c AS LONG ' GLint c ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glIndexiv (const GLint *c);
' Sets the current color index.
' ========================================================================================
DECLARE SUB glIndexiv LIB "opengl32.dll" ALIAS "glIndexiv" ( BYREF c AS LONG ' const GLint *c ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glIndexs (GLshort c);
' Sets the current color index.
' ========================================================================================
DECLARE SUB glIndexs LIB "opengl32.dll" ALIAS "glIndexs" ( BYVAL c AS INTEGER ' GLshort c ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glIndexsv (const GLshort *c);
' Sets the current color index.
' ========================================================================================
DECLARE SUB glIndexsv LIB "opengl32.dll" ALIAS "glIndexsv" ( BYREF c AS INTEGER ' const GLshort *c ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glIndexub (GLubyte c);
' Sets the current color index.
' ========================================================================================
DECLARE SUB glIndexub LIB "opengl32.dll" ALIAS "glIndexub" ( BYVAL c AS BYTE ' GLubyte c ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glIndexubv (const GLubyte *c);
' Sets the current color index.
' ========================================================================================
DECLARE SUB glIndexubv LIB "opengl32.dll" ALIAS "glIndexubv" ( BYREF c AS BYTE ' const GLubyte *c ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glInitNames (void);
' Initializes the name stack.
' ========================================================================================
DECLARE SUB glInitNames LIB "opengl32.dll" ALIAS "glInitNames" () ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glInterleavedArrays (GLenum format, GLsizei stride, const GLvoid *pointer);
' Simultaneously specifies and enables several interleaved arrays in a larger aggregate array.
' ========================================================================================
DECLARE SUB glInterleavedArrays LIB "opengl32.dll" ALIAS "glInterleavedArrays" ( BYVAL format AS QUAD ' GLEnum format , BYVAL stride AS LONG ' GLsizei stride , BYREF pointer AS ANY ' const GLvoid *pointer ) ' void
' ========================================================================================
' WINGDIAPI GLboolean APIENTRY glIsEnabled (GLenum cap);
' Tests whether a capability is enabled.
' ========================================================================================
DECLARE FUNCTION glIsEnabled LIB "opengl32.dll" ALIAS "glIsEnabled" ( BYVAL cap AS QUAD ' GLEnum cap ) AS BYTE ' GLboolean
' ========================================================================================
' WINGDIAPI GLboolean APIENTRY glIsList (GLuint list);
' Tests for display list existence.
' ========================================================================================
DECLARE FUNCTION glIsList LIB "opengl32.dll" ALIAS "glIsList" ( BYVAL GLuint AS QUAD ' GLuint ) AS BYTE ' GLboolean
' ========================================================================================
' WINGDIAPI GLboolean APIENTRY glIsTexture (GLuint texture);
' Determines if a name corresponds to a texture.
' ========================================================================================
DECLARE FUNCTION glIsTexture LIB "opengl32.dll" ALIAS "glIsTexture" ( BYVAL GLuint AS QUAD ' GLuint ) AS BYTE ' GLboolean
' ========================================================================================
' WINGDIAPI void APIENTRY glLightModelf (GLenum pname, GLfloat param);
' Sets the lighting model parameters.
' ========================================================================================
DECLARE SUB glLightModelf LIB "opengl32.dll" ALIAS "glLightModelf" ( BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS SINGLE ' GLfloat param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLightModelfv (GLenum pname, const GLfloat *params);
' Sets the lighting model parameters.
' ========================================================================================
DECLARE SUB glLightModelfv LIB "opengl32.dll" ALIAS "glLightModelfv" ( BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' const GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLightModeli (GLenum pname, GLint param);
' Sets the lighting model parameters.
' ========================================================================================
DECLARE SUB glLightModeli LIB "opengl32.dll" ALIAS "glLightModeli" ( BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS LONG ' GLint param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLightModeliv (GLenum pname, const GLint *params);
' Sets the lighting model parameters.
' ========================================================================================
DECLARE SUB glLightModeliv LIB "opengl32.dll" ALIAS "glLightModeliv" ( BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS LONG ' const GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLightf (GLenum light, GLenum pname, GLfloat param);
' Sets light-source parameters.
' ========================================================================================
DECLARE SUB glLightf LIB "opengl32.dll" ALIAS "glLightf" ( BYVAL light AS QUAD ' GLEnum light , BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS SINGLE ' GLfloat param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLightfv (GLenum light, GLenum pname, const GLfloat *params);
' Sets light-source parameters.
' ========================================================================================
DECLARE SUB glLightfv LIB "opengl32.dll" ALIAS "glLightfv" ( BYVAL light AS QUAD ' GLEnum light , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' const GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLighti (GLenum light, GLenum pname, GLint param);
' Sets light-source parameters.
' ========================================================================================
DECLARE SUB glLighti LIB "opengl32.dll" ALIAS "glLighti" ( BYVAL light AS QUAD ' GLEnum light , BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS LONG ' GLint param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLightiv (GLenum light, GLenum pname, const GLint *params);
' Sets light-source parameters.
' ========================================================================================
DECLARE SUB glLightiv LIB "opengl32.dll" ALIAS "glLightiv" ( BYVAL light AS QUAD ' GLEnum light , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS LONG ' const GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLineStipple (GLint factor, GLushort pattern);
' Specifies the line stipple pattern.
' ========================================================================================
DECLARE SUB glLineStipple LIB "opengl32.dll" ALIAS "glLineStipple" ( BYVAL factor AS LONG ' GLint factor , BYVAL pattern AS WORD ' GLushort pattern ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLineWidth (GLfloat width);
' Specifies the width of rasterized lines.
' ========================================================================================
DECLARE SUB glLineWidth LIB "opengl32.dll" ALIAS "glLineWidth" ( BYVAL width AS SINGLE ' GLfloat width ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glListBase (GLuint base);
' Sets the display list base for glCallLists.
' ========================================================================================
DECLARE SUB glListBase LIB "opengl32.dll" ALIAS "glListBase" ( BYVAL base AS QUAD ' GLuint base ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLoadIdentity (void);
' Replaces the current matrix with the identity matrix.
' ========================================================================================
DECLARE SUB glLoadIdentity LIB "opengl32.dll" ALIAS "glLoadIdentity" () ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLoadMatrixd (const GLdouble *m);
' Replaces the current matrix with an arbitrary matrix.
' ========================================================================================
DECLARE SUB glLoadMatrixd LIB "opengl32.dll" ALIAS "glLoadMatrixd" ( BYREF m AS DOUBLE ' const GLdouble *m ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLoadMatrixf (const GLfloat *m);
' Replaces the current matrix with an arbitrary matrix.
' ========================================================================================
DECLARE SUB glLoadMatrixf LIB "opengl32.dll" ALIAS "glLoadMatrixf" ( BYREF m AS SINGLE ' const GLfloat *m ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLoadName (GLuint name);
' Loads a name onto the name stack.
' ========================================================================================
DECLARE SUB glLoadName LIB "opengl32.dll" ALIAS "glLoadName" ( BYVAL name AS QUAD ' GLuint name ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glLogicOp (GLenum opcode);
' Specifies a logical pixel operation for color index rendering.
' ========================================================================================
DECLARE SUB glLogicOp LIB "opengl32.dll" ALIAS "glLogicOp" ( BYVAL op AS QUAD ' GLenum opcode ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMap1d (GLenum target, GLdouble u1, GLdouble u2, GLint stride,
' GLint order, const GLdouble *points);
' Defines a one-dimensional evaluator.
' ========================================================================================
DECLARE SUB glMap1d LIB "opengl32.dll" ALIAS "glMap1d" ( BYVAL target AS QUAD ' GLEnum target , BYVAL u1 AS DOUBLE ' GLdouble u1 , BYVAL u2 AS DOUBLE ' GLdouble u2 , BYVAL stride AS LONG ' GLint stride , BYVAL order AS LONG ' GLint order , BYREF points AS DOUBLE ' const GLdouble *points ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMap1f (GLenum target, GLfloat u1, GLfloat u2, GLint stride,
' GLint order, const GLfloat *points);
' Defines a one-dimensional evaluator.
' ========================================================================================
DECLARE SUB glMap1f LIB "opengl32.dll" ALIAS "glMap1f" ( BYVAL target AS QUAD ' GLEnum target , BYVAL u1 AS SINGLE ' GLfloat u1 , BYVAL u2 AS SINGLE ' GLfloat u2 , BYVAL stride AS LONG ' GLint stride , BYVAL order AS LONG ' GLint order , BYREF points AS SINGLE ' const GLfloat *points ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMap2d (GLenum target, GLdouble u1, GLdouble u2, GLint ustride,
' GLint uorder, GLdouble v1, GLdouble v2, GLint vstride, GLint vorder, const GLdouble *points);
' Defines a two-dimensional evaluator.
' ========================================================================================
DECLARE SUB glMap2d LIB "opengl32.dll" ALIAS "glMap2d" ( BYVAL target AS QUAD ' GLEnum target , BYVAL u1 AS DOUBLE ' GLdouble u1 , BYVAL u2 AS DOUBLE ' GLdouble u2 , BYVAL ustride AS LONG ' GLint ustride , BYVAL uorder AS LONG ' GLint uorder , BYVAL v1 AS DOUBLE ' GLdouble v1 , BYVAL v2 AS DOUBLE ' GLdouble v2 , BYVAL vstride AS LONG ' GLint vstride , BYVAL vorder AS LONG ' GLint vorder , BYREF points AS DOUBLE ' const GLdouble *points ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMap2f (GLenum target, GLfloat u1, GLfloat u2, GLint ustride,
' GLint uorder, GLfloat v1, GLfloat v2, GLint vstride, GLint vorder, const GLfloat *points);
' Defines a two-dimensional evaluator.
' ========================================================================================
DECLARE SUB glMap2f LIB "opengl32.dll" ALIAS "glMap2f" ( BYVAL target AS QUAD ' GLEnum target , BYVAL u1 AS SINGLE ' GLfloat u1 , BYVAL u2 AS SINGLE ' GLfloat u2 , BYVAL ustride AS LONG ' GLint ustride , BYVAL uorder AS LONG ' GLint uorder , BYVAL v1 AS SINGLE ' GLfloat v1 , BYVAL v2 AS SINGLE ' GLfloat v2 , BYVAL vstride AS LONG ' GLint vstride , BYVAL vorder AS LONG ' GLint vorder , BYREF points AS SINGLE ' const GLfloat *points ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMapGrid1d (GLint un, GLdouble u1, GLdouble u2);
' Defines a one-dimensional mesh.
' ========================================================================================
DECLARE SUB glMapGrid1d LIB "opengl32.dll" ALIAS "glMapGrid1d" ( BYVAL un AS LONG ' GLint un , BYVAL u1 AS DOUBLE ' GLdouble u1 , BYVAL u2 AS DOUBLE ' GLdouble u2 ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMapGrid1f (GLint un, GLfloat u1, GLfloat u2);
' Defines a one-dimensional mesh.
' ========================================================================================
DECLARE SUB glMapGrid1f LIB "opengl32.dll" ALIAS "glMapGrid1f" ( BYVAL un AS LONG ' GLint un , BYVAL u1 AS SINGLE ' GLfloat u1 , BYVAL u2 AS SINGLE ' GLfloat u2 ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMapGrid2d (GLint un, GLdouble u1, GLdouble u2, GLint vn,
' GLdouble v1, GLdouble v2);
' Defines a two-dimensional mesh.
' ========================================================================================
DECLARE SUB glMapGrid2d LIB "opengl32.dll" ALIAS "glMapGrid2d" ( BYVAL un AS LONG ' GLint un , BYVAL u1 AS DOUBLE ' GLdouble u1 , BYVAL u2 AS DOUBLE ' GLdouble u2 , BYVAL vn AS LONG ' GLint vn , BYVAL v1 AS DOUBLE ' GLdouble v1 , BYVAL v2 AS DOUBLE ' GLdouble v2 ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMapGrid2f (GLint un, GLfloat u1, GLfloat u2, GLint vn,
' GLfloat v1, GLfloat v2);
' Defines a two-dimensional mesh.
' ========================================================================================
DECLARE SUB glMapGrid2f LIB "opengl32.dll" ALIAS "glMapGrid2f" ( BYVAL un AS LONG ' GLint un , BYVAL u1 AS SINGLE ' GLfloat u1 , BYVAL u2 AS SINGLE ' GLfloat u2 , BYVAL vn AS LONG ' GLint vn , BYVAL v1 AS SINGLE ' GLfloat v1 , BYVAL v2 AS SINGLE ' GLfloat v2 ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMaterialf (GLenum face, GLenum pname, GLfloat param);
' Specifies material parameters for the lighting model.
' ========================================================================================
DECLARE SUB glMaterialf LIB "opengl32.dll" ALIAS "glMaterialf" ( BYVAL face AS QUAD ' GLEnum face , BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS SINGLE ' GLfloat param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMaterialfv (GLenum face, GLenum pname, const GLfloat *params);
' Specifies material parameters for the lighting model.
' ========================================================================================
DECLARE SUB glMaterialfv LIB "opengl32.dll" ALIAS "glMaterialfv" ( BYVAL face AS QUAD ' GLEnum face , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' const GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMateriali (GLenum face, GLenum pname, GLint param);
' Specifies material parameters for the lighting model.
' ========================================================================================
DECLARE SUB glMateriali LIB "opengl32.dll" ALIAS "glMateriali" ( BYVAL face AS QUAD ' GLEnum face , BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS LONG ' GLint param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMaterialiv (GLenum face, GLenum pname, const GLint *params);
' Specifies material parameters for the lighting model.
' ========================================================================================
DECLARE SUB glMaterialiv LIB "opengl32.dll" ALIAS "glMaterialiv" ( BYVAL face AS QUAD ' GLEnum face , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS LONG ' const GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMatrixMode (GLenum mode);
' Multiply the current matrix by an arbitrary matrix.
' ========================================================================================
DECLARE SUB glMatrixMode LIB "opengl32.dll" ALIAS "glMatrixMode" ( BYVAL mode AS QUAD ' GLEnum mode ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMultMatrixd (const GLdouble *m);
' Multiply the current matrix by an arbitrary matrix.
' ========================================================================================
DECLARE SUB glMultMatrixd LIB "opengl32.dll" ALIAS "glMultMatrixd" ( BYREF m AS DOUBLE ' const GLdouble *m ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glMultMatrixf (const GLfloat *m);
' Multiply the current matrix by an arbitrary matrix.
' ========================================================================================
DECLARE SUB glMultMatrixf LIB "opengl32.dll" ALIAS "glMultMatrixf" ( BYREF m AS SINGLE ' const GLfloat *m ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glNewList (GLuint list, GLenum mode);
' The glNewList and glEndList functions create or replace a display list.
' ========================================================================================
DECLARE SUB glNewList LIB "opengl32.dll" ALIAS "glNewList" ( BYVAL list AS QUAD ' GLuint list , BYVAL mode AS QUAD ' GLEnum mode ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glNormal3b (GLbyte nx, GLbyte ny, GLbyte nz);
' Sets the current normal vector.
' ========================================================================================
DECLARE SUB glNormal3b LIB "opengl32.dll" ALIAS "glNormal3b" ( BYVAL nx AS BYTE ' GLbyte nx , BYVAL ny AS BYTE ' GLbyte ny , BYVAL nz AS BYTE ' GLbyte nz ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glNormal3bv (const GLbyte *v);
' Sets the current normal vector.
' ========================================================================================
DECLARE SUB glNormal3bv LIB "opengl32.dll" ALIAS "glNormal3bv" ( BYREF v AS BYTE ' *GLbyte *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glNormal3d (GLdouble nx, GLdouble ny, GLdouble nz);
' Sets the current normal vector.
' ========================================================================================
DECLARE SUB glNormal3d LIB "opengl32.dll" ALIAS "glNormal3d" ( BYVAL nx AS DOUBLE ' GLdouble nx , BYVAL ny AS DOUBLE ' GLdouble ny , BYVAL nz AS DOUBLE ' GLdouble nz ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glNormal3dv (const GLdouble *v);
' Sets the current normal vector.
' ========================================================================================
DECLARE SUB glNormal3dv LIB "opengl32.dll" ALIAS "glNormal3dv" ( BYREF v AS DOUBLE ' const GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glNormal3f (GLfloat nx, GLfloat ny, GLfloat nz);
' Sets the current normal vector.
' ========================================================================================
DECLARE SUB glNormal3f LIB "opengl32.dll" ALIAS "glNormal3f" ( BYVAL nx AS SINGLE ' GLfloat nx , BYVAL ny AS SINGLE ' GLfloat ny , BYVAL nz AS SINGLE ' GLfloat nz ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glNormal3fv (const GLfloat *v);
' Sets the current normal vector.
' ========================================================================================
DECLARE SUB glNormal3fv LIB "opengl32.dll" ALIAS "glNormal3fv" ( BYREF v AS SINGLE ' const GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glNormal3i (GLint nx, GLint ny, GLint nz);
' Sets the current normal vector.
' ========================================================================================
DECLARE SUB glNormal3i LIB "opengl32.dll" ALIAS "glNormal3i" ( BYVAL nx AS LONG ' GLint nx , BYVAL ny AS LONG ' GLint ny , BYVAL nz AS LONG ' GLint nz ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glNormal3iv (const GLint *v);
' Sets the current normal vector.
' ========================================================================================
DECLARE SUB glNormal3iv LIB "opengl32.dll" ALIAS "glNormal3iv" ( BYREF v AS LONG ' *GLint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glNormal3s (GLshort nx, GLshort ny, GLshort nz);
' Sets the current normal vector.
' ========================================================================================
DECLARE SUB glNormal3s LIB "opengl32.dll" ALIAS "glNormal3s" ( BYVAL nx AS INTEGER ' GLshort nx , BYVAL ny AS INTEGER ' GLshort ny , BYVAL nz AS INTEGER ' GLshort nz ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glNormal3sv (const GLshort *v);
' Sets the current normal vector.
' ========================================================================================
DECLARE SUB glNormal3sv LIB "opengl32.dll" ALIAS "glNormal3sv" ( BYREF v AS INTEGER ' const GLshort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glNormalPointer (GLenum type, GLsizei stride, const GLvoid *pointer);
' Defines an array of normals.
' ========================================================================================
DECLARE SUB glNormalPointer LIB "opengl32.dll" ALIAS "glNormalPointer" ( BYVAL type AS QUAD ' GLEnum type , BYVAL stride AS LONG ' GLsizei stride , BYREF pointer AS ANY ' const GLvoid *pointer ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glOrtho (GLdouble left, GLdouble right, GLdouble bottom,
' GLdouble top, GLdouble zNear, GLdouble zFar);
' Multiplies the current matrix by an orthographic matrix.
' ========================================================================================
DECLARE SUB glOrtho LIB "opengl32.dll" ALIAS "glOrtho" ( BYVAL left AS DOUBLE ' GLdouble left , BYVAL right AS DOUBLE ' GLdouble right , BYVAL bottom AS DOUBLE ' GLdouble bottom , BYVAL top AS DOUBLE ' GLdouble top , BYVAL zNear AS DOUBLE ' GLdouble zNear , BYVAL zFar AS DOUBLE ' GLdouble zFar ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPassThrough (GLfloat token);
' Places a marker in the feedback buffer.
' ========================================================================================
DECLARE SUB glPassThrough LIB "opengl32.dll" ALIAS "glPassThrough" ( BYVAL token AS SINGLE ' GLfloat token ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPixelMapfv (GLenum map, GLsizei mapsize, const GLfloat *values);
' Sets up pixel transfer maps.
' ========================================================================================
DECLARE SUB glPixelMapfv LIB "opengl32.dll" ALIAS "glPixelMapfv" ( BYVAL map AS QUAD ' GLEnum map , BYVAL mapsize AS LONG ' GLsizei mapsize , BYREF values AS SINGLE ' const GLfloat *values ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPixelMapuiv (GLenum map, GLsizei mapsize, const GLuint *values);
' Sets up pixel transfer maps.
' ========================================================================================
DECLARE SUB glPixelMapuiv LIB "opengl32.dll" ALIAS "glPixelMapuiv" ( BYVAL map AS QUAD ' GLEnum map , BYVAL mapsize AS LONG ' GLsizei mapsize , BYREF values AS QUAD ' const GLuint *values ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPixelMapusv (GLenum map, GLsizei mapsize, const GLushort *values);
' Sets up pixel transfer maps.
' ========================================================================================
DECLARE SUB glPixelMapusv LIB "opengl32.dll" ALIAS "glPixelMapusv" ( BYVAL map AS QUAD ' GLEnum map , BYVAL mapsize AS LONG ' GLsizei mapsize , BYREF values AS WORD ' const GLushort *values ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPixelStoref (GLenum pname, GLfloat param);
' Sets pixel storage modes.
' ========================================================================================
DECLARE SUB glPixelStoref LIB "opengl32.dll" ALIAS "glPixelStoref" ( BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS SINGLE ' GLfloat param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPixelStorei (GLenum pname, GLint param);
' Sets pixel storage modes.
' ========================================================================================
DECLARE SUB glPixelStorei LIB "opengl32.dll" ALIAS "glPixelStorei" ( BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS LONG ' GLint param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPixelTransferf (GLenum pname, GLfloat param);
' Sets pixel transfer modes.
' ========================================================================================
DECLARE SUB glPixelTransferf LIB "opengl32.dll" ALIAS "glPixelTransferf" ( BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS SINGLE ' GLfloat param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPixelTransferi (GLenum pname, GLint param);
' Sets pixel transfer modes.
' ========================================================================================
DECLARE SUB glPixelTransferi LIB "opengl32.dll" ALIAS "glPixelTransferi" ( BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS LONG ' GLint param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPixelZoom (GLfloat xfactor, GLfloat yfactor);
' Specifies the pixel zoom factors.
' ========================================================================================
DECLARE SUB glPixelZoom LIB "opengl32.dll" ALIAS "glPixelZoom" ( BYVAL xfactor AS SINGLE ' GLfloat xfactor , BYVAL yfactor AS SINGLE ' GLfloat yfactor ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPointSize (GLfloat size);
' Specifies the diameter of rasterized points.
' ========================================================================================
DECLARE SUB glPointSize LIB "opengl32.dll" ALIAS "glPointSize" ( BYVAL size AS SINGLE ' GLfloat size ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPolygonMode (GLenum face, GLenum mode);
' Selects a polygon rasterization mode.
' ========================================================================================
DECLARE SUB glPolygonMode LIB "opengl32.dll" ALIAS "glPolygonMode" ( BYVAL face AS QUAD ' GLEnum face , BYVAL mode AS QUAD ' GLEnum mode ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPolygonOffset (GLfloat factor, GLfloat units);
' Sets the scale and units OpenGL uses to calculate depth values.
' ========================================================================================
DECLARE SUB glPolygonOffset LIB "opengl32.dll" ALIAS "glPolygonOffset" ( BYVAL factor AS SINGLE ' GLfloat factor , BYVAL units AS SINGLE ' GLfloat units ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPolygonStipple (const GLubyte *mask);
' Sets the polygon stippling pattern.
' ========================================================================================
DECLARE SUB glPolygonStipple LIB "opengl32.dll" ALIAS "glPolygonStipple" ( BYREF mask AS BYTE ' const GLubyte *mask ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPopAttrib (void);
' Pops the attribute stack.
' ========================================================================================
DECLARE SUB glPopAttrib LIB "opengl32.dll" ALIAS "glPopAttrib" () ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPopClientAttrib (void);
' Restores groups of client-state variables on the client-attribute stack.
' ========================================================================================
DECLARE SUB glPopClientAttrib LIB "opengl32.dll" ALIAS "glPopClientAttrib" () ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPopMatrix (void);
' Pops the current matrix stack.
' ========================================================================================
DECLARE SUB glPopMatrix LIB "opengl32.dll" ALIAS "glPopMatrix" () ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPopName (void);
' Pops the name stack.
' ========================================================================================
DECLARE SUB glPopName LIB "opengl32.dll" ALIAS "glPopName" () ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPrioritizeTextures (GLsizei n, const GLuint *textures,
' const GLclampf *priorities);
' Sets the residence priority of textures.
' ========================================================================================
DECLARE SUB glPrioritizeTextures LIB "opengl32.dll" ALIAS "glPrioritizeTextures" ( BYVAL n AS LONG ' GLsizei n , BYREF textures AS QUAD ' const GLuint *textures , BYREF priorities AS SINGLE ' const GLclampf *priorities ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPushAttrib (GLbitfield mask);
' Pushes the attribute stack.
' ========================================================================================
DECLARE SUB glPushAttrib LIB "opengl32.dll" ALIAS "glPushAttrib" ( BYVAL mask AS QUAD ' GLbitfield mask ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPushClientAttrib (GLbitfield mask);
' Saves groups of client-state variables on the client-attribute stack.
' ========================================================================================
DECLARE SUB glPushClientAttrib LIB "opengl32.dll" ALIAS "glPushClientAttrib" ( BYVAL mask AS QUAD ' GLbitfield mask ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPushMatrix (void);
' Pushes the current matrix stack.
' ========================================================================================
DECLARE SUB glPushMatrix LIB "opengl32.dll" ALIAS "glPushMatrix" () ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glPushName (GLuint name);
' Pushes the name stack.
' ========================================================================================
DECLARE SUB glPushName LIB "opengl32.dll" ALIAS "glPushName" ( BYVAL name AS QUAD ' GLuint name ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos2d (GLdouble x, GLdouble y);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos2d LIB "opengl32.dll" ALIAS "glRasterPos2d" ( BYVAL x AS DOUBLE ' GLdouble x , BYVAL y AS DOUBLE ' GLdouble y ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos2dv (const GLdouble *v);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos2dv LIB "opengl32.dll" ALIAS "glRasterPos2dv" ( BYREF v AS DOUBLE ' const GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos2f (GLfloat x, GLfloat y);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos2f LIB "opengl32.dll" ALIAS "glRasterPos2f" ( BYVAL x AS SINGLE ' GLfloat x , BYVAL y AS SINGLE ' GLfloat y ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos2fv (const GLfloat *v);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos2fv LIB "opengl32.dll" ALIAS "glRasterPos2fv" ( BYREF v AS SINGLE ' const GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos2i (GLint x, GLint y);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos2i LIB "opengl32.dll" ALIAS "glRasterPos2i" ( BYVAL x AS LONG ' GLint x , BYVAL y AS LONG ' GLint y ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos2iv (const GLint *v);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos2iv LIB "opengl32.dll" ALIAS "glRasterPos2iv" ( BYREF v AS LONG ' const GLint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos2s (GLshort x, GLshort y);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos2s LIB "opengl32.dll" ALIAS "glRasterPos2s" ( BYVAL x AS INTEGER ' GLshort x , BYVAL y AS INTEGER ' GLshort y ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos2sv (const GLshort *v);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos2sv LIB "opengl32.dll" ALIAS "glRasterPos2sv" ( BYREF v AS INTEGER ' const GLshort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos3d (GLdouble x, GLdouble y, GLdouble z);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos3d LIB "opengl32.dll" ALIAS "glRasterPos3d" ( BYVAL x AS DOUBLE ' GLdouble x , BYVAL y AS DOUBLE ' GLdouble y , BYVAL z AS DOUBLE ' GLdouble z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos3dv (const GLdouble *v);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos3dv LIB "opengl32.dll" ALIAS "glRasterPos3dv" ( BYREF v AS DOUBLE ' const GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos3f (GLfloat x, GLfloat y, GLfloat z);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos3f LIB "opengl32.dll" ALIAS "glRasterPos3f" ( BYVAL x AS SINGLE ' GLfloat x , BYVAL y AS SINGLE ' GLfloat y , BYVAL z AS SINGLE ' GLfloat z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos3fv (const GLfloat *v);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos3fv LIB "opengl32.dll" ALIAS "glRasterPos3fv" ( BYREF v AS SINGLE ' const GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos3i (GLint x, GLint y, GLint z);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos3i LIB "opengl32.dll" ALIAS "glRasterPos3i" ( BYVAL x AS LONG ' GLint x , BYVAL y AS LONG ' GLint y , BYVAL z AS LONG ' GLint z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos3iv (const GLint *v);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos3iv LIB "opengl32.dll" ALIAS "glRasterPos3iv" ( BYREF v AS LONG ' const GLint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos3s (GLshort x, GLshort y, GLshort z);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos3s LIB "opengl32.dll" ALIAS "glRasterPos3s" ( BYVAL x AS INTEGER ' GLshort x , BYVAL y AS INTEGER ' GLshort y , BYVAL z AS INTEGER ' GLshort z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos3sv (const GLshort *v);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos3sv LIB "opengl32.dll" ALIAS "glRasterPos3sv" ( BYREF v AS INTEGER ' const GLshort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos4d (GLdouble x, GLdouble y, GLdouble z, GLdouble w);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos4d LIB "opengl32.dll" ALIAS "glRasterPos4d" ( BYVAL x AS DOUBLE ' GLdouble x , BYVAL y AS DOUBLE ' GLdouble y , BYVAL z AS DOUBLE ' GLdouble z , BYVAL w AS DOUBLE ' GLdouble w ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos4dv (const GLdouble *v);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos4dv LIB "opengl32.dll" ALIAS "glRasterPos4dv" ( BYREF v AS DOUBLE ' const GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos4f (GLfloat x, GLfloat y, GLfloat z, GLfloat w);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos4f LIB "opengl32.dll" ALIAS "glRasterPos4f" ( BYVAL x AS SINGLE ' GLfloat x , BYVAL y AS SINGLE ' GLfloat y , BYVAL z AS SINGLE ' GLfloat z , BYVAL w AS SINGLE ' GLfloat w ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos4fv (const GLfloat *v);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos4fv LIB "opengl32.dll" ALIAS "glRasterPos4fv" ( BYREF v AS SINGLE ' const GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos4i (GLint x, GLint y, GLint z, GLint w);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos4i LIB "opengl32.dll" ALIAS "glRasterPos4i" ( BYVAL x AS LONG ' GLint x , BYVAL y AS LONG ' GLint y , BYVAL z AS LONG ' GLint z , BYVAL w AS LONG ' GLint w ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos4iv (const GLint *v);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos4iv LIB "opengl32.dll" ALIAS "glRasterPos4iv" ( BYREF v AS LONG ' const GLint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos4s (GLshort x, GLshort y, GLshort z, GLshort w);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos4s LIB "opengl32.dll" ALIAS "glRasterPos4s" ( BYVAL x AS INTEGER ' GLshort x , BYVAL y AS INTEGER ' GLshort y , BYVAL z AS INTEGER ' GLshort z , BYVAL w AS INTEGER ' GLshort w ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRasterPos4sv (const GLshort *v);
' Specifies the raster position for pixel operations.
' ========================================================================================
DECLARE SUB glRasterPos4sv LIB "opengl32.dll" ALIAS "glRasterPos4sv" ( BYREF v AS INTEGER ' const GLshort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glReadBuffer (GLenum mode);
' Selects a color buffer source for pixels.
' ========================================================================================
DECLARE SUB glReadBuffer LIB "opengl32.dll" ALIAS "glReadBuffer" ( BYVAL mode AS QUAD ' GLEnum mode ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glReadPixels (GLint x, GLint y, GLsizei width, GLsizei height,
' GLEnum format, GLenum type, GLvoid *pixels);
' Reads a block of pixels from the framebuffer.
' ========================================================================================
DECLARE SUB glReadPixels LIB "opengl32.dll" ALIAS "glReadPixels" ( BYVAL x AS LONG ' GLint x , BYVAL y AS LONG ' GLint y , BYVAL width AS LONG ' GLsizei width , BYVAL height AS LONG ' GLsizei height , BYVAL format AS QUAD ' GLEnum format , BYVAL type AS QUAD ' GLEnum type , BYREF pixels AS ANY ' GLvoid *pixels ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRectd (GLdouble x1, GLdouble y1, GLdouble x2, GLdouble y2);
' Draws a rectangle.
' ========================================================================================
DECLARE SUB glRectd LIB "opengl32.dll" ALIAS "glRectd" ( BYVAL x1 AS DOUBLE ' GLdouble x1 , BYVAL y1 AS DOUBLE ' GLdouble y1 , BYVAL x2 AS DOUBLE ' GLdouble x2 , BYVAL y2 AS DOUBLE ' GLdouble y2 ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRectdv (const GLdouble *v1, const GLdouble *v2);
' Draws a rectangle.
' ========================================================================================
DECLARE SUB glRectdv LIB "opengl32.dll" ALIAS "glRectdv" ( BYREF v1 AS DOUBLE ' const GLdouble *v1 , BYREF v2 AS DOUBLE ' const GLdouble *v2 ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRectf (GLfloat x1, GLfloat y1, GLfloat x2, GLfloat y2);
' Draws a rectangle.
' ========================================================================================
DECLARE SUB glRectf LIB "opengl32.dll" ALIAS "glRectf" ( BYVAL x1 AS SINGLE ' GLfloat x1 , BYVAL y1 AS SINGLE ' GLfloat y1 , BYVAL x2 AS SINGLE ' GLfloat x2 , BYVAL y2 AS SINGLE ' GLfloat y2 ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRectfv (const GLfloat *v1, const GLfloat *v2);
' Draws a rectangle.
' ========================================================================================
DECLARE SUB glRectfv LIB "opengl32.dll" ALIAS "glRectfv" ( BYREF v1 AS SINGLE ' *GLfloat v1 , BYREF v2 AS SINGLE ' *GLfloat v2 ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRecti (GLint x1, GLint y1, GLint x2, GLint y2);
' Draws a rectangle.
' ========================================================================================
DECLARE SUB glRecti LIB "opengl32.dll" ALIAS "glRecti" ( BYVAL x1 AS LONG ' GLint x1 , BYVAL y1 AS LONG ' GLint y1 , BYVAL x2 AS LONG ' GLint x2 , BYVAL y2 AS LONG ' GLint y2 ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRectiv (const GLint *v1, const GLint *v2);
' Draws a rectangle.
' ========================================================================================
DECLARE SUB glRectiv LIB "opengl32.dll" ALIAS "glRectiv" ( BYREF v1 AS LONG ' const GLint *v1 , BYREF v2 AS LONG ' const GLint *v2 ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRects (GLshort x1, GLshort y1, GLshort x2, GLshort y2);
' Draws a rectangle.
' ========================================================================================
DECLARE SUB glRects LIB "opengl32.dll" ALIAS "glRects" ( BYVAL x1 AS INTEGER ' GLshort x1 , BYVAL y1 AS INTEGER ' GLshort y1 , BYVAL x2 AS INTEGER ' GLshort x2 , BYVAL y2 AS INTEGER ' GLshort y2 ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRectsv (const GLshort *v1, const GLshort *v2);
' Draws a rectangle.
' ========================================================================================
DECLARE SUB glRectsv LIB "opengl32.dll" ALIAS "glRectsv" ( BYREF v1 AS INTEGER ' const GLshort *v1 , BYREF v2 AS INTEGER ' const GLshort *v2 ) ' void
' ========================================================================================
' WINGDIAPI GLint APIENTRY glRenderMode (GLenum mode);
' Sets the rasterization mode.
' ========================================================================================
DECLARE FUNCTION glRenderMode LIB "opengl32.dll" ALIAS "glRenderMode" ( BYVAL mode AS QUAD ' GLEnum mode ) AS LONG ' int
' ========================================================================================
' WINGDIAPI void APIENTRY glRotated (GLdouble angle, GLdouble x, GLdouble y, GLdouble z);
' Multiplies the current matrix by a rotation matrix.
' ========================================================================================
DECLARE SUB glRotated LIB "opengl32.dll" ALIAS "glRotated" ( BYVAL angle AS DOUBLE ' GLdouble angle , BYVAL x AS DOUBLE ' GLdouble x , BYVAL y AS DOUBLE ' GLdouble y , BYVAL z AS DOUBLE ' GLdouble z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glRotatef (GLfloat angle, GLfloat x, GLfloat y, GLfloat z);
' Multiplies the current matrix by a rotation matrix.
' ========================================================================================
DECLARE SUB glRotatef LIB "opengl32.dll" ALIAS "glRotatef" ( BYVAL angle AS SINGLE ' GLfloat angle , BYVAL x AS SINGLE ' GLfloat x , BYVAL y AS SINGLE ' GLfloat y , BYVAL z AS SINGLE ' GLfloat z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glScaled (GLdouble x, GLdouble y, GLdouble z);
' Multiplies the current matrix by a general scaling matrix.
' ========================================================================================
DECLARE SUB glScaled LIB "opengl32.dll" ALIAS "glScaled" ( BYVAL x AS DOUBLE ' GLdouble x , BYVAL y AS DOUBLE ' GLdouble y , BYVAL z AS DOUBLE ' GLdouble z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glScalef (GLfloat x, GLfloat y, GLfloat z);
' Multiplies the current matrix by a general scaling matrix.
' ========================================================================================
DECLARE SUB glScalef LIB "opengl32.dll" ALIAS "glScalef" ( BYVAL x AS SINGLE ' GLfloat x , BYVAL y AS SINGLE ' GLfloat y , BYVAL z AS SINGLE ' GLfloat z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glScissor (GLint x, GLint y, GLsizei width, GLsizei height);
' Defines the scissor box.
' ========================================================================================
DECLARE SUB glScissor LIB "opengl32.dll" ALIAS "glScissor" ( BYVAL x AS LONG ' GLint x , BYVAL y aS LONG ' GLint y , BYVAL width AS LONG ' GLsizei width , BYVAL height AS LONG ' GLsizei height ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glSelectBuffer (GLsizei size, GLuint *buffer);
' Establishes a buffer for selection mode values.
' ========================================================================================
DECLARE SUB glSelectBuffer LIB "opengl32.dll" ALIAS "glSelectBuffer" ( BYVAL size AS LONG ' GLsizei size , BYREF buffer AS QUAD ' GLuint *buffer ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glShadeModel (GLenum mode);
' Selects flat or smooth shading.
' ========================================================================================
DECLARE SUB glShadeModel LIB "opengl32.dll" ALIAS "glShadeModel" ( BYVAL mode AS QUAD ' GLEnum mode ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glStencilFunc (GLenum func, GLint ref, GLuint mask);
' Sets the function and reference value for stencil testing.
' ========================================================================================
DECLARE SUB glStencilFunc LIB "opengl32.dll" ALIAS "glStencilFunc" ( BYVAL func AS QUAD ' GLEnum func , BYVAL ref AS LONG ' GLint ref , BYVAL mask AS QUAD ' GLuint mask ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glStencilMask (GLuint mask);
' Controls the writing of individual bits in the stencil planes.
' ========================================================================================
DECLARE SUB glStencilMask LIB "opengl32.dll" ALIAS "glStencilMask" ( BYVAL mask AS QUAD ' GLuint mask ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glStencilOp (GLenum fail, GLenum zfail, GLenum zpass);
' Sets the stencil test actions.
' ========================================================================================
DECLARE SUB glStencilOp LIB "opengl32.dll" ALIAS "glStencilOp" ( BYVAL fail AS QUAD ' GLEnum fail , BYVAL zfail AS QUAD ' GLEnum zfail , BYVAL zpass AS QUAD ' GLEnum zpass ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord1d (GLdouble s);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord1d LIB "opengl32.dll" ALIAS "glTexCoord1d" ( BYVAL s AS DOUBLE ' GLdouble s ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord1dv (const GLdouble *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord1dv LIB "opengl32.dll" ALIAS "glTexCoord1dv" ( BYREF v AS DOUBLE ' const GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord1f (GLfloat s);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord1f LIB "opengl32.dll" ALIAS "glTexCoord1f" ( BYVAL s AS SINGLE ' GLfloat s ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord1fv (const GLfloat *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord1fv LIB "opengl32.dll" ALIAS "glTexCoord1fv" ( BYREF v AS SINGLE ' GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord1i (GLint s);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord1i LIB "opengl32.dll" ALIAS "glTexCoord1i" ( BYVAL s AS LONG ' GLint s ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord1iv (const GLint *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord1iv LIB "opengl32.dll" ALIAS "glTexCoord1iv" ( BYREF v AS LONG ' const GLint v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord1s (GLshort s);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord1s LIB "opengl32.dll" ALIAS "glTexCoord1s" ( BYVAL s AS INTEGER ' GLshort s ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord1sv (const GLshort *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord1sv LIB "opengl32.dll" ALIAS "glTexCoord1sv" ( BYREF v AS INTEGER ' const GLshort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord2d (GLdouble s, GLdouble t);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord2d LIB "opengl32.dll" ALIAS "glTexCoord2d" ( BYVAL s AS DOUBLE ' GLdouble s , BYVAL t AS DOUBLE ' GLdouble t ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord2dv (const GLdouble *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord2dv LIB "opengl32.dll" ALIAS "glTexCoord2dv" ( BYREF v AS DOUBLE ' const GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord2f (GLfloat s, GLfloat t);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord2f LIB "opengl32.dll" ALIAS "glTexCoord2f" ( BYVAL s AS SINGLE ' GLfloat s , BYVAL t AS SINGLE ' GLfloat t ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord2fv (const GLfloat *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord2fv LIB "opengl32.dll" ALIAS "glTexCoord2fv" ( BYREF v AS SINGLE ' const GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord2i (GLint s, GLint t);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord2i LIB "opengl32.dll" ALIAS "glTexCoord2i" ( BYVAL s AS LONG ' GLint s , BYVAL t AS LONG ' GLint t ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord2iv (const GLint *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord2iv LIB "opengl32.dll" ALIAS "glTexCoord2iv" ( BYREF v AS LONG ' const GLint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord2s (GLshort s, GLshort t);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord2s LIB "opengl32.dll" ALIAS "glTexCoord2s" ( BYVAL s AS INTEGER ' GLshort s , BYVAL t AS INTEGER ' GLshort t ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord2sv (const GLshort *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord2sv LIB "opengl32.dll" ALIAS "glTexCoord2sv" ( BYREF v AS INTEGER ' const GLshort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord3d (GLdouble s, GLdouble t, GLdouble r);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord3d LIB "opengl32.dll" ALIAS "glTexCoord3d" ( BYVAL s AS DOUBLE ' GLdouble s , BYVAL t AS DOUBLE ' GLdouble t , BYVAL r AS DOUBLE ' GLdouble r ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord3dv (const GLdouble *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord3dv LIB "opengl32.dll" ALIAS "glTexCoord3dv" ( BYREF v AS DOUBLE ' const GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord3f (GLfloat s, GLfloat t, GLfloat r);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord3f LIB "opengl32.dll" ALIAS "glTexCoord3f" ( BYVAL s AS SINGLE ' GLfloat s , BYVAL t AS SINGLE ' GLfloat t , BYVAL r AS SINGLE ' GLfloat r ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord3fv (const GLfloat *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord3fv LIB "opengl32.dll" ALIAS "glTexCoord3fv" ( BYREF v AS SINGLE ' const GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord3i (GLint s, GLint t, GLint r);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord3i LIB "opengl32.dll" ALIAS "glTexCoord3i" ( BYVAL s AS LONG ' GLint s , BYVAL t AS LONG ' GLint t , BYVAL r AS LONG ' GLint r ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord3iv (const GLint *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord3iv LIB "opengl32.dll" ALIAS "glTexCoord3iv" ( BYREF v AS LONG ' const GLint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord3s (GLshort s, GLshort t, GLshort r);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord3s LIB "opengl32.dll" ALIAS "glTexCoord3s" ( BYVAL s AS INTEGER ' GLshort s , BYVAL t AS INTEGER ' GLshort t , BYVAL r AS INTEGER ' GLshort r ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord3sv (const GLshort *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord3sv LIB "opengl32.dll" ALIAS "glTexCoord3sv" ( BYREF v AS INTEGER ' const GLshort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord4d (GLdouble s, GLdouble t, GLdouble r, GLdouble q);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord4d LIB "opengl32.dll" ALIAS "glTexCoord4d" ( BYVAL s AS DOUBLE ' GLdouble s , BYVAL t AS DOUBLE ' GLdouble t , BYVAL r AS DOUBLE ' GLdouble r , BYVAL q AS DOUBLE ' GLdouble q ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord4dv (const GLdouble *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord4dv LIB "opengl32.dll" ALIAS "glTexCoord4dv" ( BYREF v AS DOUBLE ' const GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord4f (GLfloat s, GLfloat t, GLfloat r, GLfloat q);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord4f LIB "opengl32.dll" ALIAS "glTexCoord4f" ( BYVAL s AS SINGLE ' GLfloat s , BYVAL t AS SINGLE ' GLfloat t , BYVAL r AS SINGLE ' GLfloat r , BYVAL q AS SINGLE ' GLfloat q ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord4fv (const GLfloat *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord4fv LIB "opengl32.dll" ALIAS "glTexCoord4fv" ( BYREF v AS SINGLE ' const GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord4i (GLint s, GLint t, GLint r, GLint q);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord4i LIB "opengl32.dll" ALIAS "glTexCoord4i" ( BYVAL s AS LONG ' GLint s , BYVAL t AS LONG ' GLint t , BYVAL r AS LONG ' GLint r , BYVAL q AS LONG ' GLint q ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord4iv (const GLint *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord4iv LIB "opengl32.dll" ALIAS "glTexCoord4iv" ( BYREF v AS LONG ' const GLint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord4s (GLshort s, GLshort t, GLshort r, GLshort q);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord4s LIB "opengl32.dll" ALIAS "glTexCoord4s" ( BYVAL s AS INTEGER ' GLshort s , BYVAL t AS INTEGER ' GLshort t , BYVAL r AS INTEGER ' GLshort r , BYVAL q AS INTEGER ' GLshort q ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoord4sv (const GLshort *v);
' Sets the current texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoord4sv LIB "opengl32.dll" ALIAS "glTexCoord4sv" ( BYREF v AS INTEGER ' const GLshort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexCoordPointer (GLint size, GLenum type, GLsizei stride,
' const GLvoid *pointer);
' Defines an array of texture coordinates.
' ========================================================================================
DECLARE SUB glTexCoordPointer LIB "opengl32.dll" ALIAS "glTexCoordPointer" ( BYVAL size AS LONG ' GLint size , BYVAL type AS QUAD ' GLEnum type , BYVAL stride AS LONG ' GLsizei stride , BYREF pointer AS ANY ' GLvoid *pointer ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexEnvf (GLenum target, GLenum pname, GLfloat param);
' Sets texture environment parameters.
' ========================================================================================
DECLARE SUB glTexEnvf LIB "opengl32.dll" ALIAS "glTexEnvf" ( BYVAL target AS QUAD ' GLEnum target , BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS SINGLE ' GLfloat param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexEnvfv (GLenum target, GLenum pname, const GLfloat *params);
' Sets texture environment parameters.
' ========================================================================================
DECLARE SUB glTexEnvfv LIB "opengl32.dll" ALIAS "glTexEnvfv" ( BYVAL target AS QUAD ' GLEnum target , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' const GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexEnvi (GLenum target, GLenum pname, GLint param);
' Sets texture environment parameters.
' ========================================================================================
DECLARE SUB glTexEnvi LIB "opengl32.dll" ALIAS "glTexEnvi" ( BYVAL target AS QUAD ' GLEnum target , BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS LONG ' GLint param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexEnviv (GLenum target, GLenum pname, const GLint *params);
' Sets texture environment parameters.
' ========================================================================================
DECLARE SUB glTexEnviv LIB "opengl32.dll" ALIAS "glTexEnviv" ( BYVAL target AS QUAD ' GLEnum target , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS LONG ' const GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexGend (GLenum coord, GLenum pname, GLdouble param);
' Controls the generation of texture coordinates.
' ========================================================================================
DECLARE SUB glTexGend LIB "opengl32.dll" ALIAS "glTexGend" ( BYVAL coord AS QUAD ' GLEnum coord , BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS DOUBLE ' GLdouble param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexGendv (GLenum coord, GLenum pname, const GLdouble *params);
' Controls the generation of texture coordinates.
' ========================================================================================
DECLARE SUB glTexGendv LIB "opengl32.dll" ALIAS "glTexGendv" ( BYVAL coord AS QUAD ' GLEnum coord , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS DOUBLE ' const GLdouble *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexGenf (GLenum coord, GLenum pname, GLfloat param);
' Controls the generation of texture coordinates.
' ========================================================================================
DECLARE SUB glTexGenf LIB "opengl32.dll" ALIAS "glTexGenf" ( BYVAL coord AS QUAD ' GLEnum coord , BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS SINGLE ' GLfloat param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexGenfv (GLenum coord, GLenum pname, const GLfloat *params);
' Controls the generation of texture coordinates.
' ========================================================================================
DECLARE SUB glTexGenfv LIB "opengl32.dll" ALIAS "glTexGenfv" ( BYVAL coord AS QUAD ' GLEnum coord , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' const GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexGeni (GLenum coord, GLenum pname, GLint param);
' Controls the generation of texture coordinates.
' ========================================================================================
DECLARE SUB glTexGeni LIB "opengl32.dll" ALIAS "glTexGeni" ( BYVAL coord AS QUAD ' GLEnum coord , BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS LONG ' GLint param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexGeniv (GLenum coord, GLenum pname, const GLint *params);
' Controls the generation of texture coordinates.
' ========================================================================================
DECLARE SUB glTexGeniv LIB "opengl32.dll" ALIAS "glTexGeniv" ( BYVAL coord AS QUAD ' GLEnum coord , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS LONG ' const GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexImage1D (GLenum target, GLint level, GLint internalformat,
' GLsizei width, GLint border, GLenum format, GLenum type, const GLvoid *pixels);
' Specifies a one-dimensional texture image.
' ========================================================================================
DECLARE SUB glTexImage1D LIB "opengl32.dll" ALIAS "glTexImage1D" ( BYVAL target AS QUAD ' GLEnum target , BYVAL level AS LONG ' GLint level , BYVAL internalformat AS LONG ' GLint internalformat , BYVAL width AS LONG ' GLsizei width , BYVAL border AS LONG ' GLint border , BYVAL format AS QUAD ' GLEnum format , BYVAL type AS QUAD ' GLEnum type , BYREF pixels AS ANY ' const GLvoid *pixels ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexImage2D (GLenum target, GLint level, GLint internalformat,
' GLsizei width, GLsizei height, GLint border, GLenum format, GLenum type, const GLvoid *pixels);
' Specifies a two-dimensional texture image.
' ========================================================================================
DECLARE SUB glTexImage2D LIB "opengl32.dll" ALIAS "glTexImage2D" ( BYVAL target AS QUAD ' GLEnum target , BYVAL level AS LONG ' GLint level , BYVAL internalformat AS LONG ' GLint internalformat , BYVAL width AS LONG ' GLsizei width , BYVAL height AS LONG ' GLsizei height , BYVAL border AS LONG ' GLint border , BYVAL format AS QUAD ' GLEnum format , BYVAL type AS QUAD ' GLEnum type , BYREF pixels AS ANY ' const GLvoid *pixels ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexParameterf (GLenum target, GLenum pname, GLfloat param);
' Sets texture parameters.
' ========================================================================================
DECLARE SUB glTexParameterf LIB "opengl32.dll" ALIAS "glTexParameterf" ( BYVAL target AS QUAD ' GLEnum target , BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS SINGLE ' GLfloat param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexParameterfv (GLenum target, GLenum pname, const GLfloat *params);
' Sets texture parameters.
' ========================================================================================
DECLARE SUB glTexParameterfv LIB "opengl32.dll" ALIAS "glTexParameterfv" ( BYVAL target AS QUAD ' GLEnum target , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS SINGLE ' const GLfloat *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexParameteri (GLenum target, GLenum pname, GLint param);
' Sets texture parameters.
' ========================================================================================
DECLARE SUB glTexParameteri LIB "opengl32.dll" ALIAS "glTexParameteri" ( BYVAL target AS QUAD ' GLEnum target , BYVAL pname AS QUAD ' GLEnum pname , BYVAL param AS LONG ' GLint param ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexParameteriv (GLenum target, GLenum pname, const GLint *params);
' Sets texture parameters.
' ========================================================================================
DECLARE SUB glTexParameteriv LIB "opengl32.dll" ALIAS "glTexParameteriv" ( BYVAL target AS QUAD ' GLEnum target , BYVAL pname AS QUAD ' GLEnum pname , BYREF params AS LONG ' const GLint *params ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexSubImage1D (GLenum target, GLint level, GLint xoffset,
' GLsizei width, GLenum format, GLenum type, const GLvoid *pixels);
' Specifies a portion of an existing one-dimensional texture image.
' ========================================================================================
DECLARE SUB glTexSubImage1D LIB "opengl32.dll" ALIAS "glTexSubImage1D" ( BYVAL target AS QUAD ' GLEnum target , BYVAL level AS LONG ' GLint level , BYVAL xoffset AS LONG ' GLint xoffset , BYVAL width AS LONG ' GLsizei width , BYVAL format AS QUAD ' GLEnum format , BYVAL type AS QUAD ' GLEnum type , BYREF pixels AS ANY ' const GLvoid *pixels ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTexSubImage2D (GLenum target, GLint level, GLint xoffset,
' GLint yoffset, GLsizei width, GLsizei height, GLenum format, GLenum type, const GLvoid *pixels);
' Specifies a portion of an existing one-dimensional texture image.
' ========================================================================================
DECLARE SUB glTexSubImage2D LIB "opengl32.dll" ALIAS "glTexSubImage2D" ( BYVAL target AS QUAD ' GLEnum target , BYVAL level AS LONG ' GLint level , BYVAL xoffset AS LONG ' GLint xoffset , BYVAL yoffset AS LONG ' GLint yoffset , BYVAL width AS LONG ' GLsizei width , BYVAL height AS LONG ' GLsizei height , BYVAL format AS QUAD ' GLEnum format , BYVAL type AS QUAD ' GLEnum type , BYREF pixels AS ANY ' const GLvoid *pixels ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTranslated (GLdouble x, GLdouble y, GLdouble z);
' Multiplies the current matrix by a translation matrix.
' ========================================================================================
DECLARE SUB glTranslated LIB "opengl32.dll" ALIAS "glTranslated" ( BYVAL x AS DOUBLE ' GLdoubl x , BYVAL y AS DOUBLE ' GLdoubl y , BYVAL z AS DOUBLE ' GLdouble z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glTranslatef (GLfloat x, GLfloat y, GLfloat z);
' Multiplies the current matrix by a translation matrix.
' ========================================================================================
DECLARE SUB glTranslatef LIB "opengl32.dll" ALIAS "glTranslatef" ( BYVAL x AS SINGLE ' GLfloat x , BYVAL y AS SINGLE ' GLfloat y , BYVAL z AS SINGLE ' GLfloat z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex2d (GLdouble x, GLdouble y);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex2d LIB "opengl32.dll" ALIAS "glVertex2d" ( BYVAL x AS DOUBLE ' GLdouble x , BYVAL y AS DOUBLE ' GLdouble y ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex2dv (const GLdouble *v);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex2dv LIB "opengl32.dll" ALIAS "glVertex2dv" ( BYREF v AS DOUBLE ' const GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex2f (GLfloat x, GLfloat y);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex2f LIB "opengl32.dll" ALIAS "glVertex2f" ( BYVAL x AS SINGLE ' GLfloat x , BYVAL y AS SINGLE ' GLfloat y ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex2fv (const GLfloat *v);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex2fv LIB "opengl32.dll" ALIAS "glVertex2fv" ( BYREF v AS SINGLE ' const GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex2i (GLint x, GLint y);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex2i LIB "opengl32.dll" ALIAS "glVertex2i" ( BYVAL x AS LONG ' GLint x , BYVAL y AS LONG ' GLint y ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex2iv (const GLint *v);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex2iv LIB "opengl32.dll" ALIAS "glVertex2iv" ( BYREF v AS LONG ' const GLint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex2s (GLshort x, GLshort y);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex2s LIB "opengl32.dll" ALIAS "glVertex2s" ( BYVAL x AS INTEGER ' GLshort x , BYVAL y AS INTEGER ' GLshort y ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex2sv (const GLshort *v);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex2sv LIB "opengl32.dll" ALIAS "glVertex2sv" ( BYREF v AS INTEGER ' const GLshort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex3d (GLdouble x, GLdouble y, GLdouble z);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex3d LIB "opengl32.dll" ALIAS "glVertex3d" ( BYVAL x AS DOUBLE ' GLdouble x , BYVAL y AS DOUBLE ' GLdouble y , BYVAL z AS DOUBLE ' GLdouble z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex3dv (const GLdouble *v);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex3dv LIB "opengl32.dll" ALIAS "glVertex3dv" ( BYREF v AS DOUBLE ' const GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex3f (GLfloat x, GLfloat y, GLfloat z);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex3f LIB "opengl32.dll" ALIAS "glVertex3f" ( BYVAL x AS SINGLE ' GLfloat x , BYVAL y AS SINGLE ' GLfloat y , BYVAL z AS SINGLE ' GLfloat z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex3fv (const GLfloat *v);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex3fv LIB "opengl32.dll" ALIAS "glVertex3fv" ( BYREF v AS SINGLE ' const GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex3i (GLint x, GLint y, GLint z);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex3i LIB "opengl32.dll" ALIAS "glVertex3i" ( BYVAL x AS LONG ' GLint x , BYVAL y AS LONG ' GLint y , BYVAL z AS LONG ' GLint z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex3iv (const GLint *v);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex3iv LIB "opengl32.dll" ALIAS "glVertex3iv" ( BYREF v AS LONG ' const GLint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex3s (GLshort x, GLshort y, GLshort z);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex3s LIB "opengl32.dll" ALIAS "glVertex3s" ( BYVAL x AS INTEGER ' GLshort x , BYVAL y AS INTEGER ' GLshort y , BYVAL z AS INTEGER ' GLshort z ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex3sv (const GLshort *v);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex3sv LIB "opengl32.dll" ALIAS "glVertex3sv" ( BYREF v AS INTEGER ' const GLshort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex4d (GLdouble x, GLdouble y, GLdouble z, GLdouble w);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex4d LIB "opengl32.dll" ALIAS "glVertex4d" ( BYVAL x AS DOUBLE ' GLdouble x , BYVAL y AS DOUBLE ' GLdouble y , BYVAL z AS DOUBLE ' GLdouble z , BYVAL w AS DOUBLE ' GLdouble w ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex4dv (const GLdouble *v);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex4dv LIB "opengl32.dll" ALIAS "glVertex4dv" ( BYREF v AS DOUBLE ' const GLdouble *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex4f (GLfloat x, GLfloat y, GLfloat z, GLfloat w);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex4f LIB "opengl32.dll" ALIAS "glVertex4f" ( BYVAL x AS SINGLE ' GLfloat x , BYVAL y AS SINGLE ' GLfloat y , BYVAL z AS SINGLE ' GLfloat z , BYVAL w AS SINGLE ' GLfloat w ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex4fv (const GLfloat *v);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex4fv LIB "opengl32.dll" ALIAS "glVertex4fv" ( BYREF v AS SINGLE ' const GLfloat *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex4i (GLint x, GLint y, GLint z, GLint w);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex4i LIB "opengl32.dll" ALIAS "glVertex4i" ( BYVAL x AS LONG ' GLint x , BYVAL y AS LONG ' GLint y , BYVAL z AS LONG ' GLint z , BYVAL w AS LONG ' GLint w ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex4iv (const GLint *v);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex4iv LIB "opengl32.dll" ALIAS "glVertex4iv" ( BYREF v AS LONG ' const GLint *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex4s (GLshort x, GLshort y, GLshort z, GLshort w);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex4s LIB "opengl32.dll" ALIAS "glVertex4s" ( BYVAL x AS INTEGER ' GLshort x , BYVAL y AS INTEGER ' GLshort y , BYVAL z AS INTEGER ' GLshort z , BYVAL w AS INTEGER ' GLshort w ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertex4sv (const GLshort *v);
' Specifies a vertex.
' ========================================================================================
DECLARE SUB glVertex4sv LIB "opengl32.dll" ALIAS "glVertex4sv" ( BYREF v AS INTEGER ' const GLshort *v ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glVertexPointer (GLint size, GLenum type, GLsizei stride,
' const GLvoid *pointer);
' Defines an array of vertex data.
' ========================================================================================
DECLARE SUB glVertexPointer LIB "opengl32.dll" ALIAS "glVertexPointer" ( BYVAL size AS LONG ' GLint size , BYVAL type AS QUAD ' GLEnum type , BYVAL stride AS LONG ' GLsizei stride , BYREF pointer AS ANY ' GLvoid *pointer ) ' void
' ========================================================================================
' WINGDIAPI void APIENTRY glViewport (GLint x, GLint y, GLsizei width, GLsizei height);
' Sets the viewport.
' ========================================================================================
DECLARE SUB glViewport LIB "opengl32.dll" ALIAS "glViewport" ( BYVAL x AS LONG ' GLint x , BYVAL y AS LONG ' GLint y , BYVAL width AS LONG ' GLsizei width , BYVAL height AS LONG ' GLsizei height ) ' void
'/* EXT_vertex_array */
'typedef void (APIENTRY * PFNGLARRAYELEMENTEXTPROC) (GLint i);
'SUB GLARRAYELEMENTEXTPROC (BYVAL i AS LONG)
'typedef void (APIENTRY * PFNGLDRAWARRAYSEXTPROC) (GLenum mode, GLint first, GLsizei count);
'SUB GLDRAWARRAYSEXTPROC (BYVAL mode AS DWORD, BYVAL first AS LONG, BYVAL count AS LONG)
'typedef void (APIENTRY * PFNGLVERTEXPOINTEREXTPROC) (GLint size, GLenum type, GLsizei stride, GLsizei count, const GLvoid *pointer);
'SUB GLVERTEXPOINTEREXTPROC (BYVAL nSize AS LONG, BYVAL nType AS DWORD, BYVAL stride AS LONG, BYVAL count AS LONG, BYVAL ppointer AS DWORD)
'typedef void (APIENTRY * PFNGLNORMALPOINTEREXTPROC) (GLenum type, GLsizei stride, GLsizei count, const GLvoid *pointer);
'SUB GLNORMALPOINTEREXTPROC (BYVAL nType AS DWORD, BYVAL stride AS LONG, BYVAL count AS LONG, BYVAL ppointer AS DWORD)
'typedef void (APIENTRY * PFNGLCOLORPOINTEREXTPROC) (GLint size, GLenum type, GLsizei stride, GLsizei count, const GLvoid *pointer);
'SUB GLCOLORPOINTEREXTPROC (BYVAL nSize AS LONG, BYVAL nType AS DWORD, BYVAL stride AS LONG, BYVAL count AS LONG, BYVAL ppointer AS DWORD)
'typedef void (APIENTRY * PFNGLINDEXPOINTEREXTPROC) (GLenum type, GLsizei stride, GLsizei count, const GLvoid *pointer);
'SUB GLINDEXPOINTEREXTPROC (BYVAL nTyhpe AS DWORD, BYVAL stride AS LONG, BYVAL count AS LONG, BYVAL ppointer AS DWORD)
'typedef void (APIENTRY * PFNGLTEXCOORDPOINTEREXTPROC) (GLint size, GLenum type, GLsizei stride, GLsizei count, const GLvoid *pointer);
'SUB GLTEXCOORDPOINTEREXTPROC (BYVAL nSize AS LONG, BYVAL nType AS DWORD, BYVAL stride AS LONG, BYVAL count AS LONG, BYVAL ppointer AS DWORD)
'typedef void (APIENTRY * PFNGLEDGEFLAGPOINTEREXTPROC) (GLsizei stride, GLsizei count, const GLboolean *pointer);
'SUB GLEDGEFLAGPOINTEREXTPROC (BYVAL stride AS LONG, BYVAL count AS LONG, BYVAL ppointer AS DWORD)
'typedef void (APIENTRY * PFNGLGETPOINTERVEXTPROC) (GLenum pname, GLvoid* *params);
'SUB GLGETPOINTERVEXTPROC (BYVAL pname AS DWORD, BYVAL params AS DWORD)
'typedef void (APIENTRY * PFNGLARRAYELEMENTARRAYEXTPROC)(GLenum mode, GLsizei count, const GLvoid* pi);
'SUB GLARRAYELEMENTARRAYEXTPROC (BYVAL mode AS DWORD, BYVAL count AS LONG, BYVAL pi AS DWORD)
'/* WIN_draw_range_elements */
'typedef void (APIENTRY * PFNGLDRAWRANGEELEMENTSWINPROC) (GLenum mode, GLuint start, GLuint end, GLsizei count, GLenum type, const GLvoid *indices);
'SUB GLDRAWRANGEELEMENTSWINPROC (BYVAL mode AS DWORD, BYVAL start AS DWORD, BYVAL uend AS DWORD, BYVAL count AS LONG, BYVAL nType AS DWORD, BYVAL indices AS DWORD)
'/* WIN_swap_hint */
'typedef void (APIENTRY * PFNGLADDSWAPHINTRECTWINPROC) (GLint x, GLint y, GLsizei width, GLsizei height);
'SUB GLADDSWAPHINTRECTWINPROC )BYVAL x AS LONG, BYVAL y AS LONG, BYVAL nWidth AS LONG, BYVAL nHeight AS LONG)
'/* EXT_paletted_texture */
'typedef void (APIENTRY * PFNGLCOLORTABLEEXTPROC)
' (GLenum target, GLenum internalFormat, GLsizei width, GLenum format,
' GLenum type, const GLvoid *data);
'SUB GLCOLORTABLEEXTPROC (BYVAL nTarget AS DWORD, BYVAL internalFormat AS DWORD, BYVAL nWidth AS LONG, BYVAL nFormat AS DWORD, ' BYVAL nType AS DWORD, BYVAL pdata AS DWORD)
'typedef void (APIENTRY * PFNGLCOLORSUBTABLEEXTPROC)
' (GLenum target, GLsizei start, GLsizei count, GLenum format,
' GLenum type, const GLvoid *data);
'SUB GLCOLORSUBTABLEEXTPROC (BYVAL nTarget AS DWORD, BYVAL start AS LONG, BYVAL count AS LONG, BYVAL nFormat AS DWORD, ' BYVAL nType AS DWORD, BYVAL pdata AS DWORD)
'typedef void (APIENTRY * PFNGLGETCOLORTABLEEXTPROC)
' (GLenum target, GLenum format, GLenum type, GLvoid *data);
'SUB GLGETCOLORTABLEEXTPROC (BYVAL nTarget AS DWORD, BYVAL nFormat AS DWORD, BYVAL nType AS DWORD, BYVAL pdata AS DWORD)
'typedef void (APIENTRY * PFNGLGETCOLORTABLEPARAMETERIVEXTPROC)
' (GLenum target, GLenum pname, GLint *params);
'SUB GLGETCOLORTABLEPARAMETERIVEXTPROC (BYVAL nTarget AS DWORD, BYVAL pname AS DWORD, BYVAL params AS DWORD)
'typedef void (APIENTRY * PFNGLGETCOLORTABLEPARAMETERFVEXTPROC)
' (GLenum target, GLenum pname, GLfloat *params);
'SUB GLGETCOLORTABLEPARAMETERFVEXTPROC (BYVAL nTarget AS DWORD, BYVAL pname AS DWORD, BYVAL params AS DWORD)
' ########################################################################################
' *** HELPER FUNCTIONS ***
' ########################################################################################
' =======================================================================================
' Returns a string describing some aspect of the current OpenGL connection.
' Parameter:
' dwName : One of the following symbolic constants:
' %GL_VENDOR
' Returns the company responsible for this OpenGL implementation.
' This name does not change from release to release.
' %GL_RENDERER
' Returns the name of the renderer. This name is typically specific to a
' particular configuration of a hardware platform. It does not change from release
' to release.
' %GL_VERSION
' Returns a version or release number.
' %GL_EXTENSIONS
' Returns a space-separated list of supported extensions to OpenGL.
' Error codes:
' %GL_INVALID_ENUM
' dwName was not an accepted value.
' %GL_INVALID_OPERATION
' glGetString was called between a call to glBegin and the corresponding call to glEnd.
' =======================================================================================
FUNCTION GL_GetString (BYVAL dwName AS DWORD) AS STRING
 LOCAL strOut AS STRING
 LOCAL pStr AS DWORD
 LOCAL nLen AS LONG
 pStr = glGetString(dwName)
 IF pStr THEN
 nLen = lstrlen(BYVAL pStr)
 IF nLen THEN
 strOut = SPACE$(nLen)
 MoveMemory BYVAL STRPTR(strOut), BYVAL pStr, nLen
 IF RIGHT$(strOut, 1) <> " " THEN strOut += strOut & " "
 FUNCTION = strOut
 END IF
 END IF
END FUNCTION
' =======================================================================================
' =======================================================================================
' Checks if an extension is supported.
' Parameter:
' strExtensionName
' Name of the extension.
' Return value:
' %TRUE or %FALSE.
' =======================================================================================
FUNCTION GL_IsExtensionSupported (BYVAL strExtensionName AS STRING) AS LONG
 FUNCTION = INSTR(UCASE$(GL_GetString(%GL_EXTENSIONS)), UCASE$(strExtensionName) & " ") <> 0
END FUNCTION
' =======================================================================================
' =======================================================================================
' GL_SwapInterval specifies the minimum number of video frame periods per buffer swap for
' the window associated with the current context. The interval takes effect when
' SwapBuffers or wglSwapLayerBuffer is first called subsequent to the GL_SwapInterval call.
' The parameter <interval> specifies the minimum number of video frames that are displayed
' before a buffer swap will occur.
' A video frame period is the time required by the monitor to display a full frame of video
' data. In the case of an interlaced monitor, this is typically the time required to
' display both the even and odd fields of a frame of video data. An interval set to a
' value of 2 means that the color buffers will be swapped at most every other video frame.
' If <interval> is set to a value of 0, buffer swaps are not synchronized to a video frame.
' The <interval> value is silently clamped to the maximum implementation-dependent value
' supported before being stored.
' The swap interval is not part of the render context state. It cannot be pushed or popped.
' The current swap interval for the window associated with the current context can be
' obtained by calling GL_GetSwapInterval. The default swap interval is 1.
' =======================================================================================
FUNCTION GL_SwapInterval (BYVAL nInterval AS LONG) AS LONG
 LOCAL lRes AS LONG
 LOCAL pProc AS DWORD
 pProc = wglGetProcAddress("wglSwapIntervalEXT")
 IF pProc = 0 THEN EXIT FUNCTION
 CALL DWORD pProc USING GL_SwapInterval(nInterval) TO lRes
 FUNCTION = lRes
END FUNCTION
' =======================================================================================
' =======================================================================================
' Returns the update frequency.
' =======================================================================================
FUNCTION GL_GetSwapInterval () AS LONG
 LOCAL lRes AS LONG
 LOCAL pProc AS DWORD
 pProc = wglGetProcAddress("wglGetSwapIntervalEXT")
 IF pProc = 0 THEN EXIT FUNCTION
 CALL DWORD pProc USING GL_GetSwapInterval() TO lRes
 FUNCTION = lRes
END FUNCTION
' =======================================================================================
#ENDIF
