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 |
54 | static void (*RefreshLine)(uint8 *P, uint32 vofs) = NULL; |
c62d2810 |
55 | static void PRefreshLine(void); |
5232c20c |
56 | |
c62d2810 |
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; |
15300263 |
66 | uint8 MMC5HackCHRMode=0; |
c62d2810 |
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 | |
5232c20c |
85 | int tosprite=256; |
c62d2810 |
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 | |
c62d2810 |
202 | |
203 | /* scanline is equal to the current visible scanline we're on. */ |
204 | |
205 | int scanline; |
206 | static uint32 scanlines_per_frame; |
207 | |
9115e7d2 |
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 | |
c62d2810 |
213 | uint8 PPU[4]; |
214 | uint8 PPUSPL; |
215 | |
c62d2810 |
216 | uint8 PAL=0; |
217 | |
5232c20c |
218 | |
c62d2810 |
219 | #define MMC5BGVRAMADR(V) &MMC5BGVPage[(V)>>10][(V)] |
220 | #define VRAMADR(V) &VPage[(V)>>10][(V)] |
15300263 |
221 | |
c62d2810 |
222 | static DECLFW(BRAML) |
15300263 |
223 | { |
c62d2810 |
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 | |
15300263 |
242 | |
c62d2810 |
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); |
15300263 |
264 | if(tmp<0x2000) |
c62d2810 |
265 | { |
266 | VRAMBuffer=VPage[tmp>>10][tmp]; |
267 | } |
15300263 |
268 | else |
c62d2810 |
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]++; |
5232c20c |
324 | |
c62d2810 |
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) |
15300263 |
370 | { |
c62d2810 |
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 |
15300263 |
388 | { |
c62d2810 |
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) |
15300263 |
398 | { |
c62d2810 |
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 | |
5232c20c |
406 | void BGRender(uint8 *target) |
c62d2810 |
407 | { |
4a1bf31b |
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 | |
c62d2810 |
421 | if(!(PPU[1]&2)) |
422 | { |
9115e7d2 |
423 | tem=Pal[0]|0x40; |
424 | tem|=tem<<8; |
425 | tem|=tem<<16; |
c62d2810 |
426 | *(uint32 *)target=*(uint32 *)(target+4)=tem; |
427 | } |
428 | } |
429 | |
430 | #ifdef FRAMESKIP |
15300263 |
431 | int FSkip_setting=-1; // auto |
5232c20c |
432 | int FSkip=0; |
c62d2810 |
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<<8)+(scanline<<4)+8; |
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) |
15300263 |
482 | { |
c62d2810 |
483 | for(x=63;x>=0;x--) |
484 | *(uint32 *)&target[x<<2]=(*(uint32*)&target[x<<2])&0xF0F0F0F0; |
485 | } |
486 | if((PPU[1]>>5)==0x7) |
487 | for(x=63;x>=0;x--) |
488 | *(uint32 *)&target[x<<2]=((*(uint32*)&target[x<<2])&0x3f3f3f3f)|0x40404040; |
489 | else if(PPU[1]&0xE0) |
490 | for(x=63;x>=0;x--) |
491 | *(uint32 *)&target[x<<2]=(*(uint32*)&target[x<<2])|0xC0C0C0C0; |
492 | else |
493 | for(x=63;x>=0;x--) |
494 | *(uint32 *)&target[x<<2]=(*(uint32*)&target[x<<2])&0x3f3f3f3f; |
495 | |
496 | #ifdef FRAMESKIP |
497 | } |
498 | #endif |
499 | } |
500 | else |
501 | { |
502 | tem=Pal[0]|(Pal[0]<<8)|(Pal[0]<<16)|(Pal[0]<<24); |
503 | FCEU_dwmemset(target,tem,256); |
15300263 |
504 | } |
c62d2810 |
505 | if(InputScanlineHook) |
506 | InputScanlineHook(target, scanline); |
507 | } |
508 | |
509 | #define PAL(c) ((c)+cc) |
510 | |
511 | |
512 | static void PRefreshLine(void) |
513 | { |
514 | uint32 vofs; |
515 | uint8 X1; |
516 | |
517 | vofs = 0; |
518 | if (BGAdrHI) vofs = 0x1000; |
519 | |
520 | vofs+=(RefreshAddr>>12)&7; |
521 | |
522 | for(X1=33;X1;X1--) |
523 | { |
524 | register uint8 no; |
525 | register uint8 zz2; |
526 | zz2=(uint8)((RefreshAddr>>10)&3); |
527 | PPU_hook(0x2000|(RefreshAddr&0xFFF)); |
528 | no = vnapage[zz2][(RefreshAddr&0x3ff)]; |
529 | PPU_hook((no<<4)+vofs); |
530 | if((RefreshAddr&0x1f)==0x1f) |
531 | RefreshAddr^=0x41F; |
532 | else |
533 | RefreshAddr++; |
534 | } |
535 | } |
536 | |
4a1bf31b |
537 | /* This high-level graphics MMC5 emulation code was written |
538 | for MMC5 carts in "CL" mode. It's probably not totally |
539 | correct for carts in "SL" mode. |
540 | */ |
541 | static void RefreshLine_MMC5Hack1(uint8 *P, uint32 vofs) |
c62d2810 |
542 | { |
4a1bf31b |
543 | int8 tochange, X1; |
c62d2810 |
544 | |
545 | tochange=MMC5HackSPMode&0x1F; |
546 | |
547 | for(X1=33;X1;X1--,P+=8) |
548 | { |
549 | uint8 *C; |
5232c20c |
550 | uint8 cc,zz,zz2; |
c62d2810 |
551 | uint32 vadr; |
552 | |
15300263 |
553 | if((tochange<=0 && MMC5HackSPMode&0x40) || |
c62d2810 |
554 | (tochange>0 && !(MMC5HackSPMode&0x40))) |
555 | { |
556 | uint8 xs,ys; |
557 | |
15300263 |
558 | xs=33-X1; |
c62d2810 |
559 | ys=((scanline>>3)+MMC5HackSPScroll)&0x1F; |
560 | if(ys>=0x1E) ys-=0x1E; |
561 | vadr=(MMC5HackExNTARAMPtr[xs|(ys<<5)]<<4)+(vofs&7); |
562 | |
563 | C = MMC5HackVROMPTR+vadr; |
564 | C += ((MMC5HackSPPage & 0x3f & MMC5HackVROMMask) << 12); |
565 | |
566 | cc=MMC5HackExNTARAMPtr[0x3c0+(xs>>2)+((ys&0x1C)<<1)]; |
567 | cc=((cc >> ((xs&2) + ((ys&0x2)<<1))) &3) <<2; |
568 | } |
569 | else |
570 | { |
571 | zz=RefreshAddr&0x1F; |
572 | zz2=(RefreshAddr>>10)&3; |
573 | vadr=(vnapage[zz2][RefreshAddr&0x3ff]<<4)+vofs; |
574 | C = MMC5BGVRAMADR(vadr); |
575 | cc=vnapage[zz2][0x3c0+(zz>>2)+((RefreshAddr&0x380)>>4)]; |
576 | cc=((cc >> ((zz&2) + ((RefreshAddr&0x40)>>4))) &3) <<2; |
577 | } |
578 | #include "fceline.h" |
579 | |
580 | if((RefreshAddr&0x1f)==0x1f) |
581 | RefreshAddr^=0x41F; |
582 | else |
583 | RefreshAddr++; |
584 | tochange--; |
585 | } |
4a1bf31b |
586 | } |
587 | |
588 | static void RefreshLine_MMC5Hack2(uint8 *P, uint32 vofs) |
589 | { |
590 | int8 tochange, X1; |
c62d2810 |
591 | |
592 | tochange=MMC5HackSPMode&0x1F; |
593 | |
594 | for(X1=33;X1;X1--,P+=8) |
595 | { |
596 | uint8 *C; |
5232c20c |
597 | uint8 cc; |
598 | uint8 zz2; |
c62d2810 |
599 | uint32 vadr; |
600 | |
601 | if((tochange<=0 && MMC5HackSPMode&0x40) || |
602 | (tochange>0 && !(MMC5HackSPMode&0x40))) |
603 | { |
604 | uint8 xs,ys; |
605 | |
15300263 |
606 | xs=33-X1; |
c62d2810 |
607 | ys=((scanline>>3)+MMC5HackSPScroll)&0x1F; |
608 | if(ys>=0x1E) ys-=0x1E; |
609 | vadr=(MMC5HackExNTARAMPtr[xs|(ys<<5)]<<4)+(vofs&7); |
610 | |
611 | C = MMC5HackVROMPTR+vadr; |
612 | C += ((MMC5HackSPPage & 0x3f & MMC5HackVROMMask) << 12); |
613 | |
614 | cc=MMC5HackExNTARAMPtr[0x3c0+(xs>>2)+((ys&0x1C)<<1)]; |
615 | cc=((cc >> ((xs&2) + ((ys&0x2)<<1))) &3) <<2; |
616 | } |
617 | else |
618 | { |
619 | C=MMC5HackVROMPTR; |
620 | zz2=(RefreshAddr>>10)&3; |
621 | vadr = (vnapage[zz2][RefreshAddr & 0x3ff] << 4) + vofs; |
622 | C += (((MMC5HackExNTARAMPtr[RefreshAddr & 0x3ff]) & 0x3f & |
623 | MMC5HackVROMMask) << 12) + (vadr & 0xfff); |
624 | vadr = (MMC5HackExNTARAMPtr[RefreshAddr & 0x3ff] & 0xC0)>> 4; |
625 | cc = vadr; |
626 | } |
627 | #include "fceline.h" |
628 | if((RefreshAddr&0x1f)==0x1f) |
629 | RefreshAddr^=0x41F; |
630 | else |
631 | RefreshAddr++; |
632 | tochange--; |
633 | } |
4a1bf31b |
634 | } |
635 | |
636 | static void RefreshLine_MMC5Hack3(uint8 *P, uint32 vofs) |
637 | { |
638 | int8 X1; |
c62d2810 |
639 | |
c62d2810 |
640 | for(X1=33;X1;X1--,P+=8) |
641 | { |
15300263 |
642 | uint8 *C; |
5232c20c |
643 | uint8 cc; |
644 | uint8 zz2; |
15300263 |
645 | uint32 vadr; |
c62d2810 |
646 | |
647 | C=MMC5HackVROMPTR; |
648 | zz2=(RefreshAddr>>10)&3; |
649 | vadr = (vnapage[zz2][RefreshAddr & 0x3ff] << 4) + vofs; |
15300263 |
650 | C += (((MMC5HackExNTARAMPtr[RefreshAddr & 0x3ff]) & 0x3f & |
c62d2810 |
651 | MMC5HackVROMMask) << 12) + (vadr & 0xfff); |
652 | vadr = (MMC5HackExNTARAMPtr[RefreshAddr & 0x3ff] & 0xC0)>> 4; |
653 | cc = vadr; |
654 | |
655 | #include "fceline.h" |
656 | if((RefreshAddr&0x1f)==0x1f) |
657 | RefreshAddr^=0x41F; |
658 | else |
659 | RefreshAddr++; |
660 | } |
4a1bf31b |
661 | } |
662 | |
663 | static void RefreshLine_MMC5Hack4(uint8 *P, uint32 vofs) |
664 | { |
665 | int8 X1; |
666 | |
c62d2810 |
667 | for(X1=33;X1;X1--,P+=8) |
668 | { |
669 | uint8 *C; |
5232c20c |
670 | uint8 cc,zz,zz2; |
c62d2810 |
671 | uint32 vadr; |
672 | |
673 | zz=RefreshAddr&0x1F; |
674 | zz2=(RefreshAddr>>10)&3; |
675 | vadr=(vnapage[zz2][RefreshAddr&0x3ff]<<4)+vofs; |
676 | C = MMC5BGVRAMADR(vadr); |
677 | cc=vnapage[zz2][0x3c0+(zz>>2)+((RefreshAddr&0x380)>>4)]; |
678 | cc=((cc >> ((zz&2) + ((RefreshAddr&0x40)>>4))) &3) <<2; |
679 | |
680 | #include "fceline.h" |
15300263 |
681 | |
c62d2810 |
682 | if((RefreshAddr&0x1f)==0x1f) |
683 | RefreshAddr^=0x41F; |
684 | else |
685 | RefreshAddr++; |
15300263 |
686 | } |
4a1bf31b |
687 | } |
688 | |
689 | static void RefreshLine_PPU_hook(uint8 *P, uint32 vofs) |
690 | { |
691 | int8 X1; |
c62d2810 |
692 | |
c62d2810 |
693 | for(X1=33;X1;X1--,P+=8) |
694 | { |
15300263 |
695 | uint8 *C; |
5232c20c |
696 | uint8 cc,zz,zz2; |
15300263 |
697 | uint32 vadr; |
c62d2810 |
698 | |
699 | zz=RefreshAddr&0x1F; |
700 | zz2=(RefreshAddr>>10)&3; |
701 | PPU_hook(0x2000|(RefreshAddr&0xFFF)); |
702 | cc=vnapage[zz2][0x3c0+(zz>>2)+((RefreshAddr&0x380)>>4)]; |
703 | cc=((cc >> ((zz&2) + ((RefreshAddr&0x40)>>4))) &3) <<2; |
704 | vadr=(vnapage[zz2][RefreshAddr&0x3ff]<<4)+vofs; |
705 | C = VRAMADR(vadr); |
706 | |
707 | #include "fceline.h" |
708 | |
709 | PPU_hook(vadr); |
710 | |
711 | if((RefreshAddr&0x1f)==0x1f) |
712 | RefreshAddr^=0x41F; |
713 | else |
714 | RefreshAddr++; |
715 | } |
4a1bf31b |
716 | } |
717 | |
9115e7d2 |
718 | static void RefreshLine_normal(uint8 *P, uint32 vofs) // vofs is 0x107 max |
4a1bf31b |
719 | { |
720 | int8 X1; |
9115e7d2 |
721 | uint32 rfraddr = RefreshAddr; |
722 | uint8 *page = vnapage[(rfraddr>>10)&3]; |
723 | uint32 cc2=0; |
4a1bf31b |
724 | |
9115e7d2 |
725 | if ((rfraddr&0xc)!=0) |
726 | cc2=*(uint32 *) (page + ((rfraddr&0x380)>>4) + ((rfraddr&0x10)>>2) + 0x3c0); |
727 | |
728 | for (X1=33;X1;X1--,P+=8) |
c62d2810 |
729 | { |
9115e7d2 |
730 | uint8 cc,*C; |
c62d2810 |
731 | uint32 vadr; |
732 | |
9115e7d2 |
733 | vadr=(page[rfraddr&0x3ff]<<4)+vofs; |
c62d2810 |
734 | C = VRAMADR(vadr); |
9115e7d2 |
735 | if ((rfraddr&0xc)==0) |
736 | cc2=*(uint32 *) (page + ((rfraddr&0x380)>>4) + ((rfraddr&0x10)>>2) + 0x3c0); |
737 | cc=((cc2 >> ((rfraddr&2) + ((rfraddr&0x40)>>4) + ((rfraddr&0xc)<<1))) & 3) << 2; |
4a1bf31b |
738 | |
9115e7d2 |
739 | #include "fceline.h" |
15300263 |
740 | |
9115e7d2 |
741 | if((rfraddr&0x1f)==0x1f) { |
742 | rfraddr^=0x41F; |
743 | page = vnapage[(rfraddr>>10)&3]; |
744 | } else |
745 | rfraddr++; |
c62d2810 |
746 | } |
9115e7d2 |
747 | RefreshAddr = rfraddr; |
4a1bf31b |
748 | } |
c62d2810 |
749 | |
4a1bf31b |
750 | static void SetRefreshLine(void) |
751 | { |
752 | if(MMC5Hack && geniestage!=1) |
753 | { |
754 | if(MMC5HackCHRMode==0 && (MMC5HackSPMode&0x80)) |
755 | { |
756 | if (RefreshLine != RefreshLine_MMC5Hack1) printf("set refr RefreshLine_MMC5Hack1\n"); |
757 | RefreshLine = RefreshLine_MMC5Hack1; |
758 | } |
759 | else if(MMC5HackCHRMode==1 && (MMC5HackSPMode&0x80)) |
760 | { |
761 | if (RefreshLine != RefreshLine_MMC5Hack2) printf("set refr RefreshLine_MMC5Hack2\n"); |
762 | RefreshLine = RefreshLine_MMC5Hack2; |
763 | } |
764 | else if(MMC5HackCHRMode==1) |
765 | { |
766 | if (RefreshLine != RefreshLine_MMC5Hack3) printf("set refr RefreshLine_MMC5Hack3\n"); |
767 | RefreshLine = RefreshLine_MMC5Hack3; |
768 | } |
769 | else |
770 | { |
771 | if (RefreshLine != RefreshLine_MMC5Hack4) printf("set refr RefreshLine_MMC5Hack4\n"); |
772 | RefreshLine = RefreshLine_MMC5Hack4; |
773 | } |
774 | } // End if(MMC5Hack) |
775 | else if(PPU_hook) |
776 | { |
777 | if (RefreshLine != RefreshLine_PPU_hook) printf("set refr RefreshLine_PPU_hook\n"); |
778 | RefreshLine = RefreshLine_PPU_hook; |
779 | } |
780 | else |
781 | { |
782 | if (RefreshLine != RefreshLine_normal) printf("set refr RefreshLine_normal\n"); |
783 | RefreshLine = RefreshLine_normal; |
784 | } |
c62d2810 |
785 | } |
786 | |
787 | static INLINE void Fixit2(void) |
788 | { |
789 | if(ScreenON || SpriteON) |
790 | { |
791 | uint32 rad=RefreshAddr; |
792 | rad&=0xFBE0; |
793 | rad|=TempAddr&0x041f; |
794 | RefreshAddr=rad; |
795 | //PPU_hook(RefreshAddr,-1); |
796 | } |
797 | } |
798 | |
799 | static INLINE void Fixit1(void) |
800 | { |
801 | if(ScreenON || SpriteON) |
802 | { |
803 | uint32 rad=RefreshAddr; |
804 | |
805 | if((rad&0x7000)==0x7000) |
806 | { |
807 | rad^=0x7000; |
808 | if((rad&0x3E0)==0x3A0) |
809 | { |
810 | rad^=0x3A0; |
811 | rad^=0x800; |
812 | } |
813 | else |
814 | { |
815 | if((rad&0x3E0)==0x3e0) |
816 | rad^=0x3e0; |
817 | else rad+=0x20; |
818 | } |
819 | } |
820 | else |
821 | rad+=0x1000; |
822 | RefreshAddr=rad; |
823 | //PPU_hook(RefreshAddr,-1); |
824 | } |
825 | } |
826 | |
827 | /* This is called at the beginning of all h-blanks on visible lines. */ |
828 | static void DoHBlank(void) |
829 | { |
830 | if(ScreenON || SpriteON) |
831 | FetchSpriteData(); |
832 | if(GameHBIRQHook && (ScreenON || SpriteON)) |
833 | { |
834 | X6502_Run(12); |
835 | GameHBIRQHook(); |
836 | X6502_Run(25-12); |
837 | Fixit2(); |
838 | X6502_Run(85-25); |
839 | } |
840 | else |
841 | { |
842 | X6502_Run(25); // Tried 65, caused problems with Slalom(maybe others) |
843 | Fixit2(); |
844 | X6502_Run(85-25); |
845 | } |
846 | //PPU_hook(0,-1); |
847 | //fprintf(stderr,"%3d: $%04x\n",scanline,RefreshAddr); |
848 | } |
849 | |
c62d2810 |
850 | |
c62d2810 |
851 | |
5232c20c |
852 | // ============================// |
853 | // end of new code |
854 | // ===========================// |
c62d2810 |
855 | |
856 | void ResetMapping(void) |
857 | { |
858 | int x; |
859 | |
860 | SetReadHandler(0x0000,0xFFFF,ANull); |
861 | SetWriteHandler(0x0000,0xFFFF,BNull); |
862 | |
863 | SetReadHandler(0,0x7FF,ARAML); |
864 | SetWriteHandler(0,0x7FF,BRAML); |
865 | |
866 | SetReadHandler(0x800,0x1FFF,ARAMH); /* Part of a little */ |
867 | SetWriteHandler(0x800,0x1FFF,BRAMH); /* hack for a small speed boost. */ |
868 | |
869 | for(x=0x2000;x<0x4000;x+=8) |
870 | { |
871 | ARead[x]=A200x; |
872 | BWrite[x]=B2000; |
873 | ARead[x+1]=A200x; |
874 | BWrite[x+1]=B2001; |
875 | ARead[x+2]=A2002; |
876 | BWrite[x+2]=B2002; |
877 | ARead[x+3]=A200x; |
878 | BWrite[x+3]=B2003; |
879 | ARead[x+4]=A200x; |
880 | BWrite[x+4]=B2004; |
881 | ARead[x+5]=A200x; |
882 | BWrite[x+5]=B2005; |
883 | ARead[x+6]=A200x; |
884 | BWrite[x+6]=B2006; |
885 | ARead[x+7]=A2007; |
886 | BWrite[x+7]=B2007; |
887 | } |
888 | |
889 | BWrite[0x4014]=B4014; |
890 | SetNESSoundMap(); |
891 | InitializeInput(); |
892 | } |
893 | |
894 | int GameLoaded=0; |
895 | void CloseGame(void) |
896 | { |
897 | if(GameLoaded) |
898 | { |
899 | if(FCEUGameInfo.type!=GIT_NSF) |
900 | FlushGameCheats(); |
901 | #ifdef NETWORK |
902 | if(FSettings.NetworkPlay) KillNetplay(); |
15300263 |
903 | #endif |
c62d2810 |
904 | GameInterface(GI_CLOSE); |
905 | CloseGenie(); |
906 | GameLoaded=0; |
907 | } |
908 | } |
909 | |
910 | void ResetGameLoaded(void) |
911 | { |
912 | if(GameLoaded) CloseGame(); |
913 | GameStateRestore=0; |
914 | PPU_hook=0; |
915 | GameHBIRQHook=0; |
916 | GameExpSound.Fill=0; |
917 | GameExpSound.RChange=0; |
918 | if(GameExpSound.Kill) |
919 | GameExpSound.Kill(); |
920 | GameExpSound.Kill=0; |
921 | MapIRQHook=0; |
922 | MMC5Hack=0; |
923 | PAL&=1; |
924 | pale=0; |
925 | |
926 | FCEUGameInfo.name=0; |
927 | FCEUGameInfo.type=GIT_CART; |
928 | FCEUGameInfo.vidsys=GIV_USER; |
929 | FCEUGameInfo.input[0]=FCEUGameInfo.input[1]=-1; |
930 | FCEUGameInfo.inputfc=-1; |
931 | } |
932 | |
933 | FCEUGI *FCEUI_LoadGame(char *name) |
934 | { |
935 | int fp; |
936 | |
937 | Exit=1; |
938 | ResetGameLoaded(); |
939 | |
940 | fp=FCEU_fopen(name,"rb"); |
941 | if(!fp) |
942 | { |
943 | FCEU_PrintError("Error opening \"%s\"!",name); |
944 | return 0; |
945 | } |
946 | |
947 | GetFileBase(name); |
948 | if(iNESLoad(name,fp)) |
949 | goto endlseq; |
950 | if(NSFLoad(fp)) |
951 | goto endlseq; |
952 | if(FDSLoad(name,fp)) |
953 | goto endlseq; |
954 | if(UNIFLoad(name,fp)) |
955 | goto endlseq; |
956 | |
957 | FCEU_PrintError("An error occurred while loading the file."); |
958 | FCEU_fclose(fp); |
959 | return 0; |
960 | |
961 | endlseq: |
962 | FCEU_fclose(fp); |
15300263 |
963 | GameLoaded=1; |
c62d2810 |
964 | |
965 | FCEU_ResetVidSys(); |
966 | if(FCEUGameInfo.type!=GIT_NSF) |
967 | if(FSettings.GameGenie) |
968 | OpenGenie(); |
969 | |
970 | PowerNES(); |
971 | #ifdef NETWORK |
972 | if(FSettings.NetworkPlay) InitNetplay(); |
973 | #endif |
974 | SaveStateRefresh(); |
975 | if(FCEUGameInfo.type!=GIT_NSF) |
976 | { |
977 | LoadGamePalette(); |
978 | LoadGameCheats(); |
979 | } |
15300263 |
980 | |
c62d2810 |
981 | FCEU_ResetPalette(); |
982 | Exit=0; |
983 | return(&FCEUGameInfo); |
984 | } |
985 | |
986 | |
987 | void FCEU_ResetVidSys(void) |
988 | { |
989 | int w; |
990 | |
991 | if(FCEUGameInfo.vidsys==GIV_NTSC) |
992 | w=0; |
993 | else if(FCEUGameInfo.vidsys==GIV_PAL) |
994 | w=1; |
995 | else |
996 | w=FSettings.PAL; |
997 | |
998 | if(w) |
999 | { |
1000 | PAL=1; |
1001 | scanlines_per_frame=312; |
1002 | FSettings.FirstSLine=FSettings.UsrFirstSLine[1]; |
1003 | FSettings.LastSLine=FSettings.UsrLastSLine[1]; |
1004 | } |
1005 | else |
1006 | { |
1007 | PAL=0; |
1008 | scanlines_per_frame=262; |
1009 | FSettings.FirstSLine=FSettings.UsrFirstSLine[0]; |
1010 | FSettings.LastSLine=FSettings.UsrLastSLine[0]; |
1011 | } |
15300263 |
1012 | printf("PAL = %i\n", PAL); |
c62d2810 |
1013 | SetSoundVariables(); |
1014 | } |
1015 | |
1016 | int FCEUI_Initialize(void) |
1017 | { |
1018 | if(!InitVirtualVideo()) |
1019 | return 0; |
1020 | memset(&FSettings,0,sizeof(FSettings)); |
1021 | FSettings.UsrFirstSLine[0]=8; |
1022 | FSettings.UsrFirstSLine[1]=0; |
1023 | FSettings.UsrLastSLine[0]=FSettings.UsrLastSLine[1]=239; |
5232c20c |
1024 | FSettings.SoundVolume=65535; // 100% |
c62d2810 |
1025 | return 1; |
1026 | } |
1027 | |
1028 | #define harko 0xe //0x9 |
1029 | static INLINE void Thingo(void) |
1030 | { |
1031 | Loop6502(); |
1032 | |
1033 | if(tosprite>=256) |
15300263 |
1034 | { |
c62d2810 |
1035 | X6502_Run(256-harko); |
1036 | Fixit1(); |
1037 | X6502_Run(harko); |
1038 | } |
1039 | else |
1040 | { |
1041 | if(tosprite<=240) |
1042 | { |
1043 | X6502_Run(tosprite); |
1044 | PPU[2]|=0x40; |
1045 | X6502_Run(256-tosprite-harko); |
1046 | Fixit1(); |
1047 | X6502_Run(harko); |
1048 | } |
1049 | else |
1050 | { |
1051 | X6502_Run(256-harko); |
1052 | Fixit1(); |
1053 | X6502_Run(tosprite-(256-harko)); |
1054 | PPU[2]|=0x40; |
1055 | X6502_Run(256-tosprite); |
1056 | } |
1057 | tosprite=256; |
1058 | } |
1059 | DoHBlank(); |
1060 | } |
1061 | #undef harko |
1062 | |
1063 | void EmLoop(void) |
1064 | { |
1065 | for(;;) |
1066 | { |
1067 | ApplyPeriodicCheats(); |
1068 | X6502_Run(256+85); |
1069 | |
1070 | PPU[2]|=0x80; |
1071 | PPU[3]=PPUSPL=0; /* Not sure if this is correct. According |
1072 | to Matt Conte and my own tests, it is. Timing is probably |
1073 | off, though. NOTE: Not having this here |
1074 | breaks a Super Donkey Kong game. */ |
1075 | |
1076 | X6502_Run(12); /* I need to figure out the true nature and length |
15300263 |
1077 | of this delay. |
c62d2810 |
1078 | */ |
1079 | if(FCEUGameInfo.type==GIT_NSF) |
1080 | TriggerNMINSF(); |
1081 | else if(VBlankON) |
1082 | TriggerNMI(); |
1083 | |
15300263 |
1084 | X6502_Run((scanlines_per_frame-242)*(256+85)-12); |
c62d2810 |
1085 | |
1086 | PPU_status&=0x1f; |
1087 | |
1088 | X6502_Run(256); |
1089 | { |
1090 | static int kook=0; |
1091 | if(ScreenON || SpriteON) |
1092 | if(GameHBIRQHook) |
1093 | GameHBIRQHook(); |
1094 | |
1095 | X6502_Run(85-kook); |
1096 | kook=(kook+1)&1; |
1097 | } |
1098 | |
1099 | if(ScreenON || SpriteON) |
1100 | { |
1101 | RefreshAddr=TempAddr; |
1102 | if(PPU_hook) PPU_hook(RefreshAddr&0x3fff); |
1103 | } |
1104 | if(FCEUGameInfo.type==GIT_NSF) |
1105 | X6502_Run((256+85)*240); |
1106 | else |
1107 | { |
1108 | int x,max,maxref; |
1109 | |
1110 | deemp=PPU[1]>>5; |
4a1bf31b |
1111 | SetRefreshLine(); |
c62d2810 |
1112 | for(scanline=0;scanline<240;scanline++) |
1113 | { |
1114 | deempcnt[deemp]++; |
1115 | Thingo(); |
1116 | } |
1117 | for(x=1,max=0,maxref=0;x<7;x++) |
1118 | { |
1119 | if(deempcnt[x]>max) |
1120 | { |
1121 | max=deempcnt[x]; |
1122 | maxref=x; |
1123 | } |
1124 | deempcnt[x]=0; |
1125 | } |
1126 | //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); |
1127 | //memset(deempcnt,0,sizeof(deempcnt)); |
1128 | SetNESDeemph(maxref,0); |
1129 | } |
1130 | |
1131 | { |
1132 | int ssize; |
1133 | |
1134 | ssize=FlushEmulateSound(); |
1135 | |
1136 | #ifdef FRAMESKIP |
1137 | if(FSkip) |
1138 | { |
1139 | FCEU_PutImageDummy(); |
1140 | FSkip--; |
5232c20c |
1141 | FCEUD_Update(0,WaveFinalMono,ssize); |
c62d2810 |
1142 | } |
1143 | else |
1144 | #endif |
1145 | { |
1146 | FCEU_PutImage(); |
5232c20c |
1147 | FCEUD_Update(XBuf+8,WaveFinalMono,ssize); |
c62d2810 |
1148 | } |
1149 | UpdateInput(); |
1150 | } |
1151 | |
1152 | if(Exit) |
1153 | { |
1154 | CloseGame(); |
1155 | break; |
1156 | } |
1157 | |
1158 | } |
1159 | } |
1160 | |
1161 | #ifdef FPS |
1162 | #include <sys/time.h> |
1163 | uint64 frcount; |
1164 | #endif |
1165 | void FCEUI_Emulate(void) |
1166 | { |
1167 | #ifdef FPS |
1168 | uint64 starttime,end; |
1169 | struct timeval tv; |
1170 | frcount=0; |
1171 | gettimeofday(&tv,0); |
1172 | starttime=((uint64)tv.tv_sec*1000000)+tv.tv_usec; |
1173 | #endif |
1174 | EmLoop(); |
1175 | |
1176 | #ifdef FPS |
1177 | // Probably won't work well on Windows port; for |
1178 | // debugging/speed testing. |
1179 | { |
1180 | uint64 w; |
1181 | int i,frac; |
1182 | gettimeofday(&tv,0); |
1183 | end=((uint64)tv.tv_sec*1000000)+tv.tv_usec; |
1184 | w=frcount*10000000000LL/(end-starttime); |
1185 | i=w/10000; |
1186 | frac=w-i*10000; |
1187 | printf("Average FPS: %d.%04d\n",i,frac); |
1188 | } |
1189 | #endif |
1190 | |
1191 | } |
1192 | |
1193 | void FCEUI_CloseGame(void) |
1194 | { |
1195 | Exit=1; |
1196 | } |
1197 | |
1198 | static void ResetPPU(void) |
1199 | { |
1200 | VRAMBuffer=PPU[0]=PPU[1]=PPU[2]=PPU[3]=0; |
1201 | PPUSPL=0; |
1202 | PPUGenLatch=0; |
1203 | RefreshAddr=TempAddr=0; |
1204 | vtoggle = 0; |
1205 | } |
1206 | |
1207 | static void PowerPPU(void) |
1208 | { |
1209 | memset(NTARAM,0x00,0x800); |
1210 | memset(PALRAM,0x00,0x20); |
1211 | memset(SPRAM,0x00,0x100); |
1212 | ResetPPU(); |
1213 | } |
1214 | |
1215 | void ResetNES(void) |
1216 | { |
1217 | if(!GameLoaded || (FCEUGameInfo.type==GIT_NSF)) return; |
1218 | GameInterface(GI_RESETM2); |
1219 | ResetSound(); |
1220 | ResetPPU(); |
1221 | X6502_Reset(); |
1222 | } |
1223 | |
15300263 |
1224 | void PowerNES(void) |
c62d2810 |
1225 | { |
1226 | if(!GameLoaded) return; |
1227 | |
1228 | FCEU_CheatResetRAM(); |
1229 | FCEU_CheatAddRAM(2,0,RAM); |
1230 | |
1231 | GeniePower(); |
1232 | |
1233 | memset(RAM,0x00,0x800); |
1234 | ResetMapping(); |
1235 | GameInterface(GI_POWER); |
1236 | PowerSound(); |
1237 | PowerPPU(); |
1238 | timestampbase=0; |
1239 | X6502_Power(); |
1240 | } |
1241 | |