/* * Glide64 - Glide video plugin for Nintendo 64 emulators. * Copyright (c) 2002 Dave2001 * Copyright (c) 2003-2009 Sergey 'Gonetz' Lipski * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifdef _WIN32 #include #else // _WIN32 #include #include #endif // _WIN32 #include #include #include "glide.h" #include "main.h" void vbo_draw(); static int fct[4], source0[4], operand0[4], source1[4], operand1[4], source2[4], operand2[4]; static int fcta[4],sourcea0[4],operanda0[4],sourcea1[4],operanda1[4],sourcea2[4],operanda2[4]; static int alpha_ref, alpha_func; bool alpha_test = 0; float texture_env_color[4]; float ccolor0[4]; float ccolor1[4]; static float chroma_color[4]; int fog_enabled; static int chroma_enabled; static int chroma_other_color; static int chroma_other_alpha; static int dither_enabled; int blackandwhite0; int blackandwhite1; float fogStart,fogEnd; float fogColor[4]; #ifdef _WIN32 static float farF; static float nearF; #endif // _WIN32 int need_lambda[2]; float lambda_color[2][4]; // shaders variables int need_to_compile; static GLuint fragment_shader_object; static GLuint fragment_depth_shader_object; static GLuint vertex_shader_object; static GLuint program_object_default; static GLuint program_object_depth; static GLuint program_object; static int constant_color_location; static int ccolor0_location; static int ccolor1_location; static int first_color = 1; static int first_alpha = 1; static int first_texture0 = 1; static int first_texture1 = 1; static int tex0_combiner_ext = 0; static int tex1_combiner_ext = 0; static int c_combiner_ext = 0; static int a_combiner_ext = 0; #define GLSL_VERSION "100" #define SHADER_HEADER \ "#version " GLSL_VERSION " \n" \ "#define gl_Color vFrontColor \n" \ "#define gl_FrontColor vFrontColor \n" \ "#define gl_TexCoord vTexCoord \n" #define SHADER_VARYING \ "varying highp vec4 gl_FrontColor; \n" \ "varying highp vec4 gl_TexCoord[4]; \n" static const char* fragment_shader_header = SHADER_HEADER "precision lowp float; \n" "uniform sampler2D texture0; \n" "uniform sampler2D texture1; \n" "uniform sampler2D ditherTex; \n" "uniform vec4 constant_color; \n" "uniform vec4 ccolor0; \n" "uniform vec4 ccolor1; \n" "uniform vec4 chroma_color; \n" "uniform float lambda; \n" "uniform vec3 fogColor; \n" "uniform float alphaRef; \n" SHADER_VARYING " \n" "void test_chroma(vec4 ctexture1); \n" " \n" " \n" "void main() \n" "{ \n" ; // using gl_FragCoord is terribly slow on ATI and varying variables don't work for some unknown // reason, so we use the unused components of the texture2 coordinates static const char* fragment_shader_dither = " float dithx = (gl_TexCoord[2].b + 1.0)*0.5*1000.0; \n" " float dithy = (gl_TexCoord[2].a + 1.0)*0.5*1000.0; \n" " if(texture2D(ditherTex, vec2((dithx-32.0*floor(dithx/32.0))/32.0, \n" " (dithy-32.0*floor(dithy/32.0))/32.0)).a > 0.5) discard; \n" ; static const char* fragment_shader_default = " gl_FragColor = texture2D(texture0, vec2(gl_TexCoord[0])); \n" ; static const char* fragment_shader_readtex0color = " vec4 readtex0 = texture2D(texture0, vec2(gl_TexCoord[0])); \n" ; static const char* fragment_shader_readtex0bw = " vec4 readtex0 = texture2D(texture0, vec2(gl_TexCoord[0])); \n" " readtex0 = vec4(vec3(readtex0.b), \n" " readtex0.r + readtex0.g * 8.0 / 256.0); \n" ; static const char* fragment_shader_readtex0bw_2 = " vec4 readtex0 = vec4(dot(texture2D(texture0, vec2(gl_TexCoord[0])), vec4(1.0/3, 1.0/3, 1.0/3, 0))); \n" ; static const char* fragment_shader_readtex1color = " vec4 readtex1 = texture2D(texture1, vec2(gl_TexCoord[1])); \n" ; static const char* fragment_shader_readtex1bw = " vec4 readtex1 = texture2D(texture1, vec2(gl_TexCoord[1])); \n" " readtex1 = vec4(vec3(readtex1.b), \n" " readtex1.r + readtex1.g * 8.0 / 256.0); \n" ; static const char* fragment_shader_readtex1bw_2 = " vec4 readtex1 = vec4(dot(texture2D(texture1, vec2(gl_TexCoord[1])), vec4(1.0/3, 1.0/3, 1.0/3, 0))); \n" ; static const char* fragment_shader_fog = " float fog; \n" " fog = gl_TexCoord[0].b; \n" " gl_FragColor.rgb = mix(fogColor, gl_FragColor.rgb, fog); \n" ; static const char* fragment_shader_end = "if(gl_FragColor.a <= alphaRef) {discard;} \n" " \n" "} \n" ; static const char* vertex_shader = SHADER_HEADER "#define Z_MAX 65536.0 \n" "attribute highp vec4 aVertex; \n" "attribute highp vec4 aColor; \n" "attribute highp vec4 aMultiTexCoord0; \n" "attribute highp vec4 aMultiTexCoord1; \n" "attribute float aFog; \n" "uniform vec3 vertexOffset; \n" //Moved some calculations from grDrawXXX to shader "uniform vec4 textureSizes; \n" "uniform vec3 fogModeEndScale; \n" //0 = Mode, 1 = gl_Fog.end, 2 = gl_Fog.scale SHADER_VARYING " \n" "void main() \n" "{ \n" " float q = aVertex.w; \n" " float invertY = vertexOffset.z; \n" //Usually 1.0 but -1.0 when rendering to a texture (see inverted_culling grRenderBuffer) " gl_Position.x = (aVertex.x - vertexOffset.x) / vertexOffset.x; \n" " gl_Position.y = invertY *-(aVertex.y - vertexOffset.y) / vertexOffset.y; \n" " gl_Position.z = aVertex.z / Z_MAX; \n" " gl_Position.w = 1.0; \n" " gl_Position /= q; \n" " gl_FrontColor = aColor.bgra; \n" " \n" " gl_TexCoord[0] = vec4(aMultiTexCoord0.xy / q / textureSizes.xy,0,1); \n" " gl_TexCoord[1] = vec4(aMultiTexCoord1.xy / q / textureSizes.zw,0,1); \n" " \n" " float fogV = (1.0 / mix(q,aFog,fogModeEndScale[0])) / 255.0; \n" " //if(fogMode == 2) { \n" " // fogV = 1.0 / aFog / 255 \n" " //} \n" " \n" " float f = (fogModeEndScale[1] - fogV) * fogModeEndScale[2]; \n" " f = clamp(f, 0.0, 1.0); \n" " gl_TexCoord[0].b = f; \n" " gl_TexCoord[2].b = aVertex.x; \n" " gl_TexCoord[2].a = aVertex.y; \n" "} \n" ; static char fragment_shader_color_combiner[1024]; static char fragment_shader_alpha_combiner[1024]; static char fragment_shader_texture1[1024]; static char fragment_shader_texture0[1024]; static char fragment_shader_chroma[1024]; static char shader_log[2048]; void check_compile(GLuint shader) { GLint success; glGetShaderiv(shader,GL_COMPILE_STATUS,&success); if(!success) { char log[1024]; glGetShaderInfoLog(shader,1024,NULL,log); LOGINFO(log); } } void check_link(GLuint program) { GLint success; glGetProgramiv(program,GL_LINK_STATUS,&success); if(!success) { char log[1024]; glGetProgramInfoLog(program,1024,NULL,log); LOGINFO(log); } } void init_combiner() { int texture[4] = {0, 0, 0, 0}; glActiveTexture(GL_TEXTURE0); glEnable(GL_TEXTURE_2D); // creating a fake texture glBindTexture(GL_TEXTURE_2D, default_texture); glTexImage2D(GL_TEXTURE_2D, 0, 3, 2, 2, 0, GL_RGBA, GL_UNSIGNED_BYTE, texture); glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST); glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST); glActiveTexture(GL_TEXTURE1); glBindTexture(GL_TEXTURE_2D, default_texture); glEnable(GL_TEXTURE_2D); int texture0_location; int texture1_location; char *fragment_shader; int log_length; #ifndef ANDROID // depth shader fragment_depth_shader_object = glCreateShader(GL_FRAGMENT_SHADER); char s[128]; // ZIGGY convert a 565 texture into depth component sprintf(s, "gl_FragDepth = dot(texture2D(texture0, vec2(gl_TexCoord[0])), vec4(31*64*32, 63*32, 31, 0))*%g + %g; \n", zscale/2/65535.0, 1-zscale/2); fragment_shader = (char*)malloc(strlen(fragment_shader_header)+ strlen(s)+ strlen(fragment_shader_end)+1); strcpy(fragment_shader, fragment_shader_header); strcat(fragment_shader, s); strcat(fragment_shader, fragment_shader_end); glShaderSource(fragment_depth_shader_object, 1, (const GLchar**)&fragment_shader, NULL); free(fragment_shader); glCompileShader(fragment_depth_shader_object); check_compile(fragment_depth_shader_object); #endif // default shader fragment_shader_object = glCreateShader(GL_FRAGMENT_SHADER); fragment_shader = (char*)malloc(strlen(fragment_shader_header)+ strlen(fragment_shader_default)+ strlen(fragment_shader_end)+1); strcpy(fragment_shader, fragment_shader_header); strcat(fragment_shader, fragment_shader_default); strcat(fragment_shader, fragment_shader_end); glShaderSource(fragment_shader_object, 1, (const GLchar**)&fragment_shader, NULL); free(fragment_shader); glCompileShader(fragment_shader_object); check_compile(fragment_shader_object); vertex_shader_object = glCreateShader(GL_VERTEX_SHADER); glShaderSource(vertex_shader_object, 1, &vertex_shader, NULL); glCompileShader(vertex_shader_object); check_compile(vertex_shader_object); // depth program program_object = glCreateProgram(); program_object_depth = program_object; glAttachShader(program_object, fragment_depth_shader_object); glAttachShader(program_object, vertex_shader_object); glBindAttribLocation(program_object,POSITION_ATTR,"aPosition"); glBindAttribLocation(program_object,COLOUR_ATTR,"aColor"); glBindAttribLocation(program_object,TEXCOORD_0_ATTR,"aMultiTexCoord0"); glBindAttribLocation(program_object,TEXCOORD_1_ATTR,"aMultiTexCoord1"); glBindAttribLocation(program_object,FOG_ATTR,"aFog"); glLinkProgram(program_object); check_link(program_object); glUseProgram(program_object); texture0_location = glGetUniformLocation(program_object, "texture0"); texture1_location = glGetUniformLocation(program_object, "texture1"); glUniform1i(texture0_location, 0); glUniform1i(texture1_location, 1); // default program program_object = glCreateProgram(); program_object_default = program_object; glAttachShader(program_object, fragment_shader_object); glAttachShader(program_object, vertex_shader_object); glBindAttribLocation(program_object,POSITION_ATTR,"aPosition"); glBindAttribLocation(program_object,COLOUR_ATTR,"aColor"); glBindAttribLocation(program_object,TEXCOORD_0_ATTR,"aMultiTexCoord0"); glBindAttribLocation(program_object,TEXCOORD_1_ATTR,"aMultiTexCoord1"); glBindAttribLocation(program_object,FOG_ATTR,"aFog"); glLinkProgram(program_object); check_link(program_object); glUseProgram(program_object); texture0_location = glGetUniformLocation(program_object, "texture0"); texture1_location = glGetUniformLocation(program_object, "texture1"); glUniform1i(texture0_location, 0); glUniform1i(texture1_location, 1); strcpy(fragment_shader_color_combiner, ""); strcpy(fragment_shader_alpha_combiner, ""); strcpy(fragment_shader_texture1, "vec4 ctexture1 = texture2D(texture0, vec2(gl_TexCoord[0])); \n"); strcpy(fragment_shader_texture0, ""); first_color = 1; first_alpha = 1; first_texture0 = 1; first_texture1 = 1; need_to_compile = 0; fog_enabled = 0; chroma_enabled = 0; dither_enabled = 0; blackandwhite0 = 0; blackandwhite1 = 0; } void compile_chroma_shader() { strcpy(fragment_shader_chroma, "\nvoid test_chroma(vec4 ctexture1)\n{\n"); switch(chroma_other_alpha) { case GR_COMBINE_OTHER_ITERATED: strcat(fragment_shader_chroma, "float alpha = gl_Color.a; \n"); break; case GR_COMBINE_OTHER_TEXTURE: strcat(fragment_shader_chroma, "float alpha = ctexture1.a; \n"); break; case GR_COMBINE_OTHER_CONSTANT: strcat(fragment_shader_chroma, "float alpha = constant_color.a; \n"); break; default: display_warning("unknown compile_choma_shader_alpha : %x", chroma_other_alpha); } switch(chroma_other_color) { case GR_COMBINE_OTHER_ITERATED: strcat(fragment_shader_chroma, "vec4 color = vec4(vec3(gl_Color),alpha); \n"); break; case GR_COMBINE_OTHER_TEXTURE: strcat(fragment_shader_chroma, "vec4 color = vec4(vec3(ctexture1),alpha); \n"); break; case GR_COMBINE_OTHER_CONSTANT: strcat(fragment_shader_chroma, "vec4 color = vec4(vec3(constant_color),alpha); \n"); break; default: display_warning("unknown compile_choma_shader_alpha : %x", chroma_other_color); } strcat(fragment_shader_chroma, "if (color.rgb == chroma_color.rgb) discard; \n"); strcat(fragment_shader_chroma, "}"); } typedef struct _shader_program_key { int color_combiner; int alpha_combiner; int texture0_combiner; int texture1_combiner; int texture0_combinera; int texture1_combinera; int fog_enabled; int chroma_enabled; int dither_enabled; int blackandwhite0; int blackandwhite1; GLuint fragment_shader_object; GLuint program_object; int texture0_location; int texture1_location; int vertexOffset_location; int textureSizes_location; int fogModeEndScale_location; int fogColor_location; int alphaRef_location; int ditherTex_location; int chroma_color_location; } shader_program_key; static shader_program_key* shader_programs = NULL; static int number_of_programs = 0; static int color_combiner_key; static int alpha_combiner_key; static int texture0_combiner_key; static int texture1_combiner_key; static int texture0_combinera_key; static int texture1_combinera_key; void update_uniforms(shader_program_key prog) { glUniform1i(prog.texture0_location, 0); glUniform1i(prog.texture1_location, 1); glUniform3f(prog.vertexOffset_location,widtho,heighto,inverted_culling ? -1.0f : 1.0f); glUniform4f(prog.textureSizes_location,tex0_width,tex0_height,tex1_width,tex1_height); glUniform3f(prog.fogModeEndScale_location, fog_enabled != 2 ? 0.0f : 1.0f, fogEnd, 1.0f / (fogEnd - fogStart) ); if(prog.fogColor_location != -1) { glUniform3f(prog.fogColor_location,fogColor[0],fogColor[1],fogColor[2]); } glUniform1f(prog.alphaRef_location,alpha_test ? alpha_ref/255.0f : -1.0f); constant_color_location = glGetUniformLocation(program_object, "constant_color"); glUniform4f(constant_color_location, texture_env_color[0], texture_env_color[1], texture_env_color[2], texture_env_color[3]); ccolor0_location = glGetUniformLocation(program_object, "ccolor0"); glUniform4f(ccolor0_location, ccolor0[0], ccolor0[1], ccolor0[2], ccolor0[3]); ccolor1_location = glGetUniformLocation(program_object, "ccolor1"); glUniform4f(ccolor1_location, ccolor1[0], ccolor1[1], ccolor1[2], ccolor1[3]); glUniform4f(prog.chroma_color_location, chroma_color[0], chroma_color[1], chroma_color[2], chroma_color[3]); if(dither_enabled) { glUniform1i(prog.ditherTex_location, 2); } set_lambda(); } void disable_textureSizes() { int textureSizes_location = glGetUniformLocation(program_object_default,"textureSizes"); glUniform4f(textureSizes_location,1,1,1,1); } void compile_shader() { int texture0_location; int texture1_location; int ditherTex_location; int vertexOffset_location; int textureSizes_location; char *fragment_shader; int i; int chroma_color_location; int log_length; need_to_compile = 0; for(i=0; i> 24) & 0xFF) / 255.0f; texture_env_color[0] = ((value >> 16) & 0xFF) / 255.0f; texture_env_color[1] = ((value >> 8) & 0xFF) / 255.0f; texture_env_color[2] = (value & 0xFF) / 255.0f; break; case GR_COLORFORMAT_RGBA: texture_env_color[0] = ((value >> 24) & 0xFF) / 255.0f; texture_env_color[1] = ((value >> 16) & 0xFF) / 255.0f; texture_env_color[2] = ((value >> 8) & 0xFF) / 255.0f; texture_env_color[3] = (value & 0xFF) / 255.0f; break; default: display_warning("grConstantColorValue: unknown color format : %x", lfb_color_fmt); } vbo_draw(); constant_color_location = glGetUniformLocation(program_object, "constant_color"); glUniform4f(constant_color_location, texture_env_color[0], texture_env_color[1], texture_env_color[2], texture_env_color[3]); } void writeGLSLColorOther(int other) { switch(other) { case GR_COMBINE_OTHER_ITERATED: strcat(fragment_shader_color_combiner, "vec4 color_other = gl_Color; \n"); break; case GR_COMBINE_OTHER_TEXTURE: strcat(fragment_shader_color_combiner, "vec4 color_other = ctexture1; \n"); break; case GR_COMBINE_OTHER_CONSTANT: strcat(fragment_shader_color_combiner, "vec4 color_other = constant_color; \n"); break; default: display_warning("unknown writeGLSLColorOther : %x", other); } } void writeGLSLColorLocal(int local) { switch(local) { case GR_COMBINE_LOCAL_ITERATED: strcat(fragment_shader_color_combiner, "vec4 color_local = gl_Color; \n"); break; case GR_COMBINE_LOCAL_CONSTANT: strcat(fragment_shader_color_combiner, "vec4 color_local = constant_color; \n"); break; default: display_warning("unknown writeGLSLColorLocal : %x", local); } } void writeGLSLColorFactor(int factor, int local, int need_local, int other, int need_other) { switch(factor) { case GR_COMBINE_FACTOR_ZERO: strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(0.0); \n"); break; case GR_COMBINE_FACTOR_LOCAL: if(need_local) writeGLSLColorLocal(local); strcat(fragment_shader_color_combiner, "vec4 color_factor = color_local; \n"); break; case GR_COMBINE_FACTOR_OTHER_ALPHA: if(need_other) writeGLSLColorOther(other); strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(color_other.a); \n"); break; case GR_COMBINE_FACTOR_LOCAL_ALPHA: if(need_local) writeGLSLColorLocal(local); strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(color_local.a); \n"); break; case GR_COMBINE_FACTOR_TEXTURE_ALPHA: strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(ctexture1.a); \n"); break; case GR_COMBINE_FACTOR_TEXTURE_RGB: strcat(fragment_shader_color_combiner, "vec4 color_factor = ctexture1; \n"); break; case GR_COMBINE_FACTOR_ONE: strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(1.0); \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL: if(need_local) writeGLSLColorLocal(local); strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(1.0) - color_local; \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_OTHER_ALPHA: if(need_other) writeGLSLColorOther(other); strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(1.0) - vec4(color_other.a); \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL_ALPHA: if(need_local) writeGLSLColorLocal(local); strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(1.0) - vec4(color_local.a); \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_TEXTURE_ALPHA: strcat(fragment_shader_color_combiner, "vec4 color_factor = vec4(1.0) - vec4(ctexture1.a); \n"); break; default: display_warning("unknown writeGLSLColorFactor : %x", factor); } } FX_ENTRY void FX_CALL grColorCombine( GrCombineFunction_t function, GrCombineFactor_t factor, GrCombineLocal_t local, GrCombineOther_t other, FxBool invert ) { LOG("grColorCombine(%d,%d,%d,%d,%d)\r\n", function, factor, local, other, invert); static int last_function = 0; static int last_factor = 0; static int last_local = 0; static int last_other = 0; if(last_function == function && last_factor == factor && last_local == local && last_other == other && first_color == 0 && !c_combiner_ext) return; first_color = 0; c_combiner_ext = 0; last_function = function; last_factor = factor; last_local = local; last_other = other; if (invert) display_warning("grColorCombine : inverted result"); color_combiner_key = function | (factor << 4) | (local << 8) | (other << 10); chroma_other_color = other; strcpy(fragment_shader_color_combiner, ""); switch(function) { case GR_COMBINE_FUNCTION_ZERO: strcat(fragment_shader_color_combiner, "gl_FragColor = vec4(0.0); \n"); break; case GR_COMBINE_FUNCTION_LOCAL: writeGLSLColorLocal(local); strcat(fragment_shader_color_combiner, "gl_FragColor = color_local; \n"); break; case GR_COMBINE_FUNCTION_LOCAL_ALPHA: writeGLSLColorLocal(local); strcat(fragment_shader_color_combiner, "gl_FragColor = vec4(color_local.a); \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER: writeGLSLColorOther(other); writeGLSLColorFactor(factor,local,1,other,0); strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * color_other; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL: writeGLSLColorLocal(local); writeGLSLColorOther(other); writeGLSLColorFactor(factor,local,0,other,0); strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * color_other + color_local; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL_ALPHA: writeGLSLColorLocal(local); writeGLSLColorOther(other); writeGLSLColorFactor(factor,local,0,other,0); strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * color_other + vec4(color_local.a); \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL: writeGLSLColorLocal(local); writeGLSLColorOther(other); writeGLSLColorFactor(factor,local,0,other,0); strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * (color_other - color_local); \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL: writeGLSLColorLocal(local); writeGLSLColorOther(other); writeGLSLColorFactor(factor,local,0,other,0); strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * (color_other - color_local) + color_local; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL_ALPHA: writeGLSLColorLocal(local); writeGLSLColorOther(other); writeGLSLColorFactor(factor,local,0,other,0); strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * (color_other - color_local) + vec4(color_local.a); \n"); break; case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL: writeGLSLColorLocal(local); writeGLSLColorFactor(factor,local,0,other,1); strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * (-color_local) + color_local; \n"); break; case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL_ALPHA: writeGLSLColorLocal(local); writeGLSLColorFactor(factor,local,0,other,1); strcat(fragment_shader_color_combiner, "gl_FragColor = color_factor * (-color_local) + vec4(color_local.a); \n"); break; default: strcpy(fragment_shader_color_combiner, fragment_shader_default); display_warning("grColorCombine : unknown function : %x", function); } //compile_shader(); need_to_compile = 1; } /* int setOtherAlphaSource(int other) { switch(other) { case GR_COMBINE_OTHER_ITERATED: return GL_PRIMARY_COLOR_ARB; break; case GR_COMBINE_OTHER_TEXTURE: return GL_PREVIOUS_ARB; break; case GR_COMBINE_OTHER_CONSTANT: return GL_CONSTANT_ARB; break; default: display_warning("unknwown other alpha source : %x", other); } return 0; } int setLocalAlphaSource(int local) { switch(local) { case GR_COMBINE_LOCAL_ITERATED: return GL_PRIMARY_COLOR_ARB; break; case GR_COMBINE_LOCAL_CONSTANT: return GL_CONSTANT_ARB; break; default: display_warning("unknwown local alpha source : %x", local); } return 0; } */ void writeGLSLAlphaOther(int other) { switch(other) { case GR_COMBINE_OTHER_ITERATED: strcat(fragment_shader_alpha_combiner, "float alpha_other = gl_Color.a; \n"); break; case GR_COMBINE_OTHER_TEXTURE: strcat(fragment_shader_alpha_combiner, "float alpha_other = ctexture1.a; \n"); break; case GR_COMBINE_OTHER_CONSTANT: strcat(fragment_shader_alpha_combiner, "float alpha_other = constant_color.a; \n"); break; default: display_warning("unknown writeGLSLAlphaOther : %x", other); } } void writeGLSLAlphaLocal(int local) { switch(local) { case GR_COMBINE_LOCAL_ITERATED: strcat(fragment_shader_alpha_combiner, "float alpha_local = gl_Color.a; \n"); break; case GR_COMBINE_LOCAL_CONSTANT: strcat(fragment_shader_alpha_combiner, "float alpha_local = constant_color.a; \n"); break; default: display_warning("unknown writeGLSLAlphaLocal : %x", local); } } void writeGLSLAlphaFactor(int factor, int local, int need_local, int other, int need_other) { switch(factor) { case GR_COMBINE_FACTOR_ZERO: strcat(fragment_shader_alpha_combiner, "float alpha_factor = 0.0; \n"); break; case GR_COMBINE_FACTOR_LOCAL: if(need_local) writeGLSLAlphaLocal(local); strcat(fragment_shader_alpha_combiner, "float alpha_factor = alpha_local; \n"); break; case GR_COMBINE_FACTOR_OTHER_ALPHA: if(need_other) writeGLSLAlphaOther(other); strcat(fragment_shader_alpha_combiner, "float alpha_factor = alpha_other; \n"); break; case GR_COMBINE_FACTOR_LOCAL_ALPHA: if(need_local) writeGLSLAlphaLocal(local); strcat(fragment_shader_alpha_combiner, "float alpha_factor = alpha_local; \n"); break; case GR_COMBINE_FACTOR_TEXTURE_ALPHA: strcat(fragment_shader_alpha_combiner, "float alpha_factor = ctexture1.a; \n"); break; case GR_COMBINE_FACTOR_ONE: strcat(fragment_shader_alpha_combiner, "float alpha_factor = 1.0; \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL: if(need_local) writeGLSLAlphaLocal(local); strcat(fragment_shader_alpha_combiner, "float alpha_factor = 1.0 - alpha_local; \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_OTHER_ALPHA: if(need_other) writeGLSLAlphaOther(other); strcat(fragment_shader_alpha_combiner, "float alpha_factor = 1.0 - alpha_other; \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL_ALPHA: if(need_local) writeGLSLAlphaLocal(local); strcat(fragment_shader_alpha_combiner, "float alpha_factor = 1.0 - alpha_local; \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_TEXTURE_ALPHA: strcat(fragment_shader_alpha_combiner, "float alpha_factor = 1.0 - ctexture1.a; \n"); break; default: display_warning("unknown writeGLSLAlphaFactor : %x", factor); } } FX_ENTRY void FX_CALL grAlphaCombine( GrCombineFunction_t function, GrCombineFactor_t factor, GrCombineLocal_t local, GrCombineOther_t other, FxBool invert ) { LOG("grAlphaCombine(%d,%d,%d,%d,%d)\r\n", function, factor, local, other, invert); static int last_function = 0; static int last_factor = 0; static int last_local = 0; static int last_other = 0; if(last_function == function && last_factor == factor && last_local == local && last_other == other && first_alpha == 0 && !a_combiner_ext) return; first_alpha = 0; a_combiner_ext = 0; last_function = function; last_factor = factor; last_local = local; last_other = other; if (invert) display_warning("grAlphaCombine : inverted result"); alpha_combiner_key = function | (factor << 4) | (local << 8) | (other << 10); chroma_other_alpha = other; strcpy(fragment_shader_alpha_combiner, ""); switch(function) { case GR_COMBINE_FUNCTION_ZERO: strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = 0.0; \n"); break; case GR_COMBINE_FUNCTION_LOCAL: writeGLSLAlphaLocal(local); strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_local; \n"); break; case GR_COMBINE_FUNCTION_LOCAL_ALPHA: writeGLSLAlphaLocal(local); strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_local; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER: writeGLSLAlphaOther(other); writeGLSLAlphaFactor(factor,local,1,other,0); strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * alpha_other; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL: writeGLSLAlphaLocal(local); writeGLSLAlphaOther(other); writeGLSLAlphaFactor(factor,local,0,other,0); strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * alpha_other + alpha_local; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL_ALPHA: writeGLSLAlphaLocal(local); writeGLSLAlphaOther(other); writeGLSLAlphaFactor(factor,local,0,other,0); strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * alpha_other + alpha_local; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL: writeGLSLAlphaLocal(local); writeGLSLAlphaOther(other); writeGLSLAlphaFactor(factor,local,0,other,0); strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * (alpha_other - alpha_local); \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL: writeGLSLAlphaLocal(local); writeGLSLAlphaOther(other); writeGLSLAlphaFactor(factor,local,0,other,0); strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * (alpha_other - alpha_local) + alpha_local; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL_ALPHA: writeGLSLAlphaLocal(local); writeGLSLAlphaOther(other); writeGLSLAlphaFactor(factor,local,0,other,0); strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * (alpha_other - alpha_local) + alpha_local; \n"); break; case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL: writeGLSLAlphaLocal(local); writeGLSLAlphaFactor(factor,local,0,other,1); strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * (-alpha_local) + alpha_local; \n"); break; case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL_ALPHA: writeGLSLAlphaLocal(local); writeGLSLAlphaFactor(factor,local,0,other,1); strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = alpha_factor * (-alpha_local) + alpha_local; \n"); break; default: display_warning("grAlphaCombine : unknown function : %x", function); } //compile_shader(); need_to_compile = 1; } void writeGLSLTextureColorFactor(int num_tex, int factor) { switch(factor) { case GR_COMBINE_FACTOR_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(0.0); \n"); break; case GR_COMBINE_FACTOR_LOCAL: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 texture0_color_factor = readtex0; \n"); else strcat(fragment_shader_texture1, "vec4 texture1_color_factor = readtex1; \n"); break; case GR_COMBINE_FACTOR_OTHER_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(ctexture0.a); \n"); break; case GR_COMBINE_FACTOR_LOCAL_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(readtex0.a); \n"); else strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(readtex1.a); \n"); break; case GR_COMBINE_FACTOR_DETAIL_FACTOR: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(lambda); \n"); else strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(lambda); \n"); break; case GR_COMBINE_FACTOR_ONE: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(1.0); \n"); else strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(1.0); \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(1.0) - readtex0; \n"); else strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(1.0) - readtex1; \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_OTHER_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(1.0) - vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(1.0) - vec4(ctexture0.a); \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(1.0) - vec4(readtex0.a); \n"); else strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(1.0) - vec4(readtex1.a); \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_DETAIL_FACTOR: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 texture0_color_factor = vec4(1.0) - vec4(lambda); \n"); else strcat(fragment_shader_texture1, "vec4 texture1_color_factor = vec4(1.0) - vec4(lambda); \n"); break; default: display_warning("unknown writeGLSLTextureColorFactor : %x", factor); } } void writeGLSLTextureAlphaFactor(int num_tex, int factor) { switch(factor) { case GR_COMBINE_FACTOR_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "float texture0_alpha_factor = 0.0; \n"); else strcat(fragment_shader_texture1, "float texture1_alpha_factor = 0.0; \n"); break; case GR_COMBINE_FACTOR_LOCAL: if(num_tex == 0) strcat(fragment_shader_texture0, "float texture0_alpha_factor = readtex0.a; \n"); else strcat(fragment_shader_texture1, "float texture1_alpha_factor = readtex1.a; \n"); break; case GR_COMBINE_FACTOR_OTHER_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "float texture0_alpha_factor = 0.0; \n"); else strcat(fragment_shader_texture1, "float texture1_alpha_factor = ctexture0.a; \n"); break; case GR_COMBINE_FACTOR_LOCAL_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "float texture0_alpha_factor = readtex0.a; \n"); else strcat(fragment_shader_texture1, "float texture1_alpha_factor = readtex1.a; \n"); break; case GR_COMBINE_FACTOR_DETAIL_FACTOR: if(num_tex == 0) strcat(fragment_shader_texture0, "float texture0_alpha_factor = lambda; \n"); else strcat(fragment_shader_texture1, "float texture1_alpha_factor = lambda; \n"); break; case GR_COMBINE_FACTOR_ONE: if(num_tex == 0) strcat(fragment_shader_texture0, "float texture0_alpha_factor = 1.0; \n"); else strcat(fragment_shader_texture1, "float texture1_alpha_factor = 1.0; \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL: if(num_tex == 0) strcat(fragment_shader_texture0, "float texture0_alpha_factor = 1.0 - readtex0.a; \n"); else strcat(fragment_shader_texture1, "float texture1_alpha_factor = 1.0 - readtex1.a; \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_OTHER_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "float texture0_alpha_factor = 1.0 - 0.0; \n"); else strcat(fragment_shader_texture1, "float texture1_alpha_factor = 1.0 - ctexture0.a; \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_LOCAL_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "float texture0_alpha_factor = 1.0 - readtex0.a; \n"); else strcat(fragment_shader_texture1, "float texture1_alpha_factor = 1.0 - readtex1.a; \n"); break; case GR_COMBINE_FACTOR_ONE_MINUS_DETAIL_FACTOR: if(num_tex == 0) strcat(fragment_shader_texture0, "float texture0_alpha_factor = 1.0 - lambda; \n"); else strcat(fragment_shader_texture1, "float texture1_alpha_factor = 1.0 - lambda; \n"); break; default: display_warning("unknown writeGLSLTextureAlphaFactor : %x", factor); } } FX_ENTRY void FX_CALL grTexCombine( GrChipID_t tmu, GrCombineFunction_t rgb_function, GrCombineFactor_t rgb_factor, GrCombineFunction_t alpha_function, GrCombineFactor_t alpha_factor, FxBool rgb_invert, FxBool alpha_invert ) { LOG("grTexCombine(%d,%d,%d,%d,%d,%d,%d)\r\n", tmu, rgb_function, rgb_factor, alpha_function, alpha_factor, rgb_invert, alpha_invert); int num_tex; if (tmu == GR_TMU0) num_tex = 1; else num_tex = 0; if(num_tex == 0) { static int last_function = 0; static int last_factor = 0; static int last_afunction = 0; static int last_afactor = 0; static int last_rgb_invert = 0; if(last_function == rgb_function && last_factor == rgb_factor && last_afunction == alpha_function && last_afactor == alpha_factor && last_rgb_invert == rgb_invert && first_texture0 == 0 && !tex0_combiner_ext) return; first_texture0 = 0; tex0_combiner_ext = 0; last_function = rgb_function; last_factor = rgb_factor; last_afunction = alpha_function; last_afactor = alpha_factor; last_rgb_invert= rgb_invert; texture0_combiner_key = rgb_function | (rgb_factor << 4) | (alpha_function << 8) | (alpha_factor << 12) | (rgb_invert << 16); texture0_combinera_key = 0; strcpy(fragment_shader_texture0, ""); } else { static int last_function = 0; static int last_factor = 0; static int last_afunction = 0; static int last_afactor = 0; static int last_rgb_invert = 0; if(last_function == rgb_function && last_factor == rgb_factor && last_afunction == alpha_function && last_afactor == alpha_factor && last_rgb_invert == rgb_invert && first_texture1 == 0 && !tex1_combiner_ext) return; first_texture1 = 0; tex1_combiner_ext = 0; last_function = rgb_function; last_factor = rgb_factor; last_afunction = alpha_function; last_afactor = alpha_factor; last_rgb_invert = rgb_invert; texture1_combiner_key = rgb_function | (rgb_factor << 4) | (alpha_function << 8) | (alpha_factor << 12) | (rgb_invert << 16); texture1_combinera_key = 0; strcpy(fragment_shader_texture1, ""); } switch(rgb_function) { case GR_COMBINE_FUNCTION_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctexture0 = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctexture1 = vec4(0.0); \n"); break; case GR_COMBINE_FUNCTION_LOCAL: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctexture0 = readtex0; \n"); else strcat(fragment_shader_texture1, "vec4 ctexture1 = readtex1; \n"); break; case GR_COMBINE_FUNCTION_LOCAL_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctexture0 = vec4(readtex0.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctexture1 = vec4(readtex1.a); \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER: writeGLSLTextureColorFactor(num_tex, rgb_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * ctexture0; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL: writeGLSLTextureColorFactor(num_tex, rgb_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * vec4(0.0) + readtex0; \n"); else strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * ctexture0 + readtex1; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL_ALPHA: writeGLSLTextureColorFactor(num_tex, rgb_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * vec4(0.0) + vec4(readtex0.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * ctexture0 + vec4(readtex1.a); \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL: writeGLSLTextureColorFactor(num_tex, rgb_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * (vec4(0.0) - readtex0); \n"); else strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * (ctexture0 - readtex1); \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL: writeGLSLTextureColorFactor(num_tex, rgb_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * (vec4(0.0) - readtex0) + readtex0; \n"); else strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * (ctexture0 - readtex1) + readtex1; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL_ALPHA: writeGLSLTextureColorFactor(num_tex, rgb_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * (vec4(0.0) - readtex0) + vec4(readtex0.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * (ctexture0 - readtex1) + vec4(readtex1.a); \n"); break; case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL: writeGLSLTextureColorFactor(num_tex, rgb_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * (-readtex0) + readtex0; \n"); else strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * (-readtex1) + readtex1; \n"); break; case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL_ALPHA: writeGLSLTextureColorFactor(num_tex, rgb_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctexture0 = texture0_color_factor * (-readtex0) + vec4(readtex0.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctexture1 = texture1_color_factor * (-readtex1) + vec4(readtex1.a); \n"); break; default: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctexture0 = readtex0; \n"); else strcat(fragment_shader_texture1, "vec4 ctexture1 = readtex1; \n"); display_warning("grTextCombine : unknown rgb function : %x", rgb_function); } if (rgb_invert) { if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0 = vec4(1.0) - ctexture0; \n"); else strcat(fragment_shader_texture1, "ctexture1 = vec4(1.0) - ctexture1; \n"); } switch(alpha_function) { case GR_COMBINE_FACTOR_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctexture1.a = 0.0; \n"); break; case GR_COMBINE_FUNCTION_LOCAL: if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = readtex0.a; \n"); else strcat(fragment_shader_texture1, "ctexture1.a = readtex1.a; \n"); break; case GR_COMBINE_FUNCTION_LOCAL_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = readtex0.a; \n"); else strcat(fragment_shader_texture1, "ctexture1.a = readtex1.a; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER: writeGLSLTextureAlphaFactor(num_tex, alpha_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * 0.0; \n"); else strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * ctexture0.a; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL: writeGLSLTextureAlphaFactor(num_tex, alpha_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * 0.0 + readtex0.a; \n"); else strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * ctexture0.a + readtex1.a; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_ADD_LOCAL_ALPHA: writeGLSLTextureAlphaFactor(num_tex, alpha_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * 0.0 + readtex0.a; \n"); else strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * ctexture0.a + readtex1.a; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL: writeGLSLTextureAlphaFactor(num_tex, alpha_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * (0.0 - readtex0.a); \n"); else strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * (ctexture0.a - readtex1.a); \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL: writeGLSLTextureAlphaFactor(num_tex, alpha_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * (0.0 - readtex0.a) + readtex0.a; \n"); else strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * (ctexture0.a - readtex1.a) + readtex1.a; \n"); break; case GR_COMBINE_FUNCTION_SCALE_OTHER_MINUS_LOCAL_ADD_LOCAL_ALPHA: writeGLSLTextureAlphaFactor(num_tex, alpha_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * (0.0 - readtex0.a) + readtex0.a; \n"); else strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * (ctexture0.a - readtex1.a) + readtex1.a; \n"); break; case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL: writeGLSLTextureAlphaFactor(num_tex, alpha_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * (-readtex0.a) + readtex0.a; \n"); else strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * (-readtex1.a) + readtex1.a; \n"); break; case GR_COMBINE_FUNCTION_SCALE_MINUS_LOCAL_ADD_LOCAL_ALPHA: writeGLSLTextureAlphaFactor(num_tex, alpha_factor); if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = texture0_alpha_factor * (-readtex0.a) + readtex0.a; \n"); else strcat(fragment_shader_texture1, "ctexture1.a = texture1_alpha_factor * (-readtex1.a) + readtex1.a; \n"); break; default: if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = readtex0.a; \n"); else strcat(fragment_shader_texture1, "ctexture1.a = ctexture0.a; \n"); display_warning("grTextCombine : unknown alpha function : %x", alpha_function); } if (alpha_invert) { if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = 1.0 - ctexture0.a; \n"); else strcat(fragment_shader_texture1, "ctexture1.a = 1.0 - ctexture1.a; \n"); } need_to_compile = 1; } FX_ENTRY void FX_CALL grAlphaBlendFunction( GrAlphaBlendFnc_t rgb_sf, GrAlphaBlendFnc_t rgb_df, GrAlphaBlendFnc_t alpha_sf, GrAlphaBlendFnc_t alpha_df ) { int sfactorRGB = 0, dfactorRGB = 0, sfactorAlpha = 0, dfactorAlpha = 0; LOG("grAlphaBlendFunction(%d,%d,%d,%d)\r\n", rgb_sf, rgb_df, alpha_sf, alpha_df); switch(rgb_sf) { case GR_BLEND_ZERO: sfactorRGB = GL_ZERO; break; case GR_BLEND_SRC_ALPHA: sfactorRGB = GL_SRC_ALPHA; break; case GR_BLEND_ONE: sfactorRGB = GL_ONE; break; case GR_BLEND_ONE_MINUS_SRC_ALPHA: sfactorRGB = GL_ONE_MINUS_SRC_ALPHA; break; default: display_warning("grAlphaBlendFunction : rgb_sf = %x", rgb_sf); } switch(rgb_df) { case GR_BLEND_ZERO: dfactorRGB = GL_ZERO; break; case GR_BLEND_SRC_ALPHA: dfactorRGB = GL_SRC_ALPHA; break; case GR_BLEND_ONE: dfactorRGB = GL_ONE; break; case GR_BLEND_ONE_MINUS_SRC_ALPHA: dfactorRGB = GL_ONE_MINUS_SRC_ALPHA; break; default: display_warning("grAlphaBlendFunction : rgb_df = %x", rgb_df); } switch(alpha_sf) { case GR_BLEND_ZERO: sfactorAlpha = GL_ZERO; break; case GR_BLEND_ONE: sfactorAlpha = GL_ONE; break; default: display_warning("grAlphaBlendFunction : alpha_sf = %x", alpha_sf); } switch(alpha_df) { case GR_BLEND_ZERO: dfactorAlpha = GL_ZERO; break; case GR_BLEND_ONE: dfactorAlpha = GL_ONE; break; default: display_warning("grAlphaBlendFunction : alpha_df = %x", alpha_df); } glEnable(GL_BLEND); glBlendFuncSeparate(sfactorRGB, dfactorRGB, sfactorAlpha, dfactorAlpha); /* if (blend_func_separate_support) glBlendFuncSeparateEXT(sfactorRGB, dfactorRGB, sfactorAlpha, dfactorAlpha); else glBlendFunc(sfactorRGB, dfactorRGB); */ } FX_ENTRY void FX_CALL grAlphaTestReferenceValue( GrAlpha_t value ) { LOG("grAlphaTestReferenceValue(%d)\r\n", value); alpha_ref = value; grAlphaTestFunction(alpha_func); } FX_ENTRY void FX_CALL grAlphaTestFunction( GrCmpFnc_t function ) { LOG("grAlphaTestFunction(%d)\r\n", function); alpha_func = function; switch(function) { case GR_CMP_GREATER: //glAlphaFunc(GL_GREATER, alpha_ref/255.0f); break; case GR_CMP_GEQUAL: //glAlphaFunc(GL_GEQUAL, alpha_ref/255.0f); break; case GR_CMP_ALWAYS: //glAlphaFunc(GL_ALWAYS, alpha_ref/255.0f); //glDisable(GL_ALPHA_TEST); alpha_test = false; return; break; default: display_warning("grAlphaTestFunction : unknown function : %x", function); } //glEnable(GL_ALPHA_TEST); alpha_test = true; } // fog FX_ENTRY void FX_CALL grFogMode( GrFogMode_t mode ) { LOG("grFogMode(%d)\r\n", mode); switch(mode) { case GR_FOG_DISABLE: //glDisable(GL_FOG); fog_enabled = 0; break; case GR_FOG_WITH_TABLE_ON_Q: //glEnable(GL_FOG); //glFogi(GL_FOG_COORDINATE_SOURCE_EXT, GL_FOG_COORDINATE_EXT); fog_enabled = 1; break; case GR_FOG_WITH_TABLE_ON_FOGCOORD_EXT: //glEnable(GL_FOG); //glFogi(GL_FOG_COORDINATE_SOURCE_EXT, GL_FOG_COORDINATE_EXT); fog_enabled = 2; break; default: display_warning("grFogMode : unknown mode : %x", mode); } need_to_compile = 1; } FX_ENTRY float FX_CALL guFogTableIndexToW( int i ) { LOG("guFogTableIndexToW(%d)\r\n", i); return (float)(pow(2.0, 3.0+(double)(i>>2)) / (8-(i&3))); } FX_ENTRY void FX_CALL guFogGenerateLinear(GrFog_t *fogtable, float nearZ, float farZ ) { LOG("guFogGenerateLinear(%f,%f)\r\n", nearZ, farZ); /* glFogi(GL_FOG_MODE, GL_LINEAR); glFogi(GL_FOG_COORDINATE_SOURCE_EXT, GL_FOG_COORDINATE_EXT); glFogf(GL_FOG_START, nearZ / 255.0f); glFogf(GL_FOG_END, farZ / 255.0f); */ fogStart = nearZ / 255.0f; fogEnd = farZ / 255.0f; } FX_ENTRY void FX_CALL grFogTable( const GrFog_t ft[] ) { LOG("grFogTable()\r\n"); } FX_ENTRY void FX_CALL grFogColorValue( GrColor_t fogcolor ) { LOG("grFogColorValue(%x)\r\n", fogcolor); switch(lfb_color_fmt) { case GR_COLORFORMAT_ARGB: fogColor[3] = ((fogcolor >> 24) & 0xFF) / 255.0f; fogColor[0] = ((fogcolor >> 16) & 0xFF) / 255.0f; fogColor[1] = ((fogcolor >> 8) & 0xFF) / 255.0f; fogColor[2] = (fogcolor & 0xFF) / 255.0f; break; case GR_COLORFORMAT_RGBA: fogColor[0] = ((fogcolor >> 24) & 0xFF) / 255.0f; fogColor[1] = ((fogcolor >> 16) & 0xFF) / 255.0f; fogColor[2] = ((fogcolor >> 8) & 0xFF) / 255.0f; fogColor[3] = (fogcolor & 0xFF) / 255.0f; break; default: display_warning("grFogColorValue: unknown color format : %x", lfb_color_fmt); } //glFogfv(GL_FOG_COLOR, color); } // chroma FX_ENTRY void FX_CALL grChromakeyMode( GrChromakeyMode_t mode ) { LOG("grChromakeyMode(%d)\r\n", mode); switch(mode) { case GR_CHROMAKEY_DISABLE: chroma_enabled = 0; break; case GR_CHROMAKEY_ENABLE: chroma_enabled = 1; break; default: display_warning("grChromakeyMode : unknown mode : %x", mode); } need_to_compile = 1; } FX_ENTRY void FX_CALL grChromakeyValue( GrColor_t value ) { LOG("grChromakeyValue(%x)\r\n", value); int chroma_color_location; switch(lfb_color_fmt) { case GR_COLORFORMAT_ARGB: chroma_color[3] = 1.0;//((value >> 24) & 0xFF) / 255.0f; chroma_color[0] = ((value >> 16) & 0xFF) / 255.0f; chroma_color[1] = ((value >> 8) & 0xFF) / 255.0f; chroma_color[2] = (value & 0xFF) / 255.0f; break; case GR_COLORFORMAT_RGBA: chroma_color[0] = ((value >> 24) & 0xFF) / 255.0f; chroma_color[1] = ((value >> 16) & 0xFF) / 255.0f; chroma_color[2] = ((value >> 8) & 0xFF) / 255.0f; chroma_color[3] = 1.0;//(value & 0xFF) / 255.0f; break; default: display_warning("grChromakeyValue: unknown color format : %x", lfb_color_fmt); } vbo_draw(); chroma_color_location = glGetUniformLocation(program_object, "chroma_color"); glUniform4f(chroma_color_location, chroma_color[0], chroma_color[1], chroma_color[2], chroma_color[3]); } static void setPattern() { int i; GLubyte stip[32*4]; for(i=0; i<32; i++) { unsigned int val = (rand() << 17) | ((rand() & 1) << 16) | (rand() << 1) | (rand() & 1); stip[i*4+0] = (val >> 24) & 0xFF; stip[i*4+1] = (val >> 16) & 0xFF; stip[i*4+2] = (val >> 8) & 0xFF; stip[i*4+3] = val & 0xFF; } GLubyte texture[32*32*4]; for(i=0; i<32; i++) { int j; for(j=0; j<4; j++) { texture[(i*32+j*8+0)*4+3] = ((stip[i*4+j] >> 7) & 1) ? 255 : 0; texture[(i*32+j*8+1)*4+3] = ((stip[i*4+j] >> 6) & 1) ? 255 : 0; texture[(i*32+j*8+2)*4+3] = ((stip[i*4+j] >> 5) & 1) ? 255 : 0; texture[(i*32+j*8+3)*4+3] = ((stip[i*4+j] >> 4) & 1) ? 255 : 0; texture[(i*32+j*8+4)*4+3] = ((stip[i*4+j] >> 3) & 1) ? 255 : 0; texture[(i*32+j*8+5)*4+3] = ((stip[i*4+j] >> 2) & 1) ? 255 : 0; texture[(i*32+j*8+6)*4+3] = ((stip[i*4+j] >> 1) & 1) ? 255 : 0; texture[(i*32+j*8+7)*4+3] = ((stip[i*4+j] >> 0) & 1) ? 255 : 0; } } glActiveTexture(GL_TEXTURE2); glEnable(GL_TEXTURE_2D); glBindTexture(GL_TEXTURE_2D, 33*1024*1024); glTexImage2D(GL_TEXTURE_2D, 0, 4, 32, 32, 0, GL_RGBA, GL_UNSIGNED_BYTE, texture); glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST); glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST); glDisable(GL_TEXTURE_2D); } FX_ENTRY void FX_CALL grStipplePattern( GrStipplePattern_t stipple) { LOG("grStipplePattern(%x)\r\n", stipple); srand(stipple); setPattern(); } FX_ENTRY void FX_CALL grStippleMode( GrStippleMode_t mode ) { LOG("grStippleMode(%d)\r\n", mode); switch(mode) { case GR_STIPPLE_DISABLE: dither_enabled = 0; glActiveTexture(GL_TEXTURE2); glDisable(GL_TEXTURE_2D); break; case GR_STIPPLE_PATTERN: setPattern(); dither_enabled = 1; glActiveTexture(GL_TEXTURE2); glEnable(GL_TEXTURE_2D); break; case GR_STIPPLE_ROTATE: setPattern(); dither_enabled = 1; glActiveTexture(GL_TEXTURE2); glEnable(GL_TEXTURE_2D); break; default: display_warning("grStippleMode:%x", mode); } need_to_compile = 1; } FX_ENTRY void FX_CALL grColorCombineExt(GrCCUColor_t a, GrCombineMode_t a_mode, GrCCUColor_t b, GrCombineMode_t b_mode, GrCCUColor_t c, FxBool c_invert, GrCCUColor_t d, FxBool d_invert, FxU32 shift, FxBool invert) { LOG("grColorCombineExt(%d, %d, %d, %d, %d, %d, %d, %d, %d, %d)\r\n", a, a_mode, b, b_mode, c, c_invert, d, d_invert, shift, invert); if (invert) display_warning("grColorCombineExt : inverted result"); if (shift) display_warning("grColorCombineExt : shift = %d", shift); color_combiner_key = 0x80000000 | (a & 0x1F) | ((a_mode & 3) << 5) | ((b & 0x1F) << 7) | ((b_mode & 3) << 12) | ((c & 0x1F) << 14) | ((c_invert & 1) << 19) | ((d & 0x1F) << 20) | ((d_invert & 1) << 25); c_combiner_ext = 1; strcpy(fragment_shader_color_combiner, ""); switch(a) { case GR_CMBX_ZERO: strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(0.0); \n"); break; case GR_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(ctexture1.a); \n"); break; case GR_CMBX_CONSTANT_ALPHA: strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(constant_color.a); \n"); break; case GR_CMBX_CONSTANT_COLOR: strcat(fragment_shader_color_combiner, "vec4 cs_a = constant_color; \n"); break; case GR_CMBX_ITALPHA: strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(gl_Color.a); \n"); break; case GR_CMBX_ITRGB: strcat(fragment_shader_color_combiner, "vec4 cs_a = gl_Color; \n"); break; case GR_CMBX_TEXTURE_RGB: strcat(fragment_shader_color_combiner, "vec4 cs_a = ctexture1; \n"); break; default: display_warning("grColorCombineExt : a = %x", a); strcat(fragment_shader_color_combiner, "vec4 cs_a = vec4(0.0); \n"); } switch(a_mode) { case GR_FUNC_MODE_ZERO: strcat(fragment_shader_color_combiner, "vec4 c_a = vec4(0.0); \n"); break; case GR_FUNC_MODE_X: strcat(fragment_shader_color_combiner, "vec4 c_a = cs_a; \n"); break; case GR_FUNC_MODE_ONE_MINUS_X: strcat(fragment_shader_color_combiner, "vec4 c_a = vec4(1.0) - cs_a; \n"); break; case GR_FUNC_MODE_NEGATIVE_X: strcat(fragment_shader_color_combiner, "vec4 c_a = -cs_a; \n"); break; default: display_warning("grColorCombineExt : a_mode = %x", a_mode); strcat(fragment_shader_color_combiner, "vec4 c_a = vec4(0.0); \n"); } switch(b) { case GR_CMBX_ZERO: strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(0.0); \n"); break; case GR_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(ctexture1.a); \n"); break; case GR_CMBX_CONSTANT_ALPHA: strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(constant_color.a); \n"); break; case GR_CMBX_CONSTANT_COLOR: strcat(fragment_shader_color_combiner, "vec4 cs_b = constant_color; \n"); break; case GR_CMBX_ITALPHA: strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(gl_Color.a); \n"); break; case GR_CMBX_ITRGB: strcat(fragment_shader_color_combiner, "vec4 cs_b = gl_Color; \n"); break; case GR_CMBX_TEXTURE_RGB: strcat(fragment_shader_color_combiner, "vec4 cs_b = ctexture1; \n"); break; default: display_warning("grColorCombineExt : b = %x", b); strcat(fragment_shader_color_combiner, "vec4 cs_b = vec4(0.0); \n"); } switch(b_mode) { case GR_FUNC_MODE_ZERO: strcat(fragment_shader_color_combiner, "vec4 c_b = vec4(0.0); \n"); break; case GR_FUNC_MODE_X: strcat(fragment_shader_color_combiner, "vec4 c_b = cs_b; \n"); break; case GR_FUNC_MODE_ONE_MINUS_X: strcat(fragment_shader_color_combiner, "vec4 c_b = vec4(1.0) - cs_b; \n"); break; case GR_FUNC_MODE_NEGATIVE_X: strcat(fragment_shader_color_combiner, "vec4 c_b = -cs_b; \n"); break; default: display_warning("grColorCombineExt : b_mode = %x", b_mode); strcat(fragment_shader_color_combiner, "vec4 c_b = vec4(0.0); \n"); } switch(c) { case GR_CMBX_ZERO: strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(0.0); \n"); break; case GR_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(ctexture1.a); \n"); break; case GR_CMBX_ALOCAL: strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(c_b.a); \n"); break; case GR_CMBX_AOTHER: strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(c_a.a); \n"); break; case GR_CMBX_B: strcat(fragment_shader_color_combiner, "vec4 c_c = cs_b; \n"); break; case GR_CMBX_CONSTANT_ALPHA: strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(constant_color.a); \n"); break; case GR_CMBX_CONSTANT_COLOR: strcat(fragment_shader_color_combiner, "vec4 c_c = constant_color; \n"); break; case GR_CMBX_ITALPHA: strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(gl_Color.a); \n"); break; case GR_CMBX_ITRGB: strcat(fragment_shader_color_combiner, "vec4 c_c = gl_Color; \n"); break; case GR_CMBX_TEXTURE_RGB: strcat(fragment_shader_color_combiner, "vec4 c_c = ctexture1; \n"); break; default: display_warning("grColorCombineExt : c = %x", c); strcat(fragment_shader_color_combiner, "vec4 c_c = vec4(0.0); \n"); } if(c_invert) strcat(fragment_shader_color_combiner, "c_c = vec4(1.0) - c_c; \n"); switch(d) { case GR_CMBX_ZERO: strcat(fragment_shader_color_combiner, "vec4 c_d = vec4(0.0); \n"); break; case GR_CMBX_ALOCAL: strcat(fragment_shader_color_combiner, "vec4 c_d = vec4(c_b.a); \n"); break; case GR_CMBX_B: strcat(fragment_shader_color_combiner, "vec4 c_d = cs_b; \n"); break; case GR_CMBX_TEXTURE_RGB: strcat(fragment_shader_color_combiner, "vec4 c_d = ctexture1; \n"); break; case GR_CMBX_ITRGB: strcat(fragment_shader_color_combiner, "vec4 c_d = gl_Color; \n"); break; default: display_warning("grColorCombineExt : d = %x", d); strcat(fragment_shader_color_combiner, "vec4 c_d = vec4(0.0); \n"); } if(d_invert) strcat(fragment_shader_color_combiner, "c_d = vec4(1.0) - c_d; \n"); strcat(fragment_shader_color_combiner, "gl_FragColor = (c_a + c_b) * c_c + c_d; \n"); need_to_compile = 1; } FX_ENTRY void FX_CALL grAlphaCombineExt(GrACUColor_t a, GrCombineMode_t a_mode, GrACUColor_t b, GrCombineMode_t b_mode, GrACUColor_t c, FxBool c_invert, GrACUColor_t d, FxBool d_invert, FxU32 shift, FxBool invert) { LOG("grAlphaCombineExt(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)\r\n", a, a_mode, b, b_mode, c, c_invert, d, d_invert, shift, invert); if (invert) display_warning("grAlphaCombineExt : inverted result"); if (shift) display_warning("grAlphaCombineExt : shift = %d", shift); alpha_combiner_key = 0x80000000 | (a & 0x1F) | ((a_mode & 3) << 5) | ((b & 0x1F) << 7) | ((b_mode & 3) << 12) | ((c & 0x1F) << 14) | ((c_invert & 1) << 19) | ((d & 0x1F) << 20) | ((d_invert & 1) << 25); a_combiner_ext = 1; strcpy(fragment_shader_alpha_combiner, ""); switch(a) { case GR_CMBX_ZERO: strcat(fragment_shader_alpha_combiner, "float as_a = 0.0; \n"); break; case GR_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_alpha_combiner, "float as_a = ctexture1.a; \n"); break; case GR_CMBX_CONSTANT_ALPHA: strcat(fragment_shader_alpha_combiner, "float as_a = constant_color.a; \n"); break; case GR_CMBX_ITALPHA: strcat(fragment_shader_alpha_combiner, "float as_a = gl_Color.a; \n"); break; default: display_warning("grAlphaCombineExt : a = %x", a); strcat(fragment_shader_alpha_combiner, "float as_a = 0.0; \n"); } switch(a_mode) { case GR_FUNC_MODE_ZERO: strcat(fragment_shader_alpha_combiner, "float a_a = 0.0; \n"); break; case GR_FUNC_MODE_X: strcat(fragment_shader_alpha_combiner, "float a_a = as_a; \n"); break; case GR_FUNC_MODE_ONE_MINUS_X: strcat(fragment_shader_alpha_combiner, "float a_a = 1.0 - as_a; \n"); break; case GR_FUNC_MODE_NEGATIVE_X: strcat(fragment_shader_alpha_combiner, "float a_a = -as_a; \n"); break; default: display_warning("grAlphaCombineExt : a_mode = %x", a_mode); strcat(fragment_shader_alpha_combiner, "float a_a = 0.0; \n"); } switch(b) { case GR_CMBX_ZERO: strcat(fragment_shader_alpha_combiner, "float as_b = 0.0; \n"); break; case GR_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_alpha_combiner, "float as_b = ctexture1.a; \n"); break; case GR_CMBX_CONSTANT_ALPHA: strcat(fragment_shader_alpha_combiner, "float as_b = constant_color.a; \n"); break; case GR_CMBX_ITALPHA: strcat(fragment_shader_alpha_combiner, "float as_b = gl_Color.a; \n"); break; default: display_warning("grAlphaCombineExt : b = %x", b); strcat(fragment_shader_alpha_combiner, "float as_b = 0.0; \n"); } switch(b_mode) { case GR_FUNC_MODE_ZERO: strcat(fragment_shader_alpha_combiner, "float a_b = 0.0; \n"); break; case GR_FUNC_MODE_X: strcat(fragment_shader_alpha_combiner, "float a_b = as_b; \n"); break; case GR_FUNC_MODE_ONE_MINUS_X: strcat(fragment_shader_alpha_combiner, "float a_b = 1.0 - as_b; \n"); break; case GR_FUNC_MODE_NEGATIVE_X: strcat(fragment_shader_alpha_combiner, "float a_b = -as_b; \n"); break; default: display_warning("grAlphaCombineExt : b_mode = %x", b_mode); strcat(fragment_shader_alpha_combiner, "float a_b = 0.0; \n"); } switch(c) { case GR_CMBX_ZERO: strcat(fragment_shader_alpha_combiner, "float a_c = 0.0; \n"); break; case GR_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_alpha_combiner, "float a_c = ctexture1.a; \n"); break; case GR_CMBX_ALOCAL: strcat(fragment_shader_alpha_combiner, "float a_c = as_b; \n"); break; case GR_CMBX_AOTHER: strcat(fragment_shader_alpha_combiner, "float a_c = as_a; \n"); break; case GR_CMBX_B: strcat(fragment_shader_alpha_combiner, "float a_c = as_b; \n"); break; case GR_CMBX_CONSTANT_ALPHA: strcat(fragment_shader_alpha_combiner, "float a_c = constant_color.a; \n"); break; case GR_CMBX_ITALPHA: strcat(fragment_shader_alpha_combiner, "float a_c = gl_Color.a; \n"); break; default: display_warning("grAlphaCombineExt : c = %x", c); strcat(fragment_shader_alpha_combiner, "float a_c = 0.0; \n"); } if(c_invert) strcat(fragment_shader_alpha_combiner, "a_c = 1.0 - a_c; \n"); switch(d) { case GR_CMBX_ZERO: strcat(fragment_shader_alpha_combiner, "float a_d = 0.0; \n"); break; case GR_CMBX_TEXTURE_ALPHA: strcat(fragment_shader_alpha_combiner, "float a_d = ctexture1.a; \n"); break; case GR_CMBX_ALOCAL: strcat(fragment_shader_alpha_combiner, "float a_d = as_b; \n"); break; case GR_CMBX_B: strcat(fragment_shader_alpha_combiner, "float a_d = as_b; \n"); break; default: display_warning("grAlphaCombineExt : d = %x", d); strcat(fragment_shader_alpha_combiner, "float a_d = 0.0; \n"); } if(d_invert) strcat(fragment_shader_alpha_combiner, "a_d = 1.0 - a_d; \n"); strcat(fragment_shader_alpha_combiner, "gl_FragColor.a = (a_a + a_b) * a_c + a_d; \n"); need_to_compile = 1; } FX_ENTRY void FX_CALL grTexColorCombineExt(GrChipID_t tmu, GrTCCUColor_t a, GrCombineMode_t a_mode, GrTCCUColor_t b, GrCombineMode_t b_mode, GrTCCUColor_t c, FxBool c_invert, GrTCCUColor_t d, FxBool d_invert, FxU32 shift, FxBool invert) { int num_tex; LOG("grTexColorCombineExt(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)\r\n", tmu, a, a_mode, b, b_mode, c, c_invert, d, d_invert, shift, invert); if (invert) display_warning("grTexColorCombineExt : inverted result"); if (shift) display_warning("grTexColorCombineExt : shift = %d", shift); if (tmu == GR_TMU0) num_tex = 1; else num_tex = 0; if(num_tex == 0) { texture0_combiner_key = 0x80000000 | (a & 0x1F) | ((a_mode & 3) << 5) | ((b & 0x1F) << 7) | ((b_mode & 3) << 12) | ((c & 0x1F) << 14) | ((c_invert & 1) << 19) | ((d & 0x1F) << 20) | ((d_invert & 1) << 25); tex0_combiner_ext = 1; strcpy(fragment_shader_texture0, ""); } else { texture1_combiner_key = 0x80000000 | (a & 0x1F) | ((a_mode & 3) << 5) | ((b & 0x1F) << 7) | ((b_mode & 3) << 12) | ((c & 0x1F) << 14) | ((c_invert & 1) << 19) | ((d & 0x1F) << 20) | ((d_invert & 1) << 25); tex1_combiner_ext = 1; strcpy(fragment_shader_texture1, ""); } switch(a) { case GR_CMBX_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_a = vec4(0.0); \n"); break; case GR_CMBX_ITALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(gl_Color.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_a = vec4(gl_Color.a); \n"); break; case GR_CMBX_ITRGB: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_a = gl_Color; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_a = gl_Color; \n"); break; case GR_CMBX_LOCAL_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(readtex0.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_a = vec4(readtex1.a); \n"); break; case GR_CMBX_LOCAL_TEXTURE_RGB: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_a = readtex0; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_a = readtex1; \n"); break; case GR_CMBX_OTHER_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_a = vec4(ctexture0.a); \n"); break; case GR_CMBX_OTHER_TEXTURE_RGB: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_a = ctexture0; \n"); break; case GR_CMBX_TMU_CCOLOR: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_a = ccolor0; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_a = ccolor1; \n"); break; case GR_CMBX_TMU_CALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(ccolor0.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_a = vec4(ccolor1.a); \n"); break; default: display_warning("grTexColorCombineExt : a = %x", a); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_a = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_a = vec4(0.0); \n"); } switch(a_mode) { case GR_FUNC_MODE_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_a = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_a = vec4(0.0); \n"); break; case GR_FUNC_MODE_X: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_a = ctex0s_a; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_a = ctex1s_a; \n"); break; case GR_FUNC_MODE_ONE_MINUS_X: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_a = vec4(1.0) - ctex0s_a; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_a = vec4(1.0) - ctex1s_a; \n"); break; case GR_FUNC_MODE_NEGATIVE_X: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_a = -ctex0s_a; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_a = -ctex1s_a; \n"); break; default: display_warning("grTexColorCombineExt : a_mode = %x", a_mode); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_a = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_a = vec4(0.0); \n"); } switch(b) { case GR_CMBX_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_b = vec4(0.0); \n"); break; case GR_CMBX_ITALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(gl_Color.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_b = vec4(gl_Color.a); \n"); break; case GR_CMBX_ITRGB: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_b = gl_Color; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_b = gl_Color; \n"); break; case GR_CMBX_LOCAL_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(readtex0.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_b = vec4(readtex1.a); \n"); break; case GR_CMBX_LOCAL_TEXTURE_RGB: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_b = readtex0; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_b = readtex1; \n"); break; case GR_CMBX_OTHER_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_b = vec4(ctexture0.a); \n"); break; case GR_CMBX_OTHER_TEXTURE_RGB: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_b = ctexture0; \n"); break; case GR_CMBX_TMU_CALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(ccolor0.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_b = vec4(ccolor1.a); \n"); break; case GR_CMBX_TMU_CCOLOR: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_b = ccolor0; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_b = ccolor1; \n"); break; default: display_warning("grTexColorCombineExt : b = %x", b); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0s_b = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1s_b = vec4(0.0); \n"); } switch(b_mode) { case GR_FUNC_MODE_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_b = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_b = vec4(0.0); \n"); break; case GR_FUNC_MODE_X: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_b = ctex0s_b; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_b = ctex1s_b; \n"); break; case GR_FUNC_MODE_ONE_MINUS_X: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_b = vec4(1.0) - ctex0s_b; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_b = vec4(1.0) - ctex1s_b; \n"); break; case GR_FUNC_MODE_NEGATIVE_X: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_b = -ctex0s_b; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_b = -ctex1s_b; \n"); break; default: display_warning("grTexColorCombineExt : b_mode = %x", b_mode); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_b = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_b = vec4(0.0); \n"); } switch(c) { case GR_CMBX_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(0.0); \n"); break; case GR_CMBX_B: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_c = ctex0s_b; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_c = ctex1s_b; \n"); break; case GR_CMBX_DETAIL_FACTOR: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(lambda); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(lambda); \n"); break; case GR_CMBX_ITRGB: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_c = gl_Color; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_c = gl_Color; \n"); break; case GR_CMBX_ITALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(gl_Color.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(gl_Color.a); \n"); break; case GR_CMBX_LOCAL_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(readtex0.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(readtex1.a); \n"); break; case GR_CMBX_LOCAL_TEXTURE_RGB: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_c = readtex0; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_c = readtex1; \n"); break; case GR_CMBX_OTHER_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(ctexture0.a); \n"); break; case GR_CMBX_OTHER_TEXTURE_RGB: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_c = ctexture0; \n"); break; case GR_CMBX_TMU_CALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(ccolor0.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(ccolor1.a); \n"); break; case GR_CMBX_TMU_CCOLOR: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_c = ccolor0; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_c = ccolor1; \n"); break; default: display_warning("grTexColorCombineExt : c = %x", c); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_c = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_c = vec4(0.0); \n"); } if(c_invert) { if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_c = vec4(1.0) - ctex0_c; \n"); else strcat(fragment_shader_texture1, "ctex1_c = vec4(1.0) - ctex1_c; \n"); } switch(d) { case GR_CMBX_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_d = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_d = vec4(0.0); \n"); break; case GR_CMBX_B: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_d = ctex0s_b; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_d = ctex1s_b; \n"); break; case GR_CMBX_ITRGB: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_d = gl_Color; \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_d = gl_Color; \n"); break; case GR_CMBX_LOCAL_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_d = vec4(readtex0.a); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_d = vec4(readtex1.a); \n"); break; default: display_warning("grTexColorCombineExt : d = %x", d); if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctex0_d = vec4(0.0); \n"); else strcat(fragment_shader_texture1, "vec4 ctex1_d = vec4(0.0); \n"); } if(d_invert) { if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_d = vec4(1.0) - ctex0_d; \n"); else strcat(fragment_shader_texture1, "ctex1_d = vec4(1.0) - ctex1_d; \n"); } if(num_tex == 0) strcat(fragment_shader_texture0, "vec4 ctexture0 = (ctex0_a + ctex0_b) * ctex0_c + ctex0_d; \n"); else strcat(fragment_shader_texture1, "vec4 ctexture1 = (ctex1_a + ctex1_b) * ctex1_c + ctex1_d; \n"); need_to_compile = 1; } FX_ENTRY void FX_CALL grTexAlphaCombineExt(GrChipID_t tmu, GrTACUColor_t a, GrCombineMode_t a_mode, GrTACUColor_t b, GrCombineMode_t b_mode, GrTACUColor_t c, FxBool c_invert, GrTACUColor_t d, FxBool d_invert, FxU32 shift, FxBool invert) { int num_tex; LOG("grTexAlphaCombineExt(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)\r\n", tmu, a, a_mode, b, b_mode, c, c_invert, d, d_invert, shift, invert); if (invert) display_warning("grTexAlphaCombineExt : inverted result"); if (shift) display_warning("grTexAlphaCombineExt : shift = %d", shift); if (tmu == GR_TMU0) num_tex = 1; else num_tex = 0; if(num_tex == 0) { texture0_combinera_key = 0x80000000 | (a & 0x1F) | ((a_mode & 3) << 5) | ((b & 0x1F) << 7) | ((b_mode & 3) << 12) | ((c & 0x1F) << 14) | ((c_invert & 1) << 19) | ((d & 0x1F) << 20) | ((d_invert & 1) << 25); } else { texture1_combinera_key = 0x80000000 | (a & 0x1F) | ((a_mode & 3) << 5) | ((b & 0x1F) << 7) | ((b_mode & 3) << 12) | ((c & 0x1F) << 14) | ((c_invert & 1) << 19) | ((d & 0x1F) << 20) | ((d_invert & 1) << 25); } switch(a) { case GR_CMBX_ITALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0s_a.a = gl_Color.a; \n"); else strcat(fragment_shader_texture1, "ctex1s_a.a = gl_Color.a; \n"); break; case GR_CMBX_LOCAL_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0s_a.a = readtex0.a; \n"); else strcat(fragment_shader_texture1, "ctex1s_a.a = readtex1.a; \n"); break; case GR_CMBX_OTHER_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0s_a.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctex1s_a.a = ctexture0.a; \n"); break; case GR_CMBX_TMU_CALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0s_a.a = ccolor0.a; \n"); else strcat(fragment_shader_texture1, "ctex1s_a.a = ccolor1.a; \n"); break; default: display_warning("grTexAlphaCombineExt : a = %x", a); if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0s_a.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctex1s_a.a = 0.0; \n"); } switch(a_mode) { case GR_FUNC_MODE_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_a.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctex1_a.a = 0.0; \n"); break; case GR_FUNC_MODE_X: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_a.a = ctex0s_a.a; \n"); else strcat(fragment_shader_texture1, "ctex1_a.a = ctex1s_a.a; \n"); break; case GR_FUNC_MODE_ONE_MINUS_X: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_a.a = 1.0 - ctex0s_a.a; \n"); else strcat(fragment_shader_texture1, "ctex1_a.a = 1.0 - ctex1s_a.a; \n"); break; case GR_FUNC_MODE_NEGATIVE_X: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_a.a = -ctex0s_a.a; \n"); else strcat(fragment_shader_texture1, "ctex1_a.a = -ctex1s_a.a; \n"); break; default: display_warning("grTexAlphaCombineExt : a_mode = %x", a_mode); if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_a.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctex1_a.a = 0.0; \n"); } switch(b) { case GR_CMBX_ITALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0s_b.a = gl_Color.a; \n"); else strcat(fragment_shader_texture1, "ctex1s_b.a = gl_Color.a; \n"); break; case GR_CMBX_LOCAL_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0s_b.a = readtex0.a; \n"); else strcat(fragment_shader_texture1, "ctex1s_b.a = readtex1.a; \n"); break; case GR_CMBX_OTHER_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0s_b.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctex1s_b.a = ctexture0.a; \n"); break; case GR_CMBX_TMU_CALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0s_b.a = ccolor0.a; \n"); else strcat(fragment_shader_texture1, "ctex1s_b.a = ccolor1.a; \n"); break; default: display_warning("grTexAlphaCombineExt : b = %x", b); if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0s_b.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctex1s_b.a = 0.0; \n"); } switch(b_mode) { case GR_FUNC_MODE_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_b.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctex1_b.a = 0.0; \n"); break; case GR_FUNC_MODE_X: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_b.a = ctex0s_b.a; \n"); else strcat(fragment_shader_texture1, "ctex1_b.a = ctex1s_b.a; \n"); break; case GR_FUNC_MODE_ONE_MINUS_X: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_b.a = 1.0 - ctex0s_b.a; \n"); else strcat(fragment_shader_texture1, "ctex1_b.a = 1.0 - ctex1s_b.a; \n"); break; case GR_FUNC_MODE_NEGATIVE_X: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_b.a = -ctex0s_b.a; \n"); else strcat(fragment_shader_texture1, "ctex1_b.a = -ctex1s_b.a; \n"); break; default: display_warning("grTexAlphaCombineExt : b_mode = %x", b_mode); if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_b.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctex1_b.a = 0.0; \n"); } switch(c) { case GR_CMBX_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_c.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctex1_c.a = 0.0; \n"); break; case GR_CMBX_B: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_c.a = ctex0s_b.a; \n"); else strcat(fragment_shader_texture1, "ctex1_c.a = ctex1s_b.a; \n"); break; case GR_CMBX_DETAIL_FACTOR: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_c.a = lambda; \n"); else strcat(fragment_shader_texture1, "ctex1_c.a = lambda; \n"); break; case GR_CMBX_ITALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_c.a = gl_Color.a; \n"); else strcat(fragment_shader_texture1, "ctex1_c.a = gl_Color.a; \n"); break; case GR_CMBX_LOCAL_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_c.a = readtex0.a; \n"); else strcat(fragment_shader_texture1, "ctex1_c.a = readtex1.a; \n"); break; case GR_CMBX_OTHER_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_c.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctex1_c.a = ctexture0.a; \n"); break; case GR_CMBX_TMU_CALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_c.a = ccolor0.a; \n"); else strcat(fragment_shader_texture1, "ctex1_c.a = ccolor1.a; \n"); break; default: display_warning("grTexAlphaCombineExt : c = %x", c); if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_c.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctex1_c.a = 0.0; \n"); } if(c_invert) { if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_c.a = 1.0 - ctex0_c.a; \n"); else strcat(fragment_shader_texture1, "ctex1_c.a = 1.0 - ctex1_c.a; \n"); } switch(d) { case GR_CMBX_ZERO: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_d.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctex1_d.a = 0.0; \n"); break; case GR_CMBX_B: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_d.a = ctex0s_b.a; \n"); else strcat(fragment_shader_texture1, "ctex1_d.a = ctex1s_b.a; \n"); break; case GR_CMBX_ITALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_d.a = gl_Color.a; \n"); else strcat(fragment_shader_texture1, "ctex1_d.a = gl_Color.a; \n"); break; case GR_CMBX_ITRGB: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_d.a = gl_Color.a; \n"); else strcat(fragment_shader_texture1, "ctex1_d.a = gl_Color.a; \n"); break; case GR_CMBX_LOCAL_TEXTURE_ALPHA: if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_d.a = readtex0.a; \n"); else strcat(fragment_shader_texture1, "ctex1_d.a = readtex1.a; \n"); break; default: display_warning("grTexAlphaCombineExt : d = %x", d); if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_d.a = 0.0; \n"); else strcat(fragment_shader_texture1, "ctex1_d.a = 0.0; \n"); } if(d_invert) { if(num_tex == 0) strcat(fragment_shader_texture0, "ctex0_d.a = 1.0 - ctex0_d.a; \n"); else strcat(fragment_shader_texture1, "ctex1_d.a = 1.0 - ctex1_d.a; \n"); } if(num_tex == 0) strcat(fragment_shader_texture0, "ctexture0.a = (ctex0_a.a + ctex0_b.a) * ctex0_c.a + ctex0_d.a; \n"); else strcat(fragment_shader_texture1, "ctexture1.a = (ctex1_a.a + ctex1_b.a) * ctex1_c.a + ctex1_d.a; \n"); need_to_compile = 1; } FX_ENTRY void FX_CALL grConstantColorValueExt(GrChipID_t tmu, GrColor_t value) { int num_tex; LOG("grConstantColorValueExt(%d,%d)\r\n", tmu, value); if (tmu == GR_TMU0) num_tex = 1; else num_tex = 0; switch(lfb_color_fmt) { case GR_COLORFORMAT_ARGB: if(num_tex == 0) { ccolor0[3] = ((value >> 24) & 0xFF) / 255.0f; ccolor0[0] = ((value >> 16) & 0xFF) / 255.0f; ccolor0[1] = ((value >> 8) & 0xFF) / 255.0f; ccolor0[2] = (value & 0xFF) / 255.0f; } else { ccolor1[3] = ((value >> 24) & 0xFF) / 255.0f; ccolor1[0] = ((value >> 16) & 0xFF) / 255.0f; ccolor1[1] = ((value >> 8) & 0xFF) / 255.0f; ccolor1[2] = (value & 0xFF) / 255.0f; } break; case GR_COLORFORMAT_RGBA: if(num_tex == 0) { ccolor0[0] = ((value >> 24) & 0xFF) / 255.0f; ccolor0[1] = ((value >> 16) & 0xFF) / 255.0f; ccolor0[2] = ((value >> 8) & 0xFF) / 255.0f; ccolor0[3] = (value & 0xFF) / 255.0f; } else { ccolor1[0] = ((value >> 24) & 0xFF) / 255.0f; ccolor1[1] = ((value >> 16) & 0xFF) / 255.0f; ccolor1[2] = ((value >> 8) & 0xFF) / 255.0f; ccolor1[3] = (value & 0xFF) / 255.0f; } break; default: display_warning("grConstantColorValue: unknown color format : %x", lfb_color_fmt); } vbo_draw(); if(num_tex == 0) { ccolor0_location = glGetUniformLocation(program_object, "ccolor0"); glUniform4f(ccolor0_location, ccolor0[0], ccolor0[1], ccolor0[2], ccolor0[3]); } else { ccolor1_location = glGetUniformLocation(program_object, "ccolor1"); glUniform4f(ccolor1_location, ccolor1[0], ccolor1[1], ccolor1[2], ccolor1[3]); } }