function make_menus_rb($arr, $here, $open, $o)
{
    static $i;
    $i++;
    //if($open)$i=$open;
    static $a;
    $a++;
    //$tr=str_pad('►',$a+7,'-',STR_PAD_LEFT);
    $css = '" style="padding:0 0 0 32px;';
    $csa = '" style="list-style-type:none;';
    //if($open)$i='x'.$i;
    if (is_array($arr)) {
        foreach ($arr as $k => $v) {
            $o++;
            $re = '';
            //$a=$i.$o;
            if (is_array($v)) {
                $nb = btn('txtsmall2', '(' . count($v) . ')');
                $re = balc("li", $csa, '├–' . good_gb($k, $i, '►') . ' ' . $nb);
                $re .= make_menus_rb($v, '', 0, 0);
            } elseif ($open) {
                $re .= balc("li", $csa, '├– ' . lj('', 'popup_popart__3_' . $k . '_3', suj_of_id($k)));
            }
            if ($re) {
                $ret .= divd('tn' . $k, $re);
            }
        }
    }
    $a--;
    return divc($css, $ret);
}

function table2array_menu($p, $o, $rid)
{
    //$ret.=input(1,'inp',$p,'').' ';
    $ret .= lj('', $rid . '_plug__2_table2array_table2array*j___inp', picto('reload')) . br();
    $ret .= txarea('inp', $p, 64, 24);
    return $ret;
}

function plug_exsys($p, $o = '')
{
    $rid = 'plg' . $p;
    $ret .= autoclic('param', $p, 10, 244, '', 1) . ' ';
    $ret .= lj('', $rid . '_plug___exsys_sys___param', picto('reload'));
    return $ret . divd($rid, plugin($plg, $p, $o));
}

function plug_ascii($p, $o = '', $res = '')
{
    $ret .= input1('txtarea', '', 60) . ' ';
    $ret .= lj('popw', 'ascii_plug___ascii_ascii*jb___txtarea', 'ok') . br();
    $ret .= divd('ascii', ascii_j($p, $o, $res));
    return $ret;
}

function icocss_menu($p, $o, $rid)
{
    $ret .= inp('inp', $p) . ' ';
    $ret .= lj('', $rid . '_plug__2_icocss_icocss*j___inp', picto('reload')) . ' ';
    $ret .= lj('', $rid . '_plug__2_icocss_icocss*build', picto('save')) . ' ';
    return $ret;
}

function udc_build($p)
{
    if ($p == '1' && auth(6)) {
        $r = udc_source();
    }
    $r = msql_read('users', 'ummo_umvoc_1', '', 1);
    if ($r) {
        foreach ($r as $k => $v) {
            $ra[$v[0]] = $v;
        }
    }
    ksort($ra);
    if ($ra) {
        foreach ($ra as $k => $v) {
            //if(strpos($v[3],'Eyaoloowa')!==false){}
            //$rb[$k][]=divc('title',$k);
            $rb[$k][] = lj('', 'popup_plup___umvoc_ud*glossary_' . ajx($k), $k) . ' ';
            $f = 'users/ummo/glyphes/' . strtoupper($k) . '.png';
            $rb[$k][] = is_file($f) ? udc_imz($f, 6) : '';
            //$rb[$k][]=is_file($f)?image('/'.$f,'',''):'';
            $rb[$k][] = stripslashes($v[1]);
            $rb[$k][] = lj('', 'popup_search___' . ajx($k), picto('search', 16));
            $rb[$k][] = $v[3];
        }
    }
    return make_table($rb);
}

function msqmerge_menu($p, $o, $rid)
{
    $p = $p ? $p : msqmerge_default();
    $ret = input(1, 'inp', $p, '') . ' ';
    $ret .= lj('', $rid . '_plug__2_msqmerge_msqmerge*j___inp', picto('reload')) . ' ';
    return $ret;
}

function pane_base($url, $suj, $frm, $day, $img, $msg, $alx)
{
    static $id;
    $id++;
    //$msg=ereg_replace('width='."^[_a-zA-Z0-9.]+$","",$msg);//([[:digit:]]*)
    $ara = array("<![CDATA[", "]]>");
    $suj = str_replace($ara, " ", $suj);
    $url = str_replace($ara, " ", $url);
    $msg = str_replace($ara, " ", $msg);
    if ($img != "") {
        $gmi = '<img src="' . $img . '" class="imgl" border="0" height="72">';
    }
    $id_art = recognize_article($url, clean_title($suj), $alx);
    //already_exists
    if ($id_art) {
        $opt .= popart($id_art);
    } elseif ($_SESSION["USE"] == $_SESSION["qb"] or $_SESSION["auth"] > 3) {
        $purl = ajx($url, '');
        $opt .= ljb('txtx', 'SaveJ', 'popup_addArt___' . $purl . '_1', "save") . ' ';
        //$opt.=ljb('txtbox','SaveIf',$purl,'save').' ';
        $opt .= btd('btc' . $id, lj('txtx', 'btc' . $id . '_batch__xd_' . $purl . '_p', '+')) . ' ';
        $opt .= ljb('txtx', 'Close', 'art' . $id, 'x');
    }
    $panout = array('sty' => 'tab', 'id' => $id, 'suj' => $suj, 'date' => $day, 'tag' => " ", 'opt' => $opt, 'thumb' => $gmi, 'msg' => $msg, 'url' => $url);
    $ret = template_build(template_rss(), $panout);
    return divd('article', $ret);
}

function plug_keyboard($id, $o)
{
    if (!$id) {
        $id = 'kbv';
    }
    $ret = lj('', 'popup_plup___keyboard_kb*j_' . $id, picto('i'));
    return $ret;
}

function plug_reader($d)
{
    //$ret=input(1,'furl',$d?$d:'Url','');
    $ret = autoclic('furl', 'Url', '44', '1000" id="furl', '');
    $ret .= lj('txtbox', 'ifru_plug___reader_readerurl___furl', "►");
    $ret .= divd('ifru', '');
    return $ret;
}

function model_menu($p, $o, $rid)
{
    $ret = select_j('inp', 'pfunc', '', 'model/model_r', '', '2');
    //$ret.=togbub('plug','model_model*r',btn('popbt','select...'));
    $ret .= inp('inp', $p) . ' ';
    $ret .= lj('', $rid . '_plug__2_model_model*j___inp', picto('reload')) . ' ';
    return $ret;
}

function plug_ssh($p, $o)
{
    $rid = 'plg' . randid();
    $ret .= input(1, 'ssh', 'service proftpd restart');
    $ret .= input('password', 'ssb', '****', '', '', '4');
    $ret .= lj('', $rid . '_plug__xd_ssh_ssh*j___ssh|ssb', picto('reload')) . ' ';
    return $ret . divd($rid, '');
}

function plug_mysqm($p, $o)
{
    $p = $p ? $p : db;
    $ret .= input(1, 'inp', $p, '') . ' ';
    $ret .= lj('', 'mqm_plug__2_mysqm_mq*tables___inp', picto('reload')) . ' ';
    //$ret.=msqlink('',ses('qb').'_msqm').' ';
    return $ret . divd('mqm', mq_tables($p, $o));
}

 static function menu($p, $o, $rid)
 {
     $ret = inp('inp', $p) . ' ';
     $ret .= lj('', $rid . '_app__2_model_build___inp', picto('reload')) . ' ';
     //$cols='ib,val,to';//create table, name cols
     //$ret.=lj('','popup_plupin___msqedit_model*1_'.$cols,picto('edit'));
     return $ret;
 }

function msqedit($p, $o)
{
    $bt = lj('', 'popup_plup___msqedit_msqdt*add_' . ajx($p) . '_' . $o, pictxt('add')) . ' ';
    $bt .= lj('', 'editmsql_plug__15_msqedit_msqdt*build_' . ajx($p) . '_' . $o, pictxt('refresh')) . ' ';
    //$bt.=lj('txtx','editmsql_plug___msqedit_msqdt*herit*overmenus_'.ajx($p),'herit overmenus');
    $bt .= msqlink('', ses('qb') . '_' . $p);
    $_SESSION['popm'] = $bt;
    return $bt . divd('editmsql', msqdt_build($p, $o));
}

function del_com($p, $o)
{
    $rid = 'plg' . randid();
    $id = 'del' . $o;
    $ret .= inp('inp' . $o, $p ? $p : $o, atz(44)) . ' ';
    $ret .= lj('popsav', $rid . '_plug___del_delj_' . $o . '__inp' . $o, 'delete') . ' ';
    $ret .= btd($rid, '') . br();
    return $ret;
}

function plug_arts($p, $o)
{
    $rid = 'plg' . randid();
    Head::add('csslink', '/css/' . ses('qb') . '_design_' . ses('prmd'));
    $p = $p ? $p : 'nbdays=2&preview=auto';
    //priority=>1&priority=<4
    $ret .= input(1, 'params', $p, '', 30) . ' ';
    $ret .= lj('', $rid . '_plug__3_arts_arts*j__nl_params', picto('reload')) . ' ';
    return divd('page', $ret . divd($rid, divd('content', arts_j($p, '', ''))));
}

function plug_umnb($p, $o)
{
    $rid = 'plg' . randid();
    $j = $rid . '_plug__2_umnb_umnb*j__' . $rid . '_inp';
    $ret .= input(1, 'inp', $p, '') . ' ';
    $ret .= lj('', $j, picto('reload')) . ' ';
    //$ret.=lka('/plug/umnb/'.($p-1),picto('previous')).' ';
    //$ret.=lka('/plug/umnb/'.($p+1),picto('next')).' ';
    return $ret . divd($rid, umnb_j($p, $rid));
}

function umwords_menu($p, $o, $rid)
{
    $ratio = 50;
    $n = sql('count(id)', 'qda', 'v', 'nod="ummo"');
    $n = ceil($n / $ratio);
    for ($i = 0; $i < $n; $i++) {
        $ret .= lj('', $rid . '_plug__3_umwords_umwords*build*liaisons_' . $i, $i) . ' ';
    }
    return divc('nbp', $ret);
}

function plug_imtx($p, $o)
{
    $rid = 'plg' . randid();
    ses('out', '/plug/_data/imtx.png');
    $j = $rid . '_plug__2_imtx_imt*j_' . $w . '_' . $h . '_txtarec';
    $sj = 'SaveJ(\'' . $j . '\')';
    $ret .= txarea('txtarec', $p, 44, 14, atc('console') . atb('onkeyup', $sj) . atb('onclick', $sj));
    $ret .= lj('', $j, picto('reload')) . ' ';
    return $ret . divd($rid, image(root() . ses('out')));
}