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