32x: more wip
[picodrive.git] / pico / 32x / draw.c
1 #include "../pico_int.h"
2
3 static void convert_pal555(int invert_prio)
4 {
5   unsigned int *ps = (void *)Pico32xMem->pal;
6   unsigned int *pd = (void *)Pico32xMem->pal_native;
7   unsigned int m1 = 0x001f001f;
8   unsigned int m2 = 0x03e003e0;
9   unsigned int m3 = 0xfc00fc00;
10   unsigned int inv = 0;
11   int i;
12
13   if (invert_prio)
14     inv = 0x00200020;
15
16   // place prio to LS green bit
17   for (i = 0x100/2; i > 0; i--, ps++, pd++) {
18     unsigned int t = *ps;
19     *pd = (((t & m1) << 11) | ((t & m2) << 1) | ((t & m3) >> 10)) ^ inv;
20   }
21
22   Pico32x.dirty_pal = 0;
23 }
24
25 void FinalizeLine32xRGB555(int sh, int line)
26 {
27   unsigned short *pd = DrawLineDest;
28   unsigned short *pal = Pico32xMem->pal_native;
29   unsigned char *pb = HighCol + 8;
30   unsigned short cram0;
31
32   // this is a bit hackish:
33   // we swap cram color 0 with color that is used for background,
34   // as bg is forced to 0 when we do 32X
35   cram0 = Pico.cram[0];
36   Pico.cram[0] = Pico.cram[Pico.video.reg[7] & 0x3f];
37
38   FinalizeLineRGB555(sh, line);
39   Pico.cram[0] = cram0;
40
41   if ((Pico32x.vdp_regs[0] & P32XV_Mx) == 0)
42     return; // blanking
43
44   if (!(PicoDrawMask & PDRAW_32X_ON))
45     return;
46
47   if (Pico32x.dirty_pal)
48     convert_pal555(Pico32x.vdp_regs[0] & P32XV_PRI);
49
50   if ((Pico32x.vdp_regs[0] & P32XV_Mx) == 1) {
51     unsigned short *dram = (void *)Pico32xMem->dram[Pico32x.vdp_regs[0x0a/2] & P32XV_FS];
52     unsigned short *ps = dram + dram[line];
53     unsigned short t;
54     int i;
55     for (i = 320/2; i > 0; i--, ps++, pd += 2, pb += 2) {
56       t = pal[*ps >> 8];
57       if (pb[0] == 0 || (t & 0x20))
58         pd[0] = t;
59       t = pal[*ps & 0xff];
60       if (pb[1] == 0 || (t & 0x20))
61         pd[1] = t;
62     }
63   }
64 }
65