<?php
$param1=$param1+0;
if ($param1<1) {$param1='';include($buildpath.'structure.php');exit;}
for ($i=1;($i<sizeof($page)&&!((trim($page[$i])=='</p></card></wml>')));$i++);
if ($param1>=$i) {$param1='';include($buildpath.'structure.php');exit;}
$j=$i=$param1;
if ($param2=='edit') {include($buildpath.'edit.php');exit;}
if ($param2=='overwrite') {include($buildpath.'overwrite.php');exit;}
if ($param2=='insert') {include($buildpath.'insert.php');exit;}
if ($param2=='delete') {include($buildpath.'delelement.php');exit;}
$head2=$head.$meta_nostore.cyr2utf('<card id="main" title="Редактировать">'.
'<do name="m" type="options" label="Страница"><go href="?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/"/></do><p>'.
'<b>'.$editfile.'.wml</b>');
$j=$i=$param1;
$str=trim($page[$i]);
$code=str_replace('$','$$',stripslashes(htmlspecialchars($str)));
$stra=explode(' ',$str);
if (substr($str,-5)=='<br/>') {$br='<br/>С переносом';$str=substr($str,0,-5);} else $br='';
switch ($stra[0])
{
case '<!--':
$param1=$param2=$param3='';
include($buildpath.'structure.php');
case '<card':
$stra=explode('" title="',$str);
$stra=explode('"',$stra[1]);
print $head2.cyr2utf('<br/><a href="#code">Заголовок</a>: ').$stra[0];
$stra=explode('" ontimer="',$str);
$stra=explode('"',$stra[1]);
if ($stra[0]!='') print cyr2utf('<br/>+ переадресация');
print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>');
print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/softkey">Вставить кнопку</a>');
break;
case '<do':
$stra=explode('label="',$str);
$stra=explode('"',$stra[1]);
$caption=$stra[0];
$stra=explode('href="',$str);
$stra=explode('"',$stra[1]);
$link_=$stra[0];
print $head2.cyr2utf('<br/><a href="#code">Soft-кнопка</a>:<br/>URL: ').$link_.cyr2utf('<br/>Подпись: ').$caption.cyr2utf(''.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/softkey">Вставить кнопку</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
break;
case '<br/>':
print $head2.cyr2utf('<br/><a href="#code">Переход на новую строку</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
break;
case '<p':
$i++;
case '</p><p':
print $head2.'<br/>';
$stra=explode('align="',$str);
$stra=explode('"',$stra[1]);
$algn=$stra[0];
$stra=explode('mode="',$str);
$stra=explode('"',$stra[1]);
$wrp=$stra[0];
if ($algn=='center') print cyr2utf('<a href="#code">Выравнивание</a>: по центру');
elseif ($algn=='right') print cyr2utf('<a href="#code">Выравнивание</a>: вправо');
else print cyr2utf('<a href="#code">Выравнивание</a>: влево');
if ($wrp=='nowrap') print cyr2utf(', <br/>неразрывные строки');
print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>');
if ($j==$i) print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>');
print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>');
if ($j==$i) print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
break;
case '<a':
$stra=explode('">',$str);
$strb=explode(' ',$stra[1]);
if ($strb[0]=='<img')
{
$stra=explode('href="',$str);
$stra=explode('"',$stra[1]);
$link_=$stra[0];
$stra=explode('<img src="',$str);
$stra=explode('"',$stra[1]);
$imgurl=$stra[0];
$stra=explode(' alt="',$str);
$stra=explode('"',$stra[1]);
$alttext=$stra[0];
print $head2.cyr2utf('<br/><a href="#code">Баннер</a>:<br/>URL ссылки: ').$link_.cyr2utf('<br/>URL рисунка: ').$imgurl.cyr2utf('<br/>Подпись: ').$alttext.cyr2utf(''.
$br.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
}
else
{
$stra=explode('href="',$str);
$stra=explode('"',$stra[1]);
$link_=$stra[0];
$stra=explode('">',$str);
$stra=explode('</a>',$stra[1]);
$caption=$stra[0];
print $head2.cyr2utf('<br/><a href="#code">Ссылка</a>:<br/>URL: ').$link_.cyr2utf('<br/>Подпись: ').$caption.cyr2utf(''.
$br.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
}
break;
case '<img':
$stra=explode('" alt="',$str);
$stra=explode('"',$stra[1]);
print $head2.cyr2utf('<br/><a href="#code">Картинка</a>: "').$stra[0].cyr2utf('"'.
$br.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
break;
case '<input':
$stra=explode('title="',$str);
$stra=explode('"',$stra[1]);
$caption=$stra[0];
$stra=explode('name="',$str);
$stra=explode('"',$stra[1]);
print $head2.cyr2utf('<br/><a href="#code">Ввод</a>: ').$stra[0].cyr2utf('<br/>Подпись: "').$caption.cyr2utf('"'.$br.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
break;
case '<anchor':
$stra=explode('href="',$str);
$stra=explode('"',$stra[1]);
$link_=$stra[0];
$stra=explode('<anchor >',$str);
$stra=explode('<',$stra[1]);
$caption=$stra[0];
print $head2.cyr2utf('<br/><a href="#code">Ссылка+</a>:<br/>URL: ').$link_.cyr2utf('<br/>Подпись: "').$caption.cyr2utf('"'.$br.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
break;
case '<!--var':
$str=explode('|',$str);
print $head2.cyr2utf('<br/><a href="#code">Переменная</a>:<br/>Имя: ').$str[1].cyr2utf('<br/>Значение: "').$str[2].cyr2utf('"'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
$code=cyr2utf('Код данного элемента встраивается в код элемента "Ссылка+".');
break;
case '<!--r':
$str=substr($str,9);
$code=str_replace('$','$$',htmlspecialchars($str));
if (strlen($str)>13) { $str=substr($str, 0, 10); $dot='...'; }
else $dot='';
$str=htmlspecialchars($str);
print $head2.cyr2utf('<br/><a href="#code">Код</a>:<br/> ').$str.$dot.cyr2utf(''.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
break;
break;
default :
print $head2.cyr2utf('<br/><a href="#code">Текст</a>:');
$atr='';
if (strpos(' '.$str,'<i>')) $atr.='наклонный, ';
if (strpos(' '.$str,'<u>')) $atr.='подчеркнутый, ';
if (strpos(' '.$str,'<b>')) $atr.='полужирный, ';
if (strpos(' '.$str,'<big>')) $atr.='крупный.';
elseif (strpos(' '.$str,'<small>')) $atr.='мелкий.';
else $atr.='обычный.';
$str=str_replace('<i>','',$str);$str=str_replace('</i>','',$str);
$str=str_replace('<u>','',$str);$str=str_replace('</u>','',$str);
$str=str_replace('<b>','',$str);$str=str_replace('</b>','',$str);
$str=str_replace('<big>','',$str);$str=str_replace('</big>','',$str);
$str=str_replace('<small>','',$str);$str=str_replace('</small>','',$str);
print cyr2utf('<br/>Атрибуты: '.$atr.
'<br/>Текст: [').$str.cyr2utf(']'.
$br.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
break;
}
print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'">Отмена</a>');
print '</p></card>';
print cyr2utf('<card id="code" title="Код элемента"><p><b><small>').$code.cyr2utf('</small></b> <br/> <br/> <a href="#main">Назад</a></p></card></wml>');
exit;
?>