dnl dnl fox -- listicka na boku, pikomat only dnl dnl _fox(udelej listiku dnl _fox_add(za co, pridat co) dnl ex: _fox_add(/, dnl <--- za co dnl (|;/archiv/rocnik_aktualni/;Aktuální ročník) dnl <-- co dnl (|;/tabor/;Tábory)) dnl predefinovava: __page_preambule __page_postambule dnl. dnl __page_preambule() fox ji predefinuje zapocalo tabulku dnl define({__page_preambule}, { _ifyes(__use_fox, patsubst($1, {[\|\`\+\*]}, { }) dnl _fox_col_ini()}) dnl. dnl _fox_add(za-cim-to-ma-nasledovat, co-pridat) prida listicku dnl jedna polozka co-pridat je ve tvaru: (|;/uvod.html;Úvod), tj: dnl (uroven;/soubor/absolutne.html;popis), dnl `uroven' je vyjadrena unarne (tj. pocet znaku|||) dnl puvodene bylo zamysleno, ze by tam byl adresar jako ve winech dnl a | by znameana caru, + teckova odboca ` koncova odbocka dnl define({_fox_add}, {define({__fox_txt}, patsubst(__fox_txt(), {\(;$1;.*\))$}, {\1;b) {$2}}))}) dnl. dnl _fox() vlastni listicka dnl define({_fox}, { dnl
_fox() ) }) define({__page_preambule}, { _ifyes(__use_fox, dnl
_fox() ) }) dnl. dnl __page_preambule() fox ji predefinuje zakoncilo tabulku dnl define({__page_postamble}, { _ifyes(__use_fox, _ifyes(__use_fox,{_fox()})
) }) define({__fox_txt}, {(;/;Pikomat MFF UK) (;;) }) dnl. dnl __fox_txt() text v rootu foxu dnl define({__fox_txt}, {(;/;Pikomat MFF UK) }) dnl. dnl __fox_col() barvy jednotlivych urovni oddelene dvojteckami dnl define({__fox_col}, 2080ff:20a0ff:20c0ff:20e0ff:66cdaa:20ffff) define({_fox_col_ini}, {define({__fox_col_tmp}, __fox_col)}) define({_fox_col}, {bgcolor="&%substr(__fox_col_tmp,0,6)"define( {__fox_col_tmp}, substr(__fox_col_tmp,7))}) dnl css revolution define({_fox_col_ini}, {define({__fox_col_tmp}, 0)}) define({_fox_col}, {class="fox{}__fox_col_tmp()"define({__fox_col_tmp}, incr(__fox_col_tmp))}) dnl define({_fox_colspan}, {colspan="eval(20 - len($1))"}) define({_fox_colspan}, {colspan="eval(20)"}) dnl dnl $1 item uri $2 pred $3 v $4 dnl define({_ifitembold}, {ifelse(patsubst(__basejn, {$1.*$},),,{$2$3$4}, {$3})}) dnl. dnl definuje kam bude ukazovat uplne prvni titulek listicky dnl (napr. pro __cd_version je lepsi aby ukazoval do skutecneho webu) dnl define({__fox_root}, {_rel(/)}) dnl dnl _fox_uri(url) poku je nerelativni vrati nerelativni dnl jinak relativni define({_fox_uri}, {ifelse( patsubst($1,^http:.*$),,$1, _rel($1))}) dnl define({_fox_uri}, {_rel($1)}) dnl dnl $1 id, $2 depth, $3 url, $4 desc dnl define({_b_fox_item}, {_fox_item($1, $2, $3, b)}) define({_fox_item}, {
  dnl ifelse($4,b,)ifelse(__basejn(),$2,) dnl $3 dnl ifelse($4,b,)ifelse(__basejn(),$2,) dnl ifelse($2,,,_ifitembold($2, , $3,)) ifelse($2,,,{_ifitembold($2, , $3,)})  
_fox_col_ini()
_fox_col_ini() patsubst(patsubst(__fox_txt(), ;, {,}), {(}, {_fox_item(})
 
}) dnl dnl _fox_subdirs_lo(level, ./dir/kde/to/je/) -> (leve;/dir/kde/to/je/;je) define({_fox_subdirs_lo}, {($1;patsubst($2, ^.);patsubst(patsubst($2,/$), ^.*/))}) dnl. dnl _fox_subdirs(level, /dir/ve/kde/to/je/) dnl dnl vytvori polozky _fox_add'u z podadresaru v danem adresari, jejich dnl nazev bude nazev tohoto podadresare dnl define({_fox_subdirs}, { patsubst( esyscmd({ls -rd .$2*/ }), {^.+$}, {_fox_subdirs_lo($1,\&)}) }) _style_add({ tr &[ width:100%; &] td.fox0 &[ background-color:#2080ff; padding:3px; &] td.fox1 &[ background-color:#20a0ff; padding:3px; &] td.fox2 &[ background-color:#20c0ff; padding:3px; &] td.fox3 &[ background-color:#20e0ff; padding:3px; &] td.fox4 &[ background-color:#20e0ff; padding:3px; &] table.foxTab &[ width:"100%" &] td.foxTabL &[ vertical-align:top ; width:"20%" &] td.foxTabR &[ vertical-align:top ; width:"80%" &] table.foxTabTab &[ width:100%; border: 0mm solid; &] }) dnl_fox_col_ini()