notaz.gp2x.de / fceu.git / blame_incremental
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (non-incremental) | history | HEAD
undocumented opcodes added to ncpu
[fceu.git] / fce.c
... / ...
CommitLineData
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#include "palette.h"
52#include "movie.h"
53
54#include "dprintf.h"
55
56#ifdef GP2X
57#include "drivers/gp2x/asmutils.h"
58#endif
59
60#define Pal (PALRAM)
61
62
63static void (*RefreshLine)(uint8 *P, uint32 vofs) = NULL;
64static void PRefreshLine(void);
65
66static void ResetPPU(void);
67static void PowerPPU(void);
68
69uint64 timestampbase=0;
70
71static int ppudead=1;
72static int kook=0;
73
74int MMC5Hack;
75uint32 MMC5HackVROMMask;
76uint8 *MMC5HackExNTARAMPtr;
77uint8 *MMC5HackVROMPTR;
78uint8 MMC5HackCHRMode=0;
79uint8 MMC5HackSPMode;
80uint8 MMC5HackSPScroll;
81uint8 MMC5HackSPPage;
82
83uint8 *MMC5SPRVPage[8];
84uint8 *MMC5BGVPage[8];
85
86
87uint8 VRAMBuffer,PPUGenLatch;
88
89uint8 *vnapage[4];
90uint8 PPUNTARAM;
91uint8 PPUCHRRAM;
92
93/* Color deemphasis emulation. Joy... */
94static uint8 deemp=0;
95static int deempcnt[8];
96
97FCEUGI FCEUGameInfo;
98void (*GameInterface)(int h, void *param);
99
100void FP_FASTAPASS(1) (*PPU_hook)(uint32 A);
101
102void (*GameStateRestore)(int version);
103void (*GameHBIRQHook)(void), (*GameHBIRQHook2)(void);
104
105readfunc ARead[0x10000];
106writefunc BWrite[0x10000];
107static readfunc *AReadG;
108static writefunc *BWriteG;
109static int RWWrap=0;
110
111#ifdef ASM_6502
112static void asmcpu_update(int32 cycles)
113{
114 // some code from x6502.c
115 fhcnt-=cycles;
116 if(fhcnt<=0)
117 {
118 FrameSoundUpdate();
119 fhcnt+=fhinc;
120 }
121
122 if(PCMIRQCount>0)
123 {
124 PCMIRQCount-=cycles;
125 if(PCMIRQCount<=0)
126 {
127 vdis=1;
128 if((PSG[0x10]&0x80) && !(PSG[0x10]&0x40))
129 {
130 extern uint8 SIRQStat;
131 SIRQStat|=0x80;
132 X6502_IRQBegin(FCEU_IQDPCM);
133 }
134 }
135 }
136}
137
138void asmcpu_unpack(void)
139{
140 nes_registers[0] = X.A << 24;
141 nes_registers[1] = X.X;
142 nes_registers[2] = X.Y;
143 pc_base = 0;
144 nes_registers[3] = X.PC;
145 X6502_Rebase_a();
146 nes_registers[4] = X.S << 24;
147 nes_registers[4]|= X.IRQlow << 8;
148 nes_registers[7] = (uint32)X.count << 16;
149
150 // NVUB DIZC
151 nes_registers[4]|= X.P & 0x5d;
152 nes_registers[5] = X.P << 24; // N
153 if (!(X.P&0x02)) nes_registers[5] |= 1; // Z
154}
155
156void asmcpu_pack(void)
157{
158 X.A = nes_registers[0] >> 24;
159 X.X = nes_registers[1];
160 X.Y = nes_registers[2];
161 X.PC= nes_registers[3] - pc_base;
162 X.S = nes_registers[4] >> 24;
163 X.IRQlow = nes_registers[4] >> 8;
164 X.count = (int32) nes_registers[7] >> 16;
165
166 // NVUB DIZC
167 X.P = nes_registers[4] & 0x5d;
168 if ( nes_registers[5]&0x80000000) X.P |= 0x80; // N
169 if (!(nes_registers[5]&0x000000ff)) X.P |= 0x02; // Z
170}
171#endif
172
173DECLFW(BNull)
174{
175
176}
177
178DECLFR(ANull)
179{
180 return(X.DB);
181}
182
183int AllocGenieRW(void)
184{
185 if(!(AReadG=FCEU_malloc(0x8000*sizeof(readfunc))))
186 return 0;
187 if(!(BWriteG=FCEU_malloc(0x8000*sizeof(writefunc))))
188 return 0;
189 RWWrap=1;
190 return 1;
191}
192
193void FlushGenieRW(void)
194{
195 int32 x;
196
197 if(RWWrap)
198 {
199 for(x=0;x<0x8000;x++)
200 {
201 ARead[x+0x8000]=AReadG[x];
202 BWrite[x+0x8000]=BWriteG[x];
203 }
204#ifdef ASM_6502
205 GenieSetPages(1);
206#endif
207 free(AReadG);
208 free(BWriteG);
209 AReadG=0;
210 BWriteG=0;
211 RWWrap=0;
212 }
213}
214
215readfunc FASTAPASS(1) GetReadHandler(int32 a)
216{
217 if(a>=0x8000 && RWWrap)
218 return AReadG[a-0x8000];
219 else
220 return ARead[a];
221}
222
223void FASTAPASS(3) SetReadHandler(int32 start, int32 end, readfunc func)
224{
225 int32 x;
226
227 if(!func)
228 func=ANull;
229
230 if(RWWrap)
231 for(x=end;x>=start;x--)
232 {
233 if(x>=0x8000)
234 AReadG[x-0x8000]=func;
235 else
236 ARead[x]=func;
237 }
238 else
239
240 for(x=end;x>=start;x--)
241 ARead[x]=func;
242}
243
244writefunc FASTAPASS(1) GetWriteHandler(int32 a)
245{
246 if(RWWrap && a>=0x8000)
247 return BWriteG[a-0x8000];
248 else
249 return BWrite[a];
250}
251
252void FASTAPASS(3) SetWriteHandler(int32 start, int32 end, writefunc func)
253{
254 int32 x;
255
256 if(!func)
257 func=BNull;
258
259 if(RWWrap)
260 for(x=end;x>=start;x--)
261 {
262 if(x>=0x8000)
263 BWriteG[x-0x8000]=func;
264 else
265 BWrite[x]=func;
266 }
267 else
268 for(x=end;x>=start;x--)
269 BWrite[x]=func;
270}
271
272uint8 vtoggle=0;
273uint8 XOffset=0;
274
275uint32 TempAddr,RefreshAddr;
276
277
278/* scanline is equal to the current visible scanline we're on. */
279
280int scanline;
281
282uint8 GameMemBlock[131072] __attribute__ ((aligned (4)));
283uint8 NTARAM[0x800] __attribute__ ((aligned (4)));
284uint8 PALRAM[0x20] __attribute__ ((aligned (4)));
285#if !defined(ASM_6502) || defined(DEBUG_ASM_6502)
286uint8 RAM[0x800] __attribute__ ((aligned (4)));
287#endif
288
289uint8 PPU[4];
290uint8 PPUSPL;
291
292uint8 PAL=0;
293
294
295#define MMC5BGVRAMADR(V) &MMC5BGVPage[(V)>>10][(V)]
296#define VRAMADR(V) &VPage[(V)>>10][(V)]
297
298static int linestartts;
299static int tofix=0;
300
301static uint8 *Plinef;
302
303extern uint8 sprlinebuf[256+8];
304extern int32 sphitx;
305extern uint8 sphitdata;
306
307extern int spork; /* spork the world. Any sprites on this line?
308 Then this will be set to 1. Needed for zapper
309 emulation and *gasp* sprite emulation.
310 */
311
312static void ResetRL(uint8 *target)
313{
314 if(InputScanlineHook)
315 InputScanlineHook(0,0,0,0);
316 Plinef=target;
317 linestartts=timestamp*48+X6502_GetCycleCount();
318 tofix=1;
319}
320
321static INLINE void Fixit1(void);
322
323/* faking FCEUPPU_LineUpdate() from later versions of the emu */
324static void FakedLineUpdate(void)
325{
326 #define TOFIXNUM (272-0x4)
327 int lastpixel;
328
329 if (scanline >= 240) return;
330
331 if (tofix || sphitx != 0x100)
332 {
333 lastpixel = (timestamp*48-linestartts)>>4;
334 if (PAL) lastpixel += lastpixel>>4;
335 //printf("lastpixel: %i\n", lastpixel);
336 }
337
338 if (tofix && lastpixel>=TOFIXNUM)
339 {
340 Fixit1();
341 tofix=0;
342 }
343
344 // CheckSpriteHit()
345 if(sphitx!=0x100)
346 {
347 int l=lastpixel-16;
348 int x;
349
350 for(x=sphitx;x<(sphitx+8) && x<l;x++)
351 {
352 if((sphitdata&(0x80>>(x-sphitx))) && !(Plinef[x]&64))
353 {
354 PPU_status|=0x40;
355 sphitx=0x100;
356 break;
357 }
358 }
359 }
360}
361
362
363static DECLFW(BRAML)
364{
365 RAM[A]=V;
366}
367
368static DECLFW(BRAMH)
369{
370 RAM[A&0x7FF]=V;
371}
372
373static DECLFR(ARAML)
374{
375 return RAM[A];
376}
377
378static DECLFR(ARAMH)
379{
380 return RAM[A&0x7FF];
381}
382
383
384static DECLFR(A2002)
385{
386 /* merged */
387 uint8 ret;
388
389 FakedLineUpdate();
390 ret = PPU_status;
391 ret|=PPUGenLatch&0x1F;
392 vtoggle=0;
393 PPU_status&=0x7F;
394 PPUGenLatch=ret;
395 //dprintf("r [2002] %02x",ret);
396 return ret;
397}
398
399static DECLFR(A200x)
400{
401 /* merged */
402 FakedLineUpdate();
403 return PPUGenLatch;
404}
405
406static DECLFR(A2007)
407{
408 /* merged */
409 uint8 ret;
410 uint32 tmp=RefreshAddr&0x3FFF;
411
412 FakedLineUpdate();
413
414 ret=VRAMBuffer;
415
416 if(PPU_hook) PPU_hook(tmp);
417 PPUGenLatch=VRAMBuffer;
418 if(tmp<0x2000)
419 {
420 VRAMBuffer=VPage[tmp>>10][tmp];
421 }
422 else
423 {
424 VRAMBuffer=vnapage[(tmp>>10)&0x3][tmp&0x3FF];
425 }
426
427 if (INC32) RefreshAddr+=32;
428 else RefreshAddr++;
429 if(PPU_hook) PPU_hook(RefreshAddr&0x3fff);
430 dprintf("r [2007] %02x",ret);
431 return ret;
432}
433
434static DECLFW(B2000)
435{
436 /* NMI2? */
437 FakedLineUpdate();
438 PPUGenLatch=V;
439 PPU[0]=V;
440 TempAddr&=0xF3FF;
441 TempAddr|=(V&3)<<10;
442}
443
444static DECLFW(B2001)
445{
446 /* merged */
447 FakedLineUpdate();
448 PPUGenLatch=V;
449 PPU[1]=V;
450 if(V&0xE0)
451 deemp=V>>5;
452 //printf("$%04x:$%02x, %d\n",X.PC,V,scanline);
453}
454
455static DECLFW(B2002)
456{
457 /* merged */
458 PPUGenLatch=V;
459}
460
461static DECLFW(B2003)
462{
463 /* merged */
464 PPUGenLatch=V;
465 PPU[3]=V;
466 PPUSPL=V&0x7;
467}
468
469static DECLFW(B2004)
470{
471 /* merged */
472 PPUGenLatch=V;
473 if(PPUSPL>=8)
474 {
475 if(PPU[3]>=8)
476 SPRAM[PPU[3]]=V;
477 }
478 else
479 {
480 //printf("$%02x:$%02x\n",PPUSPL,V);
481 SPRAM[PPUSPL]=V;
482 }
483 PPU[3]++;
484 PPUSPL++;
485
486}
487
488static DECLFW(B2005)
489{
490 /* merged */
491 uint32 tmp=TempAddr;
492 FakedLineUpdate();
493 PPUGenLatch=V;
494 if (!vtoggle)
495 {
496 tmp&=0xFFE0;
497 tmp|=V>>3;
498 XOffset=V&7;
499 }
500 else
501 {
502 tmp&=0x8C1F;
503 tmp|=((V&~0x7)<<2);
504 tmp|=(V&7)<<12;
505 }
506
507 TempAddr=tmp;
508 vtoggle^=1;
509}
510
511static DECLFW(B2006)
512{
513 /* merged */
514 FakedLineUpdate();
515
516 PPUGenLatch=V;
517 if(!vtoggle)
518 {
519 TempAddr&=0x00FF;
520 TempAddr|=(V&0x3f)<<8;
521 }
522 else
523 {
524 TempAddr&=0xFF00;
525 TempAddr|=V;
526
527 RefreshAddr=TempAddr;
528 if(PPU_hook)
529 PPU_hook(RefreshAddr);
530 }
531 vtoggle^=1;
532}
533
534static DECLFW(B2007)
535{
536 /* merged */
537 uint32 tmp=RefreshAddr&0x3FFF;
538 PPUGenLatch=V;
539 if(tmp>=0x3F00)
540 {
541 // hmmm....
542 if(!(tmp&0xf))
543 PALRAM[0x00]=PALRAM[0x04]=PALRAM[0x08]=PALRAM[0x0C]=V&0x3f;
544 else if(tmp&3) PALRAM[(tmp&0x1f)]=V&0x3f;
545 }
546 else if(tmp<0x2000)
547 {
548 if(PPUCHRRAM&(1<<(tmp>>10)))
549 VPage[tmp>>10][tmp]=V;
550 }
551 else
552 {
553 if(PPUNTARAM&(1<<((tmp&0xF00)>>10)))
554 vnapage[((tmp&0xF00)>>10)][tmp&0x3FF]=V;
555 }
556 if (INC32) RefreshAddr+=32;
557 else RefreshAddr++;
558 if(PPU_hook) PPU_hook(RefreshAddr&0x3fff);
559}
560
561static DECLFW(B4014)
562{
563 uint32 t=V<<8;
564 int x;
565
566 for(x=0;x<256;x++)
567 B2004(0x2004,X.DB=ARead[t+x](t+x));
568 X6502_AddCycles(512);
569}
570
571void BGRender(uint8 *target)
572{
573 uint32 tem, vofs;
574 vofs=((PPU[0]&0x10)<<8) | ((RefreshAddr>>12)&7);
575
576 Pal[0]|=64;
577 Pal[4]|=64;
578 Pal[8]|=64;
579 Pal[0xC]|=64;
580 RefreshLine(target-XOffset, vofs);
581 Pal[0]&=63;
582 Pal[4]&=63;
583 Pal[8]&=63;
584 Pal[0xC]&=63;
585
586 if(!(PPU[1]&2))
587 {
588 tem=Pal[0]|0x40;
589 tem|=tem<<8;
590 tem|=tem<<16;
591 *(uint32 *)target=*(uint32 *)(target+4)=tem;
592 }
593}
594
595#ifdef FRAMESKIP
596int FSkip=0;
597void FCEUI_FrameSkip(int x)
598{
599 FSkip=x;
600}
601#endif
602
603/* This is called at the beginning of each visible scanline */
604static void LineUpdate(uint8 *target)
605{
606 uint32 tem;
607
608 if(FSkip || scanline < FSettings.FirstSLine || scanline > FSettings.LastSLine)
609 {
610 if(PPU_hook)
611 PRefreshLine();
612 }
613 else
614 {
615 if(ScreenON)
616 {
617 BGRender(target);
618 }
619 else
620 {
621 tem=Pal[0]|0x40;
622 tem|=tem << 8;
623 tem|=tem << 16;
624 FCEU_dwmemset(target,tem,256);
625 }
626 }
627
628 if(InputScanlineHook)
629 InputScanlineHook(target,spork?sprlinebuf:0,linestartts,256);
630}
631
632
633static void LineUpdateEnd(uint8 *target)
634{
635#ifdef GP2X
636 if(ScreenON || SpriteON) // Yes, very el-cheapo.
637 {
638 if(PPU[1]&0x01)
639 block_and(target, 256, 0x30);
640 }
641 if((PPU[1]>>5)==0x7)
642 block_or(target, 256, 0xc0);
643 else if(PPU[1]&0xE0)
644 block_or(target, 256, 0x40);
645 else
646 block_andor(target, 256, 0x3f, 0x80);
647#else
648 int x;
649
650 if(ScreenON || SpriteON) // Yes, very el-cheapo.
651 {
652 if(PPU[1]&0x01)
653 {
654 for(x=63;x>=0;x--)
655 *(uint32 *)&target[x<<2]=(*(uint32*)&target[x<<2])&0x30303030;
656 }
657 }
658 if((PPU[1]>>5)==0x7)
659 {
660 for(x=63;x>=0;x--)
661 *(uint32 *)&target[x<<2]=((*(uint32*)&target[x<<2])&0x3f3f3f3f)|0xc0c0c0c0;
662 }
663 else if(PPU[1]&0xE0)
664 for(x=63;x>=0;x--)
665 *(uint32 *)&target[x<<2]=(*(uint32*)&target[x<<2])|0x40404040;
666 else
667 for(x=63;x>=0;x--)
668 *(uint32 *)&target[x<<2]=((*(uint32*)&target[x<<2])&0x3f3f3f3f)|0x80808080;
669#endif
670
671 // black borders
672 ((uint32 *)target)[-2]=((uint32 *)target)[-1]=0;
673 ((uint32 *)target)[64]=((uint32 *)target)[65]=0;
674}
675
676#define PAL(c) ((c)+cc)
677
678
679static void PRefreshLine(void)
680{
681 uint32 vofs;
682 uint8 X1;
683
684 vofs = 0;
685 if (BGAdrHI) vofs = 0x1000;
686
687 vofs+=(RefreshAddr>>12)&7;
688
689 for(X1=33;X1;X1--)
690 {
691 register uint8 no;
692 register uint8 zz2;
693 zz2=(uint8)((RefreshAddr>>10)&3);
694 PPU_hook(0x2000|(RefreshAddr&0xFFF));
695 no = vnapage[zz2][(RefreshAddr&0x3ff)];
696 PPU_hook((no<<4)+vofs);
697 if((RefreshAddr&0x1f)==0x1f)
698 RefreshAddr^=0x41F;
699 else
700 RefreshAddr++;
701 }
702}
703
704/* This high-level graphics MMC5 emulation code was written
705 for MMC5 carts in "CL" mode. It's probably not totally
706 correct for carts in "SL" mode.
707 */
708static void RefreshLine_MMC5Hack1(uint8 *P, uint32 vofs)
709{
710 int8 tochange, X1;
711
712 tochange=MMC5HackSPMode&0x1F;
713
714 for(X1=33;X1;X1--,P+=8)
715 {
716 uint8 *C;
717 uint8 cc,zz,zz2;
718 uint32 vadr;
719
720 if((tochange<=0 && MMC5HackSPMode&0x40) ||
721 (tochange>0 && !(MMC5HackSPMode&0x40)))
722 {
723 uint8 xs,ys;
724
725 xs=33-X1;
726 ys=((scanline>>3)+MMC5HackSPScroll)&0x1F;
727 if(ys>=0x1E) ys-=0x1E;
728 vadr=(MMC5HackExNTARAMPtr[xs|(ys<<5)]<<4)+(vofs&7);
729
730 C = MMC5HackVROMPTR+vadr;
731 C += ((MMC5HackSPPage & 0x3f & MMC5HackVROMMask) << 12);
732
733 cc=MMC5HackExNTARAMPtr[0x3c0+(xs>>2)+((ys&0x1C)<<1)];
734 cc=((cc >> ((xs&2) + ((ys&0x2)<<1))) &3) <<2;
735 }
736 else
737 {
738 zz=RefreshAddr&0x1F;
739 zz2=(RefreshAddr>>10)&3;
740 vadr=(vnapage[zz2][RefreshAddr&0x3ff]<<4)+vofs;
741 C = MMC5BGVRAMADR(vadr);
742 cc=vnapage[zz2][0x3c0+(zz>>2)+((RefreshAddr&0x380)>>4)];
743 cc=((cc >> ((zz&2) + ((RefreshAddr&0x40)>>4))) &3) <<2;
744 }
745 #include "fceline.h"
746
747 if((RefreshAddr&0x1f)==0x1f)
748 RefreshAddr^=0x41F;
749 else
750 RefreshAddr++;
751 tochange--;
752 }
753}
754
755static void RefreshLine_MMC5Hack2(uint8 *P, uint32 vofs)
756{
757 int8 tochange, X1;
758
759 tochange=MMC5HackSPMode&0x1F;
760
761 for(X1=33;X1;X1--,P+=8)
762 {
763 uint8 *C;
764 uint8 cc;
765 uint8 zz2;
766 uint32 vadr;
767
768 if((tochange<=0 && MMC5HackSPMode&0x40) ||
769 (tochange>0 && !(MMC5HackSPMode&0x40)))
770 {
771 uint8 xs,ys;
772
773 xs=33-X1;
774 ys=((scanline>>3)+MMC5HackSPScroll)&0x1F;
775 if(ys>=0x1E) ys-=0x1E;
776 vadr=(MMC5HackExNTARAMPtr[xs|(ys<<5)]<<4)+(vofs&7);
777
778 C = MMC5HackVROMPTR+vadr;
779 C += ((MMC5HackSPPage & 0x3f & MMC5HackVROMMask) << 12);
780
781 cc=MMC5HackExNTARAMPtr[0x3c0+(xs>>2)+((ys&0x1C)<<1)];
782 cc=((cc >> ((xs&2) + ((ys&0x2)<<1))) &3) <<2;
783 }
784 else
785 {
786 C=MMC5HackVROMPTR;
787 zz2=(RefreshAddr>>10)&3;
788 vadr = (vnapage[zz2][RefreshAddr & 0x3ff] << 4) + vofs;
789 C += (((MMC5HackExNTARAMPtr[RefreshAddr & 0x3ff]) & 0x3f &
790 MMC5HackVROMMask) << 12) + (vadr & 0xfff);
791 vadr = (MMC5HackExNTARAMPtr[RefreshAddr & 0x3ff] & 0xC0)>> 4;
792 cc = vadr;
793 }
794 #include "fceline.h"
795 if((RefreshAddr&0x1f)==0x1f)
796 RefreshAddr^=0x41F;
797 else
798 RefreshAddr++;
799 tochange--;
800 }
801}
802
803static void RefreshLine_MMC5Hack3(uint8 *P, uint32 vofs)
804{
805 int8 X1;
806
807 for(X1=33;X1;X1--,P+=8)
808 {
809 uint8 *C;
810 uint8 cc;
811 uint8 zz2;
812 uint32 vadr;
813
814 C=MMC5HackVROMPTR;
815 zz2=(RefreshAddr>>10)&3;
816 vadr = (vnapage[zz2][RefreshAddr & 0x3ff] << 4) + vofs;
817 C += (((MMC5HackExNTARAMPtr[RefreshAddr & 0x3ff]) & 0x3f &
818 MMC5HackVROMMask) << 12) + (vadr & 0xfff);
819 vadr = (MMC5HackExNTARAMPtr[RefreshAddr & 0x3ff] & 0xC0)>> 4;
820 cc = vadr;
821
822 #include "fceline.h"
823 if((RefreshAddr&0x1f)==0x1f)
824 RefreshAddr^=0x41F;
825 else
826 RefreshAddr++;
827 }
828}
829
830static void RefreshLine_MMC5Hack4(uint8 *P, uint32 vofs)
831{
832 int8 X1;
833
834 for(X1=33;X1;X1--,P+=8)
835 {
836 uint8 *C;
837 uint8 cc,zz,zz2;
838 uint32 vadr;
839
840 zz=RefreshAddr&0x1F;
841 zz2=(RefreshAddr>>10)&3;
842 vadr=(vnapage[zz2][RefreshAddr&0x3ff]<<4)+vofs;
843 C = MMC5BGVRAMADR(vadr);
844 cc=vnapage[zz2][0x3c0+(zz>>2)+((RefreshAddr&0x380)>>4)];
845 cc=((cc >> ((zz&2) + ((RefreshAddr&0x40)>>4))) &3) <<2;
846
847 #include "fceline.h"
848
849 if((RefreshAddr&0x1f)==0x1f)
850 RefreshAddr^=0x41F;
851 else
852 RefreshAddr++;
853 }
854}
855
856static void RefreshLine_PPU_hook(uint8 *P, uint32 vofs)
857{
858 int8 X1;
859
860 for(X1=33;X1;X1--,P+=8)
861 {
862 uint8 *C;
863 uint8 cc,zz,zz2;
864 uint32 vadr;
865
866 zz=RefreshAddr&0x1F;
867 zz2=(RefreshAddr>>10)&3;
868 PPU_hook(0x2000|(RefreshAddr&0xFFF));
869 cc=vnapage[zz2][0x3c0+(zz>>2)+((RefreshAddr&0x380)>>4)];
870 cc=((cc >> ((zz&2) + ((RefreshAddr&0x40)>>4))) &3) <<2;
871 vadr=(vnapage[zz2][RefreshAddr&0x3ff]<<4)+vofs;
872 C = VRAMADR(vadr);
873
874 #include "fceline.h"
875
876 PPU_hook(vadr);
877
878 if((RefreshAddr&0x1f)==0x1f)
879 RefreshAddr^=0x41F;
880 else
881 RefreshAddr++;
882 }
883}
884
885static void RefreshLine_normal(uint8 *P, uint32 vofs) // vofs is 0x107 max
886{
887 int8 X1;
888 uint32 rfraddr = RefreshAddr;
889 uint8 *page = vnapage[(rfraddr>>10)&3];
890 uint32 cc2=0;
891
892 if ((rfraddr&0xc)!=0)
893 cc2=*(uint32 *) (page + ((rfraddr&0x380)>>4) + ((rfraddr&0x10)>>2) + 0x3c0);
894
895 for (X1=33;X1;X1--,P+=8)
896 {
897 uint8 cc,*C;
898 uint32 vadr;
899
900 vadr=(page[rfraddr&0x3ff]<<4)+vofs;
901 C = VRAMADR(vadr);
902 if ((rfraddr&0xc)==0)
903 cc2=*(uint32 *) (page + ((rfraddr&0x380)>>4) + ((rfraddr&0x10)>>2) + 0x3c0);
904 cc=((cc2 >> ((rfraddr&2) + ((rfraddr&0x40)>>4) + ((rfraddr&0xc)<<1))) & 3) << 2;
905
906 #include "fceline.h"
907
908 if((rfraddr&0x1f)==0x1f) {
909 rfraddr^=0x41F;
910 page = vnapage[(rfraddr>>10)&3];
911 } else
912 rfraddr++;
913 }
914 RefreshAddr = rfraddr;
915}
916
917static void SetRefreshLine(void)
918{
919 if(MMC5Hack && geniestage!=1)
920 {
921 if(MMC5HackCHRMode==0 && (MMC5HackSPMode&0x80))
922 {
923 if (RefreshLine != RefreshLine_MMC5Hack1) printf("set refr RefreshLine_MMC5Hack1\n");
924 RefreshLine = RefreshLine_MMC5Hack1;
925 }
926 else if(MMC5HackCHRMode==1 && (MMC5HackSPMode&0x80))
927 {
928 if (RefreshLine != RefreshLine_MMC5Hack2) printf("set refr RefreshLine_MMC5Hack2\n");
929 RefreshLine = RefreshLine_MMC5Hack2;
930 }
931 else if(MMC5HackCHRMode==1)
932 {
933 if (RefreshLine != RefreshLine_MMC5Hack3) printf("set refr RefreshLine_MMC5Hack3\n");
934 RefreshLine = RefreshLine_MMC5Hack3;
935 }
936 else
937 {
938 if (RefreshLine != RefreshLine_MMC5Hack4) printf("set refr RefreshLine_MMC5Hack4\n");
939 RefreshLine = RefreshLine_MMC5Hack4;
940 }
941 } // End if(MMC5Hack)
942 else if(PPU_hook)
943 {
944 if (RefreshLine != RefreshLine_PPU_hook) printf("set refr RefreshLine_PPU_hook\n");
945 RefreshLine = RefreshLine_PPU_hook;
946 }
947 else
948 {
949 if (RefreshLine != RefreshLine_normal) printf("set refr RefreshLine_normal\n");
950 RefreshLine = RefreshLine_normal;
951 }
952}
953
954static INLINE
955void Fixit2(void)
956{
957 if(ScreenON || SpriteON)
958 {
959 uint32 rad=RefreshAddr;
960 rad&=0xFBE0;
961 rad|=TempAddr&0x041f;
962 RefreshAddr=rad;
963 //PPU_hook(RefreshAddr,-1);
964 }
965}
966
967static INLINE
968void Fixit1(void)
969{
970 if(ScreenON || SpriteON)
971 {
972 uint32 rad=RefreshAddr;
973
974 if((rad&0x7000)==0x7000)
975 {
976 rad^=0x7000;
977 if((rad&0x3E0)==0x3A0)
978 {
979 rad^=0x3A0;
980 rad^=0x800;
981 }
982 else
983 {
984 if((rad&0x3E0)==0x3e0)
985 rad^=0x3e0;
986 else rad+=0x20;
987 }
988 }
989 else
990 rad+=0x1000;
991 RefreshAddr=rad;
992 //PPU_hook(RefreshAddr,-1);
993 }
994}
995
996
997// ============================//
998// end of new code
999// ===========================//
1000
1001void ResetMapping(void)
1002{
1003 int x;
1004
1005 SetReadHandler(0x0000,0xFFFF,ANull);
1006 SetWriteHandler(0x0000,0xFFFF,BNull);
1007
1008 SetReadHandler(0,0x7FF,ARAML);
1009 SetWriteHandler(0,0x7FF,BRAML);
1010
1011 SetReadHandler(0x800,0x1FFF,ARAMH); /* Part of a little */
1012 SetWriteHandler(0x800,0x1FFF,BRAMH); /* hack for a small speed boost. */
1013
1014 for(x=0x2000;x<0x4000;x+=8)
1015 {
1016 ARead[x]=A200x;
1017 BWrite[x]=B2000;
1018 ARead[x+1]=A200x;
1019 BWrite[x+1]=B2001;
1020 ARead[x+2]=A2002;
1021 BWrite[x+2]=B2002;
1022 ARead[x+3]=A200x;
1023 BWrite[x+3]=B2003;
1024 ARead[x+4]=A200x;
1025 BWrite[x+4]=B2004;
1026 ARead[x+5]=A200x;
1027 BWrite[x+5]=B2005;
1028 ARead[x+6]=A200x;
1029 BWrite[x+6]=B2006;
1030 ARead[x+7]=A2007;
1031 BWrite[x+7]=B2007;
1032 }
1033
1034 BWrite[0x4014]=B4014;
1035 SetNESSoundMap();
1036 InitializeInput();
1037}
1038
1039int GameLoaded=0;
1040void CloseGame(void)
1041{
1042 FCEUI_StopMovie();
1043 if(GameLoaded)
1044 {
1045 if(FCEUGameInfo.type!=GIT_NSF)
1046 FCEU_FlushGameCheats(0,0);
1047 #ifdef NETWORK
1048 if(FSettings.NetworkPlay) KillNetplay();
1049 #endif
1050 GameInterface(GI_CLOSE, 0);
1051 CloseGenie();
1052 GameLoaded=0;
1053 }
1054}
1055
1056void ResetGameLoaded(void)
1057{
1058 if(GameLoaded) CloseGame();
1059 GameStateRestore=0;
1060 PPU_hook=0;
1061 GameHBIRQHook=GameHBIRQHook2=0;
1062 GameExpSound.Fill=0;
1063 GameExpSound.RChange=0;
1064 if(GameExpSound.Kill)
1065 GameExpSound.Kill();
1066 GameExpSound.Kill=0;
1067 MapIRQHook=0;
1068 MMC5Hack=0;
1069 PAL&=1;
1070 pale=0;
1071
1072 FCEUGameInfo.name=0;
1073 FCEUGameInfo.type=GIT_CART;
1074 FCEUGameInfo.vidsys=GIV_USER;
1075 FCEUGameInfo.input[0]=FCEUGameInfo.input[1]=-1;
1076 FCEUGameInfo.inputfc=-1;
1077}
1078
1079char lastLoadedGameName [2048];
1080int LoadGameLastError = 0;
1081int UNIFLoad(const char *name, int fp);
1082int iNESLoad(const char *name, int fp);
1083int FDSLoad(const char *name, int fp);
1084int NSFLoad(int fp);
1085
1086FCEUGI *FCEUI_LoadGame(char *name)
1087{
1088 char name2[512];
1089 int have_movie = 0;
1090 int fp;
1091
1092 //Exit=1;
1093 LoadGameLastError = 0;
1094 ResetGameLoaded();
1095
1096 strncpy(name2, name, sizeof(name2));
1097 name2[sizeof(name2)-1] = 0;
1098
1099 fp=FCEU_fopen(name2,"rb");
1100 if(!fp)
1101 {
1102 FCEU_PrintError("Error opening \"%s\"!",name);
1103 LoadGameLastError = 1;
1104 return 0;
1105 }
1106
1107 {
1108 char *p = name2 + strlen(name2) - 4;
1109 if (strcmp(p, ".fcm") == 0)
1110 {
1111 // movie detected
1112 printf("movie detected\n");
1113 FCEU_fclose(fp);
1114 *p = 0;
1115 fp=FCEU_fopen(name2,"rb");
1116 if (!fp && p - name2 > 2) p[-2] = 0;
1117 fp=FCEU_fopen(name2,"rb");
1118 if (!fp) {
1119 printf("no ROM for movie\n");
1120 LoadGameLastError = 2;
1121 return 0;
1122 }
1123 have_movie = 1;
1124 }
1125 }
1126
1127 GetFileBase(name2);
1128 if(iNESLoad(name2,fp))
1129 goto endlseq;
1130 if(NSFLoad(fp))
1131 goto endlseq;
1132 if(FDSLoad(name2,fp))
1133 goto endlseq;
1134 if(UNIFLoad(name2,fp))
1135 goto endlseq;
1136
1137 FCEU_PrintError("An error occurred while loading the file.");
1138 FCEU_fclose(fp);
1139 // format handlers may set LoadGameLastError themselves.
1140 if (LoadGameLastError == 0) LoadGameLastError = 3;
1141 return 0;
1142
1143 endlseq:
1144 FCEU_fclose(fp);
1145 GameLoaded=1;
1146
1147 FCEU_ResetVidSys();
1148 if(FCEUGameInfo.type!=GIT_NSF)
1149 if(FSettings.GameGenie)
1150 OpenGenie();
1151
1152 PowerNES();
1153 #ifdef NETWORK
1154 if(FSettings.NetworkPlay) InitNetplay();
1155 #endif
1156 SaveStateRefresh();
1157 if(FCEUGameInfo.type!=GIT_NSF)
1158 {
1159 FCEU_LoadGamePalette();
1160 FCEU_LoadGameCheats(0);
1161 }
1162
1163 FCEU_ResetPalette();
1164 Exit=0;
1165
1166 if (have_movie)
1167 FCEUI_LoadMovie(name, 1);
1168
1169 strcpy(lastLoadedGameName, name2);
1170
1171 return(&FCEUGameInfo);
1172}
1173
1174
1175void FCEU_ResetVidSys(void)
1176{
1177 int w;
1178
1179 if(FCEUGameInfo.vidsys==GIV_NTSC)
1180 w=0;
1181 else if(FCEUGameInfo.vidsys==GIV_PAL)
1182 w=1;
1183 else
1184 w=FSettings.PAL;
1185
1186 if(w)
1187 {
1188 PAL=1;
1189 FSettings.FirstSLine=FSettings.UsrFirstSLine[1];
1190 FSettings.LastSLine=FSettings.UsrLastSLine[1];
1191 }
1192 else
1193 {
1194 PAL=0;
1195 FSettings.FirstSLine=FSettings.UsrFirstSLine[0];
1196 FSettings.LastSLine=FSettings.UsrLastSLine[0];
1197 }
1198 printf("ResetVidSys: PAL = %i\n", PAL);
1199 SetSoundVariables();
1200}
1201
1202int FCEUI_Initialize(void)
1203{
1204 if(!InitVirtualVideo())
1205 return 0;
1206 memset(&FSettings,0,sizeof(FSettings));
1207 FSettings.UsrFirstSLine[0]=8;
1208 FSettings.UsrFirstSLine[1]=0;
1209 FSettings.UsrLastSLine[0]=FSettings.UsrLastSLine[1]=239;
1210 FSettings.SoundVolume=100;
1211 return 1;
1212}
1213
1214void MMC5_hb(int); /* Ugh ugh ugh. */
1215static void DoLine(void)
1216{
1217 uint8 *target=XBuf+scanline*320+32;
1218
1219 LineUpdate(target);
1220
1221 if(MMC5Hack && (ScreenON || SpriteON)) MMC5_hb(scanline);
1222
1223 X6502_Run(256);
1224
1225 // check: Battletoads & Double Dragon, Addams Family
1226 // sky glitches in SMB1 if done wrong
1227 FakedLineUpdate();
1228
1229#ifdef FRAMESKIP
1230 if(!FSkip)
1231#endif
1232 if(scanline>=FSettings.FirstSLine && scanline<=FSettings.LastSLine)
1233 {
1234 if(SpriteON && spork)
1235 CopySprites(target);
1236
1237 LineUpdateEnd(target);
1238 }
1239 sphitx=0x100;
1240
1241 if(ScreenON || SpriteON)
1242 FetchSpriteData();
1243
1244 // DoHBlank();
1245 if(GameHBIRQHook && (ScreenON || SpriteON) && ((PPU[0]&0x38)!=0x18))
1246 {
1247 X6502_Run(6);
1248 Fixit2();
1249 X6502_Run(4);
1250 GameHBIRQHook();
1251 X6502_Run(85-10-16);
1252 }
1253 else
1254 {
1255 X6502_Run(6); // Tried 65, caused problems with Slalom(maybe others)
1256 Fixit2();
1257 X6502_Run(85-6-16);
1258 }
1259
1260 if(SpriteON)
1261 RefreshSprites();
1262 if(GameHBIRQHook2 && (ScreenON || SpriteON))
1263 GameHBIRQHook2();
1264 scanline++;
1265 if (scanline<240)
1266 ResetRL(XBuf+scanline*320+32);
1267 X6502_Run(16);
1268}
1269
1270
1271void EmLoop(void)
1272{
1273 for(;;)
1274 {
1275 int x;
1276 uint32 scanlines_per_frame = PAL ? 312 : 262;
1277 UpdateInput();
1278 FCEU_ApplyPeriodicCheats();
1279
1280 // FCEUPPU_Loop:
1281 if(ppudead) /* Needed for Knight Rider, possibly others. */
1282 {
1283 //memset(XBuf, 0, 320*240);
1284 X6502_Run(scanlines_per_frame*(256+85));
1285 ppudead--;
1286 goto update;
1287 }
1288
1289 X6502_Run(256+85);
1290
1291 PPU[2]|=0x80;
1292 PPU[3]=PPUSPL=0; /* Not sure if this is correct. According
1293 to Matt Conte and my own tests, it is. Timing is probably
1294 off, though. NOTE: Not having this here
1295 breaks a Super Donkey Kong game. */
1296
1297 X6502_Run(12); /* I need to figure out the true nature and length
1298 of this delay.
1299 */
1300 if(FCEUGameInfo.type==GIT_NSF)
1301 DoNSFFrame();
1302 else if(VBlankON)
1303 TriggerNMI();
1304
1305 // Note: this is needed for asm core
1306 // Warning: using 'scanline' var here breaks Castlevania III
1307 {
1308 int lines;
1309 X6502_Run(256+85-12);
1310 for (lines=scanlines_per_frame-242-1;lines;lines--)
1311 X6502_Run(256+85);
1312 }
1313 // X6502_Run((scanlines_per_frame-242)*(256+85)-12);
1314 PPU_status&=0x1f;
1315 X6502_Run(256);
1316
1317 {
1318 if(ScreenON || SpriteON)
1319 {
1320 if(GameHBIRQHook)
1321 GameHBIRQHook();
1322 if(PPU_hook)
1323 for(x=0;x<42;x++) {PPU_hook(0x2000); PPU_hook(0);} // ugh
1324 if(GameHBIRQHook2)
1325 GameHBIRQHook2();
1326 }
1327
1328 X6502_Run(85-16);
1329
1330 if(ScreenON || SpriteON)
1331 {
1332 RefreshAddr=TempAddr;
1333 if(PPU_hook) PPU_hook(RefreshAddr&0x3fff);
1334 }
1335 spork=0;
1336 ResetRL(XBuf+32);
1337
1338 X6502_Run(16-kook);
1339 kook ^= 1;
1340 }
1341
1342 if(FCEUGameInfo.type==GIT_NSF)
1343 {
1344 // run scanlines for asm core to fuction
1345 for(scanline=0;scanline<240;scanline++)
1346 X6502_Run(256+85);
1347 }
1348 else
1349 {
1350 int x,max,maxref;
1351
1352 deemp=PPU[1]>>5;
1353 SetRefreshLine();
1354 for(scanline=0;scanline<240;) // scanline is incremented in DoLine. Evil. :/
1355 {
1356 deempcnt[deemp]++;
1357 DoLine();
1358 }
1359 if(MMC5Hack && (ScreenON || SpriteON)) MMC5_hb(scanline);
1360 for(x=1,max=0,maxref=0;x<7;x++)
1361 {
1362 if(deempcnt[x]>max)
1363 {
1364 max=deempcnt[x];
1365 maxref=x;
1366 }
1367 deempcnt[x]=0;
1368 }
1369 SetNESDeemph(maxref,0);
1370 }
1371
1372update:
1373 {
1374 int ssize;
1375
1376 ssize=FlushEmulateSound();
1377
1378 timestampbase += timestamp;
1379 timestamp = 0;
1380
1381 #ifdef FRAMESKIP
1382 if(FSkip)
1383 {
1384 FCEU_PutImageDummy();
1385 FSkip--;
1386 FCEUD_Update(0,WaveFinalMono,ssize);
1387 }
1388 else
1389 #endif
1390 {
1391 FCEU_PutImage();
1392 FCEUD_Update(XBuf+8,WaveFinalMono,ssize);
1393 }
1394 }
1395
1396 if(Exit)
1397 {
1398 //CloseGame();
1399 break;
1400 }
1401
1402 } // for
1403}
1404
1405#ifdef FPS
1406#include <sys/time.h>
1407uint64 frcount;
1408#endif
1409void FCEUI_Emulate(void)
1410{
1411 #ifdef FPS
1412 uint64 starttime,end;
1413 struct timeval tv;
1414 frcount=0;
1415 gettimeofday(&tv,0);
1416 starttime=((uint64)tv.tv_sec*1000000)+tv.tv_usec;
1417 #endif
1418 EmLoop();
1419
1420 #ifdef FPS
1421 // Probably won't work well on Windows port; for
1422 // debugging/speed testing.
1423 {
1424 uint64 w;
1425 int i,frac;
1426 gettimeofday(&tv,0);
1427 end=((uint64)tv.tv_sec*1000000)+tv.tv_usec;
1428 w=frcount*10000000000LL/(end-starttime);
1429 i=w/10000;
1430 frac=w-i*10000;
1431 printf("Average FPS: %d.%04d\n",i,frac);
1432 }
1433 #endif
1434
1435}
1436
1437void FCEUI_CloseGame(void)
1438{
1439 Exit=1;
1440}
1441
1442static void ResetPPU(void)
1443{
1444 VRAMBuffer=PPU[0]=PPU[1]=PPU[2]=PPU[3]=0;
1445 PPUSPL=0;
1446 PPUGenLatch=0;
1447 RefreshAddr=TempAddr=0;
1448 vtoggle = 0;
1449 ppudead = 2;
1450 kook = 0;
1451}
1452
1453static void PowerPPU(void)
1454{
1455 memset(NTARAM,0x00,0x800);
1456 memset(PALRAM,0x00,0x20);
1457 memset(SPRAM,0x00,0x100);
1458 ResetPPU();
1459}
1460
1461void ResetNES(void)
1462{
1463 if(!GameLoaded) return;
1464 GameInterface(GI_RESETM2, 0);
1465 ResetSound();
1466 ResetPPU();
1467 X6502_Reset();
1468}
1469
1470static void FCEU_MemoryRand(uint8 *ptr, uint32 size)
1471{
1472 int x=0;
1473 while(size)
1474 {
1475 *ptr=(x&4)?0xFF:0x00;
1476 x++;
1477 size--;
1478 ptr++;
1479 }
1480}
1481
1482void PowerNES(void)
1483{
1484 if(!GameLoaded) return;
1485
1486 FCEU_CheatResetRAM();
1487 FCEU_CheatAddRAM(2,0,RAM);
1488
1489 GeniePower();
1490
1491#ifndef DEBUG_ASM_6502
1492 FCEU_MemoryRand(RAM,0x800);
1493#else
1494 memset(RAM,0x00,0x800);
1495#endif
1496 ResetMapping();
1497 GameInterface(GI_POWER, 0);
1498 PowerSound();
1499 PowerPPU();
1500 timestampbase=0;
1501#ifdef ASM_6502
1502 if (geniestage)
1503 GenieSetPages(0);
1504#endif
1505 X6502_Power();
1506}
1507
1508
1509/* savestate stuff */
1510uint16 TempAddrT,RefreshAddrT;
1511
1512SFORMAT FCEUPPU_STATEINFO[]={
1513 { NTARAM, 0x800, "NTAR"},
1514 { PALRAM, 0x20, "PRAM"},
1515 { SPRAM, 0x100, "SPRA"},
1516 { PPU, 0x4, "PPUR"},
1517 { &XOffset, 1, "XOFF"},
1518 { &vtoggle, 1, "VTOG"},
1519 { &RefreshAddrT, 2|RLSB, "RADD"},
1520 { &TempAddrT, 2|RLSB, "TADD"},
1521 { &VRAMBuffer, 1, "VBUF"},
1522 { &PPUGenLatch, 1, "PGEN"},
1523 // from 0.98.15
1524 { &kook, 1, "KOOK"},
1525 { &ppudead, 1, "DEAD"},
1526 { &PPUSPL, 1, "PSPL"},
1527 { 0 }
1528 };
1529
1530
ARM optimized FCE Ultra port