I2C LCD

**DaveC3** · - 27th December 2014, 22:11

To inilalize this display wyou need to write something like this

Code:

high RESET
pause 10
low RESET
pause 10
high RESET

I2CWRITE datapin, clockpin,$7C[$80,$57,$80,$6C,$80,$01,$80,$02]

before you can write to the display

Code:

I2CWRITE datapin, clockpin,$7C[$80,$80,$40,$48,$45,$$4C,$4c,$4F]  'HELLO

I do not have a display to test so not sure if this will work, but this is what I would start with, I took the code from the data sheet.

Dave

**Demon** · - 28th December 2014, 00:17

You might want to put a resistor on RESET pin, at least 1K.

Robert

**midali** · - 28th December 2014, 18:29

Originally Posted by DaveC3

To inilalize this display wyou need to write something like this

Code:

high RESET
pause 10
low RESET
pause 10
high RESET

I2CWRITE datapin, clockpin,$7C[$80,$57,$80,$6C,$80,$01,$80,$02]

before you can write to the display

Code:

I2CWRITE datapin, clockpin,$7C[$80,$80,$40,$48,$45,$$4C,$4c,$4F]  'HELLO

I do not have a display to test so not sure if this will work, but this is what I would start with, I took the code from the data sheet.

Dave

Thx Dave, I tried but nothing!
I tried a code for 7036i controller, with V0 connected to Vdd , but I feel that somewhere I'm wrong in DEFINE LCD .
I know that your help eat a lot of time, but if somebody have a free time to read in datasheet and help me, I'll appreciate!
Datasheet 7036i : http://www.datasheetarchive.com/dlma...DSA-621251.pdf

Code :

Code:

'PIC 16F1824

#CONFIG
        __CONFIG _CONFIG1, _FCMEN_OFF & _FOSC_INTOSC & _WDTE_OFF & _MCLRE_OFF & _CP_ON & _IESO_OFF & _BOREN_OFF & _PWRTE_OFF
        __CONFIG _CONFIG2, _PLLEN_OFF & _STVREN_OFF & _LVP_OFF
#ENDCONFIG

OSCCON = %01101010   'sets the internal oscillator to 4Mhz
      
TRISA  = %00000000  
TRISC  = %00000000  
ANSELA = %00000000  
ANSELC = %00000000  

OPTION_REG.7 = 0
WPUA = %00000000
WPUC = %00000011

PORTA = 0  
PORTC = 0
  
SCL   VAR PORTC.0
SDA   var PORTC.1
RS    var PORTC.2 
symbol mode = $7C

pause 100
RS = 0
'OPF1 = 0 ; OPF2 = 0 . => BON=0, FON=1. => Vout=Vin (pag50 datasheet)

'=============Initializing by Instruction==========pag 39 datasheet

'CLEAR LCD --------------pag 28 datasheet
I2CWRITE sda, scl,mode,[$01]
pause 10
 
'ENTRY MODE SET----------
 I2CWRITE sda, scl,mode,[$07] 'cursor/blink moves to right and DDRAM address is increased by 1.
 pause 10
 
'FUNCTION SET------------pag 30 datasheet
I2CWRITE sda, scl,mode,[$38] ' 8 bit, 2 lines, font normal, instruction table 0
pause 10

'CURSOR DISPLAY------------pag 29 datasheet
I2CWRITE sda, scl,mode,[$14]
pause 10

'INTERNAL OSC------------pag 35 datasheet
I2CWRITE sda, scl,mode,[$14] ' 1/5 BIAS , 130Hz/5v
pause 10

'CONTRAST SET------------pag 37 datasheet
I2CWRITE sda, scl,mode,[$7F]
pause 10

'POWER/ICON/CONTRAST------pag 36 datasheet
I2CWRITE sda, scl,mode,[$5B] 'ICON=ON, BON = OFF , contrast $03
pause 10

'FOLLOWER CONTROL-------pag 37 datasheet
I2CWRITE sda, scl,mode,[$6F] 'FON=1 ..set is correct ??
pause 10

'DISPLAY ON------------- pag 29 datasheet
I2CWRITE sda, scl,mode,[$0E] 'display ON, cursor ON, blink OFF
pause 10

RS = 1
pause 500

I2CWRITE SDA,SCL,mode,["HELLO"] 'print on the first line

**DaveC3** · - 28th December 2014, 23:19

Try this, initalization based on an arduino sketch

Code:

'PIC 16F1824

#CONFIG
        __CONFIG _CONFIG1, _FCMEN_OFF & _FOSC_INTOSC & _WDTE_OFF & _MCLRE_OFF & _CP_ON & _IESO_OFF & _BOREN_OFF & _PWRTE_OFF
        __CONFIG _CONFIG2, _PLLEN_OFF & _STVREN_OFF & _LVP_OFF
#ENDCONFIG

OSCCON = %01101010   'sets the internal oscillator to 4Mhz
      
TRISA  = %00000000  
TRISC  = %00000000  
ANSELA = %00000000  
ANSELC = %00000000  

OPTION_REG.7 = 0
WPUA = %00000000
WPUC = %00000011

PORTA = 0  
PORTC = 0
  
SCL   VAR PORTC.0
SDA   var PORTC.1
RS    var PORTC.2 
symbol mode = $7C

pause 100
RS = 0
'OPF1 = 0 ; OPF2 = 0 . => BON=0, FON=1. => Vout=Vin (pag50 datasheet)

'=============Initializing by Instruction==========pag 39 datasheet

 
I2CWRITE PORTC.1, PORTC.0,$7C,[$00] 'send command to display
 
'FUNCTION SET 0 and 1 ------------pag 30 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$38] ' Function set - 8 bit, 2 line display 5x8, inst table 0
pause 10

I2CWRITE PORTC.1, PORTC.0,$7C,[$39] ' Function set - 8 bit, 2 line display 5x8, inst table 1
pause 10



'INTERNAL OSC------------pag 35 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$14] ' 1/5 BIAS , 130Hz/5v


'CONTRAST SET------------pag 37 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$73]


'POWER/ICON/CONTRAST------pag 36 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$5E] 'ICON=ON, BON = OFF , contrast $03


'FOLLOWER CONTROL-------pag 37 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$6D] 'FON=1 ..set is correct ??
pause 10

'DISPLAY ON------------- pag 29 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$0C] 'display ON, cursor ON, blink OFF



'CLEAR LCD --------------pag 28 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$01]


'ENTRY MODE SET----------
 I2CWRITE PORTC.1, PORTC.0,$7C,[$06] 'cursor/blink moves to right and DDRAM address is increased by 1.


RS = 1
pause 500

I2CWRITE PORTC.1,PORTC.0,$7C,["HELLO"] 'print on the first line [ I am not sure this line will work]

Can you include a high res picture of your display?

**DaveC3** · - 29th December 2014, 02:51

try this

Code:

'PIC 16F1824

#CONFIG
        __CONFIG _CONFIG1, _FCMEN_OFF & _FOSC_INTOSC & _WDTE_OFF & _MCLRE_OFF & _CP_ON & _IESO_OFF & _BOREN_OFF & _PWRTE_OFF
        __CONFIG _CONFIG2, _PLLEN_OFF & _STVREN_OFF & _LVP_OFF
#ENDCONFIG

OSCCON = %01101010   'sets the internal oscillator to 4Mhz
      
TRISA  = %00000000  
TRISC  = %00000000  
ANSELA = %00000000  
ANSELC = %00000000  

OPTION_REG.7 = 0
WPUA = %00000000
WPUC = %00000011

PORTA = 0  
PORTC = 0
  
SCL   VAR PORTC.0
SDA   var PORTC.1
RS    var PORTC.2 
symbol mode = $7C

pause 100
RS = 0
'OPF1 = 0 ; OPF2 = 0 . => BON=0, FON=1. => Vout=Vin (pag50 datasheet)

'=============Initializing by Instruction==========pag 39 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$78] 'slave
 
I2CWRITE PORTC.1, PORTC.0,$7C,[$00] 'send command to display
 
'FUNCTION SET 0 and 1 ------------pag 30 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$38] ' Function set - 8 bit, 2 line display 5x8, inst table 0
pause 10

I2CWRITE PORTC.1, PORTC.0,$7C,[$39] ' Function set - 8 bit, 2 line display 5x8, inst table 1
pause 10



'INTERNAL OSC------------pag 35 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$14] ' 1/5 BIAS , 130Hz/5v


'CONTRAST SET------------pag 37 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$73]


'POWER/ICON/CONTRAST------pag 36 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$5E] 'ICON=ON, BON = OFF , contrast $03


'FOLLOWER CONTROL-------pag 37 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$6D] 'FON=1 ..set is correct ??
pause 10

'DISPLAY ON------------- pag 29 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$0C] 'display ON, cursor ON, blink OFF



'CLEAR LCD --------------pag 28 datasheet
I2CWRITE PORTC.1, PORTC.0,$7C,[$01]


'ENTRY MODE SET----------
 I2CWRITE PORTC.1, PORTC.0,$7C,[$06] 'cursor/blink moves to right and DDRAM address is increased by 1.


RS = 1
pause 500
I2CWRITE PORTC.1, PORTC.0,$7C,[$78] 'slave
 
I2CWRITE PORTC.1, PORTC.0,$7C,[$40] 'Write to display RAM
I2CWRITE PORTC.1,PORTC.0,$7C,["HELLO"] 'print on the first line [ I am not sure this line will work]
end

**DaveC3** · - 29th December 2014, 14:34

or try this,

Code:

 #CONFIG
        __CONFIG _CONFIG1, _FCMEN_OFF & _FOSC_INTOSC & _WDTE_OFF & _MCLRE_OFF & _CP_ON & _IESO_OFF & _BOREN_OFF & _PWRTE_OFF
        __CONFIG _CONFIG2, _PLLEN_OFF & _STVREN_OFF & _LVP_OFF
#ENDCONFIG
OSCCON = %01101010   'sets the internal oscillator to 4Mhz
      
TRISA  = %00000000  
TRISC  = %00000000  
ANSELA = %00000000  
ANSELC = %00000000  

OPTION_REG.7 = 0
SCL   VAR PORTC.0
SDA   var PORTC.1
Reset    var PORTC.2     'could tie reset pin to   vdd through 10K resistor


pause 100
HIGH Reset
'OPF1 = 0 
goto StartProgram
'********************************************************************************
'=============Initializing LCD==========
ST7036Init:


 
'FUNCTION SET 0 and 1 ------------pag 30 datasheet

I2CWRITE PORTC.1, PORTC.0,$78,[$00,$38] ' Function set - 8 bit, 2 line display 5x8, inst table 0
pause 10

I2CWRITE PORTC.1, PORTC.0,$78,[$00,$39] ' Function set - 8 bit, 2 line display 5x8, inst table 1
pause 10

I2CWRITE PORTC.1, PORTC.0,$78,[$00,$14,$73,$5E,$6D,$0C,$01,$06] ' 



Return
'********************************************************************************



startProgram:
gosub  ST7036Init
I2CWRITE PORTC.1, PORTC.0,$78,[$40,$48,$65,$6c,$6c,$6f] ' Hello

IdleLoop:
      ' could blink an led here
goto Idleloop

Thread: I2C LCD

Thread Tools

Search Thread

Display

Hybrid View

Re: I2C LCD

Re: I2C LCD

Re: I2C LCD

Re: I2C LCD

Re: I2C LCD

Re: I2C LCD

Similar Threads

I2C lcd ( arduino ) with PICBASIC, help

I2C variable to LCD

I2C to LCD display

Need cheap i2c LCD for 16F877a

Members who have read this thread : 2

Bookmarks

Bookmarks

Posting Permissions