function subring($r, $ra, $rb, $rg, $subrg, $n, $max) { //echo $rg.':'.$subrg.'_'; $rc = spi_ring_b($subrg); if ($rc) { foreach ($rc as $k => $v) { $n++; if ($n <= 220) { list($x, $y) = split_r($v, 1); $x += 1; //$y+=1; //if($rg>3){$x+=12; $y+=(($rg-4)*8);} else //2_rows $y += ($rg - 1) * 10; //matrice_width $ra[$x][$y] = spi_atom($r[$n], $n, $max); } } } $rb[$rg] = $subrg; if ($n < $max) { list($rg, $subrg) = nextsubrg($rb, $rg, $subrg); list($ra, $n) = subring($r, $ra, $rb, $rg, $subrg, $n, $max); } return array($ra, $n); }
function see_conds($vl) { $sp = ''; $r = $_SESSION['mods'][$vl]; $cnd = $_SESSION['cond']; if ($r) { foreach ($r as $k => $v) { $ra[$v[3]] += 1; } foreach ($ra as $k => $v) { list($ka, $kb) = split_r($k, 3); if ($kb) { $kc = str_replace(array('cat', 'art'), '', $k); } else { $kc = $k; } if ($k) { $ret .= ljb($k == $cnd[0] || $k == $cnd[1] ? 'active' : '', 'SaveBb', 'modules_' . $vl . '__' . $k, $kc); } } if ($ret) { $all = ljb($cnd[0] ? '' : 'active', 'SaveBb', 'modules_' . $vl . '__all', nms(100)); return divc('nbp', $all . $ret); } } }
function see_conds($vl) { $sp = ''; $r = $_SESSION['mods'][$vl]; $cnd = $_SESSION['cond']; if ($r) { foreach ($r as $k => $v) { $ra[$v[3]] += 1; } //cat list foreach ($ra as $k => $v) { list($ka, $kb) = split_r($k, 3); if ($kb && ($_SESSION['line'][$kb] or is_numeric($kb))) { $kc = $kb; } else { $kc = $k; } if ($k == $cnd[0] . $cnd[1] or $ka == $cnd[0] && !$kb or $kb && $kb == $cnd[1]) { $css = 'active'; } else { $css = ''; } //as in define_modc_b() if ($k) { $ret .= ljb($css, 'SaveBb', 'modules_' . $vl . '__' . ajx($k), $kc); } } if ($ret) { $all = ljb($cnd[0] ? '' : 'active', 'SaveBb', 'modules_' . $vl . '__all', '-'); } return divc('nbp', $all . $ret); } }