386f5371 |
1 | /* FCE Ultra - NES/Famicom Emulator\r |
2 | *\r |
3 | * Copyright notice for this file:\r |
4 | * Copyright (C) 2002 Xodnizel\r |
5 | *\r |
6 | * This program is free software; you can redistribute it and/or modify\r |
7 | * it under the terms of the GNU General Public License as published by\r |
8 | * the Free Software Foundation; either version 2 of the License, or\r |
9 | * (at your option) any later version.\r |
10 | *\r |
11 | * This program is distributed in the hope that it will be useful,\r |
12 | * but WITHOUT ANY WARRANTY; without even the implied warranty of\r |
13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r |
14 | * GNU General Public License for more details.\r |
15 | *\r |
16 | * You should have received a copy of the GNU General Public License\r |
17 | * along with this program; if not, write to the Free Software\r |
18 | * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA\r |
19 | */\r |
20 | \r |
21 | /* None of this code should use any of the iNES bank switching wrappers. */\r |
22 | \r |
23 | #include "mapinc.h"\r |
24 | \r |
25 | static void (*sfun)(int P);\r |
26 | static void (*psfun)(void);\r |
27 | \r |
28 | void MMC5RunSound(int Count);\r |
29 | void MMC5RunSoundHQ(void);\r |
30 | \r |
31 | static INLINE void MMC5SPRVROM_BANK1(uint32 A,uint32 V)\r |
32 | {\r |
33 | if(CHRptr[0])\r |
34 | {\r |
35 | V&=CHRmask1[0];\r |
36 | MMC5SPRVPage[(A)>>10]=&CHRptr[0][(V)<<10]-(A);\r |
37 | }\r |
38 | }\r |
39 | \r |
40 | static INLINE void MMC5BGVROM_BANK1(uint32 A,uint32 V) {if(CHRptr[0]){V&=CHRmask1[0];MMC5BGVPage[(A)>>10]=&CHRptr[0][(V)<<10]-(A);}}\r |
41 | \r |
42 | static INLINE void MMC5SPRVROM_BANK2(uint32 A,uint32 V) {if(CHRptr[0]){V&=CHRmask2[0];MMC5SPRVPage[(A)>>10]=MMC5SPRVPage[((A)>>10)+1]=&CHRptr[0][(V)<<11]-(A);}}\r |
43 | static INLINE void MMC5BGVROM_BANK2(uint32 A,uint32 V) {if(CHRptr[0]){V&=CHRmask2[0];MMC5BGVPage[(A)>>10]=MMC5BGVPage[((A)>>10)+1]=&CHRptr[0][(V)<<11]-(A);}}\r |
44 | \r |
45 | static INLINE void MMC5SPRVROM_BANK4(uint32 A,uint32 V) {if(CHRptr[0]){V&=CHRmask4[0];MMC5SPRVPage[(A)>>10]=MMC5SPRVPage[((A)>>10)+1]= MMC5SPRVPage[((A)>>10)+2]=MMC5SPRVPage[((A)>>10)+3]=&CHRptr[0][(V)<<12]-(A);}}\r |
46 | static INLINE void MMC5BGVROM_BANK4(uint32 A,uint32 V) {if(CHRptr[0]){V&=CHRmask4[0];MMC5BGVPage[(A)>>10]=MMC5BGVPage[((A)>>10)+1]=MMC5BGVPage[((A)>>10)+2]=MMC5BGVPage[((A)>>10)+3]=&CHRptr[0][(V)<<12]-(A);}}\r |
47 | \r |
48 | static INLINE void MMC5SPRVROM_BANK8(uint32 V) {if(CHRptr[0]){V&=CHRmask8[0];MMC5SPRVPage[0]=MMC5SPRVPage[1]=MMC5SPRVPage[2]=MMC5SPRVPage[3]=MMC5SPRVPage[4]=MMC5SPRVPage[5]=MMC5SPRVPage[6]=MMC5SPRVPage[7]=&CHRptr[0][(V)<<13];}}\r |
49 | static INLINE void MMC5BGVROM_BANK8(uint32 V) {if(CHRptr[0]){V&=CHRmask8[0];MMC5BGVPage[0]=MMC5BGVPage[1]=MMC5BGVPage[2]=MMC5BGVPage[3]=MMC5BGVPage[4]=MMC5BGVPage[5]=MMC5BGVPage[6]=MMC5BGVPage[7]=&CHRptr[0][(V)<<13];}}\r |
50 | \r |
51 | static uint8 PRGBanks[4];\r |
52 | static uint8 WRAMPage;\r |
53 | static uint16 CHRBanksA[8], CHRBanksB[4];\r |
54 | static uint8 WRAMMaskEnable[2];\r |
55 | uint8 mmc5ABMode; /* A=0, B=1 */\r |
56 | \r |
57 | static uint8 IRQScanline,IRQEnable;\r |
58 | static uint8 CHRMode, NTAMirroring, NTFill, ATFill;\r |
59 | \r |
60 | static uint8 MMC5IRQR;\r |
61 | static uint8 MMC5LineCounter;\r |
62 | static uint8 mmc5psize, mmc5vsize;\r |
63 | static uint8 mul[2];\r |
64 | \r |
65 | static uint8 *WRAM=NULL;\r |
66 | static uint8 *MMC5fill=NULL;\r |
67 | static uint8 *ExRAM=NULL;\r |
68 | \r |
69 | static uint8 MMC5WRAMsize;\r |
70 | static uint8 MMC5WRAMIndex[8];\r |
71 | \r |
72 | static uint8 MMC5ROMWrProtect[4];\r |
73 | static uint8 MMC5MemIn[5];\r |
74 | \r |
75 | static void MMC5CHRA(void);\r |
76 | static void MMC5CHRB(void);\r |
77 | \r |
78 | typedef struct __cartdata {\r |
79 | uint32 crc32;\r |
80 | uint8 size;\r |
81 | } cartdata;\r |
82 | \r |
83 | #define Sprite16 (PPU[0]&0x20) //Sprites 8x16/8x8 \r |
84 | //#define MMC5SPRVRAMADR(V) &MMC5SPRVPage[(V)>>10][(V)]\r |
85 | static inline uint8 * MMC5BGVRAMADR(uint32 A)\r |
86 | {\r |
87 | if(!Sprite16) {\r |
88 | if(mmc5ABMode==0)\r |
89 | return &MMC5SPRVPage[(A)>>10][(A)];\r |
90 | else \r |
91 | return &MMC5BGVPage[(A)>>10][(A)];\r |
92 | } else return &MMC5BGVPage[(A)>>10][(A)];\r |
93 | }\r |
94 | \r |
95 | static void mmc5_PPUWrite(uint32 A, uint8 V) {\r |
96 | uint32 tmp = A;\r |
97 | extern uint8 PALRAM[0x20];\r |
98 | \r |
99 | if(tmp>=0x3F00)\r |
100 | {\r |
101 | // hmmm....\r |
102 | if(!(tmp&0xf))\r |
103 | PALRAM[0x00]=PALRAM[0x04]=PALRAM[0x08]=PALRAM[0x0C]=V&0x3F;\r |
104 | else if(tmp&3) PALRAM[(tmp&0x1f)]=V&0x3f;\r |
105 | }\r |
106 | else if(tmp<0x2000)\r |
107 | {\r |
108 | if(PPUCHRRAM&(1<<(tmp>>10)))\r |
109 | VPage[tmp>>10][tmp]=V;\r |
110 | } \r |
111 | else\r |
112 | {\r |
113 | if(PPUNTARAM&(1<<((tmp&0xF00)>>10)))\r |
114 | vnapage[((tmp&0xF00)>>10)][tmp&0x3FF]=V;\r |
115 | }\r |
116 | }\r |
117 | \r |
118 | uint8 FASTCALL mmc5_PPURead(uint32 A) {\r |
119 | if(A<0x2000)\r |
120 | {\r |
121 | if(ppuphase == PPUPHASE_BG)\r |
122 | return *MMC5BGVRAMADR(A);\r |
123 | else return MMC5SPRVPage[(A)>>10][(A)];\r |
124 | }\r |
125 | else\r |
126 | { \r |
127 | return vnapage[(A>>10)&0x3][A&0x3FF];\r |
128 | }\r |
129 | }\r |
130 | \r |
131 | \r |
132 | \r |
133 | // ELROM seems to have 8KB of RAM\r |
134 | // ETROM seems to have 16KB of WRAM\r |
135 | // EWROM seems to have 32KB of WRAM\r |
136 | \r |
137 | cartdata MMC5CartList[]=\r |
138 | {\r |
139 | {0x9c18762b,2}, /* L'Empereur */\r |
140 | {0x26533405,2},\r |
141 | {0x6396b988,2},\r |
142 | {0xaca15643,2}, /* Uncharted Waters */\r |
143 | {0xfe3488d1,2}, /* Dai Koukai Jidai */\r |
144 | {0x15fe6d0f,2}, /* BKAC */\r |
145 | {0x39f2ce4b,2}, /* Suikoden */\r |
146 | {0x8ce478db,2}, /* Nobunaga's Ambition 2 */\r |
147 | {0xeee9a682,2},\r |
148 | {0xf9b4240f,2},\r |
149 | {0x1ced086f,2}, /* Ishin no Arashi */\r |
150 | {0xf540677b,4}, /* Nobunaga...Bushou Fuuun Roku */\r |
151 | {0x6f4e4312,4}, /* Aoki Ookami..Genchou */\r |
152 | {0xf011e490,4}, /* Romance of the 3 Kingdoms 2 */\r |
153 | {0x184c2124,4}, /* Sangokushi 2 */\r |
154 | {0xee8e6553,4},\r |
155 | };\r |
156 | \r |
157 | #define MMC5_NOCARTS (sizeof(MMC5CartList)/sizeof(MMC5CartList[0]))\r |
158 | int DetectMMC5WRAMSize(uint32 crc32)\r |
159 | {\r |
160 | int x;\r |
161 | for(x=0;x<MMC5_NOCARTS;x++) {\r |
162 | if(crc32==MMC5CartList[x].crc32) {\r |
163 | FCEU_printf(" >8KB external WRAM present. Use UNIF if you hack the ROM image.\n");\r |
164 | return(MMC5CartList[x].size*8);\r |
165 | }\r |
166 | }\r |
167 | \r |
168 | //mbg 04-aug-08 - previously, this was returning 8KB\r |
169 | //but I changed it to return 64 because unlisted carts are probably homebrews, and they should probably use 64 (why not use it all?)\r |
170 | //ch4 10-dec-08 - then f***ng for what all this shit above? let's give em all this 64k shit! Damn\r |
171 | // homebrew must use it's own emulators or standart features.\r |
172 | //adelikat 20-dec-08 - reverting back to return 64, sounds like it was changed back to 8 simply on principle. FCEUX is all encompassing, and that include\r |
173 | //rom-hacking. We want it to be the best emulator for such purposes. So unless return 64 harms compatibility with anything else, I see now reason not to have it\r |
174 | //mbg 29-mar-09 - I should note that mmc5 is in principle capable of 64KB, even if no real carts ever supported it.\r |
175 | //This does not in principle break any games which share this mapper, and it should be OK for homebrew.\r |
176 | //if there are games which need 8KB instead of 64KB default then lets add them to the list\r |
177 | return 64;\r |
178 | }\r |
179 | \r |
180 | static void BuildWRAMSizeTable(void)\r |
181 | {\r |
182 | int x;\r |
183 | for(x=0;x<8;x++)\r |
184 | {\r |
185 | switch(MMC5WRAMsize)\r |
186 | {\r |
187 | case 0: MMC5WRAMIndex[x]=255; break; //X,X,X,X,X,X,X,X\r |
188 | case 1: MMC5WRAMIndex[x]=(x>3)?255:0; break; //0,0,0,0,X,X,X,X\r |
189 | case 2: MMC5WRAMIndex[x]=(x&4)>>2; break; //0,0,0,0,1,1,1,1\r |
190 | case 4: MMC5WRAMIndex[x]=(x>3)?255:(x&3); break; //0,1,2,3,X,X,X,X\r |
191 | case 8: MMC5WRAMIndex[x]=x; break; //0,1,2,3,4,5,6,7,8 \r |
192 | //mbg 8/6/08 - i added this to support 64KB of wram\r |
193 | //now, I have at least one example (laser invasion) which actually uses size 1 but isnt in the crc list\r |
194 | //so, whereas before my change on 8/4/08 we would have selected size 1, now we select size 8\r |
195 | //this means that we could have just introduced an emulation bug, in case those games happened to \r |
196 | //address, say, page 3. with size 1 that would resolve to [0] but in size 8 it resolves to [3].\r |
197 | //so, you know what to do if there are problems.\r |
198 | }\r |
199 | }\r |
200 | }\r |
201 | \r |
202 | static void MMC5CHRA(void)\r |
203 | {\r |
204 | int x;\r |
205 | switch(mmc5vsize&3)\r |
206 | {\r |
207 | case 0: setchr8(CHRBanksA[7]);\r |
208 | MMC5SPRVROM_BANK8(CHRBanksA[7]);\r |
209 | break;\r |
210 | case 1: setchr4(0x0000,CHRBanksA[3]);\r |
211 | setchr4(0x1000,CHRBanksA[7]);\r |
212 | MMC5SPRVROM_BANK4(0x0000,CHRBanksA[3]);\r |
213 | MMC5SPRVROM_BANK4(0x1000,CHRBanksA[7]);\r |
214 | break;\r |
215 | case 2: setchr2(0x0000,CHRBanksA[1]);\r |
216 | setchr2(0x0800,CHRBanksA[3]);\r |
217 | setchr2(0x1000,CHRBanksA[5]);\r |
218 | setchr2(0x1800,CHRBanksA[7]);\r |
219 | MMC5SPRVROM_BANK2(0x0000,CHRBanksA[1]);\r |
220 | MMC5SPRVROM_BANK2(0x0800,CHRBanksA[3]);\r |
221 | MMC5SPRVROM_BANK2(0x1000,CHRBanksA[5]);\r |
222 | MMC5SPRVROM_BANK2(0x1800,CHRBanksA[7]);\r |
223 | break;\r |
224 | case 3: for(x=0;x<8;x++)\r |
225 | {\r |
226 | setchr1(x<<10,CHRBanksA[x]);\r |
227 | MMC5SPRVROM_BANK1(x<<10,CHRBanksA[x]);\r |
228 | }\r |
229 | break;\r |
230 | }\r |
231 | }\r |
232 | \r |
233 | static void MMC5CHRB(void)\r |
234 | {\r |
235 | int x;\r |
236 | switch(mmc5vsize&3)\r |
237 | {\r |
238 | case 0: setchr8(CHRBanksB[3]);\r |
239 | MMC5BGVROM_BANK8(CHRBanksB[3]);\r |
240 | break;\r |
241 | case 1: setchr4(0x0000,CHRBanksB[3]);\r |
242 | setchr4(0x1000,CHRBanksB[3]);\r |
243 | MMC5BGVROM_BANK4(0x0000,CHRBanksB[3]);\r |
244 | MMC5BGVROM_BANK4(0x1000,CHRBanksB[3]);\r |
245 | break;\r |
246 | case 2: setchr2(0x0000,CHRBanksB[1]);\r |
247 | setchr2(0x0800,CHRBanksB[3]);\r |
248 | setchr2(0x1000,CHRBanksB[1]);\r |
249 | setchr2(0x1800,CHRBanksB[3]);\r |
250 | MMC5BGVROM_BANK2(0x0000,CHRBanksB[1]);\r |
251 | MMC5BGVROM_BANK2(0x0800,CHRBanksB[3]);\r |
252 | MMC5BGVROM_BANK2(0x1000,CHRBanksB[1]);\r |
253 | MMC5BGVROM_BANK2(0x1800,CHRBanksB[3]);\r |
254 | break;\r |
255 | case 3: for(x=0;x<8;x++)\r |
256 | {\r |
257 | setchr1(x<<10,CHRBanksB[x&3]);\r |
258 | MMC5BGVROM_BANK1(x<<10,CHRBanksB[x&3]);\r |
259 | }\r |
260 | break;\r |
261 | }\r |
262 | }\r |
263 | \r |
264 | static void MMC5WRAM(uint32 A, uint32 V)\r |
265 | {\r |
266 | //printf("%02x\n",V);\r |
267 | V=MMC5WRAMIndex[V&7];\r |
268 | if(V!=255)\r |
269 | {\r |
270 | setprg8r(0x10,A,V);\r |
271 | MMC5MemIn[(A-0x6000)>>13]=1;\r |
272 | }\r |
273 | else\r |
274 | MMC5MemIn[(A-0x6000)>>13]=0;\r |
275 | }\r |
276 | \r |
277 | static void MMC5PRG(void)\r |
278 | {\r |
279 | int x;\r |
280 | switch(mmc5psize&3)\r |
281 | {\r |
282 | case 0: MMC5ROMWrProtect[0]=MMC5ROMWrProtect[1]=\r |
283 | MMC5ROMWrProtect[2]=MMC5ROMWrProtect[3]=1;\r |
284 | setprg32(0x8000,((PRGBanks[1]&0x7F)>>2));\r |
285 | for(x=0;x<4;x++)\r |
286 | MMC5MemIn[1+x]=1;\r |
287 | break;\r |
288 | case 1: if(PRGBanks[1]&0x80)\r |
289 | {\r |
290 | MMC5ROMWrProtect[0]=MMC5ROMWrProtect[1]=1;\r |
291 | setprg16(0x8000,(PRGBanks[1]>>1));\r |
292 | MMC5MemIn[1]=MMC5MemIn[2]=1;\r |
293 | }\r |
294 | else\r |
295 | {\r |
296 | MMC5ROMWrProtect[0]=MMC5ROMWrProtect[1]=0;\r |
297 | MMC5WRAM(0x8000,PRGBanks[1]&7&0xFE);\r |
298 | MMC5WRAM(0xA000,(PRGBanks[1]&7&0xFE)+1);\r |
299 | }\r |
300 | MMC5MemIn[3]=MMC5MemIn[4]=1;\r |
301 | MMC5ROMWrProtect[2]=MMC5ROMWrProtect[3]=1;\r |
302 | setprg16(0xC000,(PRGBanks[3]&0x7F)>>1);\r |
303 | break;\r |
304 | case 2: if(PRGBanks[1]&0x80)\r |
305 | {\r |
306 | MMC5MemIn[1]=MMC5MemIn[2]=1;\r |
307 | MMC5ROMWrProtect[0]=MMC5ROMWrProtect[1]=1;\r |
308 | setprg16(0x8000,(PRGBanks[1]&0x7F)>>1);\r |
309 | }\r |
310 | else\r |
311 | {\r |
312 | MMC5ROMWrProtect[0]=MMC5ROMWrProtect[1]=0;\r |
313 | MMC5WRAM(0x8000,PRGBanks[1]&7&0xFE);\r |
314 | MMC5WRAM(0xA000,(PRGBanks[1]&7&0xFE)+1);\r |
315 | }\r |
316 | if(PRGBanks[2]&0x80)\r |
317 | {\r |
318 | MMC5ROMWrProtect[2]=1;\r |
319 | MMC5MemIn[3]=1;\r |
320 | setprg8(0xC000,PRGBanks[2]&0x7F);\r |
321 | }\r |
322 | else\r |
323 | {\r |
324 | MMC5ROMWrProtect[2]=0;\r |
325 | MMC5WRAM(0xC000,PRGBanks[2]&7);\r |
326 | }\r |
327 | MMC5MemIn[4]=1;\r |
328 | MMC5ROMWrProtect[3]=1;\r |
329 | setprg8(0xE000,PRGBanks[3]&0x7F);\r |
330 | break;\r |
331 | case 3: for(x=0;x<3;x++)\r |
332 | if(PRGBanks[x]&0x80)\r |
333 | {\r |
334 | MMC5ROMWrProtect[x]=1;\r |
335 | setprg8(0x8000+(x<<13),PRGBanks[x]&0x7F);\r |
336 | MMC5MemIn[1+x]=1;\r |
337 | }\r |
338 | else\r |
339 | {\r |
340 | MMC5ROMWrProtect[x]=0;\r |
341 | MMC5WRAM(0x8000+(x<<13),PRGBanks[x]&7);\r |
342 | }\r |
343 | MMC5MemIn[4]=1;\r |
344 | MMC5ROMWrProtect[3]=1;\r |
345 | setprg8(0xE000,PRGBanks[3]&0x7F);\r |
346 | break;\r |
347 | }\r |
348 | }\r |
349 | \r |
350 | static DECLFW(Mapper5_write)\r |
351 | {\r |
352 | if(A>=0x5120&&A<=0x5127)\r |
353 | {\r |
354 | mmc5ABMode = 0;\r |
355 | CHRBanksA[A&7]=V | ((MMC50x5130&0x3)<<8); //if we had a test case for this then we could test this, but it hasnt been verified\r |
356 | //CHRBanksA[A&7]=V;\r |
357 | MMC5CHRA();\r |
358 | }\r |
359 | else switch(A)\r |
360 | {\r |
361 | case 0x5105: {\r |
362 | int x;\r |
363 | for(x=0;x<4;x++)\r |
364 | {\r |
365 | switch((V>>(x<<1))&3)\r |
366 | {\r |
367 | case 0:\r |
368 | PPUNTARAM|=1<<x;vnapage[x]=NTARAM;break;\r |
369 | case 1:\r |
370 | PPUNTARAM|=1<<x;vnapage[x]=NTARAM+0x400;break;\r |
371 | case 2:\r |
372 | PPUNTARAM|=1<<x;vnapage[x]=ExRAM;break;\r |
373 | case 3:\r |
374 | PPUNTARAM&=~(1<<x);vnapage[x]=MMC5fill;break;\r |
375 | }\r |
376 | }\r |
377 | }\r |
378 | NTAMirroring=V;\r |
379 | break;\r |
380 | case 0x5113: WRAMPage=V;MMC5WRAM(0x6000,V&7);break;\r |
381 | case 0x5100: mmc5psize=V;MMC5PRG();break;\r |
382 | case 0x5101: mmc5vsize=V;\r |
383 | if(!mmc5ABMode)\r |
384 | { MMC5CHRB();MMC5CHRA();}\r |
385 | else\r |
386 | { MMC5CHRA();MMC5CHRB();}\r |
387 | break;\r |
388 | case 0x5114:\r |
389 | case 0x5115:\r |
390 | case 0x5116:\r |
391 | case 0x5117: PRGBanks[A&3]=V;MMC5PRG();break;\r |
392 | case 0x5128:\r |
393 | case 0x5129:\r |
394 | case 0x512a:\r |
395 | case 0x512b: mmc5ABMode=1;\r |
396 | CHRBanksB[A&3]=V;\r |
397 | MMC5CHRB();\r |
398 | break;\r |
399 | case 0x5102: WRAMMaskEnable[0]=V;break;\r |
400 | case 0x5103: WRAMMaskEnable[1]=V;break;\r |
401 | case 0x5104: CHRMode=V;MMC5HackCHRMode=V&3;break;\r |
402 | case 0x5106: if(V!=NTFill)\r |
403 | {\r |
404 | uint32 t;\r |
405 | t=V|(V<<8)|(V<<16)|(V<<24);\r |
406 | FCEU_dwmemset(MMC5fill,t,0x3c0);\r |
407 | }\r |
408 | NTFill=V;\r |
409 | break;\r |
410 | case 0x5107: if(V!=ATFill)\r |
411 | {\r |
412 | unsigned char moop;\r |
413 | uint32 t;\r |
414 | moop=V|(V<<2)|(V<<4)|(V<<6);\r |
415 | t=moop|(moop<<8)|(moop<<16)|(moop<<24);\r |
416 | FCEU_dwmemset(MMC5fill+0x3c0,t,0x40);\r |
417 | }\r |
418 | ATFill=V;\r |
419 | break;\r |
420 | case 0x5130: MMC50x5130=V;break;\r |
421 | \r |
422 | case 0x5200: MMC5HackSPMode=V;break;\r |
423 | case 0x5201: MMC5HackSPScroll=(V>>3)&0x1F;break;\r |
424 | case 0x5202: MMC5HackSPPage=V&0x3F;break;\r |
425 | case 0x5203: X6502_IRQEnd(FCEU_IQEXT);IRQScanline=V;break;\r |
426 | case 0x5204: X6502_IRQEnd(FCEU_IQEXT);IRQEnable=V&0x80;break;\r |
427 | case 0x5205: mul[0]=V;break;\r |
428 | case 0x5206: mul[1]=V;break;\r |
429 | }\r |
430 | }\r |
431 | \r |
432 | static DECLFR(MMC5_ReadROMRAM)\r |
433 | {\r |
434 | if(MMC5MemIn[(A-0x6000)>>13])\r |
435 | return Page[A>>11][A];\r |
436 | else\r |
437 | return X.DB;\r |
438 | }\r |
439 | \r |
440 | static DECLFW(MMC5_WriteROMRAM)\r |
441 | {\r |
442 | if(A>=0x8000)\r |
443 | if(MMC5ROMWrProtect[(A-0x8000)>>13]) return;\r |
444 | if(MMC5MemIn[(A-0x6000)>>13])\r |
445 | if(((WRAMMaskEnable[0]&3)|((WRAMMaskEnable[1]&3)<<2)) == 6) \r |
446 | Page[A>>11][A]=V;\r |
447 | }\r |
448 | \r |
449 | static DECLFW(MMC5_ExRAMWr)\r |
450 | {\r |
451 | if(MMC5HackCHRMode!=3)\r |
452 | ExRAM[A&0x3ff]=V;\r |
453 | }\r |
454 | \r |
455 | static DECLFR(MMC5_ExRAMRd)\r |
456 | {\r |
457 | /* Not sure if this is correct, so I'll comment it out for now. */\r |
458 | //if(MMC5HackCHRMode>=2)\r |
459 | return ExRAM[A&0x3ff];\r |
460 | //else\r |
461 | // return(X.DB);\r |
462 | }\r |
463 | \r |
464 | static DECLFR(MMC5_read)\r |
465 | {\r |
466 | switch(A)\r |
467 | {\r |
468 | case 0x5204: X6502_IRQEnd(FCEU_IQEXT);\r |
469 | {\r |
470 | uint8 x;\r |
471 | x=MMC5IRQR;\r |
472 | if(!fceuindbg)\r |
473 | MMC5IRQR&=0x40;\r |
474 | return x;\r |
475 | }\r |
476 | case 0x5205: return (mul[0]*mul[1]);\r |
477 | case 0x5206: return ((mul[0]*mul[1])>>8);\r |
478 | }\r |
479 | return(X.DB);\r |
480 | }\r |
481 | \r |
482 | void MMC5Synco(void)\r |
483 | {\r |
484 | int x;\r |
485 | \r |
486 | MMC5PRG();\r |
487 | for(x=0;x<4;x++)\r |
488 | {\r |
489 | switch((NTAMirroring>>(x<<1))&3)\r |
490 | {\r |
491 | case 0:PPUNTARAM|=1<<x;vnapage[x]=NTARAM;break;\r |
492 | case 1:PPUNTARAM|=1<<x;vnapage[x]=NTARAM+0x400;break;\r |
493 | case 2:PPUNTARAM|=1<<x;vnapage[x]=ExRAM;break;\r |
494 | case 3:PPUNTARAM&=~(1<<x);vnapage[x]=MMC5fill;break;\r |
495 | }\r |
496 | }\r |
497 | MMC5WRAM(0x6000,WRAMPage&7);\r |
498 | if(!mmc5ABMode)\r |
499 | {\r |
500 | MMC5CHRB();\r |
501 | MMC5CHRA();\r |
502 | }\r |
503 | else\r |
504 | {\r |
505 | MMC5CHRA();\r |
506 | MMC5CHRB();\r |
507 | }\r |
508 | {\r |
509 | uint32 t;\r |
510 | t=NTFill|(NTFill<<8)|(NTFill<<16)|(NTFill<<24);\r |
511 | FCEU_dwmemset(MMC5fill,t,0x3c0);\r |
512 | }\r |
513 | {\r |
514 | unsigned char moop;\r |
515 | uint32 t;\r |
516 | moop=ATFill|(ATFill<<2)|(ATFill<<4)|(ATFill<<6);\r |
517 | t=moop|(moop<<8)|(moop<<16)|(moop<<24);\r |
518 | FCEU_dwmemset(MMC5fill+0x3c0,t,0x40);\r |
519 | }\r |
520 | X6502_IRQEnd(FCEU_IQEXT);\r |
521 | MMC5HackCHRMode=CHRMode&3;\r |
522 | }\r |
523 | \r |
524 | void MMC5_hb(int scanline)\r |
525 | {\r |
526 | if(scanline==240)\r |
527 | {\r |
528 | MMC5LineCounter=0;\r |
529 | MMC5IRQR=0x40;\r |
530 | return;\r |
531 | }\r |
532 | if(MMC5LineCounter<240)\r |
533 | {\r |
534 | if(MMC5LineCounter==IRQScanline)\r |
535 | {\r |
536 | MMC5IRQR|=0x80;\r |
537 | if(IRQEnable&0x80)\r |
538 | X6502_IRQBegin(FCEU_IQEXT);\r |
539 | }\r |
540 | MMC5LineCounter++;\r |
541 | }\r |
542 | if(MMC5LineCounter==240)\r |
543 | MMC5IRQR=0;\r |
544 | }\r |
545 | \r |
546 | void MMC5_StateRestore(int version)\r |
547 | {\r |
548 | MMC5Synco();\r |
549 | }\r |
550 | \r |
551 | typedef struct {\r |
552 | uint16 wl[2];\r |
553 | uint8 env[2];\r |
554 | uint8 enable;\r |
555 | uint8 running;\r |
556 | uint8 raw;\r |
557 | uint8 rawcontrol;\r |
558 | int32 dcount[2];\r |
559 | int32 BC[3];\r |
560 | int32 vcount[2];\r |
561 | } MMC5APU;\r |
562 | \r |
563 | static MMC5APU MMC5Sound;\r |
564 | \r |
565 | \r |
566 | static void Do5PCM()\r |
567 | {\r |
568 | int32 V;\r |
569 | int32 start,end;\r |
570 | \r |
571 | start=MMC5Sound.BC[2];\r |
572 | end=(SOUNDTS<<16)/soundtsinc;\r |
573 | if(end<=start) return;\r |
574 | MMC5Sound.BC[2]=end;\r |
575 | \r |
576 | if(!(MMC5Sound.rawcontrol&0x40) && MMC5Sound.raw)\r |
577 | for(V=start;V<end;V++)\r |
578 | Wave[V>>4]+=MMC5Sound.raw<<1;\r |
579 | }\r |
580 | \r |
581 | static void Do5PCMHQ()\r |
582 | {\r |
583 | uint32 V; //mbg merge 7/17/06 made uint32\r |
584 | if(!(MMC5Sound.rawcontrol&0x40) && MMC5Sound.raw)\r |
585 | for(V=MMC5Sound.BC[2];V<SOUNDTS;V++)\r |
586 | WaveHi[V]+=MMC5Sound.raw<<5;\r |
587 | MMC5Sound.BC[2]=SOUNDTS;\r |
588 | }\r |
589 | \r |
590 | \r |
591 | static DECLFW(Mapper5_SW)\r |
592 | {\r |
593 | A&=0x1F;\r |
594 | \r |
595 | GameExpSound.Fill=MMC5RunSound;\r |
596 | GameExpSound.HiFill=MMC5RunSoundHQ;\r |
597 | \r |
598 | switch(A)\r |
599 | {\r |
600 | case 0x10:if(psfun) psfun();MMC5Sound.rawcontrol=V;break;\r |
601 | case 0x11:if(psfun) psfun();MMC5Sound.raw=V;break;\r |
602 | \r |
603 | case 0x0:\r |
604 | case 0x4://printf("%04x:$%02x\n",A,V&0x30);\r |
605 | if(sfun) sfun(A>>2);\r |
606 | MMC5Sound.env[A>>2]=V;\r |
607 | break;\r |
608 | case 0x2:\r |
609 | case 0x6: if(sfun) sfun(A>>2);\r |
610 | MMC5Sound.wl[A>>2]&=~0x00FF;\r |
611 | MMC5Sound.wl[A>>2]|=V&0xFF;\r |
612 | break;\r |
613 | case 0x3:\r |
614 | case 0x7://printf("%04x:$%02x\n",A,V>>3);\r |
615 | MMC5Sound.wl[A>>2]&=~0x0700;\r |
616 | MMC5Sound.wl[A>>2]|=(V&0x07)<<8;\r |
617 | MMC5Sound.running|=1<<(A>>2);\r |
618 | break;\r |
619 | case 0x15:if(sfun)\r |
620 | {\r |
621 | sfun(0);\r |
622 | sfun(1);\r |
623 | }\r |
624 | MMC5Sound.running&=V;\r |
625 | MMC5Sound.enable=V;\r |
626 | //printf("%02x\n",V);\r |
627 | break;\r |
628 | }\r |
629 | }\r |
630 | \r |
631 | static void Do5SQ(int P)\r |
632 | {\r |
633 | static int tal[4]={1,2,4,6};\r |
634 | int32 V,amp,rthresh,wl;\r |
635 | int32 start,end;\r |
636 | \r |
637 | start=MMC5Sound.BC[P];\r |
638 | end=(SOUNDTS<<16)/soundtsinc;\r |
639 | if(end<=start) return;\r |
640 | MMC5Sound.BC[P]=end;\r |
641 | \r |
642 | wl=MMC5Sound.wl[P]+1;\r |
643 | amp=(MMC5Sound.env[P]&0xF)<<4;\r |
644 | rthresh=tal[(MMC5Sound.env[P]&0xC0)>>6];\r |
645 | \r |
646 | if(wl>=8 && (MMC5Sound.running&(P+1)))\r |
647 | {\r |
648 | int dc,vc;\r |
649 | \r |
650 | wl<<=18;\r |
651 | dc=MMC5Sound.dcount[P];\r |
652 | vc=MMC5Sound.vcount[P];\r |
653 | \r |
654 | for(V=start;V<end;V++)\r |
655 | {\r |
656 | if(dc<rthresh)\r |
657 | Wave[V>>4]+=amp;\r |
658 | vc-=nesincsize;\r |
659 | while(vc<=0)\r |
660 | {\r |
661 | vc+=wl;\r |
662 | dc=(dc+1)&7;\r |
663 | }\r |
664 | }\r |
665 | MMC5Sound.dcount[P]=dc;\r |
666 | MMC5Sound.vcount[P]=vc;\r |
667 | }\r |
668 | }\r |
669 | \r |
670 | static void Do5SQHQ(int P)\r |
671 | {\r |
672 | static int tal[4]={1,2,4,6};\r |
673 | uint32 V; //mbg merge 7/17/06 made uint32\r |
674 | int32 amp,rthresh,wl;\r |
675 | \r |
676 | wl=MMC5Sound.wl[P]+1;\r |
677 | amp=((MMC5Sound.env[P]&0xF)<<8);\r |
678 | rthresh=tal[(MMC5Sound.env[P]&0xC0)>>6];\r |
679 | \r |
680 | if(wl>=8 && (MMC5Sound.running&(P+1)))\r |
681 | {\r |
682 | int dc,vc;\r |
683 | \r |
684 | wl<<=1;\r |
685 | \r |
686 | dc=MMC5Sound.dcount[P];\r |
687 | vc=MMC5Sound.vcount[P];\r |
688 | for(V=MMC5Sound.BC[P];V<SOUNDTS;V++)\r |
689 | {\r |
690 | if(dc<rthresh)\r |
691 | WaveHi[V]+=amp;\r |
692 | vc--;\r |
693 | if(vc<=0) /* Less than zero when first started. */\r |
694 | {\r |
695 | vc=wl;\r |
696 | dc=(dc+1)&7;\r |
697 | }\r |
698 | }\r |
699 | MMC5Sound.dcount[P]=dc;\r |
700 | MMC5Sound.vcount[P]=vc;\r |
701 | }\r |
702 | MMC5Sound.BC[P]=SOUNDTS;\r |
703 | }\r |
704 | \r |
705 | void MMC5RunSoundHQ(void)\r |
706 | {\r |
707 | Do5SQHQ(0);\r |
708 | Do5SQHQ(1);\r |
709 | Do5PCMHQ();\r |
710 | }\r |
711 | \r |
712 | void MMC5HiSync(int32 ts)\r |
713 | {\r |
714 | int x;\r |
715 | for(x=0;x<3;x++) MMC5Sound.BC[x]=ts;\r |
716 | }\r |
717 | \r |
718 | void MMC5RunSound(int Count)\r |
719 | {\r |
720 | int x;\r |
721 | Do5SQ(0);\r |
722 | Do5SQ(1);\r |
723 | Do5PCM();\r |
724 | for(x=0;x<3;x++)\r |
725 | MMC5Sound.BC[x]=Count;\r |
726 | }\r |
727 | \r |
728 | void Mapper5_ESI(void)\r |
729 | {\r |
730 | GameExpSound.RChange=Mapper5_ESI;\r |
731 | if(FSettings.SndRate)\r |
732 | {\r |
733 | if(FSettings.soundq>=1)\r |
734 | {\r |
735 | sfun=Do5SQHQ;\r |
736 | psfun=Do5PCMHQ;\r |
737 | }\r |
738 | else\r |
739 | {\r |
740 | sfun=Do5SQ;\r |
741 | psfun=Do5PCM;\r |
742 | }\r |
743 | }\r |
744 | else\r |
745 | {\r |
746 | sfun=0;\r |
747 | psfun=0;\r |
748 | }\r |
749 | memset(MMC5Sound.BC,0,sizeof(MMC5Sound.BC));\r |
750 | memset(MMC5Sound.vcount,0,sizeof(MMC5Sound.vcount));\r |
751 | GameExpSound.HiSync=MMC5HiSync;\r |
752 | }\r |
753 | \r |
754 | void NSFMMC5_Init(void)\r |
755 | {\r |
756 | memset(&MMC5Sound,0,sizeof(MMC5Sound));\r |
757 | mul[0]=mul[1]=0;\r |
758 | ExRAM=(uint8*)FCEU_gmalloc(1024);\r |
759 | Mapper5_ESI();\r |
760 | SetWriteHandler(0x5c00,0x5fef,MMC5_ExRAMWr);\r |
761 | SetReadHandler(0x5c00,0x5fef,MMC5_ExRAMRd);\r |
762 | MMC5HackCHRMode=2;\r |
763 | SetWriteHandler(0x5000,0x5015,Mapper5_SW);\r |
764 | SetWriteHandler(0x5205,0x5206,Mapper5_write);\r |
765 | SetReadHandler(0x5205,0x5206,MMC5_read);\r |
766 | }\r |
767 | \r |
768 | void NSFMMC5_Close(void)\r |
769 | {\r |
770 | FCEU_gfree(ExRAM);\r |
771 | ExRAM=0;\r |
772 | }\r |
773 | \r |
774 | static void GenMMC5Reset(void)\r |
775 | {\r |
776 | int x;\r |
777 | \r |
778 | for(x=0;x<4;x++) PRGBanks[x]=~0;\r |
779 | for(x=0;x<8;x++) CHRBanksA[x]=~0;\r |
780 | for(x=0;x<4;x++) CHRBanksB[x]=~0;\r |
781 | WRAMMaskEnable[0]=WRAMMaskEnable[1]=~0;\r |
782 | \r |
783 | mmc5psize=mmc5vsize=3;\r |
784 | CHRMode=0;\r |
785 | \r |
786 | NTAMirroring=NTFill=ATFill=0xFF;\r |
787 | \r |
788 | MMC5Synco();\r |
789 | \r |
790 | SetWriteHandler(0x4020,0x5bff,Mapper5_write);\r |
791 | SetReadHandler(0x4020,0x5bff,MMC5_read);\r |
792 | \r |
793 | SetWriteHandler(0x5c00,0x5fff,MMC5_ExRAMWr);\r |
794 | SetReadHandler(0x5c00,0x5fff,MMC5_ExRAMRd);\r |
795 | \r |
796 | SetWriteHandler(0x6000,0xFFFF,MMC5_WriteROMRAM);\r |
797 | SetReadHandler(0x6000,0xFFFF,MMC5_ReadROMRAM);\r |
798 | \r |
799 | SetWriteHandler(0x5000,0x5015,Mapper5_SW);\r |
800 | SetWriteHandler(0x5205,0x5206,Mapper5_write);\r |
801 | SetReadHandler(0x5205,0x5206,MMC5_read);\r |
802 | \r |
803 | //GameHBIRQHook=MMC5_hb;\r |
804 | FCEU_CheatAddRAM(8,0x6000,WRAM);\r |
805 | FCEU_CheatAddRAM(1,0x5c00,ExRAM);\r |
806 | }\r |
807 | \r |
808 | static SFORMAT MMC5_StateRegs[]={\r |
809 | { PRGBanks, 4, "PRGB"},\r |
810 | { CHRBanksA, 16, "CHRA"},\r |
811 | { CHRBanksB, 8, "CHRB"},\r |
812 | { &WRAMPage, 1, "WRMP"},\r |
813 | { WRAMMaskEnable, 2, "WRME"},\r |
814 | { &mmc5ABMode, 1, "ABMD"},\r |
815 | { &IRQScanline, 1, "IRQS"},\r |
816 | { &IRQEnable, 1, "IRQE"},\r |
817 | { &CHRMode, 1, "CHRM"},\r |
818 | { &NTAMirroring, 1, "NTAM"},\r |
819 | { &NTFill, 1, "NTFL"},\r |
820 | { &ATFill, 1, "ATFL"},\r |
821 | \r |
822 | { &MMC5Sound.wl[0], 2|FCEUSTATE_RLSB, "SDW0"},\r |
823 | { &MMC5Sound.wl[1], 2|FCEUSTATE_RLSB, "SDW1"},\r |
824 | { MMC5Sound.env, 2, "SDEV"},\r |
825 | { &MMC5Sound.enable, 1, "SDEN"},\r |
826 | { &MMC5Sound.running, 1, "SDRU"},\r |
827 | { &MMC5Sound.raw, 1, "SDRW"},\r |
828 | { &MMC5Sound.rawcontrol, 1, "SDRC"},\r |
829 | {0}\r |
830 | };\r |
831 | \r |
832 | static void GenMMC5_Init(CartInfo *info, int wsize, int battery)\r |
833 | {\r |
834 | if(wsize)\r |
835 | {\r |
836 | WRAM=(uint8*)FCEU_gmalloc(wsize*1024);\r |
837 | SetupCartPRGMapping(0x10,WRAM,wsize*1024,1);\r |
838 | AddExState(WRAM, wsize*1024, 0, "WRAM");\r |
839 | }\r |
840 | \r |
841 | MMC5fill=(uint8*)FCEU_gmalloc(1024);\r |
842 | ExRAM=(uint8*)FCEU_gmalloc(1024);\r |
843 | \r |
844 | AddExState(MMC5_StateRegs, ~0, 0, 0);\r |
845 | AddExState(WRAM, wsize*1024, 0, "WRAM");\r |
846 | AddExState(ExRAM, 1024, 0, "ERAM");\r |
847 | AddExState(&MMC5HackSPMode, 1, 0, "SPLM");\r |
848 | AddExState(&MMC5HackSPScroll, 1, 0, "SPLS");\r |
849 | AddExState(&MMC5HackSPPage, 1, 0, "SPLP");\r |
850 | AddExState(&MMC50x5130, 1, 0, "5130");\r |
851 | \r |
852 | MMC5WRAMsize=wsize/8;\r |
853 | BuildWRAMSizeTable();\r |
854 | GameStateRestore=MMC5_StateRestore;\r |
855 | info->Power=GenMMC5Reset;\r |
856 | \r |
857 | if(battery)\r |
858 | {\r |
859 | info->SaveGame[0]=WRAM;\r |
860 | if(wsize<=16)\r |
861 | info->SaveGameLen[0]=8192;\r |
862 | else\r |
863 | info->SaveGameLen[0]=32768;\r |
864 | }\r |
865 | \r |
866 | MMC5HackVROMMask=CHRmask4[0];\r |
867 | MMC5HackExNTARAMPtr=ExRAM;\r |
868 | MMC5Hack=1;\r |
869 | MMC5HackVROMPTR=CHRptr[0];\r |
870 | MMC5HackCHRMode=0;\r |
871 | MMC5HackSPMode=MMC5HackSPScroll=MMC5HackSPPage=0;\r |
872 | Mapper5_ESI();\r |
873 | \r |
874 | FFCEUX_PPURead = mmc5_PPURead;\r |
875 | FFCEUX_PPUWrite = mmc5_PPUWrite;\r |
876 | }\r |
877 | \r |
878 | void Mapper5_Init(CartInfo *info)\r |
879 | {\r |
880 | GenMMC5_Init(info, DetectMMC5WRAMSize(info->CRC32), info->battery);\r |
881 | }\r |
882 | \r |
883 | // ELROM seems to have 0KB of WRAM\r |
884 | // EKROM seems to have 8KB of WRAM\r |
885 | // ETROM seems to have 16KB of WRAM\r |
886 | // EWROM seems to have 32KB of WRAM\r |
887 | \r |
888 | // ETROM and EWROM are battery-backed, EKROM isn't.\r |
889 | \r |
890 | void ETROM_Init(CartInfo *info)\r |
891 | {\r |
892 | GenMMC5_Init(info, 16,info->battery);\r |
893 | }\r |
894 | \r |
895 | void ELROM_Init(CartInfo *info)\r |
896 | {\r |
897 | GenMMC5_Init(info,0,0);\r |
898 | }\r |
899 | \r |
900 | void EWROM_Init(CartInfo *info)\r |
901 | {\r |
902 | GenMMC5_Init(info,32,info->battery);\r |
903 | }\r |
904 | \r |
905 | void EKROM_Init(CartInfo *info)\r |
906 | {\r |
907 | GenMMC5_Init(info,8,info->battery);\r |
908 | }\r |