Pic18f252,dacmax518 And I2c?

[angelika]

Hello! Please, You help me.
I have PIC18F252 and DAC MAX518(2 wire serial 8- bit dac with rail to rail outputs)
I use the portc.3(SCL) and the portC.4(SDA) and I2C protocol. I try to programme,
but it doesn't work.I don't know what to do. I want to give me an example(with simple way, please)

[seinfield]

i have this code for the max519, i hope this helps you:

DEFINE NO_CLRWDT 1
DEFINE OSC 20
DEFINE LCD_DREG PORTB ' Se establece el puerto de datos
DEFINE LCD_DBIT 4 ' Se establece el bit de inicio de los datos
DEFINE LCD_RSREG PORTB ' Se establece el puerto de R/S
DEFINE LCD_RSBIT 1 ' Se establece el bit R/S
DEFINE LCD_EREG PORTB ' Se establece el puerto de E
DEFINE LCD_EBIT 0 ' Se establece el bit E
ADCON1=7
PAUSEUS 1

SDA VAR PORTA.2
SCL VAR PORTA.3
I2C_READ CON 1
I2C_WRITE CON 0
I2C_OUT VAR BYTE
I2C_IN VAR BYTE[2]
I2C_ACK VAR BIT

a var word
a=0

top:
GOSUB CONFIG_REGISTER
GOSUB START_CONVERT
IF PORTA.1=1 THEN GOTO SALIDA
a=a+1
GOTO TOP

CONFIG_REGISTER:
GOSUB I2C_START
I2C_OUT=%10010000
GOSUB I2C_TX
I2C_OUT=$AC
GOSUB I2C_TX
I2C_OUT=$00
GOSUB I2C_TX
GOSUB I2C_STOP
RETURN

START_CONVERT:
GOSUB I2C_START
I2C_OUT=%01000000
GOSUB I2C_TX
I2C_OUT=%00000000
GOSUB I2C_TX
I2C_OUT=a
gosub i2c_tx
GOSUB I2C_STOP
RETURN

I2C_START:
HIGH SDA
HIGH SCL
LOW SDA
LOW SCL
RETURN

I2C_STOP:
LOW SDA
HIGH SCL
HIGH SDA
PAUSE 1
RETURN

I2C_TX:
SHIFTOUT SDA,SCL,1,[I2C_OUT]
SHIFTIN SDA,SCL,0,[I2C_ACK\1]
RETURN

SALIDA:
LCDOUT $FE,1,DEC A
END

[mister_e]

Another version to try ;)


' Hardware setting
' ================
'
'
SDA var PORTC.4
SCL var PORTC.3

' Variable definition
' ===================
'
'
Loop VAR Byte

' Constant definition
' ===================
'
'
DACAddressByte con %01011000 ' DAC Address byte
DACCommandByte con 0 ' DAC command byte

' Main Loop
' =========
' this loop will generate simple ramp-up and
' ramp-down on the DAC output
'
'
start:

For Loop = 0 To 255
I2CWRITE sda,scl,DACAddressByte,DACCommandByte,[Loop]
Pause 10
Next

For Loop = 255 To 0 Step -1
I2CWRITE sda, scl,DACAddressByte,DACCommandByte,[Loop]
pause 10
Next

GoTo start

[RYTECH]

Thx for posting the i2cwrite example... it helped me get my setup workin.