--- a/Android-build/Makefile.android Wed Jun 22 23:55:32 2011 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,26 +0,0 @@
-#USER DEFINED
-FPC_DIR=/home/richard/SoftDev/fpc-2.4.4
-ANDROID_NDK=/home/richard/SoftDev/android/android-ndk-r5b
-ANDROID_SDK=/home/richard/SoftDev/android/android-sdk-linux_86
-#END USER DEFINED
-
-SDL_ANDROID_DIR=./SDL-android-project
-ANDROID_API_LVL=5
-
-PPCROSSARM=$(FPC_DIR)/compiler/ppcrossarm
-PPCROSSARM_FLAGS= -Xd -O- -Tlinux -XParm-linux-androideabi- -vwnh -XS
-PPCROSSARM_INCLUDES= \
- -FD$(ANDROID_NDK)/toolchains/arm-linux-androideabi-4.4.3/prebuilt/linux-x86/bin \
- -Fu$(FPC_DIR)/rtl/units/arm-linux \
- -Fl$(ANDROID_NDK)/platforms/android-$(ANDROID_API_LVL)/arch-arm/usr/lib \
- -Fl$(SDL_ANDROID_DIR)/libs/armeabi \
- -Fl$(ANDROID_NDK)/toolchains/arm-linux-androideabi-4.4.3/prebuilt/linux-x86/lib/gcc/arm-linux/arm-linux-androideabi/4.4.3/ \
-#LINKERFLAGS= -k"--static"
-FPC_DEFINES=-dandroid -darm
-
-
-all:
- $(PPCROSSARM) $(LINKERFLAGS) $(PPCROSSARM_FLAGS) $(PPCROSSARM_INCLUDES) $(FPC_DEFINES) -oout/libhwengine.so ../hedgewars/hwLibrary.pas
-
-clean:
- rm out/*
--- a/Android-build/gles11.pp Wed Jun 22 23:55:32 2011 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,1107 +0,0 @@
-
-{$mode objfpc}
-unit gles11;
-interface
-
-{
- Automatically converted by H2Pas 1.0.0 from gl.hh
- The following command line parameters were used:
- -P
- -l
- GLESv1_CM
- -o
- gles11.pp
- -D
- gl.hh
-}
-
- procedure init;
-
- const
- External_library='GLESv1_CM'; {Setup as you need}
-
- Type
-
-// khronos_int32_t = int32_t;
-// khronos_uint32_t = uint32_t;
-// khronos_int64_t = int64_t;
-// khronos_uint64_t = uint64_t;
-
- khronos_int32_t = longint;
- khronos_uint32_t = longword;
- khronos_int64_t = Int64;
- khronos_uint64_t = QWord;
- khronos_int8_t = char;
- khronos_uint8_t = byte;
- khronos_int16_t = smallint;
- khronos_uint16_t = word;
- khronos_intptr_t = longint;
- khronos_uintptr_t = dword;
- khronos_ssize_t = longint;
- khronos_usize_t = dword;
- khronos_float_t = single;
-
- GLvoid = pointer;
- GLenum = dword;
- GLboolean = byte;
- GLbitfield = dword;
- GLshort = smallint;
- GLint = longint;
- GLsizei = longint;
- GLushort = word;
- GLuint = dword;
-
- GLbyte = khronos_int8_t;
- GLubyte = khronos_uint8_t;
- GLfloat = khronos_float_t;
- GLclampf = khronos_float_t;
- GLfixed = khronos_int32_t;
- GLclampx = khronos_int32_t;
- GLintptr = khronos_intptr_t;
- GLsizeiptr = khronos_ssize_t;
-
- PGLboolean = ^GLboolean;
- PGLfixed = ^GLfixed;
- PGLfloat = ^GLfloat;
- PGLint = ^GLint;
- PGLuint = ^GLuint;
- PGLvoid = ^GLvoid;
- PGLubyte = ^GLubyte;
-{$IFDEF FPC}
-{$PACKRECORDS C}
-{$ENDIF}
-
- const
-// GL_API = KHRONOS_APICALL;
-{$define KHRONOS_APIENTRY}
- GL_DIRECT_TEXTURE_2D_QUALCOMM = $7E80;
-
- {*********************************************************** }
- { OpenGL ES core versions }
-
- const
- GL_VERSION_ES_CM_1_0 = 1;
- GL_VERSION_ES_CL_1_0 = 1;
- GL_VERSION_ES_CM_1_1 = 1;
- GL_VERSION_ES_CL_1_1 = 1;
- { ClearBufferMask }
- GL_DEPTH_BUFFER_BIT = $00000100;
- GL_STENCIL_BUFFER_BIT = $00000400;
- GL_COLOR_BUFFER_BIT = $00004000;
- { Boolean }
- GL_FALSE = 0;
- GL_TRUE = 1;
- { BeginMode }
- GL_POINTS = $0000;
- GL_LINES = $0001;
- GL_LINE_LOOP = $0002;
- GL_LINE_STRIP = $0003;
- GL_TRIANGLES = $0004;
- GL_TRIANGLE_STRIP = $0005;
- GL_TRIANGLE_FAN = $0006;
- { AlphaFunction }
- GL_NEVER = $0200;
- GL_LESS = $0201;
- GL_EQUAL = $0202;
- GL_LEQUAL = $0203;
- GL_GREATER = $0204;
- GL_NOTEQUAL = $0205;
- GL_GEQUAL = $0206;
- GL_ALWAYS = $0207;
- { BlendingFactorDest }
- GL_ZERO = 0;
- GL_ONE = 1;
- GL_SRC_COLOR = $0300;
- GL_ONE_MINUS_SRC_COLOR = $0301;
- GL_SRC_ALPHA = $0302;
- GL_ONE_MINUS_SRC_ALPHA = $0303;
- GL_DST_ALPHA = $0304;
- GL_ONE_MINUS_DST_ALPHA = $0305;
- { BlendingFactorSrc }
- { GL_ZERO }
- { GL_ONE }
- GL_DST_COLOR = $0306;
- GL_ONE_MINUS_DST_COLOR = $0307;
- GL_SRC_ALPHA_SATURATE = $0308;
- { GL_SRC_ALPHA }
- { GL_ONE_MINUS_SRC_ALPHA }
- { GL_DST_ALPHA }
- { GL_ONE_MINUS_DST_ALPHA }
- { ClipPlaneName }
- GL_CLIP_PLANE0 = $3000;
- GL_CLIP_PLANE1 = $3001;
- GL_CLIP_PLANE2 = $3002;
- GL_CLIP_PLANE3 = $3003;
- GL_CLIP_PLANE4 = $3004;
- GL_CLIP_PLANE5 = $3005;
- { ColorMaterialFace }
- { GL_FRONT_AND_BACK }
- { ColorMaterialParameter }
- { GL_AMBIENT_AND_DIFFUSE }
- { ColorPointerType }
- { GL_UNSIGNED_BYTE }
- { GL_FLOAT }
- { GL_FIXED }
- { CullFaceMode }
- GL_FRONT = $0404;
- GL_BACK = $0405;
- GL_FRONT_AND_BACK = $0408;
- { DepthFunction }
- { GL_NEVER }
- { GL_LESS }
- { GL_EQUAL }
- { GL_LEQUAL }
- { GL_GREATER }
- { GL_NOTEQUAL }
- { GL_GEQUAL }
- { GL_ALWAYS }
- { EnableCap }
- GL_FOG = $0B60;
- GL_LIGHTING = $0B50;
- GL_TEXTURE_2D = $0DE1;
- GL_CULL_FACE = $0B44;
- GL_ALPHA_TEST = $0BC0;
- GL_BLEND = $0BE2;
- GL_COLOR_LOGIC_OP = $0BF2;
- GL_DITHER = $0BD0;
- GL_STENCIL_TEST = $0B90;
- GL_DEPTH_TEST = $0B71;
- { GL_LIGHT0 }
- { GL_LIGHT1 }
- { GL_LIGHT2 }
- { GL_LIGHT3 }
- { GL_LIGHT4 }
- { GL_LIGHT5 }
- { GL_LIGHT6 }
- { GL_LIGHT7 }
- GL_POINT_SMOOTH = $0B10;
- GL_LINE_SMOOTH = $0B20;
- GL_SCISSOR_TEST = $0C11;
- GL_COLOR_MATERIAL = $0B57;
- GL_NORMALIZE = $0BA1;
- GL_RESCALE_NORMAL = $803A;
- GL_POLYGON_OFFSET_FILL = $8037;
- GL_VERTEX_ARRAY = $8074;
- GL_NORMAL_ARRAY = $8075;
- GL_COLOR_ARRAY = $8076;
- GL_TEXTURE_COORD_ARRAY = $8078;
- GL_MULTISAMPLE = $809D;
- GL_SAMPLE_ALPHA_TO_COVERAGE = $809E;
- GL_SAMPLE_ALPHA_TO_ONE = $809F;
- GL_SAMPLE_COVERAGE = $80A0;
- { ErrorCode }
- GL_NO_ERROR = 0;
- GL_INVALID_ENUM = $0500;
- GL_INVALID_VALUE = $0501;
- GL_INVALID_OPERATION = $0502;
- GL_STACK_OVERFLOW = $0503;
- GL_STACK_UNDERFLOW = $0504;
- GL_OUT_OF_MEMORY = $0505;
- { FogMode }
- { GL_LINEAR }
- GL_EXP = $0800;
- GL_EXP2 = $0801;
- { FogParameter }
- GL_FOG_DENSITY = $0B62;
- GL_FOG_START = $0B63;
- GL_FOG_END = $0B64;
- GL_FOG_MODE = $0B65;
- GL_FOG_COLOR = $0B66;
- { FrontFaceDirection }
- GL_CW = $0900;
- GL_CCW = $0901;
- { GetPName }
- GL_CURRENT_COLOR = $0B00;
- GL_CURRENT_NORMAL = $0B02;
- GL_CURRENT_TEXTURE_COORDS = $0B03;
- GL_POINT_SIZE = $0B11;
- GL_POINT_SIZE_MIN = $8126;
- GL_POINT_SIZE_MAX = $8127;
- GL_POINT_FADE_THRESHOLD_SIZE = $8128;
- GL_POINT_DISTANCE_ATTENUATION = $8129;
- GL_SMOOTH_POINT_SIZE_RANGE = $0B12;
- GL_LINE_WIDTH = $0B21;
- GL_SMOOTH_LINE_WIDTH_RANGE = $0B22;
- GL_ALIASED_POINT_SIZE_RANGE = $846D;
- GL_ALIASED_LINE_WIDTH_RANGE = $846E;
- GL_CULL_FACE_MODE = $0B45;
- GL_FRONT_FACE = $0B46;
- GL_SHADE_MODEL = $0B54;
- GL_DEPTH_RANGE = $0B70;
- GL_DEPTH_WRITEMASK = $0B72;
- GL_DEPTH_CLEAR_VALUE = $0B73;
- GL_DEPTH_FUNC = $0B74;
- GL_STENCIL_CLEAR_VALUE = $0B91;
- GL_STENCIL_FUNC = $0B92;
- GL_STENCIL_VALUE_MASK = $0B93;
- GL_STENCIL_FAIL = $0B94;
- GL_STENCIL_PASS_DEPTH_FAIL = $0B95;
- GL_STENCIL_PASS_DEPTH_PASS = $0B96;
- GL_STENCIL_REF = $0B97;
- GL_STENCIL_WRITEMASK = $0B98;
- GL_MATRIX_MODE = $0BA0;
- GL_VIEWPORT = $0BA2;
- GL_MODELVIEW_STACK_DEPTH = $0BA3;
- GL_PROJECTION_STACK_DEPTH = $0BA4;
- GL_TEXTURE_STACK_DEPTH = $0BA5;
- GL_MODELVIEW_MATRIX = $0BA6;
- GL_PROJECTION_MATRIX = $0BA7;
- GL_TEXTURE_MATRIX = $0BA8;
- GL_ALPHA_TEST_FUNC = $0BC1;
- GL_ALPHA_TEST_REF = $0BC2;
- GL_BLEND_DST = $0BE0;
- GL_BLEND_SRC = $0BE1;
- GL_LOGIC_OP_MODE = $0BF0;
- GL_SCISSOR_BOX = $0C10;
-// GL_SCISSOR_TEST = $0C11;
- GL_COLOR_CLEAR_VALUE = $0C22;
- GL_COLOR_WRITEMASK = $0C23;
- GL_UNPACK_ALIGNMENT = $0CF5;
- GL_PACK_ALIGNMENT = $0D05;
- GL_MAX_LIGHTS = $0D31;
- GL_MAX_CLIP_PLANES = $0D32;
- GL_MAX_TEXTURE_SIZE = $0D33;
- GL_MAX_MODELVIEW_STACK_DEPTH = $0D36;
- GL_MAX_PROJECTION_STACK_DEPTH = $0D38;
- GL_MAX_TEXTURE_STACK_DEPTH = $0D39;
- GL_MAX_VIEWPORT_DIMS = $0D3A;
- GL_MAX_TEXTURE_UNITS = $84E2;
- GL_SUBPIXEL_BITS = $0D50;
- GL_RED_BITS = $0D52;
- GL_GREEN_BITS = $0D53;
- GL_BLUE_BITS = $0D54;
- GL_ALPHA_BITS = $0D55;
- GL_DEPTH_BITS = $0D56;
- GL_STENCIL_BITS = $0D57;
- GL_POLYGON_OFFSET_UNITS = $2A00;
-// GL_POLYGON_OFFSET_FILL = $8037;
- GL_POLYGON_OFFSET_FACTOR = $8038;
- GL_TEXTURE_BINDING_2D = $8069;
- 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_TEXTURE_COORD_ARRAY_SIZE = $8088;
- GL_TEXTURE_COORD_ARRAY_TYPE = $8089;
- GL_TEXTURE_COORD_ARRAY_STRIDE = $808A;
- GL_VERTEX_ARRAY_POINTER = $808E;
- GL_NORMAL_ARRAY_POINTER = $808F;
- GL_COLOR_ARRAY_POINTER = $8090;
- GL_TEXTURE_COORD_ARRAY_POINTER = $8092;
- GL_SAMPLE_BUFFERS = $80A8;
- GL_SAMPLES = $80A9;
- GL_SAMPLE_COVERAGE_VALUE = $80AA;
- GL_SAMPLE_COVERAGE_INVERT = $80AB;
- { GetTextureParameter }
- { GL_TEXTURE_MAG_FILTER }
- { GL_TEXTURE_MIN_FILTER }
- { GL_TEXTURE_WRAP_S }
- { GL_TEXTURE_WRAP_T }
- GL_NUM_COMPRESSED_TEXTURE_FORMATS = $86A2;
- GL_COMPRESSED_TEXTURE_FORMATS = $86A3;
- { HintMode }
- GL_DONT_CARE = $1100;
- GL_FASTEST = $1101;
- GL_NICEST = $1102;
- { HintTarget }
- GL_PERSPECTIVE_CORRECTION_HINT = $0C50;
- GL_POINT_SMOOTH_HINT = $0C51;
- GL_LINE_SMOOTH_HINT = $0C52;
- GL_FOG_HINT = $0C54;
- GL_GENERATE_MIPMAP_HINT = $8192;
- { LightModelParameter }
- GL_LIGHT_MODEL_AMBIENT = $0B53;
- GL_LIGHT_MODEL_TWO_SIDE = $0B52;
- { LightParameter }
- GL_AMBIENT = $1200;
- GL_DIFFUSE = $1201;
- GL_SPECULAR = $1202;
- GL_POSITION = $1203;
- GL_SPOT_DIRECTION = $1204;
- GL_SPOT_EXPONENT = $1205;
- GL_SPOT_CUTOFF = $1206;
- GL_CONSTANT_ATTENUATION = $1207;
- GL_LINEAR_ATTENUATION = $1208;
- GL_QUADRATIC_ATTENUATION = $1209;
- { DataType }
- GL_BYTE = $1400;
- GL_UNSIGNED_BYTE = $1401;
- GL_SHORT = $1402;
- GL_UNSIGNED_SHORT = $1403;
- GL_FLOAT = $1406;
- GL_FIXED = $140C;
- { LogicOp }
- GL_CLEAR = $1500;
- GL_AND = $1501;
- GL_AND_REVERSE = $1502;
- GL_COPY = $1503;
- GL_AND_INVERTED = $1504;
- GL_NOOP = $1505;
- GL_XOR = $1506;
- GL_OR = $1507;
- GL_NOR = $1508;
- GL_EQUIV = $1509;
- GL_INVERT = $150A;
- GL_OR_REVERSE = $150B;
- GL_COPY_INVERTED = $150C;
- GL_OR_INVERTED = $150D;
- GL_NAND = $150E;
- GL_SET = $150F;
- { MaterialFace }
- { GL_FRONT_AND_BACK }
- { MaterialParameter }
- GL_EMISSION = $1600;
- GL_SHININESS = $1601;
- GL_AMBIENT_AND_DIFFUSE = $1602;
- { GL_AMBIENT }
- { GL_DIFFUSE }
- { GL_SPECULAR }
- { MatrixMode }
- GL_MODELVIEW = $1700;
- GL_PROJECTION = $1701;
- GL_TEXTURE = $1702;
- { NormalPointerType }
- { GL_BYTE }
- { GL_SHORT }
- { GL_FLOAT }
- { GL_FIXED }
- { PixelFormat }
- GL_ALPHA = $1906;
- GL_RGB = $1907;
- GL_RGBA = $1908;
- GL_LUMINANCE = $1909;
- GL_LUMINANCE_ALPHA = $190A;
- { PixelStoreParameter }
-// GL_UNPACK_ALIGNMENT = $0CF5;
-// GL_PACK_ALIGNMENT = $0D05;
- { PixelType }
- { GL_UNSIGNED_BYTE }
- GL_UNSIGNED_SHORT_4_4_4_4 = $8033;
- GL_UNSIGNED_SHORT_5_5_5_1 = $8034;
- GL_UNSIGNED_SHORT_5_6_5 = $8363;
- { ShadingModel }
- GL_FLAT = $1D00;
- GL_SMOOTH = $1D01;
- { StencilFunction }
- { GL_NEVER }
- { GL_LESS }
- { GL_EQUAL }
- { GL_LEQUAL }
- { GL_GREATER }
- { GL_NOTEQUAL }
- { GL_GEQUAL }
- { GL_ALWAYS }
- { StencilOp }
- { GL_ZERO }
- GL_KEEP = $1E00;
- GL_REPLACE = $1E01;
- GL_INCR = $1E02;
- GL_DECR = $1E03;
- { GL_INVERT }
- { StringName }
- GL_VENDOR = $1F00;
- GL_RENDERER = $1F01;
- GL_VERSION = $1F02;
- GL_EXTENSIONS = $1F03;
- { TexCoordPointerType }
- { GL_SHORT }
- { GL_FLOAT }
- { GL_FIXED }
- { GL_BYTE }
- { TextureEnvMode }
- GL_MODULATE = $2100;
- GL_DECAL = $2101;
- { GL_BLEND }
- GL_ADD = $0104;
- { GL_REPLACE }
- { TextureEnvParameter }
- GL_TEXTURE_ENV_MODE = $2200;
- GL_TEXTURE_ENV_COLOR = $2201;
- { TextureEnvTarget }
- GL_TEXTURE_ENV = $2300;
- { TextureMagFilter }
- GL_NEAREST = $2600;
- GL_LINEAR = $2601;
- { TextureMinFilter }
- { GL_NEAREST }
- { GL_LINEAR }
- GL_NEAREST_MIPMAP_NEAREST = $2700;
- GL_LINEAR_MIPMAP_NEAREST = $2701;
- GL_NEAREST_MIPMAP_LINEAR = $2702;
- GL_LINEAR_MIPMAP_LINEAR = $2703;
- { TextureParameterName }
- GL_TEXTURE_MAG_FILTER = $2800;
- GL_TEXTURE_MIN_FILTER = $2801;
- GL_TEXTURE_WRAP_S = $2802;
- GL_TEXTURE_WRAP_T = $2803;
- GL_GENERATE_MIPMAP = $8191;
- { TextureTarget }
- { GL_TEXTURE_2D }
- { TextureUnit }
- GL_TEXTURE0 = $84C0;
- GL_TEXTURE1 = $84C1;
- GL_TEXTURE2 = $84C2;
- GL_TEXTURE3 = $84C3;
- GL_TEXTURE4 = $84C4;
- GL_TEXTURE5 = $84C5;
- GL_TEXTURE6 = $84C6;
- GL_TEXTURE7 = $84C7;
- GL_TEXTURE8 = $84C8;
- GL_TEXTURE9 = $84C9;
- GL_TEXTURE10 = $84CA;
- GL_TEXTURE11 = $84CB;
- GL_TEXTURE12 = $84CC;
- GL_TEXTURE13 = $84CD;
- GL_TEXTURE14 = $84CE;
- GL_TEXTURE15 = $84CF;
- GL_TEXTURE16 = $84D0;
- GL_TEXTURE17 = $84D1;
- GL_TEXTURE18 = $84D2;
- GL_TEXTURE19 = $84D3;
- GL_TEXTURE20 = $84D4;
- GL_TEXTURE21 = $84D5;
- GL_TEXTURE22 = $84D6;
- GL_TEXTURE23 = $84D7;
- GL_TEXTURE24 = $84D8;
- GL_TEXTURE25 = $84D9;
- GL_TEXTURE26 = $84DA;
- GL_TEXTURE27 = $84DB;
- GL_TEXTURE28 = $84DC;
- GL_TEXTURE29 = $84DD;
- GL_TEXTURE30 = $84DE;
- GL_TEXTURE31 = $84DF;
- GL_ACTIVE_TEXTURE = $84E0;
- GL_CLIENT_ACTIVE_TEXTURE = $84E1;
- { TextureWrapMode }
- GL_REPEAT = $2901;
- GL_CLAMP_TO_EDGE = $812F;
- { VertexPointerType }
- { GL_SHORT }
- { GL_FLOAT }
- { GL_FIXED }
- { GL_BYTE }
- { LightName }
- GL_LIGHT0 = $4000;
- GL_LIGHT1 = $4001;
- GL_LIGHT2 = $4002;
- GL_LIGHT3 = $4003;
- GL_LIGHT4 = $4004;
- GL_LIGHT5 = $4005;
- GL_LIGHT6 = $4006;
- GL_LIGHT7 = $4007;
- { Buffer Objects }
- GL_ARRAY_BUFFER = $8892;
- GL_ELEMENT_ARRAY_BUFFER = $8893;
- GL_ARRAY_BUFFER_BINDING = $8894;
- GL_ELEMENT_ARRAY_BUFFER_BINDING = $8895;
- GL_VERTEX_ARRAY_BUFFER_BINDING = $8896;
- GL_NORMAL_ARRAY_BUFFER_BINDING = $8897;
- GL_COLOR_ARRAY_BUFFER_BINDING = $8898;
- GL_TEXTURE_COORD_ARRAY_BUFFER_BINDING = $889A;
- GL_STATIC_DRAW = $88E4;
- GL_DYNAMIC_DRAW = $88E8;
- GL_BUFFER_SIZE = $8764;
- GL_BUFFER_USAGE = $8765;
- { Texture combine + dot3 }
- GL_SUBTRACT = $84E7;
- GL_COMBINE = $8570;
- GL_COMBINE_RGB = $8571;
- GL_COMBINE_ALPHA = $8572;
- GL_RGB_SCALE = $8573;
- GL_ADD_SIGNED = $8574;
- GL_INTERPOLATE = $8575;
- GL_CONSTANT = $8576;
- GL_PRIMARY_COLOR = $8577;
- GL_PREVIOUS = $8578;
- GL_OPERAND0_RGB = $8590;
- GL_OPERAND1_RGB = $8591;
- GL_OPERAND2_RGB = $8592;
- GL_OPERAND0_ALPHA = $8598;
- GL_OPERAND1_ALPHA = $8599;
- GL_OPERAND2_ALPHA = $859A;
- GL_ALPHA_SCALE = $0D1C;
- GL_SRC0_RGB = $8580;
- GL_SRC1_RGB = $8581;
- GL_SRC2_RGB = $8582;
- GL_SRC0_ALPHA = $8588;
- GL_SRC1_ALPHA = $8589;
- GL_SRC2_ALPHA = $858A;
- GL_DOT3_RGB = $86AE;
- GL_DOT3_RGBA = $86AF;
- {------------------------------------------------------------------------*
- * required OES extension tokens
- *------------------------------------------------------------------------ }
- { OES_read_format }
- GL_IMPLEMENTATION_COLOR_READ_TYPE_OES = $8B9A;
- GL_IMPLEMENTATION_COLOR_READ_FORMAT_OES = $8B9B;
- { GL_OES_compressed_paletted_texture }
- GL_PALETTE4_RGB8_OES = $8B90;
- GL_PALETTE4_RGBA8_OES = $8B91;
- GL_PALETTE4_R5_G6_B5_OES = $8B92;
- GL_PALETTE4_RGBA4_OES = $8B93;
- GL_PALETTE4_RGB5_A1_OES = $8B94;
- GL_PALETTE8_RGB8_OES = $8B95;
- GL_PALETTE8_RGBA8_OES = $8B96;
- GL_PALETTE8_R5_G6_B5_OES = $8B97;
- GL_PALETTE8_RGBA4_OES = $8B98;
- GL_PALETTE8_RGB5_A1_OES = $8B99;
- { OES_point_size_array }
- GL_POINT_SIZE_ARRAY_OES = $8B9C;
- GL_POINT_SIZE_ARRAY_TYPE_OES = $898A;
- GL_POINT_SIZE_ARRAY_STRIDE_OES = $898B;
- GL_POINT_SIZE_ARRAY_POINTER_OES = $898C;
- GL_POINT_SIZE_ARRAY_BUFFER_BINDING_OES = $8B9F;
- { GL_OES_point_sprite }
- GL_POINT_SPRITE_OES = $8861;
- GL_COORD_REPLACE_OES = $8862;
- {*********************************************************** }
- { Available only in Common profile }
-
- var
- glAlphaFunc : procedure(func:GLenum; ref:GLclampf);cdecl;
- glClearColor : procedure(red:GLclampf; green:GLclampf; blue:GLclampf; alpha:GLclampf);cdecl;
- glClearDepthf : procedure(depth:GLclampf);cdecl;
-(* Const before type ignored *)
- glClipPlanef : procedure(plane:GLenum; equation:pGLfloat);cdecl;
- glColor4f : procedure(red:GLfloat; green:GLfloat; blue:GLfloat; alpha:GLfloat);cdecl;
- glDepthRangef : procedure(zNear:GLclampf; zFar:GLclampf);cdecl;
- glFogf : procedure(pname:GLenum; param:GLfloat);cdecl;
-(* Const before type ignored *)
- glFogfv : procedure(pname:GLenum; params:pGLfloat);cdecl;
- glFrustumf : procedure(left:GLfloat; right:GLfloat; bottom:GLfloat; top:GLfloat; zNear:GLfloat;
- zFar:GLfloat);cdecl;
- glGetClipPlanef : procedure(pname:GLenum; eqn:array of GLfloat);cdecl;
- glGetFloatv : procedure(pname:GLenum; params:pGLfloat);cdecl;
- glGetLightfv : procedure(light:GLenum; pname:GLenum; params:pGLfloat);cdecl;
- glGetMaterialfv : procedure(face:GLenum; pname:GLenum; params:pGLfloat);cdecl;
- glGetTexEnvfv : procedure(env:GLenum; pname:GLenum; params:pGLfloat);cdecl;
- glGetTexParameterfv : procedure(target:GLenum; pname:GLenum; params:pGLfloat);cdecl;
- glLightModelf : procedure(pname:GLenum; param:GLfloat);cdecl;
-(* Const before type ignored *)
- glLightModelfv : procedure(pname:GLenum; params:pGLfloat);cdecl;
- glLightf : procedure(light:GLenum; pname:GLenum; param:GLfloat);cdecl;
-(* Const before type ignored *)
- glLightfv : procedure(light:GLenum; pname:GLenum; params:pGLfloat);cdecl;
- glLineWidth : procedure(width:GLfloat);cdecl;
-(* Const before type ignored *)
- glLoadMatrixf : procedure(m:pGLfloat);cdecl;
- glMaterialf : procedure(face:GLenum; pname:GLenum; param:GLfloat);cdecl;
-(* Const before type ignored *)
- glMaterialfv : procedure(face:GLenum; pname:GLenum; params:pGLfloat);cdecl;
-(* Const before type ignored *)
- glMultMatrixf : procedure(m:pGLfloat);cdecl;
- glMultiTexCoord4f : procedure(target:GLenum; s:GLfloat; t:GLfloat; r:GLfloat; q:GLfloat);cdecl;
- glNormal3f : procedure(nx:GLfloat; ny:GLfloat; nz:GLfloat);cdecl;
- glOrthof : procedure(left:GLfloat; right:GLfloat; bottom:GLfloat; top:GLfloat; zNear:GLfloat;
- zFar:GLfloat);cdecl;
- glPointParameterf : procedure(pname:GLenum; param:GLfloat);cdecl;
-(* Const before type ignored *)
- glPointParameterfv : procedure(pname:GLenum; params:pGLfloat);cdecl;
- glPointSize : procedure(size:GLfloat);cdecl;
- glPolygonOffset : procedure(factor:GLfloat; units:GLfloat);cdecl;
- glRotatef : procedure(angle:GLfloat; x:GLfloat; y:GLfloat; z:GLfloat);cdecl;
- glScalef : procedure(x:GLfloat; y:GLfloat; z:GLfloat);cdecl;
- glTexEnvf : procedure(target:GLenum; pname:GLenum; param:GLfloat);cdecl;
-(* Const before type ignored *)
- glTexEnvfv : procedure(target:GLenum; pname:GLenum; params:pGLfloat);cdecl;
- glTexParameterf : procedure(target:GLenum; pname:GLenum; param:GLfloat);cdecl;
-(* Const before type ignored *)
- glTexParameterfv : procedure(target:GLenum; pname:GLenum; params:pGLfloat);cdecl;
- glTranslatef : procedure(x:GLfloat; y:GLfloat; z:GLfloat);cdecl;
- { Available in both Common and Common-Lite profiles }
- glActiveTexture : procedure(texture:GLenum);cdecl;
- glAlphaFuncx : procedure(func:GLenum; ref:GLclampx);cdecl;
- glBindBuffer : procedure(target:GLenum; buffer:GLuint);cdecl;
- glBindTexture : procedure(target:GLenum; texture:GLuint);cdecl;
- glBlendFunc : procedure(sfactor:GLenum; dfactor:GLenum);cdecl;
-(* Const before type ignored *)
- glBufferData : procedure(target:GLenum; size:GLsizeiptr; data:pGLvoid; usage:GLenum);cdecl;
-(* Const before type ignored *)
- glBufferSubData : procedure(target:GLenum; offset:GLintptr; size:GLsizeiptr; data:pGLvoid);cdecl;
- glClear : procedure(mask:GLbitfield);cdecl;
- glClearColorx : procedure(red:GLclampx; green:GLclampx; blue:GLclampx; alpha:GLclampx);cdecl;
- glClearDepthx : procedure(depth:GLclampx);cdecl;
- glClearStencil : procedure(s:GLint);cdecl;
- glClientActiveTexture : procedure(texture:GLenum);cdecl;
-(* Const before type ignored *)
- glClipPlanex : procedure(plane:GLenum; equation:pGLfixed);cdecl;
- glColor4ub : procedure(red:GLubyte; green:GLubyte; blue:GLubyte; alpha:GLubyte);cdecl;
- glColor4x : procedure(red:GLfixed; green:GLfixed; blue:GLfixed; alpha:GLfixed);cdecl;
- glColorMask : procedure(red:GLboolean; green:GLboolean; blue:GLboolean; alpha:GLboolean);cdecl;
-(* Const before type ignored *)
- glColorPointer : procedure(size:GLint; _type:GLenum; stride:GLsizei; pointer:pGLvoid);cdecl;
-(* Const before type ignored *)
- glCompressedTexImage2D : procedure(target:GLenum; level:GLint; internalformat:GLenum; width:GLsizei; height:GLsizei;
- border:GLint; imageSize:GLsizei; data:pGLvoid);cdecl;
-(* Const before type ignored *)
- glCompressedTexSubImage2D : procedure(target:GLenum; level:GLint; xoffset:GLint; yoffset:GLint; width:GLsizei;
- height:GLsizei; format:GLenum; imageSize:GLsizei; data:pGLvoid);cdecl;
- glCopyTexImage2D : procedure(target:GLenum; level:GLint; internalformat:GLenum; x:GLint; y:GLint;
- width:GLsizei; height:GLsizei; border:GLint);cdecl;
- glCopyTexSubImage2D : procedure(target:GLenum; level:GLint; xoffset:GLint; yoffset:GLint; x:GLint;
- y:GLint; width:GLsizei; height:GLsizei);cdecl;
- glCullFace : procedure(mode:GLenum);cdecl;
-(* Const before type ignored *)
- glDeleteBuffers : procedure(n:GLsizei; buffers:pGLuint);cdecl;
-(* Const before type ignored *)
- glDeleteTextures : procedure(n:GLsizei; textures:pGLuint);cdecl;
- glDepthFunc : procedure(func:GLenum);cdecl;
- glDepthMask : procedure(flag:GLboolean);cdecl;
- glDepthRangex : procedure(zNear:GLclampx; zFar:GLclampx);cdecl;
- glDisable : procedure(cap:GLenum);cdecl;
- glDisableClientState : procedure(arry:GLenum);cdecl;
- glDrawArrays : procedure(mode:GLenum; first:GLint; count:GLsizei);cdecl;
-(* Const before type ignored *)
- glDrawElements : procedure(mode:GLenum; count:GLsizei; _type:GLenum; indices:pGLvoid);cdecl;
- glEnable : procedure(cap:GLenum);cdecl;
- glEnableClientState : procedure(arry:GLenum);cdecl;
- glFinish : procedure;cdecl;
- glFlush : procedure;cdecl;
- glFogx : procedure(pname:GLenum; param:GLfixed);cdecl;
-(* Const before type ignored *)
- glFogxv : procedure(pname:GLenum; params:pGLfixed);cdecl;
- glFrontFace : procedure(mode:GLenum);cdecl;
- glFrustumx : procedure(left:GLfixed; right:GLfixed; bottom:GLfixed; top:GLfixed; zNear:GLfixed;
- zFar:GLfixed);cdecl;
- glGetBooleanv : procedure(pname:GLenum; params:pGLboolean);cdecl;
- glGetBufferParameteriv : procedure(target:GLenum; pname:GLenum; params:pGLint);cdecl;
- glGetClipPlanex : procedure(pname:GLenum; eqn:array of GLfixed);cdecl;
- glGenBuffers : procedure(n:GLsizei; buffers:pGLuint);cdecl;
- glGenTextures : procedure(n:GLsizei; textures:pGLuint);cdecl;
- glGetError : function:GLenum;cdecl;
- glGetFixedv : procedure(pname:GLenum; params:pGLfixed);cdecl;
- glGetIntegerv : procedure(pname:GLenum; params:pGLint);cdecl;
- glGetLightxv : procedure(light:GLenum; pname:GLenum; params:pGLfixed);cdecl;
- glGetMaterialxv : procedure(face:GLenum; pname:GLenum; params:pGLfixed);cdecl;
- glGetPointerv : procedure(pname:GLenum; params:Ppointer);cdecl;
-(* Const before type ignored *)
- glGetString : function(name:GLenum):PGLubyte;cdecl;
- glGetTexEnviv : procedure(env:GLenum; pname:GLenum; params:pGLint);cdecl;
- glGetTexEnvxv : procedure(env:GLenum; pname:GLenum; params:pGLfixed);cdecl;
- glGetTexParameteriv : procedure(target:GLenum; pname:GLenum; params:pGLint);cdecl;
- glGetTexParameterxv : procedure(target:GLenum; pname:GLenum; params:pGLfixed);cdecl;
- glHint : procedure(target:GLenum; mode:GLenum);cdecl;
- glIsBuffer : function(buffer:GLuint):GLboolean;cdecl;
- glIsEnabled : function(cap:GLenum):GLboolean;cdecl;
- glIsTexture : function(texture:GLuint):GLboolean;cdecl;
- glLightModelx : procedure(pname:GLenum; param:GLfixed);cdecl;
-(* Const before type ignored *)
- glLightModelxv : procedure(pname:GLenum; params:pGLfixed);cdecl;
- glLightx : procedure(light:GLenum; pname:GLenum; param:GLfixed);cdecl;
-(* Const before type ignored *)
- glLightxv : procedure(light:GLenum; pname:GLenum; params:pGLfixed);cdecl;
- glLineWidthx : procedure(width:GLfixed);cdecl;
- glLoadIdentity : procedure;cdecl;
-(* Const before type ignored *)
- glLoadMatrixx : procedure(m:pGLfixed);cdecl;
- glLogicOp : procedure(opcode:GLenum);cdecl;
- glMaterialx : procedure(face:GLenum; pname:GLenum; param:GLfixed);cdecl;
-(* Const before type ignored *)
- glMaterialxv : procedure(face:GLenum; pname:GLenum; params:pGLfixed);cdecl;
- glMatrixMode : procedure(mode:GLenum);cdecl;
-(* Const before type ignored *)
- glMultMatrixx : procedure(m:pGLfixed);cdecl;
- glMultiTexCoord4x : procedure(target:GLenum; s:GLfixed; t:GLfixed; r:GLfixed; q:GLfixed);cdecl;
- glNormal3x : procedure(nx:GLfixed; ny:GLfixed; nz:GLfixed);cdecl;
-(* Const before type ignored *)
- glNormalPointer : procedure(_type:GLenum; stride:GLsizei; pointer:pGLvoid);cdecl;
- glOrthox : procedure(left:GLfixed; right:GLfixed; bottom:GLfixed; top:GLfixed; zNear:GLfixed;
- zFar:GLfixed);cdecl;
- glPixelStorei : procedure(pname:GLenum; param:GLint);cdecl;
- glPointParameterx : procedure(pname:GLenum; param:GLfixed);cdecl;
-(* Const before type ignored *)
- glPointParameterxv : procedure(pname:GLenum; params:pGLfixed);cdecl;
- glPointSizex : procedure(size:GLfixed);cdecl;
- glPolygonOffsetx : procedure(factor:GLfixed; units:GLfixed);cdecl;
- glPopMatrix : procedure;cdecl;
- glPushMatrix : procedure;cdecl;
- glReadPixels : procedure(x:GLint; y:GLint; width:GLsizei; height:GLsizei; format:GLenum;
- _type:GLenum; pixels:pGLvoid);cdecl;
- glRotatex : procedure(angle:GLfixed; x:GLfixed; y:GLfixed; z:GLfixed);cdecl;
- glSampleCoverage : procedure(value:GLclampf; invert:GLboolean);cdecl;
- glSampleCoveragex : procedure(value:GLclampx; invert:GLboolean);cdecl;
- glScalex : procedure(x:GLfixed; y:GLfixed; z:GLfixed);cdecl;
- glScissor : procedure(x:GLint; y:GLint; width:GLsizei; height:GLsizei);cdecl;
- glShadeModel : procedure(mode:GLenum);cdecl;
- glStencilFunc : procedure(func:GLenum; ref:GLint; mask:GLuint);cdecl;
- glStencilMask : procedure(mask:GLuint);cdecl;
- glStencilOp : procedure(fail:GLenum; zfail:GLenum; zpass:GLenum);cdecl;
-(* Const before type ignored *)
- glTexCoordPointer : procedure(size:GLint; _type:GLenum; stride:GLsizei; pointer:pGLvoid);cdecl;
- glTexEnvi : procedure(target:GLenum; pname:GLenum; param:GLint);cdecl;
- glTexEnvx : procedure(target:GLenum; pname:GLenum; param:GLfixed);cdecl;
-(* Const before type ignored *)
- glTexEnviv : procedure(target:GLenum; pname:GLenum; params:pGLint);cdecl;
-(* Const before type ignored *)
- glTexEnvxv : procedure(target:GLenum; pname:GLenum; params:pGLfixed);cdecl;
-(* Const before type ignored *)
- glTexImage2D : procedure(target:GLenum; level:GLint; internalformat:GLint; width:GLsizei; height:GLsizei;
- border:GLint; format:GLenum; _type:GLenum; pixels:pGLvoid);cdecl;
- glTexParameteri : procedure(target:GLenum; pname:GLenum; param:GLint);cdecl;
- glTexParameterx : procedure(target:GLenum; pname:GLenum; param:GLfixed);cdecl;
-(* Const before type ignored *)
- glTexParameteriv : procedure(target:GLenum; pname:GLenum; params:pGLint);cdecl;
-(* Const before type ignored *)
- glTexParameterxv : procedure(target:GLenum; pname:GLenum; params:pGLfixed);cdecl;
-(* Const before type ignored *)
- glTexSubImage2D : procedure(target:GLenum; level:GLint; xoffset:GLint; yoffset:GLint; width:GLsizei;
- height:GLsizei; format:GLenum; _type:GLenum; pixels:pGLvoid);cdecl;
- glTranslatex : procedure(x:GLfixed; y:GLfixed; z:GLfixed);cdecl;
-(* Const before type ignored *)
- glVertexPointer : procedure(size:GLint; _type:GLenum; stride:GLsizei; pointer:pGLvoid);cdecl;
- glViewport : procedure(x:GLint; y:GLint; width:GLsizei; height:GLsizei);cdecl;
- {------------------------------------------------------------------------*
- * Required OES extension functions
- *------------------------------------------------------------------------ }
- { GL_OES_read_format }
-
- const
- GL_OES_read_format = 1;
- { GL_OES_compressed_paletted_texture }
- GL_OES_compressed_paletted_texture = 1;
- { GL_OES_point_size_array }
- GL_OES_point_size_array = 1;
-(* Const before type ignored *)
-
- var
- glPointSizePointerOES : procedure(_type:GLenum; stride:GLsizei; pointer:pGLvoid);cdecl;
- { GL_OES_point_sprite }
-
- const
- GL_OES_point_sprite = 1;
-
-implementation
-
- uses
- SysUtils, dynlibs, uConsole;
-
- var
- hlib : tlibhandle;
-
-
- procedure Freegles11;
- begin
-// FreeLibrary(hlib);
- glAlphaFunc:=nil;
- glClearColor:=nil;
- glClearDepthf:=nil;
- glClipPlanef:=nil;
- glColor4f:=nil;
- glDepthRangef:=nil;
- glFogf:=nil;
- glFogfv:=nil;
- glFrustumf:=nil;
- glGetClipPlanef:=nil;
- glGetFloatv:=nil;
- glGetLightfv:=nil;
- glGetMaterialfv:=nil;
- glGetTexEnvfv:=nil;
- glGetTexParameterfv:=nil;
- glLightModelf:=nil;
- glLightModelfv:=nil;
- glLightf:=nil;
- glLightfv:=nil;
- glLineWidth:=nil;
- glLoadMatrixf:=nil;
- glMaterialf:=nil;
- glMaterialfv:=nil;
- glMultMatrixf:=nil;
- glMultiTexCoord4f:=nil;
- glNormal3f:=nil;
- glOrthof:=nil;
- glPointParameterf:=nil;
- glPointParameterfv:=nil;
- glPointSize:=nil;
- glPolygonOffset:=nil;
- glRotatef:=nil;
- glScalef:=nil;
- glTexEnvf:=nil;
- glTexEnvfv:=nil;
- glTexParameterf:=nil;
- glTexParameterfv:=nil;
- glTranslatef:=nil;
- glActiveTexture:=nil;
- glAlphaFuncx:=nil;
- glBindBuffer:=nil;
- glBindTexture:=nil;
- glBlendFunc:=nil;
- glBufferData:=nil;
- glBufferSubData:=nil;
- glClear:=nil;
- glClearColorx:=nil;
- glClearDepthx:=nil;
- glClearStencil:=nil;
- glClientActiveTexture:=nil;
- glClipPlanex:=nil;
- glColor4ub:=nil;
- glColor4x:=nil;
- glColorMask:=nil;
- glColorPointer:=nil;
- glCompressedTexImage2D:=nil;
- glCompressedTexSubImage2D:=nil;
- glCopyTexImage2D:=nil;
- glCopyTexSubImage2D:=nil;
- glCullFace:=nil;
- glDeleteBuffers:=nil;
- glDeleteTextures:=nil;
- glDepthFunc:=nil;
- glDepthMask:=nil;
- glDepthRangex:=nil;
- glDisable:=nil;
- glDisableClientState:=nil;
- glDrawArrays:=nil;
- glDrawElements:=nil;
- glEnable:=nil;
- glEnableClientState:=nil;
- glFinish:=nil;
- glFlush:=nil;
- glFogx:=nil;
- glFogxv:=nil;
- glFrontFace:=nil;
- glFrustumx:=nil;
- glGetBooleanv:=nil;
- glGetBufferParameteriv:=nil;
- glGetClipPlanex:=nil;
- glGenBuffers:=nil;
- glGenTextures:=nil;
- glGetError:=nil;
- glGetFixedv:=nil;
- glGetIntegerv:=nil;
- glGetLightxv:=nil;
- glGetMaterialxv:=nil;
- glGetPointerv:=nil;
- glGetString:=nil;
- glGetTexEnviv:=nil;
- glGetTexEnvxv:=nil;
- glGetTexParameteriv:=nil;
- glGetTexParameterxv:=nil;
- glHint:=nil;
- glIsBuffer:=nil;
- glIsEnabled:=nil;
- glIsTexture:=nil;
- glLightModelx:=nil;
- glLightModelxv:=nil;
- glLightx:=nil;
- glLightxv:=nil;
- glLineWidthx:=nil;
- glLoadIdentity:=nil;
- glLoadMatrixx:=nil;
- glLogicOp:=nil;
- glMaterialx:=nil;
- glMaterialxv:=nil;
- glMatrixMode:=nil;
- glMultMatrixx:=nil;
- glMultiTexCoord4x:=nil;
- glNormal3x:=nil;
- glNormalPointer:=nil;
- glOrthox:=nil;
- glPixelStorei:=nil;
- glPointParameterx:=nil;
- glPointParameterxv:=nil;
- glPointSizex:=nil;
- glPolygonOffsetx:=nil;
- glPopMatrix:=nil;
- glPushMatrix:=nil;
- glReadPixels:=nil;
- glRotatex:=nil;
- glSampleCoverage:=nil;
- glSampleCoveragex:=nil;
- glScalex:=nil;
- glScissor:=nil;
- glShadeModel:=nil;
- glStencilFunc:=nil;
- glStencilMask:=nil;
- glStencilOp:=nil;
- glTexCoordPointer:=nil;
- glTexEnvi:=nil;
- glTexEnvx:=nil;
- glTexEnviv:=nil;
- glTexEnvxv:=nil;
- glTexImage2D:=nil;
- glTexParameteri:=nil;
- glTexParameterx:=nil;
- glTexParameteriv:=nil;
- glTexParameterxv:=nil;
- glTexSubImage2D:=nil;
- glTranslatex:=nil;
- glVertexPointer:=nil;
- glViewport:=nil;
- glPointSizePointerOES:=nil;
- end;
-
-
- procedure Loadgles11(lib : pchar);
- begin
- Freegles11;
- WriteToConsole('loading lib');
- hlib:=LoadLibrary(lib);
- if hlib=0 then
- begin
- WriteToConsole('crash');
- raise Exception.Create(format('Could not load library: %s',[lib]));
- end;
- WriteToConsole('succeeded');
- pointer(glAlphaFunc):=GetProcAddress(hlib,'glAlphaFunc');
- pointer(glClearColor):=GetProcAddress(hlib,'glClearColor');
- pointer(glClearDepthf):=GetProcAddress(hlib,'glClearDepthf');
- pointer(glClipPlanef):=GetProcAddress(hlib,'glClipPlanef');
- pointer(glColor4f):=GetProcAddress(hlib,'glColor4f');
- pointer(glDepthRangef):=GetProcAddress(hlib,'glDepthRangef');
- pointer(glFogf):=GetProcAddress(hlib,'glFogf');
- pointer(glFogfv):=GetProcAddress(hlib,'glFogfv');
- pointer(glFrustumf):=GetProcAddress(hlib,'glFrustumf');
- pointer(glGetClipPlanef):=GetProcAddress(hlib,'glGetClipPlanef');
- pointer(glGetFloatv):=GetProcAddress(hlib,'glGetFloatv');
- pointer(glGetLightfv):=GetProcAddress(hlib,'glGetLightfv');
- pointer(glGetMaterialfv):=GetProcAddress(hlib,'glGetMaterialfv');
- pointer(glGetTexEnvfv):=GetProcAddress(hlib,'glGetTexEnvfv');
- pointer(glGetTexParameterfv):=GetProcAddress(hlib,'glGetTexParameterfv');
- pointer(glLightModelf):=GetProcAddress(hlib,'glLightModelf');
- pointer(glLightModelfv):=GetProcAddress(hlib,'glLightModelfv');
- pointer(glLightf):=GetProcAddress(hlib,'glLightf');
- pointer(glLightfv):=GetProcAddress(hlib,'glLightfv');
- pointer(glLineWidth):=GetProcAddress(hlib,'glLineWidth');
- pointer(glLoadMatrixf):=GetProcAddress(hlib,'glLoadMatrixf');
- pointer(glMaterialf):=GetProcAddress(hlib,'glMaterialf');
- pointer(glMaterialfv):=GetProcAddress(hlib,'glMaterialfv');
- pointer(glMultMatrixf):=GetProcAddress(hlib,'glMultMatrixf');
- pointer(glMultiTexCoord4f):=GetProcAddress(hlib,'glMultiTexCoord4f');
- pointer(glNormal3f):=GetProcAddress(hlib,'glNormal3f');
- pointer(glOrthof):=GetProcAddress(hlib,'glOrthof');
- pointer(glPointParameterf):=GetProcAddress(hlib,'glPointParameterf');
- pointer(glPointParameterfv):=GetProcAddress(hlib,'glPointParameterfv');
- pointer(glPointSize):=GetProcAddress(hlib,'glPointSize');
- pointer(glPolygonOffset):=GetProcAddress(hlib,'glPolygonOffset');
- pointer(glRotatef):=GetProcAddress(hlib,'glRotatef');
- pointer(glScalef):=GetProcAddress(hlib,'glScalef');
- pointer(glTexEnvf):=GetProcAddress(hlib,'glTexEnvf');
- pointer(glTexEnvfv):=GetProcAddress(hlib,'glTexEnvfv');
- pointer(glTexParameterf):=GetProcAddress(hlib,'glTexParameterf');
- pointer(glTexParameterfv):=GetProcAddress(hlib,'glTexParameterfv');
- pointer(glTranslatef):=GetProcAddress(hlib,'glTranslatef');
- pointer(glActiveTexture):=GetProcAddress(hlib,'glActiveTexture');
- pointer(glAlphaFuncx):=GetProcAddress(hlib,'glAlphaFuncx');
- pointer(glBindBuffer):=GetProcAddress(hlib,'glBindBuffer');
- pointer(glBindTexture):=GetProcAddress(hlib,'glBindTexture');
- pointer(glBlendFunc):=GetProcAddress(hlib,'glBlendFunc');
- pointer(glBufferData):=GetProcAddress(hlib,'glBufferData');
- pointer(glBufferSubData):=GetProcAddress(hlib,'glBufferSubData');
- pointer(glClear):=GetProcAddress(hlib,'glClear');
- pointer(glClearColorx):=GetProcAddress(hlib,'glClearColorx');
- pointer(glClearDepthx):=GetProcAddress(hlib,'glClearDepthx');
- pointer(glClearStencil):=GetProcAddress(hlib,'glClearStencil');
- pointer(glClientActiveTexture):=GetProcAddress(hlib,'glClientActiveTexture');
- pointer(glClipPlanex):=GetProcAddress(hlib,'glClipPlanex');
- pointer(glColor4ub):=GetProcAddress(hlib,'glColor4ub');
- pointer(glColor4x):=GetProcAddress(hlib,'glColor4x');
- pointer(glColorMask):=GetProcAddress(hlib,'glColorMask');
- pointer(glColorPointer):=GetProcAddress(hlib,'glColorPointer');
- pointer(glCompressedTexImage2D):=GetProcAddress(hlib,'glCompressedTexImage2D');
- pointer(glCompressedTexSubImage2D):=GetProcAddress(hlib,'glCompressedTexSubImage2D');
- pointer(glCopyTexImage2D):=GetProcAddress(hlib,'glCopyTexImage2D');
- pointer(glCopyTexSubImage2D):=GetProcAddress(hlib,'glCopyTexSubImage2D');
- pointer(glCullFace):=GetProcAddress(hlib,'glCullFace');
- pointer(glDeleteBuffers):=GetProcAddress(hlib,'glDeleteBuffers');
- pointer(glDeleteTextures):=GetProcAddress(hlib,'glDeleteTextures');
- pointer(glDepthFunc):=GetProcAddress(hlib,'glDepthFunc');
- pointer(glDepthMask):=GetProcAddress(hlib,'glDepthMask');
- pointer(glDepthRangex):=GetProcAddress(hlib,'glDepthRangex');
- pointer(glDisable):=GetProcAddress(hlib,'glDisable');
- pointer(glDisableClientState):=GetProcAddress(hlib,'glDisableClientState');
- pointer(glDrawArrays):=GetProcAddress(hlib,'glDrawArrays');
- pointer(glDrawElements):=GetProcAddress(hlib,'glDrawElements');
- pointer(glEnable):=GetProcAddress(hlib,'glEnable');
- pointer(glEnableClientState):=GetProcAddress(hlib,'glEnableClientState');
- pointer(glFinish):=GetProcAddress(hlib,'glFinish');
- pointer(glFlush):=GetProcAddress(hlib,'glFlush');
- pointer(glFogx):=GetProcAddress(hlib,'glFogx');
- pointer(glFogxv):=GetProcAddress(hlib,'glFogxv');
- pointer(glFrontFace):=GetProcAddress(hlib,'glFrontFace');
- pointer(glFrustumx):=GetProcAddress(hlib,'glFrustumx');
- pointer(glGetBooleanv):=GetProcAddress(hlib,'glGetBooleanv');
- pointer(glGetBufferParameteriv):=GetProcAddress(hlib,'glGetBufferParameteriv');
- pointer(glGetClipPlanex):=GetProcAddress(hlib,'glGetClipPlanex');
- pointer(glGenBuffers):=GetProcAddress(hlib,'glGenBuffers');
- pointer(glGenTextures):=GetProcAddress(hlib,'glGenTextures');
- pointer(glGetError):=GetProcAddress(hlib,'glGetError');
- pointer(glGetFixedv):=GetProcAddress(hlib,'glGetFixedv');
- pointer(glGetIntegerv):=GetProcAddress(hlib,'glGetIntegerv');
- pointer(glGetLightxv):=GetProcAddress(hlib,'glGetLightxv');
- pointer(glGetMaterialxv):=GetProcAddress(hlib,'glGetMaterialxv');
- pointer(glGetPointerv):=GetProcAddress(hlib,'glGetPointerv');
- pointer(glGetString):=GetProcAddress(hlib,'glGetString');
- pointer(glGetTexEnviv):=GetProcAddress(hlib,'glGetTexEnviv');
- pointer(glGetTexEnvxv):=GetProcAddress(hlib,'glGetTexEnvxv');
- pointer(glGetTexParameteriv):=GetProcAddress(hlib,'glGetTexParameteriv');
- pointer(glGetTexParameterxv):=GetProcAddress(hlib,'glGetTexParameterxv');
- pointer(glHint):=GetProcAddress(hlib,'glHint');
- pointer(glIsBuffer):=GetProcAddress(hlib,'glIsBuffer');
- pointer(glIsEnabled):=GetProcAddress(hlib,'glIsEnabled');
- pointer(glIsTexture):=GetProcAddress(hlib,'glIsTexture');
- pointer(glLightModelx):=GetProcAddress(hlib,'glLightModelx');
- pointer(glLightModelxv):=GetProcAddress(hlib,'glLightModelxv');
- pointer(glLightx):=GetProcAddress(hlib,'glLightx');
- pointer(glLightxv):=GetProcAddress(hlib,'glLightxv');
- pointer(glLineWidthx):=GetProcAddress(hlib,'glLineWidthx');
- pointer(glLoadIdentity):=GetProcAddress(hlib,'glLoadIdentity');
- pointer(glLoadMatrixx):=GetProcAddress(hlib,'glLoadMatrixx');
- pointer(glLogicOp):=GetProcAddress(hlib,'glLogicOp');
- pointer(glMaterialx):=GetProcAddress(hlib,'glMaterialx');
- pointer(glMaterialxv):=GetProcAddress(hlib,'glMaterialxv');
- pointer(glMatrixMode):=GetProcAddress(hlib,'glMatrixMode');
- pointer(glMultMatrixx):=GetProcAddress(hlib,'glMultMatrixx');
- pointer(glMultiTexCoord4x):=GetProcAddress(hlib,'glMultiTexCoord4x');
- pointer(glNormal3x):=GetProcAddress(hlib,'glNormal3x');
- pointer(glNormalPointer):=GetProcAddress(hlib,'glNormalPointer');
- pointer(glOrthox):=GetProcAddress(hlib,'glOrthox');
- pointer(glPixelStorei):=GetProcAddress(hlib,'glPixelStorei');
- pointer(glPointParameterx):=GetProcAddress(hlib,'glPointParameterx');
- pointer(glPointParameterxv):=GetProcAddress(hlib,'glPointParameterxv');
- pointer(glPointSizex):=GetProcAddress(hlib,'glPointSizex');
- pointer(glPolygonOffsetx):=GetProcAddress(hlib,'glPolygonOffsetx');
- pointer(glPopMatrix):=GetProcAddress(hlib,'glPopMatrix');
- pointer(glPushMatrix):=GetProcAddress(hlib,'glPushMatrix');
- pointer(glReadPixels):=GetProcAddress(hlib,'glReadPixels');
- pointer(glRotatex):=GetProcAddress(hlib,'glRotatex');
- pointer(glSampleCoverage):=GetProcAddress(hlib,'glSampleCoverage');
- pointer(glSampleCoveragex):=GetProcAddress(hlib,'glSampleCoveragex');
- pointer(glScalex):=GetProcAddress(hlib,'glScalex');
- pointer(glScissor):=GetProcAddress(hlib,'glScissor');
- pointer(glShadeModel):=GetProcAddress(hlib,'glShadeModel');
- pointer(glStencilFunc):=GetProcAddress(hlib,'glStencilFunc');
- pointer(glStencilMask):=GetProcAddress(hlib,'glStencilMask');
- pointer(glStencilOp):=GetProcAddress(hlib,'glStencilOp');
- pointer(glTexCoordPointer):=GetProcAddress(hlib,'glTexCoordPointer');
- pointer(glTexEnvi):=GetProcAddress(hlib,'glTexEnvi');
- pointer(glTexEnvx):=GetProcAddress(hlib,'glTexEnvx');
- pointer(glTexEnviv):=GetProcAddress(hlib,'glTexEnviv');
- pointer(glTexEnvxv):=GetProcAddress(hlib,'glTexEnvxv');
- pointer(glTexImage2D):=GetProcAddress(hlib,'glTexImage2D');
- pointer(glTexParameteri):=GetProcAddress(hlib,'glTexParameteri');
- pointer(glTexParameterx):=GetProcAddress(hlib,'glTexParameterx');
- pointer(glTexParameteriv):=GetProcAddress(hlib,'glTexParameteriv');
- pointer(glTexParameterxv):=GetProcAddress(hlib,'glTexParameterxv');
- pointer(glTexSubImage2D):=GetProcAddress(hlib,'glTexSubImage2D');
- pointer(glTranslatex):=GetProcAddress(hlib,'glTranslatex');
- pointer(glVertexPointer):=GetProcAddress(hlib,'glVertexPointer');
- pointer(glViewport):=GetProcAddress(hlib,'glViewport');
- pointer(glPointSizePointerOES):=GetProcAddress(hlib,'glPointSizePointerOES');
- end;
-
-procedure init;
-begin
- WriteToConsole('init');
- Loadgles11('libGLESv1_CM.so');
-end;
-
-
-initialization
- Loadgles11('gles11');
-finalization
- Freegles11;
-
-end.
--- a/Android-build/pushToDevice Wed Jun 22 23:55:32 2011 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,5 +0,0 @@
-#!/bin/bash
-
-adb push ./out/libhwengine.so /sdcard/libhwengine.so
-adb shell "su -c \"cat /sdcard/libhwengine.so > /data/data/org.hedgewars/lib/libhwengine.so \""
-
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/project_files/Android-build/Makefile.android Wed Jun 22 23:56:08 2011 +0200
@@ -0,0 +1,26 @@
+#USER DEFINED
+FPC_DIR=/home/richard/SoftDev/fpc-2.4.4
+ANDROID_NDK=/home/richard/SoftDev/android/android-ndk-r5b
+ANDROID_SDK=/home/richard/SoftDev/android/android-sdk-linux_86
+#END USER DEFINED
+
+SDL_ANDROID_DIR=./SDL-android-project
+ANDROID_API_LVL=5
+
+PPCROSSARM=$(FPC_DIR)/compiler/ppcrossarm
+PPCROSSARM_FLAGS= -Xd -O- -Tlinux -XParm-linux-androideabi- -vwnh -XS
+PPCROSSARM_INCLUDES= \
+ -FD$(ANDROID_NDK)/toolchains/arm-linux-androideabi-4.4.3/prebuilt/linux-x86/bin \
+ -Fu$(FPC_DIR)/rtl/units/arm-linux \
+ -Fl$(ANDROID_NDK)/platforms/android-$(ANDROID_API_LVL)/arch-arm/usr/lib \
+ -Fl$(SDL_ANDROID_DIR)/libs/armeabi \
+ -Fl$(ANDROID_NDK)/toolchains/arm-linux-androideabi-4.4.3/prebuilt/linux-x86/lib/gcc/arm-linux/arm-linux-androideabi/4.4.3/ \
+#LINKERFLAGS= -k"--static"
+FPC_DEFINES=-dandroid -darm
+
+
+all:
+ $(PPCROSSARM) $(LINKERFLAGS) $(PPCROSSARM_FLAGS) $(PPCROSSARM_INCLUDES) $(FPC_DEFINES) -oout/libhwengine.so ../hedgewars/hwLibrary.pas
+
+clean:
+ rm out/*
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/project_files/Android-build/gles11.pp Wed Jun 22 23:56:08 2011 +0200
@@ -0,0 +1,1107 @@
+
+{$mode objfpc}
+unit gles11;
+interface
+
+{
+ Automatically converted by H2Pas 1.0.0 from gl.hh
+ The following command line parameters were used:
+ -P
+ -l
+ GLESv1_CM
+ -o
+ gles11.pp
+ -D
+ gl.hh
+}
+
+ procedure init;
+
+ const
+ External_library='GLESv1_CM'; {Setup as you need}
+
+ Type
+
+// khronos_int32_t = int32_t;
+// khronos_uint32_t = uint32_t;
+// khronos_int64_t = int64_t;
+// khronos_uint64_t = uint64_t;
+
+ khronos_int32_t = longint;
+ khronos_uint32_t = longword;
+ khronos_int64_t = Int64;
+ khronos_uint64_t = QWord;
+ khronos_int8_t = char;
+ khronos_uint8_t = byte;
+ khronos_int16_t = smallint;
+ khronos_uint16_t = word;
+ khronos_intptr_t = longint;
+ khronos_uintptr_t = dword;
+ khronos_ssize_t = longint;
+ khronos_usize_t = dword;
+ khronos_float_t = single;
+
+ GLvoid = pointer;
+ GLenum = dword;
+ GLboolean = byte;
+ GLbitfield = dword;
+ GLshort = smallint;
+ GLint = longint;
+ GLsizei = longint;
+ GLushort = word;
+ GLuint = dword;
+
+ GLbyte = khronos_int8_t;
+ GLubyte = khronos_uint8_t;
+ GLfloat = khronos_float_t;
+ GLclampf = khronos_float_t;
+ GLfixed = khronos_int32_t;
+ GLclampx = khronos_int32_t;
+ GLintptr = khronos_intptr_t;
+ GLsizeiptr = khronos_ssize_t;
+
+ PGLboolean = ^GLboolean;
+ PGLfixed = ^GLfixed;
+ PGLfloat = ^GLfloat;
+ PGLint = ^GLint;
+ PGLuint = ^GLuint;
+ PGLvoid = ^GLvoid;
+ PGLubyte = ^GLubyte;
+{$IFDEF FPC}
+{$PACKRECORDS C}
+{$ENDIF}
+
+ const
+// GL_API = KHRONOS_APICALL;
+{$define KHRONOS_APIENTRY}
+ GL_DIRECT_TEXTURE_2D_QUALCOMM = $7E80;
+
+ {*********************************************************** }
+ { OpenGL ES core versions }
+
+ const
+ GL_VERSION_ES_CM_1_0 = 1;
+ GL_VERSION_ES_CL_1_0 = 1;
+ GL_VERSION_ES_CM_1_1 = 1;
+ GL_VERSION_ES_CL_1_1 = 1;
+ { ClearBufferMask }
+ GL_DEPTH_BUFFER_BIT = $00000100;
+ GL_STENCIL_BUFFER_BIT = $00000400;
+ GL_COLOR_BUFFER_BIT = $00004000;
+ { Boolean }
+ GL_FALSE = 0;
+ GL_TRUE = 1;
+ { BeginMode }
+ GL_POINTS = $0000;
+ GL_LINES = $0001;
+ GL_LINE_LOOP = $0002;
+ GL_LINE_STRIP = $0003;
+ GL_TRIANGLES = $0004;
+ GL_TRIANGLE_STRIP = $0005;
+ GL_TRIANGLE_FAN = $0006;
+ { AlphaFunction }
+ GL_NEVER = $0200;
+ GL_LESS = $0201;
+ GL_EQUAL = $0202;
+ GL_LEQUAL = $0203;
+ GL_GREATER = $0204;
+ GL_NOTEQUAL = $0205;
+ GL_GEQUAL = $0206;
+ GL_ALWAYS = $0207;
+ { BlendingFactorDest }
+ GL_ZERO = 0;
+ GL_ONE = 1;
+ GL_SRC_COLOR = $0300;
+ GL_ONE_MINUS_SRC_COLOR = $0301;
+ GL_SRC_ALPHA = $0302;
+ GL_ONE_MINUS_SRC_ALPHA = $0303;
+ GL_DST_ALPHA = $0304;
+ GL_ONE_MINUS_DST_ALPHA = $0305;
+ { BlendingFactorSrc }
+ { GL_ZERO }
+ { GL_ONE }
+ GL_DST_COLOR = $0306;
+ GL_ONE_MINUS_DST_COLOR = $0307;
+ GL_SRC_ALPHA_SATURATE = $0308;
+ { GL_SRC_ALPHA }
+ { GL_ONE_MINUS_SRC_ALPHA }
+ { GL_DST_ALPHA }
+ { GL_ONE_MINUS_DST_ALPHA }
+ { ClipPlaneName }
+ GL_CLIP_PLANE0 = $3000;
+ GL_CLIP_PLANE1 = $3001;
+ GL_CLIP_PLANE2 = $3002;
+ GL_CLIP_PLANE3 = $3003;
+ GL_CLIP_PLANE4 = $3004;
+ GL_CLIP_PLANE5 = $3005;
+ { ColorMaterialFace }
+ { GL_FRONT_AND_BACK }
+ { ColorMaterialParameter }
+ { GL_AMBIENT_AND_DIFFUSE }
+ { ColorPointerType }
+ { GL_UNSIGNED_BYTE }
+ { GL_FLOAT }
+ { GL_FIXED }
+ { CullFaceMode }
+ GL_FRONT = $0404;
+ GL_BACK = $0405;
+ GL_FRONT_AND_BACK = $0408;
+ { DepthFunction }
+ { GL_NEVER }
+ { GL_LESS }
+ { GL_EQUAL }
+ { GL_LEQUAL }
+ { GL_GREATER }
+ { GL_NOTEQUAL }
+ { GL_GEQUAL }
+ { GL_ALWAYS }
+ { EnableCap }
+ GL_FOG = $0B60;
+ GL_LIGHTING = $0B50;
+ GL_TEXTURE_2D = $0DE1;
+ GL_CULL_FACE = $0B44;
+ GL_ALPHA_TEST = $0BC0;
+ GL_BLEND = $0BE2;
+ GL_COLOR_LOGIC_OP = $0BF2;
+ GL_DITHER = $0BD0;
+ GL_STENCIL_TEST = $0B90;
+ GL_DEPTH_TEST = $0B71;
+ { GL_LIGHT0 }
+ { GL_LIGHT1 }
+ { GL_LIGHT2 }
+ { GL_LIGHT3 }
+ { GL_LIGHT4 }
+ { GL_LIGHT5 }
+ { GL_LIGHT6 }
+ { GL_LIGHT7 }
+ GL_POINT_SMOOTH = $0B10;
+ GL_LINE_SMOOTH = $0B20;
+ GL_SCISSOR_TEST = $0C11;
+ GL_COLOR_MATERIAL = $0B57;
+ GL_NORMALIZE = $0BA1;
+ GL_RESCALE_NORMAL = $803A;
+ GL_POLYGON_OFFSET_FILL = $8037;
+ GL_VERTEX_ARRAY = $8074;
+ GL_NORMAL_ARRAY = $8075;
+ GL_COLOR_ARRAY = $8076;
+ GL_TEXTURE_COORD_ARRAY = $8078;
+ GL_MULTISAMPLE = $809D;
+ GL_SAMPLE_ALPHA_TO_COVERAGE = $809E;
+ GL_SAMPLE_ALPHA_TO_ONE = $809F;
+ GL_SAMPLE_COVERAGE = $80A0;
+ { ErrorCode }
+ GL_NO_ERROR = 0;
+ GL_INVALID_ENUM = $0500;
+ GL_INVALID_VALUE = $0501;
+ GL_INVALID_OPERATION = $0502;
+ GL_STACK_OVERFLOW = $0503;
+ GL_STACK_UNDERFLOW = $0504;
+ GL_OUT_OF_MEMORY = $0505;
+ { FogMode }
+ { GL_LINEAR }
+ GL_EXP = $0800;
+ GL_EXP2 = $0801;
+ { FogParameter }
+ GL_FOG_DENSITY = $0B62;
+ GL_FOG_START = $0B63;
+ GL_FOG_END = $0B64;
+ GL_FOG_MODE = $0B65;
+ GL_FOG_COLOR = $0B66;
+ { FrontFaceDirection }
+ GL_CW = $0900;
+ GL_CCW = $0901;
+ { GetPName }
+ GL_CURRENT_COLOR = $0B00;
+ GL_CURRENT_NORMAL = $0B02;
+ GL_CURRENT_TEXTURE_COORDS = $0B03;
+ GL_POINT_SIZE = $0B11;
+ GL_POINT_SIZE_MIN = $8126;
+ GL_POINT_SIZE_MAX = $8127;
+ GL_POINT_FADE_THRESHOLD_SIZE = $8128;
+ GL_POINT_DISTANCE_ATTENUATION = $8129;
+ GL_SMOOTH_POINT_SIZE_RANGE = $0B12;
+ GL_LINE_WIDTH = $0B21;
+ GL_SMOOTH_LINE_WIDTH_RANGE = $0B22;
+ GL_ALIASED_POINT_SIZE_RANGE = $846D;
+ GL_ALIASED_LINE_WIDTH_RANGE = $846E;
+ GL_CULL_FACE_MODE = $0B45;
+ GL_FRONT_FACE = $0B46;
+ GL_SHADE_MODEL = $0B54;
+ GL_DEPTH_RANGE = $0B70;
+ GL_DEPTH_WRITEMASK = $0B72;
+ GL_DEPTH_CLEAR_VALUE = $0B73;
+ GL_DEPTH_FUNC = $0B74;
+ GL_STENCIL_CLEAR_VALUE = $0B91;
+ GL_STENCIL_FUNC = $0B92;
+ GL_STENCIL_VALUE_MASK = $0B93;
+ GL_STENCIL_FAIL = $0B94;
+ GL_STENCIL_PASS_DEPTH_FAIL = $0B95;
+ GL_STENCIL_PASS_DEPTH_PASS = $0B96;
+ GL_STENCIL_REF = $0B97;
+ GL_STENCIL_WRITEMASK = $0B98;
+ GL_MATRIX_MODE = $0BA0;
+ GL_VIEWPORT = $0BA2;
+ GL_MODELVIEW_STACK_DEPTH = $0BA3;
+ GL_PROJECTION_STACK_DEPTH = $0BA4;
+ GL_TEXTURE_STACK_DEPTH = $0BA5;
+ GL_MODELVIEW_MATRIX = $0BA6;
+ GL_PROJECTION_MATRIX = $0BA7;
+ GL_TEXTURE_MATRIX = $0BA8;
+ GL_ALPHA_TEST_FUNC = $0BC1;
+ GL_ALPHA_TEST_REF = $0BC2;
+ GL_BLEND_DST = $0BE0;
+ GL_BLEND_SRC = $0BE1;
+ GL_LOGIC_OP_MODE = $0BF0;
+ GL_SCISSOR_BOX = $0C10;
+// GL_SCISSOR_TEST = $0C11;
+ GL_COLOR_CLEAR_VALUE = $0C22;
+ GL_COLOR_WRITEMASK = $0C23;
+ GL_UNPACK_ALIGNMENT = $0CF5;
+ GL_PACK_ALIGNMENT = $0D05;
+ GL_MAX_LIGHTS = $0D31;
+ GL_MAX_CLIP_PLANES = $0D32;
+ GL_MAX_TEXTURE_SIZE = $0D33;
+ GL_MAX_MODELVIEW_STACK_DEPTH = $0D36;
+ GL_MAX_PROJECTION_STACK_DEPTH = $0D38;
+ GL_MAX_TEXTURE_STACK_DEPTH = $0D39;
+ GL_MAX_VIEWPORT_DIMS = $0D3A;
+ GL_MAX_TEXTURE_UNITS = $84E2;
+ GL_SUBPIXEL_BITS = $0D50;
+ GL_RED_BITS = $0D52;
+ GL_GREEN_BITS = $0D53;
+ GL_BLUE_BITS = $0D54;
+ GL_ALPHA_BITS = $0D55;
+ GL_DEPTH_BITS = $0D56;
+ GL_STENCIL_BITS = $0D57;
+ GL_POLYGON_OFFSET_UNITS = $2A00;
+// GL_POLYGON_OFFSET_FILL = $8037;
+ GL_POLYGON_OFFSET_FACTOR = $8038;
+ GL_TEXTURE_BINDING_2D = $8069;
+ 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_TEXTURE_COORD_ARRAY_SIZE = $8088;
+ GL_TEXTURE_COORD_ARRAY_TYPE = $8089;
+ GL_TEXTURE_COORD_ARRAY_STRIDE = $808A;
+ GL_VERTEX_ARRAY_POINTER = $808E;
+ GL_NORMAL_ARRAY_POINTER = $808F;
+ GL_COLOR_ARRAY_POINTER = $8090;
+ GL_TEXTURE_COORD_ARRAY_POINTER = $8092;
+ GL_SAMPLE_BUFFERS = $80A8;
+ GL_SAMPLES = $80A9;
+ GL_SAMPLE_COVERAGE_VALUE = $80AA;
+ GL_SAMPLE_COVERAGE_INVERT = $80AB;
+ { GetTextureParameter }
+ { GL_TEXTURE_MAG_FILTER }
+ { GL_TEXTURE_MIN_FILTER }
+ { GL_TEXTURE_WRAP_S }
+ { GL_TEXTURE_WRAP_T }
+ GL_NUM_COMPRESSED_TEXTURE_FORMATS = $86A2;
+ GL_COMPRESSED_TEXTURE_FORMATS = $86A3;
+ { HintMode }
+ GL_DONT_CARE = $1100;
+ GL_FASTEST = $1101;
+ GL_NICEST = $1102;
+ { HintTarget }
+ GL_PERSPECTIVE_CORRECTION_HINT = $0C50;
+ GL_POINT_SMOOTH_HINT = $0C51;
+ GL_LINE_SMOOTH_HINT = $0C52;
+ GL_FOG_HINT = $0C54;
+ GL_GENERATE_MIPMAP_HINT = $8192;
+ { LightModelParameter }
+ GL_LIGHT_MODEL_AMBIENT = $0B53;
+ GL_LIGHT_MODEL_TWO_SIDE = $0B52;
+ { LightParameter }
+ GL_AMBIENT = $1200;
+ GL_DIFFUSE = $1201;
+ GL_SPECULAR = $1202;
+ GL_POSITION = $1203;
+ GL_SPOT_DIRECTION = $1204;
+ GL_SPOT_EXPONENT = $1205;
+ GL_SPOT_CUTOFF = $1206;
+ GL_CONSTANT_ATTENUATION = $1207;
+ GL_LINEAR_ATTENUATION = $1208;
+ GL_QUADRATIC_ATTENUATION = $1209;
+ { DataType }
+ GL_BYTE = $1400;
+ GL_UNSIGNED_BYTE = $1401;
+ GL_SHORT = $1402;
+ GL_UNSIGNED_SHORT = $1403;
+ GL_FLOAT = $1406;
+ GL_FIXED = $140C;
+ { LogicOp }
+ GL_CLEAR = $1500;
+ GL_AND = $1501;
+ GL_AND_REVERSE = $1502;
+ GL_COPY = $1503;
+ GL_AND_INVERTED = $1504;
+ GL_NOOP = $1505;
+ GL_XOR = $1506;
+ GL_OR = $1507;
+ GL_NOR = $1508;
+ GL_EQUIV = $1509;
+ GL_INVERT = $150A;
+ GL_OR_REVERSE = $150B;
+ GL_COPY_INVERTED = $150C;
+ GL_OR_INVERTED = $150D;
+ GL_NAND = $150E;
+ GL_SET = $150F;
+ { MaterialFace }
+ { GL_FRONT_AND_BACK }
+ { MaterialParameter }
+ GL_EMISSION = $1600;
+ GL_SHININESS = $1601;
+ GL_AMBIENT_AND_DIFFUSE = $1602;
+ { GL_AMBIENT }
+ { GL_DIFFUSE }
+ { GL_SPECULAR }
+ { MatrixMode }
+ GL_MODELVIEW = $1700;
+ GL_PROJECTION = $1701;
+ GL_TEXTURE = $1702;
+ { NormalPointerType }
+ { GL_BYTE }
+ { GL_SHORT }
+ { GL_FLOAT }
+ { GL_FIXED }
+ { PixelFormat }
+ GL_ALPHA = $1906;
+ GL_RGB = $1907;
+ GL_RGBA = $1908;
+ GL_LUMINANCE = $1909;
+ GL_LUMINANCE_ALPHA = $190A;
+ { PixelStoreParameter }
+// GL_UNPACK_ALIGNMENT = $0CF5;
+// GL_PACK_ALIGNMENT = $0D05;
+ { PixelType }
+ { GL_UNSIGNED_BYTE }
+ GL_UNSIGNED_SHORT_4_4_4_4 = $8033;
+ GL_UNSIGNED_SHORT_5_5_5_1 = $8034;
+ GL_UNSIGNED_SHORT_5_6_5 = $8363;
+ { ShadingModel }
+ GL_FLAT = $1D00;
+ GL_SMOOTH = $1D01;
+ { StencilFunction }
+ { GL_NEVER }
+ { GL_LESS }
+ { GL_EQUAL }
+ { GL_LEQUAL }
+ { GL_GREATER }
+ { GL_NOTEQUAL }
+ { GL_GEQUAL }
+ { GL_ALWAYS }
+ { StencilOp }
+ { GL_ZERO }
+ GL_KEEP = $1E00;
+ GL_REPLACE = $1E01;
+ GL_INCR = $1E02;
+ GL_DECR = $1E03;
+ { GL_INVERT }
+ { StringName }
+ GL_VENDOR = $1F00;
+ GL_RENDERER = $1F01;
+ GL_VERSION = $1F02;
+ GL_EXTENSIONS = $1F03;
+ { TexCoordPointerType }
+ { GL_SHORT }
+ { GL_FLOAT }
+ { GL_FIXED }
+ { GL_BYTE }
+ { TextureEnvMode }
+ GL_MODULATE = $2100;
+ GL_DECAL = $2101;
+ { GL_BLEND }
+ GL_ADD = $0104;
+ { GL_REPLACE }
+ { TextureEnvParameter }
+ GL_TEXTURE_ENV_MODE = $2200;
+ GL_TEXTURE_ENV_COLOR = $2201;
+ { TextureEnvTarget }
+ GL_TEXTURE_ENV = $2300;
+ { TextureMagFilter }
+ GL_NEAREST = $2600;
+ GL_LINEAR = $2601;
+ { TextureMinFilter }
+ { GL_NEAREST }
+ { GL_LINEAR }
+ GL_NEAREST_MIPMAP_NEAREST = $2700;
+ GL_LINEAR_MIPMAP_NEAREST = $2701;
+ GL_NEAREST_MIPMAP_LINEAR = $2702;
+ GL_LINEAR_MIPMAP_LINEAR = $2703;
+ { TextureParameterName }
+ GL_TEXTURE_MAG_FILTER = $2800;
+ GL_TEXTURE_MIN_FILTER = $2801;
+ GL_TEXTURE_WRAP_S = $2802;
+ GL_TEXTURE_WRAP_T = $2803;
+ GL_GENERATE_MIPMAP = $8191;
+ { TextureTarget }
+ { GL_TEXTURE_2D }
+ { TextureUnit }
+ GL_TEXTURE0 = $84C0;
+ GL_TEXTURE1 = $84C1;
+ GL_TEXTURE2 = $84C2;
+ GL_TEXTURE3 = $84C3;
+ GL_TEXTURE4 = $84C4;
+ GL_TEXTURE5 = $84C5;
+ GL_TEXTURE6 = $84C6;
+ GL_TEXTURE7 = $84C7;
+ GL_TEXTURE8 = $84C8;
+ GL_TEXTURE9 = $84C9;
+ GL_TEXTURE10 = $84CA;
+ GL_TEXTURE11 = $84CB;
+ GL_TEXTURE12 = $84CC;
+ GL_TEXTURE13 = $84CD;
+ GL_TEXTURE14 = $84CE;
+ GL_TEXTURE15 = $84CF;
+ GL_TEXTURE16 = $84D0;
+ GL_TEXTURE17 = $84D1;
+ GL_TEXTURE18 = $84D2;
+ GL_TEXTURE19 = $84D3;
+ GL_TEXTURE20 = $84D4;
+ GL_TEXTURE21 = $84D5;
+ GL_TEXTURE22 = $84D6;
+ GL_TEXTURE23 = $84D7;
+ GL_TEXTURE24 = $84D8;
+ GL_TEXTURE25 = $84D9;
+ GL_TEXTURE26 = $84DA;
+ GL_TEXTURE27 = $84DB;
+ GL_TEXTURE28 = $84DC;
+ GL_TEXTURE29 = $84DD;
+ GL_TEXTURE30 = $84DE;
+ GL_TEXTURE31 = $84DF;
+ GL_ACTIVE_TEXTURE = $84E0;
+ GL_CLIENT_ACTIVE_TEXTURE = $84E1;
+ { TextureWrapMode }
+ GL_REPEAT = $2901;
+ GL_CLAMP_TO_EDGE = $812F;
+ { VertexPointerType }
+ { GL_SHORT }
+ { GL_FLOAT }
+ { GL_FIXED }
+ { GL_BYTE }
+ { LightName }
+ GL_LIGHT0 = $4000;
+ GL_LIGHT1 = $4001;
+ GL_LIGHT2 = $4002;
+ GL_LIGHT3 = $4003;
+ GL_LIGHT4 = $4004;
+ GL_LIGHT5 = $4005;
+ GL_LIGHT6 = $4006;
+ GL_LIGHT7 = $4007;
+ { Buffer Objects }
+ GL_ARRAY_BUFFER = $8892;
+ GL_ELEMENT_ARRAY_BUFFER = $8893;
+ GL_ARRAY_BUFFER_BINDING = $8894;
+ GL_ELEMENT_ARRAY_BUFFER_BINDING = $8895;
+ GL_VERTEX_ARRAY_BUFFER_BINDING = $8896;
+ GL_NORMAL_ARRAY_BUFFER_BINDING = $8897;
+ GL_COLOR_ARRAY_BUFFER_BINDING = $8898;
+ GL_TEXTURE_COORD_ARRAY_BUFFER_BINDING = $889A;
+ GL_STATIC_DRAW = $88E4;
+ GL_DYNAMIC_DRAW = $88E8;
+ GL_BUFFER_SIZE = $8764;
+ GL_BUFFER_USAGE = $8765;
+ { Texture combine + dot3 }
+ GL_SUBTRACT = $84E7;
+ GL_COMBINE = $8570;
+ GL_COMBINE_RGB = $8571;
+ GL_COMBINE_ALPHA = $8572;
+ GL_RGB_SCALE = $8573;
+ GL_ADD_SIGNED = $8574;
+ GL_INTERPOLATE = $8575;
+ GL_CONSTANT = $8576;
+ GL_PRIMARY_COLOR = $8577;
+ GL_PREVIOUS = $8578;
+ GL_OPERAND0_RGB = $8590;
+ GL_OPERAND1_RGB = $8591;
+ GL_OPERAND2_RGB = $8592;
+ GL_OPERAND0_ALPHA = $8598;
+ GL_OPERAND1_ALPHA = $8599;
+ GL_OPERAND2_ALPHA = $859A;
+ GL_ALPHA_SCALE = $0D1C;
+ GL_SRC0_RGB = $8580;
+ GL_SRC1_RGB = $8581;
+ GL_SRC2_RGB = $8582;
+ GL_SRC0_ALPHA = $8588;
+ GL_SRC1_ALPHA = $8589;
+ GL_SRC2_ALPHA = $858A;
+ GL_DOT3_RGB = $86AE;
+ GL_DOT3_RGBA = $86AF;
+ {------------------------------------------------------------------------*
+ * required OES extension tokens
+ *------------------------------------------------------------------------ }
+ { OES_read_format }
+ GL_IMPLEMENTATION_COLOR_READ_TYPE_OES = $8B9A;
+ GL_IMPLEMENTATION_COLOR_READ_FORMAT_OES = $8B9B;
+ { GL_OES_compressed_paletted_texture }
+ GL_PALETTE4_RGB8_OES = $8B90;
+ GL_PALETTE4_RGBA8_OES = $8B91;
+ GL_PALETTE4_R5_G6_B5_OES = $8B92;
+ GL_PALETTE4_RGBA4_OES = $8B93;
+ GL_PALETTE4_RGB5_A1_OES = $8B94;
+ GL_PALETTE8_RGB8_OES = $8B95;
+ GL_PALETTE8_RGBA8_OES = $8B96;
+ GL_PALETTE8_R5_G6_B5_OES = $8B97;
+ GL_PALETTE8_RGBA4_OES = $8B98;
+ GL_PALETTE8_RGB5_A1_OES = $8B99;
+ { OES_point_size_array }
+ GL_POINT_SIZE_ARRAY_OES = $8B9C;
+ GL_POINT_SIZE_ARRAY_TYPE_OES = $898A;
+ GL_POINT_SIZE_ARRAY_STRIDE_OES = $898B;
+ GL_POINT_SIZE_ARRAY_POINTER_OES = $898C;
+ GL_POINT_SIZE_ARRAY_BUFFER_BINDING_OES = $8B9F;
+ { GL_OES_point_sprite }
+ GL_POINT_SPRITE_OES = $8861;
+ GL_COORD_REPLACE_OES = $8862;
+ {*********************************************************** }
+ { Available only in Common profile }
+
+ var
+ glAlphaFunc : procedure(func:GLenum; ref:GLclampf);cdecl;
+ glClearColor : procedure(red:GLclampf; green:GLclampf; blue:GLclampf; alpha:GLclampf);cdecl;
+ glClearDepthf : procedure(depth:GLclampf);cdecl;
+(* Const before type ignored *)
+ glClipPlanef : procedure(plane:GLenum; equation:pGLfloat);cdecl;
+ glColor4f : procedure(red:GLfloat; green:GLfloat; blue:GLfloat; alpha:GLfloat);cdecl;
+ glDepthRangef : procedure(zNear:GLclampf; zFar:GLclampf);cdecl;
+ glFogf : procedure(pname:GLenum; param:GLfloat);cdecl;
+(* Const before type ignored *)
+ glFogfv : procedure(pname:GLenum; params:pGLfloat);cdecl;
+ glFrustumf : procedure(left:GLfloat; right:GLfloat; bottom:GLfloat; top:GLfloat; zNear:GLfloat;
+ zFar:GLfloat);cdecl;
+ glGetClipPlanef : procedure(pname:GLenum; eqn:array of GLfloat);cdecl;
+ glGetFloatv : procedure(pname:GLenum; params:pGLfloat);cdecl;
+ glGetLightfv : procedure(light:GLenum; pname:GLenum; params:pGLfloat);cdecl;
+ glGetMaterialfv : procedure(face:GLenum; pname:GLenum; params:pGLfloat);cdecl;
+ glGetTexEnvfv : procedure(env:GLenum; pname:GLenum; params:pGLfloat);cdecl;
+ glGetTexParameterfv : procedure(target:GLenum; pname:GLenum; params:pGLfloat);cdecl;
+ glLightModelf : procedure(pname:GLenum; param:GLfloat);cdecl;
+(* Const before type ignored *)
+ glLightModelfv : procedure(pname:GLenum; params:pGLfloat);cdecl;
+ glLightf : procedure(light:GLenum; pname:GLenum; param:GLfloat);cdecl;
+(* Const before type ignored *)
+ glLightfv : procedure(light:GLenum; pname:GLenum; params:pGLfloat);cdecl;
+ glLineWidth : procedure(width:GLfloat);cdecl;
+(* Const before type ignored *)
+ glLoadMatrixf : procedure(m:pGLfloat);cdecl;
+ glMaterialf : procedure(face:GLenum; pname:GLenum; param:GLfloat);cdecl;
+(* Const before type ignored *)
+ glMaterialfv : procedure(face:GLenum; pname:GLenum; params:pGLfloat);cdecl;
+(* Const before type ignored *)
+ glMultMatrixf : procedure(m:pGLfloat);cdecl;
+ glMultiTexCoord4f : procedure(target:GLenum; s:GLfloat; t:GLfloat; r:GLfloat; q:GLfloat);cdecl;
+ glNormal3f : procedure(nx:GLfloat; ny:GLfloat; nz:GLfloat);cdecl;
+ glOrthof : procedure(left:GLfloat; right:GLfloat; bottom:GLfloat; top:GLfloat; zNear:GLfloat;
+ zFar:GLfloat);cdecl;
+ glPointParameterf : procedure(pname:GLenum; param:GLfloat);cdecl;
+(* Const before type ignored *)
+ glPointParameterfv : procedure(pname:GLenum; params:pGLfloat);cdecl;
+ glPointSize : procedure(size:GLfloat);cdecl;
+ glPolygonOffset : procedure(factor:GLfloat; units:GLfloat);cdecl;
+ glRotatef : procedure(angle:GLfloat; x:GLfloat; y:GLfloat; z:GLfloat);cdecl;
+ glScalef : procedure(x:GLfloat; y:GLfloat; z:GLfloat);cdecl;
+ glTexEnvf : procedure(target:GLenum; pname:GLenum; param:GLfloat);cdecl;
+(* Const before type ignored *)
+ glTexEnvfv : procedure(target:GLenum; pname:GLenum; params:pGLfloat);cdecl;
+ glTexParameterf : procedure(target:GLenum; pname:GLenum; param:GLfloat);cdecl;
+(* Const before type ignored *)
+ glTexParameterfv : procedure(target:GLenum; pname:GLenum; params:pGLfloat);cdecl;
+ glTranslatef : procedure(x:GLfloat; y:GLfloat; z:GLfloat);cdecl;
+ { Available in both Common and Common-Lite profiles }
+ glActiveTexture : procedure(texture:GLenum);cdecl;
+ glAlphaFuncx : procedure(func:GLenum; ref:GLclampx);cdecl;
+ glBindBuffer : procedure(target:GLenum; buffer:GLuint);cdecl;
+ glBindTexture : procedure(target:GLenum; texture:GLuint);cdecl;
+ glBlendFunc : procedure(sfactor:GLenum; dfactor:GLenum);cdecl;
+(* Const before type ignored *)
+ glBufferData : procedure(target:GLenum; size:GLsizeiptr; data:pGLvoid; usage:GLenum);cdecl;
+(* Const before type ignored *)
+ glBufferSubData : procedure(target:GLenum; offset:GLintptr; size:GLsizeiptr; data:pGLvoid);cdecl;
+ glClear : procedure(mask:GLbitfield);cdecl;
+ glClearColorx : procedure(red:GLclampx; green:GLclampx; blue:GLclampx; alpha:GLclampx);cdecl;
+ glClearDepthx : procedure(depth:GLclampx);cdecl;
+ glClearStencil : procedure(s:GLint);cdecl;
+ glClientActiveTexture : procedure(texture:GLenum);cdecl;
+(* Const before type ignored *)
+ glClipPlanex : procedure(plane:GLenum; equation:pGLfixed);cdecl;
+ glColor4ub : procedure(red:GLubyte; green:GLubyte; blue:GLubyte; alpha:GLubyte);cdecl;
+ glColor4x : procedure(red:GLfixed; green:GLfixed; blue:GLfixed; alpha:GLfixed);cdecl;
+ glColorMask : procedure(red:GLboolean; green:GLboolean; blue:GLboolean; alpha:GLboolean);cdecl;
+(* Const before type ignored *)
+ glColorPointer : procedure(size:GLint; _type:GLenum; stride:GLsizei; pointer:pGLvoid);cdecl;
+(* Const before type ignored *)
+ glCompressedTexImage2D : procedure(target:GLenum; level:GLint; internalformat:GLenum; width:GLsizei; height:GLsizei;
+ border:GLint; imageSize:GLsizei; data:pGLvoid);cdecl;
+(* Const before type ignored *)
+ glCompressedTexSubImage2D : procedure(target:GLenum; level:GLint; xoffset:GLint; yoffset:GLint; width:GLsizei;
+ height:GLsizei; format:GLenum; imageSize:GLsizei; data:pGLvoid);cdecl;
+ glCopyTexImage2D : procedure(target:GLenum; level:GLint; internalformat:GLenum; x:GLint; y:GLint;
+ width:GLsizei; height:GLsizei; border:GLint);cdecl;
+ glCopyTexSubImage2D : procedure(target:GLenum; level:GLint; xoffset:GLint; yoffset:GLint; x:GLint;
+ y:GLint; width:GLsizei; height:GLsizei);cdecl;
+ glCullFace : procedure(mode:GLenum);cdecl;
+(* Const before type ignored *)
+ glDeleteBuffers : procedure(n:GLsizei; buffers:pGLuint);cdecl;
+(* Const before type ignored *)
+ glDeleteTextures : procedure(n:GLsizei; textures:pGLuint);cdecl;
+ glDepthFunc : procedure(func:GLenum);cdecl;
+ glDepthMask : procedure(flag:GLboolean);cdecl;
+ glDepthRangex : procedure(zNear:GLclampx; zFar:GLclampx);cdecl;
+ glDisable : procedure(cap:GLenum);cdecl;
+ glDisableClientState : procedure(arry:GLenum);cdecl;
+ glDrawArrays : procedure(mode:GLenum; first:GLint; count:GLsizei);cdecl;
+(* Const before type ignored *)
+ glDrawElements : procedure(mode:GLenum; count:GLsizei; _type:GLenum; indices:pGLvoid);cdecl;
+ glEnable : procedure(cap:GLenum);cdecl;
+ glEnableClientState : procedure(arry:GLenum);cdecl;
+ glFinish : procedure;cdecl;
+ glFlush : procedure;cdecl;
+ glFogx : procedure(pname:GLenum; param:GLfixed);cdecl;
+(* Const before type ignored *)
+ glFogxv : procedure(pname:GLenum; params:pGLfixed);cdecl;
+ glFrontFace : procedure(mode:GLenum);cdecl;
+ glFrustumx : procedure(left:GLfixed; right:GLfixed; bottom:GLfixed; top:GLfixed; zNear:GLfixed;
+ zFar:GLfixed);cdecl;
+ glGetBooleanv : procedure(pname:GLenum; params:pGLboolean);cdecl;
+ glGetBufferParameteriv : procedure(target:GLenum; pname:GLenum; params:pGLint);cdecl;
+ glGetClipPlanex : procedure(pname:GLenum; eqn:array of GLfixed);cdecl;
+ glGenBuffers : procedure(n:GLsizei; buffers:pGLuint);cdecl;
+ glGenTextures : procedure(n:GLsizei; textures:pGLuint);cdecl;
+ glGetError : function:GLenum;cdecl;
+ glGetFixedv : procedure(pname:GLenum; params:pGLfixed);cdecl;
+ glGetIntegerv : procedure(pname:GLenum; params:pGLint);cdecl;
+ glGetLightxv : procedure(light:GLenum; pname:GLenum; params:pGLfixed);cdecl;
+ glGetMaterialxv : procedure(face:GLenum; pname:GLenum; params:pGLfixed);cdecl;
+ glGetPointerv : procedure(pname:GLenum; params:Ppointer);cdecl;
+(* Const before type ignored *)
+ glGetString : function(name:GLenum):PGLubyte;cdecl;
+ glGetTexEnviv : procedure(env:GLenum; pname:GLenum; params:pGLint);cdecl;
+ glGetTexEnvxv : procedure(env:GLenum; pname:GLenum; params:pGLfixed);cdecl;
+ glGetTexParameteriv : procedure(target:GLenum; pname:GLenum; params:pGLint);cdecl;
+ glGetTexParameterxv : procedure(target:GLenum; pname:GLenum; params:pGLfixed);cdecl;
+ glHint : procedure(target:GLenum; mode:GLenum);cdecl;
+ glIsBuffer : function(buffer:GLuint):GLboolean;cdecl;
+ glIsEnabled : function(cap:GLenum):GLboolean;cdecl;
+ glIsTexture : function(texture:GLuint):GLboolean;cdecl;
+ glLightModelx : procedure(pname:GLenum; param:GLfixed);cdecl;
+(* Const before type ignored *)
+ glLightModelxv : procedure(pname:GLenum; params:pGLfixed);cdecl;
+ glLightx : procedure(light:GLenum; pname:GLenum; param:GLfixed);cdecl;
+(* Const before type ignored *)
+ glLightxv : procedure(light:GLenum; pname:GLenum; params:pGLfixed);cdecl;
+ glLineWidthx : procedure(width:GLfixed);cdecl;
+ glLoadIdentity : procedure;cdecl;
+(* Const before type ignored *)
+ glLoadMatrixx : procedure(m:pGLfixed);cdecl;
+ glLogicOp : procedure(opcode:GLenum);cdecl;
+ glMaterialx : procedure(face:GLenum; pname:GLenum; param:GLfixed);cdecl;
+(* Const before type ignored *)
+ glMaterialxv : procedure(face:GLenum; pname:GLenum; params:pGLfixed);cdecl;
+ glMatrixMode : procedure(mode:GLenum);cdecl;
+(* Const before type ignored *)
+ glMultMatrixx : procedure(m:pGLfixed);cdecl;
+ glMultiTexCoord4x : procedure(target:GLenum; s:GLfixed; t:GLfixed; r:GLfixed; q:GLfixed);cdecl;
+ glNormal3x : procedure(nx:GLfixed; ny:GLfixed; nz:GLfixed);cdecl;
+(* Const before type ignored *)
+ glNormalPointer : procedure(_type:GLenum; stride:GLsizei; pointer:pGLvoid);cdecl;
+ glOrthox : procedure(left:GLfixed; right:GLfixed; bottom:GLfixed; top:GLfixed; zNear:GLfixed;
+ zFar:GLfixed);cdecl;
+ glPixelStorei : procedure(pname:GLenum; param:GLint);cdecl;
+ glPointParameterx : procedure(pname:GLenum; param:GLfixed);cdecl;
+(* Const before type ignored *)
+ glPointParameterxv : procedure(pname:GLenum; params:pGLfixed);cdecl;
+ glPointSizex : procedure(size:GLfixed);cdecl;
+ glPolygonOffsetx : procedure(factor:GLfixed; units:GLfixed);cdecl;
+ glPopMatrix : procedure;cdecl;
+ glPushMatrix : procedure;cdecl;
+ glReadPixels : procedure(x:GLint; y:GLint; width:GLsizei; height:GLsizei; format:GLenum;
+ _type:GLenum; pixels:pGLvoid);cdecl;
+ glRotatex : procedure(angle:GLfixed; x:GLfixed; y:GLfixed; z:GLfixed);cdecl;
+ glSampleCoverage : procedure(value:GLclampf; invert:GLboolean);cdecl;
+ glSampleCoveragex : procedure(value:GLclampx; invert:GLboolean);cdecl;
+ glScalex : procedure(x:GLfixed; y:GLfixed; z:GLfixed);cdecl;
+ glScissor : procedure(x:GLint; y:GLint; width:GLsizei; height:GLsizei);cdecl;
+ glShadeModel : procedure(mode:GLenum);cdecl;
+ glStencilFunc : procedure(func:GLenum; ref:GLint; mask:GLuint);cdecl;
+ glStencilMask : procedure(mask:GLuint);cdecl;
+ glStencilOp : procedure(fail:GLenum; zfail:GLenum; zpass:GLenum);cdecl;
+(* Const before type ignored *)
+ glTexCoordPointer : procedure(size:GLint; _type:GLenum; stride:GLsizei; pointer:pGLvoid);cdecl;
+ glTexEnvi : procedure(target:GLenum; pname:GLenum; param:GLint);cdecl;
+ glTexEnvx : procedure(target:GLenum; pname:GLenum; param:GLfixed);cdecl;
+(* Const before type ignored *)
+ glTexEnviv : procedure(target:GLenum; pname:GLenum; params:pGLint);cdecl;
+(* Const before type ignored *)
+ glTexEnvxv : procedure(target:GLenum; pname:GLenum; params:pGLfixed);cdecl;
+(* Const before type ignored *)
+ glTexImage2D : procedure(target:GLenum; level:GLint; internalformat:GLint; width:GLsizei; height:GLsizei;
+ border:GLint; format:GLenum; _type:GLenum; pixels:pGLvoid);cdecl;
+ glTexParameteri : procedure(target:GLenum; pname:GLenum; param:GLint);cdecl;
+ glTexParameterx : procedure(target:GLenum; pname:GLenum; param:GLfixed);cdecl;
+(* Const before type ignored *)
+ glTexParameteriv : procedure(target:GLenum; pname:GLenum; params:pGLint);cdecl;
+(* Const before type ignored *)
+ glTexParameterxv : procedure(target:GLenum; pname:GLenum; params:pGLfixed);cdecl;
+(* Const before type ignored *)
+ glTexSubImage2D : procedure(target:GLenum; level:GLint; xoffset:GLint; yoffset:GLint; width:GLsizei;
+ height:GLsizei; format:GLenum; _type:GLenum; pixels:pGLvoid);cdecl;
+ glTranslatex : procedure(x:GLfixed; y:GLfixed; z:GLfixed);cdecl;
+(* Const before type ignored *)
+ glVertexPointer : procedure(size:GLint; _type:GLenum; stride:GLsizei; pointer:pGLvoid);cdecl;
+ glViewport : procedure(x:GLint; y:GLint; width:GLsizei; height:GLsizei);cdecl;
+ {------------------------------------------------------------------------*
+ * Required OES extension functions
+ *------------------------------------------------------------------------ }
+ { GL_OES_read_format }
+
+ const
+ GL_OES_read_format = 1;
+ { GL_OES_compressed_paletted_texture }
+ GL_OES_compressed_paletted_texture = 1;
+ { GL_OES_point_size_array }
+ GL_OES_point_size_array = 1;
+(* Const before type ignored *)
+
+ var
+ glPointSizePointerOES : procedure(_type:GLenum; stride:GLsizei; pointer:pGLvoid);cdecl;
+ { GL_OES_point_sprite }
+
+ const
+ GL_OES_point_sprite = 1;
+
+implementation
+
+ uses
+ SysUtils, dynlibs, uConsole;
+
+ var
+ hlib : tlibhandle;
+
+
+ procedure Freegles11;
+ begin
+// FreeLibrary(hlib);
+ glAlphaFunc:=nil;
+ glClearColor:=nil;
+ glClearDepthf:=nil;
+ glClipPlanef:=nil;
+ glColor4f:=nil;
+ glDepthRangef:=nil;
+ glFogf:=nil;
+ glFogfv:=nil;
+ glFrustumf:=nil;
+ glGetClipPlanef:=nil;
+ glGetFloatv:=nil;
+ glGetLightfv:=nil;
+ glGetMaterialfv:=nil;
+ glGetTexEnvfv:=nil;
+ glGetTexParameterfv:=nil;
+ glLightModelf:=nil;
+ glLightModelfv:=nil;
+ glLightf:=nil;
+ glLightfv:=nil;
+ glLineWidth:=nil;
+ glLoadMatrixf:=nil;
+ glMaterialf:=nil;
+ glMaterialfv:=nil;
+ glMultMatrixf:=nil;
+ glMultiTexCoord4f:=nil;
+ glNormal3f:=nil;
+ glOrthof:=nil;
+ glPointParameterf:=nil;
+ glPointParameterfv:=nil;
+ glPointSize:=nil;
+ glPolygonOffset:=nil;
+ glRotatef:=nil;
+ glScalef:=nil;
+ glTexEnvf:=nil;
+ glTexEnvfv:=nil;
+ glTexParameterf:=nil;
+ glTexParameterfv:=nil;
+ glTranslatef:=nil;
+ glActiveTexture:=nil;
+ glAlphaFuncx:=nil;
+ glBindBuffer:=nil;
+ glBindTexture:=nil;
+ glBlendFunc:=nil;
+ glBufferData:=nil;
+ glBufferSubData:=nil;
+ glClear:=nil;
+ glClearColorx:=nil;
+ glClearDepthx:=nil;
+ glClearStencil:=nil;
+ glClientActiveTexture:=nil;
+ glClipPlanex:=nil;
+ glColor4ub:=nil;
+ glColor4x:=nil;
+ glColorMask:=nil;
+ glColorPointer:=nil;
+ glCompressedTexImage2D:=nil;
+ glCompressedTexSubImage2D:=nil;
+ glCopyTexImage2D:=nil;
+ glCopyTexSubImage2D:=nil;
+ glCullFace:=nil;
+ glDeleteBuffers:=nil;
+ glDeleteTextures:=nil;
+ glDepthFunc:=nil;
+ glDepthMask:=nil;
+ glDepthRangex:=nil;
+ glDisable:=nil;
+ glDisableClientState:=nil;
+ glDrawArrays:=nil;
+ glDrawElements:=nil;
+ glEnable:=nil;
+ glEnableClientState:=nil;
+ glFinish:=nil;
+ glFlush:=nil;
+ glFogx:=nil;
+ glFogxv:=nil;
+ glFrontFace:=nil;
+ glFrustumx:=nil;
+ glGetBooleanv:=nil;
+ glGetBufferParameteriv:=nil;
+ glGetClipPlanex:=nil;
+ glGenBuffers:=nil;
+ glGenTextures:=nil;
+ glGetError:=nil;
+ glGetFixedv:=nil;
+ glGetIntegerv:=nil;
+ glGetLightxv:=nil;
+ glGetMaterialxv:=nil;
+ glGetPointerv:=nil;
+ glGetString:=nil;
+ glGetTexEnviv:=nil;
+ glGetTexEnvxv:=nil;
+ glGetTexParameteriv:=nil;
+ glGetTexParameterxv:=nil;
+ glHint:=nil;
+ glIsBuffer:=nil;
+ glIsEnabled:=nil;
+ glIsTexture:=nil;
+ glLightModelx:=nil;
+ glLightModelxv:=nil;
+ glLightx:=nil;
+ glLightxv:=nil;
+ glLineWidthx:=nil;
+ glLoadIdentity:=nil;
+ glLoadMatrixx:=nil;
+ glLogicOp:=nil;
+ glMaterialx:=nil;
+ glMaterialxv:=nil;
+ glMatrixMode:=nil;
+ glMultMatrixx:=nil;
+ glMultiTexCoord4x:=nil;
+ glNormal3x:=nil;
+ glNormalPointer:=nil;
+ glOrthox:=nil;
+ glPixelStorei:=nil;
+ glPointParameterx:=nil;
+ glPointParameterxv:=nil;
+ glPointSizex:=nil;
+ glPolygonOffsetx:=nil;
+ glPopMatrix:=nil;
+ glPushMatrix:=nil;
+ glReadPixels:=nil;
+ glRotatex:=nil;
+ glSampleCoverage:=nil;
+ glSampleCoveragex:=nil;
+ glScalex:=nil;
+ glScissor:=nil;
+ glShadeModel:=nil;
+ glStencilFunc:=nil;
+ glStencilMask:=nil;
+ glStencilOp:=nil;
+ glTexCoordPointer:=nil;
+ glTexEnvi:=nil;
+ glTexEnvx:=nil;
+ glTexEnviv:=nil;
+ glTexEnvxv:=nil;
+ glTexImage2D:=nil;
+ glTexParameteri:=nil;
+ glTexParameterx:=nil;
+ glTexParameteriv:=nil;
+ glTexParameterxv:=nil;
+ glTexSubImage2D:=nil;
+ glTranslatex:=nil;
+ glVertexPointer:=nil;
+ glViewport:=nil;
+ glPointSizePointerOES:=nil;
+ end;
+
+
+ procedure Loadgles11(lib : pchar);
+ begin
+ Freegles11;
+ WriteToConsole('loading lib');
+ hlib:=LoadLibrary(lib);
+ if hlib=0 then
+ begin
+ WriteToConsole('crash');
+ raise Exception.Create(format('Could not load library: %s',[lib]));
+ end;
+ WriteToConsole('succeeded');
+ pointer(glAlphaFunc):=GetProcAddress(hlib,'glAlphaFunc');
+ pointer(glClearColor):=GetProcAddress(hlib,'glClearColor');
+ pointer(glClearDepthf):=GetProcAddress(hlib,'glClearDepthf');
+ pointer(glClipPlanef):=GetProcAddress(hlib,'glClipPlanef');
+ pointer(glColor4f):=GetProcAddress(hlib,'glColor4f');
+ pointer(glDepthRangef):=GetProcAddress(hlib,'glDepthRangef');
+ pointer(glFogf):=GetProcAddress(hlib,'glFogf');
+ pointer(glFogfv):=GetProcAddress(hlib,'glFogfv');
+ pointer(glFrustumf):=GetProcAddress(hlib,'glFrustumf');
+ pointer(glGetClipPlanef):=GetProcAddress(hlib,'glGetClipPlanef');
+ pointer(glGetFloatv):=GetProcAddress(hlib,'glGetFloatv');
+ pointer(glGetLightfv):=GetProcAddress(hlib,'glGetLightfv');
+ pointer(glGetMaterialfv):=GetProcAddress(hlib,'glGetMaterialfv');
+ pointer(glGetTexEnvfv):=GetProcAddress(hlib,'glGetTexEnvfv');
+ pointer(glGetTexParameterfv):=GetProcAddress(hlib,'glGetTexParameterfv');
+ pointer(glLightModelf):=GetProcAddress(hlib,'glLightModelf');
+ pointer(glLightModelfv):=GetProcAddress(hlib,'glLightModelfv');
+ pointer(glLightf):=GetProcAddress(hlib,'glLightf');
+ pointer(glLightfv):=GetProcAddress(hlib,'glLightfv');
+ pointer(glLineWidth):=GetProcAddress(hlib,'glLineWidth');
+ pointer(glLoadMatrixf):=GetProcAddress(hlib,'glLoadMatrixf');
+ pointer(glMaterialf):=GetProcAddress(hlib,'glMaterialf');
+ pointer(glMaterialfv):=GetProcAddress(hlib,'glMaterialfv');
+ pointer(glMultMatrixf):=GetProcAddress(hlib,'glMultMatrixf');
+ pointer(glMultiTexCoord4f):=GetProcAddress(hlib,'glMultiTexCoord4f');
+ pointer(glNormal3f):=GetProcAddress(hlib,'glNormal3f');
+ pointer(glOrthof):=GetProcAddress(hlib,'glOrthof');
+ pointer(glPointParameterf):=GetProcAddress(hlib,'glPointParameterf');
+ pointer(glPointParameterfv):=GetProcAddress(hlib,'glPointParameterfv');
+ pointer(glPointSize):=GetProcAddress(hlib,'glPointSize');
+ pointer(glPolygonOffset):=GetProcAddress(hlib,'glPolygonOffset');
+ pointer(glRotatef):=GetProcAddress(hlib,'glRotatef');
+ pointer(glScalef):=GetProcAddress(hlib,'glScalef');
+ pointer(glTexEnvf):=GetProcAddress(hlib,'glTexEnvf');
+ pointer(glTexEnvfv):=GetProcAddress(hlib,'glTexEnvfv');
+ pointer(glTexParameterf):=GetProcAddress(hlib,'glTexParameterf');
+ pointer(glTexParameterfv):=GetProcAddress(hlib,'glTexParameterfv');
+ pointer(glTranslatef):=GetProcAddress(hlib,'glTranslatef');
+ pointer(glActiveTexture):=GetProcAddress(hlib,'glActiveTexture');
+ pointer(glAlphaFuncx):=GetProcAddress(hlib,'glAlphaFuncx');
+ pointer(glBindBuffer):=GetProcAddress(hlib,'glBindBuffer');
+ pointer(glBindTexture):=GetProcAddress(hlib,'glBindTexture');
+ pointer(glBlendFunc):=GetProcAddress(hlib,'glBlendFunc');
+ pointer(glBufferData):=GetProcAddress(hlib,'glBufferData');
+ pointer(glBufferSubData):=GetProcAddress(hlib,'glBufferSubData');
+ pointer(glClear):=GetProcAddress(hlib,'glClear');
+ pointer(glClearColorx):=GetProcAddress(hlib,'glClearColorx');
+ pointer(glClearDepthx):=GetProcAddress(hlib,'glClearDepthx');
+ pointer(glClearStencil):=GetProcAddress(hlib,'glClearStencil');
+ pointer(glClientActiveTexture):=GetProcAddress(hlib,'glClientActiveTexture');
+ pointer(glClipPlanex):=GetProcAddress(hlib,'glClipPlanex');
+ pointer(glColor4ub):=GetProcAddress(hlib,'glColor4ub');
+ pointer(glColor4x):=GetProcAddress(hlib,'glColor4x');
+ pointer(glColorMask):=GetProcAddress(hlib,'glColorMask');
+ pointer(glColorPointer):=GetProcAddress(hlib,'glColorPointer');
+ pointer(glCompressedTexImage2D):=GetProcAddress(hlib,'glCompressedTexImage2D');
+ pointer(glCompressedTexSubImage2D):=GetProcAddress(hlib,'glCompressedTexSubImage2D');
+ pointer(glCopyTexImage2D):=GetProcAddress(hlib,'glCopyTexImage2D');
+ pointer(glCopyTexSubImage2D):=GetProcAddress(hlib,'glCopyTexSubImage2D');
+ pointer(glCullFace):=GetProcAddress(hlib,'glCullFace');
+ pointer(glDeleteBuffers):=GetProcAddress(hlib,'glDeleteBuffers');
+ pointer(glDeleteTextures):=GetProcAddress(hlib,'glDeleteTextures');
+ pointer(glDepthFunc):=GetProcAddress(hlib,'glDepthFunc');
+ pointer(glDepthMask):=GetProcAddress(hlib,'glDepthMask');
+ pointer(glDepthRangex):=GetProcAddress(hlib,'glDepthRangex');
+ pointer(glDisable):=GetProcAddress(hlib,'glDisable');
+ pointer(glDisableClientState):=GetProcAddress(hlib,'glDisableClientState');
+ pointer(glDrawArrays):=GetProcAddress(hlib,'glDrawArrays');
+ pointer(glDrawElements):=GetProcAddress(hlib,'glDrawElements');
+ pointer(glEnable):=GetProcAddress(hlib,'glEnable');
+ pointer(glEnableClientState):=GetProcAddress(hlib,'glEnableClientState');
+ pointer(glFinish):=GetProcAddress(hlib,'glFinish');
+ pointer(glFlush):=GetProcAddress(hlib,'glFlush');
+ pointer(glFogx):=GetProcAddress(hlib,'glFogx');
+ pointer(glFogxv):=GetProcAddress(hlib,'glFogxv');
+ pointer(glFrontFace):=GetProcAddress(hlib,'glFrontFace');
+ pointer(glFrustumx):=GetProcAddress(hlib,'glFrustumx');
+ pointer(glGetBooleanv):=GetProcAddress(hlib,'glGetBooleanv');
+ pointer(glGetBufferParameteriv):=GetProcAddress(hlib,'glGetBufferParameteriv');
+ pointer(glGetClipPlanex):=GetProcAddress(hlib,'glGetClipPlanex');
+ pointer(glGenBuffers):=GetProcAddress(hlib,'glGenBuffers');
+ pointer(glGenTextures):=GetProcAddress(hlib,'glGenTextures');
+ pointer(glGetError):=GetProcAddress(hlib,'glGetError');
+ pointer(glGetFixedv):=GetProcAddress(hlib,'glGetFixedv');
+ pointer(glGetIntegerv):=GetProcAddress(hlib,'glGetIntegerv');
+ pointer(glGetLightxv):=GetProcAddress(hlib,'glGetLightxv');
+ pointer(glGetMaterialxv):=GetProcAddress(hlib,'glGetMaterialxv');
+ pointer(glGetPointerv):=GetProcAddress(hlib,'glGetPointerv');
+ pointer(glGetString):=GetProcAddress(hlib,'glGetString');
+ pointer(glGetTexEnviv):=GetProcAddress(hlib,'glGetTexEnviv');
+ pointer(glGetTexEnvxv):=GetProcAddress(hlib,'glGetTexEnvxv');
+ pointer(glGetTexParameteriv):=GetProcAddress(hlib,'glGetTexParameteriv');
+ pointer(glGetTexParameterxv):=GetProcAddress(hlib,'glGetTexParameterxv');
+ pointer(glHint):=GetProcAddress(hlib,'glHint');
+ pointer(glIsBuffer):=GetProcAddress(hlib,'glIsBuffer');
+ pointer(glIsEnabled):=GetProcAddress(hlib,'glIsEnabled');
+ pointer(glIsTexture):=GetProcAddress(hlib,'glIsTexture');
+ pointer(glLightModelx):=GetProcAddress(hlib,'glLightModelx');
+ pointer(glLightModelxv):=GetProcAddress(hlib,'glLightModelxv');
+ pointer(glLightx):=GetProcAddress(hlib,'glLightx');
+ pointer(glLightxv):=GetProcAddress(hlib,'glLightxv');
+ pointer(glLineWidthx):=GetProcAddress(hlib,'glLineWidthx');
+ pointer(glLoadIdentity):=GetProcAddress(hlib,'glLoadIdentity');
+ pointer(glLoadMatrixx):=GetProcAddress(hlib,'glLoadMatrixx');
+ pointer(glLogicOp):=GetProcAddress(hlib,'glLogicOp');
+ pointer(glMaterialx):=GetProcAddress(hlib,'glMaterialx');
+ pointer(glMaterialxv):=GetProcAddress(hlib,'glMaterialxv');
+ pointer(glMatrixMode):=GetProcAddress(hlib,'glMatrixMode');
+ pointer(glMultMatrixx):=GetProcAddress(hlib,'glMultMatrixx');
+ pointer(glMultiTexCoord4x):=GetProcAddress(hlib,'glMultiTexCoord4x');
+ pointer(glNormal3x):=GetProcAddress(hlib,'glNormal3x');
+ pointer(glNormalPointer):=GetProcAddress(hlib,'glNormalPointer');
+ pointer(glOrthox):=GetProcAddress(hlib,'glOrthox');
+ pointer(glPixelStorei):=GetProcAddress(hlib,'glPixelStorei');
+ pointer(glPointParameterx):=GetProcAddress(hlib,'glPointParameterx');
+ pointer(glPointParameterxv):=GetProcAddress(hlib,'glPointParameterxv');
+ pointer(glPointSizex):=GetProcAddress(hlib,'glPointSizex');
+ pointer(glPolygonOffsetx):=GetProcAddress(hlib,'glPolygonOffsetx');
+ pointer(glPopMatrix):=GetProcAddress(hlib,'glPopMatrix');
+ pointer(glPushMatrix):=GetProcAddress(hlib,'glPushMatrix');
+ pointer(glReadPixels):=GetProcAddress(hlib,'glReadPixels');
+ pointer(glRotatex):=GetProcAddress(hlib,'glRotatex');
+ pointer(glSampleCoverage):=GetProcAddress(hlib,'glSampleCoverage');
+ pointer(glSampleCoveragex):=GetProcAddress(hlib,'glSampleCoveragex');
+ pointer(glScalex):=GetProcAddress(hlib,'glScalex');
+ pointer(glScissor):=GetProcAddress(hlib,'glScissor');
+ pointer(glShadeModel):=GetProcAddress(hlib,'glShadeModel');
+ pointer(glStencilFunc):=GetProcAddress(hlib,'glStencilFunc');
+ pointer(glStencilMask):=GetProcAddress(hlib,'glStencilMask');
+ pointer(glStencilOp):=GetProcAddress(hlib,'glStencilOp');
+ pointer(glTexCoordPointer):=GetProcAddress(hlib,'glTexCoordPointer');
+ pointer(glTexEnvi):=GetProcAddress(hlib,'glTexEnvi');
+ pointer(glTexEnvx):=GetProcAddress(hlib,'glTexEnvx');
+ pointer(glTexEnviv):=GetProcAddress(hlib,'glTexEnviv');
+ pointer(glTexEnvxv):=GetProcAddress(hlib,'glTexEnvxv');
+ pointer(glTexImage2D):=GetProcAddress(hlib,'glTexImage2D');
+ pointer(glTexParameteri):=GetProcAddress(hlib,'glTexParameteri');
+ pointer(glTexParameterx):=GetProcAddress(hlib,'glTexParameterx');
+ pointer(glTexParameteriv):=GetProcAddress(hlib,'glTexParameteriv');
+ pointer(glTexParameterxv):=GetProcAddress(hlib,'glTexParameterxv');
+ pointer(glTexSubImage2D):=GetProcAddress(hlib,'glTexSubImage2D');
+ pointer(glTranslatex):=GetProcAddress(hlib,'glTranslatex');
+ pointer(glVertexPointer):=GetProcAddress(hlib,'glVertexPointer');
+ pointer(glViewport):=GetProcAddress(hlib,'glViewport');
+ pointer(glPointSizePointerOES):=GetProcAddress(hlib,'glPointSizePointerOES');
+ end;
+
+procedure init;
+begin
+ WriteToConsole('init');
+ Loadgles11('libGLESv1_CM.so');
+end;
+
+
+initialization
+ Loadgles11('gles11');
+finalization
+ Freegles11;
+
+end.
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/project_files/Android-build/pushToDevice Wed Jun 22 23:56:08 2011 +0200
@@ -0,0 +1,5 @@
+#!/bin/bash
+
+adb push ./out/libhwengine.so /sdcard/libhwengine.so
+adb shell "su -c \"cat /sdcard/libhwengine.so > /data/data/org.hedgewars/lib/libhwengine.so \""
+