--- np2/i286a/i286aop.inc 2003/12/16 04:58:00 1.1 +++ np2/i286a/i286aop.inc 2003/12/21 23:27:08 1.8 @@ -1,5 +1,4 @@ - MACRO $label OP_EA_R8 $alu, $regclk, $memclk $label EAREG8 r12 @@ -21,11 +20,11 @@ $label.1 CPUWORK $memclk strb r1, [r9, r0] mov pc, r11 $label.2 mov r5, r0 - bl i286_memoryread + bl i286a_memoryread $alu r0, r6 mov r0, r5 mov lr, r11 - b i286_memorywrite + b i286a_memorywrite MEND MACRO @@ -35,7 +34,7 @@ $label EAREG16 r12 cmp r0, #&c0 bcc $label.1 CPUWORK $regclk - R8SRC r0, r5 + R16SRC r0, r5 ldrh r4, [r5, #CPU_REG] $alu r4, r6 strh r1, [r5, #CPU_REG] @@ -51,35 +50,35 @@ $label.1 CPUWORK $memclk strh r1, [r9, r0] mov pc, r11 $label.2 mov r5, r0 - bl i286_memoryread_w + bl i286a_memoryread_w $alu r0, r6 mov r0, r5 mov lr, r11 - b i286_memorywrite_w + b i286a_memorywrite_w MEND MACRO $label OP_R8_EA $alu, $regclk, $memclk -$label REG8EA r5, $regclk, $memclk - ldrb r2, [r5, #CPU_REG] +$label REG8EA r6, $regclk, $memclk + ldrb r2, [r6, #CPU_REG] $alu r2, r0 - strb r1, [r5, #CPU_REG] + strb r1, [r6, #CPU_REG] mov pc, r11 MEND MACRO $label OP_R16_EA $alu, $regclk, $memclk -$label REG16EA r5, $regclk, $memclk - ldrh r2, [r5, #CPU_REG] +$label REG16EA r6, $regclk, $memclk + ldrh r2, [r6, #CPU_REG] $alu r2, r0 - strh r1, [r5, #CPU_REG] + strh r1, [r6, #CPU_REG] mov pc, r11 MEND MACRO $label OP_AL_D8 $alu, $clk $label CPUWORK $clk - GETPC8 + GETPCF8 ldrb r2, [r9, #CPU_AL] $alu r2, r0 strb r1, [r9, #CPU_AL] @@ -115,7 +114,7 @@ $label.1 CPUWORK $memclk ldrb r4, [r9, r0] $alu r4, r6 mov pc, r11 -$label.2 bl i286_memoryread +$label.2 bl i286a_memoryread $alu r0, r6 mov pc, r11 MEND @@ -127,7 +126,7 @@ $label EAREG16 r12 cmp r0, #&c0 bcc $label.1 CPUWORK $regclk - R8SRC r0, r5 + R16SRC r0, r5 ldrh r4, [r5, #CPU_REG] $alu r4, r6 mov pc, r11 @@ -140,7 +139,7 @@ $label.1 CPUWORK $memclk ldrh r4, [r9, r0] $alu r4, r6 mov pc, r11 -$label.2 bl i286_memoryread_w +$label.2 bl i286a_memoryread_w $alu r0, r6 mov pc, r11 MEND @@ -155,8 +154,8 @@ $label REG8EA r5, $regclk, $memclk MACRO $label S_R16_EA $alu, $regclk, $memclk -$label REG16EA r5, $regclk, $memclk - ldrh r2, [r5, #CPU_REG] +$label REG16EA r6, $regclk, $memclk + ldrh r2, [r6, #CPU_REG] $alu r2, r0 mov pc, r11 MEND @@ -181,6 +180,61 @@ $label CPUWORK $clk MACRO +$label OP_EA8 $alu, $regclk, $memclk +$label cmp r0, #&c0 + bcc $label.1 + CPUWORK $regclk + R8SRC r0, r5 + ldrb r4, [r5, #CPU_REG] + $alu r4 + strb r1, [r5, #CPU_REG] + mov pc, r11 +$label.1 CPUWORK $memclk + bl i286a_ea + cmp r0, #I286_MEMWRITEMAX + bcs $label.2 + ldrb r4, [r9, r0] + $alu r4 + strb r1, [r9, r0] + mov pc, r11 +$label.2 mov r5, r0 + bl i286a_memoryread + $alu r0 + mov r0, r5 + mov lr, r11 + b i286a_memorywrite + MEND + + MACRO +$label OP_EA16 $alu, $regclk, $memclk +$label cmp r0, #&c0 + bcc $label.1 + CPUWORK $regclk + R16SRC r0, r5 + ldrh r4, [r5, #CPU_REG] + $alu r4 + strh r1, [r5, #CPU_REG] + mov pc, r11 +$label.1 CPUWORK $memclk + bl i286a_ea + tst r0, #1 + bne $label.2 + cmp r0, #I286_MEMWRITEMAX + bcs $label.2 + ldrh r4, [r9, r0] + $alu r4 + strh r1, [r9, r0] + mov pc, r11 +$label.2 mov r5, r0 + bl i286a_memoryread_w + $alu r0 + mov r0, r5 + mov lr, r11 + b i286a_memorywrite_w + MEND + + + MACRO $label OP_INC16 $r, $clk $label CPUWORK $clk ldrh r2, [r9, $r] @@ -236,7 +290,7 @@ $label CPUWORK $clk strh r0, [r9, #CPU_SP] add r0, r2, r3 lsr #16 mov lr, r11 - b i286_memorywrite_w + b i286a_memorywrite_w MEND MACRO @@ -245,7 +299,7 @@ $label CPUWORK $clk ldrh r0, [r9, #CPU_SP] ldr r1, [r9, #CPU_SS_BASE] add r0, r1, r0 - bl i286_memoryread_w + bl i286a_memoryread_w strh r0, [r9, #CPU_SP] mov pc, r11 MEND @@ -270,5 +324,38 @@ $label POP $clk MEND + MACRO +$label JMPS $jmpclk +$label CPUWORK $jmpclk + ;; ldr r5, [r9, #CPU_CS_BASE] + add r0, r5, r8 lsr #16 + GETR0 + mov r1, r0 lsl #24 + add r8, r8, #(1 << 16) + mov r0, r1 asr #8 + add r8, r0, r8 + mov pc, r11 + MEND + + MACRO +$label JMPNE $f, $nojclk, $jmpclk +$label tst r8, $f + bne $label.1 + CPUWORK $nojclk + add r8, r8, #(1 << 16) + mov pc, r11 +$label.1 JMPS $jmpclk + MEND + + MACRO +$label JMPEQ $f, $nojclk, $jmpclk +$label tst r8, $f + beq $label.1 + CPUWORK $nojclk + add r8, r8, #(1 << 16) + mov pc, r11 +$label.1 JMPS $jmpclk + MEND + END