Compare commits
3 Commits
7b0eb49879
...
bf0c36e80d
| Author | SHA1 | Date | |
|---|---|---|---|
 Simon Schmutzler
|
bf0c36e80d | ||
|
Simon Schmutzler
|
9de80c3532 | ||
|
Simon Schmutzler
|
2149b2c245 |
+385
-262
@@ -4277,6 +4277,7 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
|
||||
<PAR Name="pinned" />
|
||||
<PAR Name="selected" />
|
||||
<PAR Name="includeInBOM" />
|
||||
<PAR Name="isDefined" />
|
||||
</SET_STRUCT>
|
||||
<SET_STRUCT Id="RDK:20164888" VarRef="Shape_Prototype" ListRef="ShapeList" Options="$=$"(REPLACEIDX="+i+")"" Bookmarked="True" DesignTimeNotes="Shape.depth*Inch/DPI


Shape_Prototype.KreiselDefinition.OrientierungHV
IIF(Shape_Prototype.KreiselDefinition.OrientierungHV<>Shape_Prototype.rotation,Shape_Prototype.rotation,Shape_Prototype.KreiselDefinition.OrientierungHV)

depth
">
|
||||
<PAR Name="SivasNummer" />
|
||||
@@ -4290,6 +4291,7 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
|
||||
<PAR Name="WeicheDefinition" />
|
||||
<PAR Name="BTMTBeladungDefinition" />
|
||||
<PAR Name="BTMTEntladungDefinition" />
|
||||
<PAR Name="isDefined" />
|
||||
<PAR Name="source">
|
||||
<EXP><![CDATA[$=$Shape_Prototype.id]]></EXP>
|
||||
</PAR>
|
||||
@@ -9525,6 +9527,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:20607518" CaseType="1">
|
||||
<EXP />
|
||||
<EXIT_PROCESS Id="RDK:20683219" DesignTimeRemark="Es wird die Höhe nur von zusammenhängenden Kreiseln oder Eckrädern vererbt. Von allen anderen Elementen nicht." ExitStatus="0" />
|
||||
</CASEGROUP>
|
||||
</SELECTCASE>
|
||||
<CALLFUNCTION Id="RDK:1280616" DesignTimeTip="old input value: ExecOnValues(parent_links, "StrAfter(Me, "";"")", "")">
|
||||
@@ -14479,18 +14482,42 @@ me.x
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family]]></EXP>
|
||||
<CASEGROUP Id="RDK:1576707" CaseType="0">
|
||||
<EXP><![CDATA[$C$Kreisel]]></EXP>
|
||||
<CALLFUNCTION Id="RDK:19927916" DesignTimeNotes="20231005 -1-">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$InheritHeight]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<IFTHENELSE Id="RDK:20683220">
|
||||
<VALUECONDITION Value="true" Oper="OR">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family = "Kreisel"]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family = "Eckrad"]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<GROUP Id="RDK:20683221" SubType="Then">
|
||||
<CALLFUNCTION Id="RDK:19927916" DesignTimeNotes="20231005 -1-">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$InheritHeight]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
<GROUP Id="RDK:20683222" SubType="Else">
|
||||
<CALLFUNCTION Id="RDK:20683231">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$SetHeightOnConnect]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
</IFTHENELSE>
|
||||
<GROUP Id="RDK:304141" Name="Kreisel Operations" SubType="Generic" DesignTimeNotes="ShapeList["id="+Param.Input[0].shapeID].family="Kreisel"
ShapeList["id="+Param.Input[1].shapeID].family="Kreisel"">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$(ShapeList["id="+Param.Input[0].shapeID].Rotationsklasse="Rotationsobjekt") Or
|
||||
@@ -14645,104 +14672,6 @@ me.x
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
</GROUP>
|
||||
<GROUP Id="RDK:1002232" Name="InheritHeight" SubType="Generic" Suppressed="True">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$Count(ListDiff(NewListStr("Gefaellestrecke", "Kreisel"),NewListStr(ShapeList["id="+Param.Input[0].shapeID].family, ShapeList["id="+Param.Input[1].shapeID].family)))=0]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<IFTHENELSE Id="RDK:1003282">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID].family="Kreisel"]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<GROUP Id="RDK:1003283" SubType="Then">
|
||||
<SET Id="RDK:1003270" VarRef="Shape_Kreisel">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID]]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<SET Id="RDK:1003296" VarRef="Shape_Gefaellestrecke">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID]]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</GROUP>
|
||||
<GROUP Id="RDK:1003284" SubType="Else">
|
||||
<SET Id="RDK:1003298" VarRef="Shape_Kreisel">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID]]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<SET Id="RDK:1003300" VarRef="Shape_Gefaellestrecke">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[0].shapeID]]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</GROUP>
|
||||
</IFTHENELSE>
|
||||
<COMMENTS Id="RDK:1158774" DesignTimeRemark="Annahme cp1: Gefällestrecke Connection Point (graphisch) oben" DesignTimeNotes="20230928 -1-" />
|
||||
<COMMENTS Id="RDK:1158776" DesignTimeRemark="Annahme cp2: Gefällestrecke Connection Point (graphisch) unten" DesignTimeNotes="20230928 -1-" />
|
||||
<GROUP Id="RDK:1163027" Name="To Gefällestrecke cp1 (top point)" SubType="Generic" DesignTimeNotes="20230928 -1-">
|
||||
<VALUECONDITION Value="true" Oper="OR">
|
||||
<EXP><![CDATA[$=$Param.Input[0].connectionPointID = "cp1" AND Param.Input[0].shapeID = Shape_Gefaellestrecke.id]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$Param.Input[1].connectionPointID = "cp1" AND Param.Input[1].shapeID = Shape_Gefaellestrecke.id]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<SET Id="RDK:1158798" VarRef="ShapeList["id="+Shape_Gefaellestrecke.id].GefaelleDefinition.HoeheOben">
|
||||
<EXP><![CDATA[$=$Shape_Kreisel.KreiselDefinition.Hoehe]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</GROUP>
|
||||
<GROUP Id="RDK:1163049" Name="To Gefällestrecke cp2 (bottom point)" SubType="Generic" DesignTimeNotes="20230928 -1-">
|
||||
<VALUECONDITION Value="true" Oper="OR">
|
||||
<EXP><![CDATA[$=$Param.Input[0].connectionPointID = "cp2" AND Param.Input[0].shapeID = Shape_Gefaellestrecke.id]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$Param.Input[1].connectionPointID = "cp2" AND Param.Input[1].shapeID = Shape_Gefaellestrecke.id]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<SET Id="RDK:1158803" VarRef="ShapeList["id="+Shape_Gefaellestrecke.id].GefaelleDefinition.HoeheUnten">
|
||||
<EXP><![CDATA[$=$Shape_Kreisel.KreiselDefinition.Hoehe]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</GROUP>
|
||||
<COMMENTS Id="RDK:1155597" DesignTimeRemark="Hier wird immer zuerst die Höhe oben gesetzt egal welcher der Punkte zum verbinden genommen wird. Ok?" DesignTimeNotes="20230928 -1-" />
|
||||
<IFTHENELSE Id="RDK:1004841" Suppressed="True" DesignTimeNotes="20230928 -1-
suppressed">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Shape_Gefaellestrecke.id].GefaelleDefinition.HoeheOben=""]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<GROUP Id="RDK:1004842" SubType="Then">
|
||||
<SET Id="RDK:1003301" VarRef="ShapeList["id="+Shape_Gefaellestrecke.id].GefaelleDefinition.HoeheOben">
|
||||
<EXP><![CDATA[$=$Shape_Kreisel.KreiselDefinition.Hoehe]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</GROUP>
|
||||
<GROUP Id="RDK:1004843" SubType="Else">
|
||||
<SET Id="RDK:1004849" VarRef="ShapeList["id="+Shape_Gefaellestrecke.id].GefaelleDefinition.HoeheUnten">
|
||||
<EXP><![CDATA[$=$Shape_Kreisel.KreiselDefinition.Hoehe]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</GROUP>
|
||||
</IFTHENELSE>
|
||||
</GROUP>
|
||||
<CALLFUNCTION Id="RDK:1698068" Suppressed="True">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$SetHeightOnConnect]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<CALLFUNCTION Id="RDK:19474698" Suppressed="True">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$SetStatus_Ok]]></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>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:1576710" CaseType="0">
|
||||
<EXP><![CDATA[$C$Eckrad]]></EXP>
|
||||
@@ -14750,141 +14679,167 @@ me.x
|
||||
<EXP><![CDATA[$=$Shape_Prototype.EckradDefinition.Drehung]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<SELECTCASE Id="RDK:1578960">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family]]></EXP>
|
||||
<CASEGROUP Id="RDK:1578962" CaseType="0">
|
||||
<EXP><![CDATA[$C$Kreisel]]></EXP>
|
||||
<SET Id="RDK:1578958" VarRef="Shape_Prototype.EckradDefinition.Drehung">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].KreiselDefinition.Drehung*(-1)]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:1578964" CaseType="0">
|
||||
<EXP><![CDATA[$C$Eckrad]]></EXP>
|
||||
<SET Id="RDK:1578966" VarRef="Shape_Prototype.EckradDefinition.Drehung">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].EckradDefinition.Drehung*(-1)]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</CASEGROUP>
|
||||
</SELECTCASE>
|
||||
<GROUP Id="RDK:1578972" Name="Group" SubType="Generic">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$Shape_Prototype.rotation=""]]></EXP>
|
||||
<IFTHENELSE Id="RDK:20683251">
|
||||
<VALUECONDITION Value="true" Oper="OR">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family = "Kreisel"]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<SET Id="RDK:1578971" VarRef="Shape_Prototype.rotation">
|
||||
<EXP><![CDATA[$C$0]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</GROUP>
|
||||
<CALLFUNCTION Id="RDK:1578976">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$CreatePrototype_Eckrad]]></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>
|
||||
<CALLFUNCTION Id="RDK:1578978">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$Create/Update Shape]]></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>
|
||||
<IFTHENELSE Id="RDK:1579006">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$OriginalRatation<>Shape_Prototype.EckradDefinition.Drehung]]></EXP>
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family = "Eckrad"]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<GROUP Id="RDK:1579003" SubType="Then">
|
||||
<GROUP Id="RDK:1579001" Name="Find Children" SubType="Generic">
|
||||
<SET Id="RDK:1578995" VarRef="LinkedShapeIDs">
|
||||
<EXP><![CDATA[$C$NOTHING]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<FOREACHLOOP Id="RDK:1578999" ItemVarRef="Link">
|
||||
<PAR Name="ArrayValueExp">
|
||||
<EXP><![CDATA[$=$Shape_Prototype.links]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ExitCondExp">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<SET Id="RDK:1578996" VarRef="Link">
|
||||
<EXP><![CDATA[$=$StrAfter(Link, ";")]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<GROUP Id="RDK:1578998" Name="Group" SubType="Generic">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$Not (Link=Param.Input[1].shapeID)]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<LIST_ADD Id="RDK:1578997" ListRef="LinkedShapeIDs">
|
||||
<PAR Name="VALUE_TO_ADD">
|
||||
<EXP><![CDATA[$=$Link]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="POS_TO_ADD" />
|
||||
</LIST_ADD>
|
||||
</GROUP>
|
||||
</FOREACHLOOP>
|
||||
<CALLFUNCTION Id="RDK:1579000">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$CollectLinkedShapes]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$LinkedShapeIDs]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
<CALLFUNCTION Id="RDK:1579002">
|
||||
<GROUP Id="RDK:20683248" SubType="Then">
|
||||
<CALLFUNCTION Id="RDK:20683247" DesignTimeNotes="20231005 -1-">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$Inherit Children rotation]]></EXP>
|
||||
<EXP><![CDATA[$C$InheritHeight]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp" />
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
<GROUP Id="RDK:1579005" SubType="Else">
|
||||
<COMMENTS Id="RDK:1579004" DesignTimeRemark="No children rotation needed" />
|
||||
<GROUP Id="RDK:20683250" SubType="Else">
|
||||
<CALLFUNCTION Id="RDK:20683249">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$SetHeightOnConnect]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$UebergabeListe]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
</IFTHENELSE>
|
||||
<CALLFUNCTION Id="RDK:1592919">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$AddWeiche]]></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:20494432">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$InheritHeight]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<GROUP Id="RDK:20683267" Name="Eckrad Operations" SubType="Generic">
|
||||
<SELECTCASE Id="RDK:1578960">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].family]]></EXP>
|
||||
<CASEGROUP Id="RDK:1578962" CaseType="0">
|
||||
<EXP><![CDATA[$C$Kreisel]]></EXP>
|
||||
<SET Id="RDK:1578958" VarRef="Shape_Prototype.EckradDefinition.Drehung">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].KreiselDefinition.Drehung*(-1)]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:1578964" CaseType="0">
|
||||
<EXP><![CDATA[$C$Eckrad]]></EXP>
|
||||
<SET Id="RDK:1578966" VarRef="Shape_Prototype.EckradDefinition.Drehung">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+Param.Input[1].shapeID].EckradDefinition.Drehung*(-1)]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</CASEGROUP>
|
||||
</SELECTCASE>
|
||||
<GROUP Id="RDK:1578972" Name="Group" SubType="Generic">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$Shape_Prototype.rotation=""]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<SET Id="RDK:1578971" VarRef="Shape_Prototype.rotation">
|
||||
<EXP><![CDATA[$C$0]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</GROUP>
|
||||
<CALLFUNCTION Id="RDK:1578976">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$CreatePrototype_Eckrad]]></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>
|
||||
<CALLFUNCTION Id="RDK:1578978">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$Create/Update Shape]]></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>
|
||||
<IFTHENELSE Id="RDK:1579006">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$OriginalRatation<>Shape_Prototype.EckradDefinition.Drehung]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<GROUP Id="RDK:1579003" SubType="Then">
|
||||
<GROUP Id="RDK:1579001" Name="Find Children" SubType="Generic">
|
||||
<SET Id="RDK:1578995" VarRef="LinkedShapeIDs">
|
||||
<EXP><![CDATA[$C$NOTHING]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<FOREACHLOOP Id="RDK:1578999" ItemVarRef="Link">
|
||||
<PAR Name="ArrayValueExp">
|
||||
<EXP><![CDATA[$=$Shape_Prototype.links]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ExitCondExp">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<SET Id="RDK:1578996" VarRef="Link">
|
||||
<EXP><![CDATA[$=$StrAfter(Link, ";")]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<GROUP Id="RDK:1578998" Name="Group" SubType="Generic">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$Not (Link=Param.Input[1].shapeID)]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<LIST_ADD Id="RDK:1578997" ListRef="LinkedShapeIDs">
|
||||
<PAR Name="VALUE_TO_ADD">
|
||||
<EXP><![CDATA[$=$Link]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="POS_TO_ADD" />
|
||||
</LIST_ADD>
|
||||
</GROUP>
|
||||
</FOREACHLOOP>
|
||||
<CALLFUNCTION Id="RDK:1579000">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$CollectLinkedShapes]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$LinkedShapeIDs]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
<CALLFUNCTION Id="RDK:1579002">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$Inherit Children rotation]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp" />
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
<GROUP Id="RDK:1579005" SubType="Else">
|
||||
<COMMENTS Id="RDK:1579004" DesignTimeRemark="No children rotation needed" />
|
||||
</GROUP>
|
||||
</IFTHENELSE>
|
||||
<CALLFUNCTION Id="RDK:1592919">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$AddWeiche]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$Param.Input]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:1606858" CaseType="0">
|
||||
<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
|
||||
@@ -14920,6 +14875,18 @@ me.x
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<CALLFUNCTION Id="RDK:20690134">
|
||||
<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>
|
||||
<CALLFUNCTION Id="RDK:19633575">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$SetStatus]]></EXP>
|
||||
@@ -14956,32 +14923,6 @@ me.x
|
||||
</CALLFUNCTION>
|
||||
</GROUP>
|
||||
</IFTHENELSE>
|
||||
<GROUP Id="RDK:20540423" Name="Update" SubType="Generic" Bookmarked="True">
|
||||
<CALLFUNCTION Id="RDK:20540427">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$CreatePrototype_Gefaellestrecke]]></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>
|
||||
<CALLFUNCTION Id="RDK:20540429">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$Create/Update Shape]]></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>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:18732456" CaseType="0">
|
||||
<EXP><![CDATA[$C$Strecke]]></EXP>
|
||||
@@ -15046,6 +14987,18 @@ me.x
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<CALLFUNCTION Id="RDK:20673034" DesignTimeNotes="20231005 -1-">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$InheritHeight]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$Param.Input[1].shapeID]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<CALLFUNCTION Id="RDK:18221763">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$SetHeightOnConnect]]></EXP>
|
||||
@@ -17432,6 +17385,176 @@ ShapeList["id="+Param.Input[1].shapeID].name
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</FUNCTION>
|
||||
<FUNCTION Id="RDK:20690034" Name="UpdateShape" InputTypeName="string">
|
||||
<GROUP Id="RDK:20690054" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
|
||||
<VAR Id="RDK:20690046" Name="shapeId" Type="string">
|
||||
<SET Id="RDK:20690045" VarRef="Me">
|
||||
<EXP><![CDATA[$=$Param.Input]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</VAR>
|
||||
<VAR Id="RDK:20690052" Name="shape_item" Type="Editor2DShapeType">
|
||||
<SET Id="RDK:20690051" VarRef="Me">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+shapeId]]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
</VAR>
|
||||
</GROUP>
|
||||
<SET Id="RDK:20694868" VarRef="Shape_Prototype">
|
||||
<EXP><![CDATA[$=$ShapeList["id="+shapeId]]]></EXP>
|
||||
<PAR Name="AdvancedOptions" />
|
||||
</SET>
|
||||
<SELECTCASE Id="RDK:20690124">
|
||||
<EXP><![CDATA[$=$Shape_Prototype.family]]></EXP>
|
||||
<CASEGROUP Id="RDK:20690092" CaseType="0">
|
||||
<EXP><![CDATA[$C$Kreisel]]></EXP>
|
||||
<CALLFUNCTION Id="RDK:20700295">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$CreatePrototype_Kreisel]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$shapeId]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<CALLFUNCTION Id="RDK:20700297">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$Create/Update Shape]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$shapeId]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:20690122" CaseType="0">
|
||||
<EXP><![CDATA[$C$Eckrad]]></EXP>
|
||||
<CALLFUNCTION Id="RDK:20700299">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$CreatePrototype_Eckrad]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$shapeId]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<CALLFUNCTION Id="RDK:20700301">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$Create/Update Shape]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$shapeId]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:20690104" CaseType="0">
|
||||
<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
|
||||
<CALLFUNCTION Id="RDK:20690128">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$CreatePrototype_Gefaellestrecke]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$shapeId]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<CALLFUNCTION Id="RDK:20690132">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$Create/Update Shape]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$shapeId]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:20690117" CaseType="0">
|
||||
<EXP><![CDATA[$C$Foerderer]]></EXP>
|
||||
<CALLFUNCTION Id="RDK:20700305">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$CreatePrototype_Foerderer]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$shapeId]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<CALLFUNCTION Id="RDK:20700307">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$Create/Update Shape]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$shapeId]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:20700303" CaseType="0">
|
||||
<EXP><![CDATA[$C$Strecke]]></EXP>
|
||||
<CALLFUNCTION Id="RDK:20700309">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$CreatePrototype_Strecke]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$shapeId]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<CALLFUNCTION Id="RDK:20700311">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$Create/Update Shape]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="InputExp">
|
||||
<EXP><![CDATA[$=$shapeId]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="ResultRef">
|
||||
<EXP><![CDATA[$V$]]></EXP>
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:20690118" CaseType="0">
|
||||
<EXP><![CDATA[$C$Weiche]]></EXP>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:20690119" CaseType="0">
|
||||
<EXP><![CDATA[$C$BTMTBeladung]]></EXP>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:20690120" CaseType="0">
|
||||
<EXP><![CDATA[$C$BTMTEntladung]]></EXP>
|
||||
</CASEGROUP>
|
||||
<CASEGROUP Id="RDK:20690123" CaseType="1">
|
||||
<EXP />
|
||||
</CASEGROUP>
|
||||
</SELECTCASE>
|
||||
</FUNCTION>
|
||||
<FUNCTION Id="RDK:19595231" Name="SetHeight" InputTypeName="SSGParameter[]">
|
||||
<GROUP Id="RDK:19595239" Name="LocalVariables" SubType="VarSet" IncludeDate="0">
|
||||
<VAR Id="RDK:19595236" Name="shapeId" Type="string">
|
||||
@@ -17505,7 +17628,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<COMMENTS Id="RDK:19937420" DesignTimeRemark="Höhe des Shapes der Gefällestrecke erst setzen, wenn beide Anschlusspunkte definiert wurden" />
|
||||
<CALLFUNCTION Id="RDK:19937393">
|
||||
<CALLFUNCTION Id="RDK:19937393" Suppressed="True">
|
||||
<PAR Name="FuncName">
|
||||
<EXP><![CDATA[$C$Check_is_defined]]></EXP>
|
||||
</PAR>
|
||||
@@ -17517,7 +17640,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
|
||||
</PAR>
|
||||
<PAR Name="Options" />
|
||||
</CALLFUNCTION>
|
||||
<IFTHENELSE Id="RDK:19937405">
|
||||
<IFTHENELSE Id="RDK:19937405" Suppressed="True">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$(isDefined= True)]]></EXP>
|
||||
</VALUECONDITION>
|
||||
@@ -18303,7 +18426,7 @@ ShapeList["id="+Param.Input[1].shapeID].name
|
||||
<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
|
||||
<IFTHENELSE Id="RDK:19603003">
|
||||
<VALUECONDITION Value="true">
|
||||
<EXP><![CDATA[$=$(ShapeList[shapeList_idx].GefaelleDefinition.LH_fits = True)]]></EXP>
|
||||
<EXP><![CDATA[$=$(ShapeList["id="+shapeId].GefaelleDefinition.LH_fits = True)]]></EXP>
|
||||
</VALUECONDITION>
|
||||
<GROUP Id="RDK:19603000" SubType="Then">
|
||||
<CALLFUNCTION Id="RDK:19602999">
|
||||
@@ -24940,4 +25063,4 @@ ShapeList["id="+Param.Input[1].shapeID].name
|
||||
</PROFILES_DATA>
|
||||
<BOM_DATA />
|
||||
</EXTERNAL_DATA>
|
||||
</PROCESS>
|
||||
</PROCESS>
|
||||
|
||||
Reference in New Issue
Block a user