asm for PicoDoHighPal555
[picodrive.git] / Pico / Draw.s
index c620c74..5074a63 100644 (file)
@@ -25,7 +25,6 @@
 .equ PDRAW_DIRTY_SPRITES, (1<<4)\r
 .equ PDRAW_PLANE_HI_PRIO, (1<<6)\r
 .equ PDRAW_SHHI_DONE,     (1<<7)\r
-.equ MAX_LINE_SPRITES,    30\r
 \r
 @ helper\r
 .macro TilePixel pat lsrr offs\r
@@ -947,26 +946,19 @@ DrawTilesFromCache:
 @ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@\r
 \r
 \r
-.global DrawSpritesSHi @ int prio_unused, int sh\r
+.global DrawSpritesSHi @ unsigned char *sprited\r
 \r
 DrawSpritesSHi:\r
-    ldr     r3, =DrawScanline\r
-    ldr     r2, =HighLnSpr\r
-    ldr     r12,[r3]\r
-    mov     r3, #(MAX_LINE_SPRITES+2)\r
-    mla     r2, r12, r3, r2\r
-    ldr     r3, [r2]\r
+    ldr     r3, [r0]\r
+    mov     r12,#0xff\r
     ands    r3, r3, #0x7f\r
     bxeq    lr\r
 \r
     stmfd   sp!, {r4-r11,lr}\r
-    mov     r12,#0xff\r
-    strb    r12,[r2,#1]     @ set end marker\r
-    add     r10,r2, #2\r
+    strb    r12,[r0,#2]     @ set end marker\r
+    add     r10,r0, #3      @ r10=HighLnSpr end\r
     add     r10,r10,r3      @ r10=HighLnSpr end\r
 \r
-    str     r1, [sp, #-4]   @ no calls after this point\r
-\r
 .if OVERRIDE_HIGHCOL\r
     ldr     r11,=HighCol\r
     mov     r12,#0xf\r
@@ -982,7 +974,7 @@ DrawSpriteSHi:
     @ draw next sprite\r
     ldrb    r0, [r10,#-1]!\r
     ldr     r1, =HighPreSpr\r
-    ldr     r8, [sp, #-4]\r
+@    ldr     r8, [sp, #-4]\r
     cmp     r0, #0xff\r
     ldmeqfd sp!, {r4-r11,pc} @ end of list\r
     and     r0, r0, #0x7f\r
@@ -994,12 +986,12 @@ DrawSpriteSHi:
     mov     r9, r9, lsl #16\r
     mov     r3, r9, lsr #31 @ priority\r
     mov     r9, r9, lsr #16\r
-    orr     r9, r9, r8, lsl #31 @ r9=code|sh[31]\r
+@    orr     r9, r9, r8, lsl #31 @ r9=code|sh[31]   @@ sh is always on here now\r
     and     r4, r9, #0x6000\r
     orr     r9, r9, r4, lsl #16\r
-    orr     r9, r9, #0x10000000 @ r9=scc1 ???? ... <code> (s=shadow/hilight, cc=pal)\r
+    orr     r9, r9, #0x90000000 @ r9=scc1 ???? ... <code> (s=shadow/hilight, cc=pal)\r
     cmp     r12,r9, lsr #28 @ sh/hi with pal3?\r
-    cmpne   r3, #1          @ if not, is hi prio\r
+    cmpne   r3, #1          @ if not, is ir hi prio?\r
     bne     DrawSpriteSHi   @ non-operator low sprite, already drawn\r
 \r
     ldr     r3, [r0]        @ sprite[0]\r
@@ -1030,8 +1022,6 @@ DrawSpriteSHi:
     add     r8, r8, r7, lsl #1 @ tile+=(row&7)<<1; // Tile address\r
 \r
     mov     r5, r5, lsl #4     @ delta<<=4; // Delta of address\r
-\r
-    orrs    r3, r9, r9, lsl #4\r
     mov     r3, r4, lsr #9     @ r3=pal=((code>>9)&0x30);\r
 \r
     add     r6, r6, #1         @ inc now\r
@@ -1136,36 +1126,31 @@ DrawSpriteSHi:
 \r
 @ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@\r
 \r
-.global DrawAllSprites @ int prio, int sh\r
+.global DrawAllSprites @ unsigned char *sprited, int prio, int sh\r
 \r
 DrawAllSprites:\r
     ldr     r3, =rendstatus\r
-    orr     r1, r1, r0, lsl #1\r
+    orr     r1, r2, r1, lsl #1\r
     ldr     r12,[r3]\r
-    tst     r12,#(PDRAW_ACC_SPRITES|PDRAW_SPRITES_MOVED)\r
+    tst     r12,#(PDRAW_DIRTY_SPRITES|PDRAW_SPRITES_MOVED)\r
     beq     das_no_prep\r
-    stmfd   sp!, {r1,lr}\r
+    stmfd   sp!, {r0,r1,lr}\r
     and     r0, r12,#PDRAW_DIRTY_SPRITES\r
-    bic     r12,r12,#(PDRAW_ACC_SPRITES|PDRAW_SPRITES_MOVED)\r
+    bic     r12,r12,#(PDRAW_DIRTY_SPRITES|PDRAW_SPRITES_MOVED)\r
     str     r12,[r3]\r
     bl      PrepareSprites\r
-    ldmfd   sp!, {r1,lr}\r
+    ldmfd   sp!, {r0,r1,lr}\r
 \r
 das_no_prep:\r
-    ldr     r3, =DrawScanline\r
-    ldr     r2, =HighLnSpr\r
-    ldr     r12,[r3]\r
-    mov     r3, #(MAX_LINE_SPRITES+2)\r
-    mla     r2, r12, r3, r2\r
-    ldr     r3, [r2]\r
+    ldr     r3, [r0]\r
     ands    r3, r3, #0x7f\r
     bxeq    lr\r
 \r
     @ time to do some real work\r
     stmfd   sp!, {r4-r11,lr}\r
     mov     r12,#0xff\r
-    strb    r12,[r2,#1]     @ set end marker\r
-    add     r10,r2, #2\r
+    strb    r12,[r0,#2]     @ set end marker\r
+    add     r10,r0, #3\r
     add     r10,r10,r3      @ r10=HighLnSpr end\r
 \r
     str     r1, [sp, #-4]   @ no calls after this point\r
@@ -1345,7 +1330,7 @@ DrawWindow:
     add     r12, r12, r0, lsl #2  @ +starttile\r
 \r
     ldr     r6, =rendstatus\r
-    ldr     lr, =(Pico+0x10000) @ lr=Pico.vram\r
+    ldr     lr, =(Pico+0x10000)   @ lr=Pico.vram\r
     ldr     r6, [r6]\r
 \r
     @ fetch the first code now\r
@@ -1457,7 +1442,7 @@ DrawWindow:
 .dwloop_end:\r
     ldr     r0, =rendstatus\r
     ldr     r1, [r0]\r
-    and     r6, r6, #2\r
+    and     r6, r6, #PDRAW_WND_DIFF_PRIO\r
     orr     r1, r1, r6\r
     str     r1, [r0]\r
 \r
@@ -1648,18 +1633,15 @@ FinalizeLineBGR444:
     orr     \reg, \reg, r3           @ add blue back\r
 .endm\r
 \r
-.global vidConvCpyRGB565\r
-\r
-vidConvCpyRGB565: @ void *to, void *from, int pixels\r
-    stmfd   sp!, {r4-r9,lr}\r
-\r
+@ trashes: r2-r9,r12,lr; r0,r1 are advanced\r
+.macro vidConvCpyRGB565_local\r
     mov     r12, r2, lsr #3  @ repeats\r
     mov     lr, #0x001c0000\r
     orr     lr, lr,  #0x01c  @ lr == pattern 0x001c001c\r
     mov     r8, #0x00030000\r
     orr     r8, r8,  #0x003\r
 \r
-.loopRGB565:\r
+0:\r
     ldmia   r1!, {r4-r7}\r
     subs    r12, r12, #1\r
     convRGB565 r4\r
@@ -1671,44 +1653,51 @@ vidConvCpyRGB565: @ void *to, void *from, int pixels
     convRGB565 r7\r
     str     r7, [r0], #4\r
 \r
-    bgt     .loopRGB565\r
+    bgt     0b\r
+.endm\r
+\r
 \r
+.global vidConvCpyRGB565\r
+\r
+vidConvCpyRGB565: @ void *to, void *from, int pixels\r
+    stmfd   sp!, {r4-r9,lr}\r
+    vidConvCpyRGB565_local\r
     ldmfd   sp!, {r4-r9,lr}\r
     bx      lr\r
 \r
 \r
+.global PicoDoHighPal555 @ int sh\r
 \r
-.global FinalizeLineRGB555 @ int sh\r
-\r
-FinalizeLineRGB555:\r
-    stmfd   sp!, {r4-r8,lr}\r
+PicoDoHighPal555:\r
+    stmfd   sp!, {r4-r9,lr}\r
+    mov     r1, #0\r
     ldr     r8, =(Pico+0x22228)  @ Pico.video\r
-    ldr     r4, =HighPal\r
 \r
-    ldrb    r7, [r8, #-0x1a]     @ 0x2220e ~ dirtyPal\r
-    mov     r6, r0\r
+PicoDoHighPal555_nopush:\r
+    str     r1, [sp, #-8]        @ is called from FinalizeLineRGB555?\r
+\r
+    str     r0, [sp, #-4]\r
+    ldr     r0, =HighPal\r
+\r
     mov     r1, #0\r
-    tst     r7, r7\r
-    beq     .fl_noconvRGB555\r
-    strb    r1, [r8, #-0x1a]\r
+    strb    r1, [r8, #-0x1a]     @ 0x2220e ~ dirtyPal\r
+\r
     sub     r1, r8, #0x128       @ r1=Pico.cram\r
-    mov     r0, r4\r
     mov     r2, #0x40\r
-    bl      vidConvCpyRGB565\r
+    vidConvCpyRGB565_local\r
 \r
-.fl_noconvRGB555:\r
-    mov     r3, r4\r
-    tst     r6, r6\r
-    beq     .fl_noshRGB555\r
-    tst     r7, r7\r
-    beq     .fl_noshRGB555\r
+    ldr     r0, [sp, #-4]\r
+    tst     r0, r0\r
+    beq     PicoDoHighPal555_end\r
+\r
+    ldr     r3, =HighPal\r
 \r
     @ shadowed pixels:\r
     mov     r12,    #0x008e\r
-    orr     r12,r12,#0x7300\r
-    orr     r12,r12,r12,lsl #16\r
     add     r4, r3, #0x40*2\r
+    orr     r12,r12,#0x7300\r
     add     r5, r3, #0xc0*2\r
+    orr     r12,r12,r12,lsl #16\r
     mov     lr, #0x40/4\r
 .fl_loopcpRGB555_sh:\r
     ldmia   r3!, {r1,r6}\r
@@ -1728,13 +1717,33 @@ FinalizeLineRGB555:
     str     r1, [r4], #4\r
     subs    lr, lr, #1\r
     bne     .fl_loopcpRGB555_hi\r
+    mov     r0, #1\r
+\r
+PicoDoHighPal555_end:\r
+    ldr     r1, [sp, #-8]\r
+    tst     r1, r1\r
+    ldmeqfd sp!, {r4-r9,pc}\r
+\r
+    ldr     r8, =(Pico+0x22228)  @ Pico.video\r
+    b       FinalizeLineRGB555_pal_done\r
 \r
-    sub     r3, r3, #0x40*2\r
-    mov     r6, #1\r
 \r
-.fl_noshRGB555:\r
+.global FinalizeLineRGB555 @ int sh\r
+\r
+FinalizeLineRGB555:\r
+    stmfd   sp!, {r4-r9,lr}\r
+    ldr     r8, =(Pico+0x22228)  @ Pico.video\r
+\r
+    ldrb    r2, [r8, #-0x1a]     @ 0x2220e ~ dirtyPal\r
+    mov     r1, #1\r
+    tst     r2, r2\r
+    bne     PicoDoHighPal555_nopush\r
+\r
+FinalizeLineRGB555_pal_done:\r
+    ldr     r3, =HighPal\r
+\r
     ldr     r12,=rendstatus\r
-    eors    r6, r6, #1          @ sh is 0\r
+    eors    r0, r0, #1           @ sh is 0\r
     ldr     r12,[r12]\r
     mov     lr, #0xff\r
     tstne   r12,#PDRAW_ACC_SPRITES\r
@@ -1806,12 +1815,12 @@ FinalizeLineRGB555:
     stmia   r0!, {r4,r5,r8,r12}\r
     bne     .fl_loopRGB555\r
 \r
-    ldmfd   sp!, {r4-r8,lr}\r
+    ldmfd   sp!, {r4-r9,lr}\r
     bx      lr\r
 \r
 \r
 .fl_32scale_RGB555:\r
-    stmfd   sp!, {r9,r10}\r
+    stmfd   sp!, {r10}\r
     mov     r9, #0x3900 @ f800 07e0 001f | e000 0780 001c | 3800 01e0 0007\r
     orr     r9, r9, #0x00e7\r
 \r
@@ -1872,8 +1881,8 @@ FinalizeLineRGB555:
     stmia   r0!, {r4,r5,r6,r8,r10}\r
     bne     .fl_loop32scale_RGB555\r
 \r
-    ldmfd   sp!, {r9,r10}\r
-    ldmfd   sp!, {r4-r8,lr}\r
+    ldmfd   sp!, {r10}\r
+    ldmfd   sp!, {r4-r9,lr}\r
     bx      lr\r
 \r
 .if UNALIGNED_DRAWLINEDEST\r
@@ -1919,7 +1928,7 @@ FinalizeLineRGB555:
 \r
     strh    r8, [r0], #2\r
 \r
-    ldmfd   sp!, {r4-r8,lr}\r
+    ldmfd   sp!, {r4-r9,lr}\r
     bx      lr\r
 \r
 \r
@@ -1985,8 +1994,8 @@ FinalizeLineRGB555:
 \r
     strh    r4, [r0], #2\r
 \r
-    ldmfd   sp!, {r9,r10}\r
-    ldmfd   sp!, {r4-r8,lr}\r
+    ldmfd   sp!, {r10}\r
+    ldmfd   sp!, {r4-r9,lr}\r
     bx      lr\r
 \r
 .endif @ UNALIGNED_DRAWLINEDEST\r