[旋風(fēng)][6502匯編][24位HEX轉(zhuǎn)DEC]
;[FC][24位HEX轉(zhuǎn)DEC][20190403]
;FlameCyclone
?.ORG $8000
?
Hex_LL = $00
Hex_LH = $01
Hex_HL = $02
Dec_Digit = $03
DIGIT_COUNT = 08
;零頁占用: 11字節(jié)
;? 程序段: 0x71字節(jié)
;$0xFFFFFF轉(zhuǎn)16777215耗時(shí)2427
;$0x98967F轉(zhuǎn)9999999耗時(shí)4217
; $0xF423F轉(zhuǎn)999999耗時(shí)3628
; $0x1869F轉(zhuǎn)99999耗時(shí)3011
;? $0x270F轉(zhuǎn)9999耗時(shí)2374
;? ?$0x3E7轉(zhuǎn)999耗時(shí)1667
;? ? $0x63轉(zhuǎn)99耗時(shí)980
;? ? $0x09轉(zhuǎn)9耗時(shí)241
?LDX #$FF
?TXS
?LDA #$7F
?STA Hex_LL
?LDA #$96
?STA Hex_LH
?LDA #$98
?STA Hex_HL
?JSR Hex_To_Dec
?RTS
Hex_To_Dec:?
?LDY #$00
?LDX #DIGIT_COUNT - $02
Convert_Compare:
?LDA Hex_HL
HL_Compare:
?CMP Dec_Data_HL,X
?BCC Convert_Digit_End
?BNE Sub_LL
?LDA Hex_LH
LH_Compare
?CMP Dec_Data_LH,X
?BCC Convert_Digit_End
?BNE Sub_LL
?LDA Hex_LL
LL_Compare:
?CMP Dec_Data_LL,X
?BCC Convert_Digit_End
Sub_LL:
?LDA Hex_LL
?SBC Dec_Data_LL,X
?STA Hex_LL
?BCS Sub_LH
?DEC Hex_LH
Sub_LH:
?LDA Hex_LH
?SEC
?SBC Dec_Data_LH,X
?STA Hex_LH
?BCS Sub_HL
?DEC Hex_HL
Sub_HL:?
?LDA Hex_HL
?SEC
?SBC Dec_Data_HL,X
?STA Hex_HL
Set_Digit:
?INY
?BNE Convert_Compare
Convert_Digit_End:
?STY Dec_Digit + 1,X
?LDY #$00
?DEX
?BPL Convert_Compare
Convert_Finish:
?STA Dec_Digit
?RTS
Dec_Data_LL:
?.DB $0A,$64,$E8,$10,$A0,$40,$80
Dec_Data_LH:
?.DB $00,$00,$03,$27,$86,$42,$96
Dec_Data_HL:
?.DB $00,$00,$00,$00,$01,$0F,$98
