| Re: Assembly - Convert 16 bit integer to ascii help please [message #32991 is a reply to message #32940] |
Sat, 12 January 2013 16:41   |
Anton Treuenfels
Messages: 105
Registered: December 2011
Karma:
|
Senior Member |
|
|
"JB" <jbrown1289@gmail.com> wrote in message
news:7bcec11b-22cd-4d84-b19d-9fc272896e4a@googlegroups.com...
> I am looking for a routine to convert a 16 bit integer into ascii (text)
>
> ex. convert $C000 (49152) to the characters "49152" stored in a memory
> address.
>
> I found one that almost does what I want, but it adds leading 0's.
>
> Ideally I would like to have a routine that you can pass an option to
> either print leading 0's or strip them. But first things first I guess.
> :)
>
>
>
> Here is that code:
>
> ;*
> ;* DECIMAL TO ASCII ROUTINE *
> ;* LOW-BYTE IN .X HI-BYTE IN .A
> ;* STORES ASCII STRING IN MEMORY
> ;* PRINTS PRECEDING 0'S
>
> DECIMAL STX BINARY
> STA BINARY+1
> LDY #0
> DEC1 LDX #"0"
> DEC2 LDA BINARY
> CMP DECTBL1,Y
> LDA BINARY+1
> SBC DECTBL2,Y
> BCC DEC3
> STA BINARY+1
> LDA BINARY
> SBC DECTBL1,Y
> STA BINARY
> INX
> BNE DEC2
> DEC3 TXA
> STA DECCHR,Y
> JSR $FFD2
> INY
> CPY #5
> BNE DEC1
> RTS
>
>
> DECTBL1 .BYTE <10000,<1000,<100
> .BYTE <10,<1
> DECTBL2 .BYTE >10000,>1000,>100
> .BYTE >10,>1
>
> DECCHR .WORD 0,0
> BINARY .WORD 0
Modify this routine so that it doesn't start converting until the number
being converted is larger than the value in the tables.
For example, if the value being converted is, say, 677, the values of 10000
and 1000 are larger When the Y-register value is zero or one, all that
should happen is the Y-register is increased by one so the next table value
can be checked. When the index value reaches two, the table value of 100 is
less than 677. Start converting at that point.
This modification might also require a special check that the converted
value is not zero, because then all table values are larger. If it is zero,
just output "0" and exit.
- Anton Treuenfels
|
|
|
|
Members
Search
Help
Register
Login
Home
