I2C klappt nicht mehr nach Umstellung auf bascom 1.11.7.7

[darwin.nuernberg]

HI

Hm. Ich guck' mal. Ich bau mal schnell andere Widerstände ein...
Meinst du das hilft?

Liebe Grüße, Tobi

Ich glaube nicht.
Meiner Meinung dürfte der Pegel auch so passen, Wichtig erscheint mir, dass im HI die VCC anliegt und dass bei Low ein sauberes GND anliegt. Ob das jetzt 10k oder 4,7k sind wirkt sich zunächst auf die Stromaufnahme aus. Wenn deine Chips daran keinen schaden genomen haben (davon gehe ich aber nicht aus (5V/4,7k = ~ 1mA und 5V/10k = 0,5mA = 100 uA). Mit Deiner 4,7k Variante könnte sogar die Leitung etwas länger ausfallen und dürfte gegen Störstrahlung (induktiv) besser geschützt sein.

[tobimc]

Hi

Hast recht.
Mit den 10K geht's auch nicht besser.

Aber an was liegt's dann?

Ich mach gerade einen Porttest.

Liebe Grüße, Tobi

[darwin.nuernberg]

Ob das jetzt 10k oder 4,7k sind wirkt sich zunächst auf die Stromaufnahme aus.

Ich habe gerade mal in 'nem schlauen Buch nachgesehen...

"I²C-BUS angewandt" vom Elektor Verlag (ISBN 3-92851-71-7):
Da sind sogar 'nur' 3,3k Widerstände auf der Leitung.

Also kann man Entwarnung geben, Du scheinst da ein anderes Problem zu haben.

Übrigens wird in dem Buch auch ein I²C Tester vorgestellt, welchen ich NATÜRLICH nicht nachgebaut habe. Könnte aber ein Hilfreichers Werkzeug sein.
Das Teil hat nur einen Haken, man braucht einen GAL, welcher programmiert werden muß und der Source dazu ist nicht abgedruckt und die beiliegende Dikette hab ich verschlampt, galube aber nicht dass da der Source dabei war. so muß man den Chip wohl kaufen, oder besser das ganze Teil (als Bausatz) von elektor beziehen.

[tobimc]

HI

Ich habe gerade ein Beispielprogramm von Bascom aufgespielt.
UND DAS HAT TADELLOß FUNKTIONIERT!!!

*kriesekrieg*

Ich glaube, ich bin dem Fehler auf der Spur.

Liebe Grüße, Tobi

[darwin.nuernberg]

Hi

Hast recht.
Mit den 10K geht's auch nicht besser.

Aber an was liegt's dann?

Ich mach gerade einen Porttest.

Liebe Grüße, Tobi

In so einem Fall, erst 'amal' tief Luft holen,
Bestimmt hat du dich Verfranzt oder einer Deiner Chips ist TOT (dann hat Du äben päch gehäbt).

Erst mal Kaffee trinken (und falls süchtig eine rauchen) erst dann:

Check nochmal ab ob du die richtigen Pins abgreifst (Ohmisch Messen nicht gucken!).
(SCL = PC0 = Pin 22 (mega32) und SDA = PC1 = PIN 23 (mega32))
und ob Dein Prog richtig eingestellt ist:

Config Scl = Portc.0                              ' Ports fuer IIC-Bus 
Config Sda = Portc.1 

I2cinit                                           ' I2C - BUS initialisieren

Und dann die Verbindung 1:1 (SCL auf SCL sowie SAD auf SDA und Masse nicht vergessen)

[darwin.nuernberg]

HI

Ich habe gerade ein Beispielprogramm von Bascom aufgespielt.
UND DAS HAT TADELLOß FUNKTIONIERT!!!

*kriesekrieg*

Ich glaube, ich bin dem Fehler auf der Spur.

Liebe Grüße, Tobi

Wie schon erwähnt,
Schau dir mal das Prog an.

• I2cinit ' I2C - BUS initialisieren

Es gibt da auch noch I2C start und end Befehle, schau mal in der Hilfe nach und mach mal ein paar ms Pause nach jedem Befehl (waitms 100).

[tobimc]

HI

Es scheint zu funktionieren.
Allerdings ziemlich lllllllaaaaaannnnggggggssssaaaaammmm.

Ich werde jetzt mal suchen, und finden, welche Anweisung (i2csend oder i2cwbyte) für dieses kleine Wunder zuständig ist...

Liebe Grüße, Tobi

[darwin.nuernberg]

HI

Es scheint zu funktionieren.
Allerdings ziemlich lllllllaaaaaannnnggggggssssaaaaammmm.

Ich werde jetzt mal suchen, und finden, welche Anweisung (i2csend oder i2cwbyte) für dieses kleine Wunder zuständig ist...

Liebe Grüße, Tobi

Die Geschwindigkeit hat mich auch etwas entsetzt, aber funktioniert hat es.

Man sollte eines bedenken:
Philips hat den Bus zum Steúern von. z.B. Stereoanlagen, Video- und DVD , also AV-Geräten entwickelt (da komt es auf ein paar ms hin oder her nicht an, abder die summieren sich (beachtlich).

Ich lasse mich gerne eines besseren belehren.
Wie schnell kann das denn sein?

[tobimc]

HI

ES FUNKTIONIERT.
UND ZWAR MIT BEIDEN BEFEHLEN.

-> Aber frag mich nicht, was ich anders gemacht habe!!!

Uff. Und ich dachte schon, das funzt nie mehr...

Aber das funzt immer erst, wenn ich alle technischen Register ziehe,
die mir in dieser Richtung messtechnisch zur Verfügung stehen.

Willst du ein Bild vom Bus sehen?

Ganz liebe Grüße, Tobi

Achso:
Das ist der Aktuelle Quellcode:
(Quick & Dirty)

$regfile = "m16def.dat"
$baud = 9600
$crystal = 16000000
$lib "i2c.lib"


Beep Alias Portd.2


Config Scl = Portc.0
Config Sda = Portc.1


Const 24c64 = &B10100001


Dim Var As Byte



I2cinit


Do

For Var = 0 To 5

Sound Beep , 500 , 350
Waitms 250


   I2cstart
   I2cwbyte 24c64
   I2cwbyte 23
   I2cstop


Wait 1

Sound Beep , 500 , 500
Waitms 1



Next Var








Sound Beep , 750 , 3000
Wait 1







For Var = 0 To 5

Sound Beep , 500 , 350
Waitms 250

   I2csend 24c64 , 255


Wait 1


Sound Beep , 500 , 500

Next Var



Sound Beep , 750 , 3000
Wait 1


Loop



End

[darwin.nuernberg]

HI

ES FUNKTIONIERT.
UND ZWAR MIT BEIDEN BEFEHLEN.

-> Aber frag mich nicht, was ich anders gemacht habe!!!

Uff. Und ich dachte schon, das funzt nie mehr...

Aber das funzt immer erst, wenn ich alle technischen Register ziehe,
die mir in dieser Richtung messtechnisch zur Verfügung stehen.

Willst du ein Bild vom Bus sehen?

Ganz liebe Grüße, Tobi

Achso:
Das ist der Aktuelle Quellcode:
(Quick & Dirty)

$regfile = "m16def.dat"
$baud = 9600
$crystal = 16000000
$lib "i2c.lib"


Beep Alias Portd.2


Config Scl = Portc.0
Config Sda = Portc.1


Const 24c64 = &B10100001


Dim Var As Byte



I2cinit


Do

For Var = 0 To 5

Sound Beep , 500 , 350
Waitms 250


   I2cstart
   I2cwbyte 24c64
   I2cwbyte 23
   I2cstop


Wait 1

Sound Beep , 500 , 500
Waitms 1



Next Var








Sound Beep , 750 , 3000
Wait 1







For Var = 0 To 5

Sound Beep , 500 , 350
Waitms 250

   I2csend 24c64 , 255


Wait 1


Sound Beep , 500 , 500

Next Var



Sound Beep , 750 , 3000
Wait 1


Loop



End

Ja,
zeig doch mal.

PS Deinen Code solltest Du auch als 'Tag' einbauen.
{markiere deinen Code von Anfang bis Ende und wähle den Button Code an.} Just for info, dann wirds 1. eindeutig, was dazugehört und 2. wird deine Message übersichtlicher.