Admin: Created page with "= Action = Selects the font of the TEXT LCD. ..."

2017-01-17T19:55:11Z

Created page with "= Action = Selects the font of the TEXT LCD. ..."

New page

= Action =

Selects the font of the TEXT LCD.

 

 

= Syntax =

LCDFONT x

 

 

= Remarks =
<div style="padding: 0px; margin: 0px 0px 0px 4px;">
{| style="border: solid 2px #000000; border-spacing:0px; border-collapse: collapse;" width="488" cellspacing="0" cellpadding="1" border="1"
|- style="vertical-align: top;"
| style="width:12%; border: solid 1px #000000;" width="12%" valign="top" |
X

| style="width:100%; border: solid 1px #000000;" width="100%" valign="top" |
A variable or constant in the range from 0-3.

|}
</div>
 

Most text LCD displays have one or more built in font tables. By default font 0 is selected.

The LCDFONT statement allows you to chose another font.

 

 

= See also =

[[INITLCD]] , [[LCDCMD]], [[LCDDATA]]

 

 

= Example =

<source lang="bascomavr">
$regfile = "m88def.dat"
$crystal = 8000000
$baud = 19200
$hwstack=32
$swstack = 16
$framesize=24

$lib "lcd4_anypin_oled_RS0010.lib" 'override default lib with OLED lib

'Config Lcd Sets The Portpins Of The Lcd
Config Lcdpin = Pin , Db4 = Portb.2 , Db5 = Portb.3 , Db6 = Portb.4 , Db7 = Portb.5 , E = Portb.1 , Rs = Portb.0
Config Lcd = 16x2 '16*2 type LCD screen

Dim V As Byte

Cls
Lcd "ABC" ; Chr(253)
Lowerline
Lcd "test"
Const Test = " this is a test" ' Just A Test

Lcdfont 0 'select first font

Cls
Dim X As Byte , Y As Byte
X = &B1000_0000 + 0
Lcdcmd &B0001_1111 'gmode
Lcdcmd X 'X (0-99)
Lcdcmd &B0100_0000 'Y (0-1)

'send data
For V = 1 To 80
Lcddata &B10101010
Waitms 100
Next
End
</source>

 {{Languages}}

[[Category:BASCOM Language Reference]]

LCDFONT - Revision history

Admin: Created page with "= Action = Selects the font of the TEXT LCD. ..."