LCD BARgraphs

[Darrel Taylor]

This is so simple to use.

Here's an example of a BARgraph that follows an A/D input.

; Initialize your hardware and LCD first.

DEFINE ADC_BITS 8               ' Number of bits in ADCIN result
ADCON1.7 = 1                    ' Right Justify AD result

INCLUDE "LCDbar_INC.bas"        ' Include the BARgraph routines

Value  VAR  WORD                ' Must be a WORD even though AD is 8bit

LCDOUT $FE, 1  ' Clear Screen

Loop1:
    ADCIN  0, Value
    LCDOUT $FE,2,"Value=",DEC Value,"   "
    ; syntax- BARgraph   Value, Row, Col, Width, Range, Style
    @         BARgraph  _Value,   2,   0,    16,   255,  lines
GOTO Loop1

[Darrel Taylor]

This is just like the previous example except that it places both the Value and the BAR on the same line.

; Initialize your hardware and LCD first.

DEFINE ADC_BITS 8               ' Number of bits in ADCIN result
ADCON1.7 = 1                    ' Right Justify AD result

INCLUDE "LCDbar_INC.bas"        ' Include the BARgraph routines

Value  VAR  WORD                ' Must be a WORD even though AD is 8bit

LCDOUT $FE, 1  ' Clear Screen

Loop1:
    ADCIN  0, Value
    LCDOUT $FE,2,DEC Value," "
    ; syntax- BARgraph   Value, Row, Col, Width, Range, Style
    @         BARgraph  _Value,   1,   4,    12,   255,  lines
GOTO Loop1

[Don Mario]

Very good job, Darrel ! I like very much ! But you forget the "vertical bargraph" !

Don Mario

[Acetronics2]

Very good job, Darrel ! I like very much ! But you forget the "vertical bargraph" !

Don Mario

Hi, DON

Just turn your LCD 90° cckw !!!

hi,hi,hi ...

Alain

[Don Mario]

Thanks ! It's a very good advice ! But I'm seriuos ! Don't forget the vertical bar !

Don Mario

[Acetronics2]

Here, a Graphic LCD might be necessary ... ( I've tried a 4x20 : result is not so good due to space between the lines )

And do not forget the processor to drive the graphic LCD, to have a simple handling like LINE x1,y1,x2,y2 ... BOX x1,y1,x2,y2 CIRCLE x,y,r .... etc,etc

not so easy ... even with 8k memory , 20 Mhz and Assembler !!!

Alain

[ta1dr]

hi Darrel
thanks for very nice projects
I want to use but I use Proton Suit (crownhill I am registered user) I can convert it but I didn't understand this row how can I convert PDS

BARtemp = BAR_value * BAR_width is ok
BARtemp = DIV32 BAR_range is ok
'*************************************************
Remainder = R2 but not ok how can I calculate
remender from div32 command

regards
ahmet/TURKEY

[Art]

Hi, DON
Just turn your LCD 90° cckw !!!
Alain

Did a vertical graphing tachometer over time with a single custom char (far right in the video).



Just got to matrix rotate the byte and shift every byte in the custom char every frame to make room for the next vertical byte.
(this one has odometer effect on the elapsed timer as well

[Ioannis]

Hi Art. It is awesome! Really nice effect.

Ioannis

[srspinho]

Hi Art !

nice idea for the tachometer.

I have an old project, where I´m already using 8 custom chars to show darrel´s bargraph, and other "compressed characters, like "Km/l" , "L/h".

Is it possible to re-use the custom char to show the odometer efect and this nice tachometer or this is not possible ?

Is your code for the tachometer complicated ?

Thank you.

Sérgio

[Art]

Hi,
I'll post it go in it's own thread in a little bit.
The tach is interrupt driven, display is PBP.
I'm close to finishing something much nicer