Das müsste doch jetzt so gehen oder? Und ich muss doch bei I2C  von den 2 Leitungen gegen VCC nen Widerstand schalten. Welchen wert kann man da empfehlem?
	Code:
	$regfile = "M32def.dat"                           ' the used chip
$crystal = 16000000
Config Scl = Portc.0                                        'I2C-Ports festlegen
Config Sda = Portc.1
Dim I2cdaten(6) As Byte
I2cinit
I2cdaten(1) = 10   'Kennung muss bei RN-Motor immer 10 sein
I2cdaten(2) = 4    'Befehlscode
I2cdaten(3) = 0    '1 Parameter
I2cdaten(4) = 0    '2 Parameter
I2csend &H56 , I2cdaten(1) , 5                              'Befehl wird gesendet
Waitms 500
I2cdaten(1) = 10   'Kennung muss bei RN-Motor immer 10 sein
I2cdaten(2) = 6    'Befehlscode
I2cdaten(3) = 0    '1 Parameter
I2csend &H56 , I2cdaten(1) , 5                              'Befehl wird gesendet
Waitms 500
 
						
					
Lesezeichen