Auswertung einer Induktionsschleife

[Kalli01]

Hallo
Ich habe die Induktionsschleife aus dem Wiki nach gebaut und diese funktioniert auch soweit.
Das Signal wird mit einem ATtiny 13 erzeugt. 10ms ein und 90ms aus.

Auswerten möchte ich das ganze mit Hilfe des ADC. Das Programm aus dem Wiki funktioniert bei mir aber nicht. Die Variable Svr ist immer negativ und positiv. Egal ob sich die Spule in der Schleife oder außerhalb der Schleife befindet.
Mein Problem ist, das das Signal schwächer wird wenn sich die Spule über dem Boden befindet.

Also wie kann ich mit dem ADC die erste positive oder negative Flanke erkennen ohne das die 2. Flanke stört?

Im Moment habe ich es so, aber das funktioniert nur sicher wenn sich die Spule auf gleicher Ebene mit der Schleife befindet. S0 ist der ADC Wert



If S0 > 600 Then 'Impuls ausserhalb Grenzwerte
For I = 1 To 4000
If S0 < 300 Then
Print "S0 aussen"
Exit For
End If
Next
End If
If S0 < 300 Then 'Impuls ausserhalb Grenzwerte
For I = 1 To 4000
If S0 > 600 Then
'Print "S0 innen"
Exit For
End If
Next
End If



Ohne Impuls liegt der Wert bei ca 450

MfG