libpcsxcore/gte.c

   1 /***************************************************************************
   2  *   PCSX-Revolution - PlayStation Emulator for Nintendo Wii               *
   3  *   Copyright (C) 2009-2010  PCSX-Revolution Dev Team                     *
   4  *   <http://code.google.com/p/pcsx-revolution/>                           *
   5  *                                                                         *
   6  *   This program is free software; you can redistribute it and/or modify  *
   7  *   it under the terms of the GNU General Public License as published by  *
   8  *   the Free Software Foundation; either version 2 of the License, or     *
   9  *   (at your option) any later version.                                   *
  10  *                                                                         *
  11  *   This program is distributed in the hope that it will be useful,       *
  12  *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
  13  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
  14  *   GNU General Public License for more details.                          *
  15  *                                                                         *
  16  *   You should have received a copy of the GNU General Public License     *
  17  *   along with this program; if not, write to the                         *
  18  *   Free Software Foundation, Inc.,                                       *
  19  *   51 Franklin Street, Fifth Floor, Boston, MA 02111-1307 USA.           *
  20  ***************************************************************************/
  21
  22 /*
  23 * GTE functions.
  24 */
  25
  26 #include "gte.h"
  27 #include "psxmem.h"
  28
  29 #define VX(n) (n < 3 ? regs->CP2D.p[n << 1].sw.l : regs->CP2D.p[9].sw.l)
  30 #define VY(n) (n < 3 ? regs->CP2D.p[n << 1].sw.h : regs->CP2D.p[10].sw.l)
  31 #define VZ(n) (n < 3 ? regs->CP2D.p[(n << 1) + 1].sw.l : regs->CP2D.p[11].sw.l)
  32 #define MX11(n) (n < 3 ? regs->CP2C.p[(n << 3)].sw.l : 0)
  33 #define MX12(n) (n < 3 ? regs->CP2C.p[(n << 3)].sw.h : 0)
  34 #define MX13(n) (n < 3 ? regs->CP2C.p[(n << 3) + 1].sw.l : 0)
  35 #define MX21(n) (n < 3 ? regs->CP2C.p[(n << 3) + 1].sw.h : 0)
  36 #define MX22(n) (n < 3 ? regs->CP2C.p[(n << 3) + 2].sw.l : 0)
  37 #define MX23(n) (n < 3 ? regs->CP2C.p[(n << 3) + 2].sw.h : 0)
  38 #define MX31(n) (n < 3 ? regs->CP2C.p[(n << 3) + 3].sw.l : 0)
  39 #define MX32(n) (n < 3 ? regs->CP2C.p[(n << 3) + 3].sw.h : 0)
  40 #define MX33(n) (n < 3 ? regs->CP2C.p[(n << 3) + 4].sw.l : 0)
  41 #define CV1(n) (n < 3 ? (s32)regs->CP2C.r[(n << 3) + 5] : 0)
  42 #define CV2(n) (n < 3 ? (s32)regs->CP2C.r[(n << 3) + 6] : 0)
  43 #define CV3(n) (n < 3 ? (s32)regs->CP2C.r[(n << 3) + 7] : 0)
  44
  45 #define fSX(n) ((regs->CP2D.p)[((n) + 12)].sw.l)
  46 #define fSY(n) ((regs->CP2D.p)[((n) + 12)].sw.h)
  47 #define fSZ(n) ((regs->CP2D.p)[((n) + 17)].w.l) /* (n == 0) => SZ1; */
  48
  49 #define gteVXY0 (regs->CP2D.r[0])
  50 #define gteVX0  (regs->CP2D.p[0].sw.l)
  51 #define gteVY0  (regs->CP2D.p[0].sw.h)
  52 #define gteVZ0  (regs->CP2D.p[1].sw.l)
  53 #define gteVXY1 (regs->CP2D.r[2])
  54 #define gteVX1  (regs->CP2D.p[2].sw.l)
  55 #define gteVY1  (regs->CP2D.p[2].sw.h)
  56 #define gteVZ1  (regs->CP2D.p[3].sw.l)
  57 #define gteVXY2 (regs->CP2D.r[4])
  58 #define gteVX2  (regs->CP2D.p[4].sw.l)
  59 #define gteVY2  (regs->CP2D.p[4].sw.h)
  60 #define gteVZ2  (regs->CP2D.p[5].sw.l)
  61 #define gteRGB  (regs->CP2D.r[6])
  62 #define gteR    (regs->CP2D.p[6].b.l)
  63 #define gteG    (regs->CP2D.p[6].b.h)
  64 #define gteB    (regs->CP2D.p[6].b.h2)
  65 #define gteCODE (regs->CP2D.p[6].b.h3)
  66 #define gteOTZ  (regs->CP2D.p[7].w.l)
  67 #define gteIR0  (regs->CP2D.p[8].sw.l)
  68 #define gteIR1  (regs->CP2D.p[9].sw.l)
  69 #define gteIR2  (regs->CP2D.p[10].sw.l)
  70 #define gteIR3  (regs->CP2D.p[11].sw.l)
  71 #define gteSXY0 (regs->CP2D.r[12])
  72 #define gteSX0  (regs->CP2D.p[12].sw.l)
  73 #define gteSY0  (regs->CP2D.p[12].sw.h)
  74 #define gteSXY1 (regs->CP2D.r[13])
  75 #define gteSX1  (regs->CP2D.p[13].sw.l)
  76 #define gteSY1  (regs->CP2D.p[13].sw.h)
  77 #define gteSXY2 (regs->CP2D.r[14])
  78 #define gteSX2  (regs->CP2D.p[14].sw.l)
  79 #define gteSY2  (regs->CP2D.p[14].sw.h)
  80 #define gteSXYP (regs->CP2D.r[15])
  81 #define gteSXP  (regs->CP2D.p[15].sw.l)
  82 #define gteSYP  (regs->CP2D.p[15].sw.h)
  83 #define gteSZ0  (regs->CP2D.p[16].w.l)
  84 #define gteSZ1  (regs->CP2D.p[17].w.l)
  85 #define gteSZ2  (regs->CP2D.p[18].w.l)
  86 #define gteSZ3  (regs->CP2D.p[19].w.l)
  87 #define gteRGB0  (regs->CP2D.r[20])
  88 #define gteR0    (regs->CP2D.p[20].b.l)
  89 #define gteG0    (regs->CP2D.p[20].b.h)
  90 #define gteB0    (regs->CP2D.p[20].b.h2)
  91 #define gteCODE0 (regs->CP2D.p[20].b.h3)
  92 #define gteRGB1  (regs->CP2D.r[21])
  93 #define gteR1    (regs->CP2D.p[21].b.l)
  94 #define gteG1    (regs->CP2D.p[21].b.h)
  95 #define gteB1    (regs->CP2D.p[21].b.h2)
  96 #define gteCODE1 (regs->CP2D.p[21].b.h3)
  97 #define gteRGB2  (regs->CP2D.r[22])
  98 #define gteR2    (regs->CP2D.p[22].b.l)
  99 #define gteG2    (regs->CP2D.p[22].b.h)
 100 #define gteB2    (regs->CP2D.p[22].b.h2)
 101 #define gteCODE2 (regs->CP2D.p[22].b.h3)
 102 #define gteRES1  (regs->CP2D.r[23])
 103 #define gteMAC0  (((s32 *)regs->CP2D.r)[24])
 104 #define gteMAC1  (((s32 *)regs->CP2D.r)[25])
 105 #define gteMAC2  (((s32 *)regs->CP2D.r)[26])
 106 #define gteMAC3  (((s32 *)regs->CP2D.r)[27])
 107 #define gteIRGB  (regs->CP2D.r[28])
 108 #define gteORGB  (regs->CP2D.r[29])
 109 #define gteLZCS  (regs->CP2D.r[30])
 110 #define gteLZCR  (regs->CP2D.r[31])
 111
 112 #define gteR11R12 (((s32 *)regs->CP2C.r)[0])
 113 #define gteR22R23 (((s32 *)regs->CP2C.r)[2])
 114 #define gteR11 (regs->CP2C.p[0].sw.l)
 115 #define gteR12 (regs->CP2C.p[0].sw.h)
 116 #define gteR13 (regs->CP2C.p[1].sw.l)
 117 #define gteR21 (regs->CP2C.p[1].sw.h)
 118 #define gteR22 (regs->CP2C.p[2].sw.l)
 119 #define gteR23 (regs->CP2C.p[2].sw.h)
 120 #define gteR31 (regs->CP2C.p[3].sw.l)
 121 #define gteR32 (regs->CP2C.p[3].sw.h)
 122 #define gteR33 (regs->CP2C.p[4].sw.l)
 123 #define gteTRX (((s32 *)regs->CP2C.r)[5])
 124 #define gteTRY (((s32 *)regs->CP2C.r)[6])
 125 #define gteTRZ (((s32 *)regs->CP2C.r)[7])
 126 #define gteL11 (regs->CP2C.p[8].sw.l)
 127 #define gteL12 (regs->CP2C.p[8].sw.h)
 128 #define gteL13 (regs->CP2C.p[9].sw.l)
 129 #define gteL21 (regs->CP2C.p[9].sw.h)
 130 #define gteL22 (regs->CP2C.p[10].sw.l)
 131 #define gteL23 (regs->CP2C.p[10].sw.h)
 132 #define gteL31 (regs->CP2C.p[11].sw.l)
 133 #define gteL32 (regs->CP2C.p[11].sw.h)
 134 #define gteL33 (regs->CP2C.p[12].sw.l)
 135 #define gteRBK (((s32 *)regs->CP2C.r)[13])
 136 #define gteGBK (((s32 *)regs->CP2C.r)[14])
 137 #define gteBBK (((s32 *)regs->CP2C.r)[15])
 138 #define gteLR1 (regs->CP2C.p[16].sw.l)
 139 #define gteLR2 (regs->CP2C.p[16].sw.h)
 140 #define gteLR3 (regs->CP2C.p[17].sw.l)
 141 #define gteLG1 (regs->CP2C.p[17].sw.h)
 142 #define gteLG2 (regs->CP2C.p[18].sw.l)
 143 #define gteLG3 (regs->CP2C.p[18].sw.h)
 144 #define gteLB1 (regs->CP2C.p[19].sw.l)
 145 #define gteLB2 (regs->CP2C.p[19].sw.h)
 146 #define gteLB3 (regs->CP2C.p[20].sw.l)
 147 #define gteRFC (((s32 *)regs->CP2C.r)[21])
 148 #define gteGFC (((s32 *)regs->CP2C.r)[22])
 149 #define gteBFC (((s32 *)regs->CP2C.r)[23])
 150 #define gteOFX (((s32 *)regs->CP2C.r)[24])
 151 #define gteOFY (((s32 *)regs->CP2C.r)[25])
 152 // senquack - gteH register is u16, not s16, and used in GTE that way.
 153 //  HOWEVER when read back by CPU using CFC2, it will be incorrectly
 154 //  sign-extended by bug in original hardware, according to Nocash docs
 155 //  GTE section 'Screen Offset and Distance'. The emulator does this
 156 //  sign extension when it is loaded to GTE by CTC2.
 157 //#define gteH   (psxRegs.CP2C.p[26].sw.l)
 158 #define gteH   (psxRegs.CP2C.p[26].w.l)
 159 #define gteDQA (regs->CP2C.p[27].sw.l)
 160 #define gteDQB (((s32 *)regs->CP2C.r)[28])
 161 #define gteZSF3 (regs->CP2C.p[29].sw.l)
 162 #define gteZSF4 (regs->CP2C.p[30].sw.l)
 163 #define gteFLAG (regs->CP2C.r[31])
 164
 165 #define GTE_OP(op) ((op >> 20) & 31)
 166 #define GTE_SF(op) ((op >> 19) & 1)
 167 #define GTE_MX(op) ((op >> 17) & 3)
 168 #define GTE_V(op) ((op >> 15) & 3)
 169 #define GTE_CV(op) ((op >> 13) & 3)
 170 #define GTE_CD(op) ((op >> 11) & 3) /* not used */
 171 #define GTE_LM(op) ((op >> 10) & 1)
 172 #define GTE_CT(op) ((op >> 6) & 15) /* not used */
 173 #define GTE_FUNCT(op) (op & 63)
 174
 175 #define gteop (psxRegs.code & 0x1ffffff)
 176
 177 #ifndef FLAGLESS
 178
 179 static inline s64 BOUNDS_(psxCP2Regs *regs, s64 n_value, s64 n_max, int n_maxflag, s64 n_min, int n_minflag) {
 180         if (n_value > n_max) {
 181                 gteFLAG |= n_maxflag;
 182         } else if (n_value < n_min) {
 183                 gteFLAG |= n_minflag;
 184         }
 185         return n_value;
 186 }
 187
 188 static inline s32 LIM_(psxCP2Regs *regs, s32 value, s32 max, s32 min, u32 flag) {
 189         s32 ret = value;
 190         if (value > max) {
 191                 gteFLAG |= flag;
 192                 ret = max;
 193         } else if (value < min) {
 194                 gteFLAG |= flag;
 195                 ret = min;
 196         }
 197         return ret;
 198 }
 199
 200 static inline u32 limE_(psxCP2Regs *regs, u32 result) {
 201         if (result > 0x1ffff) {
 202                 gteFLAG |= (1 << 31) | (1 << 17);
 203                 return 0x1ffff;
 204         }
 205         return result;
 206 }
 207
 208 #else
 209
 210 #define BOUNDS_(regs, a, ...) (a)
 211
 212 static inline s32 LIM_(psxCP2Regs *regs, s32 value, s32 max, s32 min, u32 flag_unused) {
 213         s32 ret = value;
 214         if (value > max)
 215                 ret = max;
 216         else if (value < min)
 217                 ret = min;
 218         return ret;
 219 }
 220
 221 static inline u32 limE_(psxCP2Regs *regs, u32 result) {
 222         if (result > 0x1ffff)
 223                 return 0x1ffff;
 224         return result;
 225 }
 226
 227 #endif
 228
 229 #define BOUNDS(n_value,n_max,n_maxflag,n_min,n_minflag) \
 230         BOUNDS_(regs,n_value,n_max,n_maxflag,n_min,n_minflag)
 231 #define LIM(value,max,min,flag) \
 232         LIM_(regs,value,max,min,flag)
 233 #define limE(result) \
 234         limE_(regs,result)
 235
 236 #define A1(a) BOUNDS((a), 0x7fffffff, (1 << 30), -(s64)0x80000000, (1 << 31) | (1 << 27))
 237 #define A2(a) BOUNDS((a), 0x7fffffff, (1 << 29), -(s64)0x80000000, (1 << 31) | (1 << 26))
 238 #define A3(a) BOUNDS((a), 0x7fffffff, (1 << 28), -(s64)0x80000000, (1 << 31) | (1 << 25))
 239 #define limB1(a, l) LIM((a), 0x7fff, -0x8000 * !l, (1 << 31) | (1 << 24))
 240 #define limB2(a, l) LIM((a), 0x7fff, -0x8000 * !l, (1 << 31) | (1 << 23))
 241 #define limB3(a, l) LIM((a), 0x7fff, -0x8000 * !l, (1 << 22))
 242 #define limC1(a) LIM((a), 0x00ff, 0x0000, (1 << 21))
 243 #define limC2(a) LIM((a), 0x00ff, 0x0000, (1 << 20))
 244 #define limC3(a) LIM((a), 0x00ff, 0x0000, (1 << 19))
 245 #define limD(a) LIM((a), 0xffff, 0x0000, (1 << 31) | (1 << 18))
 246
 247 #define F(a) BOUNDS((a), 0x7fffffff, (1 << 31) | (1 << 16), -(s64)0x80000000, (1 << 31) | (1 << 15))
 248 #define limG1(a) LIM((a), 0x3ff, -0x400, (1 << 31) | (1 << 14))
 249 #define limG2(a) LIM((a), 0x3ff, -0x400, (1 << 31) | (1 << 13))
 250 #define limH(a) LIM((a), 0x1000, 0x0000, (1 << 12))
 251
 252 #ifndef __arm__
 253 #define A1U A1
 254 #define A2U A2
 255 #define A3U A3
 256 #else
 257 /* these are unlikely to be hit and usually waste cycles, don't want them on ARM */
 258 #define A1U(x) (x)
 259 #define A2U(x) (x)
 260 #define A3U(x) (x)
 261 #endif
 262
 263
 264 //senquack - n param should be unsigned (will be 'gteH' reg which is u16)
 265 #ifdef GTE_USE_NATIVE_DIVIDE
 266 INLINE u32 DIVIDE(u16 n, u16 d) {
 267         if (n < d * 2) {
 268                 return ((u32)n << 16) / d;
 269         }
 270         return 0xffffffff;
 271 }
 272 #else
 273 #include "gte_divider.h"
 274 #endif // GTE_USE_NATIVE_DIVIDE
 275
 276 #ifndef FLAGLESS
 277
 278 static inline u32 MFC2(int reg) {
 279         psxCP2Regs *regs = &psxRegs.CP2;
 280         switch (reg) {
 281                 case 1:
 282                 case 3:
 283                 case 5:
 284                 case 8:
 285                 case 9:
 286                 case 10:
 287                 case 11:
 288                         psxRegs.CP2D.r[reg] = (s32)psxRegs.CP2D.p[reg].sw.l;
 289                         break;
 290
 291                 case 7:
 292                 case 16:
 293                 case 17:
 294                 case 18:
 295                 case 19:
 296                         psxRegs.CP2D.r[reg] = (u32)psxRegs.CP2D.p[reg].w.l;
 297                         break;
 298
 299                 case 15:
 300                         psxRegs.CP2D.r[reg] = gteSXY2;
 301                         break;
 302
 303                 case 28:
 304                 case 29:
 305                         psxRegs.CP2D.r[reg] = LIM(gteIR1 >> 7, 0x1f, 0, 0) |
 306                                                                         (LIM(gteIR2 >> 7, 0x1f, 0, 0) << 5) |
 307                                                                         (LIM(gteIR3 >> 7, 0x1f, 0, 0) << 10);
 308                         break;
 309         }
 310         return psxRegs.CP2D.r[reg];
 311 }
 312
 313 static inline void MTC2(u32 value, int reg) {
 314         psxCP2Regs *regs = &psxRegs.CP2;
 315         switch (reg) {
 316                 case 15:
 317                         gteSXY0 = gteSXY1;
 318                         gteSXY1 = gteSXY2;
 319                         gteSXY2 = value;
 320                         gteSXYP = value;
 321                         break;
 322
 323                 case 28:
 324                         gteIRGB = value;
 325                         gteIR1 = (value & 0x1f) << 7;
 326                         gteIR2 = (value & 0x3e0) << 2;
 327                         gteIR3 = (value & 0x7c00) >> 3;
 328                         break;
 329
 330                 case 30:
 331                         {
 332                                 int a;
 333                                 gteLZCS = value;
 334
 335                                 a = gteLZCS;
 336                                 if (a > 0) {
 337                                         int i;
 338                                         for (i = 31; (a & (1 << i)) == 0 && i >= 0; i--);
 339                                         gteLZCR = 31 - i;
 340                                 } else if (a < 0) {
 341                                         int i;
 342                                         a ^= 0xffffffff;
 343                                         for (i = 31; (a & (1 << i)) == 0 && i >= 0; i--);
 344                                         gteLZCR = 31 - i;
 345                                 } else {
 346                                         gteLZCR = 32;
 347                                 }
 348                         }
 349                         break;
 350
 351                 case 31:
 352                         return;
 353
 354                 default:
 355                         psxRegs.CP2D.r[reg] = value;
 356         }
 357 }
 358
 359 static inline void CTC2(u32 value, int reg) {
 360         switch (reg) {
 361                 case 4:
 362                 case 12:
 363                 case 20:
 364                 case 26:
 365                 case 27:
 366                 case 29:
 367                 case 30:
 368                         value = (s32)(s16)value;
 369                         break;
 370
 371                 case 31:
 372                         value = value & 0x7ffff000;
 373                         if (value & 0x7f87e000) value |= 0x80000000;
 374                         break;
 375         }
 376
 377         psxRegs.CP2C.r[reg] = value;
 378 }
 379
 380 void gteMFC2() {
 381         if (!_Rt_) return;
 382         psxRegs.GPR.r[_Rt_] = MFC2(_Rd_);
 383 }
 384
 385 void gteCFC2() {
 386         if (!_Rt_) return;
 387         psxRegs.GPR.r[_Rt_] = psxRegs.CP2C.r[_Rd_];
 388 }
 389
 390 void gteMTC2() {
 391         MTC2(psxRegs.GPR.r[_Rt_], _Rd_);
 392 }
 393
 394 void gteCTC2() {
 395         CTC2(psxRegs.GPR.r[_Rt_], _Rd_);
 396 }
 397
 398 #define _oB_ (psxRegs.GPR.r[_Rs_] + _Imm_)
 399
 400 void gteLWC2() {
 401         MTC2(psxMemRead32(_oB_), _Rt_);
 402 }
 403
 404 void gteSWC2() {
 405         psxMemWrite32(_oB_, MFC2(_Rt_));
 406 }
 407
 408 #endif // FLAGLESS
 409
 410 #if 0
 411 #define DIVIDE DIVIDE_
 412 static u32 DIVIDE_(s16 n, u16 d) {
 413         if (n >= 0 && n < d * 2) {
 414                 s32 n_ = n;
 415                 return ((n_ << 16) + d / 2) / d;
 416                 //return (u32)((float)(n_ << 16) / (float)d + (float)0.5);
 417         }
 418         return 0xffffffff;
 419 }
 420 #endif
 421
 422 void gteRTPS(psxCP2Regs *regs) {
 423         int quotient;
 424         s64 tmp;
 425
 426 #ifdef GTE_LOG
 427         GTE_LOG("GTE RTPS\n");
 428 #endif
 429         gteFLAG = 0;
 430
 431         gteMAC1 = A1((((s64)gteTRX << 12) + (gteR11 * gteVX0) + (gteR12 * gteVY0) + (gteR13 * gteVZ0)) >> 12);
 432         gteMAC2 = A2((((s64)gteTRY << 12) + (gteR21 * gteVX0) + (gteR22 * gteVY0) + (gteR23 * gteVZ0)) >> 12);
 433         gteMAC3 = A3((((s64)gteTRZ << 12) + (gteR31 * gteVX0) + (gteR32 * gteVY0) + (gteR33 * gteVZ0)) >> 12);
 434         gteIR1 = limB1(gteMAC1, 0);
 435         gteIR2 = limB2(gteMAC2, 0);
 436         gteIR3 = limB3(gteMAC3, 0);
 437         gteSZ0 = gteSZ1;
 438         gteSZ1 = gteSZ2;
 439         gteSZ2 = gteSZ3;
 440         gteSZ3 = limD(gteMAC3);
 441         quotient = limE(DIVIDE(gteH, gteSZ3));
 442         gteSXY0 = gteSXY1;
 443         gteSXY1 = gteSXY2;
 444         gteSX2 = limG1(F((s64)gteOFX + ((s64)gteIR1 * quotient)) >> 16);
 445         gteSY2 = limG2(F((s64)gteOFY + ((s64)gteIR2 * quotient)) >> 16);
 446
 447         tmp = (s64)gteDQB + ((s64)gteDQA * quotient);
 448         gteMAC0 = F(tmp);
 449         gteIR0 = limH(tmp >> 12);
 450 }
 451
 452 void gteRTPT(psxCP2Regs *regs) {
 453         int quotient;
 454         int v;
 455         s32 vx, vy, vz;
 456         s64 tmp;
 457
 458 #ifdef GTE_LOG
 459         GTE_LOG("GTE RTPT\n");
 460 #endif
 461         gteFLAG = 0;
 462
 463         gteSZ0 = gteSZ3;
 464         for (v = 0; v < 3; v++) {
 465                 vx = VX(v);
 466                 vy = VY(v);
 467                 vz = VZ(v);
 468                 gteMAC1 = A1((((s64)gteTRX << 12) + (gteR11 * vx) + (gteR12 * vy) + (gteR13 * vz)) >> 12);
 469                 gteMAC2 = A2((((s64)gteTRY << 12) + (gteR21 * vx) + (gteR22 * vy) + (gteR23 * vz)) >> 12);
 470                 gteMAC3 = A3((((s64)gteTRZ << 12) + (gteR31 * vx) + (gteR32 * vy) + (gteR33 * vz)) >> 12);
 471                 gteIR1 = limB1(gteMAC1, 0);
 472                 gteIR2 = limB2(gteMAC2, 0);
 473                 gteIR3 = limB3(gteMAC3, 0);
 474                 fSZ(v) = limD(gteMAC3);
 475                 quotient = limE(DIVIDE(gteH, fSZ(v)));
 476                 fSX(v) = limG1(F((s64)gteOFX + ((s64)gteIR1 * quotient)) >> 16);
 477                 fSY(v) = limG2(F((s64)gteOFY + ((s64)gteIR2 * quotient)) >> 16);
 478         }
 479
 480         tmp = (s64)gteDQB + ((s64)gteDQA * quotient);
 481         gteMAC0 = F(tmp);
 482         gteIR0 = limH(tmp >> 12);
 483 }
 484
 485 void gteMVMVA(psxCP2Regs *regs) {
 486         int shift = 12 * GTE_SF(gteop);
 487         int mx = GTE_MX(gteop);
 488         int v = GTE_V(gteop);
 489         int cv = GTE_CV(gteop);
 490         int lm = GTE_LM(gteop);
 491         s32 vx = VX(v);
 492         s32 vy = VY(v);
 493         s32 vz = VZ(v);
 494
 495 #ifdef GTE_LOG
 496         GTE_LOG("GTE MVMVA\n");
 497 #endif
 498         gteFLAG = 0;
 499
 500         gteMAC1 = A1((((s64)CV1(cv) << 12) + (MX11(mx) * vx) + (MX12(mx) * vy) + (MX13(mx) * vz)) >> shift);
 501         gteMAC2 = A2((((s64)CV2(cv) << 12) + (MX21(mx) * vx) + (MX22(mx) * vy) + (MX23(mx) * vz)) >> shift);
 502         gteMAC3 = A3((((s64)CV3(cv) << 12) + (MX31(mx) * vx) + (MX32(mx) * vy) + (MX33(mx) * vz)) >> shift);
 503
 504         gteIR1 = limB1(gteMAC1, lm);
 505         gteIR2 = limB2(gteMAC2, lm);
 506         gteIR3 = limB3(gteMAC3, lm);
 507 }
 508
 509 void gteNCLIP(psxCP2Regs *regs) {
 510 #ifdef GTE_LOG
 511         GTE_LOG("GTE NCLIP\n");
 512 #endif
 513         gteFLAG = 0;
 514
 515         gteMAC0 = F((s64)gteSX0 * (gteSY1 - gteSY2) +
 516                                 gteSX1 * (gteSY2 - gteSY0) +
 517                                 gteSX2 * (gteSY0 - gteSY1));
 518 }
 519
 520 void gteAVSZ3(psxCP2Regs *regs) {
 521 #ifdef GTE_LOG
 522         GTE_LOG("GTE AVSZ3\n");
 523 #endif
 524         gteFLAG = 0;
 525
 526         gteMAC0 = F((s64)gteZSF3 * (gteSZ1 + gteSZ2 + gteSZ3));
 527         gteOTZ = limD(gteMAC0 >> 12);
 528 }
 529
 530 void gteAVSZ4(psxCP2Regs *regs) {
 531 #ifdef GTE_LOG
 532         GTE_LOG("GTE AVSZ4\n");
 533 #endif
 534         gteFLAG = 0;
 535
 536         gteMAC0 = F((s64)gteZSF4 * (gteSZ0 + gteSZ1 + gteSZ2 + gteSZ3));
 537         gteOTZ = limD(gteMAC0 >> 12);
 538 }
 539
 540 void gteSQR(psxCP2Regs *regs) {
 541         int shift = 12 * GTE_SF(gteop);
 542         int lm = GTE_LM(gteop);
 543
 544 #ifdef GTE_LOG
 545         GTE_LOG("GTE SQR\n");
 546 #endif
 547         gteFLAG = 0;
 548
 549         gteMAC1 = (gteIR1 * gteIR1) >> shift;
 550         gteMAC2 = (gteIR2 * gteIR2) >> shift;
 551         gteMAC3 = (gteIR3 * gteIR3) >> shift;
 552         gteIR1 = limB1(gteMAC1, lm);
 553         gteIR2 = limB2(gteMAC2, lm);
 554         gteIR3 = limB3(gteMAC3, lm);
 555 }
 556
 557 void gteNCCS(psxCP2Regs *regs) {
 558 #ifdef GTE_LOG
 559         GTE_LOG("GTE NCCS\n");
 560 #endif
 561         gteFLAG = 0;
 562
 563         gteMAC1 = ((s64)(gteL11 * gteVX0) + (gteL12 * gteVY0) + (gteL13 * gteVZ0)) >> 12;
 564         gteMAC2 = ((s64)(gteL21 * gteVX0) + (gteL22 * gteVY0) + (gteL23 * gteVZ0)) >> 12;
 565         gteMAC3 = ((s64)(gteL31 * gteVX0) + (gteL32 * gteVY0) + (gteL33 * gteVZ0)) >> 12;
 566         gteIR1 = limB1(gteMAC1, 1);
 567         gteIR2 = limB2(gteMAC2, 1);
 568         gteIR3 = limB3(gteMAC3, 1);
 569         gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
 570         gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
 571         gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
 572         gteIR1 = limB1(gteMAC1, 1);
 573         gteIR2 = limB2(gteMAC2, 1);
 574         gteIR3 = limB3(gteMAC3, 1);
 575         gteMAC1 = ((s32)gteR * gteIR1) >> 8;
 576         gteMAC2 = ((s32)gteG * gteIR2) >> 8;
 577         gteMAC3 = ((s32)gteB * gteIR3) >> 8;
 578         gteIR1 = gteMAC1;
 579         gteIR2 = gteMAC2;
 580         gteIR3 = gteMAC3;
 581
 582         gteRGB0 = gteRGB1;
 583         gteRGB1 = gteRGB2;
 584         gteCODE2 = gteCODE;
 585         gteR2 = limC1(gteMAC1 >> 4);
 586         gteG2 = limC2(gteMAC2 >> 4);
 587         gteB2 = limC3(gteMAC3 >> 4);
 588 }
 589
 590 void gteNCCT(psxCP2Regs *regs) {
 591         int v;
 592         s32 vx, vy, vz;
 593
 594 #ifdef GTE_LOG
 595         GTE_LOG("GTE NCCT\n");
 596 #endif
 597         gteFLAG = 0;
 598
 599         for (v = 0; v < 3; v++) {
 600                 vx = VX(v);
 601                 vy = VY(v);
 602                 vz = VZ(v);
 603                 gteMAC1 = ((s64)(gteL11 * vx) + (gteL12 * vy) + (gteL13 * vz)) >> 12;
 604                 gteMAC2 = ((s64)(gteL21 * vx) + (gteL22 * vy) + (gteL23 * vz)) >> 12;
 605                 gteMAC3 = ((s64)(gteL31 * vx) + (gteL32 * vy) + (gteL33 * vz)) >> 12;
 606                 gteIR1 = limB1(gteMAC1, 1);
 607                 gteIR2 = limB2(gteMAC2, 1);
 608                 gteIR3 = limB3(gteMAC3, 1);
 609                 gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
 610                 gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
 611                 gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
 612                 gteIR1 = limB1(gteMAC1, 1);
 613                 gteIR2 = limB2(gteMAC2, 1);
 614                 gteIR3 = limB3(gteMAC3, 1);
 615                 gteMAC1 = ((s32)gteR * gteIR1) >> 8;
 616                 gteMAC2 = ((s32)gteG * gteIR2) >> 8;
 617                 gteMAC3 = ((s32)gteB * gteIR3) >> 8;
 618
 619                 gteRGB0 = gteRGB1;
 620                 gteRGB1 = gteRGB2;
 621                 gteCODE2 = gteCODE;
 622                 gteR2 = limC1(gteMAC1 >> 4);
 623                 gteG2 = limC2(gteMAC2 >> 4);
 624                 gteB2 = limC3(gteMAC3 >> 4);
 625         }
 626         gteIR1 = gteMAC1;
 627         gteIR2 = gteMAC2;
 628         gteIR3 = gteMAC3;
 629 }
 630
 631 void gteNCDS(psxCP2Regs *regs) {
 632 #ifdef GTE_LOG
 633         GTE_LOG("GTE NCDS\n");
 634 #endif
 635         gteFLAG = 0;
 636
 637         gteMAC1 = ((s64)(gteL11 * gteVX0) + (gteL12 * gteVY0) + (gteL13 * gteVZ0)) >> 12;
 638         gteMAC2 = ((s64)(gteL21 * gteVX0) + (gteL22 * gteVY0) + (gteL23 * gteVZ0)) >> 12;
 639         gteMAC3 = ((s64)(gteL31 * gteVX0) + (gteL32 * gteVY0) + (gteL33 * gteVZ0)) >> 12;
 640         gteIR1 = limB1(gteMAC1, 1);
 641         gteIR2 = limB2(gteMAC2, 1);
 642         gteIR3 = limB3(gteMAC3, 1);
 643         gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
 644         gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
 645         gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
 646         gteIR1 = limB1(gteMAC1, 1);
 647         gteIR2 = limB2(gteMAC2, 1);
 648         gteIR3 = limB3(gteMAC3, 1);
 649         gteMAC1 = (((gteR << 4) * gteIR1) + (gteIR0 * limB1(A1U((s64)gteRFC - ((gteR * gteIR1) >> 8)), 0))) >> 12;
 650         gteMAC2 = (((gteG << 4) * gteIR2) + (gteIR0 * limB2(A2U((s64)gteGFC - ((gteG * gteIR2) >> 8)), 0))) >> 12;
 651         gteMAC3 = (((gteB << 4) * gteIR3) + (gteIR0 * limB3(A3U((s64)gteBFC - ((gteB * gteIR3) >> 8)), 0))) >> 12;
 652         gteIR1 = limB1(gteMAC1, 1);
 653         gteIR2 = limB2(gteMAC2, 1);
 654         gteIR3 = limB3(gteMAC3, 1);
 655
 656         gteRGB0 = gteRGB1;
 657         gteRGB1 = gteRGB2;
 658         gteCODE2 = gteCODE;
 659         gteR2 = limC1(gteMAC1 >> 4);
 660         gteG2 = limC2(gteMAC2 >> 4);
 661         gteB2 = limC3(gteMAC3 >> 4);
 662 }
 663
 664 void gteNCDT(psxCP2Regs *regs) {
 665         int v;
 666         s32 vx, vy, vz;
 667
 668 #ifdef GTE_LOG
 669         GTE_LOG("GTE NCDT\n");
 670 #endif
 671         gteFLAG = 0;
 672
 673         for (v = 0; v < 3; v++) {
 674                 vx = VX(v);
 675                 vy = VY(v);
 676                 vz = VZ(v);
 677                 gteMAC1 = ((s64)(gteL11 * vx) + (gteL12 * vy) + (gteL13 * vz)) >> 12;
 678                 gteMAC2 = ((s64)(gteL21 * vx) + (gteL22 * vy) + (gteL23 * vz)) >> 12;
 679                 gteMAC3 = ((s64)(gteL31 * vx) + (gteL32 * vy) + (gteL33 * vz)) >> 12;
 680                 gteIR1 = limB1(gteMAC1, 1);
 681                 gteIR2 = limB2(gteMAC2, 1);
 682                 gteIR3 = limB3(gteMAC3, 1);
 683                 gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
 684                 gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
 685                 gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
 686                 gteIR1 = limB1(gteMAC1, 1);
 687                 gteIR2 = limB2(gteMAC2, 1);
 688                 gteIR3 = limB3(gteMAC3, 1);
 689                 gteMAC1 = (((gteR << 4) * gteIR1) + (gteIR0 * limB1(A1U((s64)gteRFC - ((gteR * gteIR1) >> 8)), 0))) >> 12;
 690                 gteMAC2 = (((gteG << 4) * gteIR2) + (gteIR0 * limB2(A2U((s64)gteGFC - ((gteG * gteIR2) >> 8)), 0))) >> 12;
 691                 gteMAC3 = (((gteB << 4) * gteIR3) + (gteIR0 * limB3(A3U((s64)gteBFC - ((gteB * gteIR3) >> 8)), 0))) >> 12;
 692
 693                 gteRGB0 = gteRGB1;
 694                 gteRGB1 = gteRGB2;
 695                 gteCODE2 = gteCODE;
 696                 gteR2 = limC1(gteMAC1 >> 4);
 697                 gteG2 = limC2(gteMAC2 >> 4);
 698                 gteB2 = limC3(gteMAC3 >> 4);
 699         }
 700         gteIR1 = limB1(gteMAC1, 1);
 701         gteIR2 = limB2(gteMAC2, 1);
 702         gteIR3 = limB3(gteMAC3, 1);
 703 }
 704
 705 void gteOP(psxCP2Regs *regs) {
 706         int shift = 12 * GTE_SF(gteop);
 707         int lm = GTE_LM(gteop);
 708
 709 #ifdef GTE_LOG
 710         GTE_LOG("GTE OP\n");
 711 #endif
 712         gteFLAG = 0;
 713
 714         gteMAC1 = ((gteR22 * gteIR3) - (gteR33 * gteIR2)) >> shift;
 715         gteMAC2 = ((gteR33 * gteIR1) - (gteR11 * gteIR3)) >> shift;
 716         gteMAC3 = ((gteR11 * gteIR2) - (gteR22 * gteIR1)) >> shift;
 717         gteIR1 = limB1(gteMAC1, lm);
 718         gteIR2 = limB2(gteMAC2, lm);
 719         gteIR3 = limB3(gteMAC3, lm);
 720 }
 721
 722 void gteDCPL(psxCP2Regs *regs) {
 723         int lm = GTE_LM(gteop);
 724
 725         s32 RIR1 = ((s32)gteR * gteIR1) >> 8;
 726         s32 GIR2 = ((s32)gteG * gteIR2) >> 8;
 727         s32 BIR3 = ((s32)gteB * gteIR3) >> 8;
 728
 729 #ifdef GTE_LOG
 730         GTE_LOG("GTE DCPL\n");
 731 #endif
 732         gteFLAG = 0;
 733
 734         gteMAC1 = RIR1 + ((gteIR0 * limB1(A1U((s64)gteRFC - RIR1), 0)) >> 12);
 735         gteMAC2 = GIR2 + ((gteIR0 * limB1(A2U((s64)gteGFC - GIR2), 0)) >> 12);
 736         gteMAC3 = BIR3 + ((gteIR0 * limB1(A3U((s64)gteBFC - BIR3), 0)) >> 12);
 737
 738         gteIR1 = limB1(gteMAC1, lm);
 739         gteIR2 = limB2(gteMAC2, lm);
 740         gteIR3 = limB3(gteMAC3, lm);
 741
 742         gteRGB0 = gteRGB1;
 743         gteRGB1 = gteRGB2;
 744         gteCODE2 = gteCODE;
 745         gteR2 = limC1(gteMAC1 >> 4);
 746         gteG2 = limC2(gteMAC2 >> 4);
 747         gteB2 = limC3(gteMAC3 >> 4);
 748 }
 749
 750 void gteGPF(psxCP2Regs *regs) {
 751         int shift = 12 * GTE_SF(gteop);
 752
 753 #ifdef GTE_LOG
 754         GTE_LOG("GTE GPF\n");
 755 #endif
 756         gteFLAG = 0;
 757
 758         gteMAC1 = (gteIR0 * gteIR1) >> shift;
 759         gteMAC2 = (gteIR0 * gteIR2) >> shift;
 760         gteMAC3 = (gteIR0 * gteIR3) >> shift;
 761         gteIR1 = limB1(gteMAC1, 0);
 762         gteIR2 = limB2(gteMAC2, 0);
 763         gteIR3 = limB3(gteMAC3, 0);
 764
 765         gteRGB0 = gteRGB1;
 766         gteRGB1 = gteRGB2;
 767         gteCODE2 = gteCODE;
 768         gteR2 = limC1(gteMAC1 >> 4);
 769         gteG2 = limC2(gteMAC2 >> 4);
 770         gteB2 = limC3(gteMAC3 >> 4);
 771 }
 772
 773 void gteGPL(psxCP2Regs *regs) {
 774         int shift = 12 * GTE_SF(gteop);
 775
 776 #ifdef GTE_LOG
 777         GTE_LOG("GTE GPL\n");
 778 #endif
 779         gteFLAG = 0;
 780
 781         gteMAC1 = A1((((s64)gteMAC1 << shift) + (gteIR0 * gteIR1)) >> shift);
 782         gteMAC2 = A2((((s64)gteMAC2 << shift) + (gteIR0 * gteIR2)) >> shift);
 783         gteMAC3 = A3((((s64)gteMAC3 << shift) + (gteIR0 * gteIR3)) >> shift);
 784         gteIR1 = limB1(gteMAC1, 0);
 785         gteIR2 = limB2(gteMAC2, 0);
 786         gteIR3 = limB3(gteMAC3, 0);
 787
 788         gteRGB0 = gteRGB1;
 789         gteRGB1 = gteRGB2;
 790         gteCODE2 = gteCODE;
 791         gteR2 = limC1(gteMAC1 >> 4);
 792         gteG2 = limC2(gteMAC2 >> 4);
 793         gteB2 = limC3(gteMAC3 >> 4);
 794 }
 795
 796 void gteDPCS(psxCP2Regs *regs) {
 797         int shift = 12 * GTE_SF(gteop);
 798
 799 #ifdef GTE_LOG
 800         GTE_LOG("GTE DPCS\n");
 801 #endif
 802         gteFLAG = 0;
 803
 804         gteMAC1 = ((gteR << 16) + (gteIR0 * limB1(A1U(((s64)gteRFC - (gteR << 4)) << (12 - shift)), 0))) >> 12;
 805         gteMAC2 = ((gteG << 16) + (gteIR0 * limB2(A2U(((s64)gteGFC - (gteG << 4)) << (12 - shift)), 0))) >> 12;
 806         gteMAC3 = ((gteB << 16) + (gteIR0 * limB3(A3U(((s64)gteBFC - (gteB << 4)) << (12 - shift)), 0))) >> 12;
 807
 808         gteIR1 = limB1(gteMAC1, 0);
 809         gteIR2 = limB2(gteMAC2, 0);
 810         gteIR3 = limB3(gteMAC3, 0);
 811         gteRGB0 = gteRGB1;
 812         gteRGB1 = gteRGB2;
 813         gteCODE2 = gteCODE;
 814         gteR2 = limC1(gteMAC1 >> 4);
 815         gteG2 = limC2(gteMAC2 >> 4);
 816         gteB2 = limC3(gteMAC3 >> 4);
 817 }
 818
 819 void gteDPCT(psxCP2Regs *regs) {
 820         int v;
 821
 822 #ifdef GTE_LOG
 823         GTE_LOG("GTE DPCT\n");
 824 #endif
 825         gteFLAG = 0;
 826
 827         for (v = 0; v < 3; v++) {
 828                 gteMAC1 = ((gteR0 << 16) + (gteIR0 * limB1(A1U((s64)gteRFC - (gteR0 << 4)), 0))) >> 12;
 829                 gteMAC2 = ((gteG0 << 16) + (gteIR0 * limB1(A2U((s64)gteGFC - (gteG0 << 4)), 0))) >> 12;
 830                 gteMAC3 = ((gteB0 << 16) + (gteIR0 * limB1(A3U((s64)gteBFC - (gteB0 << 4)), 0))) >> 12;
 831
 832                 gteRGB0 = gteRGB1;
 833                 gteRGB1 = gteRGB2;
 834                 gteCODE2 = gteCODE;
 835                 gteR2 = limC1(gteMAC1 >> 4);
 836                 gteG2 = limC2(gteMAC2 >> 4);
 837                 gteB2 = limC3(gteMAC3 >> 4);
 838         }
 839         gteIR1 = limB1(gteMAC1, 0);
 840         gteIR2 = limB2(gteMAC2, 0);
 841         gteIR3 = limB3(gteMAC3, 0);
 842 }
 843
 844 void gteNCS(psxCP2Regs *regs) {
 845 #ifdef GTE_LOG
 846         GTE_LOG("GTE NCS\n");
 847 #endif
 848         gteFLAG = 0;
 849
 850         gteMAC1 = ((s64)(gteL11 * gteVX0) + (gteL12 * gteVY0) + (gteL13 * gteVZ0)) >> 12;
 851         gteMAC2 = ((s64)(gteL21 * gteVX0) + (gteL22 * gteVY0) + (gteL23 * gteVZ0)) >> 12;
 852         gteMAC3 = ((s64)(gteL31 * gteVX0) + (gteL32 * gteVY0) + (gteL33 * gteVZ0)) >> 12;
 853         gteIR1 = limB1(gteMAC1, 1);
 854         gteIR2 = limB2(gteMAC2, 1);
 855         gteIR3 = limB3(gteMAC3, 1);
 856         gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
 857         gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
 858         gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
 859         gteIR1 = limB1(gteMAC1, 1);
 860         gteIR2 = limB2(gteMAC2, 1);
 861         gteIR3 = limB3(gteMAC3, 1);
 862
 863         gteRGB0 = gteRGB1;
 864         gteRGB1 = gteRGB2;
 865         gteCODE2 = gteCODE;
 866         gteR2 = limC1(gteMAC1 >> 4);
 867         gteG2 = limC2(gteMAC2 >> 4);
 868         gteB2 = limC3(gteMAC3 >> 4);
 869 }
 870
 871 void gteNCT(psxCP2Regs *regs) {
 872         int v;
 873         s32 vx, vy, vz;
 874
 875 #ifdef GTE_LOG
 876         GTE_LOG("GTE NCT\n");
 877 #endif
 878         gteFLAG = 0;
 879
 880         for (v = 0; v < 3; v++) {
 881                 vx = VX(v);
 882                 vy = VY(v);
 883                 vz = VZ(v);
 884                 gteMAC1 = ((s64)(gteL11 * vx) + (gteL12 * vy) + (gteL13 * vz)) >> 12;
 885                 gteMAC2 = ((s64)(gteL21 * vx) + (gteL22 * vy) + (gteL23 * vz)) >> 12;
 886                 gteMAC3 = ((s64)(gteL31 * vx) + (gteL32 * vy) + (gteL33 * vz)) >> 12;
 887                 gteIR1 = limB1(gteMAC1, 1);
 888                 gteIR2 = limB2(gteMAC2, 1);
 889                 gteIR3 = limB3(gteMAC3, 1);
 890                 gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
 891                 gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
 892                 gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
 893                 gteRGB0 = gteRGB1;
 894                 gteRGB1 = gteRGB2;
 895                 gteCODE2 = gteCODE;
 896                 gteR2 = limC1(gteMAC1 >> 4);
 897                 gteG2 = limC2(gteMAC2 >> 4);
 898                 gteB2 = limC3(gteMAC3 >> 4);
 899         }
 900         gteIR1 = limB1(gteMAC1, 1);
 901         gteIR2 = limB2(gteMAC2, 1);
 902         gteIR3 = limB3(gteMAC3, 1);
 903 }
 904
 905 void gteCC(psxCP2Regs *regs) {
 906 #ifdef GTE_LOG
 907         GTE_LOG("GTE CC\n");
 908 #endif
 909         gteFLAG = 0;
 910
 911         gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
 912         gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
 913         gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
 914         gteIR1 = limB1(gteMAC1, 1);
 915         gteIR2 = limB2(gteMAC2, 1);
 916         gteIR3 = limB3(gteMAC3, 1);
 917         gteMAC1 = ((s32)gteR * gteIR1) >> 8;
 918         gteMAC2 = ((s32)gteG * gteIR2) >> 8;
 919         gteMAC3 = ((s32)gteB * gteIR3) >> 8;
 920         gteIR1 = limB1(gteMAC1, 1);
 921         gteIR2 = limB2(gteMAC2, 1);
 922         gteIR3 = limB3(gteMAC3, 1);
 923
 924         gteRGB0 = gteRGB1;
 925         gteRGB1 = gteRGB2;
 926         gteCODE2 = gteCODE;
 927         gteR2 = limC1(gteMAC1 >> 4);
 928         gteG2 = limC2(gteMAC2 >> 4);
 929         gteB2 = limC3(gteMAC3 >> 4);
 930 }
 931
 932 void gteINTPL(psxCP2Regs *regs) {
 933         int shift = 12 * GTE_SF(gteop);
 934         int lm = GTE_LM(gteop);
 935
 936 #ifdef GTE_LOG
 937         GTE_LOG("GTE INTPL\n");
 938 #endif
 939         gteFLAG = 0;
 940
 941         gteMAC1 = ((gteIR1 << 12) + (gteIR0 * limB1(A1U((s64)gteRFC - gteIR1), 0))) >> shift;
 942         gteMAC2 = ((gteIR2 << 12) + (gteIR0 * limB2(A2U((s64)gteGFC - gteIR2), 0))) >> shift;
 943         gteMAC3 = ((gteIR3 << 12) + (gteIR0 * limB3(A3U((s64)gteBFC - gteIR3), 0))) >> shift;
 944         gteIR1 = limB1(gteMAC1, lm);
 945         gteIR2 = limB2(gteMAC2, lm);
 946         gteIR3 = limB3(gteMAC3, lm);
 947         gteRGB0 = gteRGB1;
 948         gteRGB1 = gteRGB2;
 949         gteCODE2 = gteCODE;
 950         gteR2 = limC1(gteMAC1 >> 4);
 951         gteG2 = limC2(gteMAC2 >> 4);
 952         gteB2 = limC3(gteMAC3 >> 4);
 953 }
 954
 955 void gteCDP(psxCP2Regs *regs) {
 956 #ifdef GTE_LOG
 957         GTE_LOG("GTE CDP\n");
 958 #endif
 959         gteFLAG = 0;
 960
 961         gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
 962         gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
 963         gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
 964         gteIR1 = limB1(gteMAC1, 1);
 965         gteIR2 = limB2(gteMAC2, 1);
 966         gteIR3 = limB3(gteMAC3, 1);
 967         gteMAC1 = (((gteR << 4) * gteIR1) + (gteIR0 * limB1(A1U((s64)gteRFC - ((gteR * gteIR1) >> 8)), 0))) >> 12;
 968         gteMAC2 = (((gteG << 4) * gteIR2) + (gteIR0 * limB2(A2U((s64)gteGFC - ((gteG * gteIR2) >> 8)), 0))) >> 12;
 969         gteMAC3 = (((gteB << 4) * gteIR3) + (gteIR0 * limB3(A3U((s64)gteBFC - ((gteB * gteIR3) >> 8)), 0))) >> 12;
 970         gteIR1 = limB1(gteMAC1, 1);
 971         gteIR2 = limB2(gteMAC2, 1);
 972         gteIR3 = limB3(gteMAC3, 1);
 973
 974         gteRGB0 = gteRGB1;
 975         gteRGB1 = gteRGB2;
 976         gteCODE2 = gteCODE;
 977         gteR2 = limC1(gteMAC1 >> 4);
 978         gteG2 = limC2(gteMAC2 >> 4);
 979         gteB2 = limC3(gteMAC3 >> 4);
 980 }
 981
 982 /* decomposed/parametrized versions for the recompiler */
 983
 984 #ifndef FLAGLESS
 985
 986 void gteSQR_part_noshift(psxCP2Regs *regs) {
 987         gteFLAG = 0;
 988
 989         gteMAC1 = gteIR1 * gteIR1;
 990         gteMAC2 = gteIR2 * gteIR2;
 991         gteMAC3 = gteIR3 * gteIR3;
 992 }
 993
 994 void gteSQR_part_shift(psxCP2Regs *regs) {
 995         gteFLAG = 0;
 996
 997         gteMAC1 = (gteIR1 * gteIR1) >> 12;
 998         gteMAC2 = (gteIR2 * gteIR2) >> 12;
 999         gteMAC3 = (gteIR3 * gteIR3) >> 12;
1000 }
1001
1002 void gteOP_part_noshift(psxCP2Regs *regs) {
1003         gteFLAG = 0;
1004
1005         gteMAC1 = (gteR22 * gteIR3) - (gteR33 * gteIR2);
1006         gteMAC2 = (gteR33 * gteIR1) - (gteR11 * gteIR3);
1007         gteMAC3 = (gteR11 * gteIR2) - (gteR22 * gteIR1);
1008 }
1009
1010 void gteOP_part_shift(psxCP2Regs *regs) {
1011         gteFLAG = 0;
1012
1013         gteMAC1 = ((gteR22 * gteIR3) - (gteR33 * gteIR2)) >> 12;
1014         gteMAC2 = ((gteR33 * gteIR1) - (gteR11 * gteIR3)) >> 12;
1015         gteMAC3 = ((gteR11 * gteIR2) - (gteR22 * gteIR1)) >> 12;
1016 }
1017
1018 void gteDCPL_part(psxCP2Regs *regs) {
1019         s32 RIR1 = ((s32)gteR * gteIR1) >> 8;
1020         s32 GIR2 = ((s32)gteG * gteIR2) >> 8;
1021         s32 BIR3 = ((s32)gteB * gteIR3) >> 8;
1022
1023         gteFLAG = 0;
1024
1025         gteMAC1 = RIR1 + ((gteIR0 * limB1(A1U((s64)gteRFC - RIR1), 0)) >> 12);
1026         gteMAC2 = GIR2 + ((gteIR0 * limB1(A2U((s64)gteGFC - GIR2), 0)) >> 12);
1027         gteMAC3 = BIR3 + ((gteIR0 * limB1(A3U((s64)gteBFC - BIR3), 0)) >> 12);
1028 }
1029
1030 void gteGPF_part_noshift(psxCP2Regs *regs) {
1031         gteFLAG = 0;
1032
1033         gteMAC1 = gteIR0 * gteIR1;
1034         gteMAC2 = gteIR0 * gteIR2;
1035         gteMAC3 = gteIR0 * gteIR3;
1036 }
1037
1038 void gteGPF_part_shift(psxCP2Regs *regs) {
1039         gteFLAG = 0;
1040
1041         gteMAC1 = (gteIR0 * gteIR1) >> 12;
1042         gteMAC2 = (gteIR0 * gteIR2) >> 12;
1043         gteMAC3 = (gteIR0 * gteIR3) >> 12;
1044 }
1045
1046 #endif // !FLAGLESS
1047
1048 void gteGPL_part_noshift(psxCP2Regs *regs) {
1049         gteFLAG = 0;
1050
1051         gteMAC1 = A1((s64)gteMAC1 + (gteIR0 * gteIR1));
1052         gteMAC2 = A2((s64)gteMAC2 + (gteIR0 * gteIR2));
1053         gteMAC3 = A3((s64)gteMAC3 + (gteIR0 * gteIR3));
1054 }
1055
1056 void gteGPL_part_shift(psxCP2Regs *regs) {
1057         gteFLAG = 0;
1058
1059         gteMAC1 = A1((s64)gteMAC1 + ((gteIR0 * gteIR1) >> 12));
1060         gteMAC2 = A2((s64)gteMAC2 + ((gteIR0 * gteIR2) >> 12));
1061         gteMAC3 = A3((s64)gteMAC3 + ((gteIR0 * gteIR3) >> 12));
1062 }
1063
1064 void gteDPCS_part_noshift(psxCP2Regs *regs) {
1065         int shift = 0;
1066
1067         gteFLAG = 0;
1068
1069         gteMAC1 = ((gteR << 16) + (gteIR0 * limB1(A1U((s64)gteRFC - (gteR << 4)) << (12 - shift), 0))) >> 12;
1070         gteMAC2 = ((gteG << 16) + (gteIR0 * limB2(A2U((s64)gteGFC - (gteG << 4)) << (12 - shift), 0))) >> 12;
1071         gteMAC3 = ((gteB << 16) + (gteIR0 * limB3(A3U((s64)gteBFC - (gteB << 4)) << (12 - shift), 0))) >> 12;
1072 }
1073
1074 void gteDPCS_part_shift(psxCP2Regs *regs) {
1075         int shift = 12;
1076
1077         gteFLAG = 0;
1078
1079         gteMAC1 = ((gteR << 16) + (gteIR0 * limB1(A1U((s64)gteRFC - (gteR << 4)) << (12 - shift), 0))) >> 12;
1080         gteMAC2 = ((gteG << 16) + (gteIR0 * limB2(A2U((s64)gteGFC - (gteG << 4)) << (12 - shift), 0))) >> 12;
1081         gteMAC3 = ((gteB << 16) + (gteIR0 * limB3(A3U((s64)gteBFC - (gteB << 4)) << (12 - shift), 0))) >> 12;
1082 }
1083
1084 void gteINTPL_part_noshift(psxCP2Regs *regs) {
1085         gteFLAG = 0;
1086
1087         gteMAC1 = ((gteIR1 << 12) + (gteIR0 * limB1(A1U((s64)gteRFC - gteIR1), 0)));
1088         gteMAC2 = ((gteIR2 << 12) + (gteIR0 * limB2(A2U((s64)gteGFC - gteIR2), 0)));
1089         gteMAC3 = ((gteIR3 << 12) + (gteIR0 * limB3(A3U((s64)gteBFC - gteIR3), 0)));
1090 }
1091
1092 void gteINTPL_part_shift(psxCP2Regs *regs) {
1093         gteFLAG = 0;
1094
1095         gteMAC1 = ((gteIR1 << 12) + (gteIR0 * limB1(A1U((s64)gteRFC - gteIR1), 0))) >> 12;
1096         gteMAC2 = ((gteIR2 << 12) + (gteIR0 * limB2(A2U((s64)gteGFC - gteIR2), 0))) >> 12;
1097         gteMAC3 = ((gteIR3 << 12) + (gteIR0 * limB3(A3U((s64)gteBFC - gteIR3), 0))) >> 12;
1098 }
1099
1100 void gteMACtoRGB(psxCP2Regs *regs) {
1101         gteRGB0 = gteRGB1;
1102         gteRGB1 = gteRGB2;
1103         gteCODE2 = gteCODE;
1104         gteR2 = limC1(gteMAC1 >> 4);
1105         gteG2 = limC2(gteMAC2 >> 4);
1106         gteB2 = limC3(gteMAC3 >> 4);
1107 }
1108