BASCOM TWI-Master Library - Problem

Torsten S. Gast 04.07.2005 14:52 #206996

Lesenswert?

•

Hallo,

ich versuche mich gerade in die I2C Programmierung in Bascom
einzuarbeiten. Zum testen habe ich einen PCF8574 am Mega16 an den
Hardware-Twi angeschlossen. Das folgende Programm erzeugt ein
(Knight-Rider :-))Lauflicht am PCF8574. Der I2C-Bus wird dabei von
Bascom softwaremässig realisiert.

$regfile = "m16def.dat"
$crystal = 8000000

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

I2cinit

Dim Pcfadresse5 As Byte

Pcfadresse5 = &B01001000

Dim A As Integer
A = 17

Do

Gosub Linie1

Loop

Linie1:
  I2csend Pcfadresse5 , 254 : Waitms A
  I2csend Pcfadresse5 , 253 : Waitms A
  I2csend Pcfadresse5 , 251 : Waitms A
  I2csend Pcfadresse5 , 247 : Waitms A
  I2csend Pcfadresse5 , 239 : Waitms A
  I2csend Pcfadresse5 , 223 : Waitms A
  I2csend Pcfadresse5 , 191 : Waitms A
  I2csend Pcfadresse5 , 127 : Waitms A
  I2csend Pcfadresse5 , 191 : Waitms A
  I2csend Pcfadresse5 , 223 : Waitms A
  I2csend Pcfadresse5 , 239 : Waitms A
  I2csend Pcfadresse5 , 247 : Waitms A
  I2csend Pcfadresse5 , 251 : Waitms A
  I2csend Pcfadresse5 , 253 : Waitms A
  I2csend Pcfadresse5 , 254 : Waitms A
  I2csend Pcfadresse5 , 255
Return

Wenn ich jedoch die Harware-TWI Library "i2c_twi.lbx" benutze
funktioniert das ganze zwar auch noch, jedoch vieeel (geschätzt- um den
Faktor 5)langsamer.


$regfile = "m16def.dat"
$crystal = 8000000
$lib "i2c_twi.lbx"


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

I2cinit

Config Twi = 100000

Dim Pcfadresse5 As Byte

Pcfadresse5 = &B01001000

Dim A As Integer
A = 17

Do

Gosub Linie1

Loop

Linie1:
  I2csend Pcfadresse5 , 254 : Waitms A
  I2csend Pcfadresse5 , 253 : Waitms A
  I2csend Pcfadresse5 , 251 : Waitms A
  I2csend Pcfadresse5 , 247 : Waitms A
  I2csend Pcfadresse5 , 239 : Waitms A
  I2csend Pcfadresse5 , 223 : Waitms A
  I2csend Pcfadresse5 , 191 : Waitms A
  I2csend Pcfadresse5 , 127 : Waitms A
  I2csend Pcfadresse5 , 191 : Waitms A
  I2csend Pcfadresse5 , 223 : Waitms A
  I2csend Pcfadresse5 , 239 : Waitms A
  I2csend Pcfadresse5 , 247 : Waitms A
  I2csend Pcfadresse5 , 251 : Waitms A
  I2csend Pcfadresse5 , 253 : Waitms A
  I2csend Pcfadresse5 , 254 : Waitms A
  I2csend Pcfadresse5 , 255 :
Return

Wende ich die Library falsch an ? Hat schon jemand mit der Library
gearbeitet?

Torsten

Beitrag melden Bearbeiten Thread verschieben Thread sperren Anmeldepflicht aktivieren Anpinnen Thread löschen Thread mit anderem zusammenführen Markierten Text zitieren Antwort Antwort mit Zitat

Berto Gast 04.07.2005 15:01 #206997

Lesenswert?

•

▲
▼

Hallo, also bei waitus hatte ich schonmal probleme weil ich ne variable
genommen hatte. probiers doch mal mit nem festwert!?

Beitrag melden Bearbeiten Löschen Markierten Text zitieren Antwort Antwort mit Zitat

Mr.Kaktus Gast 17.02.2011 17:27 #2067827

Lesenswert?

•

▲
▼

Ist schon ein alter Thread, aber vieleicht hilft es jemanden.

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

Config scl und config sda ist nicht notwendig bzw nicht erlaubt, weil 
die µC mit Harware TWI nur an diesem Hardware Twi auch Hardware TWI 
machen können. ;-)

Diese Angeaben soltten reichen

$regfile = "m2560def.dat"
$crystal = 16000000
$lib "i2c_twi.lbx"           'für echte Hardware TWI
Config Twi = 100000          'wanted clock frequency

Beitrag melden Bearbeiten Löschen Markierten Text zitieren Antwort Antwort mit Zitat

BASCOM TWI-Master Library - Problem

Antwort schreiben