--- parser3/src/www/htdocs/Attic/index.html 2001/08/31 09:26:12 1.285
+++ parser3/src/www/htdocs/Attic/index.html 2001/09/18 15:24:37 1.296.2.12
@@ -1,9 +1,31 @@
-@USE
-t.p
-dtf.p
-
@main[]
-^tdoubledefault[]
+#^locals[]
+^fori[]
+#^imagepoly[]
+#^dconst[]
+#^subnameinexpr3[]
+#^subnameinexpr2[]
+#^subnameinexpr[]
+#^statictest[]
+#^istable[]
+#^line[]
+#^emptyprotocol[]
+#^emptytableisnotdef[]
+#^autoconvemptystring[]
+#^tdupleform[]
+#^tvoiddefault[]
+#^testdom0[]
+#^testlocal[0]
+#^thashdefault2[]
+#^tcase2[]
+#^tlsplit2[]
+#^tconnect[]
+#^timghtmlyu[]
+#^timghtml[]
+#^tresult[]
+#^voidtest[]
+#^ttext[]
+#^tdoubledefault[]
#^tintdefault[]
#^t3partycookie[]
#^t3partycookie[]
@@ -22,6 +44,171 @@ dtf.p
#^tests[]
#^func(0)
+@locals[][i]
+$i[33]
+^locals2[]
+$i
+
+@locals2[][i]
+$i[44]
+$i
+
+@fori[][i]
+#$i(0)
+$j(0)
+#^while($i<=9){
+#^while($j<1){
+^for[i](0;9){
+=$i=
+^j.inc[]
+#^i.inc[]
+#}
+}
+
+@imagepoly[]
+$i[^image::create[200;200]]
+$i.line-style[******* ]
+^i.polyline(0)[^table::set{x y
+50 50
+100 50
+150 150
+}]
+#^i.line(50;50;100;50;0)
+$response:body[^i.gif[]]
+
+@dconst[]
+$hash[
+$.a(0xe)
+]
+$hash.a
+
+
+@subnameinexpr3[]
+^use[/chart.p]
+$test[^chart::init[1;2;$.zz[]]]
+
+@subnameinexpr2[]
+^use[/test.p]
+$test[^test::subnameinexpr2[]]
+$test.c
+
+@subnameinexpr[]
+$hash[
+ $.a[1]
+ $.b[2]
+]
+$c($CLASS.hash.a+$hash.b)
+$c
+
+@statictest[]
+^use[/test.p]
+$test[^test::create[]]
+
+@istable[]
+^istable_nested[^table::set{hren}]
+@istable_nested[param]
+^if($param is table){y2;n2}
+
+@line[]
+$картинка[^image::create(200;200)]
+$картинка.line-width(2)
+^картинка.line(0;0;$картинка.width;$картинка.height;0)[**** * ]
+$response:body[^картинка.gif[]]
+
+
+@emptyprotocol[]
+^connect[]{zz}
+
+@emptytableisnotdef[]
+$table[^table::set[nameless]{}]
+^if(def $table){y;n}
+
+@autoconvemptystring[]
+^if($form:v){y}{n}
+
+
+@tdupleform[]
+#$form:fields.a
+#$c[^form:tables.a.columns[]]
+#^c.menu{$c.column}[,]
+$atable[$form:tables.a]
+^atable.menu{a=$atable.field}[,]
+
+@tvoiddefault[]
+$var[$form:element]
+^var.int(2)
+
+
+@testdom0[]
+$dom[^dom::load[a.xml]]
+
+
+@testlocal[level][local]
+$local($level)
+before($level):$local
+^if($level<10){
+ ^testlocal($level+1)
+}
+after($level):$local
+
+@thashdefault2[]
+$hash[
+ $.a[1]
+ $.b[2]
+ $._default[xx]
+]
+$hash.c
+
+@tcase2[]
+$hash[
+ $.1{^load[code1]}
+ $.2{code2}
+]
+$hash.1
+
+@tlsplit2[]
+$splitURI[^request:uri.mid(1;^request:uri.length[]-1).lsplit[/]]
+OK
+
+@tconnect[]
+#^connect[mysql://hren:pwd@hren/zz]{hren}
+^connect[mysql://]{^void:sql{show tables}}
+
+
+@timghtmlyu[]
+^img[/i/commons_22_prev.gif][$.vspace(100)]
+@img[filename;params]
+^if(-f $filename){$thisImage[^image::measure[$filename]]^thisImage.html[$params]}
+
+@timghtml[]
+$картинка[^image::measure[i/commons_22_prev.gif]]
+#$hash[$.alt[222]]
+#^timghtml-nested[$hash]
+^timghtml-nested[$.alt[222]]
+
+@timghtml-nested[params]
+^картинка.html[$params]
+
+@tresult[]
+44
+$result[]
+
+@voidtest[]
+#$var[123x]
+^var.int(4)
+
+@ttext[]
+$картинка[^image::load[background.gif]]
+^картинка.font[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzАБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмнопрстуфхцчшщъыьэюя0123456789-+=!\"%:,.^^^;<>?@()[]'&*/^$;font.gif](5)
+
+^картинка.text(10;10)[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijkl]
+^картинка.text(10;30)[mnopqrstuvwxyzАБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ]
+^картинка.text(10;50)[абвгдежзийклмнопрстуфхцчшщъыьэюя0123456789]
+^картинка.text(10;70)[!-+=!\"%:,.^^^;<>?@()[]'&*/^$!]
+
+
+$response:body[^картинка.gif[]]
+
@tdoubledefault[]
$a[123.6x]
#^a.double[]