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