Apple-2-SW
/
apple2_print_uint16
mirror of https://github.com/Michaelangel007/apple2_print_uint16.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Save another 8 bytes

This commit is contained in:
Michaelangel007 2017-07-06 15:28:28 -07:00
parent c7b6f04c31
commit ab3385672b
7 changed files with 19 additions and 41 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
README.md
View File

@ -5,9 +5,9 @@
Features: Features:
* Highly optimized for space * Highly optimized for space
* No zero-page usage [version](print_uint16.s) 89 ($59) bytes * No zero-page usage [version](print_uint16.s) 81 ($51) bytes
* With zero-page usage [version](print_uint16_zp.s) 77 ($4D) bytes * With zero-page usage [version](print_uint16_zp.s) 69 ($45) bytes
* With stack var usage [version](print_uint16_sp.s) 91 ($5B) bytes * With stack var usage [version](print_uint16_sp.s) 83 ($53) bytes
* Only 2 ROM entry points: COUT, SCRN2 * Only 2 ROM entry points: COUT, SCRN2
* Includes 7 byte demo * Includes 7 byte demo
@ -19,17 +19,16 @@ Sans-Zero-Page version:
```asm ```asm
0800:A9 12 A2 34 4C 07 08 8E 0800:A9 12 A2 34 4C 07 08 8E
0808:5F 08 48 A2 00 8E 5C 08 0808:57 08 48 A2 00 8E 54 08
0810:8E 5D 08 8E 5E 08 A2 10 0810:8E 55 08 8E 56 08 A2 10
0818:F8 0E 5F 08 68 2A 48 A0 0818:F8 0E 57 08 68 2A 48 A0
0820:FD B9 5F 07 79 5F 07 99 0820:FD B9 57 07 79 57 07 99
0828:5F 07 C8 D0 F4 CA D0 E9 0828:57 07 C8 D0 F4 CA D0 E9
0830:68 D8 A0 03 B9 5B 08 20 0830:68 D8 A0 03 B9 53 08 20
0838:41 08 88 D0 F7 8A F0 0E 0838:41 08 88 D0 F7 8A F0 0E
0840:60 48 20 7B F8 20 4B 08 0840:60 48 20 7B F8 20 4B 08
0848:68 29 0F D0 01 CA E8 F0 0848:68 29 0F D0 01 CA E8 F0
0850:EF C9 0A 90 02 69 06 69 0850:EF 4C E5 FD 00 00 00 00
0858:B0 4C ED FD 00 00 00 00
``` ```
With-Zero-Page version: With-Zero-Page version:
@ -44,8 +43,7 @@ With-Zero-Page version:
0930:39 09 88 D0 F7 8A F0 0E 0930:39 09 88 D0 F7 8A F0 0E
0938:60 48 20 7B F8 20 43 09 0938:60 48 20 7B F8 20 43 09
0940:68 29 0F D0 01 CA E8 F0 0940:68 29 0F D0 01 CA E8 F0
0948:EF C9 0A 90 02 69 06 69 0948:EF 4C E5 FD
0950:B0 4C ED FD
``` ```
With-Stack-Page version: With-Stack-Page version:
@ -61,9 +59,8 @@ With-Stack-Page version:
0A38:98 F0 19 60 BD 01 01 7D 0A38:98 F0 19 60 BD 01 01 7D
0A40:01 01 9D 01 01 E8 60 48 0A40:01 01 9D 01 01 E8 60 48
0A48:20 7B F8 20 51 0A 68 29 0A48:20 7B F8 20 51 0A 68 29
0A50:0F D0 01 88 C8 F0 E4 C9 0A50:0F D0 01 88 C8 F0 E4 4C
0A58:0A 90 02 69 06 69 B0 4C 0A58:E5 FD
0A60:ED FD
``` ```
# License # License

BIN
print_uint16
View File

Binary file not shown.

10
print_uint16.s
View File

@ -5,7 +5,7 @@
; Thanks to Gids for nudging a zero-page version ; Thanks to Gids for nudging a zero-page version
; F8 ROM Entry Points ; F8 ROM Entry Points
COUT = $FDED PRHEXZ = $FDE5
SCRN2 = $F879 SCRN2 = $F879
ORG $800 ORG $800
@ -82,13 +82,7 @@ _HexNib
_HaveLeadingDigit _HaveLeadingDigit
INX ; X = flag to specify non-zero leading digit was seen INX ; X = flag to specify non-zero leading digit was seen
BEQ _PrintDone BEQ _PrintDone
JMP PRHEXZ
CMP #$A ; n < 10 ?
BCC _Hex2Asc
ADC #6 ; n += 6 $A -> +6 + (C=1) = $11
_Hex2Asc
ADC #'0' + $80 ; inverse=remove #$80
JMP COUT
_bcd ds 3 ; 6 chars for printing dec _bcd ds 3 ; 6 chars for printing dec
_temp db 0 _temp db 0

BIN
print_uint16_sp
View File

Binary file not shown.

11
print_uint16_sp.s
View File

@ -5,7 +5,7 @@
; Thanks to Gids for nudging a zero-page version ; Thanks to Gids for nudging a zero-page version
; F8 ROM Entry Points ; F8 ROM Entry Points
COUT = $FDED PRHEXZ = $FDE5
SCRN2 = $F879 SCRN2 = $F879
ORG $A00 ; Intentionally different from sans-zero-page & with-zero-page ORG $A00 ; Intentionally different from sans-zero-page & with-zero-page
@ -90,12 +90,5 @@ _HexNib
_HaveLeadingDigit _HaveLeadingDigit
INY ; Y = output string length INY ; Y = output string length
BEQ _PrintDone BEQ _PrintDone
JMP PRHEXZ
CMP #$A ; n < 10 ?
BCC _Hex2Asc
ADC #6 ; n += 6 $A -> +6 + (C=1) = $11
_Hex2Asc
ADC #'0' + $80 ; inverse=remove #$80
PutChar
JMP COUT

BIN
print_uint16_zp
View File

Binary file not shown.

10
print_uint16_zp.s
View File

@ -5,7 +5,7 @@
; Thanks to Gids for nudging a zero-page version ; Thanks to Gids for nudging a zero-page version
; F8 ROM Entry Points ; F8 ROM Entry Points
COUT = $FDED PRHEXZ = $FDE5
SCRN2 = $F879 SCRN2 = $F879
; Zero-Page Version - 4 locations used ; Zero-Page Version - 4 locations used
@ -86,11 +86,5 @@ _HexNib
_HaveLeadingDigit _HaveLeadingDigit
INX ; X = flag to specify non-zero leading digit was seen INX ; X = flag to specify non-zero leading digit was seen
BEQ _PrintDone BEQ _PrintDone
JMP PRHEXZ
CMP #$A ; n < 10 ?
BCC _Hex2Asc
ADC #6 ; n += 6 $A -> +6 + (C=1) = $11
_Hex2Asc
ADC #'0' + $80 ; inverse=remove #$80
JMP COUT