LCD Bargraph with different styles: Unterschied zwischen den Versionen
Aus ProjectWiki
Mat (Diskussion | Beiträge) (Created page with "== How to use it == In the top of your main program, just add these lines: Const Lcd_bar_style = 1 $include "..\inc\lcd_bar.bas" To draw the Bargraph on the LCD: Locat...") |
Mat (Diskussion | Beiträge) (→Sample) |
||
| (6 dazwischenliegende Versionen desselben Benutzers werden nicht angezeigt) | |||
| Zeile 2: | Zeile 2: | ||
In the top of your main program, just add these lines: | In the top of your main program, just add these lines: | ||
| − | Const Lcd_bar_style = | + | Const Lcd_bar_style = [Style] |
| − | $include " | + | $include "lcd_bar.bas" |
To draw the Bargraph on the LCD: | To draw the Bargraph on the LCD: | ||
Locate [x] , [y] | Locate [x] , [y] | ||
Lcd_bar [value] , [x-size] | Lcd_bar [value] , [x-size] | ||
| + | |||
== Sample == | == Sample == | ||
Main File: | Main File: | ||
| − | + | <pre> | |
| − | + | $regfile = "m32def.dat" | |
| + | $crystal = 16000000 | ||
| + | $hwstack = 32 | ||
| + | $swstack = 16 | ||
| + | $framesize = 32 | ||
| + | |||
| + | $sim | ||
| + | |||
| + | Config Lcd = 16 * 2 | ||
| + | Const Lcd_bar_style = 1 | ||
| + | $include "..\inc\lcd_bar.bas" | ||
| + | |||
| + | Dim Value As Byte | ||
| − | + | Cls | |
| − | + | Do | |
| − | + | Locate 1 , 2 | |
| + | Lcd_bar Value , 14 | ||
| − | + | Value = Value + 2 | |
| + | If Value = 102 Then Value = 0 | ||
| − | + | 'Waitms 50 | |
| + | Loop | ||
| + | End | ||
| + | </pre> | ||
| − | + | This simply draws a bar with a size of 14 characters at the position [1, 2] and sweeps from 0-100%. | |
| − | |||
| − | + | == What it looks like == | |
| + | Use | ||
| + | <pre>Const Lcd_bar_style = [Style]</pre> | ||
| + | with one of the styles listed below: | ||
| − | + | [[File:lcd_bar_styles.jpg|Bar styles]] | |
| − | + | [[File:lcd_character_table.png|width|400px|Character Table]] | |
| − | + | Style 4 only uses standard characters. | |
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | + | == Download == | |
| − | + | [http://www.braunecker.at/downloads/lcd_bar_1_0.zip LCD Bar 1.0 (.zip)] | |
Aktuelle Version vom 15. Juni 2011, 01:24 Uhr
Inhaltsverzeichnis
How to use it
In the top of your main program, just add these lines:
Const Lcd_bar_style = [Style] $include "lcd_bar.bas"
To draw the Bargraph on the LCD:
Locate [x] , [y] Lcd_bar [value] , [x-size]
Sample
Main File:
$regfile = "m32def.dat" $crystal = 16000000 $hwstack = 32 $swstack = 16 $framesize = 32 $sim Config Lcd = 16 * 2 Const Lcd_bar_style = 1 $include "..\inc\lcd_bar.bas" Dim Value As Byte Cls Do Locate 1 , 2 Lcd_bar Value , 14 Value = Value + 2 If Value = 102 Then Value = 0 'Waitms 50 Loop End
This simply draws a bar with a size of 14 characters at the position [1, 2] and sweeps from 0-100%.
What it looks like
Use
Const Lcd_bar_style = [Style]
with one of the styles listed below:
Style 4 only uses standard characters.
