--- parser3/src/www/htdocs/Attic/index.html 2001/09/05 08:57:43 1.292 +++ parser3/src/www/htdocs/Attic/index.html 2001/09/18 08:52:49 1.296.2.11 @@ -1,9 +1,23 @@ -@USE -t.p -dtf.p - @main[] -^tconnect[] +^imagepoly[] +#^dconst[] +#^subnameinexpr3[] +#^subnameinexpr2[] +#^subnameinexpr[] +#^statictest[] +#^istable[] +#^line[] +#^emptyprotocol[] +#^emptytableisnotdef[] +#^autoconvemptystring[] +#^tdupleform[] +#^tvoiddefault[] +#^testdom0[] +#^testlocal[0] +#^thashdefault2[] +#^tcase2[] +#^tlsplit2[] +#^tconnect[] #^timghtmlyu[] #^timghtml[] #^tresult[] @@ -28,9 +42,113 @@ dtf.p #^tests[] #^func(0)
+@imagepoly[] +$i[^image::create[200;200]] +rem{^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://]{hren} +^connect[mysql://]{^void:sql{show tables}} @timghtmlyu[] @@ -56,8 +174,8 @@ $result[] ^var.int(4) @ttext[] -$êàðòèíêà[^image::load[/i/commons_22_prev.gif]] -^êàðòèíêà.font[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖרÙÚÛÜÝÞßàáâãäåæçèéêëìíîïðñòóôõö÷øùúûüýþÿ0123456789-+=!\"%:,.^^^;<>?@()[]'&*/^$;/i/font.gif](5) +$êàðòèíêà[^image::load[background.gif]] +^êàðòèíêà.font[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖרÙÚÛÜÝÞßàáâãäåæçèéêëìíîïðñòóôõö÷øùúûüýþÿ0123456789-+=!\"%:,.^^^;<>?@()[]'&*/^$;font.gif](5) ^êàðòèíêà.text(10;10)[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijkl] ^êàðòèíêà.text(10;30)[mnopqrstuvwxyzÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖרÙÚÛÜÝÞß]