--- parser3/src/www/htdocs/Attic/index.html 2001/10/08 16:42:06 1.369 +++ parser3/src/www/htdocs/Attic/index.html 2001/10/15 14:22:12 1.392 @@ -1,5 +1,21 @@ @main[] -^image[] +#^ifassignhash[] +#^tintdefault[] +#$response:status[404] +#^ifpasshash[] +#^movedir[] +#^replace[] +#^set[] +#^hash[]
+#$t[^methresult[]] ->$t +#^terror[] +#^ssave[] +#^calendar[] +#^thash[] +#^tdef[] +#^ford[] +#^tif[] +#^image[] #^mail2[] #^cookie[] #^response[] @@ -12,14 +28,129 @@ #^fori[] #^tconnect[] #^xslt[] -#^xml[] +^xml[] #^header[] OK +@tintdefault[] +#$abc[abc] +$abc[33] +^abc.int[z] +#^abc.int(123) + +@ifassignhash[] +$h[^if(1){$.a(1);$.a(2)}] +$h.a + +@ifpasshash[] +$a[$.e[a]] +$b[$.e[b]] +^ifpasshashdest[^if(1){$a;$b}] +#$x[^if(1){$a}{$b}] +#^ifpasshashdest[$x] + +@ifpasshashdest[p] +$p.e + +@movedir[] +^file:move[a;deeper/a] + +@replace[] +$a[12^;3] +^a.replace[^table::set{from to +2^; ! +}] + + +@set[] +^setdata[] +^a.add[$b] +add:$a.3
+ +^setdata[] +^a.sub[$b] +sub2:$a.2
+sub1:$a.1
+ +^setdata[] +$c[^a.union[$b]] +union3:$c.3
+union2:$c.2
+ +^setdata[] +$c[^a.intersection[$b]] +intersection3:$c.3
+intersection2:$c.2
+ +^setdata[] +intersects:^if(^a.intersects[$b]){y;n}
+intersects2:^if(^a.intersects[ ]){y;n}
+ + +
+ +@setdata[] +$a[$.1[a1] $.2[a2]] +$b[ $.2[b2] $.3[b3]] + + +@hash[] +$h[^hash::create[$._default[123]]] +$h.paf[not kretin] +$h.paf
+=$h.that=
+ +@methresult[] +$result[^table::set{1}] + +@terror[] +^error[method z must be called with z] + +@syntax1[] +#^a[^b] + +@syntax2[] +#^a[ + +@ssave[] +$abc[abc] +^abc.save[abc] + +@calendar[] +2001;11:
+$week_days[^date:calendar[rus](2001;11)] +
+^week_days.menu{^for[wday](0;7){^if($week_days.$wday){$week_days.$wday; ^; ^;} }
} +
+ +@thash[] +$table[^table::set{id name age +1 paf 278 +2 ïèô 234 +}] +$hash[^table.hash[id;^table::set[nameless]{id +name}]] +$hash.2.id $hash.2.name $hash.2.age + +@tdef[] +$s[0] +if 0=^if($s){}{n}
+if def 0=^if(def $s){y}{}
+
+ +@ford[] +^for[i](0;5){$i}{($i)} + +@tif[] +^if[def]{y;n} + @image[] $pict[^image::create(400;200)] -^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0x000000) -^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-5;0x000000) +^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-10;$pict.height-10;0+10;360-10;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-10;0x0000ff) +^pict.arc($pict.width/2;$pict.height/2;$pict.height-26;$pict.height-26;0+10;360-10;0xff0000) $response:body[^pict.gif[]] @@ -48,7 +179,7 @@ $env:HTTP_COOKIE
@xslt[] ^xdata[] -^show-xdoc2[^xdoc.transform[global.xsl]] +^show-xdoc2[^xdoc.transform[global.xsl;$.param1[123/]]] @regexp2[] $s[ select] @@ -99,7 +230,7 @@ $s[abcÀÁÂ] ] @exec[] -$a[^file::exec[fc.exe;a;b]] +$a[^file::exec[fc.exe;;a;b]] $a.status|$a.stderr
@fori[][i]