From c2e6adb520bacd758fe8635aa0cbb0fac40585b1 Mon Sep 17 00:00:00 2001
From: mistangl <m.stangl@schoenenberger.de>
Date: Mon, 6 Oct 2025 19:01:40 +0200
Subject: [PATCH] Mehrfacherzeung einer einzigen Gruppen von OMniflo impl.

---
 MAIN_SSG.rdx | 614 ++++++++++++++++++++++++++++++++++-----------------
 1 file changed, 410 insertions(+), 204 deletions(-)

diff --git a/MAIN_SSG.rdx b/MAIN_SSG.rdx
index f9370b7..b9acf8a 100644
--- a/MAIN_SSG.rdx
+++ b/MAIN_SSG.rdx
@@ -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="2025-10-06T09:42:39" LanguageVersion="2014.1.3.712" />
+	<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="m.stangl [ENTW-NB08]" ModDate="2025-10-06T19:00:18" LanguageVersion="2014.1.3.712" />
 	<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">
@@ -1244,7 +1244,7 @@
 					<VAR Id="RDK:382" Name="ImportBackgroundData" Type="ImportBackgroundType" />
 				</GROUP>
 				<GROUP Id="RDK:25910229" Name="Muster" SubType="VarSet" IncludeDate="0">
-					<VAR Id="RDK:25910228" Name="ImportMusterKopieData" Type="MusterType" />
+					<VAR Id="RDK:25910228" Name="SetPatternData" Type="MusterType" />
 				</GROUP>
 				<GROUP Id="RDK:26399" Name="GridLayoutGroup" SubType="VarSet" IncludeDate="0">
 					<VAR Id="RDK:16093" Name="GridLayoutData" Type="GridLayoutType" />
@@ -1412,6 +1412,7 @@
 			<VAR Id="RDK:23222658" Name="OFWeichenData" Type="OFWeicheType[]" DesignTimeRemark="Dropdown Liste aller Weichen im Interface" />
 			<VAR Id="RDK:23747696" Name="TEFBogenData" Type="TEFBogenType[]" DesignTimeRemark="Liste aller TEF Bögen" />
 			<VAR Id="RDK:25944465" Name="UebergabeListe" Type="SSGParameter[]" DesignTimeRemark="Generated by RD" />
+			<VAR Id="RDK:25953870" Name="num" Type="integer" DesignTimeRemark="Generated by RD" />
 		</GROUP>
 		<GROUP Id="RDK:0006" Name="Profiles" SubType="ProfileSet">
 			<PROFILE Id="RDK:383" Name="ImportBackgroundProfile" TypeName="ImportBackgroundType" />
@@ -2273,7 +2274,7 @@
 							</SET>
 							<ACTION_CALL Id="RDK:25886469" Name="RDEngineering_RemoteGetInput" DesignTimeRemark="{VarName}">
 								<PAR Name="InputVar">
-									<EXP><![CDATA[$=$ImportMusterKopieData]]></EXP>
+									<EXP><![CDATA[$=$SetPatternData]]></EXP>
 								</PAR>
 								<PAR Name="ProfileName">
 									<EXP><![CDATA[$C$MusterProfile]]></EXP>
@@ -2319,15 +2320,15 @@
 								<EXP><![CDATA[$=$Button]]></EXP>
 								<CASEGROUP Id="RDK:25886479" CaseType="0">
 									<EXP><![CDATA[$C$AUTOCOMMIT]]></EXP>
-									<SET_STRUCT Id="RDK:25912566" VarRef="ImportMusterKopieData" DesignTimeNotes="51.5378343100142 X1 &#xD;&#xA;0355.732043855988 Y1 1&#xA;0 &#xA;&#xA;138.593554698904 X2 3&#xA;196.958442800842 Y2 4&#xA;0">
+									<SET_STRUCT Id="RDK:25912566" VarRef="SetPatternData" DesignTimeNotes="51.5378343100142 X1 &#xD;&#xA;0355.732043855988 Y1 1&#xA;0 &#xA;&#xA;138.593554698904 X2 3&#xA;196.958442800842 Y2 4&#xA;0">
 										<PAR Name="AbstandX">
-											<EXP><![CDATA[$C$ImportMusterKopieData.AbstandX]]></EXP>
+											<EXP><![CDATA[$C$SetPatternData.AbstandX]]></EXP>
 										</PAR>
 										<PAR Name="AbstandY">
-											<EXP><![CDATA[$C$ImportMusterKopieData.AbstandY]]></EXP>
+											<EXP><![CDATA[$C$SetPatternData.AbstandY]]></EXP>
 										</PAR>
 										<PAR Name="Anzahl">
-											<EXP><![CDATA[$C$ImportMusterKopieData.Anzahl]]></EXP>
+											<EXP><![CDATA[$C$SetPatternData.Anzahl]]></EXP>
 										</PAR>
 										<PAR Name="Unit">
 											<EXP><![CDATA[$C$mm]]></EXP>
@@ -41525,42 +41526,159 @@ me.x
 					</FOREACHLOOP>
 				</FOREACHLOOP>
 			</FUNCTION>
-			<FUNCTION Id="RDK:25908194" Name="doPatternOmnifloSingle" DesignTimeRemark="erzeugt ein Objetk des Musters dieses Omniflo Elemens am gegebenem Offset" InputTypeName="SSGParameter[]" ResultTypeName="string">
-				<COMMENTS Id="RDK:25908160" DesignTimeRemark="Erzeuge eine Omniflo Kopie dieses Elements" />
+			<FUNCTION Id="RDK:25908194" Name="doPatternOmnifloSingle" DesignTimeRemark="erzeugt ein Objetk des Musters dieses Omniflo Elemens am gegebenem Offset" DesignTimeTip="benötigt die Verschiebungen in x, y [mm] und Anzahl der neuen Objekte und die shapeid " InputTypeName="SSGParameter[]" ResultTypeName="string">
+				<COMMENTS Id="RDK:25908160" DesignTimeRemark="Erzeuge eine Muster dieses Omniflo Elements" />
 				<GROUP Id="RDK:25908165" Name="Local Variables" SubType="VarSet" IncludeDate="0">
-					<VAR Id="RDK:25908162" Name="selectedIds" Type="string[]" />
 					<VAR Id="RDK:25916232" Name="generatedIds" Type="string[]" />
 					<VAR Id="RDK:25908163" Name="shapeId" Type="string">
 						<SET Id="RDK:25908161" VarRef="me">
-							<EXP><![CDATA[$=$Param.Input["key=shapeId"].Str]]></EXP>
+							<EXP><![CDATA[$=$Param.Input["key=current_id"].Str]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
 					</VAR>
 					<VAR Id="RDK:25913193" Name="newId" Type="string" />
+					<VAR Id="RDK:25953762" Name="Anzahl" Type="integer">
+						<SET Id="RDK:25953785" VarRef="me">
+							<EXP><![CDATA[$=$1]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+					</VAR>
 					<VAR Id="RDK:25908200" Name="direction_x" Type="double">
-						<SET Id="RDK:25908207" VarRef="me">
-							<EXP><![CDATA[$=$Param.Input["key=x"].Dbl]]></EXP>
+						<SET Id="RDK:25953777" VarRef="me">
+							<EXP><![CDATA[$=$Param.Input["key=x_offset"].Dbl]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
 					</VAR>
 					<VAR Id="RDK:25908202" Name="direction_y" Type="double">
 						<SET Id="RDK:25908209" VarRef="me">
-							<EXP><![CDATA[$=$Param.Input["key=y"].Dbl]]></EXP>
+							<EXP><![CDATA[$=$Param.Input["key=y_offset"].Dbl]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
 					</VAR>
 					<VAR Id="RDK:25908164" Name="Offsets" Type="SSGParameter[]" />
-					<VAR Id="RDK:25916178" Name="UebergabeListe" Type="SSGParameter[]" />
 				</GROUP>
-				<SET Id="RDK:25908166" VarRef="Offsets">
-					<EXP><![CDATA[$C$NOTHING]]></EXP>
-					<PAR Name="AdvancedOptions" />
-				</SET>
+				<IFTHENELSE Id="RDK:25953769">
+					<VALUECONDITION Value="true">
+						<EXP><![CDATA[$=$Param.Input["key=Anzahl"].Int > 1]]></EXP>
+					</VALUECONDITION>
+					<GROUP Id="RDK:25953770" SubType="Then">
+						<SET Id="RDK:25953779" VarRef="Anzahl">
+							<EXP><![CDATA[$=$Param.Input["key=Anzahl"].Int]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+					</GROUP>
+				</IFTHENELSE>
 				<SET Id="RDK:25908169" VarRef="Shape_Prototype">
 					<EXP><![CDATA[$=$ShapeList["id="+shapeId]]]></EXP>
 					<PAR Name="AdvancedOptions" />
 				</SET>
-				<SET_STRUCT Id="RDK:25908168" VarRef="SSGParameter" ClearAll="True" ListRef="Offsets">
+				<WHILELOOP Id="RDK:25953879">
+					<VALUECONDITION Value="true">
+						<EXP><![CDATA[$=$Anzahl  > 0]]></EXP>
+					</VALUECONDITION>
+					<SET Id="RDK:25908166" VarRef="Offsets">
+						<EXP><![CDATA[$C$NOTHING]]></EXP>
+						<PAR Name="AdvancedOptions" />
+					</SET>
+					<SET_STRUCT Id="RDK:25908168" VarRef="SSGParameter" ClearAll="True" ListRef="Offsets">
+						<PAR Name="Key">
+							<EXP><![CDATA[$C$y_offset]]></EXP>
+						</PAR>
+						<PAR Name="StrArr" />
+						<PAR Name="Str" />
+						<PAR Name="Dbl">
+							<EXP><![CDATA[$=$direction_y*Anzahl]]></EXP>
+						</PAR>
+						<PAR Name="Int" />
+						<PAR Name="Boo" />
+					</SET_STRUCT>
+					<SET_STRUCT Id="RDK:25908167" VarRef="SSGParameter" ClearAll="True" ListRef="Offsets">
+						<PAR Name="Key">
+							<EXP><![CDATA[$C$x_offset]]></EXP>
+						</PAR>
+						<PAR Name="StrArr" />
+						<PAR Name="Str" />
+						<PAR Name="Dbl">
+							<EXP><![CDATA[$=$direction_x*Anzahl]]></EXP>
+						</PAR>
+						<PAR Name="Int" />
+						<PAR Name="Boo" />
+					</SET_STRUCT>
+					<SET_STRUCT Id="RDK:25967125" VarRef="SSGParameter" ClearAll="True" ListRef="Offsets">
+						<PAR Name="Key">
+							<EXP><![CDATA[$C$current_id]]></EXP>
+						</PAR>
+						<PAR Name="StrArr" />
+						<PAR Name="Str">
+							<EXP><![CDATA[$=$shapeId]]></EXP>
+						</PAR>
+						<PAR Name="Dbl" />
+						<PAR Name="Int" />
+						<PAR Name="Boo" />
+					</SET_STRUCT>
+					<CALLFUNCTION Id="RDK:25953869">
+						<PAR Name="FuncName">
+							<EXP><![CDATA[$C$createSingleOmnifloObject]]></EXP>
+						</PAR>
+						<PAR Name="InputExp">
+							<EXP><![CDATA[$=$Offsets]]></EXP>
+						</PAR>
+						<PAR Name="ResultRef">
+							<EXP><![CDATA[$V$newId]]></EXP>
+						</PAR>
+						<PAR Name="Options" />
+					</CALLFUNCTION>
+					<LIST_ADD Id="RDK:25953890" ListRef="generatedIds">
+						<PAR Name="VALUE_TO_ADD">
+							<EXP><![CDATA[$=$newId]]></EXP>
+						</PAR>
+						<PAR Name="POS_TO_ADD" />
+					</LIST_ADD>
+					<SET Id="RDK:25953898" VarRef="Anzahl">
+						<EXP><![CDATA[$=$Anzahl - 1]]></EXP>
+						<PAR Name="AdvancedOptions" />
+					</SET>
+				</WHILELOOP>
+				<SET Id="RDK:25953892" VarRef="Param.Result">
+					<EXP><![CDATA[$=$generatedIds]]></EXP>
+					<PAR Name="AdvancedOptions" />
+				</SET>
+			</FUNCTION>
+			<FUNCTION Id="RDK:25953865" Name="createSingleOmnifloObject" DesignTimeRemark="erzeugt ein Objetk dieses Omniflo Elemens am gegebenem Offset" DesignTimeTip="benötigt als Parameter shapeId, x und y" InputTypeName="SSGParameter[]" ResultTypeName="string">
+				<COMMENTS Id="RDK:25953827" DesignTimeRemark="Erzeuge eine Omniflo Kopie eines Elements" />
+				<GROUP Id="RDK:25953841" Name="Local Variables" SubType="VarSet" IncludeDate="0">
+					<VAR Id="RDK:25953828" Name="selectedIds" Type="string[]" />
+					<VAR Id="RDK:25953831" Name="shapeId" Type="string">
+						<SET Id="RDK:25953830" VarRef="me">
+							<EXP><![CDATA[$=$Param.Input["key=current_id"].Str]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+					</VAR>
+					<VAR Id="RDK:25953832" Name="newId" Type="string" />
+					<VAR Id="RDK:25953836" Name="direction_x" Type="double">
+						<SET Id="RDK:25953835" VarRef="me">
+							<EXP><![CDATA[$=$Param.Input["key=x_offset"].Dbl]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+					</VAR>
+					<VAR Id="RDK:25953838" Name="direction_y" Type="double">
+						<SET Id="RDK:25953837" VarRef="me">
+							<EXP><![CDATA[$=$Param.Input["key=y_offset"].Dbl]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+					</VAR>
+					<VAR Id="RDK:25953839" Name="Offsets" Type="SSGParameter[]" />
+					<VAR Id="RDK:25953840" Name="UebergabeListe" Type="SSGParameter[]" />
+				</GROUP>
+				<SET Id="RDK:25953845" VarRef="Shape_Prototype">
+					<EXP><![CDATA[$=$ShapeList["id="+shapeId]]]></EXP>
+					<PAR Name="AdvancedOptions" />
+				</SET>
+				<SET Id="RDK:25953846" VarRef="Offsets">
+					<EXP><![CDATA[$C$NOTHING]]></EXP>
+					<PAR Name="AdvancedOptions" />
+				</SET>
+				<SET_STRUCT Id="RDK:25953847" VarRef="SSGParameter" ClearAll="True" ListRef="Offsets">
 					<PAR Name="Key">
 						<EXP><![CDATA[$C$y_offset]]></EXP>
 					</PAR>
@@ -41569,12 +41687,10 @@ me.x
 					<PAR Name="Dbl">
 						<EXP><![CDATA[$=$direction_y]]></EXP>
 					</PAR>
-					<PAR Name="Int">
-						<EXP><![CDATA[$=$]]></EXP>
-					</PAR>
+					<PAR Name="Int" />
 					<PAR Name="Boo" />
 				</SET_STRUCT>
-				<SET_STRUCT Id="RDK:25908167" VarRef="SSGParameter" ClearAll="True" ListRef="Offsets">
+				<SET_STRUCT Id="RDK:25953848" VarRef="SSGParameter" ClearAll="True" ListRef="Offsets">
 					<PAR Name="Key">
 						<EXP><![CDATA[$C$x_offset]]></EXP>
 					</PAR>
@@ -41586,11 +41702,11 @@ me.x
 					<PAR Name="Int" />
 					<PAR Name="Boo" />
 				</SET_STRUCT>
-				<SELECTCASE Id="RDK:25908193">
+				<SELECTCASE Id="RDK:25953863">
 					<EXP><![CDATA[$=$Shape_Prototype.family]]></EXP>
-					<CASEGROUP Id="RDK:25908179" CaseType="0">
+					<CASEGROUP Id="RDK:25953852" CaseType="0">
 						<EXP><![CDATA[$C$OFGerade]]></EXP>
-						<CALLFUNCTION Id="RDK:25908170">
+						<CALLFUNCTION Id="RDK:25953849">
 							<PAR Name="FuncName">
 								<EXP><![CDATA[$C$CreateCopyShapePrototype]]></EXP>
 							</PAR>
@@ -41602,18 +41718,18 @@ me.x
 							</PAR>
 							<PAR Name="Options" />
 						</CALLFUNCTION>
-						<SET Id="RDK:25908171" VarRef="ShapeList[&quot;id=&quot;+newId].OFGeradeDefinition.Beschreibung" Bookmarked="True">
+						<SET Id="RDK:25953850" VarRef="ShapeList[&quot;id=&quot;+newId].OFGeradeDefinition.Beschreibung" Bookmarked="True">
 							<EXP><![CDATA[$=$Shape_Prototype.name]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
-						<SET Id="RDK:25928266" VarRef="Param.Result">
+						<SET Id="RDK:25953851" VarRef="Param.Result">
 							<EXP><![CDATA[$=$newId]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
 					</CASEGROUP>
-					<CASEGROUP Id="RDK:25908184" CaseType="0">
+					<CASEGROUP Id="RDK:25953856" CaseType="0">
 						<EXP><![CDATA[$C$OFBogen]]></EXP>
-						<CALLFUNCTION Id="RDK:25908180">
+						<CALLFUNCTION Id="RDK:25953853">
 							<PAR Name="FuncName">
 								<EXP><![CDATA[$C$CreateCopyShapePrototype]]></EXP>
 							</PAR>
@@ -41625,18 +41741,18 @@ me.x
 							</PAR>
 							<PAR Name="Options" />
 						</CALLFUNCTION>
-						<SET Id="RDK:25908181" VarRef="ShapeList[&quot;id=&quot;+newId].OFBogenDefinition.Beschreibung" Bookmarked="True">
+						<SET Id="RDK:25953854" VarRef="ShapeList[&quot;id=&quot;+newId].OFBogenDefinition.Beschreibung" Bookmarked="True">
 							<EXP><![CDATA[$=$Shape_Prototype.name]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
-						<SET Id="RDK:25924265" VarRef="Param.Result">
+						<SET Id="RDK:25953855" VarRef="Param.Result">
 							<EXP><![CDATA[$=$newId]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
 					</CASEGROUP>
-					<CASEGROUP Id="RDK:25908189" CaseType="0">
+					<CASEGROUP Id="RDK:25953860" CaseType="0">
 						<EXP><![CDATA[$C$OFWeiche]]></EXP>
-						<CALLFUNCTION Id="RDK:25908185">
+						<CALLFUNCTION Id="RDK:25953857">
 							<PAR Name="FuncName">
 								<EXP><![CDATA[$C$CreateCopyShapePrototype]]></EXP>
 							</PAR>
@@ -41648,23 +41764,23 @@ me.x
 							</PAR>
 							<PAR Name="Options" />
 						</CALLFUNCTION>
-						<SET Id="RDK:25908186" VarRef="ShapeList[&quot;id=&quot;+newId].OFWeicheDefinition.Beschreibung" Bookmarked="True">
+						<SET Id="RDK:25953858" VarRef="ShapeList[&quot;id=&quot;+newId].OFWeicheDefinition.Beschreibung" Bookmarked="True">
 							<EXP><![CDATA[$=$Shape_Prototype.name]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
-						<SET Id="RDK:25928268" VarRef="Param.Result">
+						<SET Id="RDK:25953859" VarRef="Param.Result">
 							<EXP><![CDATA[$=$newId]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
 					</CASEGROUP>
-					<CASEGROUP Id="RDK:25908192" CaseType="1">
+					<CASEGROUP Id="RDK:25953862" CaseType="1">
 						<EXP />
-						<ACTION_CALL Id="RDK:25908198" Name="RDEngineering_MsgBox" DesignTimeRemark="{Text}">
+						<ACTION_CALL Id="RDK:25953861" Name="RDEngineering_MsgBox" DesignTimeRemark="{Text}">
 							<PAR Name="RDLibraryName">
 								<EXP><![CDATA[$C$RDEngineering_UI]]></EXP>
 							</PAR>
 							<PAR Name="MsgText">
-								<EXP><![CDATA[$C$Mustern nur möglich für OFGerade, OFBogen und OFWeiche]]></EXP>
+								<EXP><![CDATA[$=$Mustern nur möglich für OFGerade, OFBogen und OFWeiche]]></EXP>
 							</PAR>
 							<PAR Name="MsgStyle">
 								<EXP><![CDATA[$C$-1]]></EXP>
@@ -41682,7 +41798,7 @@ me.x
 				</SELECTCASE>
 			</FUNCTION>
 			<FUNCTION Id="RDK:25924261" Name="doPatternOmnifloSingles" DesignTimeRemark="erzeugt ein Muster jedes der Omniflo Elemente dieser Ids" InputTypeName="SSGParameter[]" ResultTypeName="string[]">
-				<COMMENTS Id="RDK:25924227" DesignTimeRemark="Erzeuge ein Muster aller gegebenen Omniflo Elemente mit den genannten Ids" />
+				<COMMENTS Id="RDK:25924227" DesignTimeRemark="Erzeuge ein Muster aller gegebenen Omniflo Elemente mit den genannten Ids" DesignTimeTip="Benötigt direction_x, direction_y, Anzahl " />
 				<GROUP Id="RDK:25924239" Name="Local Variables" SubType="VarSet" IncludeDate="0">
 					<VAR Id="RDK:25924229" Name="selectedIds" Type="string[]">
 						<SET Id="RDK:25924228" VarRef="me">
@@ -41708,7 +41824,7 @@ me.x
 					</SET>
 					<SET_STRUCT Id="RDK:25924285" VarRef="SSGParameter" ClearAll="True" ListRef="UebergabeListe">
 						<PAR Name="Key">
-							<EXP><![CDATA[$C$shapeId]]></EXP>
+							<EXP><![CDATA[$C$current_id]]></EXP>
 						</PAR>
 						<PAR Name="StrArr" />
 						<PAR Name="Str">
@@ -41742,7 +41858,7 @@ me.x
 					<PAR Name="AdvancedOptions" />
 				</SET>
 			</FUNCTION>
-			<FUNCTION Id="RDK:25934265" Name="doPatternOmnifloGroup" DesignTimeRemark="erzeugt ein Muster dieser Gruppe der Omniflo Elemente" InputTypeName="SSGParameter[]" ResultTypeName="string[]">
+			<FUNCTION Id="RDK:25934265" Name="createPatternOmnifloGroup" DesignTimeRemark="erzeugt ein Muster dieser Gruppe der Omniflo Elemente" InputTypeName="SSGParameter[]" ResultTypeName="string[]">
 				<COMMENTS Id="RDK:25934251" DesignTimeRemark="Erzeuge ein Muster der Gruppe dieser Omniflo Elemente" />
 				<GROUP Id="RDK:25934258" Name="Local Variables" SubType="VarSet" IncludeDate="0">
 					<VAR Id="RDK:25934253" Name="groupIds" Type="string[]">
@@ -41757,182 +41873,260 @@ me.x
 							<PAR Name="AdvancedOptions" />
 						</SET>
 					</VAR>
+					<VAR Id="RDK:25982998" Name="Anzahl" Type="integer">
+						<SET Id="RDK:25983000" VarRef="me">
+							<EXP><![CDATA[$=$1]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+					</VAR>
 					<VAR Id="RDK:25934255" Name="shapeId" Type="string" />
-					<VAR Id="RDK:25942466" Name="generatedIds" Type="string[]" />
+					<VAR Id="RDK:25983014" Name="generatedGroupIds" Type="string[][]" />
 					<VAR Id="RDK:25934501" Name="cps" Type="string[]" />
 					<VAR Id="RDK:25934495" Name="newId" Type="string" />
 					<VAR Id="RDK:25934292" Name="ancestorId" Type="string" />
 					<VAR Id="RDK:25942468" Name="new_ancestorId" Type="string" />
 					<VAR Id="RDK:25934284" Name="LinkListe" Type="SSGParameter[]" />
-					<VAR Id="RDK:25938488" Name="OriginalItem" Type="SSGParameter[]" />
+					<VAR Id="RDK:25938488" Name="Offsets" Type="SSGParameter[]" />
+					<VAR Id="RDK:25993219" Name="FilterCps" Type="SSGParameter[]" />
 				</GROUP>
-				<FOREACHLOOP Id="RDK:25934263" ItemVarRef="shapeId">
-					<PAR Name="ArrayValueExp">
-						<EXP><![CDATA[$=$groupIds]]></EXP>
-					</PAR>
-					<PAR Name="ExitCondExp">
-						<EXP><![CDATA[$V$]]></EXP>
-					</PAR>
-					<SET Id="RDK:25934259" VarRef="OriginalItem">
-						<EXP><![CDATA[$=$Param.Input]]></EXP>
-						<PAR Name="AdvancedOptions" />
-					</SET>
-					<SET_STRUCT Id="RDK:25934260" VarRef="SSGParameter" ClearAll="True" ListRef="OriginalItem">
-						<PAR Name="Key">
-							<EXP><![CDATA[$C$shapeId]]></EXP>
+				<IFTHENELSE Id="RDK:25983010">
+					<VALUECONDITION Value="true">
+						<EXP><![CDATA[$=$Param.Input["key=Anzahl"].Int > 1]]></EXP>
+					</VALUECONDITION>
+					<GROUP Id="RDK:25983009" SubType="Then">
+						<SET Id="RDK:25983008" VarRef="Anzahl">
+							<EXP><![CDATA[$=$Param.Input["key=Anzahl"].Int]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+					</GROUP>
+				</IFTHENELSE>
+				<WHILELOOP Id="RDK:25982994">
+					<VALUECONDITION Value="true">
+						<EXP><![CDATA[$=$Anzahl  > 0]]></EXP>
+					</VALUECONDITION>
+					<FOREACHLOOP Id="RDK:25934263" ItemVarRef="shapeId">
+						<PAR Name="ArrayValueExp">
+							<EXP><![CDATA[$=$groupIds]]></EXP>
 						</PAR>
-						<PAR Name="StrArr" />
-						<PAR Name="Str">
+						<PAR Name="ExitCondExp">
+							<EXP><![CDATA[$V$]]></EXP>
+						</PAR>
+						<GROUP Id="RDK:25983023" Name="Local Variables" SubType="VarSet" IncludeDate="0">
+							<VAR Id="RDK:25983019" Name="direction_x" Type="double">
+								<SET Id="RDK:25983021" VarRef="me">
+									<EXP><![CDATA[$=$Param.Input["key=x_offset"].Dbl]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:25983027" Name="direction_y" Type="double">
+								<SET Id="RDK:25983026" VarRef="me">
+									<EXP><![CDATA[$=$Param.Input["key=y_offset"].Dbl]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</VAR>
+							<VAR Id="RDK:25942466" Name="generatedIds" Type="string[]" />
+						</GROUP>
+						<SET Id="RDK:25983016" VarRef="Offsets">
+							<EXP><![CDATA[$C$NOTHING]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<SET_STRUCT Id="RDK:25982990" VarRef="SSGParameter" ClearAll="True" ListRef="Offsets">
+							<PAR Name="Key">
+								<EXP><![CDATA[$C$current_id]]></EXP>
+							</PAR>
+							<PAR Name="StrArr" />
+							<PAR Name="Str">
+								<EXP><![CDATA[$=$shapeId]]></EXP>
+							</PAR>
+							<PAR Name="Dbl" />
+							<PAR Name="Int" />
+							<PAR Name="Boo" />
+						</SET_STRUCT>
+						<SET_STRUCT Id="RDK:25982989" VarRef="SSGParameter" ClearAll="True" ListRef="Offsets">
+							<PAR Name="Key">
+								<EXP><![CDATA[$C$x_offset]]></EXP>
+							</PAR>
+							<PAR Name="StrArr" />
+							<PAR Name="Str" />
+							<PAR Name="Dbl">
+								<EXP><![CDATA[$=$direction_x*Anzahl]]></EXP>
+							</PAR>
+							<PAR Name="Int" />
+							<PAR Name="Boo" />
+						</SET_STRUCT>
+						<SET_STRUCT Id="RDK:25982988" VarRef="SSGParameter" ClearAll="True" ListRef="Offsets">
+							<PAR Name="Key">
+								<EXP><![CDATA[$C$y_offset]]></EXP>
+							</PAR>
+							<PAR Name="StrArr" />
+							<PAR Name="Str" />
+							<PAR Name="Dbl">
+								<EXP><![CDATA[$=$direction_y*Anzahl]]></EXP>
+							</PAR>
+							<PAR Name="Int" />
+							<PAR Name="Boo" />
+						</SET_STRUCT>
+						<CALLFUNCTION Id="RDK:25934261">
+							<PAR Name="FuncName">
+								<EXP><![CDATA[$C$createSingleOmnifloObject]]></EXP>
+							</PAR>
+							<PAR Name="InputExp">
+								<EXP><![CDATA[$=$Offsets]]></EXP>
+							</PAR>
+							<PAR Name="ResultRef">
+								<EXP><![CDATA[$V$newId]]></EXP>
+							</PAR>
+							<PAR Name="Options" />
+						</CALLFUNCTION>
+						<LIST_ADD Id="RDK:25934262" ListRef="generatedIds">
+							<PAR Name="VALUE_TO_ADD">
+								<EXP><![CDATA[$=$newId]]></EXP>
+							</PAR>
+							<PAR Name="POS_TO_ADD" />
+						</LIST_ADD>
+						<IFTHENELSE Id="RDK:25934268" DesignTimeRemark="das erste Objekt der Gruppe wird nur erzeugt, aber noch nicht mit dem Vorgänger verlinkt">
+							<VALUECONDITION Value="false">
+								<EXP><![CDATA[$=$shapeId = firstId]]></EXP>
+							</VALUECONDITION>
+							<GROUP Id="RDK:25934269" SubType="Then">
+								<SET_STRUCT Id="RDK:25934288" VarRef="SSGParameter" ClearAll="True" ListRef="FilterCps">
+									<PAR Name="Key">
+										<EXP><![CDATA[$C$idSource]]></EXP>
+									</PAR>
+									<PAR Name="StrArr" />
+									<PAR Name="Str">
+										<EXP><![CDATA[$=$ancestorId]]></EXP>
+									</PAR>
+									<PAR Name="Dbl" />
+									<PAR Name="Int" />
+									<PAR Name="Boo" />
+								</SET_STRUCT>
+								<SET_STRUCT Id="RDK:25934298" VarRef="SSGParameter" ClearAll="True" ListRef="FilterCps">
+									<PAR Name="Key">
+										<EXP><![CDATA[$C$idTarget]]></EXP>
+									</PAR>
+									<PAR Name="StrArr" />
+									<PAR Name="Str">
+										<EXP><![CDATA[$=$shapeId]]></EXP>
+									</PAR>
+									<PAR Name="Dbl" />
+									<PAR Name="Int" />
+									<PAR Name="Boo" />
+								</SET_STRUCT>
+								<CALLFUNCTION Id="RDK:25934493" DesignTimeRemark="Finde die Verbindungsnamen der Connectionpoints in den ursprünglichen Elementen">
+									<PAR Name="FuncName">
+										<EXP><![CDATA[$C$FilterConnectingPointsBetweenBoth]]></EXP>
+									</PAR>
+									<PAR Name="InputExp">
+										<EXP><![CDATA[$=$FilterCps]]></EXP>
+									</PAR>
+									<PAR Name="ResultRef">
+										<EXP><![CDATA[$V$cps]]></EXP>
+									</PAR>
+									<PAR Name="Options" />
+								</CALLFUNCTION>
+								<SET_STRUCT Id="RDK:25934497" VarRef="SSGParameter" ClearAll="True" ListRef="LinkListe">
+									<PAR Name="Key">
+										<EXP><![CDATA[$C$Idsource]]></EXP>
+									</PAR>
+									<PAR Name="StrArr" />
+									<PAR Name="Str">
+										<EXP><![CDATA[$=$new_ancestorId]]></EXP>
+									</PAR>
+									<PAR Name="Dbl" />
+									<PAR Name="Int" />
+									<PAR Name="Boo" />
+								</SET_STRUCT>
+								<SET_STRUCT Id="RDK:25942474" VarRef="SSGParameter" ClearAll="True" ListRef="LinkListe">
+									<PAR Name="Key">
+										<EXP><![CDATA[$C$Idtarget]]></EXP>
+									</PAR>
+									<PAR Name="StrArr" />
+									<PAR Name="Str">
+										<EXP><![CDATA[$=$newId]]></EXP>
+									</PAR>
+									<PAR Name="Dbl" />
+									<PAR Name="Int" />
+									<PAR Name="Boo" />
+								</SET_STRUCT>
+								<SET_STRUCT Id="RDK:25942472" VarRef="SSGParameter" ClearAll="True" ListRef="LinkListe">
+									<PAR Name="Key">
+										<EXP><![CDATA[$C$cpsource]]></EXP>
+									</PAR>
+									<PAR Name="StrArr" />
+									<PAR Name="Str">
+										<EXP><![CDATA[$=$cps[0]]]></EXP>
+									</PAR>
+									<PAR Name="Dbl" />
+									<PAR Name="Int" />
+									<PAR Name="Boo" />
+								</SET_STRUCT>
+								<SET_STRUCT Id="RDK:25934499" VarRef="SSGParameter" ClearAll="True" ListRef="LinkListe">
+									<PAR Name="Key">
+										<EXP><![CDATA[$C$cptarget]]></EXP>
+									</PAR>
+									<PAR Name="StrArr" />
+									<PAR Name="Str">
+										<EXP><![CDATA[$=$cps[1]]]></EXP>
+									</PAR>
+									<PAR Name="Dbl" />
+									<PAR Name="Int" />
+									<PAR Name="Boo" />
+								</SET_STRUCT>
+								<CALLFUNCTION Id="RDK:25934282" DesignTimeRemark="Verlinke das neue Objekt mit dem Vorgänger">
+									<PAR Name="FuncName">
+										<EXP><![CDATA[$C$LinkBothOFItems]]></EXP>
+									</PAR>
+									<PAR Name="InputExp">
+										<EXP><![CDATA[$=$LinkListe]]></EXP>
+									</PAR>
+									<PAR Name="ResultRef">
+										<EXP><![CDATA[$V$]]></EXP>
+									</PAR>
+									<PAR Name="Options" />
+								</CALLFUNCTION>
+							</GROUP>
+						</IFTHENELSE>
+						<SET Id="RDK:25934296" VarRef="ancestorId">
 							<EXP><![CDATA[$=$shapeId]]></EXP>
-						</PAR>
-						<PAR Name="Dbl" />
-						<PAR Name="Int" />
-						<PAR Name="Boo" />
-					</SET_STRUCT>
-					<CALLFUNCTION Id="RDK:25934261">
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<SET Id="RDK:25942470" VarRef="new_ancestorId">
+							<EXP><![CDATA[$=$newId]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<LIST_ADD Id="RDK:25982992" ListRef="generatedIds">
+							<PAR Name="VALUE_TO_ADD">
+								<EXP><![CDATA[$=$newId]]></EXP>
+							</PAR>
+							<PAR Name="POS_TO_ADD" />
+						</LIST_ADD>
+					</FOREACHLOOP>
+					<CALLFUNCTION Id="RDK:25934300">
 						<PAR Name="FuncName">
-							<EXP><![CDATA[$C$doPatternOmnifloSingle]]></EXP>
+							<EXP><![CDATA[$C$CreateGroup]]></EXP>
 						</PAR>
 						<PAR Name="InputExp">
-							<EXP><![CDATA[$=$OriginalItem]]></EXP>
+							<EXP><![CDATA[$=$generatedIds]]></EXP>
 						</PAR>
 						<PAR Name="ResultRef">
-							<EXP><![CDATA[$V$newId]]></EXP>
+							<EXP><![CDATA[$V$]]></EXP>
 						</PAR>
 						<PAR Name="Options" />
 					</CALLFUNCTION>
-					<LIST_ADD Id="RDK:25934262" ListRef="generatedIds">
+					<LIST_ADD Id="RDK:25983017" ListRef="generatedGroupIds">
 						<PAR Name="VALUE_TO_ADD">
-							<EXP><![CDATA[$=$newId]]></EXP>
+							<EXP><![CDATA[$=$generatedIds]]></EXP>
 						</PAR>
 						<PAR Name="POS_TO_ADD" />
 					</LIST_ADD>
-					<IFTHENELSE Id="RDK:25934268" DesignTimeRemark="das erste Objekt der Gruppe wird nur erzeugt, aber noch nicht mit dem Vorgänger verlinkt">
-						<VALUECONDITION Value="false">
-							<EXP><![CDATA[$=$shapeId = firstId]]></EXP>
-						</VALUECONDITION>
-						<GROUP Id="RDK:25934269" SubType="Then">
-							<SET_STRUCT Id="RDK:25934288" VarRef="SSGParameter" ClearAll="True" ListRef="OriginalItem">
-								<PAR Name="Key">
-									<EXP><![CDATA[$C$idSource]]></EXP>
-								</PAR>
-								<PAR Name="StrArr" />
-								<PAR Name="Str">
-									<EXP><![CDATA[$=$ancestorId]]></EXP>
-								</PAR>
-								<PAR Name="Dbl" />
-								<PAR Name="Int" />
-								<PAR Name="Boo" />
-							</SET_STRUCT>
-							<SET_STRUCT Id="RDK:25934298" VarRef="SSGParameter" ClearAll="True" ListRef="OriginalItem">
-								<PAR Name="Key">
-									<EXP><![CDATA[$C$idTarget]]></EXP>
-								</PAR>
-								<PAR Name="StrArr" />
-								<PAR Name="Str">
-									<EXP><![CDATA[$=$shapeId]]></EXP>
-								</PAR>
-								<PAR Name="Dbl" />
-								<PAR Name="Int" />
-								<PAR Name="Boo" />
-							</SET_STRUCT>
-							<CALLFUNCTION Id="RDK:25934493" DesignTimeRemark="Finde die Verbindungsnamen der Connectionpoints in den ursprünglichen Elementen">
-								<PAR Name="FuncName">
-									<EXP><![CDATA[$C$FilterConnectingPointsBetweenBoth]]></EXP>
-								</PAR>
-								<PAR Name="InputExp">
-									<EXP><![CDATA[$=$OriginalItem]]></EXP>
-								</PAR>
-								<PAR Name="ResultRef">
-									<EXP><![CDATA[$V$cps]]></EXP>
-								</PAR>
-								<PAR Name="Options" />
-							</CALLFUNCTION>
-							<SET_STRUCT Id="RDK:25934497" VarRef="SSGParameter" ClearAll="True" ListRef="LinkListe">
-								<PAR Name="Key">
-									<EXP><![CDATA[$C$Idsource]]></EXP>
-								</PAR>
-								<PAR Name="StrArr" />
-								<PAR Name="Str">
-									<EXP><![CDATA[$=$new_ancestorId]]></EXP>
-								</PAR>
-								<PAR Name="Dbl" />
-								<PAR Name="Int" />
-								<PAR Name="Boo" />
-							</SET_STRUCT>
-							<SET_STRUCT Id="RDK:25942474" VarRef="SSGParameter" ClearAll="True" ListRef="LinkListe">
-								<PAR Name="Key">
-									<EXP><![CDATA[$C$Idtarget]]></EXP>
-								</PAR>
-								<PAR Name="StrArr" />
-								<PAR Name="Str">
-									<EXP><![CDATA[$=$newId]]></EXP>
-								</PAR>
-								<PAR Name="Dbl" />
-								<PAR Name="Int" />
-								<PAR Name="Boo" />
-							</SET_STRUCT>
-							<SET_STRUCT Id="RDK:25942472" VarRef="SSGParameter" ClearAll="True" ListRef="LinkListe">
-								<PAR Name="Key">
-									<EXP><![CDATA[$C$cpsource]]></EXP>
-								</PAR>
-								<PAR Name="StrArr" />
-								<PAR Name="Str">
-									<EXP><![CDATA[$=$cps[0]]]></EXP>
-								</PAR>
-								<PAR Name="Dbl" />
-								<PAR Name="Int" />
-								<PAR Name="Boo" />
-							</SET_STRUCT>
-							<SET_STRUCT Id="RDK:25934499" VarRef="SSGParameter" ClearAll="True" ListRef="LinkListe">
-								<PAR Name="Key">
-									<EXP><![CDATA[$C$cptarget]]></EXP>
-								</PAR>
-								<PAR Name="StrArr" />
-								<PAR Name="Str">
-									<EXP><![CDATA[$=$cps[1]]]></EXP>
-								</PAR>
-								<PAR Name="Dbl" />
-								<PAR Name="Int" />
-								<PAR Name="Boo" />
-							</SET_STRUCT>
-							<CALLFUNCTION Id="RDK:25934282" DesignTimeRemark="Verlinke das neue Objekt mit dem Vorgänger">
-								<PAR Name="FuncName">
-									<EXP><![CDATA[$C$LinkBothOFItems]]></EXP>
-								</PAR>
-								<PAR Name="InputExp">
-									<EXP><![CDATA[$=$LinkListe]]></EXP>
-								</PAR>
-								<PAR Name="ResultRef">
-									<EXP><![CDATA[$V$]]></EXP>
-								</PAR>
-								<PAR Name="Options" />
-							</CALLFUNCTION>
-						</GROUP>
-					</IFTHENELSE>
-					<SET Id="RDK:25934296" VarRef="ancestorId">
-						<EXP><![CDATA[$=$shapeId]]></EXP>
+					<SET Id="RDK:25982993" VarRef="Anzahl">
+						<EXP><![CDATA[$=$Anzahl - 1]]></EXP>
 						<PAR Name="AdvancedOptions" />
 					</SET>
-					<SET Id="RDK:25942470" VarRef="new_ancestorId">
-						<EXP><![CDATA[$=$newId]]></EXP>
-						<PAR Name="AdvancedOptions" />
-					</SET>
-				</FOREACHLOOP>
-				<CALLFUNCTION Id="RDK:25934300">
-					<PAR Name="FuncName">
-						<EXP><![CDATA[$C$CreateGroup]]></EXP>
-					</PAR>
-					<PAR Name="InputExp">
-						<EXP><![CDATA[$=$generatedIds]]></EXP>
-					</PAR>
-					<PAR Name="ResultRef">
-						<EXP><![CDATA[$V$]]></EXP>
-					</PAR>
-					<PAR Name="Options" />
-				</CALLFUNCTION>
+				</WHILELOOP>
 				<SET Id="RDK:25934264" VarRef="Param.Result">
-					<EXP><![CDATA[$=$generatedIds]]></EXP>
+					<EXP><![CDATA[$=$generatedGroupIds]]></EXP>
 					<PAR Name="AdvancedOptions" />
 				</SET>
 			</FUNCTION>
@@ -42036,28 +42230,40 @@ me.x
 				</CALLFUNCTION>
 				<SET_STRUCT Id="RDK:25906983" VarRef="SSGParameter" ClearAll="True" ListRef="MoveData">
 					<PAR Name="Key">
-						<EXP><![CDATA[$C$x]]></EXP>
+						<EXP><![CDATA[$C$x_offset]]></EXP>
 					</PAR>
 					<PAR Name="StrArr" />
 					<PAR Name="Str" />
 					<PAR Name="Dbl">
-						<EXP><![CDATA[$=$100]]></EXP>
+						<EXP><![CDATA[$=$SetPatternData.AbstandX]]></EXP>
 					</PAR>
 					<PAR Name="Int" />
 					<PAR Name="Boo" />
 				</SET_STRUCT>
 				<SET_STRUCT Id="RDK:25906981" VarRef="SSGParameter" ClearAll="True" ListRef="MoveData">
 					<PAR Name="Key">
-						<EXP><![CDATA[$C$y]]></EXP>
+						<EXP><![CDATA[$C$y_offset]]></EXP>
 					</PAR>
 					<PAR Name="StrArr" />
 					<PAR Name="Str" />
 					<PAR Name="Dbl">
-						<EXP><![CDATA[$=$200]]></EXP>
+						<EXP><![CDATA[$=$SetPatternData.AbstandY]]></EXP>
 					</PAR>
 					<PAR Name="Int" />
 					<PAR Name="Boo" />
 				</SET_STRUCT>
+				<SET_STRUCT Id="RDK:25953759" VarRef="SSGParameter" ClearAll="True" ListRef="MoveData">
+					<PAR Name="Key">
+						<EXP><![CDATA[$C$Anzahl]]></EXP>
+					</PAR>
+					<PAR Name="StrArr" />
+					<PAR Name="Str" />
+					<PAR Name="Dbl" />
+					<PAR Name="Int">
+						<EXP><![CDATA[$=$SetPatternData.Anzahl]]></EXP>
+					</PAR>
+					<PAR Name="Boo" />
+				</SET_STRUCT>
 				<IFTHENELSE Id="RDK:25886856">
 					<VALUECONDITION Value="false">
 						<EXP><![CDATA[$=$IsEmpty(selectedIds)]]></EXP>
@@ -42113,7 +42319,7 @@ me.x
 										</SET_STRUCT>
 										<CALLFUNCTION Id="RDK:25886854">
 											<PAR Name="FuncName">
-												<EXP><![CDATA[$C$doPatternOmnifloGroup]]></EXP>
+												<EXP><![CDATA[$C$createPatternOmnifloGroup]]></EXP>
 											</PAR>
 											<PAR Name="InputExp">
 												<EXP><![CDATA[$=$MoveData]]></EXP>
@@ -61864,9 +62070,9 @@ me.x
 					<EXP><![CDATA[$=$Button]]></EXP>
 					<CASEGROUP Id="RDK:357" CaseType="0" DesignTimeRemark="Mustern">
 						<EXP><![CDATA[$C$CUSTOM1]]></EXP>
-						<CALLFUNCTION Id="RDK:20579038">
+						<CALLFUNCTION Id="RDK:25886546">
 							<PAR Name="FuncName">
-								<EXP><![CDATA[$C$createPatternOfSelected]]></EXP>
+								<EXP><![CDATA[$C$MusterKopie]]></EXP>
 							</PAR>
 							<PAR Name="InputExp" />
 							<PAR Name="ResultRef">
@@ -61874,9 +62080,9 @@ me.x
 							</PAR>
 							<PAR Name="Options" />
 						</CALLFUNCTION>
-						<CALLFUNCTION Id="RDK:25886546">
+						<CALLFUNCTION Id="RDK:20579038">
 							<PAR Name="FuncName">
-								<EXP><![CDATA[$C$MusterKopie]]></EXP>
+								<EXP><![CDATA[$C$createPatternOfSelected]]></EXP>
 							</PAR>
 							<PAR Name="InputExp" />
 							<PAR Name="ResultRef">