Example Initialization Program
'‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐
Sub Init
Reset P3.7
Reset P3.0
Set P3.1
'set Read/write to '0' for write
'RS
'reset
Reset P3.4 'E
'Set P3.3
'Reset P3.3
Waitms 2
'Set P3.3
Waitms 20
A = &HA2
'1/9 BIAS
Call Writecom
A = &HA0
Call Writecom
A = &HC8
Call Writecom
A = &HA4
Call Writecom
A = &H40
Call Writecom
A = &H25
Call Writecom
A = &H81
Call Writecom
A = &H10
'ADC SELECT , NORMAL
'COM OUTPUT REVERSE
'DISPLAY ALL POINTS NORMAL
'DISPLAY START LINE SET
'INTERNAL RESISTOR RATIO
'ELECTRONIC VOLUME MODE SET
'ELECTRONIC VOLUME
Call Writecom
A = &H2F
Call Writecom
A = &HAF
'POWER CONTROLLER SET
'DISPLAY ON
Call Writecom
End Sub
'‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐
Sub Writecom
Reset P3.0
Reset P3.7
Set P3.6
'A0 low
'R/W low
'CS1
Set P3.4
'E
P1 = A
Reset P3.4
Reset P3.6
Reset P3.7
End Sub
Sub Writedata
Set P3.0
Reset P3.7
'A0 high
'R/W low
'CS1
Set P3.6
Set P3.4
'E
P1 = A
Reset P3.4
Reset P3.6
Reset P3.7
End Sub
'‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐‐
[10]