5 * This work is licensed under the terms of MAME license.
6 * See COPYING file in the top-level directory.
12 * - column scroll (reg 0 bit7)
13 * - 224/240 line modes
18 static void (*FinalizeLineM4)(int line);
19 static int skip_next_line;
20 static int screen_offset;
22 #define PLANAR_PIXEL(x,p) \
23 t = pack & (0x80808080 >> p); \
25 t = ((t >> (7-p)) | (t >> (14-p)) | (t >> (21-p)) | (t >> (28-p))) & 0x0f; \
29 static int TileNormM4(int sx, int addr, int pal)
31 unsigned char *pd = Pico.est.HighCol + sx;
34 pack = *(unsigned int *)(PicoMem.vram + addr); /* Get 4 bitplanes / 8 pixels */
48 return 1; /* Tile blank */
51 static int TileFlipM4(int sx,int addr,int pal)
53 unsigned char *pd = Pico.est.HighCol + sx;
56 pack = *(unsigned int *)(PicoMem.vram + addr); /* Get 4 bitplanes / 8 pixels */
70 return 1; /* Tile blank */
73 static void draw_sprites(int scanline)
75 struct PicoVideo *pv = &Pico.video;
76 unsigned int sprites_addr[8];
77 unsigned int sprites_x[8];
79 int xoff = 8; // relative to HighCol, which is (screen - 8)
80 int sprite_base, addr_mask;
86 sat = (unsigned char *)PicoMem.vram + ((pv->reg[5] & 0x7e) << 7);
88 addr_mask = 0xfe; h = 16;
90 addr_mask = 0xff; h = 8;
92 sprite_base = (pv->reg[6] & 4) << (13-2-1);
94 for (i = s = 0; i < 64; i++)
100 if (y + h <= scanline || scanline < y)
101 continue; // not on this line
103 pv->status |= SR_SOVR;
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));
113 // really half-assed but better than nothing
117 // now draw all sprites backwards
118 for (--s; s >= 0; s--)
119 TileNormM4(sprites_x[s], sprites_addr[s], 0x10);
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)
125 int oldcode = -1, blank = -1; // The tile we know is blank
126 int addr = 0, pal = 0;
128 // Draw tiles across screen:
129 for (; cells > 0; dx += 8, tilex_ty_prio++, cells--)
133 code = nametab[tilex_ty_prio & 0x1f];
136 if ((code ^ tilex_ty_prio) & 0x1000) // priority differs?
139 if (code != oldcode) {
141 // Get tile address/2:
142 addr = (code & 0x1ff) << 4;
143 addr += tilex_ty_prio >> 16;
145 addr ^= 0xe; // Y-flip
147 pal = (code>>7) & 0x10;
150 if (code&0x0200) zero = TileFlipM4(dx, addr, pal);
151 else zero = TileNormM4(dx, addr, pal);
154 blank = code; // We know this tile is blank now
158 static void DrawDisplayM4(int scanline)
160 struct PicoVideo *pv = &Pico.video;
161 unsigned short *nametab;
162 int line, tilex, dx, ty, cells;
163 int cellskip = 0; // XXX
166 // Find the line in the name table
167 line = pv->reg[9] + scanline; // vscroll + scanline
172 nametab = PicoMem.vram;
173 nametab += (pv->reg[2] & 0x0e) << (10-1);
174 nametab += (line>>3) << (6-1);
176 dx = pv->reg[8]; // hscroll
177 if (scanline < 16 && (pv->reg[0] & 0x40))
178 dx = 0; // hscroll disabled for top 2 rows
180 tilex = ((-dx >> 3) + cellskip) & 0x1f;
181 ty = (line & 7) << 1; // Y-Offset into tile
182 cells = maxcells - cellskip;
184 dx = ((dx - 1) & 7) + 1;
186 cells++; // have hscroll, need to draw 1 cell more
189 // low priority tiles
190 if (!(pv->debug_p & PVD_KILL_B))
191 draw_strip(nametab, dx, cells, tilex | 0x0000 | (ty << 16));
194 if (!(pv->debug_p & PVD_KILL_S_LO))
195 draw_sprites(scanline);
197 // high priority tiles (use virtual layer switch just for fun)
198 if (!(pv->debug_p & PVD_KILL_A))
199 draw_strip(nametab, dx, cells, tilex | 0x1000 | (ty << 16));
201 if (pv->reg[0] & 0x20)
202 // first column masked
203 ((int *)Pico.est.HighCol)[2] = ((int *)Pico.est.HighCol)[3] = 0xe0e0e0e0;
206 void PicoFrameStartMode4(void)
211 Pico.est.rendstatus = PDRAW_32_COLS;
213 if ((Pico.video.reg[0] & 6) == 6 && (Pico.video.reg[1] & 0x18)) {
214 if (Pico.video.reg[1] & 0x08) {
224 if (Pico.est.rendstatus != rendstatus_old || lines != rendlines) {
225 emu_video_mode_change(screen_offset, lines, 1);
226 rendstatus_old = Pico.est.rendstatus;
230 Pico.est.DrawLineDest = (char *)DrawLineDestBase + screen_offset * DrawLineDestIncrement;
233 void PicoLineMode4(int line)
235 if (skip_next_line > 0) {
240 if (PicoScanBegin != NULL)
241 skip_next_line = PicoScanBegin(line + screen_offset);
244 BackFill(Pico.video.reg[7] & 0x0f, 0, &Pico.est);
245 if (Pico.video.reg[1] & 0x40)
248 if (FinalizeLineM4 != NULL)
249 FinalizeLineM4(line);
251 if (PicoScanEnd != NULL)
252 skip_next_line = PicoScanEnd(line + screen_offset);
254 Pico.est.DrawLineDest = (char *)Pico.est.DrawLineDest + DrawLineDestIncrement;
257 void PicoDoHighPal555M4(void)
259 unsigned int *spal=(void *)PicoMem.cram;
260 unsigned int *dpal=(void *)Pico.est.HighPal;
266 /* cram is always stored as shorts, even though real hardware probably uses bytes */
267 for (i = 0x20/2; i > 0; i--, spal++, dpal++) {
270 t = ((t & 0x00030003)<< 3) | ((t & 0x000c000c)<<7) | ((t & 0x00300030)<<10);
272 t = ((t & 0x00030003)<<14) | ((t & 0x000c000c)<<7) | ((t & 0x00300030)>>1);
275 t |= (t >> 4) & 0x08610861;
278 Pico.est.HighPal[0xe0] = 0;
281 static void FinalizeLineRGB555M4(int line)
284 PicoDoHighPal555M4();
286 // standard FinalizeLine can finish it for us,
287 // with features like scaling and such
288 FinalizeLine555(0, line, &Pico.est);
291 static void FinalizeLine8bitM4(int line)
293 unsigned char *pd = Pico.est.DrawLineDest;
295 if (!(PicoOpt & POPT_DIS_32C_BORDER))
298 memcpy(pd, Pico.est.HighCol + 8, 256);
301 void PicoDrawSetOutputMode4(pdso_t which)
305 case PDF_8BIT: FinalizeLineM4 = FinalizeLine8bitM4; break;
306 case PDF_RGB555: FinalizeLineM4 = FinalizeLineRGB555M4; break;
307 default: FinalizeLineM4 = NULL; break;
311 // vim:shiftwidth=2:ts=2:expandtab