some support for vdp debug reg
[picodrive.git] / pico / draw_arm.S
index 2c1db10..fae07b8 100644 (file)
 \r
 #include "pico_int_o32.h"\r
 \r
-.extern PicoOpt\r
-.extern HighCol\r
-.extern HighSprZ\r
-.extern HighPreSpr\r
-.extern DrawLineDest\r
 .extern DrawStripInterlace\r
-.extern HighCacheS_ptr\r
-\r
-.equiv OVERRIDE_HIGHCOL,  1\r
 \r
 .equ PDRAW_SPRITES_MOVED, (1<<0)\r
 .equ PDRAW_WND_DIFF_PRIO, (1<<1)\r
 @   int cells;   // 0x14\r
 @ };\r
 \r
-@ void DrawLayer(int plane_sh, int *hcache, int cellskip, int maxcells,\r
+@ void DrawLayer(int lflags, int *hcache, int cellskip, int maxcells,\r
 @                struct PicoEState *est)\r
 \r
 .global DrawLayer\r
@@ -301,8 +293,8 @@ DrawLayer:
     ldrb    r7, [r11, #16]        @ ??vv??hh\r
 \r
     mov     r6, r1                @ hcache\r
-    orr     r9, r3, r0, lsl #30\r
-    orr     r9, r9, r2, lsl #8    @ r9=sh[31]|cellskip[15:8]|maxcells[7:0]  (tmp)\r
+    orr     r9, r3, r0, lsl #29   @ r9=force[31]|sh[30]|plane[29]\r
+    orr     r9, r9, r2, lsl #8    @    |cellskip[15:8]|maxcells[7:0]  (tmp)\r
 \r
     mov     r1, r7, lsl #4\r
     orr     r1, r1, #0x00ff\r
@@ -311,7 +303,9 @@ DrawLayer:
     cmp     r10, #1\r
     biclt   r1,  r1, #0xfc00\r
     biceq   r1,  r1, #0xfe00\r
-    bicgt   r1,  r1, #0xff00      @ r1=ymask=(height<<8)|0xff; ...; // Y Mask in pixels\r
+    cmp     r10, #2\r
+    moveq   r1,      #0x0007\r
+    movgt   r1,      #0x00ff      @ r1=ymask=(height<<8)|0xff; ...; // Y Mask in pixels\r
 \r
     add     r10, r10, #5\r
     cmp     r10, #7\r
@@ -381,10 +375,11 @@ DrawLayer:
     and     r1, r1, #7\r
     add     r7, r1, #1      @ r7=dx=((ts->hscroll-1)&7)+1\r
 \r
-    tst     r9, #1<<31\r
+    movs    r3, r9, lsl #1  @ (force[31]|sh[30]) << 1\r
     mov     r3, #0\r
-    orrne   r10,r10, #1<<23 @ r10=(cells<<24|sh<<23|hi_not_empty<<22|had_output<<21|ty)\r
-    movne   r3, #0x40       @ default to shadowed pal on sh mode\r
+    orrmi   r10,r10, #1<<23 @ r10=cells[31:24]|sh[23]|hi_not_empty[22]\r
+    orrcs   r10,r10, #1<<20 @    |had_output[21]|force[20]|ty[15:0]\r
+    movmi   r3, #0x40       @ default to shadowed pal on sh mode\r
 \r
     cmp     r7, #8\r
     addne   r10,r10, #0x01000000 @ we will loop cells+1 times if there is scroll\r
@@ -395,17 +390,12 @@ DrawLayer:
     sub     r10,r10,r9, lsl #16  @ cells-=cellskip\r
 \r
     @ cache some stuff to avoid mem access\r
-.if OVERRIDE_HIGHCOL\r
-    ldr     r11,=HighCol\r
-    mov     r0, #0xf\r
-    ldr     r11,[r11]\r
-.else\r
-    ldr     r11,=HighCol\r
+    ldr     r11,[sp, #9*4]       @ est\r
     mov     r0, #0xf\r
-.endif\r
+    ldr     r11,[r11, #OFS_HighCol]\r
 \r
     mvn     r9, #0               @ r9=prevcode=-1\r
-    add     r1, r11, r7         @ r1=pdest\r
+    add     r1, r11, r7          @ r1=pdest\r
 \r
 \r
     @ r4 & r7 are scratch in this loop\r
@@ -424,6 +414,7 @@ DrawLayer:
     add     r8, r8, #1\r
 \r
     tst     r7, #0x8000\r
+    tsteq   r10, #1<<20     @ force?\r
     bne     .DrawStrip_hiprio\r
 \r
     cmp     r7, r9\r
@@ -491,7 +482,7 @@ DrawLayer:
     orr     r10, r10, #1<<22\r
 \r
 .DrawStrip_hiprio:\r
-    tst     r10, #0x00c00000\r
+    tst     r10, #0x00d00000 @ sh[23]|hi_not_empty[22]|force[20]\r
     beq     .DrawStrip_hiprio_maybempt\r
     sub     r0, r1, r11\r
     orr     r7, r7, r0,  lsl #16\r
@@ -548,14 +539,9 @@ DrawLayer:
     add     r10,r10,r9, lsl #16  @ cell+=cellskip\r
 \r
     @ cache some stuff to avoid mem access\r
-.if OVERRIDE_HIGHCOL\r
-    ldr     r11,=HighCol\r
+    ldr     r11,[sp, #9*4]       @ est\r
     mov     r0, #0xf\r
-    ldr     r11,[r11]\r
-.else\r
-    ldr     r11,=HighCol\r
-    mov     r0, #0xf\r
-.endif\r
+    ldr     r11,[r11, #OFS_HighCol]\r
 \r
     mvn     r9, #0               @ r9=prevcode=-1\r
     add     r1, r11, r7          @ r1=pdest\r
@@ -722,23 +708,17 @@ DrawLayer:
 \r
 @ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@\r
 \r
+@ void BackFill(int reg7, int sh, struct PicoEState *est)\r
 \r
-.global BackFill @ int reg7, int sh\r
+.global BackFill\r
 \r
 BackFill:\r
     stmfd   sp!, {r4-r9,lr}\r
 \r
-.if OVERRIDE_HIGHCOL\r
-    ldr     lr, =HighCol\r
     mov     r0, r0, lsl #26\r
-    ldr     lr, [lr]\r
+    ldr     lr, [r2, #OFS_HighCol]\r
     mov     r0, r0, lsr #26\r
     add     lr, lr, #8\r
-.else\r
-    ldr     lr, =(HighCol+8)\r
-    mov     r0, r0, lsl #26\r
-    mov     r0, r0, lsr #26\r
-.endif\r
 \r
     orr     r0, r0, r1, lsl #6\r
     orr     r0, r0, r0, lsl #8\r
@@ -764,8 +744,8 @@ BackFill:
     stmia   lr!, {r0-r7}\r
     stmia   lr!, {r0-r7}\r
 \r
-    ldmfd   sp!, {r4-r9,r12}\r
-    bx      r12\r
+    ldmfd   sp!, {r4-r9,lr}\r
+    bx      lr\r
 \r
 \r
 @ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@\r
@@ -778,14 +758,8 @@ DrawTilesFromCache:
     stmfd   sp!, {r4-r9,r11,lr}\r
 \r
     @ cache some stuff to avoid mem access\r
-.if OVERRIDE_HIGHCOL\r
-    ldr     r11,=HighCol\r
-    mov     r12,#0xf\r
-    ldr     r11,[r11]\r
-.else\r
-    ldr     r11,=HighCol\r
+    ldr     r11,[r3, #OFS_HighCol]\r
     mov     r12,#0xf\r
-.endif\r
     ldr     lr, [r3, #OFS_Pico_vram]\r
     mov     r9, r3         @ est\r
 \r
@@ -802,7 +776,8 @@ DrawTilesFromCache:
     bic     r4, r1, #0xfe00\r
     add     r1, r11, r4     @ r1=pdest\r
 \r
-    mov     r7, r6, lsl #16\r
+    movs    r7, r6, lsl #16\r
+    bpl     .dtfc_loop      @ !(code & 0x8000)\r
     cmp     r5, r7, lsr #16\r
     beq     .dtfc_samecode  @ if (code==prevcode)\r
 \r
@@ -964,14 +939,8 @@ DrawSpritesSHi:
     add     r10,r0, #3      @ r10=HighLnSpr end\r
     add     r10,r10,r3      @ r10=HighLnSpr end\r
 \r
-.if OVERRIDE_HIGHCOL\r
-    ldr     r11,=HighCol\r
+    ldr     r11,[r1, #OFS_HighCol]\r
     mov     r12,#0xf\r
-    ldr     r11,[r11]\r
-.else\r
-    ldr     r11,=HighCol\r
-    mov     r12,#0xf\r
-.endif\r
     ldr     lr, [r1, #OFS_Pico_vram]\r
 \r
 \r
@@ -979,7 +948,7 @@ DrawSpriteSHi:
     @ draw next sprite\r
     ldrb    r0, [r10,#-1]!\r
     ldr     r7, [sp]        @ est\r
-    ldr     r1, =HighPreSpr\r
+    ldr     r1, [r7, #OFS_HighPreSpr]\r
     cmp     r0, #0xff\r
     ldmeqfd sp!, {r1,r4-r11,pc} @ end of list\r
     and     r0, r0, #0x7f\r
@@ -1137,17 +1106,6 @@ DrawSpriteSHi:
 \r
 DrawAllSprites:\r
     orr     r1, r2, r1, lsl #1\r
-    ldr     r12,[r3, #OFS_rendstatus]\r
-    tst     r12,#(PDRAW_DIRTY_SPRITES|PDRAW_SPRITES_MOVED)\r
-    beq     das_no_prep\r
-    stmfd   sp!, {r0,r1,r3,lr}\r
-    and     r0, r12,#PDRAW_DIRTY_SPRITES\r
-    bic     r12,r12,#(PDRAW_DIRTY_SPRITES|PDRAW_SPRITES_MOVED)\r
-    str     r12,[r3, #OFS_rendstatus]\r
-    bl      PrepareSprites\r
-    ldmfd   sp!, {r0,r1,r3,lr}\r
-\r
-das_no_prep:\r
     ldr     r2, [r0]\r
     ands    r2, r2, #0x7f\r
     bxeq    lr\r
@@ -1159,14 +1117,8 @@ das_no_prep:
     add     r10,r0, #3\r
     add     r10,r10,r2      @ r10=HighLnSpr end\r
 \r
-.if OVERRIDE_HIGHCOL\r
-    ldr     r11,=HighCol\r
-    mov     r12,#0xf\r
-    ldr     r11,[r11]\r
-.else\r
-    ldr     r11,=HighCol\r
+    ldr     r11,[r3, #OFS_HighCol]\r
     mov     r12,#0xf\r
-.endif\r
     ldr     lr, [r3, #OFS_Pico_vram]\r
 \r
 @ + 0  :    hhhhvvvv ----hhvv yyyyyyyy yyyyyyyy // v, h: horiz. size\r
@@ -1182,7 +1134,7 @@ DrawSprite:
     ldmeqfd sp!, {r1,r3-r11,pc} @ end of list\r
     cmp     r2, r8, lsr #1\r
     bne     DrawSprite      @ wrong priority\r
-    ldr     r1, =HighPreSpr\r
+    ldr     r1, [r7, #OFS_HighPreSpr]\r
     and     r0, r0, #0x7f\r
     add     r0, r1, r0, lsl #3\r
 \r
@@ -1352,17 +1304,10 @@ DrawWindow:
     sub     r8, r1, r0\r
 \r
     @ cache some stuff to avoid mem access\r
-.if OVERRIDE_HIGHCOL\r
-    ldr     r11,=HighCol\r
+    ldr     r11, [r11, #OFS_HighCol]\r
     mov     r8, r8, lsl #1        @ cells\r
-    ldr     r11,[r11]\r
-    mvn     r9, #0                @ r9=prevcode=-1\r
     add     r11,r11,#8\r
-.else\r
-    ldr     r11,=(HighCol+8)\r
-    mov     r8, r8, lsl #1        @ cells\r
     mvn     r9, #0                @ r9=prevcode=-1\r
-.endif\r
     add     r1, r11, r0, lsl #4   @ r1=pdest\r
     mov     r0, #0xf\r
     b       .dwloop_enter\r
@@ -1546,7 +1491,7 @@ PicoDoHighPal555:
 PicoDoHighPal555_nopush:\r
     orr     r9, r1, r0, lsl #31  @ 0:called from FinalizeLine555, 31: s/h\r
 \r
-    ldr     r0, =HighPal\r
+    add     r0, r10, #OFS_HighPal\r
 \r
     mov     r1, #0\r
     strb    r1, [r8, #-0x1a]     @ 0x2220e ~ dirtyPal\r
@@ -1562,7 +1507,7 @@ PicoDoHighPal555_nopush:
     tst     r9, #(1<<31)\r
     beq     PicoDoHighPal555_end\r
 \r
-    ldr     r3, =HighPal\r
+    add     r3, r10, #OFS_HighPal\r
 \r
     @ shadowed pixels:\r
     mov     r12,    #0x008e\r
@@ -1624,7 +1569,7 @@ FinalizeLine555:
     bne     PicoDoHighPal555_nopush\r
 \r
 FinalizeLineRGB555_pal_done:\r
-    ldr     r3, =HighPal\r
+    add     r3, r10, #OFS_HighPal\r
 \r
     ldr     r12, [r10, #OFS_rendstatus]\r
     eors    r0, r0, #1           @ sh is 0\r
@@ -1632,17 +1577,9 @@ FinalizeLineRGB555_pal_done:
     tstne   r12,#PDRAW_ACC_SPRITES\r
     movne   lr, #0x3f\r
 \r
-.if OVERRIDE_HIGHCOL\r
-    ldr     r1, =HighCol\r
-    ldr     r0, =DrawLineDest\r
-    ldr     r1, [r1]\r
-    ldr     r0, [r0]\r
+    ldr     r1, [r10, #OFS_HighCol]\r
+    ldr     r0, [r10, #OFS_DrawLineDest]\r
     add     r1, r1, #8\r
-.else\r
-    ldr     r0, =DrawLineDest\r
-    ldr     r1, =(HighCol+8)\r
-    ldr     r0, [r0]\r
-.endif\r
 \r
     ldrb    r12, [r8, #12]\r
     mov     lr, lr, lsl #1\r
@@ -1650,7 +1587,7 @@ FinalizeLineRGB555_pal_done:
     tst     r12, #1\r
     movne   r2, #320/8           @ len\r
     bne     .fl_no32colRGB555\r
-    ldr     r4, =PicoOpt\r
+    ldr     r4, [r10, #OFS_PicoOpt]\r
     mov     r2, #256/8\r
     ldr     r4, [r4]\r
     tst     r4, #0x4000\r