fce.c

   1 /* FCE Ultra - NES/Famicom Emulator
   2  *
   3  * Copyright notice for this file:
   4  *  Copyright (C) 1998 BERO
   5  *  Copyright (C) 2002 Ben Parnell
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20  */
  21
  22 #include        <string.h>
  23 #include        <stdio.h>
  24 #include        <stdlib.h>
  25
  26 #include        "types.h"
  27 #include        "x6502.h"
  28 #include        "fce.h"
  29 #include        "sound.h"
  30 #include        "svga.h"
  31 #include        "netplay.h"
  32 #include        "general.h"
  33 #include        "endian.h"
  34 #include        "version.h"
  35 #include        "memory.h"
  36
  37 #include        "cart.h"
  38 #include        "nsf.h"
  39 #include        "fds.h"
  40 #include        "ines.h"
  41 #include        "unif.h"
  42 #include        "cheat.h"
  43
  44 #include        "state.h"
  45 #include        "video.h"
  46 #include        "input.h"
  47 #include        "file.h"
  48 #include        "crc32.h"
  49 #include        "ppu.h"
  50
  51 #define Pal     (PALRAM)
  52
  53
  54 static void (*RefreshLine)(uint8 *P, uint32 vofs) = NULL;
  55 static void PRefreshLine(void);
  56
  57 static void ResetPPU(void);
  58 static void PowerPPU(void);
  59
  60 uint64 timestampbase=0;
  61
  62 int MMC5Hack;
  63 uint32 MMC5HackVROMMask;
  64 uint8 *MMC5HackExNTARAMPtr;
  65 uint8 *MMC5HackVROMPTR;
  66 uint8 MMC5HackCHRMode=0;
  67 uint8 MMC5HackSPMode;
  68 uint8 MMC5HackSPScroll;
  69 uint8 MMC5HackSPPage;
  70
  71 uint8 *MMC5SPRVPage[8];
  72 uint8 *MMC5BGVPage[8];
  73
  74
  75 uint8 VRAMBuffer,PPUGenLatch;
  76
  77 uint8 *vnapage[4];
  78 uint8 PPUNTARAM;
  79 uint8 PPUCHRRAM;
  80
  81 /* Color deemphasis emulation.  Joy... */
  82 static uint8 deemp=0;
  83 static int deempcnt[8];
  84
  85 int tosprite=256;
  86
  87 FCEUGI FCEUGameInfo;
  88 void (*GameInterface)(int h);
  89
  90 void FP_FASTAPASS(1) (*PPU_hook)(uint32 A);
  91
  92 void (*GameStateRestore)(int version);
  93 void (*GameHBIRQHook)(void);
  94
  95 readfunc ARead[0x10000];
  96 writefunc BWrite[0x10000];
  97 static readfunc *AReadG;
  98 static writefunc *BWriteG;
  99 static int RWWrap=0;
 100
 101 DECLFW(BNull)
 102 {
 103
 104 }
 105
 106 DECLFR(ANull)
 107 {
 108  return(X.DB);
 109 }
 110
 111 int AllocGenieRW(void)
 112 {
 113  if(!(AReadG=FCEU_malloc(0x8000*sizeof(readfunc))))
 114   return 0;
 115  if(!(BWriteG=FCEU_malloc(0x8000*sizeof(writefunc))))
 116   return 0;
 117  RWWrap=1;
 118  return 1;
 119 }
 120
 121 void FlushGenieRW(void)
 122 {
 123  int32 x;
 124
 125  if(RWWrap)
 126  {
 127   for(x=0;x<0x8000;x++)
 128   {
 129    ARead[x+0x8000]=AReadG[x];
 130    BWrite[x+0x8000]=BWriteG[x];
 131   }
 132   free(AReadG);
 133   free(BWriteG);
 134   AReadG=0;
 135   BWriteG=0;
 136   RWWrap=0;
 137  }
 138 }
 139
 140 readfunc FASTAPASS(1) GetReadHandler(int32 a)
 141 {
 142   if(a>=0x8000 && RWWrap)
 143    return AReadG[a-0x8000];
 144   else
 145    return ARead[a];
 146 }
 147
 148 void FASTAPASS(3) SetReadHandler(int32 start, int32 end, readfunc func)
 149 {
 150   int32 x;
 151
 152   if(!func)
 153    func=ANull;
 154
 155   if(RWWrap)
 156    for(x=end;x>=start;x--)
 157    {
 158     if(x>=0x8000)
 159      AReadG[x-0x8000]=func;
 160     else
 161      ARead[x]=func;
 162    }
 163   else
 164
 165    for(x=end;x>=start;x--)
 166     ARead[x]=func;
 167 }
 168
 169 writefunc FASTAPASS(1) GetWriteHandler(int32 a)
 170 {
 171   if(RWWrap && a>=0x8000)
 172    return BWriteG[a-0x8000];
 173   else
 174    return BWrite[a];
 175 }
 176
 177 void FASTAPASS(3) SetWriteHandler(int32 start, int32 end, writefunc func)
 178 {
 179   int32 x;
 180
 181   if(!func)
 182    func=BNull;
 183
 184   if(RWWrap)
 185    for(x=end;x>=start;x--)
 186    {
 187     if(x>=0x8000)
 188      BWriteG[x-0x8000]=func;
 189     else
 190      BWrite[x]=func;
 191    }
 192   else
 193    for(x=end;x>=start;x--)
 194     BWrite[x]=func;
 195 }
 196
 197 uint8 vtoggle=0;
 198 uint8 XOffset=0;
 199
 200 uint32 TempAddr,RefreshAddr;
 201
 202
 203 /* scanline is equal to the current visible scanline we're on. */
 204
 205 int scanline;
 206 static uint32 scanlines_per_frame;
 207
 208 uint8 GameMemBlock[131072] __attribute__ ((aligned (4)));
 209 uint8 NTARAM[0x800] __attribute__ ((aligned (4)));
 210 uint8 PALRAM[0x20] __attribute__ ((aligned (4)));
 211 uint8 RAM[0x800] __attribute__ ((aligned (4)));
 212
 213 uint8 PPU[4];
 214 uint8 PPUSPL;
 215
 216 uint8 PAL=0;
 217
 218
 219 #define MMC5BGVRAMADR(V)      &MMC5BGVPage[(V)>>10][(V)]
 220 #define VRAMADR(V)      &VPage[(V)>>10][(V)]
 221
 222 static DECLFW(BRAML)
 223 {
 224         RAM[A]=V;
 225 }
 226
 227 static DECLFW(BRAMH)
 228 {
 229         RAM[A&0x7FF]=V;
 230 }
 231
 232 static DECLFR(ARAML)
 233 {
 234         return RAM[A];
 235 }
 236
 237 static DECLFR(ARAMH)
 238 {
 239         return RAM[A&0x7FF];
 240 }
 241
 242
 243 static DECLFR(A2002)
 244 {
 245                         uint8 ret;
 246                         ret = PPU_status;
 247                         vtoggle=0;
 248                         PPU_status&=0x7F;
 249                         return ret|(PPUGenLatch&0x1F);
 250 }
 251
 252 static DECLFR(A200x)
 253 {
 254                         return PPUGenLatch;
 255 }
 256
 257 static DECLFR(A2007)
 258 {
 259                         uint8 ret;
 260                         uint32 tmp=RefreshAddr&0x3FFF;
 261
 262                         PPUGenLatch=ret=VRAMBuffer;
 263                         if(PPU_hook) PPU_hook(tmp);
 264                         if(tmp<0x2000)
 265                         {
 266                          VRAMBuffer=VPage[tmp>>10][tmp];
 267                         }
 268                         else
 269                         {
 270                          VRAMBuffer=vnapage[(tmp>>10)&0x3][tmp&0x3FF];
 271                         }
 272
 273                         if (INC32) RefreshAddr+=32;
 274                         else RefreshAddr++;
 275                         if(PPU_hook) PPU_hook(RefreshAddr&0x3fff);
 276                         return ret;
 277 }
 278
 279 static DECLFW(B2000)
 280 {
 281                 PPUGenLatch=V;
 282                 PPU[0]=V;
 283                 TempAddr&=0xF3FF;
 284                 TempAddr|=(V&3)<<10;
 285 }
 286
 287 static DECLFW(B2001)
 288 {
 289                   PPUGenLatch=V;
 290                   PPU[1]=V;
 291                   if(V&0xE0)
 292                    deemp=V>>5;
 293                   //printf("$%04x:$%02x, %d\n",X.PC,V,scanline);
 294 }
 295
 296 static DECLFW(B2002)
 297 {
 298                  PPUGenLatch=V;
 299 }
 300
 301 static DECLFW(B2003)
 302 {
 303                 PPUGenLatch=V;
 304                 PPU[3]=V;
 305                 PPUSPL=V&0x7;
 306 }
 307
 308 static DECLFW(B2004)
 309 {
 310                 PPUGenLatch=V;
 311                 //SPRAM[PPU[3]++]=V;
 312                 if(PPUSPL&8)
 313                 {
 314                  if(PPU[3]>=8)
 315                   SPRAM[PPU[3]]=V;
 316                 }
 317                 else
 318                 {
 319                  //printf("$%02x:$%02x\n",PPUSPL,V);
 320                  SPRAM[PPUSPL]=V;
 321                  PPUSPL++;
 322                 }
 323                 PPU[3]++;
 324
 325 }
 326
 327 static DECLFW(B2005)
 328 {
 329                 uint32 tmp=TempAddr;
 330
 331                 PPUGenLatch=V;
 332                 if (!vtoggle)
 333                 {
 334                  tmp&=0xFFE0;
 335                  tmp|=V>>3;
 336                  XOffset=V&7;
 337                 }
 338                 else
 339                 {
 340                  tmp&=0x8C1F;
 341                  tmp|=((V&~0x7)<<2);
 342                  tmp|=(V&7)<<12;
 343                 }
 344
 345                 TempAddr=tmp;
 346                 vtoggle^=1;
 347 }
 348
 349 static DECLFW(B2006)
 350 {
 351                        PPUGenLatch=V;
 352                        if(!vtoggle)
 353                        {
 354                         TempAddr&=0x00FF;
 355                         TempAddr|=(V&0x3f)<<8;
 356                        }
 357                        else
 358                        {
 359                         TempAddr&=0xFF00;
 360                         TempAddr|=V;
 361                         RefreshAddr=TempAddr;
 362
 363                         if(PPU_hook)
 364                          PPU_hook(RefreshAddr);
 365                        }
 366                       vtoggle^=1;
 367 }
 368
 369 static DECLFW(B2007)
 370 {
 371                         uint32 tmp=RefreshAddr&0x3FFF;
 372
 373                         PPUGenLatch=V;
 374                         if(tmp>=0x3F00)
 375                         {
 376                         // hmmm....
 377                         if(!(tmp&0xf))
 378                          PALRAM[0x00]=PALRAM[0x04]=PALRAM[0x08]=PALRAM[0x0C]=
 379                          PALRAM[0x10]=PALRAM[0x14]=PALRAM[0x18]=PALRAM[0x1c]=V&0x3f;
 380                         else if(tmp&3) PALRAM[(tmp&0x1f)]=V&0x3f;
 381                         }
 382                         else if(tmp<0x2000)
 383                         {
 384                           if(PPUCHRRAM&(1<<(tmp>>10)))
 385                             VPage[tmp>>10][tmp]=V;
 386                         }
 387                         else
 388                         {
 389                          if(PPUNTARAM&(1<<((tmp&0xF00)>>10)))
 390                           vnapage[((tmp&0xF00)>>10)][tmp&0x3FF]=V;
 391                         }
 392                         if (INC32) RefreshAddr+=32;
 393                         else RefreshAddr++;
 394                         if(PPU_hook) PPU_hook(RefreshAddr&0x3fff);
 395 }
 396
 397 static DECLFW(B4014)
 398 {
 399         uint32 t=V<<8;
 400         int x;
 401         for(x=0;x<256;x++)
 402          B2004(0x2004,X.DB=ARead[t+x](t+x));
 403         X6502_AddCycles(512);
 404 }
 405
 406 void BGRender(uint8 *target)
 407 {
 408         uint32 tem, vofs;
 409         vofs=((PPU[0]&0x10)<<8) | ((RefreshAddr>>12)&7);
 410
 411         Pal[0]|=64;
 412         Pal[4]|=64;
 413         Pal[8]|=64;
 414         Pal[0xC]|=64;
 415         RefreshLine(target-XOffset, vofs);
 416         Pal[0]&=63;
 417         Pal[4]&=63;
 418         Pal[8]&=63;
 419         Pal[0xC]&=63;
 420
 421         if(!(PPU[1]&2))
 422         {
 423          tem=Pal[0]|0x40;
 424          tem|=tem<<8;
 425          tem|=tem<<16;
 426          *(uint32 *)target=*(uint32 *)(target+4)=tem;
 427         }
 428 }
 429
 430 #ifdef FRAMESKIP
 431 int FSkip_setting=-1; // auto
 432 int FSkip=0;
 433 void FCEUI_FrameSkip(int x)
 434 {
 435  FSkip=x;
 436 }
 437 #endif
 438
 439 /*      This is called at the beginning of each visible scanline */
 440 static void Loop6502(void)
 441 {
 442         uint32 tem;
 443         int x;
 444         uint8 *target=XBuf+scanline*320+32;
 445
 446         if(ScreenON || SpriteON)
 447         {
 448          /* PRefreshLine() will not get called on skipped frames.  This
 449             could cause a problem, but the solution would be rather complex,
 450             due to the current sprite 0 hit code.
 451          */
 452          #ifdef FRAMESKIP
 453          if(!FSkip)
 454          {
 455          #endif
 456           if(ScreenON)
 457           {
 458            if(scanline>=FSettings.FirstSLine && scanline<=FSettings.LastSLine)
 459             BGRender(target);
 460            else
 461            {
 462             if(PPU_hook)
 463              PRefreshLine();
 464            }
 465           }
 466           else
 467           {
 468            tem=Pal[0]|(Pal[0]<<8)|(Pal[0]<<16)|(Pal[0]<<24);
 469            tem|=0x40404040;
 470            FCEU_dwmemset(target,tem,264);
 471           }
 472          #ifdef FRAMESKIP
 473          }
 474          #endif
 475          if (SpriteON && scanline)
 476           RefreshSprite(target);
 477          #ifdef FRAMESKIP
 478          if(!FSkip)
 479          {
 480          #endif
 481           if(PPU[1]&0x01)
 482           {
 483            for(x=63;x>=0;x--)
 484             ((uint32 *)target)[x]=((uint32*)target)[x]&0xF0F0F0F0;
 485           }
 486            if((PPU[1]>>5)==0x7)
 487             for(x=63;x>=0;x--)
 488              ((uint32 *)target)[x]=(((uint32*)target)[x]&0x3f3f3f3f)|0x40404040;
 489            else if(PPU[1]&0xE0)
 490             for(x=63;x>=0;x--)
 491              ((uint32 *)target)[x]=((uint32*)target)[x]|0xC0C0C0C0;
 492            else
 493             for(x=63;x>=0;x--)
 494              ((uint32 *)target)[x]=((uint32*)target)[x]&0x3f3f3f3f;
 495           FCEU_dwmemset(target-  8,0x3f3f3f3f,8);
 496           FCEU_dwmemset(target+256,0x3f3f3f3f,8);
 497          #ifdef FRAMESKIP
 498          }
 499          #endif
 500         }
 501         else
 502         {
 503          tem=Pal[0]|(Pal[0]<<8)|(Pal[0]<<16)|(Pal[0]<<24);
 504          FCEU_dwmemset(target,tem,256);
 505         }
 506         if(InputScanlineHook)
 507          InputScanlineHook(target, scanline);
 508 }
 509
 510 #define PAL(c)  ((c)+cc)
 511
 512
 513 static void PRefreshLine(void)
 514 {
 515         uint32 vofs;
 516         uint8 X1;
 517
 518         vofs = 0;
 519         if (BGAdrHI) vofs = 0x1000;
 520
 521         vofs+=(RefreshAddr>>12)&7;
 522
 523         for(X1=33;X1;X1--)
 524         {
 525                 register uint8 no;
 526                 register uint8 zz2;
 527                 zz2=(uint8)((RefreshAddr>>10)&3);
 528                 PPU_hook(0x2000|(RefreshAddr&0xFFF));
 529                 no  = vnapage[zz2][(RefreshAddr&0x3ff)];
 530                 PPU_hook((no<<4)+vofs);
 531                 if((RefreshAddr&0x1f)==0x1f)
 532                  RefreshAddr^=0x41F;
 533                 else
 534                  RefreshAddr++;
 535         }
 536 }
 537
 538 /* This high-level graphics MMC5 emulation code was written
 539    for MMC5 carts in "CL" mode.  It's probably not totally
 540    correct for carts in "SL" mode.
 541    */
 542 static void RefreshLine_MMC5Hack1(uint8 *P, uint32 vofs)
 543 {
 544           int8 tochange, X1;
 545
 546           tochange=MMC5HackSPMode&0x1F;
 547
 548           for(X1=33;X1;X1--,P+=8)
 549           {
 550                 uint8 *C;
 551                 uint8 cc,zz,zz2;
 552                 uint32 vadr;
 553
 554                 if((tochange<=0 && MMC5HackSPMode&0x40) ||
 555                    (tochange>0 && !(MMC5HackSPMode&0x40)))
 556                 {
 557                  uint8 xs,ys;
 558
 559                  xs=33-X1;
 560                  ys=((scanline>>3)+MMC5HackSPScroll)&0x1F;
 561                  if(ys>=0x1E) ys-=0x1E;
 562                  vadr=(MMC5HackExNTARAMPtr[xs|(ys<<5)]<<4)+(vofs&7);
 563
 564                  C = MMC5HackVROMPTR+vadr;
 565                  C += ((MMC5HackSPPage & 0x3f & MMC5HackVROMMask) << 12);
 566
 567                  cc=MMC5HackExNTARAMPtr[0x3c0+(xs>>2)+((ys&0x1C)<<1)];
 568                  cc=((cc >> ((xs&2) + ((ys&0x2)<<1))) &3) <<2;
 569                 }
 570                 else
 571                 {
 572                  zz=RefreshAddr&0x1F;
 573                  zz2=(RefreshAddr>>10)&3;
 574                  vadr=(vnapage[zz2][RefreshAddr&0x3ff]<<4)+vofs;
 575                  C = MMC5BGVRAMADR(vadr);
 576                  cc=vnapage[zz2][0x3c0+(zz>>2)+((RefreshAddr&0x380)>>4)];
 577                  cc=((cc >> ((zz&2) + ((RefreshAddr&0x40)>>4))) &3) <<2;
 578                 }
 579                 #include "fceline.h"
 580
 581                 if((RefreshAddr&0x1f)==0x1f)
 582                  RefreshAddr^=0x41F;
 583                 else
 584                  RefreshAddr++;
 585                 tochange--;
 586           }
 587 }
 588
 589 static void RefreshLine_MMC5Hack2(uint8 *P, uint32 vofs)
 590 {
 591           int8 tochange, X1;
 592
 593           tochange=MMC5HackSPMode&0x1F;
 594
 595           for(X1=33;X1;X1--,P+=8)
 596           {
 597                 uint8 *C;
 598                 uint8 cc;
 599                 uint8 zz2;
 600                 uint32 vadr;
 601
 602                 if((tochange<=0 && MMC5HackSPMode&0x40) ||
 603                    (tochange>0 && !(MMC5HackSPMode&0x40)))
 604                 {
 605                  uint8 xs,ys;
 606
 607                  xs=33-X1;
 608                  ys=((scanline>>3)+MMC5HackSPScroll)&0x1F;
 609                  if(ys>=0x1E) ys-=0x1E;
 610                  vadr=(MMC5HackExNTARAMPtr[xs|(ys<<5)]<<4)+(vofs&7);
 611
 612                  C = MMC5HackVROMPTR+vadr;
 613                  C += ((MMC5HackSPPage & 0x3f & MMC5HackVROMMask) << 12);
 614
 615                  cc=MMC5HackExNTARAMPtr[0x3c0+(xs>>2)+((ys&0x1C)<<1)];
 616                  cc=((cc >> ((xs&2) + ((ys&0x2)<<1))) &3) <<2;
 617                 }
 618                 else
 619                 {
 620                  C=MMC5HackVROMPTR;
 621                  zz2=(RefreshAddr>>10)&3;
 622                  vadr = (vnapage[zz2][RefreshAddr & 0x3ff] << 4) + vofs;
 623                  C += (((MMC5HackExNTARAMPtr[RefreshAddr & 0x3ff]) & 0x3f &
 624                          MMC5HackVROMMask) << 12) + (vadr & 0xfff);
 625                  vadr = (MMC5HackExNTARAMPtr[RefreshAddr & 0x3ff] & 0xC0)>> 4;
 626                  cc = vadr;
 627                 }
 628                 #include "fceline.h"
 629                 if((RefreshAddr&0x1f)==0x1f)
 630                  RefreshAddr^=0x41F;
 631                 else
 632                  RefreshAddr++;
 633                 tochange--;
 634           }
 635 }
 636
 637 static void RefreshLine_MMC5Hack3(uint8 *P, uint32 vofs)
 638 {
 639           int8 X1;
 640
 641           for(X1=33;X1;X1--,P+=8)
 642           {
 643                 uint8 *C;
 644                 uint8 cc;
 645                 uint8 zz2;
 646                 uint32 vadr;
 647
 648                 C=MMC5HackVROMPTR;
 649                 zz2=(RefreshAddr>>10)&3;
 650                 vadr = (vnapage[zz2][RefreshAddr & 0x3ff] << 4) + vofs;
 651                 C += (((MMC5HackExNTARAMPtr[RefreshAddr & 0x3ff]) & 0x3f &
 652                         MMC5HackVROMMask) << 12) + (vadr & 0xfff);
 653                 vadr = (MMC5HackExNTARAMPtr[RefreshAddr & 0x3ff] & 0xC0)>> 4;
 654                 cc = vadr;
 655
 656                 #include "fceline.h"
 657                 if((RefreshAddr&0x1f)==0x1f)
 658                  RefreshAddr^=0x41F;
 659                 else
 660                  RefreshAddr++;
 661           }
 662 }
 663
 664 static void RefreshLine_MMC5Hack4(uint8 *P, uint32 vofs)
 665 {
 666           int8 X1;
 667
 668           for(X1=33;X1;X1--,P+=8)
 669           {
 670                 uint8 *C;
 671                 uint8 cc,zz,zz2;
 672                 uint32 vadr;
 673
 674                 zz=RefreshAddr&0x1F;
 675                 zz2=(RefreshAddr>>10)&3;
 676                 vadr=(vnapage[zz2][RefreshAddr&0x3ff]<<4)+vofs;
 677                 C = MMC5BGVRAMADR(vadr);
 678                 cc=vnapage[zz2][0x3c0+(zz>>2)+((RefreshAddr&0x380)>>4)];
 679                 cc=((cc >> ((zz&2) + ((RefreshAddr&0x40)>>4))) &3) <<2;
 680
 681                 #include "fceline.h"
 682
 683                 if((RefreshAddr&0x1f)==0x1f)
 684                  RefreshAddr^=0x41F;
 685                 else
 686                  RefreshAddr++;
 687           }
 688 }
 689
 690 static void RefreshLine_PPU_hook(uint8 *P, uint32 vofs)
 691 {
 692          int8 X1;
 693
 694          for(X1=33;X1;X1--,P+=8)
 695          {
 696                 uint8 *C;
 697                 uint8 cc,zz,zz2;
 698                 uint32 vadr;
 699
 700                 zz=RefreshAddr&0x1F;
 701                 zz2=(RefreshAddr>>10)&3;
 702                 PPU_hook(0x2000|(RefreshAddr&0xFFF));
 703                 cc=vnapage[zz2][0x3c0+(zz>>2)+((RefreshAddr&0x380)>>4)];
 704                 cc=((cc >> ((zz&2) + ((RefreshAddr&0x40)>>4))) &3) <<2;
 705                 vadr=(vnapage[zz2][RefreshAddr&0x3ff]<<4)+vofs;
 706                 C = VRAMADR(vadr);
 707
 708                 #include "fceline.h"
 709
 710                 PPU_hook(vadr);
 711
 712                 if((RefreshAddr&0x1f)==0x1f)
 713                  RefreshAddr^=0x41F;
 714                 else
 715                  RefreshAddr++;
 716          }
 717 }
 718
 719 static void RefreshLine_normal(uint8 *P, uint32 vofs) // vofs is 0x107 max
 720 {
 721          int8 X1;
 722          uint32 rfraddr = RefreshAddr;
 723          uint8 *page = vnapage[(rfraddr>>10)&3];
 724          uint32 cc2=0;
 725
 726          if ((rfraddr&0xc)!=0)
 727           cc2=*(uint32 *) (page + ((rfraddr&0x380)>>4) + ((rfraddr&0x10)>>2) + 0x3c0);
 728
 729          for (X1=33;X1;X1--,P+=8)
 730          {
 731                 uint8 cc,*C;
 732                 uint32 vadr;
 733
 734                 vadr=(page[rfraddr&0x3ff]<<4)+vofs;
 735                 C = VRAMADR(vadr);
 736                 if ((rfraddr&0xc)==0)
 737                  cc2=*(uint32 *) (page + ((rfraddr&0x380)>>4) + ((rfraddr&0x10)>>2) + 0x3c0);
 738                 cc=((cc2 >> ((rfraddr&2) + ((rfraddr&0x40)>>4) + ((rfraddr&0xc)<<1))) & 3) << 2;
 739
 740                 #include "fceline.h"
 741
 742                 if((rfraddr&0x1f)==0x1f) {
 743                  rfraddr^=0x41F;
 744                  page = vnapage[(rfraddr>>10)&3];
 745                 } else
 746                  rfraddr++;
 747          }
 748          RefreshAddr = rfraddr;
 749 }
 750
 751 static void SetRefreshLine(void)
 752 {
 753         if(MMC5Hack && geniestage!=1)
 754         {
 755          if(MMC5HackCHRMode==0 && (MMC5HackSPMode&0x80))
 756          {
 757                  if (RefreshLine != RefreshLine_MMC5Hack1) printf("set refr RefreshLine_MMC5Hack1\n");
 758                  RefreshLine = RefreshLine_MMC5Hack1;
 759          }
 760          else if(MMC5HackCHRMode==1 && (MMC5HackSPMode&0x80))
 761          {
 762                 if (RefreshLine != RefreshLine_MMC5Hack2) printf("set refr RefreshLine_MMC5Hack2\n");
 763                  RefreshLine = RefreshLine_MMC5Hack2;
 764          }
 765          else if(MMC5HackCHRMode==1)
 766          {
 767                 if (RefreshLine != RefreshLine_MMC5Hack3) printf("set refr RefreshLine_MMC5Hack3\n");
 768                  RefreshLine = RefreshLine_MMC5Hack3;
 769          }
 770          else
 771          {
 772                 if (RefreshLine != RefreshLine_MMC5Hack4) printf("set refr RefreshLine_MMC5Hack4\n");
 773                  RefreshLine = RefreshLine_MMC5Hack4;
 774          }
 775         }       // End if(MMC5Hack)
 776         else if(PPU_hook)
 777         {
 778                 if (RefreshLine != RefreshLine_PPU_hook) printf("set refr RefreshLine_PPU_hook\n");
 779                 RefreshLine = RefreshLine_PPU_hook;
 780         }
 781         else
 782         {
 783                 if (RefreshLine != RefreshLine_normal) printf("set refr RefreshLine_normal\n");
 784                 RefreshLine = RefreshLine_normal;
 785         }
 786 }
 787
 788 //static INLINE
 789 void Fixit2(void)
 790 {
 791    if(ScreenON || SpriteON)
 792    {
 793     uint32 rad=RefreshAddr;
 794     rad&=0xFBE0;
 795     rad|=TempAddr&0x041f;
 796     RefreshAddr=rad;
 797     //PPU_hook(RefreshAddr,-1);
 798    }
 799 }
 800
 801 //static INLINE
 802 void Fixit1(void)
 803 {
 804    if(ScreenON || SpriteON)
 805    {
 806     uint32 rad=RefreshAddr;
 807
 808     if((rad&0x7000)==0x7000)
 809     {
 810      rad^=0x7000;
 811      if((rad&0x3E0)==0x3A0)
 812      {
 813       rad^=0x3A0;
 814       rad^=0x800;
 815      }
 816      else
 817      {
 818       if((rad&0x3E0)==0x3e0)
 819        rad^=0x3e0;
 820       else rad+=0x20;
 821      }
 822     }
 823     else
 824      rad+=0x1000;
 825     RefreshAddr=rad;
 826     //PPU_hook(RefreshAddr,-1);
 827    }
 828 }
 829
 830 //#define NEW_TRY
 831
 832 /*      This is called at the beginning of all h-blanks on visible lines. */
 833 #ifndef NEW_TRY
 834 static void DoHBlank(void)
 835 {
 836  if(ScreenON || SpriteON)
 837   FetchSpriteData();
 838  if(GameHBIRQHook && (ScreenON || SpriteON))
 839  {
 840   X6502_Run(12);
 841   GameHBIRQHook();
 842   X6502_Run(25-12);
 843   Fixit2();
 844   X6502_Run(85-25);
 845  }
 846  else
 847  {
 848   X6502_Run(25);        // Tried 65, caused problems with Slalom(maybe others)
 849   Fixit2();
 850   X6502_Run(85-25);
 851  }
 852  //PPU_hook(0,-1);
 853  //fprintf(stderr,"%3d: $%04x\n",scanline,RefreshAddr);
 854 }
 855 #endif
 856
 857
 858 // ============================//
 859 // end of new code
 860 // ===========================//
 861
 862 void ResetMapping(void)
 863 {
 864         int x;
 865
 866         SetReadHandler(0x0000,0xFFFF,ANull);
 867         SetWriteHandler(0x0000,0xFFFF,BNull);
 868
 869         SetReadHandler(0,0x7FF,ARAML);
 870         SetWriteHandler(0,0x7FF,BRAML);
 871
 872         SetReadHandler(0x800,0x1FFF,ARAMH);  /* Part of a little */
 873         SetWriteHandler(0x800,0x1FFF,BRAMH); /* hack for a small speed boost. */
 874
 875         for(x=0x2000;x<0x4000;x+=8)
 876         {
 877          ARead[x]=A200x;
 878          BWrite[x]=B2000;
 879          ARead[x+1]=A200x;
 880          BWrite[x+1]=B2001;
 881          ARead[x+2]=A2002;
 882          BWrite[x+2]=B2002;
 883          ARead[x+3]=A200x;
 884          BWrite[x+3]=B2003;
 885          ARead[x+4]=A200x;
 886          BWrite[x+4]=B2004;
 887          ARead[x+5]=A200x;
 888          BWrite[x+5]=B2005;
 889          ARead[x+6]=A200x;
 890          BWrite[x+6]=B2006;
 891          ARead[x+7]=A2007;
 892          BWrite[x+7]=B2007;
 893         }
 894
 895         BWrite[0x4014]=B4014;
 896         SetNESSoundMap();
 897         InitializeInput();
 898 }
 899
 900 int GameLoaded=0;
 901 void CloseGame(void)
 902 {
 903  if(GameLoaded)
 904  {
 905   if(FCEUGameInfo.type!=GIT_NSF)
 906    FlushGameCheats();
 907   #ifdef NETWORK
 908   if(FSettings.NetworkPlay) KillNetplay();
 909   #endif
 910   GameInterface(GI_CLOSE);
 911   CloseGenie();
 912   GameLoaded=0;
 913  }
 914 }
 915
 916 void ResetGameLoaded(void)
 917 {
 918         if(GameLoaded) CloseGame();
 919         GameStateRestore=0;
 920         PPU_hook=0;
 921         GameHBIRQHook=0;
 922         GameExpSound.Fill=0;
 923         GameExpSound.RChange=0;
 924         if(GameExpSound.Kill)
 925          GameExpSound.Kill();
 926         GameExpSound.Kill=0;
 927         MapIRQHook=0;
 928         MMC5Hack=0;
 929         PAL&=1;
 930         pale=0;
 931
 932         FCEUGameInfo.name=0;
 933         FCEUGameInfo.type=GIT_CART;
 934         FCEUGameInfo.vidsys=GIV_USER;
 935         FCEUGameInfo.input[0]=FCEUGameInfo.input[1]=-1;
 936         FCEUGameInfo.inputfc=-1;
 937 }
 938
 939 FCEUGI *FCEUI_LoadGame(char *name)
 940 {
 941         int fp;
 942
 943         Exit=1;
 944         ResetGameLoaded();
 945
 946         fp=FCEU_fopen(name,"rb");
 947         if(!fp)
 948         {
 949          FCEU_PrintError("Error opening \"%s\"!",name);
 950          return 0;
 951         }
 952
 953         GetFileBase(name);
 954         if(iNESLoad(name,fp))
 955          goto endlseq;
 956         if(NSFLoad(fp))
 957          goto endlseq;
 958         if(FDSLoad(name,fp))
 959          goto endlseq;
 960         if(UNIFLoad(name,fp))
 961          goto endlseq;
 962
 963         FCEU_PrintError("An error occurred while loading the file.");
 964         FCEU_fclose(fp);
 965         return 0;
 966
 967         endlseq:
 968         FCEU_fclose(fp);
 969         GameLoaded=1;
 970
 971         FCEU_ResetVidSys();
 972         if(FCEUGameInfo.type!=GIT_NSF)
 973          if(FSettings.GameGenie)
 974           OpenGenie();
 975
 976         PowerNES();
 977         #ifdef NETWORK
 978         if(FSettings.NetworkPlay) InitNetplay();
 979         #endif
 980         SaveStateRefresh();
 981         if(FCEUGameInfo.type!=GIT_NSF)
 982         {
 983          LoadGamePalette();
 984          LoadGameCheats();
 985         }
 986
 987         FCEU_ResetPalette();
 988         Exit=0;
 989         return(&FCEUGameInfo);
 990 }
 991
 992
 993 void FCEU_ResetVidSys(void)
 994 {
 995  int w;
 996
 997  if(FCEUGameInfo.vidsys==GIV_NTSC)
 998   w=0;
 999  else if(FCEUGameInfo.vidsys==GIV_PAL)
1000   w=1;
1001  else
1002   w=FSettings.PAL;
1003
1004  if(w)
1005  {
1006   PAL=1;
1007   scanlines_per_frame=312;
1008   FSettings.FirstSLine=FSettings.UsrFirstSLine[1];
1009   FSettings.LastSLine=FSettings.UsrLastSLine[1];
1010  }
1011  else
1012  {
1013   PAL=0;
1014   scanlines_per_frame=262;
1015   FSettings.FirstSLine=FSettings.UsrFirstSLine[0];
1016   FSettings.LastSLine=FSettings.UsrLastSLine[0];
1017  }
1018  printf("PAL = %i\n", PAL);
1019  SetSoundVariables();
1020 }
1021
1022 int FCEUI_Initialize(void)
1023 {
1024         if(!InitVirtualVideo())
1025          return 0;
1026         memset(&FSettings,0,sizeof(FSettings));
1027         FSettings.UsrFirstSLine[0]=8;
1028         FSettings.UsrFirstSLine[1]=0;
1029         FSettings.UsrLastSLine[0]=FSettings.UsrLastSLine[1]=239;
1030         FSettings.SoundVolume=65535;    // 100%
1031         return 1;
1032 }
1033
1034 #define harko 0xe //0x9
1035 static INLINE void Thingo(void)
1036 {
1037    Loop6502();
1038 #ifndef NEW_TRY
1039
1040    if(tosprite>=256)
1041    {
1042     X6502_Run(256-harko);
1043     Fixit1();
1044     X6502_Run(harko);
1045    }
1046    else
1047    {
1048     if(tosprite<=240)
1049     {
1050      X6502_Run(tosprite);
1051      PPU[2]|=0x40;
1052      X6502_Run(256-tosprite-harko);
1053      Fixit1();
1054      X6502_Run(harko);
1055     }
1056     else
1057     {
1058      X6502_Run(256-harko);
1059      Fixit1();
1060      X6502_Run(tosprite-(256-harko));
1061      PPU[2]|=0x40;
1062      X6502_Run(256-tosprite);
1063     }
1064     tosprite=256;
1065    }
1066    DoHBlank();
1067 #else
1068    X6502_Run_scanline();
1069 #endif
1070 }
1071 #undef harko
1072
1073 void EmLoop(void)
1074 {
1075  for(;;)
1076  {
1077         //extern int asdc;
1078         //printf("asdc: %i\n", asdc);
1079         //asdc=0;
1080   ApplyPeriodicCheats();
1081   X6502_Run(256+85);
1082
1083   PPU[2]|=0x80;
1084   PPU[3]=PPUSPL=0;             /* Not sure if this is correct.  According
1085                                   to Matt Conte and my own tests, it is.  Timing is probably
1086                                   off, though.  NOTE:  Not having this here
1087                                   breaks a Super Donkey Kong game. */
1088
1089   X6502_Run(12);                /* I need to figure out the true nature and length
1090                                    of this delay.
1091                                 */
1092   if(FCEUGameInfo.type==GIT_NSF)
1093    TriggerNMINSF();
1094   else if(VBlankON)
1095    TriggerNMI();
1096
1097   X6502_Run((scanlines_per_frame-242)*(256+85)-12);
1098
1099   PPU_status&=0x1f;
1100
1101   X6502_Run(256);
1102   {
1103    static int kook=0;
1104    if(ScreenON || SpriteON)
1105     if(GameHBIRQHook)
1106      GameHBIRQHook();
1107
1108    X6502_Run(85-kook);
1109    kook=(kook+1)&1;
1110   }
1111
1112   if(ScreenON || SpriteON)
1113   {
1114    RefreshAddr=TempAddr;
1115    if(PPU_hook) PPU_hook(RefreshAddr&0x3fff);
1116   }
1117   if(FCEUGameInfo.type==GIT_NSF)
1118   {
1119    X6502_Run((256+85)*240);
1120   }
1121   else
1122   {
1123    int x,max,maxref;
1124
1125    deemp=PPU[1]>>5;
1126    SetRefreshLine();
1127    for(scanline=0;scanline<240;scanline++)
1128    {
1129     deempcnt[deemp]++;
1130     Thingo();
1131    }
1132    for(x=1,max=0,maxref=0;x<7;x++)
1133    {
1134     if(deempcnt[x]>max)
1135     {
1136      max=deempcnt[x];
1137      maxref=x;
1138     }
1139     deempcnt[x]=0;
1140    }
1141    //FCEU_DispMessage("%2x:%2x:%2x:%2x:%2x:%2x:%2x:%2x %d",deempcnt[0],deempcnt[1],deempcnt[2],deempcnt[3],deempcnt[4],deempcnt[5],deempcnt[6],deempcnt[7],maxref);
1142    //memset(deempcnt,0,sizeof(deempcnt));
1143    SetNESDeemph(maxref,0);
1144   }
1145
1146   {
1147    int ssize;
1148
1149    ssize=FlushEmulateSound();
1150
1151    #ifdef FRAMESKIP
1152    if(FSkip)
1153    {
1154     FCEU_PutImageDummy();
1155     FSkip--;
1156     FCEUD_Update(0,WaveFinalMono,ssize);
1157    }
1158    else
1159    #endif
1160    {
1161     FCEU_PutImage();
1162     FCEUD_Update(XBuf+8,WaveFinalMono,ssize);
1163    }
1164    UpdateInput();
1165   }
1166
1167   if(Exit)
1168   {
1169    CloseGame();
1170    break;
1171   }
1172
1173  }
1174 }
1175
1176 #ifdef FPS
1177 #include <sys/time.h>
1178 uint64 frcount;
1179 #endif
1180 void FCEUI_Emulate(void)
1181 {
1182         #ifdef FPS
1183         uint64 starttime,end;
1184         struct timeval tv;
1185         frcount=0;
1186         gettimeofday(&tv,0);
1187         starttime=((uint64)tv.tv_sec*1000000)+tv.tv_usec;
1188         #endif
1189         EmLoop();
1190
1191         #ifdef FPS
1192         // Probably won't work well on Windows port; for
1193         // debugging/speed testing.
1194         {
1195          uint64 w;
1196          int i,frac;
1197          gettimeofday(&tv,0);
1198          end=((uint64)tv.tv_sec*1000000)+tv.tv_usec;
1199          w=frcount*10000000000LL/(end-starttime);
1200          i=w/10000;
1201          frac=w-i*10000;
1202          printf("Average FPS: %d.%04d\n",i,frac);
1203         }
1204         #endif
1205
1206 }
1207
1208 void FCEUI_CloseGame(void)
1209 {
1210         Exit=1;
1211 }
1212
1213 static void ResetPPU(void)
1214 {
1215         VRAMBuffer=PPU[0]=PPU[1]=PPU[2]=PPU[3]=0;
1216         PPUSPL=0;
1217         PPUGenLatch=0;
1218         RefreshAddr=TempAddr=0;
1219         vtoggle = 0;
1220 }
1221
1222 static void PowerPPU(void)
1223 {
1224         memset(NTARAM,0x00,0x800);
1225         memset(PALRAM,0x00,0x20);
1226         memset(SPRAM,0x00,0x100);
1227         ResetPPU();
1228 }
1229
1230 void ResetNES(void)
1231 {
1232         if(!GameLoaded || (FCEUGameInfo.type==GIT_NSF)) return;
1233         GameInterface(GI_RESETM2);
1234         ResetSound();
1235         ResetPPU();
1236         X6502_Reset();
1237 }
1238
1239 void PowerNES(void)
1240 {
1241         if(!GameLoaded) return;
1242
1243         FCEU_CheatResetRAM();
1244         FCEU_CheatAddRAM(2,0,RAM);
1245
1246         GeniePower();
1247
1248         memset(RAM,0x00,0x800);
1249         ResetMapping();
1250         GameInterface(GI_POWER);
1251         PowerSound();
1252         PowerPPU();
1253         timestampbase=0;
1254         X6502_Power();
1255 }
1256