Index: TECH/Svg/Basis/Circle.cls.xml
===================================================================
diff -u -r3629 -r3644
--- TECH/Svg/Basis/Circle.cls.xml	(.../Circle.cls.xml)	(revision 3629)
+++ TECH/Svg/Basis/Circle.cls.xml	(.../Circle.cls.xml)	(revision 3644)
@@ -7,34 +7,34 @@
 <Default>circle</Default>
 </Parameter>
 
-<Property name="CX">
+<Property name="MiddelpuntX">
 <Type>%Integer</Type>
 <Parameter name="XMLNAME" value="cx"/>
 <Parameter name="XMLPROJECTION" value="ATTRIBUTE"/>
 </Property>
 
-<Property name="CY">
+<Property name="MiddelpuntY">
 <Type>%Integer</Type>
 <Parameter name="XMLNAME" value="cy"/>
 <Parameter name="XMLPROJECTION" value="ATTRIBUTE"/>
 </Property>
 
-<Property name="R">
+<Property name="Straal">
 <Type>%Integer</Type>
 <Parameter name="XMLNAME" value="r"/>
 <Parameter name="XMLPROJECTION" value="ATTRIBUTE"/>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>CX:%Integer,CY:%Integer,R:%Integer</FormalSpec>
+<FormalSpec>MiddelpuntX:%Integer,MiddelpuntY:%Integer,Straal:%Integer</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..CX = CX
-	Set ..CY = CY
-	Set ..R = R
+	Set ..MiddelpuntX = MiddelpuntX
+	Set ..MiddelpuntY = MiddelpuntY
+	Set ..Straal = Straal
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -71,6 +71,18 @@
 <Value name="9">
 <Value>StrokeDashArray</Value>
 </Value>
+<Value name="10">
+<Value>Opacity</Value>
+</Value>
+<Value name="11">
+<Value>MiddelpuntX</Value>
+</Value>
+<Value name="12">
+<Value>MiddelpuntY</Value>
+</Value>
+<Value name="13">
+<Value>Straal</Value>
+</Value>
 </Data>
 </Storage>
 </Class>