]> cloudbase.mooo.com Git - ddt180.git/commitdiff
Edit, opt '(' and ')' output
authorLeo C <erbl259-lmu@yahoo.de>
Thu, 4 Aug 2016 10:12:22 +0000 (12:12 +0200)
committerLeo C <erbl259-lmu@yahoo.de>
Thu, 4 Aug 2016 10:12:22 +0000 (12:12 +0200)
.gitignore
ddtz.z80

index a652e60994c7280282b4c921f876d23861b39272..dff828af0708d94480c614dfa2ff701952c60f51 100644 (file)
@@ -1,3 +1,4 @@
+scratch
 *.lst
 *.rel
 *.prl
index b92164ae5aa298534b7e120c9d09158892384d95..9babde2811c0aff85871523ae6415156e3daf4d4 100644 (file)
--- a/ddtz.z80
+++ b/ddtz.z80
@@ -470,6 +470,10 @@ l0242h:
        jr c,l022dh             ;0258   38 d3   8 .\r
        ret                     ;025a   c9      .\r
 \r
+p_char_lparen:\r
+       ld a,'('\r
+       jr outchar\r
+\r
 outquote:\r
        ld a,''''               ;025b   3e 27   > '\r
 outchar:\r
@@ -1269,54 +1273,54 @@ l0625h:
        sub '0'                 ;062a   d6 30   . 0\r
        ret                     ;062c   c9      .\r
 \r
-prnt_cpustat0:\r
+p_cpustat0:\r
        call assert_eol         ;062d   cd d6 02        . . .\r
-prnt_cpustat:\r
-       call prnt_f             ;0630   cd 6e 06        . n .\r
+p_cpustat:\r
+       call p_f                ;0630   cd 6e 06        . n .\r
        call outbl2             ;0633   cd 9c 02        . . .\r
        ld hl,b_06e9_start      ;0636   21 e9 06        ! . .\r
        ld de,b_0709_start      ;0639   11 09 07        . . .\r
        ld b,6                  ;063c   06 06   . .\r
 l063eh:\r
-       call prnt_regs          ;063e   cd b2 06        . . .\r
+       call p_regs             ;063e   cd b2 06        . . .\r
        djnz l063eh             ;0641   10 fb   . .\r
        push hl                 ;0643   e5      .\r
        push de                 ;0644   d5      .\r
        ld iy,(REG.PC)          ;0645   fd 2a 60 00     . * ` .\r
-       call prnt_disas_instr   ;0649   cd 65 19        . e .\r
+       call p_disas_instr      ;0649   cd 65 19        . e .\r
        exx                     ;064c   d9      .\r
        ex af,af'               ;064d   08      .\r
        call crlf               ;064e   cd a3 02        . . .\r
-       call prnt_f2            ;0651   cd 81 06        . . .\r
+       call p_f2               ;0651   cd 81 06        . . .\r
        call outbl2             ;0654   cd 9c 02        . . .\r
        pop de                  ;0657   d1      .\r
        pop hl                  ;0658   e1      .\r
        ld b,7                  ;0659   06 07   . .\r
 l065bh:\r
-       call prnt_regs          ;065b   cd b2 06        . . .\r
+       call p_regs             ;065b   cd b2 06        . . .\r
        djnz l065bh             ;065e   10 fb   . .\r
        exx                     ;0660   d9      .\r
        ex af,af'               ;0661   08      .\r
        and a                   ;0662   a7      .\r
        jr z,l066bh             ;0663   28 06   ( .\r
        call outbl6             ;0665   cd 96 02        . . .\r
-       call prnt_offset        ;0668   cd 49 19        . I .\r
+       call p_offset           ;0668   cd 49 19        . I .\r
 l066bh:\r
        jp crlf                 ;066b   c3 a3 02        . . .\r
 \r
-prnt_f:\r
+p_f:\r
        ld a,(reg.f)            ;066e   3a 54 00        : T .\r
-       call prnt_flags         ;0671   cd 8a 06        . . .\r
+       call p_flags            ;0671   cd 8a 06        . . .\r
        ld a,(reg.iff)          ;0674   3a 5e 00        : ^ .\r
        cp 0f3h                 ;0677   fe f3   . .\r
        jp z,outbl              ;0679   ca 9f 02        . . .\r
        ld a,'E'                ;067c   3e 45   > E\r
        jp outchar              ;067e   c3 5d 02        . ] .\r
-prnt_f2:\r
+p_f2:\r
        ld a,(reg.f2)           ;0681   3a 4c 00        : L .\r
-       call prnt_flags         ;0684   cd 8a 06        . . .\r
+       call p_flags            ;0684   cd 8a 06        . . .\r
        jp outbl                ;0687   c3 9f 02        . . .\r
-prnt_flags:\r
+p_flags:\r
        ld b,a                  ;068a   47      G\r
        ld a,'S'                ;068b   3e 53   > S\r
        call sub_06aah          ;068d   cd aa 06        . . .\r
@@ -1335,7 +1339,8 @@ sub_06aah:
        rl b                    ;06aa   cb 10   . .\r
        jp c,outchar            ;06ac   da 5d 02        . ] .\r
        jp outbl                ;06af   c3 9f 02        . . .\r
-prnt_regs:\r
+\r
+p_regs:\r
        push bc                 ;06b2   c5      .\r
        push de                 ;06b3   d5      .\r
        call pstr               ;06b4   cd 88 02        . . .\r
@@ -1673,7 +1678,7 @@ l08dfh:
        jp z,l2151h             ;08ff   ca 51 21        . Q !\r
 l0902h:\r
        call bp_clr_temporary   ;0902   cd 54 07        . T .\r
-       call prnt_cpustat       ;0905   cd 30 06        . 0 .\r
+       call p_cpustat          ;0905   cd 30 06        . 0 .\r
        jp mainloop             ;0908   c3 bd 00        . . .\r
 \r
 l090bh:\r
@@ -1834,7 +1839,7 @@ user_go:
        ld (b_21e2_start),a     ;0a26   32 e2 21        2 . !\r
        ld a,(l0941h)           ;0a29   3a 41 09        : A .\r
        and a                   ;0a2c   a7      .\r
-       call nz,prnt_cpustat    ;0a2d   c4 30 06        . 0 .\r
+       call nz,p_cpustat       ;0a2d   c4 30 06        . 0 .\r
        call sub_09a6h          ;0a30   cd a6 09        . . .\r
        ld c,007h               ;0a33   0e 07   . .\r
        jr nz,l0a41h            ;0a35   20 0a     .\r
@@ -1983,7 +1988,7 @@ sub_0bdch:
 cmd_X:\r
        call skipbl             ;0bf1   cd bf 02        . . .\r
        call sub_0caeh          ;0bf4   cd ae 0c        . . .\r
-       jp nc,prnt_cpustat0     ;0bf7   d2 2d 06        . - .\r
+       jp nc,p_cpustat0        ;0bf7   d2 2d 06        . - .\r
        call assert_eol         ;0bfa   cd d6 02        . . .\r
        ld a,b                  ;0bfd   78      x\r
        cp 01eh                 ;0bfe   fe 1e   . .\r
@@ -2037,7 +2042,7 @@ l0c33h:
        jp out.hl.@             ;0c4c   c3 a4 01        . . .\r
 \r
 l0c4fh:\r
-       call prnt_f             ;0c4f   cd 6e 06        . n .\r
+       call p_f                ;0c4f   cd 6e 06        . n .\r
        ld a,0f3h               ;0c52   3e f3   > .\r
        ld (reg.iff),a          ;0c54   32 5e 00        2 ^ .\r
        scf                     ;0c57   37      7\r
@@ -2045,7 +2050,7 @@ l0c4fh:
        ld (reg.f),a            ;0c5b   32 54 00        2 T .\r
        ret                     ;0c5e   c9      .\r
 l0c5fh:\r
-       call prnt_f2            ;0c5f   cd 81 06        . . .\r
+       call p_f2               ;0c5f   cd 81 06        . . .\r
        and a                   ;0c62   a7      .\r
        call sub_0c6ah          ;0c63   cd 6a 0c        . j .\r
        ld (reg.f2),a           ;0c66   32 4c 00        2 L .\r
@@ -2350,7 +2355,7 @@ l0e1fh:
 \r
 cmd_H:\r
        call expr               ;0e3d   cd be 03        . . .\r
-       jp c,prnt_max_high0     ;0e40   da 6f 11        . o .\r
+       jp c,p_max_high0        ;0e40   da 6f 11        . o .\r
        call next_arg           ;0e43   cd ca 02        . . .\r
        push hl                 ;0e46   e5      .\r
        call expr               ;0e47   cd be 03        . . .\r
@@ -2765,7 +2770,7 @@ read_file:
 l108eh:\r
        call read_sector        ;108e   cd 21 11        . ! .\r
        pop hl                  ;1091   e1      .\r
-       jp z,prnt_max_high      ;1092   ca 72 11        . r .\r
+       jp z,p_max_high         ;1092   ca 72 11        . r .\r
        ld de,DMA_BUF           ;1095   11 80 00        . . .\r
        ld b,080h               ;1098   06 80   . .\r
 l109ah:\r
@@ -2817,7 +2822,7 @@ l10cch:
        jr l10aeh               ;10e2   18 ca   . .\r
 rdhex_done:\r
        pop hl                  ;10e4   e1      .\r
-       jp prnt_max_high        ;10e5   c3 72 11        . r .\r
+       jp p_max_high           ;10e5   c3 72 11        . r .\r
 \r
 read_hexchar:\r
        call read_hexdigit      ;10e8   cd f9 10        . . .\r
@@ -2913,9 +2918,9 @@ strncmp:
        djnz strncmp            ;116c   10 f9   . .\r
        ret                     ;116e   c9      .\r
 \r
-prnt_max_high0:\r
+p_max_high0:\r
        call assert_eol         ;116f   cd d6 02        . . .\r
-prnt_max_high:\r
+p_max_high:\r
        ld hl,msg_high          ;1172   21 8d 11        ! . .\r
        call pstr               ;1175   cd 88 02        . . .\r
        ld hl,(high_load)       ;1178   2a 9c 11        * . .\r
@@ -3010,7 +3015,7 @@ l1211h:
        ld (last_A),hl          ;1214   22 64 12        " d .\r
        ld (l0062h),hl          ;1217   22 62 00        " b .\r
        push hl                 ;121a   e5      .\r
-       call prnt_disas_line    ;121b   cd 2d 19        . - .\r
+       call p_disas_line       ;121b   cd 2d 19        . - .\r
        pop iy                  ;121e   fd e1   . .\r
        ld c,b                  ;1220   48      H\r
        ld de,(offs.@)          ;1221   ed 5b 64 00     . [ d .\r
@@ -4168,7 +4173,7 @@ l18ebh:
        push iy                 ;18ec   fd e5   . .\r
        pop hl                  ;18ee   e1      .\r
        push hl                 ;18ef   e5      .\r
-       call prnt_disas_line    ;18f0   cd 2d 19        . - .\r
+       call p_disas_line       ;18f0   cd 2d 19        . - .\r
        call crlf               ;18f3   cd a3 02        . . .\r
        pop iy                  ;18f6   fd e1   . .\r
        ld c,b                  ;18f8   48      H\r
@@ -4191,7 +4196,7 @@ l190fh:
        push iy                 ;1910   fd e5   . .\r
        pop hl                  ;1912   e1      .\r
        push hl                 ;1913   e5      .\r
-       call prnt_disas_line    ;1914   cd 2d 19        . - .\r
+       call p_disas_line       ;1914   cd 2d 19        . - .\r
        call crlf               ;1917   cd a3 02        . . .\r
        pop iy                  ;191a   fd e1   . .\r
        ld e,b                  ;191c   58      X\r
@@ -4205,13 +4210,13 @@ l190fh:
        ret c                   ;192a   d8      .\r
        jr l190fh               ;192b   18 e2   . .\r
 \r
-prnt_disas_line:\r
+p_disas_line:\r
        call out.hl.@           ;192d   cd a4 01        . . .\r
        call z,outbl            ;1930   cc 9f 02        . . .\r
        call outbl              ;1933   cd 9f 02        . . .\r
        sub a                   ;1936   97      .\r
        ld (con_col),a          ;1937   32 72 02        2 r .\r
-       call prnt_disas_instr   ;193a   cd 65 19        . e .\r
+       call p_disas_instr      ;193a   cd 65 19        . e .\r
        and a                   ;193d   a7      .\r
        ret z                   ;193e   c8      .\r
 \r
@@ -4221,28 +4226,26 @@ l193fh:
        cp 16                   ;1945   fe 10   . .\r
        jr c,l193fh             ;1947   38 f6   8 .\r
 \r
-prnt_offset:\r
+p_offset:\r
        ld de,(offs.@)          ;1949   ed 5b 64 00     . [ d .\r
        ld a,d                  ;194d   7a      z\r
        or e                    ;194e   b3      .\r
        ret z                   ;194f   c8      .\r
-       ld a,'('                ;1950   3e 28   > (\r
-       call outchar            ;1952   cd 5d 02        . ] .\r
+       call p_char_lparen      ;1952   cd 5d 02        . ] .\r
        ld a,'@'                ;1955   3e 40   > @\r
        call outchar            ;1957   cd 5d 02        . ] .\r
        and a                   ;195a   a7      .\r
        sbc hl,de               ;195b   ed 52   . R\r
        call out_hl             ;195d   cd 13 02        . . .\r
-       ld a,')'                ;1960   3e 29   > )\r
-       jp outchar              ;1962   c3 5d 02        . ] .\r
+       jp out_rparen           ;1962   c3 5d 02        . ] .\r
 \r
-prnt_disas_instr:\r
+p_disas_instr:\r
        sub a                   ;1965   97      .\r
        ld (l1ffdh),a           ;1966   32 fd 1f        2 . .\r
        call disas_get_instrlen ;1969   cd 8c 19        . . .\r
        jr nc,l197fh            ;196c   30 11   0 .\r
        push bc                 ;196e   c5      .\r
-       call prnt_mnemonic      ;196f   cd b9 1e        . . .\r
+       call p_mnemonic         ;196f   cd b9 1e        . . .\r
        ex de,hl                ;1972   eb      .\r
        call call_hl            ;1973   cd c1 19        . . .\r
        pop bc                  ;1976   c1      .\r
@@ -4499,51 +4502,51 @@ b_1ab6_start:
 ;        dw argument formating fuction\r
 b_1ad1_start:\r
        db 0c0h,040h,056h       ;ld r,r\r
-       dw l1c88h\r
+       dw p_arg_r_r\r
        db 0f8h,080h,003h       ;add a,r\r
-       dw l1c91h\r
+       dw p_arg_a_r\r
        db 0f8h,088h,000h       ;adc a,r\r
-       dw l1c91h\r
-       db 0f8h,090h,0c9h       ;\r
-       dw l1e30h\r
-       db 0f8h,098h,0b7h       ;\r
-       dw l1c91h\r
-       db 0f8h,0a0h,006h       ;\r
-       dw l1e30h\r
-       db 0f8h,0a8h,0cch       ;\r
-       dw l1e30h\r
-       db 0f8h,0b0h,06ch       ;\r
-       dw l1e30h\r
-       db 0f8h,0b8h,013h       ;\r
-       dw l1e30h\r
+       dw p_arg_a_r\r
+       db 0f8h,090h,0c9h       ;sub r\r
+       dw p_arg_rs\r
+       db 0f8h,098h,0b7h       ;sbc a,r\r
+       dw p_arg_a_r\r
+       db 0f8h,0a0h,006h       ;and r\r
+       dw p_arg_rs\r
+       db 0f8h,0a8h,0cch       ;xor r\r
+       dw p_arg_rs\r
+       db 0f8h,0b0h,06ch       ;or r\r
+       dw p_arg_rs\r
+       db 0f8h,0b8h,013h       ;cp r\r
+       dw p_arg_rs\r
        db 0c7h,0c0h,08bh       ;ret cc\r
-       dw prnt_arg_cc\r
+       dw p_arg_cc\r
        db 0c7h,0c7h,0b4h       ;rst\r
        dw l1c98h\r
        db 0ffh,0c9h,08bh       ;ret\r
        dw l1c97h\r
        db 0cfh,0c1h,081h       ;pop rr\r
-       dw prnt_arg_zz\r
+       dw p_arg_zz\r
        db 0cfh,0c5h,084h       ;push rr\r
-       dw prnt_arg_zz\r
+       dw p_arg_zz\r
        db 0ffh,0e3h,034h       ;ex (sp),hl\r
        dw l1ca0h\r
        db 0ffh,0e9h,052h       ;jp (hl)\r
        dw l1caeh\r
        db 0ffh,0ebh,034h       ;ex de,hl\r
-       dw l1cbbh\r
+       dw p_arg_ex_dehl\r
        db 0ffh,0f9h,056h       ;ld sp,hl\r
        dw l1cc1h\r
        db 0cfh,003h,041h       ;inc rr\r
-       dw prnt_arg_ww\r
+       dw p_arg_ww\r
        db 0cfh,00bh,029h       ;dec rr\r
-       dw prnt_arg_ww\r
+       dw p_arg_ww\r
        db 0c7h,004h,041h       ;inc r\r
-       dw l1e28h\r
+       dw p_arg_r\r
        db 0c7h,005h,029h       ;dec r\r
-       dw l1e28h\r
+       dw p_arg_r\r
        db 0ffh,008h,034h       ;ex af,af'\r
-       dw l1ccdh\r
+       dw p_arg_ex_afaf\r
        db 0cfh,009h,003h       ;add hl,rr\r
        dw l1cd3h\r
        db 0efh,002h,056h       ;ld (rr),a ;rr=bc,de\r
@@ -4586,24 +4589,24 @@ b_1b54_start:
 \r
 ;      3 byte opcodes\r
 b_1b9b_start:\r
-       db 0c7h,0c2h,052h       ;\r
-       dw l1d42h\r
-       db 0c7h,0c4h,00ch       ;\r
-       dw l1d42h\r
-       db 0cfh,001h,056h       ;\r
-       dw l1d5ah\r
-       db 0ffh,0c3h,052h       ;\r
-       dw l1d48h\r
-       db 0ffh,0cdh,00ch       ;\r
-       dw l1d48h\r
-       db 0ffh,022h,056h       ;\r
-       dw l1d62h\r
-       db 0ffh,02ah,056h       ;\r
-       dw l1d6bh\r
-       db 0ffh,032h,056h       ;\r
-       dw l1d74h\r
-       db 0ffh,03ah,056h       ;\r
-       dw l1d7fh\r
+       db 0c7h,0c2h,052h       ;jp cc,mn\r
+       dw p_arg_cc_mn\r
+       db 0c7h,0c4h,00ch       ;call cc,mn\r
+       dw p_arg_cc_mn\r
+       db 0cfh,001h,056h       ;ld ww,mn\r
+       dw p_arg_ww_mn\r
+       db 0ffh,0c3h,052h       ;jp mn\r
+       dw p_arg_mn\r
+       db 0ffh,0cdh,00ch       ;call mn\r
+       dw p_arg_mn\r
+       db 0ffh,022h,056h       ;ld (mn),hl\r
+       dw p_arg_addr_hl\r
+       db 0ffh,02ah,056h       ;ld hl,(mn)\r
+       dw p_arg_hl_addr\r
+       db 0ffh,032h,056h       ;ld (mn),a\r
+       dw p_arg_addr_a\r
+       db 0ffh,03ah,056h       ;ld a,(mn)\r
+       dw p_arg_a_addr\r
        db 0\r
 \r
 ; Prefix ED + 1 byte opcode, no arguments\r
@@ -4639,17 +4642,17 @@ b_1bc9_start:
 \r
 b_1bf4_start:\r
        db 0e7h,040h,03fh       ;in r,(c) ;r=b,c,d,e\r
-       dw l1db3h               ;\r
+       dw p_arg_in_c           ;\r
        db 0f7h,060h,03fh       ;in r,(c) ;r=h,l\r
-       dw l1db3h               ;\r
+       dw p_arg_in_c           ;\r
        db 0ffh,078h,03fh       ;in r,(c) ;r=a\r
-       dw l1db3h               ;\r
+       dw p_arg_in_c           ;\r
        db 0e7h,041h,076h       ;out (c),r ;r=b,c,d,e\r
-       dw l1dbfh               ;\r
+       dw p_arg_out_c          ;\r
        db 0f7h,061h,076h       ;out (c),r ;r=h,l\r
-       dw l1dbfh               ;\r
+       dw p_arg_out_c          ;\r
        db 0ffh,079h,076h       ;out (c),r ;r=a\r
-       dw l1dbfh               ;\r
+       dw p_arg_out_c          ;\r
        db 0cfh,042h,0b7h       ;sbc hl,rr\r
        dw l1dcah               ;\r
        db 0cfh,04ah,000h       ;adc hl,rr\r
@@ -4669,24 +4672,24 @@ b_1bf4_start:
        db 0ffh,05fh,056h       ;ld a,r\r
        dw l1da1h\r
        db 0cfh,04ch,0d2h       ;mlt rr\r
-       dw prnt_arg_ww\r
+       dw p_arg_ww\r
        db 0c7h,004h,0eeh       ;tst r\r
-       dw l1e28h\r
+       dw p_arg_r\r
        db 0\r
 \r
 l228bh:\r
        db 0e7h,000h,0cfh       ;in0 r,(m) ;r=b,c,d,e\r
-       dw l230ch\r
+       dw p_arg_r_m\r
        db 0f7h,020h,0cfh       ;in0 r,(m) ;r=h,l\r
-       dw l230ch\r
+       dw p_arg_r_m\r
        db 0ffh,038h,0cfh       ;in0 a,(m)\r
-       dw l230ch\r
+       dw p_arg_r_m\r
        db 0e7h,001h,0e7h       ;out0 (m),r ;r=b,c,d,e\r
-       dw l2315h\r
+       dw p_arg_m_r\r
        db 0f7h,021h,0e7h       ;out0 (m),r ;r=h,l\r
-       dw l2315h\r
+       dw p_arg_m_r\r
        db 0ffh,039h,0e7h       ;out0 (m),a\r
-       dw l2315h\r
+       dw p_arg_m_r\r
        db 0ffh,064h,0eeh       ;tst m\r
        dw l1d09h\r
        db 0ffh,074h,0f1h       ;tstio m\r
@@ -4695,13 +4698,13 @@ l228bh:
 \r
 b_1c40_start:\r
        db 0efh,043h,056h       ;ld (mn),ww     ;ww=bc,de\r
-       dw l1dd3h\r
+       dw p_arg_addr_ww\r
        db 0ffh,073h,056h       ;ld (mn),sp\r
-       dw l1dd3h\r
+       dw p_arg_addr_ww\r
        db 0efh,04bh,056h       ;ld ww,(mn)     ;ww=bc,de\r
-       dw l1ddch\r
+       dw p_arg_ww_addr\r
        db 0ffh,07bh,056h       ;ld sp,(mn)\r
-       dw l1ddch\r
+       dw p_arg_ww_addr\r
        db 0\r
 \r
 ; CB\r
@@ -4721,87 +4724,92 @@ b_1c55_start:
        db 0f8h,038h,0c6h       ;srl g\r
        dw l1e03h\r
        db 0c0h,040h,009h       ;bit b,g\r
-       dw l1de4h\r
+       dw p_arg_bitop\r
        db 0c0h,080h,088h       ;res b,g\r
-       dw l1de4h\r
+       dw p_arg_bitop\r
        db 0c0h,0c0h,0bdh       ;set b,g\r
-       dw l1de4h\r
+       dw p_arg_bitop\r
        db 0\r
 \r
-l1c88h:\r
-       call l1e28h             ;1c88   cd 28 1e        . ( .\r
-       call prnt_char_comma    ;1c8b   cd b4 1e        . . .\r
-       jp l1e30h               ;1c8e   c3 30 1e        . 0 .\r
-l1c91h:\r
-       call prnt_A_comma       ;1c91   cd b1 1e        . . .\r
-       jp l1e30h               ;1c94   c3 30 1e        . 0 .\r
+p_arg_r_r:\r
+       call p_arg_r            ;1c88   cd 28 1e        . ( .\r
+       call p_char_comma       ;1c8b   cd b4 1e        . . .\r
+       jp p_arg_rs             ;1c8e   c3 30 1e        . 0 .\r
+p_arg_a_r:\r
+       call p_A_comma          ;1c91   cd b1 1e        . . .\r
+       jp p_arg_rs             ;1c94   c3 30 1e        . 0 .\r
 l1c97h:\r
        ret                     ;1c97   c9      .\r
 \r
 ;-----------------------------------------------------\r
-l230ch:\r
-       call l1e28h\r
-       call prnt_char_comma\r
+p_arg_r_m:\r
+       call p_arg_r\r
+       call p_char_comma\r
        jp sub_1d2ch\r
-l2315h:\r
+\r
+p_arg_m_r:\r
        call sub_1d2ch\r
-       call prnt_char_comma\r
-       jp l1e28h\r
+       call p_char_comma\r
+       jp p_arg_r\r
 ;-----------------------------------------------------\r
 \r
 l1c98h:\r
        ld a,(iy+000h)          ;1c98   fd 7e 00        . ~ .\r
        and 038h                ;1c9b   e6 38   . 8\r
        jp out_hex              ;1c9d   c3 18 02        . . .\r
+\r
 l1ca0h:\r
        ld hl,b_1ca9_start      ;1ca0   21 a9 1c        ! . .\r
        call pstr               ;1ca3   cd 88 02        . . .\r
-       jp prnt_arg_hlixiy      ;1ca6   c3 7e 1e        . ~ .\r
+       jp p_arg_hlixiy         ;1ca6   c3 7e 1e        . ~ .\r
 \r
 b_1ca9_start:\r
        DC      '(SP),'\r
+\r
 l1caeh:\r
-       ld a,'('                ;1cae   3e 28   > (\r
-       call outchar            ;1cb0   cd 5d 02        . ] .\r
-       call prnt_arg_hlixiy    ;1cb3   cd 7e 1e        . ~ .\r
-       ld a,')'                ;1cb6   3e 29   > )\r
-       jp outchar              ;1cb8   c3 5d 02        . ] .\r
-l1cbbh:\r
+       call p_char_lparen      ;1cb0   cd 5d 02        . ] .\r
+       call p_arg_hlixiy       ;1cb3   cd 7e 1e        . ~ .\r
+       jr out_rparen\r
+\r
+p_arg_ex_dehl:\r
        ld hl,l1773h            ;1cbb   21 73 17        ! s .\r
        jp pstr                 ;1cbe   c3 88 02        . . .\r
+\r
 l1cc1h:\r
        ld hl,b_1cca_start      ;1cc1   21 ca 1c        ! . .\r
        call pstr               ;1cc4   cd 88 02        . . .\r
-       jp prnt_arg_hlixiy      ;1cc7   c3 7e 1e        . ~ .\r
+       jp p_arg_hlixiy         ;1cc7   c3 7e 1e        . ~ .\r
 \r
 b_1cca_start:\r
        DC      'SP,'\r
-l1ccdh:\r
+\r
+p_arg_ex_afaf:\r
        ld hl,b_176d_start      ;1ccd   21 6d 17        ! m .\r
        jp pstr                 ;1cd0   c3 88 02        . . .\r
+\r
 l1cd3h:\r
-       call prnt_arg_hlixiy    ;1cd3   cd 7e 1e        . ~ .\r
-       call prnt_char_comma    ;1cd6   cd b4 1e        . . .\r
-       jp prnt_arg_ww          ;1cd9   c3 8b 1e        . . .\r
+       call p_arg_hlixiy       ;1cd3   cd 7e 1e        . ~ .\r
+       call p_char_comma       ;1cd6   cd b4 1e        . . .\r
+       jp p_arg_ww             ;1cd9   c3 8b 1e        . . .\r
 l1cdch:\r
        call sub_1ce8h          ;1cdc   cd e8 1c        . . .\r
-       call prnt_char_comma    ;1cdf   cd b4 1e        . . .\r
-       jp prnt_char_A          ;1ce2   c3 3d 1d        . = .\r
+       call p_char_comma       ;1cdf   cd b4 1e        . . .\r
+       jp p_char_A             ;1ce2   c3 3d 1d        . = .\r
 \r
 l1ce5h:\r
-       call prnt_A_comma       ;1ce5   cd b1 1e        . . .\r
+       call p_A_comma          ;1ce5   cd b1 1e        . . .\r
 sub_1ce8h:\r
-       ld a,'('                ;1ce8   3e 28   > (\r
-       call outchar            ;1cea   cd 5d 02        . ] .\r
-       call prnt_arg_ww        ;1ced   cd 8b 1e        . . .\r
-       ld a,')'                ;1cf0   3e 29   > )\r
-       jp outchar              ;1cf2   c3 5d 02        . ] .\r
+       call p_char_lparen      ;1cea   cd 5d 02        . ] .\r
+       call p_arg_ww           ;1ced   cd 8b 1e        . . .\r
+out_rparen:\r
+       jp p_char_rparen        ;1cf2   c3 5d 02        . ] .\r
+\r
 l1cf5h:\r
-       call prnt_A_comma       ;1cf5   cd b1 1e        . . .\r
+       call p_A_comma          ;1cf5   cd b1 1e        . . .\r
        jr l1d09h               ;1cf8   18 0f   . .\r
 l1cfah:\r
-       call l1e28h             ;1cfa   cd 28 1e        . ( .\r
-       call prnt_char_comma    ;1cfd   cd b4 1e        . . .\r
+       call p_arg_r            ;1cfa   cd 28 1e        . ( .\r
+       call p_char_comma       ;1cfd   cd b4 1e        . . .\r
        ld a,(isprefix_ixiy)    ;1d00   3a f8 1f        : . .\r
        and a                   ;1d03   a7      .\r
        ld a,(iy+002h)          ;1d04   fd 7e 02        . ~ .\r
@@ -4814,8 +4822,8 @@ l1d0ch:
 l1d0fh:\r
        ld a,(iy+000h)          ;1d0f   fd 7e 00        . ~ .\r
        and 018h                ;1d12   e6 18   . .\r
-       call prnt_arg_cc0       ;1d14   cd a0 1e        . . .\r
-       call prnt_char_comma    ;1d17   cd b4 1e        . . .\r
+       call p_arg_cc0          ;1d14   cd a0 1e        . . .\r
+       call p_char_comma       ;1d17   cd b4 1e        . . .\r
 l1d1ah:\r
        ld c,(iy+001h)          ;1d1a   fd 4e 01        . N .\r
        ld a,c                  ;1d1d   79      y\r
@@ -4829,23 +4837,19 @@ l1d1ah:
        inc hl                  ;1d26   23      #\r
        jr l1d4eh               ;1d27   18 25   . %\r
 l1d29h:\r
-       call prnt_A_comma       ;1d29   cd b1 1e        . . .\r
+       call p_A_comma          ;1d29   cd b1 1e        . . .\r
 sub_1d2ch:\r
-       ld a,'('                ;1d2c   3e 28   > (\r
-       call outchar            ;1d2e   cd 5d 02        . ] .\r
+       call p_char_lparen      ;1d2e   cd 5d 02        . ] .\r
        ld a,(iy+001h)          ;1d31   fd 7e 01        . ~ .\r
        jp l1e6bh               ;1d34   c3 6b 1e        . k .\r
 l1d37h:\r
        call sub_1d2ch          ;1d37   cd 2c 1d        . , .\r
-       call prnt_char_comma    ;1d3a   cd b4 1e        . . .\r
-prnt_char_A:\r
-       ld a,'A'                ;1d3d   3e 41   > A\r
-       jp outchar              ;1d3f   c3 5d 02        . ] .\r
-\r
-l1d42h:\r
-       call prnt_arg_cc        ;1d42   cd 9d 1e        . . .\r
-       call prnt_char_comma    ;1d45   cd b4 1e        . . .\r
-l1d48h:\r
+       jr p_char_comma_A\r
+\r
+p_arg_cc_mn:\r
+       call p_arg_cc           ;1d42   cd 9d 1e        . . .\r
+       call p_char_comma       ;1d45   cd b4 1e        . . .\r
+p_arg_mn:\r
        ld l,(iy+001h)          ;1d48   fd 6e 01        . n .\r
        ld h,(iy+002h)          ;1d4b   fd 66 02        . f .\r
 l1d4eh:\r
@@ -4855,36 +4859,47 @@ sub_1d50h:
        ld (l1ffbh),hl          ;1d53   22 fb 1f        " . .\r
        call out_hl             ;1d56   cd 13 02        . . .\r
        ret                     ;1d59   c9      .\r
-l1d5ah:\r
-       call prnt_arg_ww        ;1d5a   cd 8b 1e        . . .\r
-       call prnt_char_comma    ;1d5d   cd b4 1e        . . .\r
-       jr l1d48h               ;1d60   18 e6   . .\r
-l1d62h:\r
+p_arg_ww_mn:\r
+       call p_arg_ww           ;1d5a   cd 8b 1e        . . .\r
+       call p_char_comma       ;1d5d   cd b4 1e        . . .\r
+       jr p_arg_mn             ;1d60   18 e6   . .\r
+\r
+p_arg_addr_hl:\r
        call sub_1e13h          ;1d62   cd 13 1e        . . .\r
-       call prnt_char_comma    ;1d65   cd b4 1e        . . .\r
-       jp prnt_arg_hlixiy      ;1d68   c3 7e 1e        . ~ .\r
-l1d6bh:\r
-       call prnt_arg_hlixiy    ;1d6b   cd 7e 1e        . ~ .\r
-       call prnt_char_comma    ;1d6e   cd b4 1e        . . .\r
+       call p_char_comma       ;1d65   cd b4 1e        . . .\r
+       jp p_arg_hlixiy         ;1d68   c3 7e 1e        . ~ .\r
+p_arg_hl_addr:\r
+       call p_arg_hlixiy       ;1d6b   cd 7e 1e        . ~ .\r
+       call p_char_comma       ;1d6e   cd b4 1e        . . .\r
        jp sub_1e13h            ;1d71   c3 13 1e        . . .\r
-l1d74h:\r
+\r
+p_arg_addr_a:\r
        call sub_1e13h          ;1d74   cd 13 1e        . . .\r
-       call prnt_char_comma    ;1d77   cd b4 1e        . . .\r
+p_char_comma_A:\r
+       call p_char_comma       ;1d77   cd b4 1e        . . .\r
+p_char_A:\r
        ld a,'A'                ;1d7a   3e 41   > A\r
-       jp outchar              ;1d7c   c3 5d 02        . ] .\r
-l1d7fh:\r
-       call prnt_A_comma       ;1d7f   cd b1 1e        . . .\r
+       jr outchar1             ;1d87   18 06   . .\r
+p_arg_a_addr:\r
+       call p_A_comma          ;1d7f   cd b1 1e        . . .\r
        jp sub_1e13h            ;1d82   c3 13 1e        . . .\r
 l1d85h:\r
        ld a,'0'                ;1d85   3e 30   > 0\r
-       jr l1d8fh               ;1d87   18 06   . .\r
+       jr outchar1             ;1d87   18 06   . .\r
 l1d89h:\r
        ld a,'1'                ;1d89   3e 31   > 1\r
-       jr l1d8fh               ;1d8b   18 02   . .\r
+       jr outchar1             ;1d8b   18 02   . .\r
 l1d8dh:\r
        ld a,'2'                ;1d8d   3e 32   > 2\r
-l1d8fh:\r
-       jp outchar              ;1d8f   c3 5d 02        . ] .\r
+       jr outchar1             ;1d8b   18 02   . .\r
+\r
+p_A_comma:\r
+       call p_char_A           ;1eb1   cd 3d 1d        . = .\r
+p_char_comma:\r
+       ld a,','                ;1eb4   3e 2c   > ,\r
+outchar1:\r
+       jp outchar              ;1eb6   c3 5d 02        . ] .\r
+\r
 l1d92h:\r
        ld hl,b_1da7_start      ;1d92   21 a7 1d        ! . .\r
        jr l1da4h               ;1d95   18 0d   . .\r
@@ -4908,29 +4923,34 @@ l1dadh:
 l1db0h:\r
        DC      'A,R'\r
 \r
-l1db3h:\r
-       call l1e28h             ;1db3   cd 28 1e        . ( .\r
-       call prnt_char_comma    ;1db6   cd b4 1e        . . .\r
+p_arg_in_c:\r
+       call p_arg_r            ;1db3   cd 28 1e        . ( .\r
+       call p_char_comma       ;1db6   cd b4 1e        . . .\r
        ld hl,t__C_             ;1db9   21 f4 1f        ! . .\r
        jp pstr                 ;1dbc   c3 88 02        . . .\r
-l1dbfh:\r
+\r
+p_arg_out_c:\r
        ld hl,t__C_             ;1dbf   21 f4 1f        ! . .\r
        call pstr               ;1dc2   cd 88 02        . . .\r
-       call prnt_char_comma    ;1dc5   cd b4 1e        . . .\r
-       jr l1e28h               ;1dc8   18 5e   . ^\r
+       call p_char_comma       ;1dc5   cd b4 1e        . . .\r
+       jr p_arg_r              ;1dc8   18 5e   . ^\r
+\r
 l1dcah:\r
-       call prnt_arg_hlixiy    ;1dca   cd 7e 1e        . ~ .\r
-       call prnt_char_comma    ;1dcd   cd b4 1e        . . .\r
-       jp prnt_arg_ww          ;1dd0   c3 8b 1e        . . .\r
-l1dd3h:\r
+       call p_arg_hlixiy       ;1dca   cd 7e 1e        . ~ .\r
+       call p_char_comma       ;1dcd   cd b4 1e        . . .\r
+       jp p_arg_ww             ;1dd0   c3 8b 1e        . . .\r
+\r
+p_arg_addr_ww:\r
        call sub_1e13h          ;1dd3   cd 13 1e        . . .\r
-       call prnt_char_comma    ;1dd6   cd b4 1e        . . .\r
-       jp prnt_arg_ww          ;1dd9   c3 8b 1e        . . .\r
-l1ddch:\r
-       call prnt_arg_ww        ;1ddc   cd 8b 1e        . . .\r
-       call prnt_char_comma    ;1ddf   cd b4 1e        . . .\r
+       call p_char_comma       ;1dd6   cd b4 1e        . . .\r
+       jp p_arg_ww             ;1dd9   c3 8b 1e        . . .\r
+\r
+p_arg_ww_addr:\r
+       call p_arg_ww           ;1ddc   cd 8b 1e        . . .\r
+       call p_char_comma       ;1ddf   cd b4 1e        . . .\r
        jr sub_1e13h            ;1de2   18 2f   . /\r
-l1de4h:\r
+\r
+p_arg_bitop:\r
        ld a,(isprefix_ixiy)    ;1de4   3a f8 1f        : . .\r
        and a                   ;1de7   a7      .\r
        jr nz,l1defh            ;1de8   20 05     .\r
@@ -4946,9 +4966,10 @@ l1df2h:
        and 007h                ;1df6   e6 07   . .\r
        add a,'0'               ;1df8   c6 30   . 0\r
        call outchar            ;1dfa   cd 5d 02        . ] .\r
-       call prnt_char_comma    ;1dfd   cd b4 1e        . . .\r
+       call p_char_comma       ;1dfd   cd b4 1e        . . .\r
        pop af                  ;1e00   f1      .\r
-       jr l1e33h               ;1e01   18 30   . 0\r
+       jr p_arg_r0             ;1e01   18 30   . 0\r
+\r
 l1e03h:\r
        ld a,(isprefix_ixiy)    ;1e03   3a f8 1f        : . .\r
        and a                   ;1e06   a7      .\r
@@ -4958,32 +4979,35 @@ l1e03h:
 l1e0eh:\r
        ld a,(iy+002h)          ;1e0e   fd 7e 02        . ~ .\r
 l1e11h:\r
-       jr l1e33h               ;1e11   18 20   .\r
+       jr p_arg_r0             ;1e11   18 20   .\r
+\r
 sub_1e13h:\r
-       ld a,'('                ;1e13   3e 28   > (\r
-       call outchar            ;1e15   cd 5d 02        . ] .\r
+       call p_char_lparen      ;1e15   cd 5d 02        . ] .\r
        ld l,(iy+001h)          ;1e18   fd 6e 01        . n .\r
        ld h,(iy+002h)          ;1e1b   fd 66 02        . f .\r
        ld a,001h               ;1e1e   3e 01   > .\r
        call sub_1d50h          ;1e20   cd 50 1d        . P .\r
+\r
+p_char_rparen:\r
        ld a,')'                ;1e23   3e 29   > )\r
        jp outchar              ;1e25   c3 5d 02        . ] .\r
-l1e28h:\r
+\r
+p_arg_r:\r
        ld a,(iy+000h)          ;1e28   fd 7e 00        . ~ .\r
        rra                     ;1e2b   1f      .\r
        rra                     ;1e2c   1f      .\r
        rra                     ;1e2d   1f      .\r
-       jr l1e33h               ;1e2e   18 03   . .\r
-l1e30h:\r
+       jr p_arg_r0             ;1e2e   18 03   . .\r
+p_arg_rs:\r
        ld a,(iy+000h)          ;1e30   fd 7e 00        . ~ .\r
-l1e33h:\r
+p_arg_r0:\r
        and 007h                ;1e33   e6 07   . .\r
        cp 006h                 ;1e35   fe 06   . .\r
-       jr nz,prnt_arg_r        ;1e37   20 3a     :\r
+       jr nz,p_arg_r1          ;1e37   20 3a     :\r
        ld a,(isprefix_ixiy)    ;1e39   3a f8 1f        : . .\r
        and a                   ;1e3c   a7      .\r
        ld a,006h               ;1e3d   3e 06   > .\r
-       jr z,prnt_arg_r         ;1e3f   28 32   ( 2\r
+       jr z,p_arg_r1           ;1e3f   28 32   ( 2\r
        ld hl,b_1e78_start      ;1e41   21 78 1e        ! x .\r
        ld a,(isprefix_ixiy)    ;1e44   3a f8 1f        : . .\r
        dec a                   ;1e47   3d      =\r
@@ -5005,26 +5029,25 @@ l1e61h:
        neg                     ;1e69   ed 44   . D\r
 l1e6bh:\r
        call out_hex            ;1e6b   cd 18 02        . . .\r
-       ld a,')'                ;1e6e   3e 29   > )\r
-       jp outchar              ;1e70   c3 5d 02        . ] .\r
+       jr p_char_rparen\r
 \r
-prnt_arg_r:\r
+p_arg_r1:\r
        ld hl,t_BCDEHL_HL_A     ;1e73   21 96 1f        ! . .\r
-       jr prnt_arg             ;1e76   18 32   . 2\r
+       jr p_arg                ;1e76   18 32   . 2\r
 \r
 b_1e78_start:\r
        DC      '(IX'\r
 l1e7bh:\r
        DC      '(IY'\r
 \r
-prnt_arg_hlixiy:\r
+p_arg_hlixiy:\r
        ld a,(isprefix_ixiy)    ;1e7e   3a f8 1f        : . .\r
        ld hl,t_HL.IX.IY        ;1e81   21 c6 1f        ! . .\r
-       jr prnt_arg             ;1e84   18 24   . $\r
-prnt_arg_zz:\r
+       jr p_arg                ;1e84   18 24   . $\r
+p_arg_zz:\r
        ld hl,t_BC.DE.HL.AF     ;1e86   21 ab 1f        ! . .\r
        jr l1e8eh               ;1e89   18 03   . .\r
-prnt_arg_ww:\r
+p_arg_ww:\r
        ld hl,t_BC.DE.HL.SP     ;1e8b   21 a2 1f        ! . .\r
 l1e8eh:\r
        ld a,(iy+000h)          ;1e8e   fd 7e 00        . ~ .\r
@@ -5034,29 +5057,23 @@ l1e8eh:
        rra                     ;1e94   1f      .\r
        and 003h                ;1e95   e6 03   . .\r
        cp 002h                 ;1e97   fe 02   . .\r
-       jr z,prnt_arg_hlixiy            ;1e99   28 e3   ( .\r
-       jr prnt_arg             ;1e9b   18 0d   . .\r
+       jr z,p_arg_hlixiy       ;1e99   28 e3   ( .\r
+       jr p_arg                ;1e9b   18 0d   . .\r
 \r
-prnt_arg_cc:\r
+p_arg_cc:\r
        ld a,(iy+000h)          ;1e9d   fd 7e 00        . ~ .\r
-prnt_arg_cc0:\r
+p_arg_cc0:\r
        rra                     ;1ea0   1f      .\r
        rra                     ;1ea1   1f      .\r
        rra                     ;1ea2   1f      .\r
        and 007h                ;1ea3   e6 07   . .\r
        ld hl,t_tstfl_ZCPS      ;1ea5   21 dc 1f        ! . .\r
-prnt_arg:\r
+p_arg:\r
        ld b,a                  ;1eaa   47      G\r
        call sel_dc_string      ;1eab   cd 3d 03        . = .\r
        jp pstr                 ;1eae   c3 88 02        . . .\r
 \r
-prnt_A_comma:\r
-       call prnt_char_A        ;1eb1   cd 3d 1d        . = .\r
-prnt_char_comma:\r
-       ld a,','                ;1eb4   3e 2c   > ,\r
-       jp outchar              ;1eb6   c3 5d 02        . ] .\r
-\r
-prnt_mnemonic:\r
+p_mnemonic:\r
        call pstr               ;1eb9   cd 88 02        . . .\r
 l1ebch:\r
        call outbl              ;1ebc   cd 9f 02        . . .\r