Klappt das Beispiel bei den Samples denn nicht? Also bei mir gehen die. Als kleine Hilfe: Der iButton hat einen 1Wire-Bus. Da gibt es bei den Samples ein File. Und als kleine Zusatzhilfe zum Überprüfen ob die ausgelesene Seriennummer korrekt ist:
' wenn Lesefehler dann wars das ....
If Crc8(Ar(1) , 7) <> Ar( Then MACHWASBEIFEHLER
' Null als Kennung für Chip gibts nicht, also ....
If Ar(1) = 0 Then MACHWASBEIFEHLER

Und man braucht nur einen PIN mit dem 4k7-Pullup. Ohne zusätzliche ICs.

Viel Spass bei den 1Wire-iButtons