");
$pre_id ++;
}
else
array_push($result, "");
$line = "";
if (!$_pre) $_pre_headform = $headform[$_cnt-1];
$_pre ++;
continue;
}
if ($_pre)
$c_pre_line ++;
$comment_out = (isset($comment_out[1]))? $comment_out[1] : "";
// 行頭書式かどうかの判定
$line_head = substr($line,0,1);
if
(
!$_pre &&
(
$line_head == ' ' ||
$line_head == ':' ||
$line_head == '>' ||
$line_head == '-' ||
$line_head == '+' ||
$line_head == '|' ||
$line_head == '*' ||
$line_head == '#' ||
$comment_out != ''
)
)
{
if($headform[$_cnt-1] == '' && $_p){
array_push($result, "");
$_p = FALSE;
}
if($line_head != '>' && $_bq){
array_push($result, "");
$_bq = FALSE;
}
if(preg_match("/^\#([^\(]+)(.*)$/",$line,$out)){
if(exist_plugin_convert($out[1],$no_plugins))
{
$result = array_merge($result,$saved); $saved = array();
if($out[2]) {
$_plugin = preg_replace("/^\#([^\(]+)\((.*)\)$/ex","do_plugin_convert('$1','$2')",$line);
} else {
$_plugin = preg_replace("/^\#([^\(]+)$/ex","do_plugin_convert('$1','$2')",$line);
}
array_push($result,"$_plugin");
} else {
array_push($result, htmlspecialchars($line));
}
}
else if(preg_match("/^(\*{1,6})(.*)/",$line,$out))
{
$result = array_merge($result,$saved); $saved = array();
$headform[$_cnt] = $out[1];
$str = $out[2];
$_fh_id = "";
$_match = array();
if (preg_match("/(.*)\[#([A-Za-z][\w-]+)\](.*)/",$str,$_match))
{
$str = $_match[1].$_match[3];
$_fh_id = $_match[2];
}
//$_c_text = trim(strip_tags(preg_replace("/]+>\?<\/a>/","",make_line_rules(inline($str,TRUE)))));
$_c_text = trim(strip_tags(preg_replace("/".preg_quote("$_symbol_noexists","/")."/","",make_line_rules(inline($str,TRUE)))));
// 用
if (!$h_excerpt)
{
$h_excerpt = $_c_text;
}
$level = strlen($out[1]);
// fixed_heading
$_fh_text = ($fixed_heading_anchor && $_fh_id)?
"".'<a class="anchor_super" id="'.$_fh_id.'" title="'.$_fh_id.'" href="#'.$_fh_id.'">'.$_symbol_anchor.'</a>'.""
:'';
$str = inline($str);
///// ParaeEdit /////
$_tag = "<h$level><a name=\"ct{$pgid}_{$content_id_local}_{$content_count}\"></a>{$str}{$_fh_text} {$top_link}</h$level>";
if ($content_id_local == 1 && check_editable($vars['page'],FALSE,FALSE)) {
$para_num = $content_count + 1;
$para_link = "$script?cmd=edit&id=$para_num&page=" . rawurlencode($vars[page]);
$para_link = "".sprintf(_EDIT_LINK, $para_link)."";
$_replaced = _PARAEDIT_LINK_POS;
eval(" \$_replaced = \"$_replaced\"; ");
$_tag = preg_replace("/(<h\d.*?>)(.*)(<\/h\d>)/", $_replaced, $_tag);
}
array_push($result, $_tag);
///// ParaeEdit /////
$_c_text = ($_c_text)? $_c_text : $content_id_local."_".$content_count;
$arycontents[] = str_repeat("-",$level)."<a href=\"#ct{$pgid}_{$content_id_local}_{$content_count}\">".$_c_text."</a>\n";
$content_count++;
}
else if(preg_match("/^(-+)(.*)/",$line,$out))
{
$headform[$_cnt] = $out[1];
if($out[1]=="----" && (preg_match("/^\d+%?$/",$out[2]) || !$out[2]))
{
$result = array_merge($result,$saved); $saved = array();
$hr_tmp = $hr;
if ($out[2]) $hr_tmp = ereg_replace("(<.*)(>)","\\1 width=".htmlspecialchars($out[2])."\\2",$hr_tmp);
array_push($result, $hr_tmp);
}
else
{
list_push($result,$saved,'ul', strlen($out[1]));
array_push($result, '<li>'.inline($out[2]));
}
}
else if(preg_match("/^(\++)(.*)/",$line,$out))
{
$headform[$_cnt] = $out[1];
list_push($result,$saved,'ol', strlen($out[1]));
array_push($result, '<li>'.inline($out[2]));
}
//else if (preg_match("/^:([^:]+):(.*)/",$line,$out))
else if (preg_match("/^:((?:\[\[.*]]|(?::\/\/|[^:\|])*))(?::|\|)(.*)/",$line,$out))
{
$headform[$_cnt] = ':'.$out[1].':';
back_push($result,$saved,'dl', 1);
array_push($result, '<dt>' . inline($out[1]) . '</dt>', '<dd>' . inline($out[2]) . '</dd>');
}
else if(preg_match("/^(>{1,3})(.*)/",$line,$out))
{
$headform[$_cnt] = $out[1];
back_push($result,$saved,'blockquote', strlen($out[1]));
// ここのあたりで自前でback_pushかけてる感じ。無茶苦茶…
if($headform[$_cnt-1] != $headform[$_cnt] ) {
if(!$_bq) {
array_push($result, "<p class=\"quotation\">");
$_bq = TRUE;
}
else if(substr($headform[$_cnt-1],0,1) == '>'){
$_level_diff = abs( strlen($out[1]) - strlen($headform[$_cnt-1]) );
if( $_level_diff == 1 ){
$i = array_pop($result);
array_push($result, "</p>");
array_push($result,$i);
array_push($result, "<p class=\"quotation\">");
$_bq = TRUE;
} else {
$i = array();
$i[] = array_pop($result);
$i[] = array_pop($result);
array_push($result, "</p>");
$result = array_merge($result,$i);
array_push($result, "<p class=\"quotation\">");
$_bq = TRUE;
}
}
}
array_push($result, ltrim(inline($out[2])));
}
else if(preg_match("/^([ \t]+.*)/",$line,$out))
{
$headform[$_cnt] = ' ';
back_push($result,$saved,'pre', 1);
array_push($result, htmlspecialchars($out[1],ENT_NOQUOTES));
}
else if(preg_match("/^\|(.+)\|(c|h)?$/",$line,$out))
{
$headform[$_cnt] = '|';
$arytable = table_inc_add(explode("|",$out[1]));
//1行目行末が c なら書式設定 拡張書式 by nao-pon
if ((!$table) && ($out[2] == "c")) {
//$table_around = "<br clear=all /><br />";
$table_around = "<div style=\"clear:both;\"></div>";
// 回り込み指定
if (preg_match("/AROUND/i",$out[1])) $table_around = "";
// ボーダー指定
$reg = array();
if (preg_match("/B:([0-9]+),?([0-9]*)(one|two|boko|deko|in|out|dash|dott)?/i",$out[1],$reg)) {
if (preg_match("/one/i",$reg[3])) $border_type = "solid";
else if (preg_match("/two/i",$reg[3])) $border_type = "double";
else if (preg_match("/boko/i",$reg[3])) $border_type = "groove";
else if (preg_match("/deko/i",$reg[3])) $border_type = "ridge";
else if (preg_match("/in/i",$reg[3])) $border_type = "inset";
else if (preg_match("/out/i",$reg[3])) $border_type = "outset";
else if (preg_match("/dash/i",$reg[3])) $border_type = "dashed";
else if (preg_match("/dott/i",$reg[3])) $border_type = "dotted";
else $border_type = "outset";
//$table_style .= " border=\"".$reg[1]."\"";
if ($reg[1]==="0"){
$table_sheet .= "border:none;";
} else {
$table_sheet .= "border:".$border_type." ".$reg[1]."px;";
}
if ($reg[2]!=""){
$table_style .= " cellspacing=\"".$reg[2]."\"";
} else {
$table_style .= " cellspacing=\"1\"";
}
$out[1] = preg_replace("/B:([0-9]+),?([0-9]*)(one|two|boko|deko|in|out|dash|dott)?/i","",$out[1]);
} else {
$table_style .= " border=\"0\" cellspacing=\"1\"";
//$table_style .= " cellspacing=\"1\"";
//$table_sheet .= "border:none;";
}
// ボーダー色指定
if (preg_match("/BC:(#?[0-9abcdef]{6}?|$colors_reg|0)/i",$out[1],$reg)) {
$table_sheet .= "border-color:".$reg[1].";";
$out[1] = preg_replace("/BC:(#?[0-9abcdef]{6}?|$colors_reg)/i","",$out[1]);
}
// テーブル背景色指定
if (preg_match("/TC:(#?[0-9abcdef]{6}?|$colors_reg|0)/i",$out[1],$reg)) {
if ($reg[1]==="0") $reg[1]="transparent";
$table_sheet .= "background-color:".$reg[1].";";
$out[1] = preg_replace("/TC:(#?[0-9abcdef]{6}?|$colors_reg|0)(\(([^),]*)(,no|,one|,1)?\))/i","TC:$2",$out[1]);
$out[1] = preg_replace("/TC:(#?[0-9abcdef]{6}?|$colors_reg|0)/i","",$out[1]);
}
// テーブル背景画像指定
if (preg_match("/TC:\(([^),]*)(,once|,1)?\)/i",$out[1],$reg)) {
$reg[1] = str_replace("http","HTTP",$reg[1]);
$table_sheet .= "background-image: url(".$reg[1].");";
if ($reg[2]) $table_sheet .= "background-repeat: no-repeat;";
$out[1] = preg_replace("/TC:\(([^),]*)(,once|,1)?\)/i","",$out[1]);
}
// 配置・幅指定
if (preg_match("/T(LEFT|RIGHT)/i",$out[1],$reg)) {
$table_align = strtolower($reg[1]);
$table_style .= " align=\"".$table_align."\"";
$div_style = " style=\"text-align:".$table_align."\"";
if ($table_align == "left"){
$table_sheet .= "margin-left:{$_table_left_margin}px;margin-right:auto;";
} else {
$table_sheet .= "margin-left:auto;margin-right:{$_table_right_margin}px;";
}
}
if (preg_match("/T(CENTER)/i",$out[1],$reg)) {
$table_style .= " align=\"".strtolower($reg[1])."\"";
$div_style = " style=\"text-align:".strtolower($reg[1])."\"";
$table_sheet .= "margin-left:auto;margin-right:auto;";
$table_around = "";
}
if (preg_match("/T(LEFT|CENTER|RIGHT)?:([0-9]+(%|px)?)/i",$out[1],$reg)) {
//if (!strpos("%",$reg[2])) $reg[2] .= "px";
$table_sheet .= "width:".$reg[2].";";
}
$out[1] = preg_replace("/^(TLEFT|TCENTER|TRIGHT|T):([0-9]+(%|px)?)?/i","",$out[1]);
$arytable = explode("|",$out[1]);
$i = 0;
$td_width = $td_align = $td_valign = array();
foreach($arytable as $td){
$i++;
//echo "DEB:($i)$td<br />";
// セル規定文字色指定
$tmp = array();
if (preg_match("/FC:(#?[0-9abcdef]{6}?|$colors_reg|0)/i",$td,$tmp)) {
if ($tmp[1]==="0") $tmp[1]="transparent";
$td_fcolor[$i] = "color:".$tmp[1].";";
$td = preg_replace("/FC:(#?[0-9abcdef]{6}?|$colors_reg|0)(\(([^),]*)(,no|,one|,1)?\))/i","FC:$2",$td);
$td = preg_replace("/FC:(#?[0-9abcdef]{6}?|$colors_reg|0)/i","",$td);
}
// セル規定背景色指定
if (preg_match("/(?:SC|BC):(#?[0-9abcdef]{6}?|$colors_reg|0)/i",$td,$tmp)) {
if ($tmp[1]==="0") $tmp[1]="transparent";
$td_color[$i] = "background-color:".$tmp[1].";";
$td = preg_replace("/(?:SC|BC):(#?[0-9abcdef]{6}?|$colors_reg|0)(\(([^),]*)(,no|,one|,1)?\))/i","BC:$2",$td);
$td = preg_replace("/(?:SC|BC):(#?[0-9abcdef]{6}?|$colors_reg|0)/i","",$td);
}
// セル規定背景画指定
if (preg_match("/(?:SC|BC):\(([^),]*)(,once|,1)?\)/i",$td,$tmp)) {
$tmp[1] = str_replace("http","HTTP",$tmp[1]);
$td_color[$i] .= "background-image: url(".$tmp[1].");";
if ($tmp[2]) $td_color[$i] .= "background-repeat: no-repeat;";
$td = preg_replace("/(?:SC|BC):\(([^),]*)(,once|,1)?\)/i","",$td);
}
// セル規定文字揃え、幅指定
if (preg_match("/(LEFT|CENTER|RIGHT)?:(TOP|MIDDLE|BOTTOM)?(?::)?([0-9]+(%|px)?)?/i",$td,$tmp)) {
if ($tmp[3]) $td_width[$i] = "width:".$tmp[3].";";
if ($tmp[1]) $td_align[$i] = "text-align:".strtolower($tmp[1]).";";
if ($tmp[2]) $td_valign[$i] = "vertical-align:".strtolower($tmp[2]).";";
}
}
} else {
//$arytable = explode("|",$out[1]);
if(!$table)
{
if (!$table_style) $table_style = " border=\"0\" cellspacing=\"1\"";
$result = array_merge($result,$saved); $saved = array();
array_push($result,"<div class=\"ie5\" $div_style><table class=\"style_table\"$table_style style=\"$table_sheet\">");
$table = count($arytable);
}
if ($out[2] == "h"){
$td_name = "th";
} else {
$td_name = "td";
}
array_push($result,"<tr>");
$i = 0;
$_colspan = 1;
$style = "";
foreach($arytable as $td)
{
$i++;
if ($td == ">"){
$_colspan = $_colspan + 1;
} else {
// セル文字色指定
$tmp = array();
if (preg_match("/FC:(#?[0-9abcdef]{6}?|$colors_reg|0)/i",$td,$tmp)) {
if ($tmp[1]==="0") $tmp[1]="transparent";
$sell_sheet .= "color:".$tmp[1].";";
$td = preg_replace("/FC:(#?[0-9abcdef]{6}?|$colors_reg|0)(\(([^),]*)(,no|,one|,1)?\))/i","FC:$2",$td);
$td = preg_replace("/FC:(#?[0-9abcdef]{6}?|$colors_reg|0)/i","",$td);
} else {
if ($td_fcolor[$i]) $sell_sheet .= $td_fcolor[$i];
}
// セル背景色指定
if (preg_match("/(?:SC|BC):(#?[0-9abcdef]{6}?|$colors_reg|0)/i",$td,$tmp)) {
if ($tmp[1]==="0") $tmp[1]="transparent";
$sell_sheet .= "background-color:".$tmp[1].";";
$td = preg_replace("/(?:SC|BC):(#?[0-9abcdef]{6}?|$colors_reg|0)(\(([^),]*)(,no|,one|,1)?\))/i","BC:$2",$td);
$td = preg_replace("/(?:SC|BC):(#?[0-9abcdef]{6}?|$colors_reg|0)/i","",$td);
} else {
if ($td_color[$i]) $sell_sheet .= $td_color[$i];
}
// セル背景画指定
if (preg_match("/(?:SC|BC):\(([^),]*)(,once|,1)?\)/i",$td,$tmp)) {
$tmp[1] = str_replace("http","HTTP",$tmp[1]);
$sell_sheet .= "background-image: url(".$tmp[1].");";
if ($tmp[2]) $sell_sheet .= "background-repeat: no-repeat;";
$td = preg_replace("/(?:SC|BC):\(([^),]*)(,once|,1)?\)/i","",$td);
}
// セル内文字揃え指定
if (preg_match("/^(LEFT|CENTER|RIGHT)?(:)(TOP|MIDDLE|BOTTOM)?([^\r]*)$/i",$td,$tmp)) {
if ($tmp[1]) {
$sell_sheet .= "text-align:".strtolower($tmp[1]).";";
} else {
//規定値
if ($td_name == "td") $sell_sheet .= $td_align[$i];
}
if ($tmp[3]) {
$sell_sheet .= "vertical-align:".strtolower($tmp[3]).";";
} else {
//規定値
if ($td_name == "td") $sell_sheet .= $td_valign[$i];
}
$td = (!$tmp[1] && !$tmp[3])? $tmp[2].$tmp[4] : $tmp[4];
} else {
if ($td_name == "td") {
$sell_sheet .= $td_align[$i];
$sell_sheet .= $td_valign[$i];
}
}
$sell_sheet .= $td_width[$i];
if ($sell_sheet) $sell_sheet=" style=\"".$sell_sheet."\"";
if ($_colspan == 1){
array_push($result,"<$td_name class=\"style_$td_name\"$style$sell_sheet>");
} else {
array_push($result,"<$td_name class=\"style_$td_name\"$style colspan=\"$_colspan\"$sell_sheet>");
$_colspan = 1;
}
// テーブル内で書式有効化のため再帰処理する条件
// でも単純に再帰処理して問題ないかな？ by nao-pon
$td_head = substr($td,0,1);
if( $td_head == ' ' ||
$td_head == ':' ||
$td_head == '>' ||
$td_head == '-' ||
$td_head == '+' ||
$td_head == '|' ||
$td_head == '*' ||
$td_head == '#' ||
(ereg("___td_br___",$td)) //複数行は無条件
&&
(!preg_match("/#contents/",$td)) //除外
) {
$td_lines = ereg_replace("___td_br___","\n",$td);//this
$is_intable ++;
array_push($result,convert_html($td_lines,$is_intable));
$is_intable --;
} else {
array_push($result,ltrim(inline($td)));
}
//array_push($result,ltrim(inline($td)));
array_push($result,"</$td_name>");
$sell_sheet = "";
}
}
array_push($result,"</tr>");
}
}
else if(strlen($comment_out) != 0)
{
$headform[$_cnt] = '//';
# array_push($result," <!-- ".htmlspecialchars($comment_out)." -->");
}
}
else if($line == ">>>" && $_pre)
{
$_pre --;
$j_script = "";
if (!$_pre)
{
// font-size:12px; line-height:1.5; padding(上下合わせて)10px; で最適化
$c_pre_line = ($c_pre_line-1) * (12 * 1.5) + 10 + 2 ;
if ($c_pre_line > 420) $c_pre_line = 420;
array_splice ($result, array_search ( "<div style=\"\"><pre>", $result), 1, "<div style=\"height:".$c_pre_line."px;\" class=\"multi\"><pre id=\"code_area{$content_id}_{$pre_id}\" class=\"multi\">");
$c_pre_line = 0;
$j_script = "</div><script type=\"text/javascript\"><!--\nh_pukiwiki_make_copy_button('code_area".$content_id."_".$pre_id."');\n--></script>";
$headform[$_cnt] = $_pre_headform;
}
$_result = array_pop($result);
if ($_result == "</pre>")
array_push($result, "</pre></pre>".$j_script);
else
{
array_push($result, $_result);
array_push($result, "</pre>".$j_script);
}
}
else
{
$headform[$_cnt] = '';
if (!$_pre)
{
if($headform[$_cnt-1] != $headform[$_cnt]){
if(array_values($saved)){
if( $_bq ){
array_unshift($saved, "</p>");
$_bq = FALSE;
}
$i = array_pop($saved);
array_push($saved,$i);
$result = array_merge($result,$saved); $saved = array();
}
if( substr($line,0,1) == '' && !$_p){
array_push($result, "<p>");
$_p = TRUE;
}
else if( substr($line,0,1) != '' && $_p){
array_push($result, "</p>");
$_p = FALSE;
}
}
$tmp = array();
if (preg_match("/^(LEFT|CENTER|RIGHT):(.*)$/",$line,$tmp)) {
if ($_p)
array_push($result,"</p>");
array_push($result,'<div class="p_'.strtolower($tmp[1]).'">');
array_push($result,inline($tmp[2]));
array_push($result,"</div>");
$line = '';
$_p = FALSE;
}
if( substr($line,0,1) == '' && $_p){
$_tmp = array_pop($result);
if($_tmp == "<p>") {
$_tmp = '<p class="empty">';
}
array_push($result, $_tmp, "</p>");
$_p = FALSE;
}
else if( substr($line,0,1) != '' && !$_p && !$is_intable) {
array_push($result, "<p>");
$_p = TRUE;
}
else if( substr($line,0,1) == '' && !$_p && $is_intable){
$_tmp = array_pop($result);
if($_tmp != "</p>") {
array_push($result, $_tmp,"<p>");
$_p = TRUE;
}
else
array_push($result, $_tmp);
}
}
if ($_pre)
{
// ~\nで繋げた行を元に戻す
$line = str_replace("\t&br;\t","~\n",$line);
// | を戻す
$line = str_replace("|","|",$line);
$_result = array_pop($result);
if ($_result == "</pre>")
array_push($result, " </pre>".htmlspecialchars($line,ENT_NOQUOTES));
else
{
array_push($result, $_result);
array_push($result, " ".htmlspecialchars($line,ENT_NOQUOTES));
}
//array_push($result, " ".htmlspecialchars($line,ENT_NOQUOTES));
}
else
if( substr($line,0,1) != '' ) array_push($result, inline($line));
}
$_cnt++;
}
if ($_pre) array_push($result, str_repeat("</pre>",$_pre));
if($_p) array_push($result, "</p>");
if($_bq) {
array_push($result, "</p>");
}
if($table) array_push($result, "</table></div>");
$result_last = $result = array_merge($result,$saved); $saved = array();
if($content_count != 0)
{
$result = array();
$saved = array();
foreach($arycontents as $line)
{
if(preg_match("/^(-+)(.*)/",$line,$out))
{
list_push($result,$saved,'ul', strlen($out[1]));
array_push($result, '<li>'.$out[2]);
}
}
$result = array_merge($result,$saved); $saved = array();
$this->contents = "<div class=\"contents_list\"><a name=\"ct{$pgid}_$content_id_local\"></a>\n";
$this->contents .= join("\n",$result)."</div>";
if($strip_link_wall)
{
$this->contents = preg_replace("/\[\[([^\]:]+):(.+)\]\]/","$1",$this->contents);
$this->contents = preg_replace("/\[\[([^\]]+)\]\]/","$1",$this->contents);
}
}
unset ($result,$saved);//メモリ節約してみる
return $result_last;
}
}
//////////////////////////////////////////////
// インライン要素のパース
function inline($line,$remove = FALSE)
{
global $pwm_plugin_flg;
if ($remove)
{
$pwm_plugin_flg['system']['contents_convert'] = true;
$line = preg_replace("/\(\(((?:(?!\)\)).)*)\)\)/x","",$line);
}
$line = make_link($line);
$pwm_plugin_flg['system']['contents_convert'] = false;
return $line;
}
// $tagのタグを$levelレベルまで詰める。
function back_push(&$result,&$saved,$tag, $level)
{
while (count($saved) > $level) {
array_push($result, array_shift($saved));
}
if ($saved[0] != "</$tag>") {
$result = array_merge($result,$saved); $saved = array();
}
while (count($saved) < $level) {
array_unshift($saved, "</$tag>");
array_push($result, "<$tag>");
}
}
function list_push(&$result,&$saved,$tag,$level) {
global $_list_left_margin, $_list_margin, $_list_pad_str;
$cont = true;
$open = "<$tag%s>";
$close = "</li></$tag>";
while (count($saved) > $level or
(count($saved) > 0 and $saved[0] != $close)) {
array_push($result, array_shift($saved));
}
$margin = $level - count($saved);
while (count($saved) < ($level - 1)) {
array_unshift($saved, ''); //count($saved)を増やすためのdummy
}
if (count($saved) < $level) {
$cont = false;
array_unshift($saved, $close);
$left = $margin * $_list_margin;
if ($level == $margin) $left += $_list_left_margin;
$str = sprintf($_list_pad_str, $level, $left, $left);
array_push($result, sprintf($open, $str));
}
if ($cont)
array_push($result, '</li>');
}
//キーワード強調
function keyword_to_strong(&$str,$words=array())
{
if (!$words || !$str) return ;
$keys = array();
foreach ($words as $word)
{
$keys[$word] = strlen($word);
}
arsort($keys,SORT_NUMERIC);
$keys = get_search_words(array_keys($keys));
foreach ($keys as $key=>$pattern)
{
$s_key = htmlspecialchars($key);
$pattern = ($s_key{0} == '&') ?
"/(<[^>]*>)|($pattern)/" :
"/(<[^>]*>|&(?:#[0-9]+|#x[0-9a-f]+|[0-9a-zA-Z]+);)|($pattern)/";
$str = preg_replace_callback($pattern,
create_function('$arr',
'return $arr[1] ? $arr[1] : "<span class=\"pwm_keyword\">{$arr[2]}</span>";'),$str);
}
return ;
}
?>