ATNEL tech-forum 2014-04-19T16:06:28+01:00 https://forum.atnel.pl/feed.php?f=42&t=6821&mode 2014-04-19T16:06:28+01:00 2014-04-19T16:06:28+01:00 https://forum.atnel.pl/viewtopic.php?t=6821&p=78639#p78639 <![CDATA[Re: AD5161 sterowanie linią I2C]]> [syntax=basic4gl]$regfile = "m32def.dat"
$crystal = 16000000


Dim X As Byte
Config Portb.2 = Input
Config Portb.3 = Input
Portb.2 = 1
Portb.3 = 1


Config Scl = Portc.0
Config Sda = Portc.1
I2cinit
I2cstart
I2cwbyte &B01011000
I2cwbyte &B01000000
I2cwbyte 0
I2cstop

Do
I2cinit
If Pinb.2 = 0 Then Incr X
Waitms 500
If Pinb.3 = 0 Then Decr X
Waitms 500
Locate 1 , 1
Lcd X


I2cstart
I2cwbyte &B01011000
I2cwbyte &B00000000
I2cwbyte x
I2cstop


Wait 1
Loop
End[/syntax]

pozdrawiam

Statystyki: Napisane przez swicio — 19 kwi 2014, o 16:06

]]> 2014-04-19T13:28:59+01:00 2014-04-19T13:28:59+01:00 https://forum.atnel.pl/viewtopic.php?t=6821&p=78619#p78619 <![CDATA[AD5161 sterowanie linią I2C]]>
Przymierzam się do zrobienie regulacji podświetlania -kontrastu w wyświetlaczu LCD alfanumerycznego za pomocą układu AD5161 http://www.tme.eu/pl/Document/3ef8203d1 ... evices.pdf , moje pytanie jest następujące jak napisać kod do sterowania tego układu (programuje w BASCOMIE) ... adres układu będzie mi znajomy (wiadomo zainicjować linię I2C) i co dalej ?

Statystyki: Napisane przez slawek3000 — 19 kwi 2014, o 13:28

]]>