LCD BARgraphs

[fratello]

I saw a schematic of volt-ampermeter, with PIC, with a nice animation ... Two different scale on the same row !!! Using "empty boxes" for volts and "filled boxes" for ampers ...the number of boxes varies proportionally with the parameter (volts; ampers).
Can this be done in PBP ?! Thanks !

[Darrel Taylor]

Can this be done in PBP ?

Yes it can ...



Custom Characters ...

  LCDOUT  $FE,$48,$00,$00,$00,$00,$1F,$1F,$1F,$00  ' Cust Char #1
  LCDOUT  $FE,$50,$1F,$11,$1F,$00,$00,$00,$00,$00  ' Cust Char #2
  LCDOUT  $FE,$58,$1F,$11,$1F,$00,$1F,$1F,$1F,$00  ' Cust Char #3

[fratello]

Wow ! Amazing ! THANK YOU, Mr.Darrel !
I will try to figure out how displaying ...

[fratello]

Let's say I read maximum 50 volts and maximum 5 ampers ; so one "empty box" = 5 volts and one "filled box" = 0.5 ampers.
It's this "pseudo" code correct ?!

for y=9 to 0 step -1
if volts >= (y*5) then
    if ampers >= (y * 1/2) then
char = 3
LCDOUT $FE, $80, char,char,char,char,char,char,char,char,char,char
Endif
Endif

I'm sure it's another way, much easiers, but I have -till now- no ideea ...

[SteveB]

Untested, likely needs some debugging, but at least the methodology should be clear.

LCDPos	VAR BYTE
volts	VAR WORD	' 0 to 500 representing 0 to 50.0 Volts
Amps	VAR BYTE	' 0 to 50 representing 0 to 5.0 Amps
Char	VAR BYTE	

FOR LCDPos = 0 TO 9
	IF Volts / 50 >= LCDPos + 1 THEN	' Fill in Volt Block
		IF Amps / 5 >= LCDPos + 1 THEN		' Fill in Volt + Amp Block
			Char = 3
		ELSE					' Fill in Volt Block Only				
			Char = 2
		ENDIF
	ELSE					' Don't Fill in Volt Block
		IF Amps / 5 >= LCDPos + 1 THEN		' Fill in Amp Block only
			Char = 1
		ELSE					' Fill with Space				
			Char = 32
		ENDIF

	ENDIF
	LCDOUT 	$FE, $80 + LCDPos, Char	
NEXT LCDPos

[fratello]

Thank You, I will post the results !