Can we suppress leading zero's in LCDOUT?

I'm trying to print a value in a BYTE sized VAR to a specific place on the LCD.
(a standard 16x2, and using DT's Anypin.php)

I need to get the number right-justified and w/o leading zero's.

I currently have a 0-255 number comming from the ADC on AN0.

(later I will need to do some math and expand the the result to Xnum-per-mV)

I'm currently doing something like this:

Code:

MYNUMBER VAR BYTE MYNUMBER = 0 ... ADCIN 0, MYNUMBER ... LCDOUT $FE, $83, DEC MYNUMBER

and it prints out "127 " instead of " 127" on the LCD.

My number needs to be printed before (in front of) some text that remains on the LCD during these numeric updates, like " 127-Dingles".

I tried DEC5 and get the digits in the right place but they have leading zero's (instead of spaces)

Is there a way to format my number right-justified and suppress the leading zero's?

this may help

Hi there
Just thought this may help you a little more...

[HTML]http://www.emesystems.com/BS2math4.htm[/HTML]

Good luck :-)

Dennis

Hi PICn-It,
From your code:

Code:

LCDOUT $FE, $83, DEC MYNUMBER make it so LCDOUT $FE, $83, DEC MYNUMBER,"-Dingles"

EDIT: I see what you are doing now, have not tried this but . . .
LCDOUT $FE, $80, DEC MYNUMBER, $84,"Dingles"
DEC automaticaly supresses leading zeros unless followed by a number

Quote:

Originally Posted by PICn-It

I'm trying to print a value in a BYTE sized VAR to a specific place on the LCD.
(a standard 16x2, and using DT's Anypin.php)

I need to get the number right-justified and w/o leading zero's.

I currently have a 0-255 number comming from the ADC on AN0.

(later I will need to do some math and expand the the result to Xnum-per-mV)

I'm currently doing something like this:

Code:

MYNUMBER VAR BYTE MYNUMBER = 0 ... ADCIN 0, MYNUMBER ... LCDOUT $FE, $83, DEC MYNUMBER

and it prints out "127 " instead of " 127" on the LCD.

My number needs to be printed before (in front of) some text that remains on the LCD during these numeric updates, like " 127-Dingles".

I tried DEC5 and get the digits in the right place but they have leading zero's (instead of spaces)

Is there a way to format my number right-justified and suppress the leading zero's?

At my best guess, this is what you are asking.

You need the print always to the right.

Code:

MYNUMBER VAR BYTE MYNUMBER = 0 ADCIN 0, MYNUMBER LCDOUT $FE, $83 IF MYNUMBER > 99 THEN LCDOUT DEC3 MYNUMBER ' three digits + "-Dingles" ELSE IF MYNUMBER > 9 THEN ' one space + two digits + "-Dingles" LCDOUT " ", MYNUMBER ELSE LCDOUT " ",DEC1 MYNUMBER ' two spaces + one digit + "-Dingles" ENDIF ENDIF LCDOUT "-Dingles"

Quote:

Originally Posted by sayzer

At my best guess, this is what you are asking.

You need the print always to the right.

Code:

MYNUMBER VAR BYTE MYNUMBER = 0 ADCIN 0, MYNUMBER LCDOUT $FE, $83 IF MYNUMBER > 99 THEN LCDOUT DEC3 MYNUMBER ' three digits + "-Dingles" ELSE IF MYNUMBER > 9 THEN ' one space + two digits + "-Dingles" LCDOUT " ", MYNUMBER ELSE LCDOUT " ",DEC1 MYNUMBER ' two spaces + one digit + "-Dingles" ENDIF ENDIF LCDOUT "-Dingles" 

Ahh, I see. I was hoping there would be some compiler directive/keyword/function-switch to use in PBP, something like printf in C but this is fine, whatever works ...right?.

Since I need a posible 5-digit number perhaps turning the IF/THEN into a CASE statement would work here? something like this:

Code:

MYNUMBER VAR BYTE MYNUMBER = 0 ... ADCIN 0, MYNUMBER ... ... SELECT CASE MYNUMBER CASE IS > 9999 LCDOUT $FE, $83, DEC5 MYNUMBER ' 5 digits CASE IS > 999 LCDOUT $FE, $83, " ", DEC4 MYNUMBER ' 1 space and 4 digits CASE IS > 99 LCDOUT $FE, $83, " ", DEC3 MYNUMBER ' 2 spaces and 3 digits CASE IS > 9 LCDOUT $FE, $83, " ", DEC2 MYNUMBER ' 3 spaces and 2 digits CASE ELSE LCDOUT $FE, $83, " ", DEC1 MYNUMBER ' 4 spaces and 1 digit END SELECT

Thanks for response

PICn-It,

MYNUMBER VAR BYTE

With that, you can get max. 255.

----------------------------------------------

Quote:

Originally Posted by sayzer

PICn-It,

MYNUMBER VAR BYTE

With that, you can get max. 255.

----------------------------------------------

Yes, good catch.

In my code, currently I can't figure out how to steady up the 10-bit ADC reading, so I temporarily REM'd those lines:

Code:

ADC_BITS 10 MYNUMBER VAR WORD

and temporarily put in:

Code:

ADC_BITS 8 MYNUMBER VAR BYTE

while I work out the display screens and presentation. The CASE statement based on your IF/THEN code posted above seems to work great, thank you.