From 74079e58eb9edbb534519d6671e4fad8591e6901 Mon Sep 17 00:00:00 2001 From: Ellert <> Date: Sat, 13 Apr 2024 12:38:15 +0000 Subject: [PATCH] 74_AutomowerConnect.pm: educe spikes in border region after a hull polygon is set to attribut. git-svn-id: https://svn.fhem.de/fhem/trunk@28790 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/CHANGED | 2 + fhem/FHEM/74_AutomowerConnect.pm | 18 ++++++- fhem/lib/FHEM/Devices/AMConnect/Common.pm | 3 ++ fhem/www/pgm2/automowerconnect.js | 60 +++++++++++++++++++++++ 4 files changed, 82 insertions(+), 1 deletion(-) diff --git a/fhem/CHANGED b/fhem/CHANGED index 44e8269ec..3f079e992 100644 --- a/fhem/CHANGED +++ b/fhem/CHANGED @@ -1,5 +1,7 @@ # Add changes at the top of the list. Keep it in ASCII, and 80-char wide. # Do not insert empty lines here, update check depends on it + - feature: 74_AutomowerConnect.pm: reduce spikes in border region after a hull + polygon is set to attribut. - feature: 14_CUL_TCM97001.pm: NX7674, Kuehl- & Gefrierschrank-Thermometer (Rosenstein & Söhne), zugefügt Bei einem modify der DEF wird nun die alte DEF gelöscht diff --git a/fhem/FHEM/74_AutomowerConnect.pm b/fhem/FHEM/74_AutomowerConnect.pm index d62b068f9..3eeb3b52d 100644 --- a/fhem/FHEM/74_AutomowerConnect.pm +++ b/fhem/FHEM/74_AutomowerConnect.pm @@ -118,6 +118,9 @@ __END__
  • The mower path is shown in the detail view.
  • An arbitrary map can be used as background for the mower path.
  • The map has to be a raster image in webp, png or jpg format.
    • +
  • The property limits can be registered manually.
    • +
  • The mowing area limits can be registered manually.
    • +
  • The mowing area limits can be calculated, alternatively.
  • It's possible to control everything the API offers, e.g. schedule, headlight, cutting height and actions like start, pause, park etc.
  • Zones are definable.
  • Cutting height can be set for each zone differently.
    • @@ -302,6 +305,7 @@ __END__ hullConnector="1"
    hullResolution="40"
    hullCalculate="1"
    + hullSubtract=""
    propertyLimitsColor="#33cc33"
    propertyLimitsLineWidth="1"
    propertyLimitsConnector="1"
    @@ -455,6 +459,10 @@ __END__ The calculation is done only after site reload.
    The calculation of hull is stopped when the attribute ist set and starts again when attribute is deleted.
    The attribute weekdaysToResetWayPoints should be set to - and also the design attribute mowingPathUseDots should be set to "1" until the hull is sufficient. + If there is a polygon in attribute, it can be changed.
    + The design attribute hullSubtract can be set to a natural number {ℕ}, it depicts the recursion depth in which polygon points removed from way points.
    + This reduces spikes in border region.
    + hullSubtract="" removes the button 'Subtract Hull'.
    @@ -551,6 +559,9 @@ __END__
  • Der Pfad des Mähroboters wird in der Detailansicht des FHEMWEB Frontends angezeigt.
  • Der Pfad kann mit einer beliebigen Karte hinterlegt werden.
  • Die Karte muss als Rasterbild im webp, png oder jpg Format vorliegen.
    • +
  • Die Grundstücksgrenze kann manuell eingetragen werden.
    • +
  • Die Die Mähflächengrenze kann manuell eingetragen werden.
    • +
  • Alternativ kann die Mähflächengrenze berechnet werden.
  • Es ist möglich alles was die API anbietet zu steuern, z.B. Mähplan,Scheinwerfer, Schnitthöhe und Aktionen wie, Start, Pause, Parken usw.
  • Zonen können selbst definiert werden.
  • Die Schnitthöhe kann je selbstdefinierter Zone eingestellt werden.
    • @@ -737,6 +748,7 @@ __END__ hullConnector="1"
    hullResolution="40"
    hullCalculate="1"
    + hullSubtract=""
    propertyLimitsColor="#33cc33"
    propertyLimitsLineWidth="1"
    propertyLimitsConnector="1"
    @@ -893,7 +905,11 @@ __END__ Das Hüllenpolygon wird berechnet wenn das Designattribute gesetzt ist, hullCalculate="1" und es mehr als 50 Wegpunkte der Aktivität MOWING gibt.
    Die Berechnung wird beim Laden oder Wiederladen der Website ausgeführt.
    Die Berechnung stopt wenn dieses Attribut gesetzt ist und startet wenn das Attibut gelöscht wird.
    - Das Attribut weekdaysToResetWayPoints sollte auf - und das Designattribut mowingPathUseDots sollte auf "1" gesetzt werden, bis das Polygon die Hülle der Mähfläche zufriedenstellend abbildet. + Das Attribut weekdaysToResetWayPoints sollte auf - und das Designattribut mowingPathUseDots sollte auf "1" gesetzt werden.
    + Befindet sich ein Polygon im Attribut, besteht die Möglichkeit das Polygon anzupassen.
    + Das Designattribut hullSubtract kann auf eine natürliche Zahl {ℕ} gesetzt werden, die angibt in welcher Rekursionstiefe Polygonpunkte aus der Menge der Wegpunkte entfernt werden.
    + Das reduziert Ausreißer im Randbereich der vom Polygon umschlossenen Fläche.
    + Wenn hullSubtract="" gesetzt wird, dann wird der Button 'Subtract Hull' entfernt.
  • disable
    • diff --git a/fhem/lib/FHEM/Devices/AMConnect/Common.pm b/fhem/lib/FHEM/Devices/AMConnect/Common.pm index 538b69139..b336be1be 100644 --- a/fhem/lib/FHEM/Devices/AMConnect/Common.pm +++ b/fhem/lib/FHEM/Devices/AMConnect/Common.pm @@ -133,6 +133,7 @@ hullLineWidth="1" hullConnector="1" hullResolution="40" hullCalculate="1" +hullSubtract="" propertyLimitsColor="#33cc33" propertyLimitsLineWidth="1" propertyLimitsConnector="1" @@ -585,6 +586,8 @@ sub FW_detailFn { $ret .= ""; $ret .= "" if ( -e "$FW_dir/$hash->{helper}{FWEXTA}{path}/$hash->{helper}{FWEXTA}{file}" && !AttrVal( $name,'mowingAreaHull','' ) && $$mapDesign =~ m/hullCalculate="1"/g ); + $ret .= "" + if ( -e "$FW_dir/$hash->{helper}{FWEXTA}{path}/$hash->{helper}{FWEXTA}{file}" && AttrVal( $name,'mowingAreaHull','' ) && $$mapDesign =~ m/hullSubtract="\d+"/g ); $ret .= "
    "; $hash->{helper}{detailFnFirst} = 1; my $mid = $hash->{helper}{map_init_delay}; diff --git a/fhem/www/pgm2/automowerconnect.js b/fhem/www/pgm2/automowerconnect.js index 25f113465..25d1ac7fd 100644 --- a/fhem/www/pgm2/automowerconnect.js +++ b/fhem/www/pgm2/automowerconnect.js @@ -397,6 +397,66 @@ function AutomowerConnectGetHull ( path ) { } +function AutomowerConnectSubtractHull ( path ) { + $.getJSON( path, function( data, textStatus ) { + console.log( 'AutomowerConnectGetHull ( \''+path+'\' ): status '+textStatus ); + + if ( textStatus == 'success') { + // data.name, data.type, data.picx, data.picy, data.scalx, data.scaly, data.errdesc, data.posxy, data.poserrxy ); + const div = document.getElementById(data.type+'_'+data.name+'_div'); + const pos =data.posxy; + + if ( div && div.getAttribute( 'data-hullSubtract' ) && typeof hull === "function" ){ + const wypts = []; + const hsub = div.getAttribute( 'data-hullSubtract' ); + const wyres = div.getAttribute( 'data-hullResolution' ); + var hullpts = []; + + for ( let i = 0; i < pos.length; i+=3 ){ + + if ( pos[i+2] == "M") wypts.push( [ pos[i], pos[i+1] ] ); + + } + + for ( let i = 0; i < hsub; i++ ){ + + if ( wypts.length > 50 ) { + + hullpts = hull( wypts, wyres ); + + for ( let k = 0; k < hullpts.length; k++ ){ + + for ( let m = 0; m < wypts.length; m++ ){ + + if ( hullpts[k][0] == wypts[m][0] && hullpts[k][1] == wypts[m][1] ) { + + wypts.splice( m, 1 ); + break; + //~ m--; + //~ k++; + + } + + } + + } + + } + + hullpts = hull( wypts, wyres ); + + } + + FW_cmd( FW_root+"?cmd=attr "+data.name+" mowingAreaHull "+JSON.stringify( hullpts )+"&XHR=1",function(data){setTimeout(()=>{window.location.reload()},500)} ); + + } + + } + + }); + +} + //AutomowerConnectUpdateDetail (, , , , , , , , , , ) function AutomowerConnectUpdateDetail (dev, type, detailfnfirst, picx, picy, scalx, scaly, errdesc, pos, erray, hullxy) { const colorat = {