Schoenenberger_Systeme_GmbH/SSG-Ruledesigner-Konfigurator
3
0
Fork 0
Code Issues Pull Requests Packages Projects 1 Releases Wiki Activity

Set Status Funktionen hinzugefügt um jeweils die Farbe der Shapes nach Zustand zu ändern

Browse Source
This commit is contained in:
Simon Schmutzler
2024-06-05 16:45:55 +02:00
parent 19a0110650
commit c876f8090b
6 changed files with 449 additions and 45 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Doku/bilder/Schoenenberger_Farben.png
BIN
View File
Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 9.8 KiB

Editor2DLibrary/SSG/shapes/props/Gefaellestrecke_Default.txt
+54
View File
@@ -0,0 +1,54 @@
{
"shapeMode": 0,
"name": "Gefällestrecke_Falsch",
"family": "Gefaellestrecke",
"icon": "SSG/shapes/img/Gefaellestrecke.png",
"iconBig": "SSG/shapes/img/Gefaellestrecke.png",
"srcSVG": "SSG/shapes/svg/Gefaellestrecke_Default.xml",
"text": "^",
"width": 377.9528,
"height": 6047.2441,
"depth": 755.9055,
"behaviour": "(NOSTRETCH)(NOSTRETCHONVIEW)(NOROTATE)(NOROTATEONVIEW)(CONTAINER)(HIDEDIMENSIONS)(HIDEROTATION)(HIDEPIN)(ALWAYSFRONT)(ORIGIN=CENTER)",
"connectionPoints": [
{
"id": "cp1",
"x": 500.0,
"y": 0.0,
"z": 0.0,
"xMin": "",
"xMax": "",
"xStep": "",
"yMin": "",
"yMax": "",
"yStep": "",
"zMin": "",
"zMax": "",
"zStep": "",
"direction": 0.0,
"linkClass": "Gefaellestrecke",
"label": "Oben",
"isDimension": true
},
{
"id": "cp2",
"x": 500.0,
"y": 1000.0,
"z": 0.0,
"xMin": "",
"xMax": "",
"xStep": "",
"yMin": "",
"yMax": "",
"yStep": "",
"zMin": "",
"zMax": "",
"zStep": "",
"direction": 180.0,
"linkClass": "Gefaellestrecke",
"label": "Unten",
"isDimension": true
}
],
"eventClass": "OnInserted,OnDoubleclick,OnPasted,OnLinked"
}
Editor2DLibrary/SSG/shapes/svg/Gefaellestrecke_Default.xml
+11
View File
@@ -0,0 +1,11 @@
<?xml version="1.0" encoding="UTF-8" standalone="no"?>
<svg xmlns="http://www.w3.org/2000/svg">
<g transform="rotate(0)">
<svg viewBox="0 0 26.45833 264.58333" preserveAspectRatio="none" position="absolute" overflow="visible">
<defs />
<g transform="translate(0,-13.203638)">
<path style="opacity:0.94;fill:none;stroke-opacity:1" d="M 13.65157,13.203638 V 277.78696" stroke-width="1px" stroke="#ffa700" />
</g>
</svg>
</g>
</svg>
Editor2DLibrary/SSG/shapes/svg/Gefaellestrecke_Falsch.xml
+1 -1
View File
@@ -4,7 +4,7 @@
<svg viewBox="0 0 26.45833 264.58333" preserveAspectRatio="none" position="absolute" overflow="visible">
<defs />
<g transform="translate(0,-13.203638)">
<path style="opacity:0.94;fill:none;stroke-opacity:1" d="M 13.65157,13.203638 V 277.78696" stroke-width="1px" stroke="#f44336" />
<path style="opacity:0.94;fill:none;stroke-opacity:1" d="M 13.65157,13.203638 V 277.78696" stroke-width="1px" stroke="#f33256" />
</g>
</svg>
</g>
Editor2DLibrary/SSG/shapes/svg/Gefaellestrecke_Richtig.xml
+1 -1
View File
@@ -4,7 +4,7 @@
<svg viewBox="0 0 26.45833 264.58333" preserveAspectRatio="none" position="absolute" overflow="visible">
<defs />
<g transform="translate(0,-13.203638)">
<path style="opacity:0.94;fill:none;stroke-opacity:1" d="M 13.65157,13.203638 V 277.78696" stroke-width="1px" stroke="#00ff00" />
<path style="opacity:0.94;fill:none;stroke-opacity:1" d="M 13.65157,13.203638 V 277.78696" stroke-width="1px" stroke="#6C6E70" />
</g>
</svg>
</g>
MAIN_SSG.rdx
+382 -43
View File
@@ -1,6 +1,6 @@
<?xml version="1.0" encoding="utf-8"?>
<PROCESS Id="RDK:0001" Name="MAIN_SSG" ModernUI="True" Options="(GITSAVEMODE)(NOUPDATEINCLUDEFILES)" Expanded="True">
<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="dre [NBDELP3561-04C]" ModDate="2024-06-03T16:11:02" LanguageVersion="2014.1.3.673" />
<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="s.schmutzler [ANGEBOT-NB06]" ModDate="2024-06-05T16:44:25" LanguageVersion="2014.1.3.673" />
<GROUP Id="RDK:0002" Name="Declarations" SubType="Declarations" Expanded="True">
<GROUP Id="RDK:0003" Name="Types" SubType="TypeSet" IncludeDate="0">
<GROUP Id="RDK:26387" Name="SSG_Group" SubType="TypeSet" IncludeDate="0">
@@ -40,9 +40,7 @@
<FIELD Id="RDK:1561121" Name="depth_M" Type="integer" DesignTimeNotes="Höhe der BounddingBox für die Motorstation" />
<FIELD Id="RDK:1561123" Name="depth_S" Type="integer" DesignTimeNotes="Höhe der BounddingBox für die Spannstation" />
<FIELD Id="RDK:1561128" Name="depth_Band" Type="integer" DesignTimeNotes="Höhe der BounddingBox für den Band" />
<FIELD Id="RDK:19270335" Name="height_Band" Type="integer" DesignTimeNotes="Höhe der BounddingBox für den Band" />
<FIELD Id="RDK:1561130" Name="depth_PinBand" Type="integer" DesignTimeNotes="Höhe der BounddingBox für den Band" />
<FIELD Id="RDK:19270337" Name="height_PinBand" Type="integer" DesignTimeNotes="Höhe der BounddingBox für den Band" />
</TYPE>
<TYPE Id="RDK:1520433" Name="EckradType" SubType="structure">
<TYPE_VALUES />
@@ -139,7 +137,7 @@
<FIELD Id="RDK:18530523" Name="FoerdererDefinition" Type="FoerdererType" />
<FIELD Id="RDK:18732357" Name="StreckeDefinition" Type="StreckeType" />
</TYPE>
<TYPE Id="RDK:1783792" Name="SSGParameter" SubType="structure" HasArrayType="True">
<TYPE Id="RDK:1783792" Name="SSGParameter" Expanded="True" SubType="structure" HasArrayType="True">
<TYPE_VALUES />
<FIELD Id="RDK:1783794" Name="Key" Type="string" />
<FIELD Id="RDK:1789531" Name="Str" Type="string" />
@@ -1014,10 +1012,10 @@
<VAR Id="RDK:1732132" Name="label" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:1759312" Name="cp_label" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:18295767" Name="L_s" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:18777657" Name="HoeheOben" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:18777660" Name="HoeheUnten" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:18825603" Name="cpId" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:18826988" Name="shapeID" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:18777657" Name="HoeheOben" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:18777660" Name="HoeheUnten" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:18825603" Name="cpId" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:18826988" Name="shapeID" Type="string" Suppressed="True" DesignTimeRemark="Generated by RD" />
</GROUP>
<GROUP Id="RDK:0006" Name="Profiles" SubType="ProfileSet">
<PROFILE Id="RDK:383" Name="ImportBackgroundProfile" TypeName="ImportBackgroundType" />
@@ -1118,7 +1116,7 @@
<EXP><![CDATA[$C$True]]></EXP>
</PAR>
<PAR Name="PageShowPreview3D">
<EXP><![CDATA[$C$True]]></EXP>
<EXP><![CDATA[$C$False]]></EXP>
</PAR>
<PAR Name="PageShowPreview3DDinamicLights" />
<PAR Name="PageShowPreview3DGround" />
@@ -2409,7 +2407,9 @@
<PAR Name="srcTexture3D" />
<PAR Name="width">
<EXP><![CDATA[$=$ConvertToPixel(ShapeTotalLength, "mm", 96)
'Neue Länge aus der Eingabe]]></EXP>
'Neue Länge aus der Eingabe
]]></EXP>
</PAR>
<PAR Name="height">
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.Durchmesser, "mm", 96)]]></EXP>
@@ -2523,7 +2523,7 @@
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.AbstandMS, "mm", 96)]]></EXP>
</PAR>
<PAR Name="height">
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.height_Band, "mm", 96)]]></EXP>
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.depth_Band, "mm", 96)]]></EXP>
</PAR>
<PAR Name="depth">
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.depth_Band, "mm", 96)]]></EXP>
@@ -2553,7 +2553,7 @@
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.AbstandMS, "mm", 96)]]></EXP>
</PAR>
<PAR Name="height">
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.height_Band, "mm", 96)]]></EXP>
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.depth_Band, "mm", 96)]]></EXP>
</PAR>
<PAR Name="depth">
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.depth_Band, "mm", 96)]]></EXP>
@@ -2588,7 +2588,7 @@
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.AbstandMS, "mm", 96)]]></EXP>
</PAR>
<PAR Name="height">
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.height_PinBand, "mm", 96)]]></EXP>
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.depth_Band, "mm", 96)]]></EXP>
</PAR>
<PAR Name="depth">
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.depth_Band, "mm", 96)]]></EXP>
@@ -2618,7 +2618,7 @@
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.AbstandMS, "mm", 96)]]></EXP>
</PAR>
<PAR Name="height">
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.height_PinBand, "mm", 96)]]></EXP>
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.depth_Band, "mm", 96)]]></EXP>
</PAR>
<PAR Name="depth">
<EXP><![CDATA[$=$ConvertToPixel(KreiselData.depth_Band, "mm", 96)]]></EXP>
@@ -3302,6 +3302,7 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
<GROUP Id="RDK:439268" Name="Local Variables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:439269" Name="ID" Type="string" />
<VAR Id="RDK:476605" Name="i" Type="integer" />
<VAR Id="RDK:19265050" Name="isDefined" Type="boolean" />
</GROUP>
<SET Id="RDK:439276" VarRef="ID">
<EXP><![CDATA[$=$Param.Input]]></EXP>
@@ -3311,6 +3312,18 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
<EXP><![CDATA[$=$IndexOfByFieldValue(ShapeList, "id", ID)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<CALLFUNCTION Id="RDK:19269861">
<PAR Name="FuncName">
<EXP><![CDATA[$C$Check_is_defined]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$ID]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$isDefined]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<SELECTCASE Id="RDK:439273">
<EXP><![CDATA[$=$Shape_Prototype.family]]></EXP>
<CASEGROUP Id="RDK:439275" CaseType="0">
@@ -3404,7 +3417,6 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
</PAR>
<PAR Name="EckradDefinition" />
<PAR Name="GefaelleDefinition" />
<PAR Name="StreckeDefinition" />
<PAR Name="FoerdererDefinition" />
<PAR Name="WeicheDefinition" />
<PAR Name="BTMTBeladungDefinition" />
@@ -3424,9 +3436,7 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
<PAR Name="description" />
<PAR Name="x" />
<PAR Name="y" />
<PAR Name="z">
<EXP><![CDATA[$=$KreiselData.Hoehe]]></EXP>
</PAR>
<PAR Name="z" />
<PAR Name="width">
<EXP><![CDATA[$=$ConvertFromPixel(Shape_Prototype.width, "mm", 96)]]></EXP>
</PAR>
@@ -3472,6 +3482,7 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
<PAR Name="pinned" />
<PAR Name="selected" />
<PAR Name="includeInBOM" />
<PAR Name="StreckeDefinition" />
</SET_STRUCT>
</GROUP>
</CASEGROUP>
@@ -3730,7 +3741,7 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
<PAR Name="BTMTBeladungDefinition" />
<PAR Name="BTMTEntladungDefinition" />
<PAR Name="source">
<EXP><![CDATA[$=$IIF(Shape_Prototype.GefaelleDefinition.LH_fits=True,"Gefaellestrecke_Richtig","Gefaellestrecke_Falsch")]]></EXP>
<EXP><![CDATA[$=$IIF(isDefined=False, "Gefaellestrecke_Default", IIF(Shape_Prototype.GefaelleDefinition.LH_fits=True,"Gefaellestrecke_Richtig","Gefaellestrecke_Falsch"))]]></EXP>
</PAR>
<PAR Name="sourceLibrary">
<EXP><![CDATA[$=$GS2DLibraryName]]></EXP>
@@ -11753,10 +11764,6 @@ Contains(IndirectConnKreiselList, Link) AND Shape_Prototype.family = "Gefaellest
<EXP><![CDATA[$=$Shape_Prototype.KreiselDefinition.Drehung]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:19276451" VarRef="Shape_Prototype.KreiselDefinition.Hoehe" Bookmarked="True">
<EXP><![CDATA[$=$Shape_Prototype.z]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<GROUP Id="RDK:607198" Name="Read CPs From Data" SubType="Generic">
<SET Id="RDK:607191" VarRef="SSGConnectionPointList">
<EXP><![CDATA[$=$FromJSON(Property_Prototype.connectionPoints)]]></EXP>
@@ -12534,7 +12541,7 @@ me.x
<VAR Id="RDK:203618" Name="ShapeTotalLength" Type="double" Suppressed="True" />
<VAR Id="RDK:506783" Name="PrototypeLink" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:514766" Name="OriginalRatation" Type="integer" />
<VAR Id="RDK:18372899" Name="ÜbergabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:18372899" Name="UebergabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:18374148" Name="RückgabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:18399128" Name="shape_id" Type="string" />
<VAR Id="RDK:19089175" Name="item_1" Type="Editor2DShapeType" />
@@ -13307,10 +13314,6 @@ me.x
<EXP><![CDATA[$=$IsEmpty(RückgabeListe)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18827014" SubType="Then">
<SET Id="RDK:18827006" VarRef="shape_id">
<EXP><![CDATA[$=$RückgabeListe["key=ShapeId"].Str]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<CALLFUNCTION Id="RDK:18827007">
<PAR Name="FuncName">
<EXP><![CDATA[$C$Check_LH_fits_gefaelle]]></EXP>
@@ -13759,22 +13762,22 @@ me.x
<FUNCTION Id="RDK:529791" Name="OnEditor2DCreateCategory" Options="(TYPEFUNCTION)" />
<FUNCTION Id="RDK:18474112" Name="WriteShapeDataFoerderer" InputTypeName="SSGParameter[]">
<GROUP Id="RDK:18474116" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:18474115" Name="ÜbergabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:18474115" Name="UebergabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:18474151" Name="shape_id" Type="string" />
<VAR Id="RDK:18474166" Name="ind" Type="integer" />
<VAR Id="RDK:18474167" Name="shape_item" Type="Editor2DShapeType" />
</GROUP>
<SET Id="RDK:18474121" VarRef="ÜbergabeListe">
<SET Id="RDK:18474121" VarRef="UebergabeListe">
<EXP><![CDATA[$=$Param.Input]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:18474143">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$IsEmpty(ÜbergabeListe)]]></EXP>
<EXP><![CDATA[$=$IsEmpty(UebergabeListe)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:18474142" SubType="Then">
<SET Id="RDK:18474140" VarRef="shape_id">
<EXP><![CDATA[$=$ÜbergabeListe["key=shapeID"].Str]]></EXP>
<EXP><![CDATA[$=$UebergabeListe["key=shapeID"].Str]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:18474171" VarRef="shape_item">
@@ -15222,12 +15225,101 @@ ShapeList["id="+Param.Input[1].shapeID].name
</GROUP>
</IFTHENELSE>
</FUNCTION>
<FUNCTION Id="RDK:19265800" Name="Check_is_defined" InputTypeName="string" ResultTypeName="boolean">
<COMMENTS Id="RDK:19265764" DesignTimeRemark="Wenn beide Connection-Points verbunden sind, dann gibt diese Funktion &quot;True&quot; zurück, sonst &quot;False&quot;" />
<GROUP Id="RDK:19265766" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:19265765" Name="shape_item" Type="Editor2DShapeType" />
</GROUP>
<IFTHENELSE Id="RDK:19265769">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$IsEmpty(Param.Input)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:19265768" SubType="Then">
<EXIT_PROCESS Id="RDK:19265767" BreakType="4" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<COMMENTS Id="RDK:19265770" DesignTimeRemark="Param.Input" />
<SET Id="RDK:19265771" VarRef="shape_item">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SELECTCASE Id="RDK:19265789">
<EXP><![CDATA[$=$shape_item.family]]></EXP>
<CASEGROUP Id="RDK:19265772" CaseType="0">
<EXP><![CDATA[$C$Kreisel]]></EXP>
</CASEGROUP>
<CASEGROUP Id="RDK:19265773" CaseType="0">
<EXP><![CDATA[$C$Eckrad]]></EXP>
</CASEGROUP>
<CASEGROUP Id="RDK:19265777" CaseType="0">
<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
<IFTHENELSE Id="RDK:19265776">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$IsEmpty(shape_item.GefaelleDefinition.HoeheOben)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$IsEmpty(shape_item.GefaelleDefinition.HoeheUnten)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:19265775" SubType="Then">
<SET Id="RDK:19265774" VarRef="Param.Result">
<EXP><![CDATA[$=$False]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</CASEGROUP>
<CASEGROUP Id="RDK:19265781" CaseType="0">
<EXP><![CDATA[$C$Strecke]]></EXP>
<IFTHENELSE Id="RDK:19265780">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$IsEmpty(shape_item.StreckeDefinition.HoeheOben)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$IsEmpty(shape_item.StreckeDefinition.HoeheUnten)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:19265779" SubType="Then">
<SET Id="RDK:19265778" VarRef="Param.Result">
<EXP><![CDATA[$=$False]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</CASEGROUP>
<CASEGROUP Id="RDK:19265785" CaseType="0">
<EXP><![CDATA[$C$Foerderer]]></EXP>
<IFTHENELSE Id="RDK:19265784">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$IsEmpty(shape_item.FoerdererDefinition.HoeheOben)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$IsEmpty(shape_item.FoerdererDefinition.HoeheUnten)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:19265783" SubType="Then">
<SET Id="RDK:19265782" VarRef="Param.Result">
<EXP><![CDATA[$=$False]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</CASEGROUP>
<CASEGROUP Id="RDK:19265786" CaseType="0">
<EXP><![CDATA[$C$BTMTBeladung]]></EXP>
</CASEGROUP>
<CASEGROUP Id="RDK:19265787" CaseType="0">
<EXP><![CDATA[$C$BTMTEntladung]]></EXP>
</CASEGROUP>
<CASEGROUP Id="RDK:19265788" CaseType="1">
<EXP />
</CASEGROUP>
</SELECTCASE>
</FUNCTION>
<FUNCTION Id="RDK:18326311" Name="Check_LH_fits_gefaelle" InputTypeName="string">
<COMMENTS Id="RDK:1792975" DesignTimeRemark="Wenn die theoretische Länge L_f und die Länge des Shapes L1 übereinstimmen, dann wird der Gefaelle als &quot;in Ordnung&quot; betrachtet" />
<GROUP Id="RDK:18329391" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:18329384" Name="L_th" Type="double" />
<VAR Id="RDK:18539553" Name="H_th" Type="double" />
<VAR Id="RDK:18376628" Name="shape_item" Type="Editor2DShapeType" />
<VAR Id="RDK:19290186" Name="UebergabeListe" Type="SSGParameter[]" />
</GROUP>
<IFTHENELSE Id="RDK:18396608">
<VALUECONDITION Value="true">
@@ -15283,6 +15375,18 @@ ShapeList["id="+Param.Input[1].shapeID].name
<EXP><![CDATA[$=$shape_item]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<CALLFUNCTION Id="RDK:19281369" Suppressed="True">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetStatus_Ok]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Shape_Prototype.id]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
</IFTHENELSE>
</FUNCTION>
@@ -15592,6 +15696,248 @@ ShapeList["id="+Param.Input[1].shapeID].name
<PAR Name="AdvancedOptions" />
</SET>
</FUNCTION>
<FUNCTION Id="RDK:19287453" Name="SetColorOfShape" InputTypeName="string" ResultTypeName="boolean">
<GROUP Id="RDK:19287454" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:19290238" Name="shapeID" Type="string" />
<VAR Id="RDK:19290240" Name="color" Type="string" />
</GROUP>
<COMMENTS Id="RDK:19302617" DesignTimeRemark="Param.Input" />
<COMMENTS Id="RDK:19302619" DesignTimeRemark="Param.Input[&quot;Key=id&quot;].Str" />
<SET Id="RDK:19290237" VarRef="shapeID">
<EXP><![CDATA[$=$Param.Input["key=id"].Str]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:19290242" VarRef="color">
<EXP><![CDATA[$=$Param.Input["key=color"].Str]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:19290213" VarRef="ShapeList[IndexOfByFieldValue(ShapeList, &quot;id&quot;, shapeID)].lineColor">
<EXP><![CDATA[$=$color]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</FUNCTION>
<FUNCTION Id="RDK:19290191" Name="SetStatus_False" InputTypeName="string" ResultTypeName="boolean">
<GROUP Id="RDK:19290203" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:19290201" Name="shape_item" Type="Editor2DShapeType">
<SET Id="RDK:19290200" VarRef="Me">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
<VAR Id="RDK:19290202" Name="UebergabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:19290288" Name="color" Type="string" />
</GROUP>
<IFTHENELSE Id="RDK:19290219">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$IndexOfByFieldValue(ShapeList, "id", shape_item.id) > 0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:19290215" SubType="Then">
<SET Id="RDK:19290301" VarRef="color">
<EXP><![CDATA[$C$#f33256]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET_STRUCT Id="RDK:19290187" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$id]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Shape_Prototype.id]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:19290189" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$color]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$color]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<CALLFUNCTION Id="RDK:19290445">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetColorOfShape]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
</IFTHENELSE>
</FUNCTION>
<FUNCTION Id="RDK:19290193" Name="SetStatus_Undef" InputTypeName="string" ResultTypeName="boolean">
<GROUP Id="RDK:19290315" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:19290312" Name="shape_item" Type="Editor2DShapeType">
<SET Id="RDK:19290311" VarRef="Me">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
<VAR Id="RDK:19290313" Name="UebergabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:19290314" Name="color" Type="string" />
</GROUP>
<IFTHENELSE Id="RDK:19290373">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$IndexOfByFieldValue(ShapeList, "id", shape_item.id) > 0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:19290370" SubType="Then">
<SET Id="RDK:19290442" VarRef="color">
<EXP><![CDATA[$C$#ffa700]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET_STRUCT Id="RDK:19290367" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$id]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Shape_Prototype.id]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:19290368" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$color]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$color]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<CALLFUNCTION Id="RDK:19290447">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetColorOfShape]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
</IFTHENELSE>
</FUNCTION>
<FUNCTION Id="RDK:19290195" Name="SetStatus_Ok" InputTypeName="string" ResultTypeName="boolean">
<GROUP Id="RDK:19290325" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:19290322" Name="shape_item" Type="Editor2DShapeType">
<SET Id="RDK:19290321" VarRef="Me">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</VAR>
<VAR Id="RDK:19290323" Name="UebergabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:19290324" Name="color" Type="string" />
</GROUP>
<IFTHENELSE Id="RDK:19290423">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$IndexOfByFieldValue(ShapeList, "id", shape_item.id) > 0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:19290420" SubType="Then">
<SELECTCASE Id="RDK:19290416">
<EXP><![CDATA[$=$shape_item.family]]></EXP>
<CASEGROUP Id="RDK:19290401" CaseType="0">
<EXP><![CDATA[$C$Kreisel]]></EXP>
</CASEGROUP>
<CASEGROUP Id="RDK:19290403" CaseType="0">
<EXP><![CDATA[$C$Eckrad]]></EXP>
<SET Id="RDK:19290402" VarRef="color">
<EXP><![CDATA[$C$#0E499F]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</CASEGROUP>
<CASEGROUP Id="RDK:19290405" CaseType="0">
<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
<SET Id="RDK:19290404" VarRef="color">
<EXP><![CDATA[$C$#6C6E70]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</CASEGROUP>
<CASEGROUP Id="RDK:19290407" CaseType="0">
<EXP><![CDATA[$C$Strecke]]></EXP>
<SET Id="RDK:19290406" VarRef="color">
<EXP><![CDATA[$C$#6C6E70]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</CASEGROUP>
<CASEGROUP Id="RDK:19290409" CaseType="0">
<EXP><![CDATA[$C$Foerderer]]></EXP>
<SET Id="RDK:19290408" VarRef="color">
<EXP><![CDATA[$C$#0E499F]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</CASEGROUP>
<CASEGROUP Id="RDK:19290411" CaseType="0">
<EXP><![CDATA[$C$BTMTBeladung]]></EXP>
<SET Id="RDK:19290410" VarRef="color">
<EXP><![CDATA[$C$#DBDBDB]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</CASEGROUP>
<CASEGROUP Id="RDK:19290413" CaseType="0">
<EXP><![CDATA[$C$BTMTEntladung]]></EXP>
<SET Id="RDK:19290412" VarRef="color">
<EXP><![CDATA[$C$#DBDBDB]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</CASEGROUP>
<CASEGROUP Id="RDK:19290415" CaseType="1">
<EXP />
<SET Id="RDK:19290414" VarRef="color">
<EXP><![CDATA[$C$#ffffff]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</CASEGROUP>
</SELECTCASE>
<SET_STRUCT Id="RDK:19290417" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$id]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$Shape_Prototype.id]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:19290418" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
<PAR Name="Key">
<EXP><![CDATA[$C$color]]></EXP>
</PAR>
<PAR Name="Str">
<EXP><![CDATA[$=$color]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<CALLFUNCTION Id="RDK:19290449">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetColorOfShape]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
</IFTHENELSE>
</FUNCTION>
<FUNCTION Id="RDK:18732540" Name="SetHeightOfStreckeOnConnect" InputTypeName="Editor2DEventArgumentsTypeList" ResultTypeName="SSGParameter[]">
<GROUP Id="RDK:18742673" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:18742667" Name="shape_item" Type="Editor2DShapeType" />
@@ -16081,7 +16427,6 @@ ShapeList["id="+Param.Input[1].shapeID].name
<VAR Id="RDK:18741864" Name="item" Type="Editor2DShapeType" />
<VAR Id="RDK:18732502" Name="cpId" Type="string" />
<VAR Id="RDK:18741868" Name="hoehe" Type="double" />
<VAR Id="RDK:18741872" Name="UebergabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:18741950" Name="RueckgabeListe" Type="SSGParameter[]" />
<VAR Id="RDK:18741959" Name="hoehe_oben" Type="double" />
<VAR Id="RDK:18741961" Name="hoehe_unten" Type="double" />
@@ -20628,22 +20973,16 @@ ShapeList["id="+Param.Input[1].shapeID].name
<PAR Name="x" />
<PAR Name="y" />
<PAR Name="depth_M">
<EXP><![CDATA[$C$500]]></EXP>
<EXP><![CDATA[$C$200]]></EXP>
</PAR>
<PAR Name="depth_S">
<EXP><![CDATA[$C$400]]></EXP>
<EXP><![CDATA[$C$200]]></EXP>
</PAR>
<PAR Name="depth_Band">
<EXP><![CDATA[$C$5]]></EXP>
</PAR>
<PAR Name="height_Band">
<EXP><![CDATA[$C$2]]></EXP>
<EXP><![CDATA[$C$30]]></EXP>
</PAR>
<PAR Name="depth_PinBand">
<EXP><![CDATA[$C$5]]></EXP>
</PAR>
<PAR Name="height_PinBand">
<EXP><![CDATA[$C$2]]></EXP>
<EXP><![CDATA[$C$30]]></EXP>
</PAR>
</SET_STRUCT>
</GROUP>