1 /***************************************************************************
\r
2 texture.c - description
\r
4 begin : Sun Mar 08 2009
\r
5 copyright : (C) 1999-2009 by Pete Bernert
\r
6 web : www.pbernert.com
\r
7 ***************************************************************************/
\r
9 /***************************************************************************
\r
11 * This program is free software; you can redistribute it and/or modify *
\r
12 * it under the terms of the GNU General Public License as published by *
\r
13 * the Free Software Foundation; either version 2 of the License, or *
\r
14 * (at your option) any later version. See also the license.txt file for *
\r
15 * additional informations. *
\r
17 ***************************************************************************/
\r
19 //*************************************************************************//
\r
20 // History of changes:
\r
22 // 2009/03/08 - Pete
\r
23 // - generic cleanup for the Peops release
\r
25 //*************************************************************************//
\r
28 ////////////////////////////////////////////////////////////////////////////////////
\r
29 // Texture related functions are here !
\r
31 // The texture handling is heart and soul of this gpu. The plugin was developed
\r
32 // 1999, by this time no shaders were available. Since the psx gpu is making
\r
33 // heavy use of CLUT (="color lookup tables", aka palettized textures), it was
\r
34 // an interesting task to get those emulated at good speed on NV TNT cards
\r
35 // (which was my major goal when I created the first "gpuPeteTNT"). Later cards
\r
36 // (Geforce256) supported texture palettes by an OGL extension, but at some point
\r
37 // this support was dropped again by gfx card vendors.
\r
38 // Well, at least there is a certain advatage, if no texture palettes extension can
\r
39 // be used: it is possible to modify the textures in any way, allowing "hi-res"
\r
40 // textures and other tweaks.
\r
42 // My main texture caching is kinda complex: the plugin is allocating "n" 256x256 textures,
\r
43 // and it places small psx texture parts inside them. The plugin keeps track what
\r
44 // part (with what palette) it had placed in which texture, so it can re-use this
\r
45 // part again. The more ogl textures it can use, the better (of course the managing/
\r
46 // searching will be slower, but everything is faster than uploading textures again
\r
47 // and again to a gfx card). My first card (TNT1) had 16 MB Vram, and it worked
\r
48 // well with many games, but I recommend nowadays 64 MB Vram to get a good speed.
\r
50 // Sadly, there is also a second kind of texture cache needed, for "psx texture windows".
\r
51 // Those are "repeated" textures, so a psx "texture window" needs to be put in
\r
52 // a whole texture to use the GL_TEXTURE_WRAP_ features. This cache can get full very
\r
53 // fast in games which are having an heavy "texture window" usage, like RRT4. As an
\r
54 // alternative, this plugin can use the OGL "palette" extension on texture windows,
\r
55 // if available. Nowadays also a fragment shader can easily be used to emulate
\r
56 // texture wrapping in a texture atlas, so the main cache could hold the texture
\r
57 // windows as well (that's what I am doing in the OGL2 plugin). But currently the
\r
58 // OGL1 plugin is a "shader-free" zone, so heavy "texture window" games will cause
\r
59 // much texture uploads.
\r
61 // Some final advice: take care if you change things in here. I've removed my ASM
\r
62 // handlers (they didn't cause much speed gain anyway) for readability/portability,
\r
63 // but still the functions/data structures used here are easy to mess up. I guess it
\r
64 // can be a pain in the ass to port the plugin to another byte order :)
\r
66 ////////////////////////////////////////////////////////////////////////////////////
\r
70 #include "gpuStdafx.h"
\r
72 #include "gpuDraw.h"
\r
73 //#include "plugins.h"
\r
74 #include "gpuExternals.h"
\r
75 #include "gpuTexture.h"
\r
76 #include "gpuPlugin.h"
\r
77 #include "gpuPrim.h"
\r
79 #define CLUTCHK 0x00060000
\r
80 #define CLUTSHIFT 17
\r
82 ////////////////////////////////////////////////////////////////////////
\r
83 // texture conversion buffer ..
\r
84 ////////////////////////////////////////////////////////////////////////
\r
86 GLubyte ubPaletteBuffer[256][4];
\r
87 GLuint gTexMovieName=0;
\r
88 GLuint gTexBlurName=0;
\r
89 GLuint gTexFrameName=0;
\r
90 int iTexGarbageCollection=1;
\r
91 unsigned long dwTexPageComp=0;
\r
93 int iClampType=GL_CLAMP_TO_EDGE;
\r
94 int iFilter = GL_LINEAR;
\r
95 void (*LoadSubTexFn) (int,int,short,short);
\r
96 unsigned long (*PalTexturedColourFn) (unsigned long);
\r
98 ////////////////////////////////////////////////////////////////////////
\r
100 ////////////////////////////////////////////////////////////////////////
\r
102 #define PALCOL(x) PalTexturedColourFn (x)
\r
104 #define CSUBSIZE 2048
\r
105 #define CSUBSIZEA 8192
\r
106 #define CSUBSIZES 4096
\r
123 #define MAXWNDTEXCACHE 128
\r
125 #define XCHECK(pos1,pos2) ((pos1.c[0]>=pos2.c[1])&&(pos1.c[1]<=pos2.c[0])&&(pos1.c[2]>=pos2.c[3])&&(pos1.c[3]<=pos2.c[2]))
\r
126 #define INCHECK(pos2,pos1) ((pos1.c[0]<=pos2.c[0]) && (pos1.c[1]>=pos2.c[1]) && (pos1.c[2]<=pos2.c[2]) && (pos1.c[3]>=pos2.c[3]))
\r
128 ////////////////////////////////////////////////////////////////////////
\r
130 unsigned char * CheckTextureInSubSCache(long TextureMode,unsigned long GivenClutId,unsigned short * pCache);
\r
131 void LoadSubTexturePageSort(int pageid, int mode, short cx, short cy);
\r
132 void LoadPackedSubTexturePageSort(int pageid, int mode, short cx, short cy);
\r
133 void DefineSubTextureSort(void);
\r
135 ////////////////////////////////////////////////////////////////////////
\r
137 ////////////////////////////////////////////////////////////////////////
\r
139 long GlobalTexturePage;
\r
144 int iSortTexCnt=32;
\r
145 BOOL bUseFastMdec=FALSE;
\r
146 BOOL bUse15bitMdec=FALSE;
\r
147 int iFrameTexType=0;
\r
148 int iFrameReadType=0;
\r
150 unsigned long (*TCF[2]) (unsigned long);
\r
151 unsigned short (*PTCF[2]) (unsigned short);
\r
153 ////////////////////////////////////////////////////////////////////////
\r
154 // texture cache implementation
\r
155 ////////////////////////////////////////////////////////////////////////
\r
157 // "texture window" cache entry
\r
159 typedef struct textureWndCacheEntryTag
\r
161 unsigned long ClutID;
\r
168 } textureWndCacheEntry;
\r
170 // "standard texture" cache entry (12 byte per entry, as small as possible... we need lots of them)
\r
172 typedef struct textureSubCacheEntryTagS
\r
174 unsigned long ClutID;
\r
176 unsigned char posTX;
\r
177 unsigned char posTY;
\r
178 unsigned char cTexID;
\r
179 unsigned char Opaque;
\r
180 } textureSubCacheEntryS;
\r
183 //---------------------------------------------
\r
185 #define MAXTPAGES_MAX 64
\r
186 #define MAXSORTTEX_MAX 196
\r
188 //---------------------------------------------
\r
190 textureWndCacheEntry wcWndtexStore[MAXWNDTEXCACHE];
\r
191 textureSubCacheEntryS * pscSubtexStore[3][MAXTPAGES_MAX];
\r
192 EXLong * pxSsubtexLeft [MAXSORTTEX_MAX];
\r
193 GLuint uiStexturePage[MAXSORTTEX_MAX];
\r
195 unsigned short usLRUTexPage=0;
\r
199 int iTexWndLimit=MAXWNDTEXCACHE/2;
\r
201 GLubyte * texturepart=NULL;
\r
202 GLubyte * texturebuffer=NULL;
\r
203 unsigned long g_x1,g_y1,g_x2,g_y2;
\r
204 unsigned char ubOpaqueDraw=0;
\r
206 unsigned short MAXTPAGES = 32;
\r
207 unsigned short CLUTMASK = 0x7fff;
\r
208 unsigned short CLUTYMASK = 0x1ff;
\r
209 unsigned short MAXSORTTEX = 196;
\r
211 ////////////////////////////////////////////////////////////////////////
\r
212 // Texture color conversions... all my ASM funcs are removed for easier
\r
213 // porting... and honestly: nowadays the speed gain would be pointless
\r
214 ////////////////////////////////////////////////////////////////////////
\r
216 unsigned long XP8RGBA(unsigned long BGR)
\r
218 if(!(BGR&0xffff)) return 0x50000000;
\r
219 if(DrawSemiTrans && !(BGR&0x8000))
\r
220 {ubOpaqueDraw=1;return ((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff);}
\r
221 return ((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff)|0xff000000;
\r
224 unsigned long XP8RGBAEx(unsigned long BGR)
\r
226 if(!(BGR&0xffff)) return 0x03000000;
\r
227 if(DrawSemiTrans && !(BGR&0x8000))
\r
228 {ubOpaqueDraw=1;return ((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff);}
\r
229 return ((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff)|0xff000000;
\r
232 unsigned long CP8RGBA(unsigned long BGR)
\r
235 if(!(BGR&0xffff)) return 0x50000000;
\r
236 if(DrawSemiTrans && !(BGR&0x8000))
\r
237 {ubOpaqueDraw=1;return ((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff);}
\r
238 l=((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff)|0xff000000;
\r
239 if(l==0xffffff00) l=0xff000000;
\r
243 unsigned long CP8RGBAEx(unsigned long BGR)
\r
246 if(!(BGR&0xffff)) return 0x03000000;
\r
247 if(DrawSemiTrans && !(BGR&0x8000))
\r
248 {ubOpaqueDraw=1;return ((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff);}
\r
249 l=((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff)|0xff000000;
\r
250 if(l==0xffffff00) l=0xff000000;
\r
254 unsigned long XP8RGBA_0(unsigned long BGR)
\r
256 if(!(BGR&0xffff)) return 0x50000000;
\r
257 return ((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff)|0xff000000;
\r
260 unsigned long XP8RGBAEx_0(unsigned long BGR)
\r
262 if(!(BGR&0xffff)) return 0x03000000;
\r
263 return ((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff)|0xff000000;
\r
266 unsigned long XP8BGRA_0(unsigned long BGR)
\r
268 if(!(BGR&0xffff)) return 0x50000000;
\r
269 return ((((BGR>>7)&0xf8)|((BGR<<6)&0xf800)|((BGR<<19)&0xf80000))&0xffffff)|0xff000000;
\r
272 unsigned long XP8BGRAEx_0(unsigned long BGR)
\r
274 if(!(BGR&0xffff)) return 0x03000000;
\r
275 return ((((BGR>>7)&0xf8)|((BGR<<6)&0xf800)|((BGR<<19)&0xf80000))&0xffffff)|0xff000000;
\r
278 unsigned long CP8RGBA_0(unsigned long BGR)
\r
282 if(!(BGR&0xffff)) return 0x50000000;
\r
283 l=((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff)|0xff000000;
\r
284 if(l==0xfff8f800) l=0xff000000;
\r
288 unsigned long CP8RGBAEx_0(unsigned long BGR)
\r
292 if(!(BGR&0xffff)) return 0x03000000;
\r
293 l=((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff)|0xff000000;
\r
294 if(l==0xfff8f800) l=0xff000000;
\r
298 unsigned long CP8BGRA_0(unsigned long BGR)
\r
302 if(!(BGR&0xffff)) return 0x50000000;
\r
303 l=((((BGR>>7)&0xf8)|((BGR<<6)&0xf800)|((BGR<<19)&0xf80000))&0xffffff)|0xff000000;
\r
304 if(l==0xff00f8f8) l=0xff000000;
\r
308 unsigned long CP8BGRAEx_0(unsigned long BGR)
\r
312 if(!(BGR&0xffff)) return 0x03000000;
\r
313 l=((((BGR>>7)&0xf8)|((BGR<<6)&0xf800)|((BGR<<19)&0xf80000))&0xffffff)|0xff000000;
\r
314 if(l==0xff00f8f8) l=0xff000000;
\r
318 unsigned long XP8RGBA_1(unsigned long BGR)
\r
320 if(!(BGR&0xffff)) return 0x50000000;
\r
321 if(!(BGR&0x8000)) {ubOpaqueDraw=1;return ((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff);}
\r
322 return ((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff)|0xff000000;
\r
325 unsigned long XP8RGBAEx_1(unsigned long BGR)
\r
327 if(!(BGR&0xffff)) return 0x03000000;
\r
328 if(!(BGR&0x8000)) {ubOpaqueDraw=1;return ((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff);}
\r
329 return ((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff)|0xff000000;
\r
332 unsigned long XP8BGRA_1(unsigned long BGR)
\r
334 if(!(BGR&0xffff)) return 0x50000000;
\r
335 if(!(BGR&0x8000)) {ubOpaqueDraw=1;return ((((BGR>>7)&0xf8)|((BGR<<6)&0xf800)|((BGR<<19)&0xf80000))&0xffffff);}
\r
336 return ((((BGR>>7)&0xf8)|((BGR<<6)&0xf800)|((BGR<<19)&0xf80000))&0xffffff)|0xff000000;
\r
339 unsigned long XP8BGRAEx_1(unsigned long BGR)
\r
341 if(!(BGR&0xffff)) return 0x03000000;
\r
342 if(!(BGR&0x8000)) {ubOpaqueDraw=1;return ((((BGR>>7)&0xf8)|((BGR<<6)&0xf800)|((BGR<<19)&0xf80000))&0xffffff);}
\r
343 return ((((BGR>>7)&0xf8)|((BGR<<6)&0xf800)|((BGR<<19)&0xf80000))&0xffffff)|0xff000000;
\r
346 unsigned long P8RGBA(unsigned long BGR)
\r
348 if(!(BGR&0xffff)) return 0;
\r
349 return ((((BGR<<3)&0xf8)|((BGR<<6)&0xf800)|((BGR<<9)&0xf80000))&0xffffff)|0xff000000;
\r
352 unsigned long P8BGRA(unsigned long BGR)
\r
354 if(!(BGR&0xffff)) return 0;
\r
355 return ((((BGR>>7)&0xf8)|((BGR<<6)&0xf800)|((BGR<<19)&0xf80000))&0xffffff)|0xff000000;
\r
358 unsigned short XP5RGBA(unsigned short BGR)
\r
361 if(DrawSemiTrans && !(BGR&0x8000))
\r
362 {ubOpaqueDraw=1;return ((((BGR<<11))|((BGR>>9)&0x3e)|((BGR<<1)&0x7c0)));}
\r
363 return ((((BGR<<11))|((BGR>>9)&0x3e)|((BGR<<1)&0x7c0)))|1;
\r
366 unsigned short XP5RGBA_0 (unsigned short BGR)
\r
370 return ((((BGR<<11))|((BGR>>9)&0x3e)|((BGR<<1)&0x7c0)))|1;
\r
373 unsigned short CP5RGBA_0 (unsigned short BGR)
\r
379 s=((((BGR<<11))|((BGR>>9)&0x3e)|((BGR<<1)&0x7c0)))|1;
\r
384 unsigned short XP5RGBA_1(unsigned short BGR)
\r
388 {ubOpaqueDraw=1;return ((((BGR<<11))|((BGR>>9)&0x3e)|((BGR<<1)&0x7c0)));}
\r
389 return ((((BGR<<11))|((BGR>>9)&0x3e)|((BGR<<1)&0x7c0)))|1;
\r
392 unsigned short P5RGBA(unsigned short BGR)
\r
395 return ((((BGR<<11))|((BGR>>9)&0x3e)|((BGR<<1)&0x7c0)))|1;
\r
398 unsigned short XP4RGBA(unsigned short BGR)
\r
401 if(DrawSemiTrans && !(BGR&0x8000))
\r
402 {ubOpaqueDraw=1;return ((((BGR<<11))|((BGR>>9)&0x3e)|((BGR<<1)&0x7c0)));}
\r
403 return (((((BGR&0x1e)<<11))|((BGR&0x7800)>>7)|((BGR&0x3c0)<<2)))|0xf;
\r
406 unsigned short XP4RGBA_0 (unsigned short BGR)
\r
409 return (((((BGR&0x1e)<<11))|((BGR&0x7800)>>7)|((BGR&0x3c0)<<2)))|0xf;
\r
412 unsigned short CP4RGBA_0 (unsigned short BGR)
\r
416 s=(((((BGR&0x1e)<<11))|((BGR&0x7800)>>7)|((BGR&0x3c0)<<2)))|0xf;
\r
417 if(s==0x0fff) s=0x000f;
\r
421 unsigned short XP4RGBA_1(unsigned short BGR)
\r
425 {ubOpaqueDraw=1;return ((((BGR<<11))|((BGR>>9)&0x3e)|((BGR<<1)&0x7c0)));}
\r
426 return (((((BGR&0x1e)<<11))|((BGR&0x7800)>>7)|((BGR&0x3c0)<<2)))|0xf;
\r
429 unsigned short P4RGBA(unsigned short BGR)
\r
432 return (((((BGR&0x1e)<<11))|((BGR&0x7800)>>7)|((BGR&0x3c0)<<2)))|0xf;
\r
435 ////////////////////////////////////////////////////////////////////////
\r
436 // CHECK TEXTURE MEM (on plugin startup)
\r
437 ////////////////////////////////////////////////////////////////////////
\r
442 void CheckTextureMemory(void)
\r
444 GLboolean b;GLboolean * bDetail;
\r
445 int i,iCnt,iRam=iVRamSize*1024*1024;
\r
446 int iTSize;char * p;
\r
453 iRam-=(iResX*iResY*8);
\r
454 iRam-=(iResX*iResY*(iZBufferDepth/8));
\r
457 iSortTexCnt=iRam/(256*256*ts);
\r
459 if(iSortTexCnt>MAXSORTTEX)
\r
461 iSortTexCnt=MAXSORTTEX-min(1,0);
\r
465 iSortTexCnt-=3+min(1,0);
\r
466 if(iSortTexCnt<8) iSortTexCnt=8;
\r
469 for(i=0;i<MAXSORTTEX;i++)
\r
470 uiStexturePage[i]=0;
\r
476 iSortTexCnt=MAXSORTTEX;
\r
477 #else // below vram detector supposedly crashes some drivers
\r
480 p=(char *)malloc(iTSize*iTSize*4);
\r
483 glGenTextures(MAXSORTTEX,uiStexturePage);
\r
484 for(i=0;i<MAXSORTTEX;i++)
\r
486 glBindTexture(GL_TEXTURE_2D,uiStexturePage[i]);
\r
487 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, iClampType);
\r
488 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, iClampType);
\r
489 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, iFilter);
\r
490 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, iFilter);
\r
491 glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, iTSize, iTSize, 0,GL_RGBA, GL_UNSIGNED_BYTE, p);
\r
493 glBindTexture(GL_TEXTURE_2D,0);
\r
497 bDetail=(GLboolean*)malloc(MAXSORTTEX*sizeof(GLboolean));
\r
498 memset(bDetail,0,MAXSORTTEX*sizeof(GLboolean));
\r
500 glDeleteTextures(MAXSORTTEX,uiStexturePage);
\r
502 for(i=0;i<MAXSORTTEX;i++)
\r
504 if(bDetail[i]) iCnt++;
\r
505 uiStexturePage[i]=0;
\r
510 if(b) iSortTexCnt=MAXSORTTEX-min(1,0);
\r
511 else iSortTexCnt=iCnt-3+min(1,0); // place for menu&texwnd
\r
513 if(iSortTexCnt<8) iSortTexCnt=8;
\r
517 ////////////////////////////////////////////////////////////////////////
\r
518 // Main init of textures
\r
519 ////////////////////////////////////////////////////////////////////////
\r
521 void InitializeTextureStore()
\r
525 if(iGPUHeight==1024)
\r
531 iTexGarbageCollection=0;
\r
541 memset(vertex,0,4*sizeof(OGLVertex)); // init vertices
\r
543 gTexName=0; // init main tex name
\r
545 iTexWndLimit=MAXWNDTEXCACHE;
\r
546 /* if(!iUsePalTextures) */iTexWndLimit/=2;
\r
548 memset(wcWndtexStore,0,sizeof(textureWndCacheEntry)*
\r
550 texturepart=(GLubyte *)malloc(256*256*4);
\r
551 memset(texturepart,0,256*256*4);
\r
552 texturebuffer=NULL;
\r
554 for(i=0;i<3;i++) // -> info for 32*3
\r
555 for(j=0;j<MAXTPAGES;j++)
\r
557 pscSubtexStore[i][j]=(textureSubCacheEntryS *)malloc(CSUBSIZES*sizeof(textureSubCacheEntryS));
\r
558 memset(pscSubtexStore[i][j],0,CSUBSIZES*sizeof(textureSubCacheEntryS));
\r
560 for(i=0;i<MAXSORTTEX;i++) // -> info 0..511
\r
562 pxSsubtexLeft[i]=(EXLong *)malloc(CSUBSIZE*sizeof(EXLong));
\r
563 memset(pxSsubtexLeft[i],0,CSUBSIZE*sizeof(EXLong));
\r
564 uiStexturePage[i]=0;
\r
568 ////////////////////////////////////////////////////////////////////////
\r
569 // Clean up on exit
\r
570 ////////////////////////////////////////////////////////////////////////
\r
572 void CleanupTextureStore()
\r
574 int i,j;textureWndCacheEntry * tsx;
\r
575 //----------------------------------------------------//
\r
576 glBindTexture(GL_TEXTURE_2D,0);
\r
578 //----------------------------------------------------//
\r
579 free(texturepart); // free tex part
\r
583 free(texturebuffer);
\r
586 //----------------------------------------------------//
\r
587 tsx=wcWndtexStore; // loop tex window cache
\r
588 for(i=0;i<MAXWNDTEXCACHE;i++,tsx++)
\r
590 if(tsx->texname) // -> some tex?
\r
591 glDeleteTextures(1,&tsx->texname); // --> delete it
\r
594 iMaxTexWnds=0; // no more tex wnds
\r
595 //----------------------------------------------------//
\r
596 if(gTexMovieName!=0) // some movie tex?
\r
597 glDeleteTextures(1, &gTexMovieName); // -> delete it
\r
599 gTexMovieName=0; // no more movie tex
\r
600 //----------------------------------------------------//
\r
601 if(gTexFrameName!=0) // some 15bit framebuffer tex?
\r
602 glDeleteTextures(1, &gTexFrameName); // -> delete it
\r
604 gTexFrameName=0; // no more movie tex
\r
605 //----------------------------------------------------//
\r
606 if(gTexBlurName!=0) // some 15bit framebuffer tex?
\r
607 glDeleteTextures(1, &gTexBlurName); // -> delete it
\r
609 gTexBlurName=0; // no more movie tex
\r
610 //----------------------------------------------------//
\r
611 for(i=0;i<3;i++) // -> loop
\r
612 for(j=0;j<MAXTPAGES;j++) // loop tex pages
\r
614 free(pscSubtexStore[i][j]); // -> clean mem
\r
616 for(i=0;i<MAXSORTTEX;i++)
\r
618 if(uiStexturePage[i]) // --> tex used ?
\r
620 glDeleteTextures(1,&uiStexturePage[i]);
\r
622 uiStexturePage[i]=0; // --> delete it
\r
624 free(pxSsubtexLeft[i]); // -> clean mem
\r
626 //----------------------------------------------------//
\r
629 ////////////////////////////////////////////////////////////////////////
\r
630 // Reset textures in game...
\r
631 ////////////////////////////////////////////////////////////////////////
\r
633 void ResetTextureArea(BOOL bDelTex)
\r
635 int i,j;textureSubCacheEntryS * tss;EXLong * lu;
\r
636 textureWndCacheEntry * tsx;
\r
637 //----------------------------------------------------//
\r
641 //----------------------------------------------------//
\r
642 if(bDelTex) {glBindTexture(GL_TEXTURE_2D,0); glError();gTexName=0;}
\r
643 //----------------------------------------------------//
\r
645 for(i=0;i<MAXWNDTEXCACHE;i++,tsx++)
\r
648 if(bDelTex && tsx->texname)
\r
650 glDeleteTextures(1,&tsx->texname); glError();
\r
655 //----------------------------------------------------//
\r
658 for(j=0;j<MAXTPAGES;j++)
\r
660 tss=pscSubtexStore[i][j];
\r
661 (tss+SOFFA)->pos.l=0;
\r
662 (tss+SOFFB)->pos.l=0;
\r
663 (tss+SOFFC)->pos.l=0;
\r
664 (tss+SOFFD)->pos.l=0;
\r
667 for(i=0;i<iSortTexCnt;i++)
\r
669 lu=pxSsubtexLeft[i];
\r
671 if(bDelTex && uiStexturePage[i])
\r
672 {glDeleteTextures(1,&uiStexturePage[i]); glError();uiStexturePage[i]=0;}
\r
677 ////////////////////////////////////////////////////////////////////////
\r
678 // Invalidate tex windows
\r
679 ////////////////////////////////////////////////////////////////////////
\r
681 void InvalidateWndTextureArea(long X,long Y,long W, long H)
\r
683 int i,px1,px2,py1,py2,iYM=1;
\r
684 textureWndCacheEntry * tsw=wcWndtexStore;
\r
688 if(X<0) X=0;if(X>1023) X=1023;
\r
689 if(W<0) W=0;if(W>1023) W=1023;
\r
690 if(Y<0) Y=0;if(Y>iGPUHeightMask) Y=iGPUHeightMask;
\r
691 if(H<0) H=0;if(H>iGPUHeightMask) H=iGPUHeightMask;
\r
694 if(iGPUHeight==1024) iYM=3;
\r
697 py2=min(iYM,H>>8); // y: 0 or 1
\r
700 px2=min(15,(W>>6));
\r
704 py1=py1<<4;px1+=py1;px2+=py1; // change to 0-31
\r
705 for(i=0;i<iMaxTexWnds;i++,tsw++)
\r
709 if(tsw->pageid>=px1 && tsw->pageid<=px2)
\r
718 py1=px1+16;py2=px2+16;
\r
719 for(i=0;i<iMaxTexWnds;i++,tsw++)
\r
723 if((tsw->pageid>=px1 && tsw->pageid<=px2) ||
\r
724 (tsw->pageid>=py1 && tsw->pageid<=py2))
\r
732 // adjust tex window count
\r
733 tsw=wcWndtexStore+iMaxTexWnds-1;
\r
734 while(iMaxTexWnds && !tsw->used) {iMaxTexWnds--;tsw--;}
\r
739 ////////////////////////////////////////////////////////////////////////
\r
740 // same for sort textures
\r
741 ////////////////////////////////////////////////////////////////////////
\r
743 void MarkFree(textureSubCacheEntryS * tsx)
\r
745 EXLong * ul, * uls;
\r
746 int j,iMax;unsigned char x1,y1,dx,dy;
\r
748 uls=pxSsubtexLeft[tsx->cTexID];
\r
749 iMax=uls->l;ul=uls+1;
\r
753 for(j=0;j<iMax;j++,ul++)
\r
754 if(ul->l==0xffffffff) break;
\r
758 if(j==iMax) uls->l=uls->l+1;
\r
760 x1=tsx->posTX;dx=tsx->pos.c[2]-tsx->pos.c[3];
\r
761 if(tsx->posTX) {x1--;dx+=3;}
\r
762 y1=tsx->posTY;dy=tsx->pos.c[0]-tsx->pos.c[1];
\r
763 if(tsx->posTY) {y1--;dy+=3;}
\r
772 void InvalidateSubSTextureArea(long X,long Y,long W, long H)
\r
774 int i,j,k,iMax,px,py,px1,px2,py1,py2,iYM=1;
\r
775 EXLong npos;textureSubCacheEntryS * tsb;
\r
776 long x1,x2,y1,y2,xa,sw;
\r
780 if(X<0) X=0;if(X>1023) X=1023;
\r
781 if(W<0) W=0;if(W>1023) W=1023;
\r
782 if(Y<0) Y=0;if(Y>iGPUHeightMask) Y=iGPUHeightMask;
\r
783 if(H<0) H=0;if(H>iGPUHeightMask) H=iGPUHeightMask;
\r
786 if(iGPUHeight==1024) iYM=3;
\r
789 py2=min(iYM,H>>8); // y: 0 or 1
\r
790 px1=max(0,(X>>6)-3);
\r
791 px2=min(15,(W>>6)+3); // x: 0-15
\r
793 for(py=py1;py<=py2;py++)
\r
795 j=(py<<4)+px1; // get page
\r
797 y1=py*256;y2=y1+255;
\r
804 if(y2<y1) {sw=y1;y1=y2;y2=sw;}
\r
808 for(px=px1;px<=px2;px++,j++)
\r
819 if(x2<x1) {sw=x1;x1=x2;x2=sw;}
\r
821 if (dwGPUVersion == 2)
\r
824 npos.l=((x1-xa)<<(26-k))|((x2-xa)<<(18-k))|y1|y2;
\r
827 tsb=pscSubtexStore[k][j]+SOFFA;iMax=tsb->pos.l;tsb++;
\r
828 for(i=0;i<iMax;i++,tsb++)
\r
829 if(tsb->ClutID && XCHECK(tsb->pos,npos)) {tsb->ClutID=0;MarkFree(tsb);}
\r
831 // if(npos.l & 0x00800000)
\r
833 tsb=pscSubtexStore[k][j]+SOFFB;iMax=tsb->pos.l;tsb++;
\r
834 for(i=0;i<iMax;i++,tsb++)
\r
835 if(tsb->ClutID && XCHECK(tsb->pos,npos)) {tsb->ClutID=0;MarkFree(tsb);}
\r
838 // if(npos.l & 0x00000080)
\r
840 tsb=pscSubtexStore[k][j]+SOFFC;iMax=tsb->pos.l;tsb++;
\r
841 for(i=0;i<iMax;i++,tsb++)
\r
842 if(tsb->ClutID && XCHECK(tsb->pos,npos)) {tsb->ClutID=0;MarkFree(tsb);}
\r
845 // if(npos.l & 0x00800080)
\r
847 tsb=pscSubtexStore[k][j]+SOFFD;iMax=tsb->pos.l;tsb++;
\r
848 for(i=0;i<iMax;i++,tsb++)
\r
849 if(tsb->ClutID && XCHECK(tsb->pos,npos)) {tsb->ClutID=0;MarkFree(tsb);}
\r
857 ////////////////////////////////////////////////////////////////////////
\r
858 // Invalidate some parts of cache: main routine
\r
859 ////////////////////////////////////////////////////////////////////////
\r
861 void InvalidateTextureAreaEx(void)
\r
863 short W=sxmax-sxmin;
\r
864 short H=symax-symin;
\r
866 if(W==0 && H==0) return;
\r
869 InvalidateWndTextureArea(sxmin,symin,W,H);
\r
871 InvalidateSubSTextureArea(sxmin,symin,W,H);
\r
874 ////////////////////////////////////////////////////////////////////////
\r
876 void InvalidateTextureArea(long X,long Y,long W, long H)
\r
878 if(W==0 && H==0) return;
\r
880 if(iMaxTexWnds) InvalidateWndTextureArea(X,Y,W,H);
\r
882 InvalidateSubSTextureArea(X,Y,W,H);
\r
886 ////////////////////////////////////////////////////////////////////////
\r
887 // tex window: define
\r
888 ////////////////////////////////////////////////////////////////////////
\r
890 void DefineTextureWnd(void)
\r
893 glGenTextures(1, &gTexName);
\r
895 glBindTexture(GL_TEXTURE_2D, gTexName);
\r
897 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
\r
898 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT);
\r
901 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, iFilter);
\r
902 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, iFilter);
\r
906 glTexImage2D(GL_TEXTURE_2D, 0,GL_RGBA,
\r
909 0, GL_RGBA, GL_UNSIGNED_BYTE, texturepart);
\r
911 //LOGE("DefineTextureWnd x:%d y:%d",TWin.Position.x1,TWin.Position.y1);
\r
915 ////////////////////////////////////////////////////////////////////////
\r
916 // tex window: load packed stretch
\r
917 ////////////////////////////////////////////////////////////////////////
\r
919 void LoadStretchPackedWndTexturePage(int pageid, int mode, short cx, short cy)
\r
921 unsigned long start,row,column,j,sxh,sxm,ldx,ldy,ldxo;
\r
922 unsigned int palstart;
\r
923 unsigned short *px,*pa,*ta;
\r
924 unsigned char *cSRCPtr,*cOSRCPtr;
\r
925 unsigned short *wSRCPtr,*wOSRCPtr;
\r
926 unsigned long LineOffset;unsigned short s;
\r
927 int pmult=pageid/16;
\r
928 unsigned short (*LPTCOL)(unsigned short);
\r
930 LPTCOL=PTCF[DrawSemiTrans];
\r
932 ldxo=TWin.Position.x1-TWin.OPosition.x1;
\r
933 ldy =TWin.Position.y1-TWin.OPosition.y1;
\r
935 pa=px=(unsigned short *)ubPaletteBuffer;
\r
936 ta=(unsigned short *)texturepart;
\r
937 palstart=cx+(cy*1024);
\r
943 //--------------------------------------------------//
\r
944 // 4bit texture load ..
\r
948 unsigned int TXV,TXU,n_xi,n_yi;
\r
950 wSRCPtr=psxVuw+palstart;
\r
951 for(row=0;row<16;row++)
\r
952 *px++=LPTCOL(*wSRCPtr++);
\r
955 for(TXV=g_y1;TXV<=column;TXV++)
\r
958 for(TXU=g_x1;TXU<=g_x2-ldxo;TXU++)
\r
960 n_xi = ( ( TXU >> 2 ) & ~0x3c ) + ( ( TXV << 2 ) & 0x3c );
\r
961 n_yi = ( TXV & ~0xf ) + ( ( TXU >> 4 ) & 0xf );
\r
963 s=*(pa+((*( psxVuw + ((GlobalTextAddrY + n_yi)*1024) + GlobalTextAddrX + n_xi ) >> ( ( TXU & 0x03 ) << 2 ) ) & 0x0f ));
\r
966 if(ldx) {*ta++=s;ldx--;}
\r
971 for(TXU=g_x1;TXU<=g_x2;TXU++)
\r
972 *ta++=*(ta-(g_x2-g_x1));
\r
976 DefineTextureWnd();
\r
982 start=((pageid-16*pmult)*128)+256*2048*pmult;
\r
984 // convert CLUT to 32bits .. and then use THAT as a lookup table
\r
986 wSRCPtr=psxVuw+palstart;
\r
987 for(row=0;row<16;row++)
\r
988 *px++=LPTCOL(*wSRCPtr++);
\r
990 sxm=g_x1&1;sxh=g_x1>>1;
\r
991 if(sxm) j=g_x1+1; else j=g_x1;
\r
992 cSRCPtr = psxVub + start + (2048*g_y1) + sxh;
\r
993 for(column=g_y1;column<=g_y2;column++)
\r
995 cOSRCPtr=cSRCPtr;ldx=ldxo;
\r
996 if(sxm) *ta++=*(pa+((*cSRCPtr++ >> 4) & 0xF));
\r
998 for(row=j;row<=g_x2-ldxo;row++)
\r
1000 s=*(pa+(*cSRCPtr & 0xF));
\r
1002 if(ldx) {*ta++=s;ldx--;}
\r
1004 if(row<=g_x2-ldxo)
\r
1006 s=*(pa+((*cSRCPtr >> 4) & 0xF));
\r
1008 if(ldx) {*ta++=s;ldx--;}
\r
1013 if(ldy && column&1)
\r
1014 {ldy--;cSRCPtr = cOSRCPtr;}
\r
1015 else cSRCPtr = psxVub + start + (2048*(column+1)) + sxh;
\r
1018 DefineTextureWnd();
\r
1020 //--------------------------------------------------//
\r
1021 // 8bit texture load ..
\r
1025 unsigned int TXV,TXU,n_xi,n_yi;
\r
1027 wSRCPtr=psxVuw+palstart;
\r
1028 for(row=0;row<256;row++)
\r
1029 *px++=LPTCOL(*wSRCPtr++);
\r
1032 for(TXV=g_y1;TXV<=column;TXV++)
\r
1035 for(TXU=g_x1;TXU<=g_x2-ldxo;TXU++)
\r
1037 n_xi = ( ( TXU >> 1 ) & ~0x78 ) + ( ( TXU << 2 ) & 0x40 ) + ( ( TXV << 3 ) & 0x38 );
\r
1038 n_yi = ( TXV & ~0x7 ) + ( ( TXU >> 5 ) & 0x7 );
\r
1040 s=*(pa+((*( psxVuw + ((GlobalTextAddrY + n_yi)*1024) + GlobalTextAddrX + n_xi ) >> ( ( TXU & 0x01 ) << 3 ) ) & 0xff));
\r
1043 if(ldx) {*ta++=s;ldx--;}
\r
1048 for(TXU=g_x1;TXU<=g_x2;TXU++)
\r
1049 *ta++=*(ta-(g_x2-g_x1));
\r
1054 DefineTextureWnd();
\r
1059 start=((pageid-16*pmult)*128)+256*2048*pmult;
\r
1061 // not using a lookup table here... speeds up smaller texture areas
\r
1062 cSRCPtr = psxVub + start + (2048*g_y1) + g_x1;
\r
1063 LineOffset = 2048 - (g_x2-g_x1+1) +ldxo;
\r
1065 for(column=g_y1;column<=g_y2;column++)
\r
1067 cOSRCPtr=cSRCPtr;ldx=ldxo;
\r
1068 for(row=g_x1;row<=g_x2-ldxo;row++)
\r
1070 s=LPTCOL(psxVuw[palstart+ *cSRCPtr++]);
\r
1072 if(ldx) {*ta++=s;ldx--;}
\r
1074 if(ldy && column&1) {ldy--;cSRCPtr=cOSRCPtr;}
\r
1075 else cSRCPtr+=LineOffset;
\r
1078 DefineTextureWnd();
\r
1080 //--------------------------------------------------//
\r
1081 // 16bit texture load ..
\r
1083 start=((pageid-16*pmult)*64)+256*1024*pmult;
\r
1084 wSRCPtr = psxVuw + start + (1024*g_y1) + g_x1;
\r
1085 LineOffset = 1024 - (g_x2-g_x1+1) +ldxo;
\r
1087 for(column=g_y1;column<=g_y2;column++)
\r
1089 wOSRCPtr=wSRCPtr;ldx=ldxo;
\r
1090 for(row=g_x1;row<=g_x2-ldxo;row++)
\r
1092 s=LPTCOL(*wSRCPtr++);
\r
1094 if(ldx) {*ta++=s;ldx--;}
\r
1096 if(ldy && column&1) {ldy--;wSRCPtr=wOSRCPtr;}
\r
1097 else wSRCPtr+=LineOffset;
\r
1100 DefineTextureWnd();
\r
1102 //--------------------------------------------------//
\r
1103 // others are not possible !
\r
1107 ////////////////////////////////////////////////////////////////////////
\r
1108 // tex window: load stretched
\r
1109 ////////////////////////////////////////////////////////////////////////
\r
1111 void LoadStretchWndTexturePage(int pageid, int mode, short cx, short cy)
\r
1113 unsigned long start,row,column,j,sxh,sxm,ldx,ldy,ldxo,s;
\r
1114 unsigned int palstart;
\r
1115 unsigned long *px,*pa,*ta;
\r
1116 unsigned char *cSRCPtr,*cOSRCPtr;
\r
1117 unsigned short *wSRCPtr,*wOSRCPtr;
\r
1118 unsigned long LineOffset;
\r
1119 int pmult=pageid/16;
\r
1120 unsigned long (*LTCOL)(unsigned long);
\r
1122 LTCOL=TCF[DrawSemiTrans];
\r
1124 ldxo=TWin.Position.x1-TWin.OPosition.x1;
\r
1125 ldy =TWin.Position.y1-TWin.OPosition.y1;
\r
1127 pa=px=(unsigned long *)ubPaletteBuffer;
\r
1128 ta=(unsigned long *)texturepart;
\r
1129 palstart=cx+(cy*1024);
\r
1135 //--------------------------------------------------//
\r
1136 // 4bit texture load ..
\r
1138 //------------------- ZN STUFF
\r
1142 unsigned int TXV,TXU,n_xi,n_yi;
\r
1144 wSRCPtr=psxVuw+palstart;
\r
1148 *px =LTCOL(*wSRCPtr);
\r
1149 *(px+1)=LTCOL(*(wSRCPtr+1));
\r
1150 *(px+2)=LTCOL(*(wSRCPtr+2));
\r
1151 *(px+3)=LTCOL(*(wSRCPtr+3));
\r
1152 row--;px+=4;wSRCPtr+=4;
\r
1157 for(TXV=g_y1;TXV<=column;TXV++)
\r
1160 for(TXU=g_x1;TXU<=g_x2-ldxo;TXU++)
\r
1162 n_xi = ( ( TXU >> 2 ) & ~0x3c ) + ( ( TXV << 2 ) & 0x3c );
\r
1163 n_yi = ( TXV & ~0xf ) + ( ( TXU >> 4 ) & 0xf );
\r
1165 s=*(pa+((*( psxVuw + ((GlobalTextAddrY + n_yi)*1024) + GlobalTextAddrX + n_xi ) >> ( ( TXU & 0x03 ) << 2 ) ) & 0x0f ));
\r
1168 if(ldx) {*ta++=s;ldx--;}
\r
1173 for(TXU=g_x1;TXU<=g_x2;TXU++)
\r
1174 *ta++=*(ta-(g_x2-g_x1));
\r
1178 DefineTextureWnd();
\r
1183 //-------------------
\r
1185 start=((pageid-16*pmult)*128)+256*2048*pmult;
\r
1186 // convert CLUT to 32bits .. and then use THAT as a lookup table
\r
1188 wSRCPtr=psxVuw+palstart;
\r
1189 for(row=0;row<16;row++)
\r
1190 *px++=LTCOL(*wSRCPtr++);
\r
1192 sxm=g_x1&1;sxh=g_x1>>1;
\r
1193 if(sxm) j=g_x1+1; else j=g_x1;
\r
1194 cSRCPtr = psxVub + start + (2048*g_y1) + sxh;
\r
1195 for(column=g_y1;column<=g_y2;column++)
\r
1197 cOSRCPtr=cSRCPtr;ldx=ldxo;
\r
1198 if(sxm) *ta++=*(pa+((*cSRCPtr++ >> 4) & 0xF));
\r
1200 for(row=j;row<=g_x2-ldxo;row++)
\r
1202 s=*(pa+(*cSRCPtr & 0xF));
\r
1204 if(ldx) {*ta++=s;ldx--;}
\r
1206 if(row<=g_x2-ldxo)
\r
1208 s=*(pa+((*cSRCPtr >> 4) & 0xF));
\r
1210 if(ldx) {*ta++=s;ldx--;}
\r
1214 if(ldy && column&1)
\r
1215 {ldy--;cSRCPtr = cOSRCPtr;}
\r
1216 else cSRCPtr = psxVub + start + (2048*(column+1)) + sxh;
\r
1219 DefineTextureWnd();
\r
1221 //--------------------------------------------------//
\r
1222 // 8bit texture load ..
\r
1224 //------------ ZN STUFF
\r
1227 unsigned int TXV,TXU,n_xi,n_yi;
\r
1229 wSRCPtr=psxVuw+palstart;
\r
1233 *px =LTCOL(*wSRCPtr);
\r
1234 *(px+1)=LTCOL(*(wSRCPtr+1));
\r
1235 *(px+2)=LTCOL(*(wSRCPtr+2));
\r
1236 *(px+3)=LTCOL(*(wSRCPtr+3));
\r
1237 row--;px+=4;wSRCPtr+=4;
\r
1242 for(TXV=g_y1;TXV<=column;TXV++)
\r
1245 for(TXU=g_x1;TXU<=g_x2-ldxo;TXU++)
\r
1247 n_xi = ( ( TXU >> 1 ) & ~0x78 ) + ( ( TXU << 2 ) & 0x40 ) + ( ( TXV << 3 ) & 0x38 );
\r
1248 n_yi = ( TXV & ~0x7 ) + ( ( TXU >> 5 ) & 0x7 );
\r
1250 s=*(pa+((*( psxVuw + ((GlobalTextAddrY + n_yi)*1024) + GlobalTextAddrX + n_xi ) >> ( ( TXU & 0x01 ) << 3 ) ) & 0xff));
\r
1252 if(ldx) {*ta++=s;ldx--;}
\r
1257 for(TXU=g_x1;TXU<=g_x2;TXU++)
\r
1258 *ta++=*(ta-(g_x2-g_x1));
\r
1263 DefineTextureWnd();
\r
1269 start=((pageid-16*pmult)*128)+256*2048*pmult;
\r
1271 // not using a lookup table here... speeds up smaller texture areas
\r
1272 cSRCPtr = psxVub + start + (2048*g_y1) + g_x1;
\r
1273 LineOffset = 2048 - (g_x2-g_x1+1) +ldxo;
\r
1275 for(column=g_y1;column<=g_y2;column++)
\r
1277 cOSRCPtr=cSRCPtr;ldx=ldxo;
\r
1278 for(row=g_x1;row<=g_x2-ldxo;row++)
\r
1280 s=LTCOL(psxVuw[palstart+ *cSRCPtr++]);
\r
1282 if(ldx) {*ta++=s;ldx--;}
\r
1284 if(ldy && column&1) {ldy--;cSRCPtr=cOSRCPtr;}
\r
1285 else cSRCPtr+=LineOffset;
\r
1288 DefineTextureWnd();
\r
1290 //--------------------------------------------------//
\r
1291 // 16bit texture load ..
\r
1293 start=((pageid-16*pmult)*64)+256*1024*pmult;
\r
1295 wSRCPtr = psxVuw + start + (1024*g_y1) + g_x1;
\r
1296 LineOffset = 1024 - (g_x2-g_x1+1) +ldxo;
\r
1298 for(column=g_y1;column<=g_y2;column++)
\r
1300 wOSRCPtr=wSRCPtr;ldx=ldxo;
\r
1301 for(row=g_x1;row<=g_x2-ldxo;row++)
\r
1303 s=LTCOL(*wSRCPtr++);
\r
1305 if(ldx) {*ta++=s;ldx--;}
\r
1307 if(ldy && column&1) {ldy--;wSRCPtr=wOSRCPtr;}
\r
1308 else wSRCPtr+=LineOffset;
\r
1311 DefineTextureWnd();
\r
1313 //--------------------------------------------------//
\r
1314 // others are not possible !
\r
1318 ////////////////////////////////////////////////////////////////////////
\r
1319 // tex window: load packed simple
\r
1320 ////////////////////////////////////////////////////////////////////////
\r
1322 void LoadPackedWndTexturePage(int pageid, int mode, short cx, short cy)
\r
1324 unsigned long start,row,column,j,sxh,sxm;
\r
1325 unsigned int palstart;
\r
1326 unsigned short *px,*pa,*ta;
\r
1327 unsigned char *cSRCPtr;
\r
1328 unsigned short *wSRCPtr;
\r
1329 unsigned long LineOffset;
\r
1330 int pmult=pageid/16;
\r
1331 unsigned short (*LPTCOL)(unsigned short);
\r
1333 LPTCOL=PTCF[DrawSemiTrans];
\r
1335 pa=px=(unsigned short *)ubPaletteBuffer;
\r
1336 ta=(unsigned short *)texturepart;
\r
1337 palstart=cx+(cy*1024);
\r
1343 //--------------------------------------------------//
\r
1344 // 4bit texture load ..
\r
1348 unsigned int TXV,TXU,n_xi,n_yi;
\r
1350 wSRCPtr=psxVuw+palstart;
\r
1351 for(row=0;row<16;row++)
\r
1352 *px++=LPTCOL(*wSRCPtr++);
\r
1354 for(TXV=g_y1;TXV<=g_y2;TXV++)
\r
1356 for(TXU=g_x1;TXU<=g_x2;TXU++)
\r
1358 n_xi = ( ( TXU >> 2 ) & ~0x3c ) + ( ( TXV << 2 ) & 0x3c );
\r
1359 n_yi = ( TXV & ~0xf ) + ( ( TXU >> 4 ) & 0xf );
\r
1361 *ta++=*(pa+((*( psxVuw + ((GlobalTextAddrY + n_yi)*1024) + GlobalTextAddrX + n_xi ) >> ( ( TXU & 0x03 ) << 2 ) ) & 0x0f ));
\r
1365 DefineTextureWnd();
\r
1370 start=((pageid-16*pmult)*128)+256*2048*pmult;
\r
1372 // convert CLUT to 32bits .. and then use THAT as a lookup table
\r
1374 wSRCPtr=psxVuw+palstart;
\r
1375 for(row=0;row<16;row++)
\r
1376 *px++=LPTCOL(*wSRCPtr++);
\r
1378 sxm=g_x1&1;sxh=g_x1>>1;
\r
1379 if(sxm) j=g_x1+1; else j=g_x1;
\r
1380 cSRCPtr = psxVub + start + (2048*g_y1) + sxh;
\r
1381 for(column=g_y1;column<=g_y2;column++)
\r
1383 cSRCPtr = psxVub + start + (2048*column) + sxh;
\r
1385 if(sxm) *ta++=*(pa+((*cSRCPtr++ >> 4) & 0xF));
\r
1387 for(row=j;row<=g_x2;row++)
\r
1389 *ta++=*(pa+(*cSRCPtr & 0xF)); row++;
\r
1390 if(row<=g_x2) *ta++=*(pa+((*cSRCPtr >> 4) & 0xF));
\r
1395 DefineTextureWnd();
\r
1397 //--------------------------------------------------//
\r
1398 // 8bit texture load ..
\r
1402 unsigned int TXV,TXU,n_xi,n_yi;
\r
1404 wSRCPtr=psxVuw+palstart;
\r
1405 for(row=0;row<256;row++)
\r
1406 *px++=LPTCOL(*wSRCPtr++);
\r
1408 for(TXV=g_y1;TXV<=g_y2;TXV++)
\r
1410 for(TXU=g_x1;TXU<=g_x2;TXU++)
\r
1412 n_xi = ( ( TXU >> 1 ) & ~0x78 ) + ( ( TXU << 2 ) & 0x40 ) + ( ( TXV << 3 ) & 0x38 );
\r
1413 n_yi = ( TXV & ~0x7 ) + ( ( TXU >> 5 ) & 0x7 );
\r
1415 *ta++=*(pa+((*( psxVuw + ((GlobalTextAddrY + n_yi)*1024) + GlobalTextAddrX + n_xi ) >> ( ( TXU & 0x01 ) << 3 ) ) & 0xff));
\r
1419 DefineTextureWnd();
\r
1424 start=((pageid-16*pmult)*128)+256*2048*pmult;
\r
1426 // not using a lookup table here... speeds up smaller texture areas
\r
1427 cSRCPtr = psxVub + start + (2048*g_y1) + g_x1;
\r
1428 LineOffset = 2048 - (g_x2-g_x1+1);
\r
1430 for(column=g_y1;column<=g_y2;column++)
\r
1432 for(row=g_x1;row<=g_x2;row++)
\r
1433 *ta++=LPTCOL(psxVuw[palstart+ *cSRCPtr++]);
\r
1434 cSRCPtr+=LineOffset;
\r
1437 DefineTextureWnd();
\r
1439 //--------------------------------------------------//
\r
1440 // 16bit texture load ..
\r
1442 start=((pageid-16*pmult)*64)+256*1024*pmult;
\r
1443 wSRCPtr = psxVuw + start + (1024*g_y1) + g_x1;
\r
1444 LineOffset = 1024 - (g_x2-g_x1+1);
\r
1446 for(column=g_y1;column<=g_y2;column++)
\r
1448 for(row=g_x1;row<=g_x2;row++)
\r
1449 *ta++=LPTCOL(*wSRCPtr++);
\r
1450 wSRCPtr+=LineOffset;
\r
1453 DefineTextureWnd();
\r
1455 //--------------------------------------------------//
\r
1456 // others are not possible !
\r
1460 ////////////////////////////////////////////////////////////////////////
\r
1461 // tex window: load simple
\r
1462 ////////////////////////////////////////////////////////////////////////
\r
1464 void LoadWndTexturePage(int pageid, int mode, short cx, short cy)
\r
1466 unsigned long start,row,column,j,sxh,sxm;
\r
1467 unsigned int palstart;
\r
1468 unsigned long *px,*pa,*ta;
\r
1469 unsigned char *cSRCPtr;
\r
1470 unsigned short *wSRCPtr;
\r
1471 unsigned long LineOffset;
\r
1472 int pmult=pageid/16;
\r
1473 unsigned long (*LTCOL)(unsigned long);
\r
1475 LTCOL=TCF[DrawSemiTrans];
\r
1477 pa=px=(unsigned long *)ubPaletteBuffer;
\r
1478 ta=(unsigned long *)texturepart;
\r
1479 palstart=cx+(cy*1024);
\r
1485 //--------------------------------------------------//
\r
1486 // 4bit texture load ..
\r
1490 unsigned int TXV,TXU,n_xi,n_yi;
\r
1492 wSRCPtr=psxVuw+palstart;
\r
1496 *px =LTCOL(*wSRCPtr);
\r
1497 *(px+1)=LTCOL(*(wSRCPtr+1));
\r
1498 *(px+2)=LTCOL(*(wSRCPtr+2));
\r
1499 *(px+3)=LTCOL(*(wSRCPtr+3));
\r
1500 row--;px+=4;wSRCPtr+=4;
\r
1504 for(TXV=g_y1;TXV<=g_y2;TXV++)
\r
1506 for(TXU=g_x1;TXU<=g_x2;TXU++)
\r
1508 n_xi = ( ( TXU >> 2 ) & ~0x3c ) + ( ( TXV << 2 ) & 0x3c );
\r
1509 n_yi = ( TXV & ~0xf ) + ( ( TXU >> 4 ) & 0xf );
\r
1511 *ta++=*(pa+((*( psxVuw + ((GlobalTextAddrY + n_yi)*1024) + GlobalTextAddrX + n_xi ) >> ( ( TXU & 0x03 ) << 2 ) ) & 0x0f ));
\r
1515 DefineTextureWnd();
\r
1520 start=((pageid-16*pmult)*128)+256*2048*pmult;
\r
1522 // convert CLUT to 32bits .. and then use THAT as a lookup table
\r
1524 wSRCPtr=psxVuw+palstart;
\r
1525 for(row=0;row<16;row++)
\r
1526 *px++=LTCOL(*wSRCPtr++);
\r
1528 sxm=g_x1&1;sxh=g_x1>>1;
\r
1529 if(sxm) j=g_x1+1; else j=g_x1;
\r
1530 cSRCPtr = psxVub + start + (2048*g_y1) + sxh;
\r
1531 for(column=g_y1;column<=g_y2;column++)
\r
1533 cSRCPtr = psxVub + start + (2048*column) + sxh;
\r
1535 if(sxm) *ta++=*(pa+((*cSRCPtr++ >> 4) & 0xF));
\r
1537 for(row=j;row<=g_x2;row++)
\r
1539 *ta++=*(pa+(*cSRCPtr & 0xF)); row++;
\r
1540 if(row<=g_x2) *ta++=*(pa+((*cSRCPtr >> 4) & 0xF));
\r
1545 DefineTextureWnd();
\r
1547 //--------------------------------------------------//
\r
1548 // 8bit texture load ..
\r
1552 unsigned int TXV,TXU,n_xi,n_yi;
\r
1554 wSRCPtr=psxVuw+palstart;
\r
1558 *px =LTCOL(*wSRCPtr);
\r
1559 *(px+1)=LTCOL(*(wSRCPtr+1));
\r
1560 *(px+2)=LTCOL(*(wSRCPtr+2));
\r
1561 *(px+3)=LTCOL(*(wSRCPtr+3));
\r
1562 row--;px+=4;wSRCPtr+=4;
\r
1566 for(TXV=g_y1;TXV<=g_y2;TXV++)
\r
1568 for(TXU=g_x1;TXU<=g_x2;TXU++)
\r
1570 n_xi = ( ( TXU >> 1 ) & ~0x78 ) + ( ( TXU << 2 ) & 0x40 ) + ( ( TXV << 3 ) & 0x38 );
\r
1571 n_yi = ( TXV & ~0x7 ) + ( ( TXU >> 5 ) & 0x7 );
\r
1573 *ta++=*(pa+((*( psxVuw + ((GlobalTextAddrY + n_yi)*1024) + GlobalTextAddrX + n_xi ) >> ( ( TXU & 0x01 ) << 3 ) ) & 0xff));
\r
1577 DefineTextureWnd();
\r
1582 start=((pageid-16*pmult)*128)+256*2048*pmult;
\r
1584 // not using a lookup table here... speeds up smaller texture areas
\r
1585 cSRCPtr = psxVub + start + (2048*g_y1) + g_x1;
\r
1586 LineOffset = 2048 - (g_x2-g_x1+1);
\r
1588 for(column=g_y1;column<=g_y2;column++)
\r
1590 for(row=g_x1;row<=g_x2;row++)
\r
1591 *ta++=LTCOL(psxVuw[palstart+ *cSRCPtr++]);
\r
1592 cSRCPtr+=LineOffset;
\r
1595 DefineTextureWnd();
\r
1597 //--------------------------------------------------//
\r
1598 // 16bit texture load ..
\r
1600 start=((pageid-16*pmult)*64)+256*1024*pmult;
\r
1602 wSRCPtr = psxVuw + start + (1024*g_y1) + g_x1;
\r
1603 LineOffset = 1024 - (g_x2-g_x1+1);
\r
1605 for(column=g_y1;column<=g_y2;column++)
\r
1607 for(row=g_x1;row<=g_x2;row++)
\r
1608 *ta++=LTCOL(*wSRCPtr++);
\r
1609 wSRCPtr+=LineOffset;
\r
1612 DefineTextureWnd();
\r
1614 //--------------------------------------------------//
\r
1615 // others are not possible !
\r
1619 ////////////////////////////////////////////////////////////////////////
\r
1620 ////////////////////////////////////////////////////////////////////////
\r
1621 ////////////////////////////////////////////////////////////////////////
\r
1622 ////////////////////////////////////////////////////////////////////////
\r
1624 void UploadTexWndPal(int mode,short cx,short cy)
\r
1626 unsigned int i,iSize;
\r
1627 unsigned short * wSrcPtr;
\r
1628 unsigned long * ta=(unsigned long *)texturepart;
\r
1630 wSrcPtr=psxVuw+cx+(cy*1024);
\r
1631 if(mode==0) i=4; else i=64;
\r
1637 *ta =PALCOL(*wSrcPtr);
\r
1638 *(ta+1)=PALCOL(*(wSrcPtr+1));
\r
1639 *(ta+2)=PALCOL(*(wSrcPtr+2));
\r
1640 *(ta+3)=PALCOL(*(wSrcPtr+3));
\r
1641 ta+=4;wSrcPtr+=4;i--;
\r
1645 /* (*glColorTableEXTEx)(GL_TEXTURE_2D,GL_RGBA8,iSize,
\r
1646 GL_RGBA,GL_UNSIGNED_BYTE,texturepart);
\r
1649 ////////////////////////////////////////////////////////////////////////
\r
1651 void DefinePalTextureWnd(void)
\r
1654 glGenTextures(1, &gTexName);
\r
1656 glBindTexture(GL_TEXTURE_2D, gTexName);
\r
1658 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
\r
1659 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT);
\r
1662 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, iFilter);
\r
1663 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, iFilter);
\r
1666 glTexImage2D(GL_TEXTURE_2D, 0,GL_RGBA,
\r
1667 TWin.Position.x1,
\r
1668 TWin.Position.y1,
\r
1669 0, GL_RGBA, GL_UNSIGNED_BYTE,texturepart);
\r
1671 //LOGE("DefinePalTextureWnd x:%d y:%d",TWin.Position.x1,TWin.Position.y1);
\r
1674 ///////////////////////////////////////////////////////
\r
1676 void LoadPalWndTexturePage(int pageid, int mode, short cx, short cy)
\r
1678 unsigned long start,row,column,j,sxh,sxm;
\r
1679 unsigned char *ta;
\r
1680 unsigned char *cSRCPtr;
\r
1681 unsigned long LineOffset;
\r
1682 int pmult=pageid/16;
\r
1684 ta=(unsigned char *)texturepart;
\r
1688 //--------------------------------------------------//
\r
1689 // 4bit texture load ..
\r
1691 start=((pageid-16*pmult)*128)+256*2048*pmult;
\r
1693 sxm=g_x1&1;sxh=g_x1>>1;
\r
1694 if(sxm) j=g_x1+1; else j=g_x1;
\r
1695 cSRCPtr = psxVub + start + (2048*g_y1) + sxh;
\r
1696 for(column=g_y1;column<=g_y2;column++)
\r
1698 cSRCPtr = psxVub + start + (2048*column) + sxh;
\r
1700 if(sxm) *ta++=((*cSRCPtr++ >> 4) & 0xF);
\r
1702 for(row=j;row<=g_x2;row++)
\r
1704 *ta++=(*cSRCPtr & 0xF); row++;
\r
1705 if(row<=g_x2) *ta++=((*cSRCPtr >> 4) & 0xF);
\r
1710 DefinePalTextureWnd();
\r
1712 //--------------------------------------------------//
\r
1713 // 8bit texture load ..
\r
1715 start=((pageid-16*pmult)*128)+256*2048*pmult;
\r
1717 // not using a lookup table here... speeds up smaller texture areas
\r
1718 cSRCPtr = psxVub + start + (2048*g_y1) + g_x1;
\r
1719 LineOffset = 2048 - (g_x2-g_x1+1);
\r
1721 for(column=g_y1;column<=g_y2;column++)
\r
1723 for(row=g_x1;row<=g_x2;row++)
\r
1725 cSRCPtr+=LineOffset;
\r
1728 DefinePalTextureWnd();
\r
1731 UploadTexWndPal(mode,cx,cy);
\r
1734 ////////////////////////////////////////////////////////////////////////
\r
1736 void LoadStretchPalWndTexturePage(int pageid, int mode, short cx, short cy)
\r
1738 unsigned long start,row,column,j,sxh,sxm,ldx,ldy,ldxo;
\r
1739 unsigned char *ta,s;
\r
1740 unsigned char *cSRCPtr,*cOSRCPtr;
\r
1741 unsigned long LineOffset;
\r
1742 int pmult=pageid/16;
\r
1744 ldxo=TWin.Position.x1-TWin.OPosition.x1;
\r
1745 ldy =TWin.Position.y1-TWin.OPosition.y1;
\r
1747 ta=(unsigned char *)texturepart;
\r
1751 //--------------------------------------------------//
\r
1752 // 4bit texture load ..
\r
1754 start=((pageid-16*pmult)*128)+256*2048*pmult;
\r
1756 sxm=g_x1&1;sxh=g_x1>>1;
\r
1757 if(sxm) j=g_x1+1; else j=g_x1;
\r
1758 cSRCPtr = psxVub + start + (2048*g_y1) + sxh;
\r
1759 for(column=g_y1;column<=g_y2;column++)
\r
1761 cOSRCPtr=cSRCPtr;ldx=ldxo;
\r
1762 if(sxm) *ta++=((*cSRCPtr++ >> 4) & 0xF);
\r
1764 for(row=j;row<=g_x2-ldxo;row++)
\r
1766 s=(*cSRCPtr & 0xF);
\r
1768 if(ldx) {*ta++=s;ldx--;}
\r
1770 if(row<=g_x2-ldxo)
\r
1772 s=((*cSRCPtr >> 4) & 0xF);
\r
1774 if(ldx) {*ta++=s;ldx--;}
\r
1778 if(ldy && column&1)
\r
1779 {ldy--;cSRCPtr = cOSRCPtr;}
\r
1780 else cSRCPtr = psxVub + start + (2048*(column+1)) + sxh;
\r
1783 DefinePalTextureWnd();
\r
1785 //--------------------------------------------------//
\r
1786 // 8bit texture load ..
\r
1788 start=((pageid-16*pmult)*128)+256*2048*pmult;
\r
1790 cSRCPtr = psxVub + start + (2048*g_y1) + g_x1;
\r
1791 LineOffset = 2048 - (g_x2-g_x1+1) +ldxo;
\r
1793 for(column=g_y1;column<=g_y2;column++)
\r
1795 cOSRCPtr=cSRCPtr;ldx=ldxo;
\r
1796 for(row=g_x1;row<=g_x2-ldxo;row++)
\r
1800 if(ldx) {*ta++=s;ldx--;}
\r
1802 if(ldy && column&1) {ldy--;cSRCPtr=cOSRCPtr;}
\r
1803 else cSRCPtr+=LineOffset;
\r
1806 DefinePalTextureWnd();
\r
1809 UploadTexWndPal(mode,cx,cy);
\r
1812 ////////////////////////////////////////////////////////////////////////
\r
1813 // tex window: main selecting, cache handler included
\r
1814 ////////////////////////////////////////////////////////////////////////
\r
1816 GLuint LoadTextureWnd(long pageid,long TextureMode,unsigned long GivenClutId)
\r
1818 textureWndCacheEntry * ts, * tsx=NULL;
\r
1819 int i;short cx,cy;
\r
1822 npos.c[3]=TWin.Position.x0;
\r
1823 npos.c[2]=TWin.OPosition.x1;
\r
1824 npos.c[1]=TWin.Position.y0;
\r
1825 npos.c[0]=TWin.OPosition.y1;
\r
1827 g_x1=TWin.Position.x0;g_x2=g_x1+TWin.Position.x1-1;
\r
1828 g_y1=TWin.Position.y0;g_y2=g_y1+TWin.Position.y1-1;
\r
1830 if(TextureMode==2) {GivenClutId=0;cx=cy=0;}
\r
1833 cx=((GivenClutId << 4) & 0x3F0);cy=((GivenClutId >> 6) & CLUTYMASK);
\r
1834 GivenClutId=(GivenClutId&CLUTMASK)|(DrawSemiTrans<<30);
\r
1836 // palette check sum
\r
1838 unsigned long l=0,row;
\r
1839 unsigned long * lSRCPtr=(unsigned long *)(psxVuw+cx+(cy*1024));
\r
1840 if(TextureMode==1) for(row=1;row<129;row++) l+=((*lSRCPtr++)-1)*row;
\r
1841 else for(row=1;row<9;row++) l+=((*lSRCPtr++)-1)<<row;
\r
1842 l=(l+HIWORD(l))&0x3fffL;
\r
1843 GivenClutId|=(l<<16);
\r
1850 for(i=0;i<iMaxTexWnds;i++,ts++)
\r
1854 if(ts->pos.l==npos.l &&
\r
1855 ts->pageid==pageid &&
\r
1856 ts->textureMode==TextureMode)
\r
1858 if(ts->ClutID==GivenClutId)
\r
1860 ubOpaqueDraw=ts->Opaque;
\r
1861 return ts->texname;
\r
1870 if(iMaxTexWnds==iTexWndLimit)
\r
1872 tsx=wcWndtexStore+iTexWndTurn;
\r
1874 if(iTexWndTurn==iTexWndLimit) iTexWndTurn=0;
\r
1878 tsx=wcWndtexStore+iMaxTexWnds;
\r
1883 gTexName=tsx->texname;
\r
1885 if(TWin.OPosition.y1==TWin.Position.y1 &&
\r
1886 TWin.OPosition.x1==TWin.Position.x1)
\r
1888 LoadWndTexturePage(pageid,TextureMode,cx,cy);
\r
1892 LoadStretchWndTexturePage(pageid,TextureMode,cx,cy);
\r
1895 tsx->Opaque=ubOpaqueDraw;
\r
1896 tsx->pos.l=npos.l;
\r
1897 tsx->ClutID=GivenClutId;
\r
1898 tsx->pageid=pageid;
\r
1899 tsx->textureMode=TextureMode;
\r
1900 tsx->texname=gTexName;
\r
1906 /////////////////////////////////////////////////////////////////////////////
\r
1907 /////////////////////////////////////////////////////////////////////////////
\r
1908 /////////////////////////////////////////////////////////////////////////////
\r
1910 ////////////////////////////////////////////////////////////////////////
\r
1911 // movie texture: define
\r
1912 ////////////////////////////////////////////////////////////////////////
\r
1914 void DefinePackedTextureMovie(void)
\r
1916 if(gTexMovieName==0)
\r
1918 glEnable(GL_TEXTURE_2D);
\r
1919 glGenTextures(1, &gTexMovieName); glError();
\r
1920 gTexName=gTexMovieName;
\r
1921 glBindTexture(GL_TEXTURE_2D, gTexName); glError();
\r
1923 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, iClampType); glError();
\r
1924 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, iClampType); glError();
\r
1926 if(!bUseFastMdec)
\r
1928 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR); glError();
\r
1929 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR); glError();
\r
1933 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, iFilter); glError();
\r
1934 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, iFilter); glError();
\r
1937 glTexImage2D(GL_TEXTURE_2D, 0, //giWantedRGBA,
\r
1939 256, 256, 0, GL_RGBA, GL_UNSIGNED_BYTE, texturepart); glError();
\r
1943 gTexName=gTexMovieName;glBindTexture(GL_TEXTURE_2D, gTexName); glError();
\r
1946 glTexSubImage2D(GL_TEXTURE_2D, 0, 0, 0,
\r
1947 (xrMovieArea.x1-xrMovieArea.x0),
\r
1948 (xrMovieArea.y1-xrMovieArea.y0),
\r
1950 GL_UNSIGNED_SHORT,
\r
1951 texturepart); glError();
\r
1952 //LOGE("DefinePackedTextureMovie x:%d y:%d",(xrMovieArea.x1-xrMovieArea.x0),(xrMovieArea.y1-xrMovieArea.y0));
\r
1956 ////////////////////////////////////////////////////////////////////////
\r
1958 void DefineTextureMovie(void)
\r
1960 if(gTexMovieName==0)
\r
1962 glGenTextures(1, &gTexMovieName); glError();
\r
1963 gTexName=gTexMovieName;
\r
1964 glBindTexture(GL_TEXTURE_2D, gTexName); glError();
\r
1966 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, iClampType); glError();
\r
1967 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, iClampType); glError();
\r
1969 if(!bUseFastMdec)
\r
1971 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR); glError();
\r
1972 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR); glError();
\r
1976 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, iFilter); glError();
\r
1977 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, iFilter); glError();
\r
1980 glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, 256, 256, 0, GL_RGBA, GL_UNSIGNED_BYTE, texturepart); glError();
\r
1984 gTexName=gTexMovieName;glBindTexture(GL_TEXTURE_2D, gTexName); glError();
\r
1987 glTexSubImage2D(GL_TEXTURE_2D, 0, 0, 0,
\r
1988 (xrMovieArea.x1-xrMovieArea.x0),
\r
1989 (xrMovieArea.y1-xrMovieArea.y0),
\r
1990 GL_RGBA, GL_UNSIGNED_BYTE, texturepart); glError();
\r
1991 //LOGE("DefineTextureMovie x:%d y:%d",(xrMovieArea.x1-xrMovieArea.x0),(xrMovieArea.y1-xrMovieArea.y0));
\r
1994 ////////////////////////////////////////////////////////////////////////
\r
1995 // movie texture: load
\r
1996 ////////////////////////////////////////////////////////////////////////
\r
1998 #define MRED(x) ((x>>3) & 0x1f)
\r
1999 #define MGREEN(x) ((x>>6) & 0x3e0)
\r
2000 #define MBLUE(x) ((x>>9) & 0x7c00)
\r
2002 #define XMGREEN(x) ((x>>5) & 0x07c0)
\r
2003 #define XMRED(x) ((x<<8) & 0xf800)
\r
2004 #define XMBLUE(x) ((x>>18) & 0x003e)
\r
2006 ////////////////////////////////////////////////////////////////////////
\r
2007 // movie texture: load
\r
2008 ////////////////////////////////////////////////////////////////////////
\r
2010 unsigned char * LoadDirectMovieFast(void)
\r
2013 unsigned int startxy;
\r
2015 unsigned long * ta=(unsigned long *)texturepart;
\r
2017 if(PSXDisplay.RGB24)
\r
2019 unsigned char * pD;
\r
2021 startxy=((1024)*xrMovieArea.y0)+xrMovieArea.x0;
\r
2023 for(column=xrMovieArea.y0;column<xrMovieArea.y1;column++,startxy+=1024)
\r
2025 pD=(unsigned char *)&psxVuw[startxy];
\r
2026 for(row=xrMovieArea.x0;row<xrMovieArea.x1;row++)
\r
2028 *ta++=*((unsigned long *)pD)|0xff000000;
\r
2035 unsigned long (*LTCOL)(unsigned long);
\r
2037 LTCOL=XP8RGBA_0;//TCF[0];
\r
2041 for(column=xrMovieArea.y0;column<xrMovieArea.y1;column++)
\r
2043 startxy=((1024)*column)+xrMovieArea.x0;
\r
2044 for(row=xrMovieArea.x0;row<xrMovieArea.x1;row++)
\r
2045 *ta++=LTCOL(psxVuw[startxy++]|0x8000);
\r
2049 return texturepart;
\r
2052 ////////////////////////////////////////////////////////////////////////
\r
2054 GLuint LoadTextureMovieFast(void)
\r
2057 unsigned int start,startxy;
\r
2060 if(PSXDisplay.RGB24)
\r
2062 unsigned char * pD;
\r
2063 unsigned long * ta=(unsigned long *)texturepart;
\r
2065 startxy=((1024)*xrMovieArea.y0)+xrMovieArea.x0;
\r
2067 for(column=xrMovieArea.y0;column<xrMovieArea.y1;column++,startxy+=1024)
\r
2069 //startxy=((1024)*column)+xrMovieArea.x0;
\r
2070 pD=(unsigned char *)&psxVuw[startxy];
\r
2071 for(row=xrMovieArea.x0;row<xrMovieArea.x1;row++)
\r
2073 *ta++=*((unsigned long *)pD)|0xff000000;
\r
2080 unsigned long (*LTCOL)(unsigned long);
\r
2081 unsigned long *ta;
\r
2083 LTCOL=XP8RGBA_0;//TCF[0];
\r
2086 ta=(unsigned long *)texturepart;
\r
2088 for(column=xrMovieArea.y0;column<xrMovieArea.y1;column++)
\r
2090 startxy=((1024)*column)+xrMovieArea.x0;
\r
2091 for(row=xrMovieArea.x0;row<xrMovieArea.x1;row++)
\r
2092 *ta++=LTCOL(psxVuw[startxy++]|0x8000);
\r
2095 DefineTextureMovie();
\r
2100 ////////////////////////////////////////////////////////////////////////
\r
2102 GLuint LoadTextureMovie(void)
\r
2104 short row,column,dx;
\r
2105 unsigned int startxy;
\r
2108 if(bUseFastMdec) return LoadTextureMovieFast();
\r
2110 b_X=FALSE;b_Y=FALSE;
\r
2112 if((xrMovieArea.x1-xrMovieArea.x0)<255) b_X=TRUE;
\r
2113 if((xrMovieArea.y1-xrMovieArea.y0)<255) b_Y=TRUE;
\r
2116 if(PSXDisplay.RGB24)
\r
2118 unsigned char * pD;
\r
2119 unsigned long * ta=(unsigned long *)texturepart;
\r
2123 for(column=xrMovieArea.y0;column<xrMovieArea.y1;column++)
\r
2125 startxy=((1024)*column)+xrMovieArea.x0;
\r
2126 pD=(unsigned char *)&psxVuw[startxy];
\r
2127 for(row=xrMovieArea.x0;row<xrMovieArea.x1;row++)
\r
2129 *ta++=*((unsigned long *)pD)|0xff000000;
\r
2136 dx=xrMovieArea.x1-xrMovieArea.x0+1;
\r
2137 for(row=xrMovieArea.x0;row<xrMovieArea.x1;row++)
\r
2144 for(column=xrMovieArea.y0;column<xrMovieArea.y1;column++)
\r
2146 startxy=((1024)*column)+xrMovieArea.x0;
\r
2147 pD=(unsigned char *)&psxVuw[startxy];
\r
2148 for(row=xrMovieArea.x0;row<xrMovieArea.x1;row++)
\r
2150 *ta++=*((unsigned long *)pD)|0xff000000;
\r
2156 dx=xrMovieArea.x1-xrMovieArea.x0;
\r
2157 for(row=xrMovieArea.x0;row<xrMovieArea.x1;row++)
\r
2164 unsigned long (*LTCOL)(unsigned long);
\r
2165 unsigned long *ta;
\r
2167 LTCOL=XP8RGBA_0;//TCF[0];
\r
2170 ta=(unsigned long *)texturepart;
\r
2174 for(column=xrMovieArea.y0;column<xrMovieArea.y1;column++)
\r
2176 startxy=((1024)*column)+xrMovieArea.x0;
\r
2177 for(row=xrMovieArea.x0;row<xrMovieArea.x1;row++)
\r
2178 *ta++=LTCOL(psxVuw[startxy++]|0x8000);
\r
2184 dx=xrMovieArea.x1-xrMovieArea.x0+1;
\r
2185 for(row=xrMovieArea.x0;row<xrMovieArea.x1;row++)
\r
2192 for(column=xrMovieArea.y0;column<xrMovieArea.y1;column++)
\r
2194 startxy=((1024)*column)+xrMovieArea.x0;
\r
2195 for(row=xrMovieArea.x0;row<xrMovieArea.x1;row++)
\r
2196 *ta++=LTCOL(psxVuw[startxy++]|0x8000);
\r
2201 dx=xrMovieArea.x1-xrMovieArea.x0;
\r
2202 for(row=xrMovieArea.x0;row<xrMovieArea.x1;row++)
\r
2208 xrMovieArea.x1+=b_X;xrMovieArea.y1+=b_Y;
\r
2209 DefineTextureMovie();
\r
2210 xrMovieArea.x1-=b_X;xrMovieArea.y1-=b_Y;
\r
2215 /////////////////////////////////////////////////////////////////////////////
\r
2216 /////////////////////////////////////////////////////////////////////////////
\r
2217 /////////////////////////////////////////////////////////////////////////////
\r
2219 GLuint BlackFake15BitTexture(void)
\r
2221 long pmult;short x1,x2,y1,y2;
\r
2223 if(PSXDisplay.InterlacedTest) return 0;
\r
2225 pmult=GlobalTexturePage/16;
\r
2227 x2=gl_ux[6]-gl_ux[7];
\r
2229 y2=gl_ux[4]-gl_ux[5];
\r
2238 x1+=((GlobalTexturePage-16*pmult)<<6);
\r
2240 if( FastCheckAgainstFrontScreen(x1,y1,x2,y2)
\r
2241 || FastCheckAgainstScreen(x1,y1,x2,y2))
\r
2243 if(!gTexFrameName)
\r
2245 glGenTextures(1, &gTexFrameName); glError();
\r
2246 gTexName=gTexFrameName;
\r
2247 glBindTexture(GL_TEXTURE_2D, gTexName); glError();
\r
2249 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, iClampType); glError();
\r
2250 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, iClampType); glError();
\r
2251 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, iFilter); glError();
\r
2252 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, iFilter); glError();
\r
2255 unsigned long * ta=(unsigned long *)texturepart;
\r
2256 for(y1=0;y1<=4;y1++)
\r
2257 for(x1=0;x1<=4;x1++)
\r
2260 glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, 4, 4, 0, GL_RGBA, GL_UNSIGNED_BYTE, texturepart); glError();
\r
2265 gTexName=gTexFrameName;
\r
2266 glBindTexture(GL_TEXTURE_2D, gTexName); glError();
\r
2268 //LOGE("BlackFake15BitTexture x:%d y:%d",4,4);
\r
2271 return (GLuint)gTexName;
\r
2276 /////////////////////////////////////////////////////////////////////////////
\r
2278 BOOL bFakeFrontBuffer=FALSE;
\r
2279 BOOL bIgnoreNextTile =FALSE;
\r
2283 GLuint Fake15BitTexture(void)
\r
2285 long pmult;short x1,x2,y1,y2;int iYAdjust;
\r
2286 float ScaleX,ScaleY;RECT rSrc;
\r
2288 if(iFrameTexType==1) return BlackFake15BitTexture();
\r
2289 if(PSXDisplay.InterlacedTest) return 0;
\r
2291 pmult=GlobalTexturePage/16;
\r
2293 x2=gl_ux[6]-gl_ux[7];
\r
2295 y2=gl_ux[4]-gl_ux[5];
\r
2298 x1+=((GlobalTexturePage-16*pmult)<<6);
\r
2300 if(iFrameTexType==3)
\r
2302 if(iFrameReadType==4) return 0;
\r
2304 if(!FastCheckAgainstFrontScreen(x1,y1,x2,y2) &&
\r
2305 !FastCheckAgainstScreen(x1,y1,x2,y2))
\r
2308 if(bFakeFrontBuffer) bIgnoreNextTile=TRUE;
\r
2309 CheckVRamReadEx(x1,y1,x1+x2,y1+y2);
\r
2313 /////////////////////////
\r
2315 if(FastCheckAgainstFrontScreen(x1,y1,x2,y2))
\r
2317 x1-=PSXDisplay.DisplayPosition.x;
\r
2318 y1-=PSXDisplay.DisplayPosition.y;
\r
2321 if(FastCheckAgainstScreen(x1,y1,x2,y2))
\r
2323 x1-=PreviousPSXDisplay.DisplayPosition.x;
\r
2324 y1-=PreviousPSXDisplay.DisplayPosition.y;
\r
2328 bDrawMultiPass = FALSE;
\r
2330 if(!gTexFrameName)
\r
2334 if(iResX>1280 || iResY>1024) iFTex=2048;
\r
2336 if(iResX>640 || iResY>480) iFTex=1024;
\r
2339 glGenTextures(1, &gTexFrameName); glError();
\r
2340 gTexName=gTexFrameName;
\r
2341 glBindTexture(GL_TEXTURE_2D, gTexName); glError();
\r
2343 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, iClampType); glError();
\r
2344 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, iClampType); glError();
\r
2345 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, iFilter); glError();
\r
2346 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, iFilter); glError();
\r
2348 p=(char *)malloc(iFTex*iFTex*4);
\r
2349 memset(p,0,iFTex*iFTex*4);
\r
2350 glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, iFTex, iFTex, 0, GL_RGBA, GL_UNSIGNED_BYTE, p); glError();
\r
2357 gTexName=gTexFrameName;
\r
2358 glBindTexture(GL_TEXTURE_2D, gTexName); glError();
\r
2360 //LOGE("Fake15BitTexture x:%d y:%d",iFTex,iFTex);
\r
2361 x1+=PreviousPSXDisplay.Range.x0;
\r
2362 y1+=PreviousPSXDisplay.Range.y0;
\r
2364 if(PSXDisplay.DisplayMode.x)
\r
2365 ScaleX=(float)rRatioRect.right/(float)PSXDisplay.DisplayMode.x;
\r
2367 if(PSXDisplay.DisplayMode.y)
\r
2368 ScaleY=(float)rRatioRect.bottom/(float)PSXDisplay.DisplayMode.y;
\r
2371 rSrc.left =max(x1*ScaleX,0);
\r
2372 rSrc.right =min((x1+x2)*ScaleX+0.99f,iResX-1);
\r
2373 rSrc.top =max(y1*ScaleY,0);
\r
2374 rSrc.bottom=min((y1+y2)*ScaleY+0.99f,iResY-1);
\r
2376 iYAdjust=(y1+y2)-PSXDisplay.DisplayMode.y;
\r
2378 iYAdjust=(int)((float)iYAdjust*ScaleY)+1;
\r
2381 gl_vy[0]=255-gl_vy[0];
\r
2382 gl_vy[1]=255-gl_vy[1];
\r
2383 gl_vy[2]=255-gl_vy[2];
\r
2384 gl_vy[3]=255-gl_vy[3];
\r
2386 y1=min(gl_vy[0],min(gl_vy[1],min(gl_vy[2],gl_vy[3])));
\r
2392 gl_ux[0]-=gl_ux[7];
\r
2393 gl_ux[1]-=gl_ux[7];
\r
2394 gl_ux[2]-=gl_ux[7];
\r
2395 gl_ux[3]-=gl_ux[7];
\r
2397 ScaleX*=256.0f/((float)(iFTex));
\r
2398 ScaleY*=256.0f/((float)(iFTex));
\r
2400 y1=((float)gl_vy[0]*ScaleY); if(y1>255) y1=255;
\r
2402 y1=((float)gl_vy[1]*ScaleY); if(y1>255) y1=255;
\r
2404 y1=((float)gl_vy[2]*ScaleY); if(y1>255) y1=255;
\r
2406 y1=((float)gl_vy[3]*ScaleY); if(y1>255) y1=255;
\r
2409 x1=((float)gl_ux[0]*ScaleX); if(x1>255) x1=255;
\r
2411 x1=((float)gl_ux[1]*ScaleX); if(x1>255) x1=255;
\r
2413 x1=((float)gl_ux[2]*ScaleX); if(x1>255) x1=255;
\r
2415 x1=((float)gl_ux[3]*ScaleX); if(x1>255) x1=255;
\r
2418 x1=rSrc.right-rSrc.left;
\r
2420 if(x1>iFTex) x1=iFTex;
\r
2422 y1=rSrc.bottom-rSrc.top;
\r
2424 if(y1+iYAdjust>iFTex) y1=iFTex-iYAdjust;
\r
2427 glCopyTexSubImage2D( GL_TEXTURE_2D, 0,
\r
2430 rSrc.left+rRatioRect.left,
\r
2431 iResY-rSrc.bottom-rRatioRect.top,
\r
2432 x1,y1); glError();
\r
2436 char * p=(char *)malloc(iFTex*iFTex*4);
\r
2437 memset(p,0,iFTex*iFTex*4);
\r
2438 glTexSubImage2D(GL_TEXTURE_2D, 0, 0, 0, iFTex, iFTex,
\r
2439 GL_RGBA, GL_UNSIGNED_BYTE, p); glError();
\r
2448 sprtW=gl_ux[1]-gl_ux[0];
\r
2449 sprtH=-(gl_vy[0]-gl_vy[2]);
\r
2452 return (GLuint)gTexName;
\r
2455 /////////////////////////////////////////////////////////////////////////////
\r
2456 /////////////////////////////////////////////////////////////////////////////
\r
2457 /////////////////////////////////////////////////////////////////////////////
\r
2459 // load texture part (unpacked)
\r
2461 /////////////////////////////////////////////////////////////////////////////
\r
2462 /////////////////////////////////////////////////////////////////////////////
\r
2463 /////////////////////////////////////////////////////////////////////////////
\r
2465 void LoadSubTexturePageSort(int pageid, int mode, short cx, short cy)
\r
2467 unsigned long start,row,column,j,sxh,sxm;
\r
2468 unsigned int palstart;
\r
2469 unsigned long *px,*pa,*ta;
\r
2470 unsigned char *cSRCPtr;
\r
2471 unsigned short *wSRCPtr;
\r
2472 unsigned long LineOffset;
\r
2473 unsigned long x2a,xalign=0;
\r
2474 unsigned long x1=gl_ux[7];
\r
2475 unsigned long x2=gl_ux[6];
\r
2476 unsigned long y1=gl_ux[5];
\r
2477 unsigned long y2=gl_ux[4];
\r
2478 unsigned long dx=x2-x1+1;
\r
2479 unsigned long dy=y2-y1+1;
\r
2480 int pmult=pageid/16;
\r
2481 unsigned long (*LTCOL)(unsigned long);
\r
2482 unsigned int a,r,g,b,cnt,h;
\r
2483 unsigned long scol[8];
\r
2485 LTCOL=TCF[DrawSemiTrans];
\r
2487 pa=px=(unsigned long *)ubPaletteBuffer;
\r
2488 ta=(unsigned long *)texturepart;
\r
2489 palstart=cx+(cy<<10);
\r
2493 if(YTexS) {ta+=dx;if(XTexS) ta+=2;}
\r
2494 if(XTexS) {ta+=1;xalign=2;}
\r
2498 //--------------------------------------------------//
\r
2499 // 4bit texture load ..
\r
2503 unsigned int TXV,TXU,n_xi,n_yi;
\r
2505 wSRCPtr=psxVuw+palstart;
\r
2509 *px =LTCOL(*wSRCPtr);
\r
2510 *(px+1)=LTCOL(*(wSRCPtr+1));
\r
2511 *(px+2)=LTCOL(*(wSRCPtr+2));
\r
2512 *(px+3)=LTCOL(*(wSRCPtr+3));
\r
2513 row--;px+=4;wSRCPtr+=4;
\r
2517 for(TXV=y1;TXV<=y2;TXV++)
\r
2519 for(TXU=x1;TXU<=x2;TXU++)
\r
2521 n_xi = ( ( TXU >> 2 ) & ~0x3c ) + ( ( TXV << 2 ) & 0x3c );
\r
2522 n_yi = ( TXV & ~0xf ) + ( ( TXU >> 4 ) & 0xf );
\r
2524 *ta++=*(pa+((*( psxVuw + ((GlobalTextAddrY + n_yi)*1024) + GlobalTextAddrX + n_xi ) >> ( ( TXU & 0x03 ) << 2 ) ) & 0x0f ));
\r
2531 start=((pageid-16*pmult)<<7)+524288*pmult;
\r
2532 // convert CLUT to 32bits .. and then use THAT as a lookup table
\r
2534 wSRCPtr=psxVuw+palstart;
\r
2538 *px =LTCOL(*wSRCPtr);
\r
2539 *(px+1)=LTCOL(*(wSRCPtr+1));
\r
2540 *(px+2)=LTCOL(*(wSRCPtr+2));
\r
2541 *(px+3)=LTCOL(*(wSRCPtr+3));
\r
2542 row--;px+=4;wSRCPtr+=4;
\r
2546 x2a=x2?(x2-1):0;//if(x2) x2a=x2-1; else x2a=0;
\r
2547 sxm=x1&1;sxh=x1>>1;
\r
2548 j=sxm?(x1+1):x1;//if(sxm) j=x1+1; else j=x1;
\r
2549 for(column=y1;column<=y2;column++)
\r
2551 cSRCPtr = psxVub + start + (column<<11) + sxh;
\r
2553 if(sxm) *ta++=*(pa+((*cSRCPtr++ >> 4) & 0xF));
\r
2555 for(row=j;row<x2a;row+=2)
\r
2557 *ta =*(pa+(*cSRCPtr & 0xF));
\r
2558 *(ta+1)=*(pa+((*cSRCPtr >> 4) & 0xF));
\r
2564 *ta++=*(pa+(*cSRCPtr & 0xF)); row++;
\r
2565 if(row<=x2) *ta++=*(pa+((*cSRCPtr >> 4) & 0xF));
\r
2572 //--------------------------------------------------//
\r
2573 // 8bit texture load ..
\r
2577 unsigned int TXV,TXU,n_xi,n_yi;
\r
2579 wSRCPtr=psxVuw+palstart;
\r
2583 *px =LTCOL(*wSRCPtr);
\r
2584 *(px+1)=LTCOL(*(wSRCPtr+1));
\r
2585 *(px+2)=LTCOL(*(wSRCPtr+2));
\r
2586 *(px+3)=LTCOL(*(wSRCPtr+3));
\r
2587 row--;px+=4;wSRCPtr+=4;
\r
2591 for(TXV=y1;TXV<=y2;TXV++)
\r
2593 for(TXU=x1;TXU<=x2;TXU++)
\r
2595 n_xi = ( ( TXU >> 1 ) & ~0x78 ) + ( ( TXU << 2 ) & 0x40 ) + ( ( TXV << 3 ) & 0x38 );
\r
2596 n_yi = ( TXV & ~0x7 ) + ( ( TXU >> 5 ) & 0x7 );
\r
2598 *ta++=*(pa+((*( psxVuw + ((GlobalTextAddrY + n_yi)*1024) + GlobalTextAddrX + n_xi ) >> ( ( TXU & 0x01 ) << 3 ) ) & 0xff));
\r
2606 start=((pageid-16*pmult)<<7)+524288*pmult;
\r
2608 cSRCPtr = psxVub + start + (y1<<11) + x1;
\r
2609 LineOffset = 2048 - dx;
\r
2613 wSRCPtr=psxVuw+palstart;
\r
2617 *px =LTCOL(*wSRCPtr);
\r
2618 *(px+1)=LTCOL(*(wSRCPtr+1));
\r
2619 *(px+2)=LTCOL(*(wSRCPtr+2));
\r
2620 *(px+3)=LTCOL(*(wSRCPtr+3));
\r
2621 row--;px+=4;wSRCPtr+=4;
\r
2628 do {*ta++=*(pa+(*cSRCPtr++));row--;} while(row);
\r
2630 cSRCPtr+=LineOffset;column--;
\r
2636 wSRCPtr=psxVuw+palstart;
\r
2641 do {*ta++=LTCOL(*(wSRCPtr+*cSRCPtr++));row--;} while(row);
\r
2643 cSRCPtr+=LineOffset;column--;
\r
2649 //--------------------------------------------------//
\r
2650 // 16bit texture load ..
\r
2652 start=((pageid-16*pmult)<<6)+262144*pmult;
\r
2654 wSRCPtr = psxVuw + start + (y1<<10) + x1;
\r
2655 LineOffset = 1024 - dx;
\r
2660 do {*ta++=LTCOL(*wSRCPtr++);row--;} while(row);
\r
2662 wSRCPtr+=LineOffset;column--;
\r
2667 //--------------------------------------------------//
\r
2668 // others are not possible !
\r
2675 ta=(unsigned long *)texturepart;
\r
2676 pa=(unsigned long *)texturepart+x2a;
\r
2677 row=x2a;do {*ta++=*pa++;row--;} while(row);
\r
2678 pa=(unsigned long *)texturepart+dy*x2a;
\r
2680 row=x2a;do {*ta++=*pa++;row--;} while(row);
\r
2687 ta=(unsigned long *)texturepart;
\r
2689 row=dy;do {*ta=*pa;ta+=x2a;pa+=x2a;row--;} while(row);
\r
2690 pa=(unsigned long *)texturepart+dx;
\r
2692 row=dy;do {*ta=*pa;ta+=x2a;pa+=x2a;row--;} while(row);
\r
2697 DXTexS=dx;DYTexS=dy;
\r
2699 if(!iFilterType) {DefineSubTextureSort();return;}
\r
2700 if(iFilterType!=2 && iFilterType!=4 && iFilterType!=6) {DefineSubTextureSort();return;}
\r
2701 if((iFilterType==4 || iFilterType==6) && ly0==ly1 && ly2==ly3 && lx0==lx3 && lx1==lx2)
\r
2702 {DefineSubTextureSort();return;}
\r
2704 ta=(unsigned long *)texturepart;
\r
2711 for(column=0;column<dy;column++)
\r
2713 for(row=0;row<dx;row++)
\r
2715 if(*ta==0x50000000)
\r
2719 if( column && *(ta-dx) !=0x50000000 && *(ta-dx)>>24!=1) scol[cnt++]=*(ta-dx);
\r
2720 if(row && *(ta-1) !=0x50000000 && *(ta-1)>>24!=1) scol[cnt++]=*(ta-1);
\r
2721 if(row!=x1 && *(ta+1) !=0x50000000 && *(ta+1)>>24!=1) scol[cnt++]=*(ta+1);
\r
2722 if( column!=y1 && *(ta+dx) !=0x50000000 && *(ta+dx)>>24!=1) scol[cnt++]=*(ta+dx);
\r
2724 if(row && column && *(ta-dx-1)!=0x50000000 && *(ta-dx-1)>>24!=1) scol[cnt++]=*(ta-dx-1);
\r
2725 if(row!=x1 && column && *(ta-dx+1)!=0x50000000 && *(ta-dx+1)>>24!=1) scol[cnt++]=*(ta-dx+1);
\r
2726 if(row && column!=y1 && *(ta+dx-1)!=0x50000000 && *(ta+dx-1)>>24!=1) scol[cnt++]=*(ta+dx-1);
\r
2727 if(row!=x1 && column!=y1 && *(ta+dx+1)!=0x50000000 && *(ta+dx+1)>>24!=1) scol[cnt++]=*(ta+dx+1);
\r
2732 for(h=0;h<cnt;h++)
\r
2735 r+=(scol[h]>>16)&0xff;
\r
2736 g+=(scol[h]>>8)&0xff;
\r
2739 r/=cnt;b/=cnt;g/=cnt;
\r
2741 *ta=(r<<16)|(g<<8)|b;
\r
2742 if(a) *ta|=0x50000000;
\r
2743 else *ta|=0x01000000;
\r
2752 for(column=0;column<dy;column++)
\r
2754 for(row=0;row<dx;row++)
\r
2756 if(*ta==0x00000000)
\r
2760 if(row!=x1 && *(ta+1) !=0x00000000) scol[cnt++]=*(ta+1);
\r
2761 if( column!=y1 && *(ta+dx) !=0x00000000) scol[cnt++]=*(ta+dx);
\r
2766 for(h=0;h<cnt;h++)
\r
2768 r+=(scol[h]>>16)&0xff;
\r
2769 g+=(scol[h]>>8)&0xff;
\r
2772 r/=cnt;b/=cnt;g/=cnt;
\r
2773 *ta=(r<<16)|(g<<8)|b;
\r
2780 DefineSubTextureSort();
\r
2783 /////////////////////////////////////////////////////////////////////////////
\r
2784 /////////////////////////////////////////////////////////////////////////////
\r
2785 /////////////////////////////////////////////////////////////////////////////
\r
2787 // load texture part (packed)
\r
2789 /////////////////////////////////////////////////////////////////////////////
\r
2790 /////////////////////////////////////////////////////////////////////////////
\r
2791 /////////////////////////////////////////////////////////////////////////////
\r
2793 void LoadPackedSubTexturePageSort(int pageid, int mode, short cx, short cy)
\r
2795 unsigned long start,row,column,j,sxh,sxm;
\r
2796 unsigned int palstart;
\r
2797 unsigned short *px,*pa,*ta;
\r
2798 unsigned char *cSRCPtr;
\r
2799 unsigned short *wSRCPtr;
\r
2800 unsigned long LineOffset;
\r
2801 unsigned long x2a,xalign=0;
\r
2802 unsigned long x1=gl_ux[7];
\r
2803 unsigned long x2=gl_ux[6];
\r
2804 unsigned long y1=gl_ux[5];
\r
2805 unsigned long y2=gl_ux[4];
\r
2806 unsigned long dx=x2-x1+1;
\r
2807 unsigned long dy=y2-y1+1;
\r
2808 int pmult=pageid/16;
\r
2809 unsigned short (*LPTCOL)(unsigned short);
\r
2810 unsigned int a,r,g,b,cnt,h;
\r
2811 unsigned short scol[8];
\r
2813 LPTCOL=PTCF[DrawSemiTrans];
\r
2815 pa=px=(unsigned short *)ubPaletteBuffer;
\r
2816 ta=(unsigned short *)texturepart;
\r
2817 palstart=cx+(cy<<10);
\r
2821 if(YTexS) {ta+=dx;if(XTexS) ta+=2;}
\r
2822 if(XTexS) {ta+=1;xalign=2;}
\r
2826 //--------------------------------------------------//
\r
2827 // 4bit texture load ..
\r
2831 unsigned int TXV,TXU,n_xi,n_yi;
\r
2833 wSRCPtr=psxVuw+palstart;
\r
2836 *px =LPTCOL(*wSRCPtr);
\r
2837 *(px+1)=LPTCOL(*(wSRCPtr+1));
\r
2838 *(px+2)=LPTCOL(*(wSRCPtr+2));
\r
2839 *(px+3)=LPTCOL(*(wSRCPtr+3));
\r
2840 row--;px+=4;wSRCPtr+=4;
\r
2844 for(TXV=y1;TXV<=y2;TXV++)
\r
2846 for(TXU=x1;TXU<=x2;TXU++)
\r
2848 n_xi = ( ( TXU >> 2 ) & ~0x3c ) + ( ( TXV << 2 ) & 0x3c );
\r
2849 n_yi = ( TXV & ~0xf ) + ( ( TXU >> 4 ) & 0xf );
\r
2851 *ta++=*(pa+((*( psxVuw + ((GlobalTextAddrY + n_yi)*1024) + GlobalTextAddrX + n_xi ) >> ( ( TXU & 0x03 ) << 2 ) ) & 0x0f ));
\r
2858 start=((pageid-16*pmult)<<7)+524288*pmult;
\r
2860 wSRCPtr=psxVuw+palstart;
\r
2863 *px =LPTCOL(*wSRCPtr);
\r
2864 *(px+1)=LPTCOL(*(wSRCPtr+1));
\r
2865 *(px+2)=LPTCOL(*(wSRCPtr+2));
\r
2866 *(px+3)=LPTCOL(*(wSRCPtr+3));
\r
2867 row--;px+=4;wSRCPtr+=4;
\r
2871 x2a=x2?(x2-1):0;//if(x2) x2a=x2-1; else x2a=0;
\r
2872 sxm=x1&1;sxh=x1>>1;
\r
2873 j=sxm?(x1+1):x1;//if(sxm) j=x1+1; else j=x1;
\r
2875 for(column=y1;column<=y2;column++)
\r
2877 cSRCPtr = psxVub + start + (column<<11) + sxh;
\r
2879 if(sxm) *ta++=*(pa+((*cSRCPtr++ >> 4) & 0xF));
\r
2881 for(row=j;row<x2a;row+=2)
\r
2883 *ta =*(pa+(*cSRCPtr & 0xF));
\r
2884 *(ta+1)=*(pa+((*cSRCPtr >> 4) & 0xF));
\r
2890 *ta++=*(pa+(*cSRCPtr & 0xF));row++;
\r
2891 if(row<=x2) *ta++=*(pa+((*cSRCPtr >> 4) & 0xF));
\r
2897 //--------------------------------------------------//
\r
2898 // 8bit texture load ..
\r
2902 unsigned int TXV,TXU,n_xi,n_yi;
\r
2904 wSRCPtr=psxVuw+palstart;
\r
2908 *px =LPTCOL(*wSRCPtr);
\r
2909 *(px+1)=LPTCOL(*(wSRCPtr+1));
\r
2910 *(px+2)=LPTCOL(*(wSRCPtr+2));
\r
2911 *(px+3)=LPTCOL(*(wSRCPtr+3));
\r
2912 row--;px+=4;wSRCPtr+=4;
\r
2916 for(TXV=y1;TXV<=y2;TXV++)
\r
2918 for(TXU=x1;TXU<=x2;TXU++)
\r
2920 n_xi = ( ( TXU >> 1 ) & ~0x78 ) + ( ( TXU << 2 ) & 0x40 ) + ( ( TXV << 3 ) & 0x38 );
\r
2921 n_yi = ( TXV & ~0x7 ) + ( ( TXU >> 5 ) & 0x7 );
\r
2923 *ta++=*(pa+((*( psxVuw + ((GlobalTextAddrY + n_yi)*1024) + GlobalTextAddrX + n_xi ) >> ( ( TXU & 0x01 ) << 3 ) ) & 0xff));
\r
2931 start=((pageid-16*pmult)<<7)+524288*pmult;
\r
2933 cSRCPtr = psxVub + start + (y1<<11) + x1;
\r
2934 LineOffset = 2048 - dx;
\r
2936 if(dy*dx>384) // more pix? use lut
\r
2938 wSRCPtr=psxVuw+palstart;
\r
2942 *px =LPTCOL(*wSRCPtr);
\r
2943 *(px+1)=LPTCOL(*(wSRCPtr+1));
\r
2944 *(px+2)=LPTCOL(*(wSRCPtr+2));
\r
2945 *(px+3)=LPTCOL(*(wSRCPtr+3));
\r
2946 row--;px+=4;wSRCPtr+=4;
\r
2953 do {*ta++=*(pa+(*cSRCPtr++));row--;} while(row);
\r
2957 cSRCPtr+=LineOffset;column--;
\r
2961 else // small area? no lut
\r
2963 wSRCPtr=psxVuw+palstart;
\r
2968 do {*ta++=LPTCOL(*(wSRCPtr+*cSRCPtr++));row--;} while(row);
\r
2972 cSRCPtr+=LineOffset;column--;
\r
2977 //--------------------------------------------------//
\r
2978 // 16bit texture load ..
\r
2980 start=((pageid-16*pmult)<<6)+262144*pmult;
\r
2982 wSRCPtr = psxVuw + start + (y1<<10) + x1;
\r
2983 LineOffset = 1024 - dx;
\r
2988 do {*ta++=LPTCOL(*wSRCPtr++);row--;} while(row);
\r
2992 wSRCPtr+=LineOffset;column--;
\r
2996 //--------------------------------------------------//
\r
2997 // others are not possible !
\r
3000 ////////////////////////////////////////////////////////
\r
3006 ta=(unsigned short *)texturepart;
\r
3007 pa=(unsigned short *)texturepart+x2a;
\r
3008 row=x2a;do {*ta++=*pa++;row--;} while(row);
\r
3010 pa=(unsigned short *)texturepart+dy*x2a;
\r
3012 row=x2a;do {*ta++=*pa++;row--;} while(row);
\r
3020 ta=(unsigned short *)texturepart;
\r
3022 row=dy;do {*ta=*pa;ta+=x2a;pa+=x2a;row--;} while(row);
\r
3024 pa=(unsigned short *)texturepart+dx;
\r
3026 row=dy;do {*ta=*pa;ta+=x2a;pa+=x2a;row--;} while(row);
\r
3032 DXTexS=dx;DYTexS=dy;
\r
3034 if(!iFilterType) {DefineSubTextureSort();return;}
\r
3035 if(iFilterType!=2 && iFilterType!=4 && iFilterType!=6) {DefineSubTextureSort();return;}
\r
3036 if((iFilterType==4 || iFilterType==6) && ly0==ly1 && ly2==ly3 && lx0==lx3 && lx1==lx2)
\r
3037 {DefineSubTextureSort();return;}
\r
3039 ta=(unsigned short *)texturepart;
\r
3044 for(column=0;column<dy;column++)
\r
3046 for(row=0;row<dx;row++)
\r
3052 if( column && *(ta-dx) &1) scol[cnt++]=*(ta-dx);
\r
3053 if(row && *(ta-1) &1) scol[cnt++]=*(ta-1);
\r
3054 if(row!=x1 && *(ta+1) &1) scol[cnt++]=*(ta+1);
\r
3055 if( column!=y1 && *(ta+dx) &1) scol[cnt++]=*(ta+dx);
\r
3057 if(row && column && *(ta-dx-1)&1) scol[cnt++]=*(ta-dx-1);
\r
3058 if(row!=x1 && column && *(ta-dx+1)&1) scol[cnt++]=*(ta-dx+1);
\r
3059 if(row && column!=y1 && *(ta+dx-1)&1) scol[cnt++]=*(ta+dx-1);
\r
3060 if(row!=x1 && column!=y1 && *(ta+dx+1)&1) scol[cnt++]=*(ta+dx+1);
\r
3065 for(h=0;h<cnt;h++)
\r
3068 g+=(scol[h]>>6)&0x1f;
\r
3069 b+=(scol[h]>>1)&0x1f;
\r
3071 r/=cnt;b/=cnt;g/=cnt;
\r
3072 *ta=(r<<11)|(g<<6)|(b<<1);
\r
3080 DefineSubTextureSort();
\r
3083 /////////////////////////////////////////////////////////////////////////////
\r
3085 /////////////////////////////////////////////////////////////////////////////
\r
3086 /////////////////////////////////////////////////////////////////////////////
\r
3087 /////////////////////////////////////////////////////////////////////////////
\r
3089 // hires texture funcs
\r
3091 /////////////////////////////////////////////////////////////////////////////
\r
3092 /////////////////////////////////////////////////////////////////////////////
\r
3093 /////////////////////////////////////////////////////////////////////////////
\r
3096 #define GET_RESULT(A, B, C, D) ((A != C || A != D) - (B != C || B != D))
\r
3098 ////////////////////////////////////////////////////////////////////////
\r
3100 #define colorMask8 0x00FEFEFE
\r
3101 #define lowPixelMask8 0x00010101
\r
3102 #define qcolorMask8 0x00FCFCFC
\r
3103 #define qlowpixelMask8 0x00030303
\r
3106 #define INTERPOLATE8_02(A, B) (((((A & colorMask8) >> 1) + ((B & colorMask8) >> 1) + (A & B & lowPixelMask8))|((((A&0xFF000000)==0x03000000)?0x03000000:(((B&0xFF000000)==0x03000000)?0x03000000:(((A&0xFF000000)==0x00000000)?0x00000000:(((B&0xFF000000)==0x00000000)?0x00000000:0xFF000000)))))))
\r
3108 #define Q_INTERPOLATE8_02(A, B, C, D) (((((A & qcolorMask8) >> 2) + ((B & qcolorMask8) >> 2) + ((C & qcolorMask8) >> 2) + ((D & qcolorMask8) >> 2) + ((((A & qlowpixelMask8) + (B & qlowpixelMask8) + (C & qlowpixelMask8) + (D & qlowpixelMask8)) >> 2) & qlowpixelMask8))|((((A&0xFF000000)==0x03000000)?0x03000000:(((B&0xFF000000)==0x03000000)?0x03000000:(((C&0xFF000000)==0x03000000)?0x03000000:(((D&0xFF000000)==0x03000000)?0x03000000:(((A&0xFF000000)==0x00000000)?0x00000000:(((B&0xFF000000)==0x00000000)?0x00000000:(((C&0xFF000000)==0x00000000)?0x00000000:(((D&0xFF000000)==0x00000000)?0x00000000:0xFF000000)))))))))))
\r
3110 #define INTERPOLATE8(A, B) (((((A & colorMask8) >> 1) + ((B & colorMask8) >> 1) + (A & B & lowPixelMask8))|((((A&0xFF000000)==0x50000000)?0x50000000:(((B&0xFF000000)==0x50000000)?0x50000000:(((A&0xFF000000)==0x00000000)?0x00000000:(((B&0xFF000000)==0x00000000)?0x00000000:0xFF000000)))))))
\r
3112 #define Q_INTERPOLATE8(A, B, C, D) (((((A & qcolorMask8) >> 2) + ((B & qcolorMask8) >> 2) + ((C & qcolorMask8) >> 2) + ((D & qcolorMask8) >> 2) + ((((A & qlowpixelMask8) + (B & qlowpixelMask8) + (C & qlowpixelMask8) + (D & qlowpixelMask8)) >> 2) & qlowpixelMask8))|((((A&0xFF000000)==0x50000000)?0x50000000:(((B&0xFF000000)==0x50000000)?0x50000000:(((C&0xFF000000)==0x50000000)?0x50000000:(((D&0xFF000000)==0x50000000)?0x50000000:(((A&0xFF000000)==0x00000000)?0x00000000:(((B&0xFF000000)==0x00000000)?0x00000000:(((C&0xFF000000)==0x00000000)?0x00000000:(((D&0xFF000000)==0x00000000)?0x00000000:0xFF000000)))))))))))
\r
3114 void Super2xSaI_ex8_Ex(unsigned char *srcPtr, DWORD srcPitch,
\r
3115 unsigned char *dstBitmap, int width, int height)
\r
3117 DWORD dstPitch = srcPitch * 2;
\r
3121 int width2 = width*2;
\r
3122 int iXA,iXB,iXC,iYA,iYB,iYC,finish;
\r
3123 DWORD color4, color5, color6;
\r
3124 DWORD color1, color2, color3;
\r
3125 DWORD colorA0, colorA1, colorA2, colorA3,
\r
3126 colorB0, colorB1, colorB2, colorB3,
\r
3128 DWORD product1a, product1b,
\r
3129 product2a, product2b;
\r
3134 for (; height; height-=1)
\r
3136 bP = (DWORD *)srcPtr;
\r
3137 dP = (DWORD *)(dstBitmap + line*dstPitch);
\r
3138 for (finish = width; finish; finish -= 1 )
\r
3140 //--------------------------------------- B1 B2
\r
3144 if(finish==width) iXA=0;
\r
3146 if(finish>4) {iXB=1;iXC=2;}
\r
3148 if(finish>3) {iXB=1;iXC=1;}
\r
3149 else {iXB=0;iXC=0;}
\r
3150 if(line==0) iYA=0;
\r
3152 if(height>4) {iYB=width;iYC=width2;}
\r
3154 if(height>3) {iYB=width;iYC=width;}
\r
3155 else {iYB=0;iYC=0;}
\r
3158 colorB0 = *(bP- iYA - iXA);
\r
3159 colorB1 = *(bP- iYA);
\r
3160 colorB2 = *(bP- iYA + iXB);
\r
3161 colorB3 = *(bP- iYA + iXC);
\r
3163 color4 = *(bP - iXA);
\r
3165 color6 = *(bP + iXB);
\r
3166 colorS2 = *(bP + iXC);
\r
3168 color1 = *(bP + iYB - iXA);
\r
3169 color2 = *(bP + iYB);
\r
3170 color3 = *(bP + iYB + iXB);
\r
3171 colorS1= *(bP + iYB + iXC);
\r
3173 colorA0 = *(bP + iYC - iXA);
\r
3174 colorA1 = *(bP + iYC);
\r
3175 colorA2 = *(bP + iYC + iXB);
\r
3176 colorA3 = *(bP + iYC + iXC);
\r
3178 //--------------------------------------
\r
3179 if (color2 == color6 && color5 != color3)
\r
3181 product2b = product1b = color2;
\r
3184 if (color5 == color3 && color2 != color6)
\r
3186 product2b = product1b = color5;
\r
3189 if (color5 == color3 && color2 == color6)
\r
3191 register int r = 0;
\r
3193 r += GET_RESULT ((color6&0x00ffffff), (color5&0x00ffffff), (color1&0x00ffffff), (colorA1&0x00ffffff));
\r
3194 r += GET_RESULT ((color6&0x00ffffff), (color5&0x00ffffff), (color4&0x00ffffff), (colorB1&0x00ffffff));
\r
3195 r += GET_RESULT ((color6&0x00ffffff), (color5&0x00ffffff), (colorA2&0x00ffffff), (colorS1&0x00ffffff));
\r
3196 r += GET_RESULT ((color6&0x00ffffff), (color5&0x00ffffff), (colorB2&0x00ffffff), (colorS2&0x00ffffff));
\r
3199 product2b = product1b = color6;
\r
3202 product2b = product1b = color5;
\r
3205 product2b = product1b = INTERPOLATE8_02(color5, color6);
\r
3210 if (color6 == color3 && color3 == colorA1 && color2 != colorA2 && color3 != colorA0)
\r
3211 product2b = Q_INTERPOLATE8_02 (color3, color3, color3, color2);
\r
3213 if (color5 == color2 && color2 == colorA2 && colorA1 != color3 && color2 != colorA3)
\r
3214 product2b = Q_INTERPOLATE8_02 (color2, color2, color2, color3);
\r
3216 product2b = INTERPOLATE8_02 (color2, color3);
\r
3218 if (color6 == color3 && color6 == colorB1 && color5 != colorB2 && color6 != colorB0)
\r
3219 product1b = Q_INTERPOLATE8_02 (color6, color6, color6, color5);
\r
3221 if (color5 == color2 && color5 == colorB2 && colorB1 != color6 && color5 != colorB3)
\r
3222 product1b = Q_INTERPOLATE8_02 (color6, color5, color5, color5);
\r
3224 product1b = INTERPOLATE8_02 (color5, color6);
\r
3227 if (color5 == color3 && color2 != color6 && color4 == color5 && color5 != colorA2)
\r
3228 product2a = INTERPOLATE8_02(color2, color5);
\r
3230 if (color5 == color1 && color6 == color5 && color4 != color2 && color5 != colorA0)
\r
3231 product2a = INTERPOLATE8_02(color2, color5);
\r
3233 product2a = color2;
\r
3235 if (color2 == color6 && color5 != color3 && color1 == color2 && color2 != colorB2)
\r
3236 product1a = INTERPOLATE8_02(color2, color5);
\r
3238 if (color4 == color2 && color3 == color2 && color1 != color5 && color2 != colorB0)
\r
3239 product1a = INTERPOLATE8_02(color2, color5);
\r
3241 product1a = color5;
\r
3244 *(dP+1)=product1b;
\r
3245 *(dP+(width2))=product2a;
\r
3246 *(dP+1+(width2))=product2b;
\r
3250 }//end of for ( finish= width etc..)
\r
3253 srcPtr += srcPitch;
\r
3254 }; //endof: for (; height; height--)
\r
3259 void Super2xSaI_ex8(unsigned char *srcPtr, DWORD srcPitch,
\r
3260 unsigned char *dstBitmap, int width, int height)
\r
3262 DWORD dstPitch = srcPitch * 2;
\r
3266 int width2 = width*2;
\r
3267 int iXA,iXB,iXC,iYA,iYB,iYC,finish;
\r
3268 DWORD color4, color5, color6;
\r
3269 DWORD color1, color2, color3;
\r
3270 DWORD colorA0, colorA1, colorA2, colorA3,
\r
3271 colorB0, colorB1, colorB2, colorB3,
\r
3273 DWORD product1a, product1b,
\r
3274 product2a, product2b;
\r
3279 for (; height; height-=1)
\r
3281 bP = (DWORD *)srcPtr;
\r
3282 dP = (DWORD *)(dstBitmap + line*dstPitch);
\r
3283 for (finish = width; finish; finish -= 1 )
\r
3285 //--------------------------------------- B1 B2
\r
3289 if(finish==width) iXA=0;
\r
3291 if(finish>4) {iXB=1;iXC=2;}
\r
3293 if(finish>3) {iXB=1;iXC=1;}
\r
3294 else {iXB=0;iXC=0;}
\r
3295 if(line==0) iYA=0;
\r
3297 if(height>4) {iYB=width;iYC=width2;}
\r
3299 if(height>3) {iYB=width;iYC=width;}
\r
3300 else {iYB=0;iYC=0;}
\r
3303 colorB0 = *(bP- iYA - iXA);
\r
3304 colorB1 = *(bP- iYA);
\r
3305 colorB2 = *(bP- iYA + iXB);
\r
3306 colorB3 = *(bP- iYA + iXC);
\r
3308 color4 = *(bP - iXA);
\r
3310 color6 = *(bP + iXB);
\r
3311 colorS2 = *(bP + iXC);
\r
3313 color1 = *(bP + iYB - iXA);
\r
3314 color2 = *(bP + iYB);
\r
3315 color3 = *(bP + iYB + iXB);
\r
3316 colorS1= *(bP + iYB + iXC);
\r
3318 colorA0 = *(bP + iYC - iXA);
\r
3319 colorA1 = *(bP + iYC);
\r
3320 colorA2 = *(bP + iYC + iXB);
\r
3321 colorA3 = *(bP + iYC + iXC);
\r
3323 //--------------------------------------
\r
3324 if (color2 == color6 && color5 != color3)
\r
3326 product2b = product1b = color2;
\r
3329 if (color5 == color3 && color2 != color6)
\r
3331 product2b = product1b = color5;
\r
3334 if (color5 == color3 && color2 == color6)
\r
3336 register int r = 0;
\r
3338 r += GET_RESULT ((color6&0x00ffffff), (color5&0x00ffffff), (color1&0x00ffffff), (colorA1&0x00ffffff));
\r
3339 r += GET_RESULT ((color6&0x00ffffff), (color5&0x00ffffff), (color4&0x00ffffff), (colorB1&0x00ffffff));
\r
3340 r += GET_RESULT ((color6&0x00ffffff), (color5&0x00ffffff), (colorA2&0x00ffffff), (colorS1&0x00ffffff));
\r
3341 r += GET_RESULT ((color6&0x00ffffff), (color5&0x00ffffff), (colorB2&0x00ffffff), (colorS2&0x00ffffff));
\r
3344 product2b = product1b = color6;
\r
3347 product2b = product1b = color5;
\r
3350 product2b = product1b = INTERPOLATE8(color5, color6);
\r
3355 if (color6 == color3 && color3 == colorA1 && color2 != colorA2 && color3 != colorA0)
\r
3356 product2b = Q_INTERPOLATE8 (color3, color3, color3, color2);
\r
3358 if (color5 == color2 && color2 == colorA2 && colorA1 != color3 && color2 != colorA3)
\r
3359 product2b = Q_INTERPOLATE8 (color2, color2, color2, color3);
\r
3361 product2b = INTERPOLATE8 (color2, color3);
\r
3363 if (color6 == color3 && color6 == colorB1 && color5 != colorB2 && color6 != colorB0)
\r
3364 product1b = Q_INTERPOLATE8 (color6, color6, color6, color5);
\r
3366 if (color5 == color2 && color5 == colorB2 && colorB1 != color6 && color5 != colorB3)
\r
3367 product1b = Q_INTERPOLATE8 (color6, color5, color5, color5);
\r
3369 product1b = INTERPOLATE8 (color5, color6);
\r
3372 if (color5 == color3 && color2 != color6 && color4 == color5 && color5 != colorA2)
\r
3373 product2a = INTERPOLATE8(color2, color5);
\r
3375 if (color5 == color1 && color6 == color5 && color4 != color2 && color5 != colorA0)
\r
3376 product2a = INTERPOLATE8(color2, color5);
\r
3378 product2a = color2;
\r
3380 if (color2 == color6 && color5 != color3 && color1 == color2 && color2 != colorB2)
\r
3381 product1a = INTERPOLATE8(color2, color5);
\r
3383 if (color4 == color2 && color3 == color2 && color1 != color5 && color2 != colorB0)
\r
3384 product1a = INTERPOLATE8(color2, color5);
\r
3386 product1a = color5;
\r
3389 *(dP+1)=product1b;
\r
3390 *(dP+(width2))=product2a;
\r
3391 *(dP+1+(width2))=product2b;
\r
3395 }//end of for ( finish= width etc..)
\r
3398 srcPtr += srcPitch;
\r
3399 }; //endof: for (; height; height--)
\r
3402 /////////////////////////////////////////////////////////////////////////////
\r
3404 #define colorMask4 0x0000EEE0
\r
3405 #define lowPixelMask4 0x00001110
\r
3406 #define qcolorMask4 0x0000CCC0
\r
3407 #define qlowpixelMask4 0x00003330
\r
3409 #define INTERPOLATE4(A, B) ((((A & colorMask4) >> 1) + ((B & colorMask4) >> 1) + (A & B & lowPixelMask4))|((((A&0x0000000F)==0x00000006)?0x00000006:(((B&0x0000000F)==0x00000006)?0x00000006:(((A&0x0000000F)==0x00000000)?0x00000000:(((B&0x0000000F)==0x00000000)?0x00000000:0x0000000F))))))
\r
3411 #define Q_INTERPOLATE4(A, B, C, D) ((((A & qcolorMask4) >> 2) + ((B & qcolorMask4) >> 2) + ((C & qcolorMask4) >> 2) + ((D & qcolorMask4) >> 2) + ((((A & qlowpixelMask4) + (B & qlowpixelMask4) + (C & qlowpixelMask4) + (D & qlowpixelMask4)) >> 2) & qlowpixelMask4))| ((((A&0x0000000F)==0x00000006)?0x00000006:(((B&0x0000000F)==0x00000006)?0x00000006:(((C&0x0000000F)==0x00000006)?0x00000006:(((D&0x0000000F)==0x00000006)?0x00000006:(((A&0x0000000F)==0x00000000)?0x00000000:(((B&0x0000000F)==0x00000000)?0x00000000:(((C&0x0000000F)==0x00000000)?0x00000000:(((D&0x0000000F)==0x00000000)?0x00000000:0x0000000F))))))))))
\r
3414 #define colorMask5 0x0000F7BC
\r
3415 #define lowPixelMask5 0x00000842
\r
3416 #define qcolorMask5 0x0000E738
\r
3417 #define qlowpixelMask5 0x000018C6
\r
3419 #define INTERPOLATE5(A, B) ((((A & colorMask5) >> 1) + ((B & colorMask5) >> 1) + (A & B & lowPixelMask5))|((((A&0x00000001)==0x00000000)?0x00000000:(((B&0x00000001)==0x00000000)?0x00000000:0x00000001))))
\r
3421 #define Q_INTERPOLATE5(A, B, C, D) ((((A & qcolorMask5) >> 2) + ((B & qcolorMask5) >> 2) + ((C & qcolorMask5) >> 2) + ((D & qcolorMask5) >> 2) + ((((A & qlowpixelMask5) + (B & qlowpixelMask5) + (C & qlowpixelMask5) + (D & qlowpixelMask5)) >> 2) & qlowpixelMask5))| ((((A&0x00000001)==0x00000000)?0x00000000:(((B&0x00000001)==0x00000000)?0x00000000:(((C&0x00000001)==0x00000000)?0x00000000:(((D&0x00000001)==0x00000000)?0x00000000:0x00000001))))))
\r
3422 /////////////////////////////////////////////////////////////////////////////
\r
3423 /////////////////////////////////////////////////////////////////////////////
\r
3424 /////////////////////////////////////////////////////////////////////////////
\r
3426 // ogl texture defines
\r
3428 /////////////////////////////////////////////////////////////////////////////
\r
3429 /////////////////////////////////////////////////////////////////////////////
\r
3430 /////////////////////////////////////////////////////////////////////////////
\r
3432 void DefineSubTextureSortHiRes(void)
\r
3438 glGenTextures(1, &gTexName); glError();
\r
3439 glBindTexture(GL_TEXTURE_2D, gTexName); glError();
\r
3441 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, iClampType); glError();
\r
3442 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, iClampType); glError();
\r
3446 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR); glError();
\r
3447 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR); glError();
\r
3451 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, iFilter); glError();
\r
3452 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, iFilter); glError();
\r
3454 glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, 512, 512, 0, GL_RGBA, GL_UNSIGNED_BYTE, texturebuffer); glError();
\r
3456 else glBindTexture(GL_TEXTURE_2D, gTexName); glError();
\r
3458 glTexSubImage2D(GL_TEXTURE_2D, 0, XTexS<<1, YTexS<<1,
\r
3459 DXTexS<<1, DYTexS<<1,
\r
3460 GL_RGBA, GL_UNSIGNED_BYTE, texturebuffer); glError();
\r
3461 //LOGE("DefineSubTextureSortHiRes x:%d y:%d",XTexS<<1,YTexS<<1);
\r
3464 /////////////////////////////////////////////////////////////////////////////
\r
3466 void DefineSubTextureSort(void)
\r
3471 glGenTextures(1, &gTexName); glError();
\r
3472 glBindTexture(GL_TEXTURE_2D, gTexName); glError();
\r
3474 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, iClampType); glError();
\r
3475 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, iClampType); glError();
\r
3479 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR); glError();
\r
3480 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR); glError();
\r
3484 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, iFilter); glError();
\r
3485 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, iFilter); glError();
\r
3487 glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, 256, 256, 0,GL_RGBA, GL_UNSIGNED_BYTE, texturepart); glError();
\r
3489 else glBindTexture(GL_TEXTURE_2D, gTexName); glError();
\r
3491 glTexSubImage2D(GL_TEXTURE_2D, 0, XTexS, YTexS,
\r
3493 GL_RGBA, GL_UNSIGNED_BYTE, texturepart); glError();
\r
3494 //LOGE("DefineSubTextureSort x:%d y:%d w:%d h:%d",XTexS,YTexS,DXTexS,DYTexS);
\r
3497 /////////////////////////////////////////////////////////////////////////////
\r
3499 /////////////////////////////////////////////////////////////////////////////
\r
3500 /////////////////////////////////////////////////////////////////////////////
\r
3501 /////////////////////////////////////////////////////////////////////////////
\r
3503 // texture cache garbage collection
\r
3505 /////////////////////////////////////////////////////////////////////////////
\r
3506 /////////////////////////////////////////////////////////////////////////////
\r
3507 /////////////////////////////////////////////////////////////////////////////
\r
3509 void DoTexGarbageCollection(void)
\r
3511 static unsigned short LRUCleaned=0;
\r
3512 unsigned short iC,iC1,iC2;
\r
3513 int i,j,iMax;textureSubCacheEntryS * tsb;
\r
3515 iC=4;//=iSortTexCnt/2,
\r
3516 LRUCleaned+=iC; // we clean different textures each time
\r
3517 if((LRUCleaned+iC)>=iSortTexCnt) LRUCleaned=0; // wrap? wrap!
\r
3518 iC1=LRUCleaned; // range of textures to clean
\r
3519 iC2=LRUCleaned+iC;
\r
3521 for(iC=iC1;iC<iC2;iC++) // make some textures available
\r
3523 pxSsubtexLeft[iC]->l=0;
\r
3526 for(i=0;i<3;i++) // remove all references to that textures
\r
3527 for(j=0;j<MAXTPAGES;j++)
\r
3528 for(iC=0;iC<4;iC++) // loop all texture rect info areas
\r
3530 tsb=pscSubtexStore[i][j]+(iC*SOFFB);
\r
3536 if(tsb->cTexID>=iC1 && tsb->cTexID<iC2) // info uses the cleaned textures? remove info
\r
3542 usLRUTexPage=LRUCleaned;
\r
3545 /////////////////////////////////////////////////////////////////////////////
\r
3546 /////////////////////////////////////////////////////////////////////////////
\r
3547 /////////////////////////////////////////////////////////////////////////////
\r
3549 // search cache for existing (already used) parts
\r
3551 /////////////////////////////////////////////////////////////////////////////
\r
3552 /////////////////////////////////////////////////////////////////////////////
\r
3553 /////////////////////////////////////////////////////////////////////////////
\r
3555 unsigned char * CheckTextureInSubSCache(long TextureMode,unsigned long GivenClutId,unsigned short * pCache)
\r
3557 textureSubCacheEntryS * tsx, * tsb, *tsg;//, *tse=NULL;
\r
3558 int i,iMax;EXLong npos;
\r
3559 unsigned char cx,cy;
\r
3560 int iC,j,k;unsigned long rx,ry,mx,my;
\r
3561 EXLong * ul=0, * uls;
\r
3563 unsigned char cXAdj,cYAdj;
\r
3565 npos.l=*((unsigned long *)&gl_ux[4]);
\r
3567 //--------------------------------------------------------------//
\r
3568 // find matching texturepart first... speed up...
\r
3569 //--------------------------------------------------------------//
\r
3571 tsg=pscSubtexStore[TextureMode][GlobalTexturePage];
\r
3572 tsg+=((GivenClutId&CLUTCHK)>>CLUTSHIFT)*SOFFB;
\r
3581 if(GivenClutId==tsb->ClutID &&
\r
3582 (INCHECK(tsb->pos,npos)))
\r
3585 cx=tsb->pos.c[3]-tsb->posTX;
\r
3586 cy=tsb->pos.c[1]-tsb->posTY;
\r
3597 ubOpaqueDraw=tsb->Opaque;
\r
3598 *pCache=tsb->cTexID;
\r
3607 //----------------------------------------------------//
\r
3611 rx=(int)gl_ux[6]-(int)gl_ux[7];
\r
3612 ry=(int)gl_ux[4]-(int)gl_ux[5];
\r
3614 tsx=NULL;tsb=tsg+1;
\r
3615 for(i=0;i<iMax;i++,tsb++)
\r
3617 if(!tsb->ClutID) {tsx=tsb;break;}
\r
3623 if(iMax>=SOFFB-2)
\r
3625 if(iTexGarbageCollection) // gc mode?
\r
3629 dwTexPageComp|=(1<<GlobalTexturePage);
\r
3637 for(i=0;i<iMax;i++,tsb++) // 1. search other slots with same cluts, and unite the area
\r
3638 if(GivenClutId==tsb->ClutID)
\r
3640 if(!tsx) {tsx=tsb;rfree.l=npos.l;} //
\r
3641 else tsb->ClutID=0;
\r
3642 rfree.c[3]=min(rfree.c[3],tsb->pos.c[3]);
\r
3643 rfree.c[2]=max(rfree.c[2],tsb->pos.c[2]);
\r
3644 rfree.c[1]=min(rfree.c[1],tsb->pos.c[1]);
\r
3645 rfree.c[0]=max(rfree.c[0],tsb->pos.c[0]);
\r
3649 if(tsx) // 3. if one or more found, create a new rect with bigger size
\r
3651 *((unsigned long *)&gl_ux[4])=npos.l=rfree.l;
\r
3652 rx=(int)rfree.c[2]-(int)rfree.c[3];
\r
3653 ry=(int)rfree.c[0]-(int)rfree.c[1];
\r
3654 DoTexGarbageCollection();
\r
3666 //----------------------------------------------------//
\r
3667 // now get a free texture space
\r
3668 //----------------------------------------------------//
\r
3670 if(iTexGarbageCollection) usLRUTexPage=0;
\r
3674 rx+=3;if(rx>255) {cXAdj=0;rx=255;}
\r
3675 ry+=3;if(ry>255) {cYAdj=0;ry=255;}
\r
3679 for(k=0;k<iSortTexCnt;k++)
\r
3681 uls=pxSsubtexLeft[iC];
\r
3682 iMax=uls->l;ul=uls+1;
\r
3684 //--------------------------------------------------//
\r
3691 if(rx>252 && ry>252)
\r
3692 {uls->l=1;ul->l=0xffffffff;ul=0;goto ENDLOOP;}
\r
3716 //--------------------------------------------------//
\r
3717 for(i=0;i<iMax;i++,ul++)
\r
3719 if(ul->l!=0xffffffff &&
\r
3726 if(rx<mx && ry<my)
\r
3732 for(ul=uls+1,j=0;j<iMax;j++,ul++)
\r
3733 if(ul->l==0xffffffff) break;
\r
3737 if(j==iMax) uls->l=uls->l+1;
\r
3739 ul->c[3]=rfree.c[3];
\r
3740 ul->c[2]=rfree.c[2];
\r
3741 ul->c[1]=rfree.c[1]+ry;
\r
3742 ul->c[0]=rfree.c[0]-ry;
\r
3764 //--------------------------------------------------//
\r
3766 iC++; if(iC>=iSortTexCnt) iC=0;
\r
3769 //----------------------------------------------------//
\r
3770 // check, if free space got
\r
3771 //----------------------------------------------------//
\r
3776 //////////////////////////////////////////////////////
\r
3781 for(i=0;i<3;i++) // cleaning up
\r
3782 for(j=0;j<MAXTPAGES;j++)
\r
3784 tsb=pscSubtexStore[i][j];
\r
3785 (tsb+SOFFA)->pos.l=0;
\r
3786 (tsb+SOFFB)->pos.l=0;
\r
3787 (tsb+SOFFC)->pos.l=0;
\r
3788 (tsb+SOFFD)->pos.l=0;
\r
3790 for(i=0;i<iSortTexCnt;i++)
\r
3791 {ul=pxSsubtexLeft[i];ul->l=0;}
\r
3795 //////////////////////////////////////////////////////
\r
3797 uls=pxSsubtexLeft[usLRUTexPage];
\r
3798 uls->l=0;ul=uls+1;
\r
3801 if(rx>252 && ry>252)
\r
3802 {uls->l=1;ul->l=0xffffffff;}
\r
3823 tsg->pos.l=1;tsx=tsg+1;
\r
3826 rfree.c[3]+=cXAdj;
\r
3827 rfree.c[1]+=cYAdj;
\r
3829 tsx->cTexID =*pCache=iC;
\r
3831 tsx->ClutID = GivenClutId;
\r
3832 tsx->posTX = rfree.c[3];
\r
3833 tsx->posTY = rfree.c[1];
\r
3835 cx=gl_ux[7]-rfree.c[3];
\r
3836 cy=gl_ux[5]-rfree.c[1];
\r
3850 return &tsx->Opaque;
\r
3853 /////////////////////////////////////////////////////////////////////////////
\r
3854 /////////////////////////////////////////////////////////////////////////////
\r
3855 /////////////////////////////////////////////////////////////////////////////
\r
3857 // search cache for free place (on compress)
\r
3859 /////////////////////////////////////////////////////////////////////////////
\r
3860 /////////////////////////////////////////////////////////////////////////////
\r
3861 /////////////////////////////////////////////////////////////////////////////
\r
3863 BOOL GetCompressTexturePlace(textureSubCacheEntryS * tsx)
\r
3865 int i,j,k,iMax,iC;unsigned long rx,ry,mx,my;
\r
3866 EXLong * ul=0, * uls, rfree;
\r
3867 unsigned char cXAdj=1,cYAdj=1;
\r
3869 rx=(int)tsx->pos.c[2]-(int)tsx->pos.c[3];
\r
3870 ry=(int)tsx->pos.c[0]-(int)tsx->pos.c[1];
\r
3872 rx+=3;if(rx>255) {cXAdj=0;rx=255;}
\r
3873 ry+=3;if(ry>255) {cYAdj=0;ry=255;}
\r
3877 for(k=0;k<iSortTexCnt;k++)
\r
3879 uls=pxSsubtexLeft[iC];
\r
3880 iMax=uls->l;ul=uls+1;
\r
3882 //--------------------------------------------------//
\r
3889 if(rx>252 && ry>252)
\r
3890 {uls->l=1;ul->l=0xffffffff;ul=0;goto TENDLOOP;}
\r
3914 //--------------------------------------------------//
\r
3915 for(i=0;i<iMax;i++,ul++)
\r
3917 if(ul->l!=0xffffffff &&
\r
3925 if(rx<mx && ry<my)
\r
3931 for(ul=uls+1,j=0;j<iMax;j++,ul++)
\r
3932 if(ul->l==0xffffffff) break;
\r
3936 if(j==iMax) uls->l=uls->l+1;
\r
3938 ul->c[3]=rfree.c[3];
\r
3939 ul->c[2]=rfree.c[2];
\r
3940 ul->c[1]=rfree.c[1]+ry;
\r
3941 ul->c[0]=rfree.c[0]-ry;
\r
3963 //--------------------------------------------------//
\r
3965 iC++; if(iC>=iSortTexCnt) iC=0;
\r
3968 //----------------------------------------------------//
\r
3969 // check, if free space got
\r
3970 //----------------------------------------------------//
\r
3973 if(ul) return FALSE;
\r
3975 rfree.c[3]+=cXAdj;
\r
3976 rfree.c[1]+=cYAdj;
\r
3979 tsx->posTX = rfree.c[3];
\r
3980 tsx->posTY = rfree.c[1];
\r
3988 /////////////////////////////////////////////////////////////////////////////
\r
3989 /////////////////////////////////////////////////////////////////////////////
\r
3990 /////////////////////////////////////////////////////////////////////////////
\r
3992 // compress texture cache (to make place for new texture part, if needed)
\r
3994 /////////////////////////////////////////////////////////////////////////////
\r
3995 /////////////////////////////////////////////////////////////////////////////
\r
3996 /////////////////////////////////////////////////////////////////////////////
\r
3998 void CompressTextureSpace(void)
\r
4000 textureSubCacheEntryS * tsx, * tsg, * tsb;
\r
4001 int i,j,k,m,n,iMax;EXLong * ul, r,opos;
\r
4002 short sOldDST=DrawSemiTrans,cx,cy;
\r
4003 long lOGTP=GlobalTexturePage;
\r
4004 unsigned long l,row;
\r
4005 unsigned long * lSRCPtr;
\r
4007 opos.l=*((unsigned long *)&gl_ux[4]);
\r
4009 // 1. mark all textures as free
\r
4010 for(i=0;i<iSortTexCnt;i++)
\r
4011 {ul=pxSsubtexLeft[i];ul->l=0;}
\r
4017 for(k=0;k<MAXTPAGES;k++)
\r
4019 tsg=pscSubtexStore[j][k];
\r
4021 if((!(dwTexPageComp&(1<<k))))
\r
4023 (tsg+SOFFA)->pos.l=0;
\r
4024 (tsg+SOFFB)->pos.l=0;
\r
4025 (tsg+SOFFC)->pos.l=0;
\r
4026 (tsg+SOFFD)->pos.l=0;
\r
4030 for(m=0;m<4;m++,tsg+=SOFFB)
\r
4035 for(i=0;i<iMax;i++,tsx++)
\r
4040 for(n=i+1,tsb=tsx+1;n<iMax;n++,tsb++)
\r
4042 if(tsx->ClutID==tsb->ClutID)
\r
4044 r.c[3]=min(r.c[3],tsb->pos.c[3]);
\r
4045 r.c[2]=max(r.c[2],tsb->pos.c[2]);
\r
4046 r.c[1]=min(r.c[1],tsb->pos.c[1]);
\r
4047 r.c[0]=max(r.c[0],tsb->pos.c[0]);
\r
4052 // if(r.l!=tsx->pos.l)
\r
4054 cx=((tsx->ClutID << 4) & 0x3F0);
\r
4055 cy=((tsx->ClutID >> 6) & CLUTYMASK);
\r
4059 // palette check sum
\r
4060 l=0;lSRCPtr=(unsigned long *)(psxVuw+cx+(cy*1024));
\r
4061 if(j==1) for(row=1;row<129;row++) l+=((*lSRCPtr++)-1)*row;
\r
4062 else for(row=1;row<9;row++) l+=((*lSRCPtr++)-1)<<row;
\r
4063 l=((l+HIWORD(l))&0x3fffL)<<16;
\r
4064 if(l!=(tsx->ClutID&(0x00003fff<<16)))
\r
4066 tsx->ClutID=0;continue;
\r
4071 if(!GetCompressTexturePlace(tsx)) // no place?
\r
4073 for(i=0;i<3;i++) // -> clean up everything
\r
4074 for(j=0;j<MAXTPAGES;j++)
\r
4076 tsb=pscSubtexStore[i][j];
\r
4077 (tsb+SOFFA)->pos.l=0;
\r
4078 (tsb+SOFFB)->pos.l=0;
\r
4079 (tsb+SOFFC)->pos.l=0;
\r
4080 (tsb+SOFFD)->pos.l=0;
\r
4082 for(i=0;i<iSortTexCnt;i++)
\r
4083 {ul=pxSsubtexLeft[i];ul->l=0;}
\r
4085 DrawSemiTrans=sOldDST;
\r
4086 GlobalTexturePage=lOGTP;
\r
4087 *((unsigned long *)&gl_ux[4])=opos.l;
\r
4093 if(tsx->ClutID&(1<<30)) DrawSemiTrans=1;
\r
4094 else DrawSemiTrans=0;
\r
4095 *((unsigned long *)&gl_ux[4])=r.l;
\r
4097 gTexName=uiStexturePage[tsx->cTexID];
\r
4098 LoadSubTexFn(k,j,cx,cy);
\r
4099 uiStexturePage[tsx->cTexID]=gTexName;
\r
4100 tsx->Opaque=ubOpaqueDraw;
\r
4108 while(!tsx->ClutID && iMax) {tsx--;iMax--;}
\r
4116 if(dwTexPageComp==0xffffffff) dwTexPageComp=0;
\r
4118 *((unsigned long *)&gl_ux[4])=opos.l;
\r
4119 GlobalTexturePage=lOGTP;
\r
4120 DrawSemiTrans=sOldDST;
\r
4123 /////////////////////////////////////////////////////////////////////////////
\r
4124 /////////////////////////////////////////////////////////////////////////////
\r
4125 /////////////////////////////////////////////////////////////////////////////
\r
4127 // main entry for searching/creating textures, called from prim.c
\r
4129 /////////////////////////////////////////////////////////////////////////////
\r
4130 /////////////////////////////////////////////////////////////////////////////
\r
4131 /////////////////////////////////////////////////////////////////////////////
\r
4133 GLuint SelectSubTextureS(long TextureMode, unsigned long GivenClutId)
\r
4135 unsigned char * OPtr;unsigned short iCache;short cx,cy;
\r
4137 // sort sow/tow infos for fast access
\r
4139 unsigned char ma1,ma2,mi1,mi2;
\r
4140 if(gl_ux[0]>gl_ux[1]) {mi1=gl_ux[1];ma1=gl_ux[0];}
\r
4141 else {mi1=gl_ux[0];ma1=gl_ux[1];}
\r
4142 if(gl_ux[2]>gl_ux[3]) {mi2=gl_ux[3];ma2=gl_ux[2];}
\r
4143 else {mi2=gl_ux[2];ma2=gl_ux[3];}
\r
4144 if(mi1>mi2) gl_ux[7]=mi2;
\r
4145 else gl_ux[7]=mi1;
\r
4146 if(ma1>ma2) gl_ux[6]=ma1;
\r
4147 else gl_ux[6]=ma2;
\r
4149 if(gl_vy[0]>gl_vy[1]) {mi1=gl_vy[1];ma1=gl_vy[0];}
\r
4150 else {mi1=gl_vy[0];ma1=gl_vy[1];}
\r
4151 if(gl_vy[2]>gl_vy[3]) {mi2=gl_vy[3];ma2=gl_vy[2];}
\r
4152 else {mi2=gl_vy[2];ma2=gl_vy[3];}
\r
4153 if(mi1>mi2) gl_ux[5]=mi2;
\r
4154 else gl_ux[5]=mi1;
\r
4155 if(ma1>ma2) gl_ux[4]=ma1;
\r
4156 else gl_ux[4]=ma2;
\r
4158 // get clut infos in one 32 bit val
\r
4160 if(TextureMode==2) // no clut here
\r
4162 GivenClutId=CLUTUSED|(DrawSemiTrans<<30);cx=cy=0;
\r
4164 if(iFrameTexType && Fake15BitTexture())
\r
4165 return (GLuint)gTexName;
\r
4169 cx=((GivenClutId << 4) & 0x3F0); // but here
\r
4170 cy=((GivenClutId >> 6) & CLUTYMASK);
\r
4171 GivenClutId=(GivenClutId&CLUTMASK)|(DrawSemiTrans<<30)|CLUTUSED;
\r
4173 // palette check sum.. removed MMX asm, this easy func works as well
\r
4175 unsigned long l=0,row;
\r
4177 unsigned long * lSRCPtr=(unsigned long *)(psxVuw+cx+(cy*1024));
\r
4178 if(TextureMode==1) for(row=1;row<129;row++) l+=((*lSRCPtr++)-1)*row;
\r
4179 else for(row=1;row<9;row++) l+=((*lSRCPtr++)-1)<<row;
\r
4180 l=(l+HIWORD(l))&0x3fffL;
\r
4181 GivenClutId|=(l<<16);
\r
4188 OPtr=CheckTextureInSubSCache(TextureMode,GivenClutId,&iCache);
\r
4190 // cache full? compress and try again
\r
4191 if(iCache==0xffff)
\r
4193 CompressTextureSpace();
\r
4194 OPtr=CheckTextureInSubSCache(TextureMode,GivenClutId,&iCache);
\r
4198 usLRUTexPage=iCache;
\r
4199 if(!OPtr) return uiStexturePage[iCache];
\r
4201 // not found? upload texture and store infos in cache
\r
4202 gTexName=uiStexturePage[iCache];
\r
4203 LoadSubTexFn(GlobalTexturePage,TextureMode,cx,cy);
\r
4204 uiStexturePage[iCache]=gTexName;
\r
4205 *OPtr=ubOpaqueDraw;
\r
4206 return (GLuint) gTexName;
\r
4209 /////////////////////////////////////////////////////////////////////////////
\r
4210 /////////////////////////////////////////////////////////////////////////////
\r
4211 /////////////////////////////////////////////////////////////////////////////
\r