Compare commits

...

2 Commits

Author SHA1 Message Date
y.wang 51828ff7e6 Merge 2026-02-24 13:02:32 +01:00
y.wang de8c5112e0 Die Berechung des Kettenförderers wurde korrigiert. 2026-02-24 11:46:09 +01:00
2 changed files with 748 additions and 53 deletions
@@ -2,7 +2,7 @@
<svg xmlns="http://www.w3.org/2000/svg">
<g transform="rotate(0)">
<svg viewBox="0 0 264.58 264.58" preserveAspectRatio="none" position="absolute" overflow="visible">
<path d="m132.29-2.5e-6v264.58" fill="none" stroke="#1bff38" stroke-opacity="1" stroke-width="1px" />
<path d="m132.29-2.5e-6v264.58" fill="none" stroke="#1bff38" stroke-opacity="1" stroke-width="3px" />
</svg>
</g>
</svg>
+747 -52
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="s.hensch [ANGEBOT-NB06]" ModDate="2026-02-24T11:13:38" LanguageVersion="2014.1.3.712" />
<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="y.wang [ANGEBOT-NB02]" ModDate="2026-02-24T11:42:51" LanguageVersion="2014.1.3.714" />
<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">
@@ -1479,6 +1479,9 @@
<VAR Id="RDK:23747696" Name="TEFBogenData" Type="TEFBogenType[]" DesignTimeRemark="Liste aller TEF Bögen" />
<VAR Id="RDK:26514277" Name="KurvenWinkel" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:26515397" Name="cpId" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:26935461" Name="H_th" Type="double" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:26971815" Name="item_1" Type="string" DesignTimeRemark="Generated by RD" />
<VAR Id="RDK:27189644" Name="RueckgabeListe" Type="string" DesignTimeRemark="Generated by RD" />
</GROUP>
<GROUP Id="RDK:0006" Name="Profiles" SubType="ProfileSet">
<PROFILE Id="RDK:383" Name="ImportBackgroundProfile" TypeName="ImportBackgroundType" />
@@ -14650,8 +14653,178 @@ SSGConnectionPoint.x_M
<EXP><![CDATA[$=$shape_item.KettenFoerderer.Hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:26847500" DesignTimeRemark="Es gibt zwei Höhenangaben, aber keine ist fest gegeben: Winkel und Länge zählen">
<VALUECONDITION Value="false">
<SET Id="RDK:26935446" VarRef="L1">
<EXP><![CDATA[$=$Round(Hoehe/Tan(DegToRad(winkel)),0)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<GROUP Id="RDK:26935274" Name="TransferToPrototype" SubType="Generic">
<SET Id="RDK:26935450" VarRef="LH_fits">
<EXP><![CDATA[$=$IIF(Abs(L1-L_th)<LH_toleranz,True,False)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:26935251">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$HoeheOben>HoeheUnten]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26935247" SubType="Then">
<SET Id="RDK:26935245" VarRef="text">
<EXP><![CDATA[$=$"↓"]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:26935250" SubType="Else">
<SET Id="RDK:26935248" VarRef="text" DesignTimeTip="↓">
<EXP><![CDATA[$=$"↑"]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
<SET Id="RDK:26935252" VarRef="Shape_Prototype.KettenFoerdererDefinition.H_Oben">
<EXP><![CDATA[$=$HoeheOben]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935253" VarRef="Shape_Prototype.KettenFoerdererDefinition.H_Unten">
<EXP><![CDATA[$=$HoeheUnten]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935254" VarRef="Shape_Prototype.KettenFoerdererDefinition.winkel">
<EXP><![CDATA[$=$winkel]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935255" VarRef="Shape_Prototype.KettenFoerdererDefinition.L1">
<EXP><![CDATA[$=$L1]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935258" VarRef="Shape_Prototype.KettenFoerdererDefinition.LH_fits">
<EXP><![CDATA[$=$LH_fits]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935260" VarRef="Shape_Prototype.KettenFoerdererDefinition.Hoehe">
<EXP><![CDATA[$=$Hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935273" VarRef="Shape_Prototype.text">
<EXP><![CDATA[$=$text]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<EXIT_PROCESS Id="RDK:26935275" BreakType="4" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:26935317" DesignTimeRemark="HoeheUnten ist leer, HoeheOben ist NICHT leer">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$isEmpty(HoeheOben)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$isEmpty(HoeheUnten)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26935316" SubType="Then">
<SET Id="RDK:26935452" VarRef="HoeheUnten">
<EXP><![CDATA[$=$HoeheOben+Hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935456" VarRef="L1">
<EXP><![CDATA[$=$Round(Hoehe/Tan(DegToRad(winkel)),0)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<GROUP Id="RDK:27178150" Name="TransferToPrototype" SubType="Generic">
<SET Id="RDK:27178137" VarRef="LH_fits">
<EXP><![CDATA[$=$IIF(Abs(L1-L_th)<LH_toleranz,True,False)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:27178142">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$HoeheOben>HoeheUnten]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27178139" SubType="Then">
<SET Id="RDK:27178138" VarRef="text">
<EXP><![CDATA[$=$"↓"]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:27178141" SubType="Else">
<SET Id="RDK:27178140" VarRef="text" DesignTimeTip="↓">
<EXP><![CDATA[$=$"↑"]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
<SET Id="RDK:27178143" VarRef="Shape_Prototype.KettenFoerdererDefinition.H_Oben">
<EXP><![CDATA[$=$HoeheOben]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:27178144" VarRef="Shape_Prototype.KettenFoerdererDefinition.H_Unten">
<EXP><![CDATA[$=$HoeheUnten]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:27178145" VarRef="Shape_Prototype.KettenFoerdererDefinition.winkel">
<EXP><![CDATA[$=$winkel]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:27178146" VarRef="Shape_Prototype.KettenFoerdererDefinition.L1">
<EXP><![CDATA[$=$L1]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:27178147" VarRef="Shape_Prototype.KettenFoerdererDefinition.LH_fits">
<EXP><![CDATA[$=$LH_fits]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:27178148" VarRef="Shape_Prototype.KettenFoerdererDefinition.Hoehe">
<EXP><![CDATA[$=$Hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:27178149" VarRef="Shape_Prototype.text">
<EXP><![CDATA[$=$text]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<EXIT_PROCESS Id="RDK:26935315" BreakType="4" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:26935362">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$HoeheOben=HoeheUnten]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26935324" SubType="Then">
<SET Id="RDK:26935318" VarRef="L1">
<EXP><![CDATA[$=$Round(Hoehe/Tan(DegToRad(winkel)),0)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935319" VarRef="text">
<EXP><![CDATA[$=$"O"]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935320" VarRef="LH_fits">
<EXP><![CDATA[$=$False]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935322" VarRef="L_th">
<EXP><![CDATA[$=$L1]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<ACTION_CALL Id="RDK:26935323" Name="RDEngineering_MsgBox" Suppressed="True" DesignTimeRemark="{Text}">
<PAR Name="RDLibraryName">
<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
</PAR>
<PAR Name="MsgText">
<EXP><![CDATA[$C$H1 und H0 sind gleich, bitte überprüfen!]]></EXP>
</PAR>
<PAR Name="MsgStyle">
<EXP><![CDATA[$C$-1]]></EXP>
</PAR>
<PAR Name="BtnLayout">
<EXP><![CDATA[$C$-1]]></EXP>
</PAR>
<PAR Name="MsgCaption" />
<PAR Name="BaloonType" />
<PAR Name="BtnPressed">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
</ACTION_CALL>
</GROUP>
<GROUP Id="RDK:26935361" SubType="Else">
<IFTHENELSE Id="RDK:26935358" DesignTimeRemark="HöheOben UND HöheUnten haben Werte und sind fixiert">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$FesteH1]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="false">
@@ -14662,52 +14835,367 @@ SSGConnectionPoint.x_M
<EXP><![CDATA[$=$H_th/Tan(DegToRad(winkel))]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:26847499" SubType="Else">
<SET Id="RDK:26847575" VarRef="L1">
<EXP><![CDATA[$=$H_th/Tan(DegToRad(winkel))]]></EXP>
<SET Id="RDK:27178153" VarRef="L1">
<EXP><![CDATA[$=$Round(Hoehe/Tan(DegToRad(winkel)),0)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:26847498" DesignTimeRemark="Bestimme die Höhe oben und unten, je nach Wunsch grösser/kleiner einer Höhe">
</GROUP>
<GROUP Id="RDK:26935357" SubType="Else">
<SET Id="RDK:26935333" VarRef="Hoehe">
<EXP><![CDATA[$=$Abs(Round(L1*Tan(DegToRad(winkel)),2))]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:26935356" DesignTimeRemark="Es gibt zwei Höhenangaben, aber keine ist fest gegeben: Winkel und Länge zählen">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$FesteH1]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$FesteH0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26935339" SubType="Then">
<IFTHENELSE Id="RDK:27178166">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$(HoeheOben-Hoehe)>0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27178163" SubType="Then">
<SET Id="RDK:27178162" VarRef="HoeheUnten">
<EXP><![CDATA[$=$HoeheOben-Hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:27178165" SubType="Else">
<SET Id="RDK:27178164" VarRef="HoeheUnten">
<EXP><![CDATA[$=$HoeheOben+Hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</GROUP>
<GROUP Id="RDK:26935355" SubType="Else">
<IFTHENELSE Id="RDK:26935354" DesignTimeRemark="Bestimme die Höhe oben und unten, je nach Wunsch grösser/kleiner einer Höhe">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$H1gtH0=1]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$FesteH0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26935346" SubType="Then">
<IFTHENELSE Id="RDK:27178187">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$(HoeheOben-Hoehe)>0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27178184" SubType="Then">
<SET Id="RDK:27178183" VarRef="HoeheUnten">
<EXP><![CDATA[$=$HoeheOben-Round(Hoehe,0)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:27178186" SubType="Else">
<SET Id="RDK:27178185" VarRef="HoeheUnten">
<EXP><![CDATA[$=$HoeheOben+Round(Hoehe,0)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</GROUP>
<GROUP Id="RDK:26935353" SubType="Else">
<IFTHENELSE Id="RDK:27178201">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$(HoeheUnten-Hoehe)>0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27178198" SubType="Then">
<SET Id="RDK:27178197" VarRef="HoeheOben">
<EXP><![CDATA[$=$HoeheUnten-Round(Hoehe,0)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:27178200" SubType="Else">
<SET Id="RDK:27178199" VarRef="HoeheOben">
<EXP><![CDATA[$=$HoeheUnten+Round(Hoehe,0)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
<GROUP Id="RDK:26935433" Name="TransferToPrototype" SubType="Generic">
<SET Id="RDK:26935403" VarRef="LH_fits">
<EXP><![CDATA[$=$IIF(Abs(L1-L_th)<LH_toleranz,True,False)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:26935410">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$HoeheOben>HoeheUnten]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26935406" SubType="Then">
<SET Id="RDK:26935404" VarRef="text">
<EXP><![CDATA[$=$"↓"]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:26935409" SubType="Else">
<SET Id="RDK:26935407" VarRef="text" DesignTimeTip="↓">
<EXP><![CDATA[$=$"↑"]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
<SET Id="RDK:26935411" VarRef="Shape_Prototype.KettenFoerdererDefinition.H_Oben">
<EXP><![CDATA[$=$HoeheOben]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935412" VarRef="Shape_Prototype.KettenFoerdererDefinition.H_Unten">
<EXP><![CDATA[$=$HoeheUnten]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935413" VarRef="Shape_Prototype.KettenFoerdererDefinition.winkel">
<EXP><![CDATA[$=$winkel]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935415" VarRef="Shape_Prototype.KettenFoerdererDefinition.L1">
<EXP><![CDATA[$=$L1]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935417" VarRef="Shape_Prototype.KettenFoerdererDefinition.LH_fits">
<EXP><![CDATA[$=$LH_fits]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935419" VarRef="Shape_Prototype.KettenFoerdererDefinition.Hoehe">
<EXP><![CDATA[$=$Hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26935432" VarRef="Shape_Prototype.text">
<EXP><![CDATA[$=$text]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</FUNCTION>
<FUNCTION Id="RDK:26978331" Name="Calculate KettenFoerderer" InputTypeName="string">
<COMMENTS Id="RDK:26978181" 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" />
<IFTHENELSE Id="RDK:26978184">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$IsEmpty(Param.Input)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26978183" SubType="Then">
<EXIT_PROCESS Id="RDK:26978182" BreakType="4" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<COMMENTS Id="RDK:26978185" DesignTimeRemark="Param.Input" />
<GROUP Id="RDK:26978187" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:26978186" Name="shape_item" Type="Editor2DShapeType" />
</GROUP>
<SET Id="RDK:26978188" VarRef="shape_item">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input]]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:26978194">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$IsEmpty(shape_item.KettenFoerdererDefinition.H_Oben)]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$IsEmpty(shape_item.KettenFoerdererDefinition.H_Oben)]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26978193" SubType="Then">
<SET Id="RDK:26978189" VarRef="shape_item.KettenFoerdererDefinition.LH_fits">
<EXP><![CDATA[$=$False]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978190" VarRef="shape_item.text">
<EXP><![CDATA[$C$O]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978191" VarRef="Param.Result">
<EXP><![CDATA[$C$False]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<EXIT_PROCESS Id="RDK:26978192" BreakType="4" ExitStatus="0" />
</GROUP>
</IFTHENELSE>
<GROUP Id="RDK:26978207" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:26978195" Name="HoeheOben" Type="double" />
<VAR Id="RDK:26978196" Name="HoeheUnten" Type="double" />
<VAR Id="RDK:26978197" Name="winkel" Type="double" />
<VAR Id="RDK:26978198" Name="FesteH1" Type="boolean" />
<VAR Id="RDK:26978199" Name="FesteH0" Type="boolean" />
<VAR Id="RDK:26978202" Name="L1" Type="double" />
<VAR Id="RDK:26978204" Name="LH_toleranz" Type="double" />
<VAR Id="RDK:26978205" Name="LH_fits" Type="boolean" />
<VAR Id="RDK:26978206" Name="text" Type="string" />
</GROUP>
<SET Id="RDK:26978221" VarRef="HoeheOben">
<EXP><![CDATA[$=$shape_item.KettenFoerdererDefinition.H_Oben]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978222" VarRef="HoeheUnten">
<EXP><![CDATA[$=$shape_item.KettenFoerdererDefinition.H_Unten]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978223" VarRef="L1">
<EXP><![CDATA[$=$shape_item.KettenFoerdererDefinition.L1]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978224" VarRef="winkel">
<EXP><![CDATA[$=$shape_item.KettenFoerdererDefinition.winkel]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978225" VarRef="FesteH0">
<EXP><![CDATA[$=$shape_item.KettenFoerdererDefinition.FesteH0]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978226" VarRef="FesteH1">
<EXP><![CDATA[$=$shape_item.KettenFoerdererDefinition.FesteH1]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:26978229">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$HoeheOben=HoeheUnten]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26978228" SubType="Then">
<ACTION_CALL Id="RDK:26978227" Name="RDEngineering_MsgBox" Suppressed="True" DesignTimeRemark="{Text}">
<PAR Name="RDLibraryName">
<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
</PAR>
<PAR Name="MsgText">
<EXP><![CDATA[$C$H1 und H0 sind gleich, bitte überprüfen!]]></EXP>
</PAR>
<PAR Name="MsgStyle">
<EXP><![CDATA[$C$-1]]></EXP>
</PAR>
<PAR Name="BtnLayout">
<EXP><![CDATA[$C$-1]]></EXP>
</PAR>
<PAR Name="MsgCaption" />
<PAR Name="BaloonType" />
<PAR Name="BtnPressed">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
</ACTION_CALL>
</GROUP>
</IFTHENELSE>
<IFTHENELSE Id="RDK:26978330">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$Abs(winkel) < 0.0001]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26978247" SubType="Then">
<SET Id="RDK:26978244" VarRef="shape_item.KettenFoerdererDefinition.LH_fits">
<EXP><![CDATA[$=$False]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978245" VarRef="shape_item.text">
<EXP><![CDATA[$C$O]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978246" VarRef="Param.Result">
<EXP><![CDATA[$C$False]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:26978329" SubType="Else">
<GROUP Id="RDK:26978255" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
<VAR Id="RDK:26978248" Name="Hoehe" Type="double" />
<VAR Id="RDK:26978251" Name="LH_fits" Type="boolean" />
<VAR Id="RDK:26992870" Name="LH_toleranz" Type="double" />
<VAR Id="RDK:26984604" Name="L_th" Type="double" />
<VAR Id="RDK:26978253" Name="text" Type="string" />
<VAR Id="RDK:26978254" Name="z" Type="double" />
</GROUP>
<IFTHENELSE Id="RDK:26978288" DesignTimeRemark="HöheOben UND HöheUnten haben Werte und sind fixiert">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$FesteH1]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$FesteH0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26978263" SubType="Then">
<SET Id="RDK:26978256" VarRef="Hoehe">
<EXP><![CDATA[$=$Abs(HoeheOben-HoeheUnten)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978344" VarRef="L1">
<EXP><![CDATA[$=$Round(Hoehe/Tan(DegToRad(winkel)),0)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:26978287" SubType="Else">
<SET Id="RDK:26978264" VarRef="Hoehe">
<EXP><![CDATA[$=$Abs(Round(L1*Tan(DegToRad(winkel)),0))]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:26978286" DesignTimeRemark="Es gibt zwei Höhenangaben, aber keine ist fest gegeben: Winkel und Länge zählen">
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$FesteH1]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$FesteH0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26978271" SubType="Then">
<IFTHENELSE Id="RDK:27172840">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$(HoeheOben-Hoehe)>0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27172833" SubType="Then">
<SET Id="RDK:27172832" VarRef="HoeheUnten">
<EXP><![CDATA[$=$HoeheOben-Hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:27172839" SubType="Else">
<SET Id="RDK:27172857" VarRef="HoeheUnten">
<EXP><![CDATA[$=$HoeheOben+Hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</GROUP>
<GROUP Id="RDK:26978285" SubType="Else">
<IFTHENELSE Id="RDK:26978284" DesignTimeRemark="Bestimme die Höhe oben und unten, je nach Wunsch grösser/kleiner einer Höhe">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$FesteH1]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="false">
<EXP><![CDATA[$=$FesteH0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26847491" SubType="Then">
<IFTHENELSE Id="RDK:26847490">
<GROUP Id="RDK:26978277" SubType="Then">
<IFTHENELSE Id="RDK:27172876">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$H1gtH0=1]]></EXP>
<EXP><![CDATA[$=$(HoeheOben-Hoehe)>0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26847487" SubType="Then">
<SET Id="RDK:26847486" VarRef="HoeheUnten">
<EXP><![CDATA[$=$HoeheOben+Round(H_th,0)]]></EXP>
<GROUP Id="RDK:27172873" SubType="Then">
<SET Id="RDK:27172872" VarRef="HoeheUnten">
<EXP><![CDATA[$=$HoeheOben-Round(Hoehe,0)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:26847489" SubType="Else">
<SET Id="RDK:26847488" VarRef="HoeheUnten">
<EXP><![CDATA[$=$HoeheOben-Round(H_th,0)]]></EXP>
<GROUP Id="RDK:27172875" SubType="Else">
<SET Id="RDK:27172874" VarRef="HoeheUnten">
<EXP><![CDATA[$=$HoeheOben+Round(Hoehe,0)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
</GROUP>
<GROUP Id="RDK:26847497" SubType="Else">
<IFTHENELSE Id="RDK:26847496">
<GROUP Id="RDK:26978283" SubType="Else">
<IFTHENELSE Id="RDK:27172888">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$H1gtH0=1]]></EXP>
<EXP><![CDATA[$=$(HoeheUnten-Hoehe)>0]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26847493" SubType="Then">
<SET Id="RDK:26847492" VarRef="HoeheOben">
<EXP><![CDATA[$=$HoeheUnten-Round(H_th,0)]]></EXP>
<GROUP Id="RDK:27172885" SubType="Then">
<SET Id="RDK:27172884" VarRef="HoeheOben">
<EXP><![CDATA[$=$HoeheUnten-Round(Hoehe,0)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:26847495" SubType="Else">
<SET Id="RDK:26847494" VarRef="HoeheOben">
<EXP><![CDATA[$=$HoeheUnten+Round(H_th,0)]]></EXP>
<GROUP Id="RDK:27172887" SubType="Else">
<SET Id="RDK:26978280" VarRef="HoeheOben">
<EXP><![CDATA[$=$HoeheUnten+Round(Hoehe,0)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
@@ -14716,7 +15204,35 @@ SSGConnectionPoint.x_M
</IFTHENELSE>
</GROUP>
</IFTHENELSE>
<SET Id="RDK:26847585" VarRef="LH_fits">
</GROUP>
</IFTHENELSE>
<COMMENTS Id="RDK:26978289" DesignTimeRemark="Es werden die Länge, Winkel und Höhen als gegeben angsehen. Jetzt nur noch rechnen ob die Angaben passen. " />
<SET Id="RDK:26978397" VarRef="L_th">
<EXP><![CDATA[$=$Abs(HoeheOben-HoeheUnten)/Tan(DegToRad(winkel))]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978292" VarRef="LH_fits">
<EXP><![CDATA[$=$IIF(Abs(L1-L_th)<LH_toleranz,True,False)]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978293" VarRef="z">
<EXP><![CDATA[$=$HoeheOben/2 + HoeheUnten/2]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<IFTHENELSE Id="RDK:26978308">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$HoeheOben=HoeheUnten]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26978299" SubType="Then">
<SET Id="RDK:26978294" VarRef="Hoehe">
<EXP><![CDATA[$=$0]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978295" VarRef="text">
<EXP><![CDATA[$=$"O"]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26978296" VarRef="LH_fits">
<EXP><![CDATA[$=$False]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
@@ -42613,6 +43129,18 @@ me.x
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<CALLFUNCTION Id="RDK:27244792">
<PAR Name="FuncName">
<EXP><![CDATA[$C$UpdateShape]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
<GROUP Id="RDK:23783231" SubType="Else">
<ACTION_CALL Id="RDK:23783230" Name="RDEngineering_MsgBox" DesignTimeRemark="{Text}">
@@ -42637,6 +43165,64 @@ me.x
</GROUP>
</IFTHENELSE>
</CASEGROUP>
<CASEGROUP Id="RDK:26961379" CaseType="0">
<EXP><![CDATA[$C$KettenFoerderer]]></EXP>
<IFTHENELSE Id="RDK:26961378">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="OFBogen"]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="OFGerade"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26961375" SubType="Then">
<CALLFUNCTION Id="RDK:26961374">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetHeightOfStreckeOnConnect]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<CALLFUNCTION Id="RDK:27244790">
<PAR Name="FuncName">
<EXP><![CDATA[$C$UpdateShape]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
<GROUP Id="RDK:26961377" SubType="Else">
<ACTION_CALL Id="RDK:26961376" Name="RDEngineering_MsgBox" DesignTimeRemark="{Text}">
<PAR Name="RDLibraryName">
<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
</PAR>
<PAR Name="MsgText">
<EXP><![CDATA[$C$connect not allowed. No Data set. Please unlink it again. ]]></EXP>
</PAR>
<PAR Name="MsgStyle">
<EXP><![CDATA[$C$-1]]></EXP>
</PAR>
<PAR Name="BtnLayout">
<EXP><![CDATA[$C$-1]]></EXP>
</PAR>
<PAR Name="MsgCaption" />
<PAR Name="BaloonType" />
<PAR Name="BtnPressed">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
</ACTION_CALL>
</GROUP>
</IFTHENELSE>
</CASEGROUP>
<CASEGROUP Id="RDK:23016795" CaseType="0">
<EXP><![CDATA[$C$OFBogen]]></EXP>
<IFTHENELSE Id="RDK:23016794">
@@ -42662,6 +43248,18 @@ me.x
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<CALLFUNCTION Id="RDK:27244799">
<PAR Name="FuncName">
<EXP><![CDATA[$C$UpdateShape]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$Param.Input[0].shapeID]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</GROUP>
<GROUP Id="RDK:23016793" SubType="Else">
<ACTION_CALL Id="RDK:23016792" Name="RDEngineering_MsgBox" DesignTimeRemark="{Text}">
@@ -52507,6 +53105,64 @@ me.x
<PAR Name="AdvancedOptions" />
</SET>
</CASEGROUP>
<CASEGROUP Id="RDK:26961421" CaseType="0">
<EXP><![CDATA[$C$KettenFoerderer]]></EXP>
<IFTHENELSE Id="RDK:26961418">
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$label="cp1"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:26961414" SubType="Then">
<SET Id="RDK:26961412" VarRef="ShapeList[&quot;id=&quot;+shapeId].KettenFoerdererDefinition.H_Oben">
<EXP><![CDATA[$=$hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26961413" VarRef="ShapeList[&quot;id=&quot;+shapeId].KettenFoerdererDefinition.FesteH1">
<EXP><![CDATA[$=$True]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
<GROUP Id="RDK:26961417" SubType="Else">
<SET Id="RDK:26961415" VarRef="ShapeList[&quot;id=&quot;+shapeId].KettenFoerdererDefinition.H_Unten">
<EXP><![CDATA[$=$hoehe]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:26961416" VarRef="ShapeList[&quot;id=&quot;+shapeId].KettenFoerdererDefinition.FesteH0">
<EXP><![CDATA[$=$True]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
</GROUP>
</IFTHENELSE>
<CALLFUNCTION Id="RDK:26961423">
<PAR Name="FuncName">
<EXP><![CDATA[$C$Calculate KettenFoerderer]]></EXP>
</PAR>
<PAR Name="InputExp">
<EXP><![CDATA[$=$shapeId]]></EXP>
</PAR>
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
<SET Id="RDK:26961420" VarRef="ShapeList[&quot;id=&quot;+shapeId].z">
<EXP><![CDATA[$=$ShapeList["id="+shapeId].KettenFoerdererDefinition.H_Oben/2 + ShapeList["id="+shapeId].KettenFoerdererDefinition.H_Unten/2]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET Id="RDK:27244788" VarRef="ShapeList[&quot;id=&quot;+shapeId].height">
<EXP><![CDATA[$=$ShapeList["id="+shapeId].KettenFoerdererDefinition.L1]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<CALLFUNCTION Id="RDK:27199015" Suppressed="True">
<PAR Name="FuncName">
<EXP><![CDATA[$C$KettenFoerdererUI]]></EXP>
</PAR>
<PAR Name="InputExp" />
<PAR Name="ResultRef">
<EXP><![CDATA[$V$]]></EXP>
</PAR>
<PAR Name="Options" />
</CALLFUNCTION>
</CASEGROUP>
<CASEGROUP Id="RDK:23016954" CaseType="0">
<EXP><![CDATA[$C$OFBogen]]></EXP>
<COMMENTS Id="RDK:23016951" DesignTimeRemark="Setze den Zustand erst einmal auf ok, nachdem die Höhe definiert ist" />
@@ -55079,19 +55735,70 @@ me.x
<EXP><![CDATA[$=$RueckgabeListe["key=Hoehe"].Dbl]]></EXP>
<PAR Name="AdvancedOptions" />
</SET>
<SET_STRUCT Id="RDK:21940004" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeSetHeight">
<PAR Name="Key">
<EXP><![CDATA[$C$ShapeId]]></EXP>
</PAR>
<PAR Name="StrArr" />
<PAR Name="Str">
<EXP><![CDATA[$=$item_0.id]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
<PAR Name="StrArr2D" />
</SET_STRUCT>
<IFTHENELSE Id="RDK:27016655">
<VALUECONDITION Value="true" Oper="OR">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="KettenFoerderer"]]></EXP>
</VALUECONDITION>
<VALUECONDITION Value="true">
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family="OFWeiche"]]></EXP>
</VALUECONDITION>
<GROUP Id="RDK:27016656" SubType="Then">
<SET_STRUCT Id="RDK:27016665" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeSetHeight">
<PAR Name="Key">
<EXP><![CDATA[$C$ShapeId]]></EXP>
</PAR>
<PAR Name="StrArr" />
<PAR Name="StrArr2D" />
<PAR Name="Str">
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:27189650" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeSetHeight">
<PAR Name="Key">
<EXP><![CDATA[$C$Label]]></EXP>
</PAR>
<PAR Name="StrArr" />
<PAR Name="StrArr2D" />
<PAR Name="Str">
<EXP><![CDATA[$=$Param.Input[1].connectionPointID]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
</GROUP>
<GROUP Id="RDK:27016657" SubType="Else">
<SET_STRUCT Id="RDK:21940004" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeSetHeight">
<PAR Name="Key">
<EXP><![CDATA[$C$ShapeId]]></EXP>
</PAR>
<PAR Name="StrArr" />
<PAR Name="Str">
<EXP><![CDATA[$=$item_0.id]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
<PAR Name="StrArr2D" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:21940010" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeSetHeight">
<PAR Name="Key">
<EXP><![CDATA[$C$Label]]></EXP>
</PAR>
<PAR Name="StrArr" />
<PAR Name="Str">
<EXP><![CDATA[$=$cpid]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
<PAR Name="StrArr2D" />
</SET_STRUCT>
</GROUP>
</IFTHENELSE>
<SET_STRUCT Id="RDK:21940008" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeSetHeight">
<PAR Name="Key">
<EXP><![CDATA[$C$Hoehe]]></EXP>
@@ -55104,18 +55811,6 @@ me.x
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<SET_STRUCT Id="RDK:21940010" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeSetHeight">
<PAR Name="Key">
<EXP><![CDATA[$C$Label]]></EXP>
</PAR>
<PAR Name="StrArr" />
<PAR Name="Str">
<EXP><![CDATA[$=$cpid]]></EXP>
</PAR>
<PAR Name="Dbl" />
<PAR Name="Int" />
<PAR Name="Boo" />
</SET_STRUCT>
<CALLFUNCTION Id="RDK:21940002">
<PAR Name="FuncName">
<EXP><![CDATA[$C$SetHeight]]></EXP>