--- parser3/src/www/htdocs/Attic/index.html 2001/10/29 17:49:57 1.443 +++ parser3/src/www/htdocs/Attic/index.html 2001/11/01 10:59:26 1.457 @@ -1,4 +1,12 @@ @main[] +^thashdelete[] +#^connect[mysql://user:pass@cd.rinet.ru/db]{^void:sql{z} } +#^tappend[] +#^sappend[] +#^eval(10\3)
+#^tform[] +#^formattest[] +#^filelist[] #^connect[mysql://user:pass@host]{ } #^безнадёжна_попытка_поправить_непоправимое[] #^tcache[] @@ -12,7 +20,7 @@ #^domxslt[] #^lsplit2[] #^faceesize[] -^imageresize[] +#^imageresize[] #^ifassignhash[] #^tintdefault[] #$response:status[404] @@ -46,6 +54,51 @@ #^header[] OK +@thashdelete[] +$h[$.a[1] $.b[2]] +was:
+count=^h._count[]
+b='$h.b'
+ +^h.delete[b] + +now:
+count=^h._count[]
+b='$h.b' + +@sappend[] +$test[123] +^test.save[test] +^test.save[append;test] + +@tappend[] +$test[^table::set{a b +a1 b1}] +^test.save[test] +$test[^table::set{a b +a2 b2}] +^test.save[append;test] + + +@tform[] +^if(def $form:new_file){y}{n} +
+ + + + +@formattest[] +$size(15.124) + +^size.format{%.2f} + +@filelist[] +$html[^file:list[.;\.html^$]] +^html.menu{ + $html.name
+} +
+ @безнадёжна_попытка_поправить_непоправимое[] $dom_from_disk[^xdoc::load[input.xml]] $dom_created_in_air[^xdoc::create[doc]] @@ -169,12 +222,12 @@ $response:body[^small.gif[]] $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-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[]] +^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)