--- parser3/www/htdocs/Attic/_bug.html 2004/12/23 14:40:54 1.73 +++ parser3/www/htdocs/Attic/_bug.html 2004/12/23 14:51:32 1.74 @@ -1,25 +1,41 @@ -@main[] +@print[title;hash][key;value] +
$title ^hash.foreach[key;value]{$key}[ | ]
+=$hash.[zzz].rrggbb= -$cH[^cH[]] +@main[] +$table[^table::create{color rrggbb +red ff0000 +green 00ff00 +blue 0000ff +_default 000000} +] -^if($cH.this is "junction"){ - $result[^cH.this[$cH.th_par]] -}{ - $result[0] -} +$c_hash[ + $.red[ + $.color[red] + $.rrggbb[ff0000] + ] + $.green[ + $.color[green] + $.rrggbb[00ff00] + ] + $.blue[ + $.color[blue] + $.rrggbb[0000ff] + ] + $._default[ + $.color[_default] + $.rrggbb[000000] + ] +] -#################################################################################################################### +$a_hash[^table.hash[color]] +^print[a_hash:;$a_hash] -@cH[] -$result[ - $.this[$mThis] - $.th_par[ - $.a(2) - $.b(3) - ] -] -#################################################################################################################### +$b_hash[^hash::create[]] +^table.menu{ + ^b_hash.add[$.[$table.color][$table.fields]] +} +^print[b_hash:;$b_hash] -@mThis[lparams][params] -$params[^hash::create[$lparams]] -$result[^eval($params.a * $params.b)] +^print[c_hash:;$c_hash] \ No newline at end of file