Gaußfit eingebaut

1 files changed, 11 insertions, 0 deletions

diff --git a/epost.lpr b/epost.lpr
index ab04b20..93fed13 100644
--- a/epost.lpr
+++ b/epost.lpr
@@ -284,6 +284,17 @@ begin
         aufraeumen;
         halt(1);
       end;
+      if startetMit('Fitte Gauße an ',s) then begin
+        i:=findeWerte(s,nil,@wertes,@Konturen,false);
+        if i<0 then begin
+          aufraeumen;
+          halt(1);
+        end;
+        if wertes[i].fitteGausze(syntaxtest,inf,maxthreads) then
+          continue;
+        aufraeumen;
+        halt(1);
+      end;
       if startetMit('Zeitfrequenzanalyse ',s) then begin
         j:=findeWerte(erstesArgument(s),nil,@wertes,@Konturen,false);
         if j<0 then begin