mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-07-24 16:56:58 +02:00
867 lines
38 KiB
Modula-2
867 lines
38 KiB
Modula-2
# This is the definition file for all GL 1.0 stuff
|
|
|
|
%COPY_INTERFACE
|
|
|
|
const
|
|
GL_NO_ERROR = 0;
|
|
|
|
// Boolean values
|
|
GL_FALSE = 0;
|
|
GL_TRUE = 1;
|
|
|
|
// Data types
|
|
GL_BYTE = $1400;
|
|
GL_UNSIGNED_BYTE = $1401;
|
|
GL_SHORT = $1402;
|
|
GL_UNSIGNED_SHORT = $1403;
|
|
GL_INT = $1404;
|
|
GL_UNSIGNED_INT = $1405;
|
|
GL_FLOAT = $1406;
|
|
GL_DOUBLE = $140A;
|
|
GL_2_BYTES = $1407;
|
|
GL_3_BYTES = $1408;
|
|
GL_4_BYTES = $1409;
|
|
|
|
// Primitives
|
|
GL_LINES = $0001;
|
|
GL_POINTS = $0000;
|
|
GL_LINE_STRIP = $0003;
|
|
GL_LINE_LOOP = $0002;
|
|
GL_TRIANGLES = $0004;
|
|
GL_TRIANGLE_STRIP = $0005;
|
|
GL_TRIANGLE_FAN = $0006;
|
|
GL_QUADS = $0007;
|
|
GL_QUAD_STRIP = $0008;
|
|
GL_POLYGON = $0009;
|
|
GL_EDGE_FLAG = $0B43;
|
|
|
|
// Vertex arrays
|
|
GL_VERTEX_ARRAY = $8074;
|
|
GL_NORMAL_ARRAY = $8075;
|
|
GL_COLOR_ARRAY = $8076;
|
|
GL_INDEX_ARRAY = $8077;
|
|
GL_TEXTURE_COORD_ARRAY = $8078;
|
|
GL_EDGE_FLAG_ARRAY = $8079;
|
|
GL_VERTEX_ARRAY_SIZE = $807A;
|
|
GL_VERTEX_ARRAY_TYPE = $807B;
|
|
GL_VERTEX_ARRAY_STRIDE = $807C;
|
|
GL_NORMAL_ARRAY_TYPE = $807E;
|
|
GL_NORMAL_ARRAY_STRIDE = $807F;
|
|
GL_COLOR_ARRAY_SIZE = $8081;
|
|
GL_COLOR_ARRAY_TYPE = $8082;
|
|
GL_COLOR_ARRAY_STRIDE = $8083;
|
|
GL_INDEX_ARRAY_TYPE = $8085;
|
|
GL_INDEX_ARRAY_STRIDE = $8086;
|
|
GL_TEXTURE_COORD_ARRAY_SIZE = $8088;
|
|
GL_TEXTURE_COORD_ARRAY_TYPE = $8089;
|
|
GL_TEXTURE_COORD_ARRAY_STRIDE = $808A;
|
|
GL_EDGE_FLAG_ARRAY_STRIDE = $808C;
|
|
GL_VERTEX_ARRAY_POINTER = $808E;
|
|
GL_NORMAL_ARRAY_POINTER = $808F;
|
|
GL_COLOR_ARRAY_POINTER = $8090;
|
|
GL_INDEX_ARRAY_POINTER = $8091;
|
|
GL_TEXTURE_COORD_ARRAY_POINTER = $8092;
|
|
GL_EDGE_FLAG_ARRAY_POINTER = $8093;
|
|
GL_V2F = $2A20;
|
|
GL_V3F = $2A21;
|
|
GL_C4UB_V2F = $2A22;
|
|
GL_C4UB_V3F = $2A23;
|
|
GL_C3F_V3F = $2A24;
|
|
GL_N3F_V3F = $2A25;
|
|
GL_C4F_N3F_V3F = $2A26;
|
|
GL_T2F_V3F = $2A27;
|
|
GL_T4F_V4F = $2A28;
|
|
GL_T2F_C4UB_V3F = $2A29;
|
|
GL_T2F_C3F_V3F = $2A2A;
|
|
GL_T2F_N3F_V3F = $2A2B;
|
|
GL_T2F_C4F_N3F_V3F = $2A2C;
|
|
GL_T4F_C4F_N3F_V4F = $2A2D;
|
|
|
|
// Matrix Mode
|
|
GL_MATRIX_MODE = $0BA0;
|
|
GL_MODELVIEW = $1700;
|
|
GL_PROJECTION = $1701;
|
|
GL_TEXTURE = $1702;
|
|
|
|
// Points
|
|
GL_POINT_SMOOTH = $0B10;
|
|
GL_POINT_SIZE = $0B11;
|
|
GL_POINT_SIZE_GRANULARITY = $0B13;
|
|
GL_POINT_SIZE_RANGE = $0B12;
|
|
|
|
// Lines
|
|
GL_LINE_SMOOTH = $0B20;
|
|
GL_LINE_STIPPLE = $0B24;
|
|
GL_LINE_STIPPLE_PATTERN = $0B25;
|
|
GL_LINE_STIPPLE_REPEAT = $0B26;
|
|
GL_LINE_WIDTH = $0B21;
|
|
GL_LINE_WIDTH_GRANULARITY = $0B23;
|
|
GL_LINE_WIDTH_RANGE = $0B22;
|
|
|
|
// Polygons
|
|
GL_POINT = $1B00;
|
|
GL_LINE = $1B01;
|
|
GL_FILL = $1B02;
|
|
GL_CCW = $0901;
|
|
GL_CW = $0900;
|
|
GL_FRONT = $0404;
|
|
GL_BACK = $0405;
|
|
GL_CULL_FACE = $0B44;
|
|
GL_CULL_FACE_MODE = $0B45;
|
|
GL_POLYGON_SMOOTH = $0B41;
|
|
GL_POLYGON_STIPPLE = $0B42;
|
|
GL_FRONT_FACE = $0B46;
|
|
GL_POLYGON_MODE = $0B40;
|
|
GL_POLYGON_OFFSET_FACTOR = $8038;
|
|
GL_POLYGON_OFFSET_UNITS = $2A00;
|
|
GL_POLYGON_OFFSET_POINT = $2A01;
|
|
GL_POLYGON_OFFSET_LINE = $2A02;
|
|
GL_POLYGON_OFFSET_FILL = $8037;
|
|
|
|
// Display lists
|
|
GL_COMPILE = $1300;
|
|
GL_COMPILE_AND_EXECUTE = $1301;
|
|
GL_LIST_BASE = $0B32;
|
|
GL_LIST_INDEX = $0B33;
|
|
GL_LIST_MODE = $0B30;
|
|
|
|
// Depth buffer
|
|
GL_NEVER = $0200;
|
|
GL_LESS = $0201;
|
|
GL_GEQUAL = $0206;
|
|
GL_LEQUAL = $0203;
|
|
GL_GREATER = $0204;
|
|
GL_NOTEQUAL = $0205;
|
|
GL_EQUAL = $0202;
|
|
GL_ALWAYS = $0207;
|
|
GL_DEPTH_TEST = $0B71;
|
|
GL_DEPTH_BITS = $0D56;
|
|
GL_DEPTH_CLEAR_VALUE = $0B73;
|
|
GL_DEPTH_FUNC = $0B74;
|
|
GL_DEPTH_RANGE = $0B70;
|
|
GL_DEPTH_WRITEMASK = $0B72;
|
|
GL_DEPTH_COMPONENT = $1902;
|
|
|
|
// Lighting
|
|
GL_LIGHTING = $0B50;
|
|
GL_LIGHT0 = $4000;
|
|
GL_LIGHT1 = $4001;
|
|
GL_LIGHT2 = $4002;
|
|
GL_LIGHT3 = $4003;
|
|
GL_LIGHT4 = $4004;
|
|
GL_LIGHT5 = $4005;
|
|
GL_LIGHT6 = $4006;
|
|
GL_LIGHT7 = $4007;
|
|
GL_SPOT_EXPONENT = $1205;
|
|
GL_SPOT_CUTOFF = $1206;
|
|
GL_CONSTANT_ATTENUATION = $1207;
|
|
GL_LINEAR_ATTENUATION = $1208;
|
|
GL_QUADRATIC_ATTENUATION = $1209;
|
|
GL_AMBIENT = $1200;
|
|
GL_DIFFUSE = $1201;
|
|
GL_SPECULAR = $1202;
|
|
GL_SHININESS = $1601;
|
|
GL_EMISSION = $1600;
|
|
GL_POSITION = $1203;
|
|
GL_SPOT_DIRECTION = $1204;
|
|
GL_AMBIENT_AND_DIFFUSE = $1602;
|
|
GL_COLOR_INDEXES = $1603;
|
|
GL_LIGHT_MODEL_TWO_SIDE = $0B52;
|
|
GL_LIGHT_MODEL_LOCAL_VIEWER = $0B51;
|
|
GL_LIGHT_MODEL_AMBIENT = $0B53;
|
|
GL_FRONT_AND_BACK = $0408;
|
|
GL_SHADE_MODEL = $0B54;
|
|
GL_FLAT = $1D00;
|
|
GL_SMOOTH = $1D01;
|
|
GL_COLOR_MATERIAL = $0B57;
|
|
GL_COLOR_MATERIAL_FACE = $0B55;
|
|
GL_COLOR_MATERIAL_PARAMETER = $0B56;
|
|
GL_NORMALIZE = $0BA1;
|
|
|
|
// User clipping planes
|
|
GL_CLIP_PLANE0 = $3000;
|
|
GL_CLIP_PLANE1 = $3001;
|
|
GL_CLIP_PLANE2 = $3002;
|
|
GL_CLIP_PLANE3 = $3003;
|
|
GL_CLIP_PLANE4 = $3004;
|
|
GL_CLIP_PLANE5 = $3005;
|
|
|
|
// Accumulation buffer
|
|
GL_ACCUM_RED_BITS = $0D58;
|
|
GL_ACCUM_GREEN_BITS = $0D59;
|
|
GL_ACCUM_BLUE_BITS = $0D5A;
|
|
GL_ACCUM_ALPHA_BITS = $0D5B;
|
|
GL_ACCUM_CLEAR_VALUE = $0B80;
|
|
GL_ACCUM = $0100;
|
|
GL_ADD = $0104;
|
|
GL_LOAD = $0101;
|
|
GL_MULT = $0103;
|
|
GL_RETURN = $0102;
|
|
|
|
// Alpha testing
|
|
GL_ALPHA_TEST = $0BC0;
|
|
GL_ALPHA_TEST_REF = $0BC2;
|
|
GL_ALPHA_TEST_FUNC = $0BC1;
|
|
|
|
// Blending
|
|
GL_BLEND = $0BE2;
|
|
GL_BLEND_SRC = $0BE1;
|
|
GL_BLEND_DST = $0BE0;
|
|
GL_ZERO = 0;
|
|
GL_ONE = 1;
|
|
GL_SRC_COLOR = $0300;
|
|
GL_ONE_MINUS_SRC_COLOR = $0301;
|
|
GL_DST_COLOR = $0306;
|
|
GL_ONE_MINUS_DST_COLOR = $0307;
|
|
GL_SRC_ALPHA = $0302;
|
|
GL_ONE_MINUS_SRC_ALPHA = $0303;
|
|
GL_DST_ALPHA = $0304;
|
|
GL_ONE_MINUS_DST_ALPHA = $0305;
|
|
GL_SRC_ALPHA_SATURATE = $0308;
|
|
GL_CONSTANT_COLOR = $8001;
|
|
GL_ONE_MINUS_CONSTANT_COLOR = $8002;
|
|
GL_CONSTANT_ALPHA = $8003;
|
|
GL_ONE_MINUS_CONSTANT_ALPHA = $8004;
|
|
|
|
// Render mode
|
|
GL_FEEDBACK = $1C01;
|
|
GL_RENDER = $1C00;
|
|
GL_SELECT = $1C02;
|
|
|
|
// Feedback
|
|
GL_2D = $0600;
|
|
GL_3D = $0601;
|
|
GL_3D_COLOR = $0602;
|
|
GL_3D_COLOR_TEXTURE = $0603;
|
|
GL_4D_COLOR_TEXTURE = $0604;
|
|
GL_POINT_TOKEN = $0701;
|
|
GL_LINE_TOKEN = $0702;
|
|
GL_LINE_RESET_TOKEN = $0707;
|
|
GL_POLYGON_TOKEN = $0703;
|
|
GL_BITMAP_TOKEN = $0704;
|
|
GL_DRAW_PIXEL_TOKEN = $0705;
|
|
GL_COPY_PIXEL_TOKEN = $0706;
|
|
GL_PASS_THROUGH_TOKEN = $0700;
|
|
GL_FEEDBACK_BUFFER_POINTER = $0DF0;
|
|
GL_FEEDBACK_BUFFER_SIZE = $0DF1;
|
|
GL_FEEDBACK_BUFFER_TYPE = $0DF2;
|
|
|
|
// Selection
|
|
GL_SELECTION_BUFFER_POINTER = $0DF3;
|
|
GL_SELECTION_BUFFER_SIZE = $0DF4;
|
|
|
|
// Fog
|
|
GL_FOG = $0B60;
|
|
GL_FOG_MODE = $0B65;
|
|
GL_FOG_DENSITY = $0B62;
|
|
GL_FOG_COLOR = $0B66;
|
|
GL_FOG_INDEX = $0B61;
|
|
GL_FOG_START = $0B63;
|
|
GL_FOG_END = $0B64;
|
|
GL_LINEAR = $2601;
|
|
GL_EXP = $0800;
|
|
GL_EXP2 = $0801;
|
|
|
|
// Logic ops
|
|
GL_LOGIC_OP = $0BF1;
|
|
GL_INDEX_LOGIC_OP = $0BF1;
|
|
GL_COLOR_LOGIC_OP = $0BF2;
|
|
GL_LOGIC_OP_MODE = $0BF0;
|
|
GL_CLEAR = $1500;
|
|
GL_SET = $150F;
|
|
GL_COPY = $1503;
|
|
GL_COPY_INVERTED = $150C;
|
|
GL_NOOP = $1505;
|
|
GL_INVERT = $150A;
|
|
GL_AND = $1501;
|
|
GL_NAND = $150E;
|
|
GL_OR = $1507;
|
|
GL_NOR = $1508;
|
|
GL_XOR = $1506;
|
|
GL_EQUIV = $1509;
|
|
GL_AND_REVERSE = $1502;
|
|
GL_AND_INVERTED = $1504;
|
|
GL_OR_REVERSE = $150B;
|
|
GL_OR_INVERTED = $150D;
|
|
|
|
// Stencil
|
|
GL_STENCIL_TEST = $0B90;
|
|
GL_STENCIL_WRITEMASK = $0B98;
|
|
GL_STENCIL_BITS = $0D57;
|
|
GL_STENCIL_FUNC = $0B92;
|
|
GL_STENCIL_VALUE_MASK = $0B93;
|
|
GL_STENCIL_REF = $0B97;
|
|
GL_STENCIL_FAIL = $0B94;
|
|
GL_STENCIL_PASS_DEPTH_PASS = $0B96;
|
|
GL_STENCIL_PASS_DEPTH_FAIL = $0B95;
|
|
GL_STENCIL_CLEAR_VALUE = $0B91;
|
|
GL_STENCIL_INDEX = $1901;
|
|
GL_KEEP = $1E00;
|
|
GL_REPLACE = $1E01;
|
|
GL_INCR = $1E02;
|
|
GL_DECR = $1E03;
|
|
|
|
// Buffers, Pixel Drawing/Reading
|
|
GL_NONE = 0;
|
|
GL_LEFT = $0406;
|
|
GL_RIGHT = $0407;
|
|
//GL_FRONT = $0404;
|
|
//GL_BACK = $0405;
|
|
//GL_FRONT_AND_BACK = $0408;
|
|
GL_FRONT_LEFT = $0400;
|
|
GL_FRONT_RIGHT = $0401;
|
|
GL_BACK_LEFT = $0402;
|
|
GL_BACK_RIGHT = $0403;
|
|
GL_AUX0 = $0409;
|
|
GL_AUX1 = $040A;
|
|
GL_AUX2 = $040B;
|
|
GL_AUX3 = $040C;
|
|
GL_COLOR_INDEX = $1900;
|
|
GL_RED = $1903;
|
|
GL_GREEN = $1904;
|
|
GL_BLUE = $1905;
|
|
GL_ALPHA = $1906;
|
|
GL_LUMINANCE = $1909;
|
|
GL_LUMINANCE_ALPHA = $190A;
|
|
GL_ALPHA_BITS = $0D55;
|
|
GL_RED_BITS = $0D52;
|
|
GL_GREEN_BITS = $0D53;
|
|
GL_BLUE_BITS = $0D54;
|
|
GL_INDEX_BITS = $0D51;
|
|
GL_SUBPIXEL_BITS = $0D50;
|
|
GL_AUX_BUFFERS = $0C00;
|
|
GL_READ_BUFFER = $0C02;
|
|
GL_DRAW_BUFFER = $0C01;
|
|
GL_DOUBLEBUFFER = $0C32;
|
|
GL_STEREO = $0C33;
|
|
GL_BITMAP = $1A00;
|
|
GL_COLOR = $1800;
|
|
GL_DEPTH = $1801;
|
|
GL_STENCIL = $1802;
|
|
GL_DITHER = $0BD0;
|
|
GL_RGB = $1907;
|
|
GL_RGBA = $1908;
|
|
|
|
// Implementation limits
|
|
GL_MAX_LIST_NESTING = $0B31;
|
|
GL_MAX_ATTRIB_STACK_DEPTH = $0D35;
|
|
GL_MAX_MODELVIEW_STACK_DEPTH = $0D36;
|
|
GL_MAX_NAME_STACK_DEPTH = $0D37;
|
|
GL_MAX_PROJECTION_STACK_DEPTH = $0D38;
|
|
GL_MAX_TEXTURE_STACK_DEPTH = $0D39;
|
|
GL_MAX_EVAL_ORDER = $0D30;
|
|
GL_MAX_LIGHTS = $0D31;
|
|
GL_MAX_CLIP_PLANES = $0D32;
|
|
GL_MAX_TEXTURE_SIZE = $0D33;
|
|
GL_MAX_PIXEL_MAP_TABLE = $0D34;
|
|
GL_MAX_VIEWPORT_DIMS = $0D3A;
|
|
GL_MAX_CLIENT_ATTRIB_STACK_DEPTH = $0D3B;
|
|
|
|
// Gets
|
|
GL_ATTRIB_STACK_DEPTH = $0BB0;
|
|
GL_CLIENT_ATTRIB_STACK_DEPTH = $0BB1;
|
|
GL_COLOR_CLEAR_VALUE = $0C22;
|
|
GL_COLOR_WRITEMASK = $0C23;
|
|
GL_CURRENT_INDEX = $0B01;
|
|
GL_CURRENT_COLOR = $0B00;
|
|
GL_CURRENT_NORMAL = $0B02;
|
|
GL_CURRENT_RASTER_COLOR = $0B04;
|
|
GL_CURRENT_RASTER_DISTANCE = $0B09;
|
|
GL_CURRENT_RASTER_INDEX = $0B05;
|
|
GL_CURRENT_RASTER_POSITION = $0B07;
|
|
GL_CURRENT_RASTER_TEXTURE_COORDS = $0B06;
|
|
GL_CURRENT_RASTER_POSITION_VALID = $0B08;
|
|
GL_CURRENT_TEXTURE_COORDS = $0B03;
|
|
GL_INDEX_CLEAR_VALUE = $0C20;
|
|
GL_INDEX_MODE = $0C30;
|
|
GL_INDEX_WRITEMASK = $0C21;
|
|
GL_MODELVIEW_MATRIX = $0BA6;
|
|
GL_MODELVIEW_STACK_DEPTH = $0BA3;
|
|
GL_NAME_STACK_DEPTH = $0D70;
|
|
GL_PROJECTION_MATRIX = $0BA7;
|
|
GL_PROJECTION_STACK_DEPTH = $0BA4;
|
|
GL_RENDER_MODE = $0C40;
|
|
GL_RGBA_MODE = $0C31;
|
|
GL_TEXTURE_MATRIX = $0BA8;
|
|
GL_TEXTURE_STACK_DEPTH = $0BA5;
|
|
GL_VIEWPORT = $0BA2;
|
|
|
|
// Evaluators
|
|
GL_AUTO_NORMAL = $0D80;
|
|
GL_MAP1_COLOR_4 = $0D90;
|
|
GL_MAP1_GRID_DOMAIN = $0DD0;
|
|
GL_MAP1_GRID_SEGMENTS = $0DD1;
|
|
GL_MAP1_INDEX = $0D91;
|
|
GL_MAP1_NORMAL = $0D92;
|
|
GL_MAP1_TEXTURE_COORD_1 = $0D93;
|
|
GL_MAP1_TEXTURE_COORD_2 = $0D94;
|
|
GL_MAP1_TEXTURE_COORD_3 = $0D95;
|
|
GL_MAP1_TEXTURE_COORD_4 = $0D96;
|
|
GL_MAP1_VERTEX_3 = $0D97;
|
|
GL_MAP1_VERTEX_4 = $0D98;
|
|
GL_MAP2_COLOR_4 = $0DB0;
|
|
GL_MAP2_GRID_DOMAIN = $0DD2;
|
|
GL_MAP2_GRID_SEGMENTS = $0DD3;
|
|
GL_MAP2_INDEX = $0DB1;
|
|
GL_MAP2_NORMAL = $0DB2;
|
|
GL_MAP2_TEXTURE_COORD_1 = $0DB3;
|
|
GL_MAP2_TEXTURE_COORD_2 = $0DB4;
|
|
GL_MAP2_TEXTURE_COORD_3 = $0DB5;
|
|
GL_MAP2_TEXTURE_COORD_4 = $0DB6;
|
|
GL_MAP2_VERTEX_3 = $0DB7;
|
|
GL_MAP2_VERTEX_4 = $0DB8;
|
|
GL_COEFF = $0A00;
|
|
GL_DOMAIN = $0A02;
|
|
GL_ORDER = $0A01;
|
|
|
|
// Hints
|
|
GL_FOG_HINT = $0C54;
|
|
GL_LINE_SMOOTH_HINT = $0C52;
|
|
GL_PERSPECTIVE_CORRECTION_HINT = $0C50;
|
|
GL_POINT_SMOOTH_HINT = $0C51;
|
|
GL_POLYGON_SMOOTH_HINT = $0C53;
|
|
GL_DONT_CARE = $1100;
|
|
GL_FASTEST = $1101;
|
|
GL_NICEST = $1102;
|
|
|
|
// Scissor box
|
|
GL_SCISSOR_TEST = $0C11;
|
|
GL_SCISSOR_BOX = $0C10;
|
|
|
|
// Pixel Mode / Transfer
|
|
GL_MAP_COLOR = $0D10;
|
|
GL_MAP_STENCIL = $0D11;
|
|
GL_INDEX_SHIFT = $0D12;
|
|
GL_INDEX_OFFSET = $0D13;
|
|
GL_RED_SCALE = $0D14;
|
|
GL_RED_BIAS = $0D15;
|
|
GL_GREEN_SCALE = $0D18;
|
|
GL_GREEN_BIAS = $0D19;
|
|
GL_BLUE_SCALE = $0D1A;
|
|
GL_BLUE_BIAS = $0D1B;
|
|
GL_ALPHA_SCALE = $0D1C;
|
|
GL_ALPHA_BIAS = $0D1D;
|
|
GL_DEPTH_SCALE = $0D1E;
|
|
GL_DEPTH_BIAS = $0D1F;
|
|
GL_PIXEL_MAP_S_TO_S_SIZE = $0CB1;
|
|
GL_PIXEL_MAP_I_TO_I_SIZE = $0CB0;
|
|
GL_PIXEL_MAP_I_TO_R_SIZE = $0CB2;
|
|
GL_PIXEL_MAP_I_TO_G_SIZE = $0CB3;
|
|
GL_PIXEL_MAP_I_TO_B_SIZE = $0CB4;
|
|
GL_PIXEL_MAP_I_TO_A_SIZE = $0CB5;
|
|
GL_PIXEL_MAP_R_TO_R_SIZE = $0CB6;
|
|
GL_PIXEL_MAP_G_TO_G_SIZE = $0CB7;
|
|
GL_PIXEL_MAP_B_TO_B_SIZE = $0CB8;
|
|
GL_PIXEL_MAP_A_TO_A_SIZE = $0CB9;
|
|
GL_PIXEL_MAP_S_TO_S = $0C71;
|
|
GL_PIXEL_MAP_I_TO_I = $0C70;
|
|
GL_PIXEL_MAP_I_TO_R = $0C72;
|
|
GL_PIXEL_MAP_I_TO_G = $0C73;
|
|
GL_PIXEL_MAP_I_TO_B = $0C74;
|
|
GL_PIXEL_MAP_I_TO_A = $0C75;
|
|
GL_PIXEL_MAP_R_TO_R = $0C76;
|
|
GL_PIXEL_MAP_G_TO_G = $0C77;
|
|
GL_PIXEL_MAP_B_TO_B = $0C78;
|
|
GL_PIXEL_MAP_A_TO_A = $0C79;
|
|
GL_PACK_ALIGNMENT = $0D05;
|
|
GL_PACK_LSB_FIRST = $0D01;
|
|
GL_PACK_ROW_LENGTH = $0D02;
|
|
GL_PACK_SKIP_PIXELS = $0D04;
|
|
GL_PACK_SKIP_ROWS = $0D03;
|
|
GL_PACK_SWAP_BYTES = $0D00;
|
|
GL_UNPACK_ALIGNMENT = $0CF5;
|
|
GL_UNPACK_LSB_FIRST = $0CF1;
|
|
GL_UNPACK_ROW_LENGTH = $0CF2;
|
|
GL_UNPACK_SKIP_PIXELS = $0CF4;
|
|
GL_UNPACK_SKIP_ROWS = $0CF3;
|
|
GL_UNPACK_SWAP_BYTES = $0CF0;
|
|
GL_ZOOM_X = $0D16;
|
|
GL_ZOOM_Y = $0D17;
|
|
|
|
// Texture mapping
|
|
GL_TEXTURE_ENV = $2300;
|
|
GL_TEXTURE_ENV_MODE = $2200;
|
|
GL_TEXTURE_1D = $0DE0;
|
|
GL_TEXTURE_2D = $0DE1;
|
|
GL_TEXTURE_WRAP_S = $2802;
|
|
GL_TEXTURE_WRAP_T = $2803;
|
|
GL_TEXTURE_MAG_FILTER = $2800;
|
|
GL_TEXTURE_MIN_FILTER = $2801;
|
|
GL_TEXTURE_ENV_COLOR = $2201;
|
|
GL_TEXTURE_GEN_S = $0C60;
|
|
GL_TEXTURE_GEN_T = $0C61;
|
|
GL_TEXTURE_GEN_MODE = $2500;
|
|
GL_TEXTURE_BORDER_COLOR = $1004;
|
|
GL_TEXTURE_WIDTH = $1000;
|
|
GL_TEXTURE_HEIGHT = $1001;
|
|
GL_TEXTURE_BORDER = $1005;
|
|
GL_TEXTURE_COMPONENTS = $1003;
|
|
GL_TEXTURE_RED_SIZE = $805C;
|
|
GL_TEXTURE_GREEN_SIZE = $805D;
|
|
GL_TEXTURE_BLUE_SIZE = $805E;
|
|
GL_TEXTURE_ALPHA_SIZE = $805F;
|
|
GL_TEXTURE_LUMINANCE_SIZE = $8060;
|
|
GL_TEXTURE_INTENSITY_SIZE = $8061;
|
|
GL_NEAREST_MIPMAP_NEAREST = $2700;
|
|
GL_NEAREST_MIPMAP_LINEAR = $2702;
|
|
GL_LINEAR_MIPMAP_NEAREST = $2701;
|
|
GL_LINEAR_MIPMAP_LINEAR = $2703;
|
|
GL_OBJECT_LINEAR = $2401;
|
|
GL_OBJECT_PLANE = $2501;
|
|
GL_EYE_LINEAR = $2400;
|
|
GL_EYE_PLANE = $2502;
|
|
GL_SPHERE_MAP = $2402;
|
|
GL_DECAL = $2101;
|
|
GL_MODULATE = $2100;
|
|
GL_NEAREST = $2600;
|
|
GL_REPEAT = $2901;
|
|
GL_CLAMP = $2900;
|
|
GL_S = $2000;
|
|
GL_T = $2001;
|
|
GL_R = $2002;
|
|
GL_Q = $2003;
|
|
GL_TEXTURE_GEN_R = $0C62;
|
|
GL_TEXTURE_GEN_Q = $0C63;
|
|
%END
|
|
|
|
|
|
#=====================================================================
|
|
# Procedures and functions
|
|
#=====================================================================
|
|
|
|
%PROCS
|
|
// Miscellaneous
|
|
glClearIndex: procedure(c: Single);
|
|
glClearColor: procedure(red, green, blue, alpha: GLclampf);
|
|
glClear: procedure(mask: GLbitfield);
|
|
glIndexMask: procedure(mask: LongWord);
|
|
glColorMask: procedure(red, green, blue, alpha: GLboolean);
|
|
glAlphaFunc: procedure(func: GLenum; ref: GLclampf);
|
|
glBlendFunc: procedure(sfactor, dfactor: GLenum);
|
|
glLogicOp: procedure(opcode: GLenum);
|
|
glCullFace: procedure(mode: GLenum);
|
|
glFrontFace: procedure(mode: GLenum);
|
|
glPointSize: procedure(size: Single);
|
|
glLineWidth: procedure(width: Single);
|
|
glLineStipple: procedure(factor: LongInt; pattern: Word);
|
|
glPolygonMode: procedure(face, mode: GLenum);
|
|
glPolygonOffset: procedure(factor, units: Single);
|
|
glPolygonStipple: procedure(var mask: Byte);
|
|
glGetPolygonStipple: procedure(var mask: Byte);
|
|
glEdgeFlag: procedure(flag: GLBoolean);
|
|
glEdgeFlagv: procedure(var flag: GLBoolean);
|
|
glScissor: procedure(x, y, width, height: LongInt);
|
|
glClipPlane: procedure(plane: GLenum; var equation: Double);
|
|
glGetClipPlane: procedure(plane: GLenum; var equation: Double);
|
|
glDrawBuffer: procedure(mode: GLenum);
|
|
glReadBuffer: procedure(mode: GLenum);
|
|
glEnable: procedure(cap: LongInt);
|
|
glDisable: procedure(cap: LongInt);
|
|
glIsEnabled: function(cap: GLenum): GLBoolean;
|
|
glGetBooleanv: procedure(pname: GLenum; params : PGLBoolean);
|
|
glGetDoublev: procedure(pname: GLenum; params : PDouble);
|
|
glGetFloatv: procedure(pname: GLenum; params : PSingle);
|
|
glGetIntegerv: procedure(pname: GLenum; params : PLongInt);
|
|
glPushAttrib: procedure(mask: GLbitfield);
|
|
glPopAttrib: procedure;
|
|
glRenderMode: function(mode: GLenum): LongInt;
|
|
glGetError: function: GLenum;
|
|
glGetString: function(name: GLenum): PChar;
|
|
glFinish: procedure;
|
|
glFlush: procedure;
|
|
glHint: procedure(target, mode: GLenum);
|
|
|
|
// Depth Buffer
|
|
glClearDepth: procedure(depth: GLclampd);
|
|
glDepthFunc: procedure(func: LongInt);
|
|
glDepthMask: procedure(flag: GLBoolean);
|
|
glDepthRange: procedure(near_val, far_val: GLclampd);
|
|
|
|
// Accumulation Buffer
|
|
glClearAccum: procedure(red, green, blue, alpha: Single);
|
|
glAccum: procedure(op: GLenum; value: Single);
|
|
|
|
// Tranformation
|
|
glMatrixMode: procedure(mode: GLenum);
|
|
glOrtho: procedure(left, right, bottom, top, near_val, far_val: Double);
|
|
glFrustum: procedure(left, right, bottom, top, near_val, far_val: Double);
|
|
glViewport: procedure(x, y, width, height: LongInt);
|
|
glPushMatrix: procedure;
|
|
glPopMatrix: procedure;
|
|
glLoadIdentity: procedure;
|
|
glLoadMatrixd: procedure(var m: Double);
|
|
glLoadMatrixf: procedure(var m: PSingle);
|
|
glMultMatrixd: procedure(var m: Double);
|
|
glMultMatrixf: procedure(var m: Single);
|
|
glRotated: procedure(angle, x, y, z: Double);
|
|
glRotatef: procedure(angle, x, y, z: Single);
|
|
glScaled: procedure(x, y, z: Double);
|
|
glScalef: procedure(x, y, z: Single);
|
|
glTranslated: procedure(x, y, z: Double);
|
|
glTranslatef: procedure(x, y, z: Single);
|
|
|
|
// Display Lists
|
|
glIsList: function(list: LongWord): GLBoolean;
|
|
glDeleteLists: procedure(list: LongWord; range: LongInt);
|
|
glGenLists: function(range: LongInt): LongWord;
|
|
glNewList: procedure(list: LongWord; mode: GLenum);
|
|
glEndList: procedure;
|
|
glCallList: procedure(list: LongWord);
|
|
glCallLists: procedure(n: LongInt; AType: GLenum; var lists);
|
|
glListBase: procedure(base: LongWord);
|
|
|
|
// Drawing Functions
|
|
glBegin: procedure(mode: GLenum);
|
|
glEnd: procedure;
|
|
glVertex2d: procedure(x, y: Double);
|
|
glVertex2f: procedure(x, y: Single);
|
|
glVertex2i: procedure(x, y: LongInt);
|
|
glVertex2s: procedure(x, y: SmallInt);
|
|
glVertex3d: procedure(x, y, z: Double);
|
|
glVertex3f: procedure(x, y, z: Single);
|
|
glVertex3i: procedure(x, y, z: LongInt);
|
|
glVertex3s: procedure(x, y, z: SmallInt);
|
|
glVertex4d: procedure(x, y, z, w: Double);
|
|
glVertex4f: procedure(x, y, z, w: Single);
|
|
glVertex4i: procedure(x, y, z, w: LongInt);
|
|
glVertex4s: procedure(x, y, z, w: SmallInt);
|
|
glVertex2dv: procedure(var v: Double);
|
|
glVertex2fv: procedure(var v: Single);
|
|
glVertex2iv: procedure(var v: LongInt);
|
|
glVertex2sv: procedure(var v: SmallInt);
|
|
glVertex3dv: procedure(var v: Double);
|
|
glVertex3fv: procedure(var v: Single);
|
|
glVertex3iv: procedure(var v: LongInt);
|
|
glVertex3sv: procedure(var v: SmallInt);
|
|
glVertex4dv: procedure(var v: Double);
|
|
glVertex4fv: procedure(var v: Single);
|
|
glVertex4iv: procedure(var v: LongInt);
|
|
glVertex4sv: procedure(var v: SmallInt);
|
|
glNormal3b: procedure(nx, ny, nz: Byte);
|
|
glNormal3d: procedure(nx, ny, nz: Double);
|
|
glNormal3f: procedure(nx, ny, nz: Single);
|
|
glNormal3i: procedure(nx, ny, nz: LongInt);
|
|
glNormal3s: procedure(nx, ny, nz: SmallInt);
|
|
glNormal3bv: procedure(var v: ShortInt);
|
|
glNormal3dv: procedure(var v: Double);
|
|
glNormal3fv: procedure(var v: Single);
|
|
glNormal3iv: procedure(var v: LongInt);
|
|
glNormal3sv: procedure(var v: SmallInt);
|
|
glIndexd: procedure(c: Double);
|
|
glIndexf: procedure(c: Single);
|
|
glIndexi: procedure(c: LongInt);
|
|
glIndexs: procedure(c: SmallInt);
|
|
glIndexdv: procedure(var c: Double);
|
|
glIndexfv: procedure(var c: Single);
|
|
glIndexiv: procedure(var c: LongInt);
|
|
glIndexsv: procedure(var c: SmallInt);
|
|
glColor3b: procedure (red, green, blue: ShortInt);
|
|
glColor3d: procedure (red, green, blue: Double);
|
|
glColor3f: procedure (red, green, blue: Single);
|
|
glColor3i: procedure (red, green, blue: LongInt);
|
|
glColor3s: procedure (red, green, blue: SmallInt);
|
|
glColor3ub: procedure(red, green, blue: Byte);
|
|
glColor3ui: procedure(red, green, blue: LongWord);
|
|
glColor3us: procedure(red, green, blue: Word);
|
|
glColor4b: procedure (red, green, blue, alpha: ShortInt);
|
|
glColor4d: procedure (red, green, blue, alpha: Double);
|
|
glColor4f: procedure (red, green, blue, alpha: Single);
|
|
glColor4i: procedure (red, green, blue, alpha: LongInt);
|
|
glColor4s: procedure (red, green, blue, alpha: SmallInt);
|
|
glColor4ub: procedure(red, green, blue, alpha: Byte);
|
|
glColor4ui: procedure(red, green, blue, alpha: LongWord);
|
|
glColor4us: procedure(red, green, blue, alpha: Word);
|
|
glColor3bv: procedure (var v: ShortInt);
|
|
glColor3dv: procedure (var v: Double);
|
|
glColor3fv: procedure (var v: Single);
|
|
glColor3iv: procedure (var v: LongInt);
|
|
glColor3sv: procedure (var v: SmallInt);
|
|
glColor3ubv: procedure(var v: Byte);
|
|
glColor3uiv: procedure(var v: LongWord);
|
|
glColor3usv: procedure(var v: Word);
|
|
glColor4bv: procedure (var v: ShortInt);
|
|
glColor4dv: procedure (var v: Double);
|
|
glColor4fv: procedure (var v: Single);
|
|
glColor4iv: procedure (var v: LongInt);
|
|
glColor4sv: procedure (var v: SmallInt);
|
|
glColor4ubv: procedure(var v: Byte);
|
|
glColor4uiv: procedure(var v: LongWord);
|
|
glColor4usv: procedure(var v: Word);
|
|
glTexCoord1d: procedure(s: Double);
|
|
glTexCoord1f: procedure(s: Single);
|
|
glTexCoord1i: procedure(s: LongInt);
|
|
glTexCoord1s: procedure(s: SmallInt);
|
|
glTexCoord2d: procedure(s, t: Double);
|
|
glTexCoord2f: procedure(s, t: Single);
|
|
glTexCoord2i: procedure(s, t: LongInt);
|
|
glTexCoord2s: procedure(s, t: SmallInt);
|
|
glTexCoord3d: procedure(s, t, r: Double);
|
|
glTexCoord3f: procedure(s, t, r: Single);
|
|
glTexCoord3i: procedure(s, t, r: LongInt);
|
|
glTexCoord3s: procedure(s, t, r: SmallInt);
|
|
glTexCoord4d: procedure(s, t, r, q: Double);
|
|
glTexCoord4f: procedure(s, t, r, q: Single);
|
|
glTexCoord4i: procedure(s, t, r, q: LongInt);
|
|
glTexCoord4s: procedure(s, t, r, q: SmallInt);
|
|
glTexCoord1dv: procedure(var v: Double);
|
|
glTexCoord1fv: procedure(var v: Single);
|
|
glTexCoord1iv: procedure(var v: LongInt);
|
|
glTexCoord1sv: procedure(var v: SmallInt);
|
|
glTexCoord2dv: procedure(var v: Double);
|
|
glTexCoord2fv: procedure(var v: Single);
|
|
glTexCoord2iv: procedure(var v: LongInt);
|
|
glTexCoord2sv: procedure(var v: SmallInt);
|
|
glTexCoord3dv: procedure(var v: Double);
|
|
glTexCoord3fv: procedure(var v: Single);
|
|
glTexCoord3iv: procedure(var v: LongInt);
|
|
glTexCoord3sv: procedure(var v: SmallInt);
|
|
glTexCoord4dv: procedure(var v: Double);
|
|
glTexCoord4fv: procedure(var v: Single);
|
|
glTexCoord4iv: procedure(var v: LongInt);
|
|
glTexCoord4sv: procedure(var v: SmallInt);
|
|
glRasterPos2d: procedure(x, y: Double);
|
|
glRasterPos2f: procedure(x, y: Single);
|
|
glRasterPos2i: procedure(x, y: LongInt);
|
|
glRasterPos2s: procedure(x, y: SmallInt);
|
|
glRasterPos3d: procedure(x, y, z: Double);
|
|
glRasterPos3f: procedure(x, y, z: Single);
|
|
glRasterPos3i: procedure(x, y, z: LongInt);
|
|
glRasterPos3s: procedure(x, y, z: SmallInt);
|
|
glRasterPos4d: procedure(x, y, z, w: Double);
|
|
glRasterPos4f: procedure(x, y, z, w: Single);
|
|
glRasterPos4i: procedure(x, y, z, w: LongInt);
|
|
glRasterPos4s: procedure(x, y, z, w: SmallInt);
|
|
glRasterPos2dv: procedure(var v: Double);
|
|
glRasterPos2fv: procedure(var v: Single);
|
|
glRasterPos2iv: procedure(var v: LongInt);
|
|
glRasterPos2sv: procedure(var v: SmallInt);
|
|
glRasterPos3dv: procedure(var v: Double);
|
|
glRasterPos3fv: procedure(var v: Single);
|
|
glRasterPos3iv: procedure(var v: LongInt);
|
|
glRasterPos3sv: procedure(var v: SmallInt);
|
|
glRasterPos4dv: procedure(var v: Double);
|
|
glRasterPos4fv: procedure(var v: Single);
|
|
glRasterPos4iv: procedure(var v: LongInt);
|
|
glRasterPos4sv: procedure(var v: SmallInt);
|
|
glRectd: procedure(x1, y1, x2, y2: Double);
|
|
glRectf: procedure(x1, y1, x2, y2: Single);
|
|
glRecti: procedure(x1, y1, x2, y2: LongInt);
|
|
glRects: procedure(x1, y1, x2, y2: SmallInt);
|
|
glRectdv: procedure(var v1, v2: Double);
|
|
glRectfv: procedure(var v1, v2: Single);
|
|
glRectiv: procedure(var v1, v2: LongInt);
|
|
glRectsv: procedure(var v1, v2: SmallInt);
|
|
|
|
// Lighting
|
|
glShadeModel: procedure(mode: GLenum);
|
|
glLightf: procedure(light, pname: GLenum; param: Single);
|
|
glLighti: procedure(light, pname: GLenum; param: LongInt);
|
|
glLightfv: procedure(light, pname: GLenum; params : PSingle);
|
|
glLightiv: procedure(light, pname: GLenum; params : PLongInt);
|
|
glGetLightfv: procedure(light, pname: GLenum; params : PSingle);
|
|
glGetLightiv: procedure(light, pname: GLenum; params : PLongInt);
|
|
glLightModelf: procedure(pname: GLenum; param: Single);
|
|
glLightModeli: procedure(pname: GLenum; param: LongInt);
|
|
glLightModelfv: procedure(pname: GLenum; params : PSingle);
|
|
glLightModeliv: procedure(pname: GLenum; params : PLongInt);
|
|
glMaterialf: procedure(face, pname: GLenum; param: Single);
|
|
glMateriali: procedure(face, pname: GLenum; param: LongInt);
|
|
glMaterialfv: procedure(face, pname: GLenum; params : PSingle);
|
|
glMaterialiv: procedure(face, pname: GLenum; params : PLongInt);
|
|
glGetMaterialfv: procedure(face, pname: GLenum; params : PSingle);
|
|
glGetMaterialiv: procedure(face, pname: GLenum; params : PLongInt);
|
|
glColorMaterial: procedure(face, mode: GLenum);
|
|
|
|
// Raster Functions
|
|
glPixelZoom: procedure(xfactor, yfactor: Single);
|
|
glPixelStoref: procedure(pname: GLenum; param: Single);
|
|
glPixelStorei: procedure(pname: GLenum; param: LongInt);
|
|
glPixelTransferf: procedure(pname: GLenum; param: Single);
|
|
glPixelTransferi: procedure(pname: GLenum; param: LongInt);
|
|
glPixelMapfv: procedure(map: GLenum; mapsize: LongInt; var values: Single);
|
|
glPixelMapuiv: procedure(map: GLenum; mapsize: LongInt; var values: LongWord);
|
|
glPixelMapusv: procedure(map: GLenum; mapsize: LongInt; var values: Word);
|
|
glGetPixelMapfv: procedure(map: GLenum; var values: Single);
|
|
glGetPixelMapuiv: procedure(map: GLenum; var values: LongWord);
|
|
glGetPixelMapusv: procedure(map: GLenum; var values: Word);
|
|
glBitmap: procedure(width, height: LongInt; xorig, yorig, xmove, ymove: Single; var bitmap);
|
|
glReadPixels: procedure(x, y, width, height: LongInt; format, AType: GLenum; var pixels);
|
|
glDrawPixels: procedure(width, height: LongInt; format, AType: GLenum; var pixels);
|
|
glCopyPixels: procedure(x, y, width, height: LongInt; AType: GLenum);
|
|
|
|
// Stenciling
|
|
glStencilFunc: procedure(func: GLenum; ref: LongInt; mask: LongWord);
|
|
glStencilMask: procedure(mask: LongWord);
|
|
glStencilOp: procedure(fail, zfail, zpass: GLenum);
|
|
glClearStencil: procedure(s: LongInt);
|
|
|
|
// Texture Mapping
|
|
glTexGend: procedure(cord, pname: GLenum; param: Double);
|
|
glTexGenf: procedure(cord, pname: GLenum; param: Single);
|
|
glTexGeni: procedure(cord, pname: GLenum; param: LongInt);
|
|
glTexGendv: procedure(cord, pname: GLenum; params : PDouble);
|
|
glTexGenfv: procedure(cord, pname: GLenum; params : PSingle);
|
|
glTexGeniv: procedure(cord, pname: GLenum; params : PLongInt);
|
|
glGetTexGendv: procedure(cord, pname: GLenum; params : PDouble);
|
|
glGetTexGenfv: procedure(cord, pname: GLenum; params : PSingle);
|
|
glGetTexGeniv: procedure(cord, pname: GLenum; params : PLongInt);
|
|
glTexEnvf: procedure(target, pname: GLenum; param: Single);
|
|
glTexEnvi: procedure(target, pname: GLenum; param: LongInt);
|
|
glTexEnvfv: procedure(target, pname: GLenum; params : PSingle);
|
|
glTexEnviv: procedure(target, pname: GLenum; params : PLongInt);
|
|
glGetTexEnvfv: procedure(target, pname: GLenum; params : PSingle);
|
|
glGetTexEnviv: procedure(target, pname: GLenum; params : PLongInt);
|
|
glTexParameterf: procedure(target, pname: GLenum; param: Single);
|
|
glTexParameteri: procedure(target, pname: GLenum; param: LongInt);
|
|
glTexParameterfv: procedure(target, pname: GLenum; params : PSingle);
|
|
glTexParameteriv: procedure(target, pname: GLenum; params : PLongInt);
|
|
glGetTexParameterfv: procedure(target, pname: GLenum; params : PSingle);
|
|
glGetTexParameteriv: procedure(target, pname: GLenum; params : PLongInt);
|
|
glGetTexLevelParameterfv: procedure(target: GLenum; level: LongInt; pname: GLenum; params : PSingle);
|
|
glGetTexLevelParameteriv: procedure(target: GLenum; level: LongInt; pname: GLenum; params : PLongInt);
|
|
glTexImage1D: procedure(target: GLenum; level, internalFormat, width, border: LongInt; format, AType: GLenum; var pixels);
|
|
glTexImage2D: procedure(target: GLenum; level, internalFormat, width, height, border: LongInt; format, AType: GLenum; var pixels);
|
|
glGetTexImage: procedure(target: GLenum; level: LongInt; format, AType: GLenum; var pixels);
|
|
|
|
// Evaluators
|
|
glMap1d: procedure(target: GLenum; u1, u2: Double; stride, order: LongInt; var points: Double);
|
|
glMap1f: procedure(target: GLenum; u1, u2: Single; stride, order: LongInt; var points: Single);
|
|
glMap2d: procedure(target: GLenum; u1, u2: Double; ustride, uorder: LongInt; v1, v2: Double; vstride, vorder: LongInt; var points: Double);
|
|
glMap2f: procedure(target: GLenum; u1, u2: Single; ustride, uorder: LongInt; v1, v2: Single; vstride, vorder: LongInt; var points: Single);
|
|
glGetMapdv: procedure(target, query: GLenum; var v: Double);
|
|
glGetMapfv: procedure(target, query: GLenum; var v: Single);
|
|
glGetMapiv: procedure(target, query: GLenum; var v: LongInt);
|
|
glEvalCoord1d: procedure(u: Double);
|
|
glEvalCoord1f: procedure(u: Single);
|
|
glEvalCoord1dv: procedure(var u: Double);
|
|
glEvalCoord1fv: procedure(var u: Single);
|
|
glEvalCoord2d: procedure(u, v: Double);
|
|
glEvalCoord2f: procedure(u, v: Single);
|
|
glEvalCoord2dv: procedure(var u, v: Double);
|
|
glEvalCoord2fv: procedure(var u, v: Single);
|
|
glMapGrid1d: procedure(un: LongInt; u1, u2: Double);
|
|
glMapGrid1f: procedure(un: LongInt; u1, u2: Single);
|
|
glMapGrid2d: procedure(un: LongInt; u1, u2: Double; vn: LongInt; v1, v2: Double);
|
|
glMapGrid2f: procedure(un: LongInt; u1, u2: Single; vn: LongInt; v1, v2: Single);
|
|
glEvalPoint1: procedure(i: LongInt);
|
|
glEvalPoint2: procedure(i, j: LongInt);
|
|
glEvalMesh1: procedure(mode: GLenum; i1, i2: LongInt);
|
|
glEvalMesh2: procedure(mode: GLenum; i1, i2, j1, j2: LongInt);
|
|
|
|
// Fog
|
|
glFogf: procedure(pname: GLenum; param: Single);
|
|
glFogi: procedure(pname: GLenum; param: LongInt);
|
|
glFogfv: procedure(pname: GLenum; params : PSingle);
|
|
glFogiv: procedure(pname: GLenum; params : PLongInt);
|
|
|
|
// Selection and Feedback
|
|
glFeedbackBuffer: procedure(size: LongInt; AType: GLenum; var buffer: Single);
|
|
glPassThrough: procedure(token: Single);
|
|
glSelectBuffer: procedure(size: LongInt; var buffer: LongWord);
|
|
glInitNames: procedure;
|
|
glLoadName: procedure(name: LongWord);
|
|
glPushName: procedure(name: LongWord);
|
|
glPopName: procedure;
|
|
|
|
%END
|