goto $ - 7 bcf RWPort, RWPin movlw 0 tris DataPort movf Dlay, w movwf DataPort if (Freq > 8000000) if (Freq < 16000000) nop else

goto $ + 1 endif endif

bsf EPort, EPin if (Freq > 8000000) if (Freq < 16000000)

nop 0 else

goto endif endif bcf

retu rn LCDChar

EPort, EPin

Возврат значения DataPort.

Получение символа.

Возможно, потребуется задержка.

Возможно, потребуется задержка.

Передача символа на дисплей.

else

goto endif endif

bsf if (Freq if (Freq

nop else

goto endif endif

bcf retu rn LCDInit

call

call

call

movlw

movwf if (Freq if (Freq

nop else

goto endif endif

bsf if (Freq if (Freq

nop else

goto endif endif

call if (Freq if (Freq

nop else

goto endif endif

bsf if (Freq if (Freq

EPort, EPin > 8000000) < 16000000)

EPort, EPin

DlayS

DlayS

DlayS

0x030

DataPort

> 8000000)

< 16000000)

Eport, Epin > 8000000) < 16000000)

Eport, EPin DlayS

> 8000000) < 16000000)

Eport, EPin > 8000000) < 16000000)

Возможно, потребуется задержка.

Инициализация (В разрядов).

Возможно, потребуется задержка.

Возможно, потребуется задержка.

Команда сброса.

Возможно, потребуется задержка.

Возможно, потребуется задержка.

Команда сброса. Задержка 160 мкс.

Задание формата. Выключение дисплея. Стирание памяти дисплея. Задание перемещения курсора. Включение дисплея/курсора.

else

goto $ + 1 Xndif endif

bcf . Eport, Epin

bsf Dlay, Dlay160Bit1 if (Dlay160Bit2 ! = -1)

bsf Dlay, Dlay160Bit2 endif

decfszDlay. f

goto $ - 1

movlw 0x030

call LCDIns

movlw 0x038

call LCDIns

movlw 0x010

call LCDIns

movlw 0x001

call LCDIns

movlw 0x006

call LCDIns

movlw OxOOE

call LCDIns

return errorlevel 0, +224 endm

Если жидкокристаллический дисплей работает в 4-разрядном формате передачи данных, то записываемые данные должны передаваться в виде полубайтов. При пересылке байта сначала передается старший полубайт, а затем младший. Что касается вывода Е, то он активизируется каждый раз при передаче полубайта на жидкокристаллический дисплей. При инициализации режима с 4-разрядным форматом передачи данных необходимо выполнить следующие действия:

1. Ожидание установления напряжения питания в течение не менее 15 мс после включения.

2. Запись кода 0x03 в жидкокристаллический дисплей и ожидание в течение 5 мс завершения исполнения команды.

3. Запись кода 0x03 в жидкокристаллический дисплей и ожидание в течение 160 мкс завершения исполнения команды.

4. Повторные запись кода 0x03 в жидкокристаллический дисплей и ожидание в течение 160 мкс (или проверка состояния признака «занято» до его сброса).