--- parser3/src/www/htdocs/Attic/index.html 2001/06/27 12:44:33 1.207
+++ parser3/src/www/htdocs/Attic/index.html 2001/07/06 11:13:35 1.219
@@ -1,4 +1,80 @@
@main[]
+PI=^math:PI.format{%.40f}
+
+^math:random(10)
+
+^math:sqrt(16)
+
+$люди[
+ $2федя[
+ $рост[176]
+ ]
+ $1василий[
+ $возраст[5]
+ ]
+]
+
+$имена[^люди.keys[]]
+$имена{
+ ^sort{$key}
+ ^menu{$key}[,].
+}
+
+
+$таблица[^table:set{a b
+1 2
+}]
+$колонки[^таблица.columns[]]
+$колонки{
+ ^menu{$column}[,].
+}
+
+
+
+^if($form:id ne 'z"'){
+ ne
+}{
+ eq
+}
+
+
+
+^rem{
+$one(1)
+$z(0)
+^eval(^one.int[]%0)
+
+}
+
+$form:id:
+
+
+^switch(2){
+ ^case(1;4;3){143}
+ ^case[DEFAULT]{default}
+}
+
+^switch(2){
+ ^case(1;2;3){143}
+ ^case[DEFAULT]{default}
+}
+
+^switch(2){
+ ^case(1;5;3){143}
+}
+
+
+^switch(2){
+ ^case(2){2}
+}
+
+
+^switch[2]{
+ ^case(2){![2]}
+}
+
+
+
$hash[$a[1]]
^hash.default[0]
^rem{
@@ -185,7 +261,7 @@ ${comment}.
^connect[$connect-string]{
$shit[^taint[our's]]
# $paf[^table:sql{insert into paf (name, age) values ('$shit', ^random:generate(10000))}]
- ^nothing:sql{update paf set age=age+1}
+ ^void:sql{update paf set age=age+1}
$paf[^table:sql{select * from paf order by id desc}(5)]
$paf{
^if(^empty[]){query result is empty}{