function cbasic_exec($d, $p, $r, $o) { list($av, $ap, $c) = decompact_conn_b($d); //v§p:c if (strpos($av, ':') !== false) { $av = cbasic_exec($av, $p, $r, $o); } //iteration if ($o == 2) { $av = $av ? $av : $p; } //param on left (no §) //strpos($ap,'_PARAM')===false if (!is_array($av)) { $av = cbasic_vars($av, $p, $r); } if ($ap) { $ap = cbasic_vars($ap, $p, $r); } if ($o == 1) { echo $av . '$' . $ap . ':' . $c . br(); } return codeline($av, $ap, $c); }
function clpreview($v) { $r = decompact_conn_b($v); if ($r[0]) { $ret .= divc('txtx', btn('txtblc', 'value') . ' ' . $r[0]); } if ($r[1]) { $ret .= divc('txtx', btn('txtblc', 'option') . ' ' . $r[1]); } $ret .= divc('txtx', btn('txtblc', 'connector') . ' ' . $r[2]); return div(atc('txtbox') . ats('margin:4px;'), $ret); }