Hallo zusammen,

ich beschäftige mich gerade mit 1-wire Bausteinen. Genauer gesagt mit dem DS1820 zur Temperaturmessung.
Im Web habe ich eine passenden Code gefunden mit dem ich experimentieren kann.
Code:
$regfile = "m32def.dat"
$crystal = 7372800

' LCD konfigurieren Port auf Ausgabe setzten und Pin's entsprechend zuordnen
Ddrd = &HFF
Config Lcdpin = Pin , Db4 = Portb.0 , Db5 = Portb.1 , Db6 = Portb.2 , Db7 = Portb.3 , E = Portb.4 , Rs = Portb.7
Config Lcd = 16 * 2

' Pin für 1wire Schnittstelle festlegen, Schnittstelle wird von Bascom durch Software realisiert
Config 1wire = Portc.0

Dim Ar(2) As Byte

Cls

Do
 1wreset
 1wwrite &HCC
 1wwrite &H44
 1wreset
 1wwrite &HCC
 1wwrite &HBE
 Ar(1) = 1wread(2)

 Waitms 500
 Locate 1 , 1
 Lcd Hex(ar(2)) ; Hex(ar(1))
 Locate 2 , 5
 Shift Ar(1) , Right , 1
 Lcd Ar(1)
Loop

End
Der hier beschriebende Code läuft mit einem DS1820 an einem Port.
Ich möchte nun einen zweiten an Port Portc.1 anschließen.

Wie muss ich diesen im Programm einbauen?

Schöne Grüße
Daniel