|
|
| version 1.29, 2004/03/09 14:49:47 | version 1.74, 2004/12/23 14:51:32 |
|---|---|
| Line 1 | Line 1 |
| @main[] | @print[title;hash][key;value] |
| $request:charset[windows-1251] | <p>$title ^hash.foreach[key;value]{$key}[ | ]</p> |
| $response:charset[windows-1251] | =$hash.[zzz].rrggbb= |
| $response:content-type[text/html] | |
| ^if(def $form:param){ | |
| ^$form:param=$form:param<br> | |
| $several[$form:tables.several] | @main[] |
| ^$form:tables.several=^several.menu{ | $table[^table::create{color rrggbb |
| $several.field | red ff0000 |
| }[,] | green 00ff00 |
| }{ | blue 0000ff |
| _default 000000} | |
| ] | |
| $f[^file::load[text;http://parser3/_bug.html; | $c_hash[ |
| # $.method[POST] | $.red[ |
| $.form[ | $.color[red] |
| $.param[pass=ed | $.rrggbb[ff0000] |
| ] | ] |
| $.several[^table::create[nameless]{1^#0A2}] | $.green[ |
| $.color[green] | |
| $.rrggbb[00ff00] | |
| ] | ] |
| $.any-status(1) | $.blue[ |
| ]] | $.color[blue] |
| $.rrggbb[0000ff] | |
| ] | |
| $._default[ | |
| $.color[_default] | |
| $.rrggbb[000000] | |
| ] | |
| ] | |
| $a_hash[^table.hash[color]] | |
| ^print[a_hash:;$a_hash] | |
| =$f.text= | $b_hash[^hash::create[]] |
| ^table.menu{ | |
| ^b_hash.add[$.[$table.color][$table.fields]] | |
| } | |
| ^print[b_hash:;$b_hash] | |
| } | |
| ^print[c_hash:;$c_hash] | |