bascom LCD init

[hwsw famulus]

>Ha már a Bascom-nál tartunk én is kérdeznék
>valamit. Az LCD kezelést próbáltam BASCOM-al
>de nem igazán lett sikerem vele. 
>Üdv.  Zoli


En ezt a reszletet hasznalom attol fuggoen commentezve, 
hogy hw vagy sw az lcd idozites.

A hw EN eseten joval gyorsabb egyebkent.....

KJ

'------------------------------------------------------------------------------'
'LCD init start (LCD on PORTC)
'------------------------------------------------------------------------------'

'When LCD used hw EN mode
'$lib "lcd4busy.lib"
'Const _lcdport = Portc
'Const _lcdddr = Ddrc
'Const _lcdin = Pinc
'Const _lcd_e = 3
'Const _lcd_rw = 2
'Const _lcd_rs = 1

'When LCD used sw wait mode (must be setting by sw/hw RW=0 )
Config Portc = Output
cbi portc,2
Config Lcdpin = Pin , Db4 = Portc.4 , Db5 = Portc.5 , Db6 = Portc.6 , Db7 = Portc.7 , E = Portc.3 , Rs = Portc.1

Config Lcd = 20 * 4

'------------------------------------------------------------------------------'
'LCD init end
'------------------------------------------------------------------------------'