nun Klugsch... liegt mir fern,

hab noch mal den MOSI Pin am Oszi gehangen.

Da sind irgendwelche Pegel drauf, und beim Senden zusätzlich
das Datenpaket, kaum zu erkennen, wie ein paar Morsezeichen.
Ich lass jetzt mal den Code Dudeln.

einen hätte ich doch noch

Bau mal das For I mit ein


Code:
Sub Rf12_ready
   Local I As Word
   Reset Spi_cs
   For I = 1 To 65000
      If Spi_sdo = 1 Then Exit For
   Next
End Sub
Wigbert