Hello !

Sorry for the [OT]...

I've just entered into the world of I2C. Great bus. I made a simple lpt
to I2C device. I can control an 8 io pcf8574, but I have problems to
control the pcf8591 , quad ADC, one DAC. Does anyone has information how
to control this. I can't control it, altough I have the pdf file from
phillips.


Any help?


Delphi code follows :

procedure Tform1.change_dac (val : byte); // change the dac output value
var mmdata : array [1..3] of byte;
begin
mmdata[1]:=144; // the adress of the chip
mmdata[2]:=64;  // the control byte
mmdata[3]:=val; // the value needed at analog output
port.I2CMultiSend(144,3,@mmdata); // send the whole thing. to the chip
located at adress 144
end;

...This one works !

But this one doesn't :

procedure TForm1.Timer1Timer(Sender: TObject); // assign the input value
of adc to a trackbar's position.
var mydata : byte;
begin
port.I2C[144]:=64; send the control byte
mydata:=port.i2c[145]; // read data once
mydata:=port.i2c[145]; // a second time?
progressbar1.position:=mydata; // assign value to the progress bar
label1.caption:=inttostr(mydata); //... to the label.
end;

And finally, I'd like to know if the [OT] like this one are boring for
the piclist users. (If so, I wont bother you again :-)

Thanks !

Phil.

---------------------------------------------------------------------
                             Philippe Jadin
                     mailto:philippe.jadin@skynet.be
                             Belgium, Europe
Simple yet usefull  Robot stuff goto
http://users.swing.be/philippe.jadin
       For low-cost web design goto http://users.skynet.be/clairetnet