d97315ac |
1 | #include "mapinc.h"\r |
2 | \r |
3 | static uint8 mul[2];\r |
4 | static uint8 regie;\r |
5 | #define tkcom1 mapbyte1[1]\r |
6 | #define tkcom2 mapbyte1[2]\r |
7 | #define tkcom3 mapbyte1[3]\r |
8 | \r |
9 | #define prgb mapbyte2\r |
10 | #define chr mapbyte3\r |
11 | \r |
12 | static uint16 names[4];\r |
13 | static uint8 tekker;\r |
14 | \r |
15 | static DECLFR(tekread)\r |
16 | {\r |
17 | // FCEU_printf("READ READ READ: $%04x, $%04x, $%04x\n",A,X.PC,tekker);\r |
18 | switch(A)\r |
19 | {\r |
20 | case 0x5000:return(tekker);\r |
21 | case 0x5800:return(mul[0]*mul[1]);\r |
22 | case 0x5801:return((mul[0]*mul[1])>>8);\r |
23 | case 0x5803:return(regie);\r |
24 | default:break;\r |
25 | }\r |
26 | return(X.DB);\r |
27 | }\r |
28 | \r |
29 | static void mira(void)\r |
30 | {\r |
31 | int x;\r |
32 | if(tkcom1&0x40) // Name tables are ROM-only\r |
33 | {\r |
34 | for(x=0;x<4;x++)\r |
35 | setntamem(CHRptr[0]+(((names[x])&CHRmask1[0])<<10), 0, x);\r |
36 | }\r |
37 | else // Name tables can be RAM or ROM.\r |
38 | {\r |
39 | for(x=0;x<4;x++)\r |
40 | {\r |
41 | if(((tkcom3&0x80)==(names[x]&0x80))) // RAM selected.\r |
42 | setntamem(NTARAM + ((names[x]&0x1)<<10),1,x);\r |
43 | else\r |
44 | setntamem(CHRptr[0]+(((names[x])&CHRmask1[0])<<10), 0, x);\r |
45 | }\r |
46 | }\r |
47 | }\r |
48 | \r |
49 | static void tekprom(void)\r |
50 | {\r |
51 | switch(tkcom1&3)\r |
52 | {\r |
53 | case 1: // 16 KB\r |
54 | ROM_BANK16(0x8000,prgb[0]);\r |
55 | ROM_BANK16(0xC000,prgb[2]);\r |
56 | break;\r |
57 | \r |
58 | case 2: //2 = 8 KB ??\r |
59 | ROM_BANK8(0x8000,prgb[0]);\r |
60 | ROM_BANK8(0xa000,prgb[1]);\r |
61 | ROM_BANK8(0xc000,prgb[2]);\r |
62 | ROM_BANK8(0xe000,~0);\r |
63 | break;\r |
64 | }\r |
65 | }\r |
66 | \r |
67 | static void tekvrom(void)\r |
68 | {\r |
69 | int x;\r |
70 | switch(tkcom1&0x18)\r |
71 | {\r |
72 | case 0x00: // 8KB\r |
73 | setchr8(chr[0]);\r |
74 | break;\r |
75 | case 0x08: // 4KB\r |
76 | for(x=0;x<8;x+=4)\r |
77 | setchr4(x<<10,chr[x]);\r |
78 | break;\r |
79 | case 0x10: // 2KB\r |
80 | for(x=0;x<8;x+=2)\r |
81 | setchr2(x<<10,chr[x]);\r |
82 | break;\r |
83 | case 0x18: // 1KB\r |
84 | for(x=0;x<8;x++)\r |
85 | setchr1(x<<10,chr[x]);\r |
86 | break;\r |
87 | }\r |
88 | }\r |
89 | \r |
90 | static DECLFW(Mapper211_write)\r |
91 | {\r |
92 | if(A==0x5800) mul[0]=V;\r |
93 | else if(A==0x5801) mul[1]=V;\r |
94 | else if(A==0x5803) regie=V;\r |
95 | \r |
96 | A&=0xF007;\r |
97 | if(A>=0x8000 && A<=0x8003)\r |
98 | {\r |
99 | prgb[A&3]=V;\r |
100 | tekprom();\r |
101 | }\r |
102 | else if(A>=0x9000 && A<=0x9007)\r |
103 | {\r |
104 | chr[A&7]=V;\r |
105 | tekvrom();\r |
106 | }\r |
107 | else if(A>=0xb000 && A<=0xb007)\r |
108 | {\r |
109 | names[A&3]=V&3;\r |
110 | mira();\r |
111 | }\r |
112 | else switch(A)\r |
113 | {\r |
114 | case 0xc002:IRQa=0;X6502_IRQEnd(FCEU_IQEXT);break;\r |
115 | case 0xc003:\r |
116 | case 0xc004:if(!IRQa) {IRQa=1;IRQCount=IRQLatch;} break;\r |
117 | case 0xc005:IRQCount=IRQLatch=V;\r |
118 | X6502_IRQEnd(FCEU_IQEXT);break;\r |
119 | case 0xd000: tkcom1=V; mira(); break;\r |
120 | case 0xd001: tkcom3=V; mira(); break;\r |
121 | }\r |
122 | }\r |
123 | \r |
124 | static void Mapper211_hb(void)\r |
125 | {\r |
126 | if(IRQCount) IRQCount--;\r |
127 | if(!IRQCount)\r |
128 | {\r |
129 | if(IRQa) X6502_IRQBegin(FCEU_IQEXT);\r |
130 | IRQa=0;\r |
131 | }\r |
132 | }\r |
133 | static void togglie()\r |
134 | {\r |
135 | tekker^=0xFF;\r |
136 | }\r |
137 | \r |
138 | void Mapper211_init(void)\r |
139 | {\r |
140 | tekker=0xFF;\r |
141 | MapperReset=togglie;\r |
142 | SetWriteHandler(0x5000,0xffff,Mapper211_write);\r |
143 | SetReadHandler(0x5000,0x5fff,tekread);\r |
144 | GameHBIRQHook=Mapper211_hb;\r |
145 | }\r |
146 | \r |