--- parser3/src/www/htdocs/Attic/index.html	2001/10/16 08:02:55	1.394
+++ parser3/src/www/htdocs/Attic/index.html	2001/10/18 06:52:05	1.403
@@ -1,4 +1,11 @@
-@main[]
#^ifassignhash[]
#^tintdefault[]
#$response:status[404]
+@main[]
+^domedit[]
+#^lsplit2[]
+#^faceesize[]
+#^imageresize[]
+#^ifassignhash[]
+#^tintdefault[]
+#$response:status[404]
 #^ifpasshash[]
 #^movedir[]
 #^replace[]
@@ -25,10 +32,49 @@
 #^fori[]
 #^tconnect[]
 #^xslt[]
-^xml[]
+#^xml[]
 #^header[]
 OK
 
+@domedit[]
+$doc[^xdoc::create[doc]]
+$paf[^doc.createElement[paf]]
+
+@lsplit2[]
+$path[/optics/]
+$pathTable[^path.lsplit[/]]
+^pathTable.menu{
+	^if(def $pathTable.piece){
+		=$pathTable.piece=
+	}
+}
+
+
+@faceesize[]
+$k(2)
+$pict[^image::load[paf.gif]]
+$small[^image::create($pict.width/$k;$pict.height/$k)]
+^small.copy[$pict](0;0;$pict.width;$pict.height;0;0;$small.width;$small.height;250)
+$response:body[^small.gif[]]
+
+@imageresize[]
+$k(2)
+$pict[^image::create(400*$k;200*$k)]
+$pict.line-width(2)
+^pict.arc($pict.width/2;$pict.height/2;$pict.width-1;$pict.height-1;0;360;0x000000)
+^pict.arc($pict.width/2;$pict.height/2;$pict.width-20;$pict.height-20;0+20;360-20;0xff0000)
+#^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0xff0000)
+^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-20;0x0000ff)
+^pict.arc($pict.width/2;$pict.height/2;$pict.height-26;$pict.height-26;0+20;360-20;0xff0000)
+#$response:body[^pict.gif[]]
+
+$small[^image::create($pict.width/$k;$pict.height/$k)]
+#^small.copy[$pict](0;0;$pict.width;$pict.height;0;0)
+^small.copy[$pict](0;0;$pict.width;$pict.height;0;0;$small.width;$small.height;0)
+
+$response:body[^small.gif[]]
+
+
 @tintdefault[]
 #$abc[abc]
 $abc[33]