cff531af |
1 | /* |
2 | * mode4/SMS renderer |
3 | * (C) notaz, 2009-2010 |
4 | * |
5 | * This work is licensed under the terms of MAME license. |
6 | * See COPYING file in the top-level directory. |
7 | */ |
87b0845f |
8 | /* |
9 | * TODO: |
10 | * - TMS9918 modes? |
11 | * - gg mode? |
12 | * - column scroll (reg 0 bit7) |
13 | * - 224/240 line modes |
14 | * - doubled sprites |
15 | */ |
200772b7 |
16 | #include "pico_int.h" |
17 | |
6ccf5504 |
18 | static void (*FinalizeLineM4)(int line); |
200772b7 |
19 | static int skip_next_line; |
87b0845f |
20 | static int screen_offset; |
200772b7 |
21 | |
22 | #define PLANAR_PIXEL(x,p) \ |
23 | t = pack & (0x80808080 >> p); \ |
24 | if (t) { \ |
25 | t = ((t >> (7-p)) | (t >> (14-p)) | (t >> (21-p)) | (t >> (28-p))) & 0x0f; \ |
26 | pd[x] = pal|t; \ |
27 | } |
28 | |
29 | static int TileNormM4(int sx, int addr, int pal) |
30 | { |
99bdfd31 |
31 | unsigned char *pd = Pico.est.HighCol + sx; |
200772b7 |
32 | unsigned int pack, t; |
33 | |
88fd63ad |
34 | pack = *(unsigned int *)(PicoMem.vram + addr); /* Get 4 bitplanes / 8 pixels */ |
200772b7 |
35 | if (pack) |
36 | { |
37 | PLANAR_PIXEL(0, 0) |
38 | PLANAR_PIXEL(1, 1) |
39 | PLANAR_PIXEL(2, 2) |
40 | PLANAR_PIXEL(3, 3) |
41 | PLANAR_PIXEL(4, 4) |
42 | PLANAR_PIXEL(5, 5) |
43 | PLANAR_PIXEL(6, 6) |
44 | PLANAR_PIXEL(7, 7) |
45 | return 0; |
46 | } |
47 | |
48 | return 1; /* Tile blank */ |
49 | } |
50 | |
51 | static int TileFlipM4(int sx,int addr,int pal) |
52 | { |
99bdfd31 |
53 | unsigned char *pd = Pico.est.HighCol + sx; |
200772b7 |
54 | unsigned int pack, t; |
55 | |
88fd63ad |
56 | pack = *(unsigned int *)(PicoMem.vram + addr); /* Get 4 bitplanes / 8 pixels */ |
200772b7 |
57 | if (pack) |
58 | { |
59 | PLANAR_PIXEL(0, 7) |
60 | PLANAR_PIXEL(1, 6) |
61 | PLANAR_PIXEL(2, 5) |
62 | PLANAR_PIXEL(3, 4) |
63 | PLANAR_PIXEL(4, 3) |
64 | PLANAR_PIXEL(5, 2) |
65 | PLANAR_PIXEL(6, 1) |
66 | PLANAR_PIXEL(7, 0) |
67 | return 0; |
68 | } |
69 | |
70 | return 1; /* Tile blank */ |
71 | } |
72 | |
87b0845f |
73 | static void draw_sprites(int scanline) |
200772b7 |
74 | { |
87b0845f |
75 | struct PicoVideo *pv = &Pico.video; |
76 | unsigned int sprites_addr[8]; |
77 | unsigned int sprites_x[8]; |
78 | unsigned char *sat; |
79 | int xoff = 8; // relative to HighCol, which is (screen - 8) |
80 | int sprite_base, addr_mask; |
81 | int i, s, h; |
82 | |
83 | if (pv->reg[0] & 8) |
84 | xoff = 0; |
85 | |
88fd63ad |
86 | sat = (unsigned char *)PicoMem.vram + ((pv->reg[5] & 0x7e) << 7); |
87b0845f |
87 | if (pv->reg[1] & 2) { |
88 | addr_mask = 0xfe; h = 16; |
89 | } else { |
90 | addr_mask = 0xff; h = 8; |
91 | } |
92 | sprite_base = (pv->reg[6] & 4) << (13-2-1); |
93 | |
1c25c32c |
94 | for (i = s = 0; i < 64; i++) |
87b0845f |
95 | { |
96 | int y; |
97 | y = sat[i] + 1; |
98 | if (y == 0xd1) |
99 | break; |
100 | if (y + h <= scanline || scanline < y) |
101 | continue; // not on this line |
1c25c32c |
102 | if (s >= 8) { |
103 | pv->status |= SR_SOVR; |
104 | break; |
105 | } |
87b0845f |
106 | |
107 | sprites_x[s] = xoff + sat[0x80 + i*2]; |
108 | sprites_addr[s] = sprite_base + ((sat[0x80 + i*2 + 1] & addr_mask) << (5-1)) + |
109 | ((scanline - y) << (2-1)); |
110 | s++; |
111 | } |
112 | |
1c25c32c |
113 | // really half-assed but better than nothing |
114 | if (s > 1) |
115 | pv->status |= SR_C; |
116 | |
87b0845f |
117 | // now draw all sprites backwards |
118 | for (--s; s >= 0; s--) |
119 | TileNormM4(sprites_x[s], sprites_addr[s], 0x10); |
120 | } |
121 | |
122 | // tilex_ty_prio merged to reduce register pressure |
123 | static void draw_strip(const unsigned short *nametab, int dx, int cells, int tilex_ty_prio) |
200772b7 |
124 | { |
87b0845f |
125 | int oldcode = -1, blank = -1; // The tile we know is blank |
126 | int addr = 0, pal = 0; |
200772b7 |
127 | |
128 | // Draw tiles across screen: |
87b0845f |
129 | for (; cells > 0; dx += 8, tilex_ty_prio++, cells--) |
200772b7 |
130 | { |
87b0845f |
131 | int code, zero; |
200772b7 |
132 | |
87b0845f |
133 | code = nametab[tilex_ty_prio & 0x1f]; |
134 | if (code == blank) |
135 | continue; |
136 | if ((code ^ tilex_ty_prio) & 0x1000) // priority differs? |
137 | continue; |
200772b7 |
138 | |
87b0845f |
139 | if (code != oldcode) { |
200772b7 |
140 | oldcode = code; |
141 | // Get tile address/2: |
87b0845f |
142 | addr = (code & 0x1ff) << 4; |
143 | addr += tilex_ty_prio >> 16; |
144 | if (code & 0x0400) |
145 | addr ^= 0xe; // Y-flip |
200772b7 |
146 | |
87b0845f |
147 | pal = (code>>7) & 0x10; |
200772b7 |
148 | } |
149 | |
87b0845f |
150 | if (code&0x0200) zero = TileFlipM4(dx, addr, pal); |
151 | else zero = TileNormM4(dx, addr, pal); |
200772b7 |
152 | |
87b0845f |
153 | if (zero) |
154 | blank = code; // We know this tile is blank now |
200772b7 |
155 | } |
156 | } |
157 | |
87b0845f |
158 | static void DrawDisplayM4(int scanline) |
200772b7 |
159 | { |
87b0845f |
160 | struct PicoVideo *pv = &Pico.video; |
161 | unsigned short *nametab; |
162 | int line, tilex, dx, ty, cells; |
163 | int cellskip = 0; // XXX |
164 | int maxcells = 32; |
200772b7 |
165 | |
166 | // Find the line in the name table |
87b0845f |
167 | line = pv->reg[9] + scanline; // vscroll + scanline |
168 | if (line >= 224) |
169 | line -= 224; |
200772b7 |
170 | |
87b0845f |
171 | // Find name table: |
88fd63ad |
172 | nametab = PicoMem.vram; |
87b0845f |
173 | nametab += (pv->reg[2] & 0x0e) << (10-1); |
174 | nametab += (line>>3) << (6-1); |
175 | |
176 | dx = pv->reg[8]; // hscroll |
177 | if (scanline < 16 && (pv->reg[0] & 0x40)) |
178 | dx = 0; // hscroll disabled for top 2 rows |
179 | |
180 | tilex = ((-dx >> 3) + cellskip) & 0x1f; |
181 | ty = (line & 7) << 1; // Y-Offset into tile |
182 | cells = maxcells - cellskip; |
183 | |
184 | dx = ((dx - 1) & 7) + 1; |
185 | if (dx != 8) |
186 | cells++; // have hscroll, need to draw 1 cell more |
187 | dx += cellskip << 3; |
188 | |
189 | // low priority tiles |
e0bcb7a9 |
190 | if (!(pv->debug_p & PVD_KILL_B)) |
87b0845f |
191 | draw_strip(nametab, dx, cells, tilex | 0x0000 | (ty << 16)); |
192 | |
193 | // sprites |
e0bcb7a9 |
194 | if (!(pv->debug_p & PVD_KILL_S_LO)) |
87b0845f |
195 | draw_sprites(scanline); |
196 | |
197 | // high priority tiles (use virtual layer switch just for fun) |
e0bcb7a9 |
198 | if (!(pv->debug_p & PVD_KILL_A)) |
87b0845f |
199 | draw_strip(nametab, dx, cells, tilex | 0x1000 | (ty << 16)); |
200 | |
201 | if (pv->reg[0] & 0x20) |
202 | // first column masked |
99bdfd31 |
203 | ((int *)Pico.est.HighCol)[2] = ((int *)Pico.est.HighCol)[3] = 0xe0e0e0e0; |
200772b7 |
204 | } |
205 | |
206 | void PicoFrameStartMode4(void) |
207 | { |
19954be1 |
208 | int lines = 192; |
200772b7 |
209 | skip_next_line = 0; |
87b0845f |
210 | screen_offset = 24; |
ea38612f |
211 | Pico.est.rendstatus = PDRAW_32_COLS; |
19954be1 |
212 | |
87b0845f |
213 | if ((Pico.video.reg[0] & 6) == 6 && (Pico.video.reg[1] & 0x18)) { |
87b0845f |
214 | if (Pico.video.reg[1] & 0x08) { |
19954be1 |
215 | screen_offset = 0; |
216 | lines = 240; |
87b0845f |
217 | } |
19954be1 |
218 | else { |
87b0845f |
219 | screen_offset = 8; |
19954be1 |
220 | lines = 224; |
221 | } |
222 | } |
223 | |
ea38612f |
224 | if (Pico.est.rendstatus != rendstatus_old || lines != rendlines) { |
c7eb229a |
225 | emu_video_mode_change(screen_offset, lines, 1); |
ea38612f |
226 | rendstatus_old = Pico.est.rendstatus; |
ae87bffa |
227 | rendlines = lines; |
87b0845f |
228 | } |
5a681086 |
229 | |
99bdfd31 |
230 | Pico.est.DrawLineDest = (char *)DrawLineDestBase + screen_offset * DrawLineDestIncrement; |
200772b7 |
231 | } |
232 | |
233 | void PicoLineMode4(int line) |
234 | { |
235 | if (skip_next_line > 0) { |
236 | skip_next_line--; |
237 | return; |
238 | } |
239 | |
200772b7 |
240 | if (PicoScanBegin != NULL) |
87b0845f |
241 | skip_next_line = PicoScanBegin(line + screen_offset); |
200772b7 |
242 | |
243 | // Draw screen: |
99bdfd31 |
244 | BackFill(Pico.video.reg[7] & 0x0f, 0, &Pico.est); |
200772b7 |
245 | if (Pico.video.reg[1] & 0x40) |
87b0845f |
246 | DrawDisplayM4(line); |
200772b7 |
247 | |
248 | if (FinalizeLineM4 != NULL) |
6ccf5504 |
249 | FinalizeLineM4(line); |
200772b7 |
250 | |
251 | if (PicoScanEnd != NULL) |
87b0845f |
252 | skip_next_line = PicoScanEnd(line + screen_offset); |
5a681086 |
253 | |
99bdfd31 |
254 | Pico.est.DrawLineDest = (char *)Pico.est.DrawLineDest + DrawLineDestIncrement; |
200772b7 |
255 | } |
256 | |
257 | void PicoDoHighPal555M4(void) |
258 | { |
88fd63ad |
259 | unsigned int *spal=(void *)PicoMem.cram; |
98a27142 |
260 | unsigned int *dpal=(void *)Pico.est.HighPal; |
200772b7 |
261 | unsigned int t; |
262 | int i; |
263 | |
264 | Pico.m.dirtyPal = 0; |
265 | |
266 | /* cram is always stored as shorts, even though real hardware probably uses bytes */ |
267 | for (i = 0x20/2; i > 0; i--, spal++, dpal++) { |
268 | t = *spal; |
269 | #ifdef USE_BGR555 |
270 | t = ((t & 0x00030003)<< 3) | ((t & 0x000c000c)<<7) | ((t & 0x00300030)<<10); |
271 | #else |
272 | t = ((t & 0x00030003)<<14) | ((t & 0x000c000c)<<7) | ((t & 0x00300030)>>1); |
273 | #endif |
274 | t |= t >> 2; |
275 | t |= (t >> 4) & 0x08610861; |
276 | *dpal = t; |
277 | } |
98a27142 |
278 | Pico.est.HighPal[0xe0] = 0; |
200772b7 |
279 | } |
280 | |
6ccf5504 |
281 | static void FinalizeLineRGB555M4(int line) |
200772b7 |
282 | { |
200772b7 |
283 | if (Pico.m.dirtyPal) |
284 | PicoDoHighPal555M4(); |
285 | |
19954be1 |
286 | // standard FinalizeLine can finish it for us, |
287 | // with features like scaling and such |
ea38612f |
288 | FinalizeLine555(0, line, &Pico.est); |
200772b7 |
289 | } |
290 | |
6ccf5504 |
291 | static void FinalizeLine8bitM4(int line) |
87b0845f |
292 | { |
99bdfd31 |
293 | unsigned char *pd = Pico.est.DrawLineDest; |
19954be1 |
294 | |
295 | if (!(PicoOpt & POPT_DIS_32C_BORDER)) |
296 | pd += 32; |
297 | |
fdcfd323 |
298 | memcpy(pd, Pico.est.HighCol + 8, 256); |
87b0845f |
299 | } |
300 | |
5a681086 |
301 | void PicoDrawSetOutputMode4(pdso_t which) |
200772b7 |
302 | { |
303 | switch (which) |
304 | { |
5a681086 |
305 | case PDF_8BIT: FinalizeLineM4 = FinalizeLine8bitM4; break; |
306 | case PDF_RGB555: FinalizeLineM4 = FinalizeLineRGB555M4; break; |
307 | default: FinalizeLineM4 = NULL; break; |
200772b7 |
308 | } |
200772b7 |
309 | } |
310 | |
1c25c32c |
311 | // vim:shiftwidth=2:ts=2:expandtab |