LCD Bargraph with different styles - Versionsgeschichte

Mat: /* Sample */

2011-06-15T01:24:38Z

‎Sample

Mat: /* Download */

2011-06-01T02:36:58Z

‎Download

Mat: /* Download */

2011-06-01T02:36:40Z

‎Download

Mat am 1. Juni 2011 um 02:36 Uhr

2011-06-01T02:36:16Z

Mat: /* What it looks like */

2011-06-01T02:29:05Z

‎What it looks like

Mat am 31. Mai 2011 um 19:23 Uhr

2011-05-31T19:23:33Z

Mat am 31. Mai 2011 um 02:22 Uhr

2011-05-31T02:22:33Z

Mat: 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..."

2011-05-31T02:11:22Z

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..."

Neue Seite

== 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:
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 , 1
Lcd_bar Value , 5
Value = Value + 2
If Value = 102 Then Value = 0
'Waitms 50
Loop

This simply draws a bar at the position 1, 1 and sweeps from 0-100%.

== What it looks like ==

@@ Zeile 30: / Zeile 30: @@
 Cls
 Do
-    Locate 1 , 1
+    Locate 1 , 2
-    Lcd_bar Value , 5
+    Lcd_bar Value , 14
-    Value = Value + 1
+    Value = Value + 2
-    If Value = 101 Then Value = 0
+    If Value = 102 Then Value = 0
     'Waitms 50
@@ Zeile 41: / Zeile 41: @@
 </pre>
-This simply draws a bar at the position [1, 1] and sweeps from 0-100%.
+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 ==

← Nächstältere Version		Version vom 1. Juni 2011, 02:36 Uhr
Zeile 56:		Zeile 56:
	== Download ==		== Download ==

−	[http://www.braunecker.at/downloads/lcd_bar_1_0.zip ~~Download~~ LCD Bar 1.0 (.zip)]	+	[http://www.braunecker.at/downloads/lcd_bar_1_0.zip LCD Bar 1.0 (.zip)]

← Nächstältere Version		Version vom 1. Juni 2011, 02:36 Uhr
Zeile 56:		Zeile 56:
	== Download ==		== Download ==

−	[http://www.braunecker.at/downloads/lcd_bar_1_0.zip Download (.zip)]	+	[http://www.braunecker.at/downloads/lcd_bar_1_0.zip Download LCD Bar 1.0 (.zip)]

@@ Zeile 51: / Zeile 51: @@
 [[File:lcd_bar_styles.jpg|Bar styles]]
 Style 4 only uses standard characters.
 == Download ==
 [http://www.braunecker.at/downloads/lcd_bar_1_0.zip Download (.zip)]

@@ Zeile 49: / Zeile 49: @@
 with one of the styles listed below:
-[[File:Lcd_bar_styles.jpg|Bar styles]]
+[[File:lcd_bar_styles.jpg|Bar styles]]
 == Download ==
 [http://www.braunecker.at/downloads/lcd_bar_1_0.zip Download (.zip)]

@@ Zeile 2: / Zeile 2: @@
 In the top of your main program, just add these lines:
-    Const Lcd_bar_style = 1
+    Const Lcd_bar_style = [Style]
-    $include "..\inc\lcd_bar.bas"
+    $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"
+<pre>
-   $crystal = 16000000
+$regfile = "m32def.dat"
-   $hwstack = 32
+$sim
-   $sim
+Config Lcd = 16 * 2
-   Config Lcd = 16 * 2
+Dim Value As Byte
-    Const Lcd_bar_style = 1
+Cls
-    $include "..\inc\lcd_bar.bas"
+Do
-    Dim Value As Byte
+    Value = Value + 1
-    Cls
+    'Waitms 50
-   Do
+This simply draws a bar at the position [1, 1] and sweeps from 0-100%.
 == What it looks like ==