From 3753ddd439017e993ed7e530e44a933fc5629491 Mon Sep 17 00:00:00 2001
From: dre <reif@pbu-cad.de>
Date: Wed, 11 Oct 2023 09:41:34 +0200
Subject: [PATCH] ERK-16 WIP

---
 MAIN_SSG.rdx | 844 ++++++++++++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 837 insertions(+), 7 deletions(-)

diff --git a/MAIN_SSG.rdx b/MAIN_SSG.rdx
index 63824e7..5aa38f0 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="dre [NBDELP3561-04C]" ModDate="2023-10-10T14:50:39" LanguageVersion="2014.1.3.602" />
+	<PROCESSPROPERTY CrUser="pmarani [ENGMARANI17R]" CrDate="2022-05-05T18:05:31" ModUser="dre [NBDELP3561-04C]" ModDate="2023-10-10T16:24:37" LanguageVersion="2014.1.3.602" />
 	<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">
@@ -38,6 +38,27 @@
 					<FIELD Id="RDK:1001198" Name="x" Type="double" />
 					<FIELD Id="RDK:1001200" Name="y" Type="double" />
 				</TYPE>
+				<TYPE Id="RDK:1520433" Name="EckradType" Expanded="True" SubType="structure">
+					<TYPE_VALUES />
+					<FIELD Id="RDK:1520415" Name="Beschreibung" Type="string" />
+					<FIELD Id="RDK:1520416" Name="AbstandMS" Type="double" />
+					<FIELD Id="RDK:1520417" Name="Hoehe" Type="double" />
+					<FIELD Id="RDK:1520418" Name="OrientierungHV" Type="double" DesignTimeNotes="90=Horizontal&#xD;&#xA;0=Vertikal" />
+					<FIELD Id="RDK:1520419" Name="n_Sep" Type="integer" />
+					<FIELD Id="RDK:1520420" Name="n_Scan" Type="integer" />
+					<FIELD Id="RDK:1520421" Name="Drehung" Type="integer" DesignTimeNotes="1= im Uhrzeigersinn=rechts&#xD;&#xA;-1= Gegen Uhrzeigersinn=links" />
+					<FIELD Id="RDK:1520422" Name="Typ" Type="string" DesignTimeNotes="Standard, Pin (Kreiselfarbe in Grün)" />
+					<FIELD Id="RDK:1520423" Name="n_Rampen" Type="integer" />
+					<FIELD Id="RDK:1520424" Name="Durchmesser" Type="double" />
+					<FIELD Id="RDK:1520425" Name="M_Strecke" Type="SSGConnectionPoint[]" Suppressed="True" />
+					<FIELD Id="RDK:1520426" Name="M_Strecke_selected" Type="string[]" Suppressed="True" />
+					<FIELD Id="RDK:1520427" Name="S_Strecke" Type="SSGConnectionPoint[]" Suppressed="True" />
+					<FIELD Id="RDK:1520428" Name="S_Strecke_selected" Type="string[]" Suppressed="True" />
+					<FIELD Id="RDK:1520429" Name="d_min" Type="double" Suppressed="True" DesignTimeNotes="Mindestabstand für den ersten und den letzten CP" />
+					<FIELD Id="RDK:1520430" Name="d_cp" Type="double" Suppressed="True" DesignTimeNotes="Default Wert für den Abstand weiterer CPs" />
+					<FIELD Id="RDK:1520431" Name="x" Type="double" Suppressed="True" />
+					<FIELD Id="RDK:1520432" Name="y" Type="double" Suppressed="True" />
+				</TYPE>
 				<TYPE Id="RDK:302581" Name="GefaelleType" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:302571" Name="Beschreibung" Type="string" />
@@ -53,10 +74,11 @@
 					<FIELD Id="RDK:973716" Name="Beschreibung" Type="string" />
 					<FIELD Id="RDK:973714" Name="Weichenart" Type="string" />
 				</TYPE>
-				<TYPE Id="RDK:79642" Name="SSG_ShapeType" SubType="structure">
+				<TYPE Id="RDK:79642" Name="SSG_ShapeType" Expanded="True" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:79643" Name="SivasNummer" Type="string" />
 					<FIELD Id="RDK:122039" Name="KreiselDefinition" Type="KreiselType" />
+					<FIELD Id="RDK:1520553" Name="EckradDefinition" Type="EckradType" />
 					<FIELD Id="RDK:412309" Name="GefaelleDefinition" Type="GefaelleType" />
 					<FIELD Id="RDK:973719" Name="WeicheDefinition" Type="WeicheType" />
 				</TYPE>
@@ -143,7 +165,7 @@
 					<FIELD Id="RDK:1013883" Name="DisableTopToolbar" Type="boolean" />
 					<FIELD Id="RDK:1013884" Name="DisableLeftToolbar" Type="boolean" />
 				</TYPE>
-				<TYPE Id="RDK:1013894" Name="Editor2DCategory" Expanded="True" SubType="structure">
+				<TYPE Id="RDK:1013894" Name="Editor2DCategory" SubType="structure">
 					<TYPE_VALUES />
 					<FIELD Id="RDK:1013886" Name="id" Type="string" />
 					<FIELD Id="RDK:1013887" Name="parentId" Type="string" />
@@ -709,6 +731,7 @@
 			</GROUP>
 			<GROUP Id="RDK:26402" Name="SSGGroup" SubType="VarSet" IncludeDate="0">
 				<VAR Id="RDK:112239" Name="KreiselData_defaults" Type="KreiselType" />
+				<VAR Id="RDK:1520435" Name="EckradData_defaults" Type="EckradType" />
 				<VAR Id="RDK:837487" Name="GefaelleData_defaults" Type="GefaelleType" />
 				<GROUP Id="RDK:93797" Name="Background" SubType="VarSet" IncludeDate="0">
 					<VAR Id="RDK:382" Name="ImportBackgroundData" Type="ImportBackgroundType" />
@@ -722,6 +745,7 @@
 			</GROUP>
 			<GROUP Id="RDK:314272" Name="MUI" SubType="VarSet" IncludeDate="0">
 				<VAR Id="RDK:426767" Name="KreiselData" Type="KreiselType" />
+				<VAR Id="RDK:1520551" Name="EckradData" Type="KreiselType" />
 				<VAR Id="RDK:397366" Name="Render_Kreisel" Type="MUIPanelType[]" />
 				<VAR Id="RDK:397368" Name="Render_Gefaelle" Type="MUIPanelType[]" />
 				<VAR Id="RDK:973744" Name="Render_Weiche" Type="MUIPanelType[]" />
@@ -2912,6 +2936,778 @@ KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
 							</GROUP>
 						</GROUP>
 					</FUNCTION>
+					<FUNCTION Id="RDK:1520547" Name="CreatePrototype_Eckrad">
+						<GROUP Id="RDK:1520499" Name="Local Variables" SubType="VarSet" IncludeDate="0">
+							<VAR Id="RDK:1520495" Name="ChildList" Type="Editor2DChildTypeList" />
+							<VAR Id="RDK:1520496" Name="ChiltItem" Type="Editor2DChildType" />
+							<VAR Id="RDK:1520497" Name="Shape_Kreisel" Type="Editor2DShapeType" />
+							<VAR Id="RDK:1520498" Name="ShapeItem" Type="Editor2DShapeType" />
+						</GROUP>
+						<COMMENTS Id="RDK:1520500" DesignTimeRemark="Angle definition in GS2D" DesignTimeNotes="           0&#xD;&#xA;            |&#xD;&#xA;270 &lt;-------&gt;90&#xD;&#xA;            |&#xD;&#xA;          180&#xD;&#xA;" />
+						<GROUP Id="RDK:1520503" Name="Values Calculation" SubType="Generic">
+							<SET Id="RDK:1520501" VarRef="EckradData">
+								<EXP><![CDATA[$=$Shape_Prototype.EckradDefinition]]></EXP>
+								<PAR Name="AdvancedOptions" />
+							</SET>
+							<SET Id="RDK:1520502" VarRef="ShapeTotalLength" Suppressed="True">
+								<EXP><![CDATA[$=$KreiselData.AbstandMS+KreiselData.Durchmesser]]></EXP>
+								<PAR Name="AdvancedOptions" />
+							</SET>
+						</GROUP>
+						<SET Id="RDK:1520504" VarRef="Property_Prototype">
+							<EXP><![CDATA[$=$Shape_Prototype]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<GROUP Id="RDK:1520546" Name="Kreisel Assembly" SubType="Generic">
+							<SET_STRUCT Id="RDK:1520505" VarRef="Property_Prototype" DesignTimeNotes="20231005 -1-&#xD;&#xA;remove text from InheritHeight">
+								<PAR Name="id">
+									<EXP><![CDATA[$=$Shape_Prototype.id]]></EXP>
+								</PAR>
+								<PAR Name="name" />
+								<PAR Name="family" />
+								<PAR Name="description" />
+								<PAR Name="text">
+									<EXP><![CDATA[$C$NOTHING]]></EXP>
+								</PAR>
+								<PAR Name="shapeMode">
+									<EXP><![CDATA[$C$1]]></EXP>
+								</PAR>
+								<PAR Name="icon" />
+								<PAR Name="iconBig" />
+								<PAR Name="image" />
+								<PAR Name="srcSVG" />
+								<PAR Name="src3D" />
+								<PAR Name="srcTexture3D" />
+								<PAR Name="width">
+									<EXP><![CDATA[$=$Round(EckradData.Durchmesser/Inch*DPI,0) 
+'Neue Länge aus der Eingabe]]></EXP>
+								</PAR>
+								<PAR Name="height">
+									<EXP><![CDATA[$=$Round(EckradData.Durchmesser/Inch*DPI,0)]]></EXP>
+								</PAR>
+								<PAR Name="depth">
+									<EXP><![CDATA[$=$Round(Property_Prototype.depth/Inch*DPI,0)]]></EXP>
+								</PAR>
+								<PAR Name="behaviour" />
+								<PAR Name="help" />
+								<PAR Name="eventClass" />
+								<PAR Name="linkClass" />
+								<PAR Name="collisionClass" />
+								<PAR Name="containerClass" />
+								<PAR Name="snapClass" />
+								<PAR Name="color" />
+								<PAR Name="colorOpacity" />
+								<PAR Name="lineColor" />
+								<PAR Name="lineColorOpacity" />
+								<PAR Name="color3D" />
+								<PAR Name="colorOpacity3D" />
+								<PAR Name="lineColor3D" />
+								<PAR Name="lineColorOpacity3D" />
+								<PAR Name="custom" />
+								<PAR Name="connectionPoints" />
+								<PAR Name="group2dShapes" />
+								<PAR Name="group2dConnectors" />
+								<PAR Name="group3d" />
+								<PAR Name="eventHandler" />
+								<PAR Name="eventHandlers" />
+							</SET_STRUCT>
+							<GROUP Id="RDK:1520520" Name="Shapes" SubType="Generic">
+								<GROUP Id="RDK:1520509" Name="Motorstation" SubType="Generic">
+									<COMMENTS Id="RDK:1520506" DesignTimeRemark="mm in pixel" />
+									<COMMENTS Id="RDK:1520507" DesignTimeRemark="Motorstation wird als Shape gedreht" />
+									<SET_STRUCT Id="RDK:1520508" VarRef="ChiltItem" ClearAll="True" ListRef="ChildList" DesignTimeNotes="0-&gt;X------------------------------------------------------------&#xD;&#xA; |                                                                  |&#xD;&#xA;Y   M                                                     S    |&#xD;&#xA;|                                                                   |&#xD;&#xA;--------------------------------------------------------------------">
+										<PAR Name="id" />
+										<PAR Name="source">
+											<EXP><![CDATA[$=$IIF(KreiselData.Drehung=1,"s_Motorstation_rechts","s_Motorstation_links")]]></EXP>
+										</PAR>
+										<PAR Name="width">
+											<EXP><![CDATA[$=$Round(KreiselData.Durchmesser/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="height">
+											<EXP><![CDATA[$=$Round(KreiselData.Durchmesser/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="depth">
+											<EXP><![CDATA[$=$Round(200/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="x">
+											<EXP><![CDATA[$=$Round((KreiselData.Durchmesser/2)/Inch*DPI,0)]]></EXP>
+										</PAR>
+										<PAR Name="y">
+											<EXP><![CDATA[$=$Round((KreiselData.Durchmesser/2)/Inch*DPI,0)]]></EXP>
+										</PAR>
+										<PAR Name="z">
+											<EXP><![CDATA[$C$0]]></EXP>
+										</PAR>
+										<PAR Name="rotation">
+											<EXP><![CDATA[$=$-1*KreiselData.OrientierungHV]]></EXP>
+										</PAR>
+										<PAR Name="data" />
+										<PAR Name="color" />
+										<PAR Name="colorOpacity" />
+									</SET_STRUCT>
+								</GROUP>
+								<GROUP Id="RDK:1520512" Name="Spannstation" SubType="Generic">
+									<SET_STRUCT Id="RDK:1520510" VarRef="ChiltItem" ClearAll="True" ListRef="ChildList">
+										<PAR Name="id" />
+										<PAR Name="source">
+											<EXP><![CDATA[$=$IIF(KreiselData.Drehung=1,"s_Spannstation_rechts","s_Spannstation_links")]]></EXP>
+										</PAR>
+										<PAR Name="width">
+											<EXP><![CDATA[$=$Round(KreiselData.Durchmesser/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="height">
+											<EXP><![CDATA[$=$Round(KreiselData.Durchmesser/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="depth">
+											<EXP><![CDATA[$=$Round(200/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="x">
+											<EXP><![CDATA[$=$Round((KreiselData.AbstandMS+(KreiselData.Durchmesser/2))/Inch*DPI,0)]]></EXP>
+										</PAR>
+										<PAR Name="y">
+											<EXP><![CDATA[$=$Round((KreiselData.Durchmesser/2)/Inch*DPI,0)]]></EXP>
+										</PAR>
+										<PAR Name="z">
+											<EXP><![CDATA[$=$200/Inch*DPI]]></EXP>
+										</PAR>
+										<PAR Name="rotation">
+											<EXP><![CDATA[$=$-1*KreiselData.OrientierungHV]]></EXP>
+										</PAR>
+										<PAR Name="data" />
+										<PAR Name="color" />
+										<PAR Name="colorOpacity" />
+									</SET_STRUCT>
+									<COMMENTS Id="RDK:1520511" DesignTimeRemark="Spannstation wird als Shape gedreht" />
+								</GROUP>
+								<GROUP Id="RDK:1520515" Name="StandardBand" SubType="Generic">
+									<VALUECONDITION Value="true">
+										<EXP><![CDATA[$=$KreiselData.Typ="Standard"]]></EXP>
+									</VALUECONDITION>
+									<SET_STRUCT Id="RDK:1520513" VarRef="ChiltItem" ClearAll="True" ListRef="ChildList">
+										<PAR Name="id" />
+										<PAR Name="source">
+											<EXP><![CDATA[$C$s_StandardBand]]></EXP>
+										</PAR>
+										<PAR Name="width">
+											<EXP><![CDATA[$=$Round((KreiselData.AbstandMS)/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="height">
+											<EXP><![CDATA[$=$Round(200/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="depth">
+											<EXP><![CDATA[$=$Round(200/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="x">
+											<EXP><![CDATA[$=$Round(((KreiselData.AbstandMS+KreiselData.Durchmesser)/2)/Inch*DPI,0)]]></EXP>
+										</PAR>
+										<PAR Name="y">
+											<EXP><![CDATA[$=$0]]></EXP>
+										</PAR>
+										<PAR Name="z">
+											<EXP><![CDATA[$=$200/Inch*DPI]]></EXP>
+										</PAR>
+										<PAR Name="rotation">
+											<EXP><![CDATA[$C$0]]></EXP>
+										</PAR>
+										<PAR Name="data" />
+										<PAR Name="color" />
+										<PAR Name="colorOpacity" />
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:1520514" VarRef="ChiltItem" ClearAll="True" ListRef="ChildList">
+										<PAR Name="id" />
+										<PAR Name="source">
+											<EXP><![CDATA[$C$s_StandardBand]]></EXP>
+										</PAR>
+										<PAR Name="width">
+											<EXP><![CDATA[$=$Round((KreiselData.AbstandMS)/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="height">
+											<EXP><![CDATA[$=$Round(200/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="depth">
+											<EXP><![CDATA[$=$Round(200/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="x">
+											<EXP><![CDATA[$=$Round(((KreiselData.AbstandMS+KreiselData.Durchmesser)/2)/Inch*DPI,0)]]></EXP>
+										</PAR>
+										<PAR Name="y">
+											<EXP><![CDATA[$=$Round(KreiselData.Durchmesser/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="z">
+											<EXP><![CDATA[$=$200/Inch*DPI]]></EXP>
+										</PAR>
+										<PAR Name="rotation">
+											<EXP><![CDATA[$C$0]]></EXP>
+										</PAR>
+										<PAR Name="data" />
+										<PAR Name="color" />
+										<PAR Name="colorOpacity" />
+									</SET_STRUCT>
+								</GROUP>
+								<GROUP Id="RDK:1520518" Name="PinBand" SubType="Generic">
+									<VALUECONDITION Value="true">
+										<EXP><![CDATA[$=$KreiselData.Typ="Pin"]]></EXP>
+									</VALUECONDITION>
+									<SET_STRUCT Id="RDK:1520516" VarRef="ChiltItem" ClearAll="True" ListRef="ChildList">
+										<PAR Name="id" />
+										<PAR Name="source">
+											<EXP><![CDATA[$C$s_PinBand]]></EXP>
+										</PAR>
+										<PAR Name="width">
+											<EXP><![CDATA[$=$Round((KreiselData.AbstandMS)/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="height">
+											<EXP><![CDATA[$=$Round(200/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="depth">
+											<EXP><![CDATA[$=$Round(200/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="x">
+											<EXP><![CDATA[$=$Round(((KreiselData.AbstandMS+KreiselData.Durchmesser)/2)/Inch*DPI,0)]]></EXP>
+										</PAR>
+										<PAR Name="y">
+											<EXP><![CDATA[$=$0]]></EXP>
+										</PAR>
+										<PAR Name="z">
+											<EXP><![CDATA[$=$200/Inch*DPI]]></EXP>
+										</PAR>
+										<PAR Name="rotation">
+											<EXP><![CDATA[$C$0]]></EXP>
+										</PAR>
+										<PAR Name="data" />
+										<PAR Name="color" />
+										<PAR Name="colorOpacity" />
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:1520517" VarRef="ChiltItem" ClearAll="True" ListRef="ChildList">
+										<PAR Name="id" />
+										<PAR Name="source">
+											<EXP><![CDATA[$C$s_PinBand]]></EXP>
+										</PAR>
+										<PAR Name="width">
+											<EXP><![CDATA[$=$Round((KreiselData.AbstandMS)/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="height">
+											<EXP><![CDATA[$=$Round(200/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="depth">
+											<EXP><![CDATA[$=$Round(200/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="x">
+											<EXP><![CDATA[$=$Round(((KreiselData.AbstandMS+KreiselData.Durchmesser)/2)/Inch*DPI,0)]]></EXP>
+										</PAR>
+										<PAR Name="y">
+											<EXP><![CDATA[$=$Round(KreiselData.Durchmesser/Inch*DPI, 0)]]></EXP>
+										</PAR>
+										<PAR Name="z">
+											<EXP><![CDATA[$=$200/Inch*DPI]]></EXP>
+										</PAR>
+										<PAR Name="rotation">
+											<EXP><![CDATA[$C$0]]></EXP>
+										</PAR>
+										<PAR Name="data" />
+										<PAR Name="color" />
+										<PAR Name="colorOpacity" />
+									</SET_STRUCT>
+								</GROUP>
+								<SET Id="RDK:1520519" VarRef="Property_Prototype.group2dShapes">
+									<EXP><![CDATA[$=$ToJSON(ChildList)]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</GROUP>
+							<GROUP Id="RDK:1520545" Name="CPs" SubType="Generic">
+								<GROUP Id="RDK:1520521" Name="Local Variables" SubType="VarSet" IncludeDate="0" />
+								<GROUP Id="RDK:1520531" Name="CP_Kreisel" SubType="Generic">
+									<COMMENTS Id="RDK:1520522" DesignTimeRemark="CP Rotation" DesignTimeNotes="           0&#xD;&#xA;            |&#xD;&#xA;270 &lt;-------&gt;90&#xD;&#xA;            |&#xD;&#xA;          180&#xD;&#xA;" />
+									<COMMENTS Id="RDK:1520523" DesignTimeRemark="CP Position" DesignTimeNotes="Square 1000X1000&#xD;&#xA;&#xD;&#xA;X0Y0-------------X500Y0-------------X1000Y0&#xD;&#xA;|                                                             |&#xD;&#xA;|                                                             |&#xD;&#xA;X0Y500                                X1000Y500&#xD;&#xA;|                                                             |&#xD;&#xA;|                                                             |&#xD;&#xA;X0Y1000----------------------------X1000Y1000&#xD;&#xA;" />
+									<SET Id="RDK:1520524" VarRef="ConnectionPointList">
+										<EXP><![CDATA[$C$NOTHING]]></EXP>
+										<PAR Name="AdvancedOptions" />
+									</SET>
+									<SET_STRUCT Id="RDK:1520525" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList" DesignTimeRemark="Links mitte" DesignTimeTip="Links mitte">
+										<PAR Name="id" />
+										<PAR Name="x">
+											<EXP><![CDATA[$C$0]]></EXP>
+										</PAR>
+										<PAR Name="y">
+											<EXP><![CDATA[$C$500]]></EXP>
+										</PAR>
+										<PAR Name="z" />
+										<PAR Name="xMin" />
+										<PAR Name="xMax" />
+										<PAR Name="xStep" />
+										<PAR Name="yMin" />
+										<PAR Name="yMax" />
+										<PAR Name="yStep" />
+										<PAR Name="zMin" />
+										<PAR Name="zMax" />
+										<PAR Name="zStep" />
+										<PAR Name="direction">
+											<EXP><![CDATA[$C$270]]></EXP>
+										</PAR>
+										<PAR Name="linkClass">
+											<EXP><![CDATA[$C$Kreisel]]></EXP>
+										</PAR>
+										<PAR Name="label">
+											<EXP><![CDATA[$C$M2]]></EXP>
+										</PAR>
+										<PAR Name="isDimension">
+											<EXP><![CDATA[$C$True]]></EXP>
+										</PAR>
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:1520526" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList" DesignTimeRemark="Rechts mitte" DesignTimeTip="Rechts mitte">
+										<PAR Name="id" />
+										<PAR Name="x">
+											<EXP><![CDATA[$C$1000]]></EXP>
+										</PAR>
+										<PAR Name="y">
+											<EXP><![CDATA[$C$500]]></EXP>
+										</PAR>
+										<PAR Name="z" />
+										<PAR Name="xMin" />
+										<PAR Name="xMax" />
+										<PAR Name="xStep" />
+										<PAR Name="yMin" />
+										<PAR Name="yMax" />
+										<PAR Name="yStep" />
+										<PAR Name="zMin" />
+										<PAR Name="zMax" />
+										<PAR Name="zStep" />
+										<PAR Name="direction">
+											<EXP><![CDATA[$C$90]]></EXP>
+										</PAR>
+										<PAR Name="linkClass">
+											<EXP><![CDATA[$C$Kreisel]]></EXP>
+										</PAR>
+										<PAR Name="label">
+											<EXP><![CDATA[$C$S2]]></EXP>
+										</PAR>
+										<PAR Name="isDimension">
+											<EXP><![CDATA[$C$True]]></EXP>
+										</PAR>
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:1520527" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList" DesignTimeRemark="Links oben" DesignTimeTip="Links oben">
+										<PAR Name="id" />
+										<PAR Name="x">
+											<EXP><![CDATA[$=$Call("mm2pxBOX", NewListDbl(
+' Param 1 Gesamtlänge in mm
+ShapeTotalLength
+,
+' Param 2 Position in mm
+KreiselData.Durchmesser/2
+))]]></EXP>
+										</PAR>
+										<PAR Name="y">
+											<EXP><![CDATA[$C$0]]></EXP>
+										</PAR>
+										<PAR Name="z" />
+										<PAR Name="xMin" />
+										<PAR Name="xMax" />
+										<PAR Name="xStep" />
+										<PAR Name="yMin" />
+										<PAR Name="yMax" />
+										<PAR Name="yStep" />
+										<PAR Name="zMin" />
+										<PAR Name="zMax" />
+										<PAR Name="zStep" />
+										<PAR Name="direction">
+											<EXP><![CDATA[$C$0]]></EXP>
+										</PAR>
+										<PAR Name="linkClass">
+											<EXP><![CDATA[$C$Kreisel]]></EXP>
+										</PAR>
+										<PAR Name="label">
+											<EXP><![CDATA[$C$M1]]></EXP>
+										</PAR>
+										<PAR Name="isDimension">
+											<EXP><![CDATA[$C$True]]></EXP>
+										</PAR>
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:1520528" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList" DesignTimeRemark="Links unten" DesignTimeTip="Links unten">
+										<PAR Name="id" />
+										<PAR Name="x">
+											<EXP><![CDATA[$=$Call("mm2pxBOX", NewListDbl(
+' Param 1 Gesamtlänge in mm
+ShapeTotalLength
+,
+' Param 2 Position in mm
+KreiselData.Durchmesser/2
+))]]></EXP>
+										</PAR>
+										<PAR Name="y">
+											<EXP><![CDATA[$C$1000]]></EXP>
+										</PAR>
+										<PAR Name="z" />
+										<PAR Name="xMin" />
+										<PAR Name="xMax" />
+										<PAR Name="xStep" />
+										<PAR Name="yMin" />
+										<PAR Name="yMax" />
+										<PAR Name="yStep" />
+										<PAR Name="zMin" />
+										<PAR Name="zMax" />
+										<PAR Name="zStep" />
+										<PAR Name="direction">
+											<EXP><![CDATA[$C$180]]></EXP>
+										</PAR>
+										<PAR Name="linkClass">
+											<EXP><![CDATA[$C$Kreisel]]></EXP>
+										</PAR>
+										<PAR Name="label">
+											<EXP><![CDATA[$C$M3]]></EXP>
+										</PAR>
+										<PAR Name="isDimension">
+											<EXP><![CDATA[$C$True]]></EXP>
+										</PAR>
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:1520529" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList" DesignTimeRemark="Rechts oben" DesignTimeTip="Rechts oben">
+										<PAR Name="id" />
+										<PAR Name="x">
+											<EXP><![CDATA[$=$Call("mm2pxBOX", NewListDbl(
+' Param 1 Gesamtlänge in mm
+ShapeTotalLength
+,
+' Param 2 Position in mm
+KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
+))]]></EXP>
+										</PAR>
+										<PAR Name="y">
+											<EXP><![CDATA[$C$0]]></EXP>
+										</PAR>
+										<PAR Name="z" />
+										<PAR Name="xMin" />
+										<PAR Name="xMax" />
+										<PAR Name="xStep" />
+										<PAR Name="yMin" />
+										<PAR Name="yMax" />
+										<PAR Name="yStep" />
+										<PAR Name="zMin" />
+										<PAR Name="zMax" />
+										<PAR Name="zStep" />
+										<PAR Name="direction">
+											<EXP><![CDATA[$C$0]]></EXP>
+										</PAR>
+										<PAR Name="linkClass">
+											<EXP><![CDATA[$C$Kreisel]]></EXP>
+										</PAR>
+										<PAR Name="label">
+											<EXP><![CDATA[$C$S1]]></EXP>
+										</PAR>
+										<PAR Name="isDimension">
+											<EXP><![CDATA[$C$True]]></EXP>
+										</PAR>
+									</SET_STRUCT>
+									<SET_STRUCT Id="RDK:1520530" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList" DesignTimeRemark="Rechts unten" DesignTimeTip="Rechts unten">
+										<PAR Name="id" />
+										<PAR Name="x">
+											<EXP><![CDATA[$=$Call("mm2pxBOX", NewListDbl(
+' Param 1 Gesamtlänge in mm
+ShapeTotalLength
+,
+' Param 2 Position in mm
+KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
+))]]></EXP>
+										</PAR>
+										<PAR Name="y">
+											<EXP><![CDATA[$C$1000]]></EXP>
+										</PAR>
+										<PAR Name="z" />
+										<PAR Name="xMin" />
+										<PAR Name="xMax" />
+										<PAR Name="xStep" />
+										<PAR Name="yMin" />
+										<PAR Name="yMax" />
+										<PAR Name="yStep" />
+										<PAR Name="zMin" />
+										<PAR Name="zMax" />
+										<PAR Name="zStep" />
+										<PAR Name="direction">
+											<EXP><![CDATA[$C$180]]></EXP>
+										</PAR>
+										<PAR Name="linkClass">
+											<EXP><![CDATA[$C$Kreisel]]></EXP>
+										</PAR>
+										<PAR Name="label">
+											<EXP><![CDATA[$C$S3]]></EXP>
+										</PAR>
+										<PAR Name="isDimension">
+											<EXP><![CDATA[$C$True]]></EXP>
+										</PAR>
+									</SET_STRUCT>
+								</GROUP>
+								<GROUP Id="RDK:1520542" Name="CP_Gefaellestrecke" SubType="Generic">
+									<GROUP Id="RDK:1520536" Name="Am der Motorstation" SubType="Generic">
+										<SET_STRUCT Id="RDK:1520532" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList" DesignTimeRemark="Links mitte" DesignTimeTip="Links mitte">
+											<PAR Name="id" />
+											<PAR Name="x">
+												<EXP><![CDATA[$C$0]]></EXP>
+											</PAR>
+											<PAR Name="y">
+												<EXP><![CDATA[$C$500]]></EXP>
+											</PAR>
+											<PAR Name="z" />
+											<PAR Name="xMin" />
+											<PAR Name="xMax" />
+											<PAR Name="xStep" />
+											<PAR Name="yMin" />
+											<PAR Name="yMax" />
+											<PAR Name="yStep" />
+											<PAR Name="zMin" />
+											<PAR Name="zMax" />
+											<PAR Name="zStep" />
+											<PAR Name="direction">
+												<EXP><![CDATA[$C$0]]></EXP>
+											</PAR>
+											<PAR Name="linkClass">
+												<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="label">
+												<EXP><![CDATA[$C$M2 Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="isDimension" />
+										</SET_STRUCT>
+										<SET_STRUCT Id="RDK:1520533" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList" DesignTimeRemark="Links mitte" DesignTimeTip="Links mitte">
+											<PAR Name="id" />
+											<PAR Name="x">
+												<EXP><![CDATA[$C$0]]></EXP>
+											</PAR>
+											<PAR Name="y">
+												<EXP><![CDATA[$C$500]]></EXP>
+											</PAR>
+											<PAR Name="z" />
+											<PAR Name="xMin" />
+											<PAR Name="xMax" />
+											<PAR Name="xStep" />
+											<PAR Name="yMin" />
+											<PAR Name="yMax" />
+											<PAR Name="yStep" />
+											<PAR Name="zMin" />
+											<PAR Name="zMax" />
+											<PAR Name="zStep" />
+											<PAR Name="direction">
+												<EXP><![CDATA[$C$180]]></EXP>
+											</PAR>
+											<PAR Name="linkClass">
+												<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="label">
+												<EXP><![CDATA[$C$M2 Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="isDimension" />
+										</SET_STRUCT>
+										<SET_STRUCT Id="RDK:1520534" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList" DesignTimeRemark="Links oben" DesignTimeTip="Links oben">
+											<PAR Name="id" />
+											<PAR Name="x">
+												<EXP><![CDATA[$=$Call("mm2pxBOX", NewListDbl(
+' Param 1 Gesamtlänge in mm
+ShapeTotalLength
+,
+' Param 2 Position in mm
+KreiselData.Durchmesser/2
+))]]></EXP>
+											</PAR>
+											<PAR Name="y">
+												<EXP><![CDATA[$C$0]]></EXP>
+											</PAR>
+											<PAR Name="z" />
+											<PAR Name="xMin" />
+											<PAR Name="xMax" />
+											<PAR Name="xStep" />
+											<PAR Name="yMin" />
+											<PAR Name="yMax" />
+											<PAR Name="yStep" />
+											<PAR Name="zMin" />
+											<PAR Name="zMax" />
+											<PAR Name="zStep" />
+											<PAR Name="direction">
+												<EXP><![CDATA[$C$270]]></EXP>
+											</PAR>
+											<PAR Name="linkClass">
+												<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="label">
+												<EXP><![CDATA[$C$M1 Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="isDimension" />
+										</SET_STRUCT>
+										<SET_STRUCT Id="RDK:1520535" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList" DesignTimeRemark="Links unten" DesignTimeTip="Links unten">
+											<PAR Name="id" />
+											<PAR Name="x">
+												<EXP><![CDATA[$=$Call("mm2pxBOX", NewListDbl(
+' Param 1 Gesamtlänge in mm
+ShapeTotalLength
+,
+' Param 2 Position in mm
+KreiselData.Durchmesser/2
+))]]></EXP>
+											</PAR>
+											<PAR Name="y">
+												<EXP><![CDATA[$C$1000]]></EXP>
+											</PAR>
+											<PAR Name="z" />
+											<PAR Name="xMin" />
+											<PAR Name="xMax" />
+											<PAR Name="xStep" />
+											<PAR Name="yMin" />
+											<PAR Name="yMax" />
+											<PAR Name="yStep" />
+											<PAR Name="zMin" />
+											<PAR Name="zMax" />
+											<PAR Name="zStep" />
+											<PAR Name="direction">
+												<EXP><![CDATA[$C$270]]></EXP>
+											</PAR>
+											<PAR Name="linkClass">
+												<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="label">
+												<EXP><![CDATA[$C$M3 Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="isDimension" />
+										</SET_STRUCT>
+									</GROUP>
+									<GROUP Id="RDK:1520541" Name="An der Spannstation" SubType="Generic">
+										<SET_STRUCT Id="RDK:1520537" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList">
+											<PAR Name="id" />
+											<PAR Name="x">
+												<EXP><![CDATA[$C$1000]]></EXP>
+											</PAR>
+											<PAR Name="y">
+												<EXP><![CDATA[$C$500]]></EXP>
+											</PAR>
+											<PAR Name="z" />
+											<PAR Name="xMin" />
+											<PAR Name="xMax" />
+											<PAR Name="xStep" />
+											<PAR Name="yMin" />
+											<PAR Name="yMax" />
+											<PAR Name="yStep" />
+											<PAR Name="zMin" />
+											<PAR Name="zMax" />
+											<PAR Name="zStep" />
+											<PAR Name="direction">
+												<EXP><![CDATA[$C$0]]></EXP>
+											</PAR>
+											<PAR Name="linkClass">
+												<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="label">
+												<EXP><![CDATA[$C$S2 Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="isDimension" />
+										</SET_STRUCT>
+										<SET_STRUCT Id="RDK:1520538" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList">
+											<PAR Name="id" />
+											<PAR Name="x">
+												<EXP><![CDATA[$C$1000]]></EXP>
+											</PAR>
+											<PAR Name="y">
+												<EXP><![CDATA[$C$500]]></EXP>
+											</PAR>
+											<PAR Name="z" />
+											<PAR Name="xMin" />
+											<PAR Name="xMax" />
+											<PAR Name="xStep" />
+											<PAR Name="yMin" />
+											<PAR Name="yMax" />
+											<PAR Name="yStep" />
+											<PAR Name="zMin" />
+											<PAR Name="zMax" />
+											<PAR Name="zStep" />
+											<PAR Name="direction">
+												<EXP><![CDATA[$C$180]]></EXP>
+											</PAR>
+											<PAR Name="linkClass">
+												<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="label">
+												<EXP><![CDATA[$C$S2 Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="isDimension" />
+										</SET_STRUCT>
+										<SET_STRUCT Id="RDK:1520539" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList" DesignTimeRemark="Rechts oben" DesignTimeTip="Rechts oben">
+											<PAR Name="id" />
+											<PAR Name="x">
+												<EXP><![CDATA[$=$Call("mm2pxBOX", NewListDbl(
+' Param 1 Gesamtlänge in mm
+ShapeTotalLength
+,
+' Param 2 Position in mm
+KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
+))]]></EXP>
+											</PAR>
+											<PAR Name="y">
+												<EXP><![CDATA[$C$0]]></EXP>
+											</PAR>
+											<PAR Name="z" />
+											<PAR Name="xMin" />
+											<PAR Name="xMax" />
+											<PAR Name="xStep" />
+											<PAR Name="yMin" />
+											<PAR Name="yMax" />
+											<PAR Name="yStep" />
+											<PAR Name="zMin" />
+											<PAR Name="zMax" />
+											<PAR Name="zStep" />
+											<PAR Name="direction">
+												<EXP><![CDATA[$C$90]]></EXP>
+											</PAR>
+											<PAR Name="linkClass">
+												<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="label">
+												<EXP><![CDATA[$C$S1 Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="isDimension" />
+										</SET_STRUCT>
+										<SET_STRUCT Id="RDK:1520540" VarRef="ConnectionPointItem" ClearAll="True" ListRef="ConnectionPointList" DesignTimeRemark="Rechts unten" DesignTimeTip="Rechts unten">
+											<PAR Name="id" />
+											<PAR Name="x">
+												<EXP><![CDATA[$=$Call("mm2pxBOX", NewListDbl(
+' Param 1 Gesamtlänge in mm
+ShapeTotalLength
+,
+' Param 2 Position in mm
+KreiselData.AbstandMS+(KreiselData.Durchmesser/2)
+))]]></EXP>
+											</PAR>
+											<PAR Name="y">
+												<EXP><![CDATA[$C$1000]]></EXP>
+											</PAR>
+											<PAR Name="z" />
+											<PAR Name="xMin" />
+											<PAR Name="xMax" />
+											<PAR Name="xStep" />
+											<PAR Name="yMin" />
+											<PAR Name="yMax" />
+											<PAR Name="yStep" />
+											<PAR Name="zMin" />
+											<PAR Name="zMax" />
+											<PAR Name="zStep" />
+											<PAR Name="direction">
+												<EXP><![CDATA[$C$90]]></EXP>
+											</PAR>
+											<PAR Name="linkClass">
+												<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="label">
+												<EXP><![CDATA[$C$S3 Gefaellestrecke]]></EXP>
+											</PAR>
+											<PAR Name="isDimension" />
+										</SET_STRUCT>
+									</GROUP>
+								</GROUP>
+								<EXEC_ON_VALUES Id="RDK:1520543" VarRef="ConnectionPointList">
+									<PAR Name="id">
+										<EXP><![CDATA[$=$"defcp"+Me_idx]]></EXP>
+									</PAR>
+								</EXEC_ON_VALUES>
+								<SET Id="RDK:1520544" VarRef="Property_Prototype.connectionPoints">
+									<EXP><![CDATA[$=$ToJSON(ConnectionPointList)]]></EXP>
+									<PAR Name="AdvancedOptions" />
+								</SET>
+							</GROUP>
+						</GROUP>
+					</FUNCTION>
 					<FUNCTION Id="RDK:439270" Name="Create/Update Shape">
 						<GROUP Id="RDK:439268" Name="Local Variables" SubType="VarSet" IncludeDate="0">
 							<VAR Id="RDK:439269" Name="ID" Type="string" />
@@ -7243,7 +8039,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
 							<EXP><![CDATA[$=$Shape_Prototype.name+":"+Count(FilterByFieldValue(ShapeList, "family", Shape_Prototype.family))]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
-						<SET Id="RDK:946585" VarRef="Shape_Prototype.KreiselDefinition.Beschreibung" Bookmarked="True">
+						<SET Id="RDK:946585" VarRef="Shape_Prototype.KreiselDefinition.Beschreibung">
 							<EXP><![CDATA[$=$Shape_Prototype.name]]></EXP>
 							<PAR Name="AdvancedOptions" />
 						</SET>
@@ -7388,6 +8184,37 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
 							</ACTION_CALL>
 						</GROUP>
 					</CASEGROUP>
+					<CASEGROUP Id="RDK:1520393" CaseType="0">
+						<EXP><![CDATA[$C$Eckrad]]></EXP>
+						<SET Id="RDK:1520395" VarRef="Shape_Prototype.KreiselDefinition">
+							<EXP><![CDATA[$=$KreiselData_defaults]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<SET Id="RDK:1520437" VarRef="Shape_Prototype.layer">
+							<EXP><![CDATA[$C$Strecke]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<SET Id="RDK:1520439" VarRef="Shape_Prototype.name">
+							<EXP><![CDATA[$=$Shape_Prototype.name+":"+Count(FilterByFieldValue(ShapeList, "family", Shape_Prototype.family))]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<SET Id="RDK:1520441" VarRef="Shape_Prototype.KreiselDefinition.Beschreibung">
+							<EXP><![CDATA[$=$Shape_Prototype.name]]></EXP>
+							<PAR Name="AdvancedOptions" />
+						</SET>
+						<CALLFUNCTION Id="RDK:1520549">
+							<PAR Name="FuncName">
+								<EXP><![CDATA[$C$CreatePrototype_Eckrad]]></EXP>
+							</PAR>
+							<PAR Name="InputExp">
+								<EXP><![CDATA[$=$Shape_Prototype.id]]></EXP>
+							</PAR>
+							<PAR Name="ResultRef">
+								<EXP><![CDATA[$V$]]></EXP>
+							</PAR>
+							<PAR Name="Options" />
+						</CALLFUNCTION>
+					</CASEGROUP>
 					<CASEGROUP Id="RDK:426773" CaseType="0">
 						<EXP><![CDATA[$C$Gefaellestrecke]]></EXP>
 						<SET Id="RDK:839933" VarRef="Shape_Prototype.GefaelleDefinition">
@@ -7592,7 +8419,7 @@ ShapeTotalLength-SSGConnectionPoint.x_S-(KreiselData.Durchmesser/2)
 					<PAR Name="includeInBOM" />
 				</EXEC_ON_VALUES>
 			</FUNCTION>
-			<FUNCTION Id="RDK:295" Name="OnEditor2DDoubleClick" Bookmarked="True" InputTypeName="Editor2DEventArgumentsTypeList" Options="(TYPEFUNCTION)">
+			<FUNCTION Id="RDK:295" Name="OnEditor2DDoubleClick" InputTypeName="Editor2DEventArgumentsTypeList" Options="(TYPEFUNCTION)">
 				<GROUP Id="RDK:435377" Name="Local Variables" SubType="VarSet" IncludeDate="0">
 					<VAR Id="RDK:437146" Name="LinkID" Type="string" />
 					<VAR Id="RDK:1022552" Name="FamilyList" Type="string[]" />
@@ -8089,14 +8916,14 @@ me.x
 					</GROUP>
 				</IFTHENELSE>
 			</FUNCTION>
-			<FUNCTION Id="RDK:289" Name="OnEditor2DPasted" Bookmarked="True" InputTypeName="Editor2DEventArgumentsTypeList" Options="(TYPEFUNCTION)">
+			<FUNCTION Id="RDK:289" Name="OnEditor2DPasted" InputTypeName="Editor2DEventArgumentsTypeList" Options="(TYPEFUNCTION)">
 				<COMMENTS Id="RDK:383198" />
 			</FUNCTION>
 			<FUNCTION Id="RDK:290" Name="OnEditor2DRemoved" InputTypeName="Editor2DEventArgumentsTypeList" Options="(TYPEFUNCTION)" />
 			<FUNCTION Id="RDK:291" Name="OnEditor2DRotated" InputTypeName="Editor2DEventArgumentsTypeList" Options="(TYPEFUNCTION)" />
 			<FUNCTION Id="RDK:292" Name="OnEditor2DMoved" InputTypeName="Editor2DEventArgumentsTypeList" Options="(TYPEFUNCTION)" />
 			<FUNCTION Id="RDK:293" Name="OnEditor2DStretched" InputTypeName="Editor2DEventArgumentsTypeList" Options="(TYPEFUNCTION)" />
-			<FUNCTION Id="RDK:294" Name="OnEditor2DLinked" Bookmarked="True" InputTypeName="Editor2DEventArgumentsTypeList" Options="(TYPEFUNCTION)">
+			<FUNCTION Id="RDK:294" Name="OnEditor2DLinked" InputTypeName="Editor2DEventArgumentsTypeList" Options="(TYPEFUNCTION)">
 				<GROUP Id="RDK:132033" Name="Local Variables" SubType="VarSet" IncludeDate="0">
 					<VAR Id="RDK:177013" Name="ConnectionPointItem" Type="Editor2DConnectionPointType" />
 					<VAR Id="RDK:177787" Name="DeltaCPAngle" Type="double" />
@@ -11266,6 +12093,9 @@ ShapeList["id="+Param.Input[1].shapeID].name
 					<PAR Name="d_cp">
 						<EXP><![CDATA[$C$800]]></EXP>
 					</PAR>
+					<PAR Name="Beschreibung" />
+					<PAR Name="x" />
+					<PAR Name="y" />
 				</SET_STRUCT>
 			</GROUP>
 			<GROUP Id="RDK:837484" Name="Gefaellestrecke" SubType="Generic">