<?
include_once("req.php");

#array_walk($_REQUEST,"format_string");   
#array_walk($_POST,"format_string");   
#array_walk($_GET,"format_string");   

include_once("config.php");
include_once("session_class.php");
include_once("persinfo_class.php");
error_reporting(E_ALL ^ E_NOTICE);

#update person set level=-1,id_step=0,stat_points=0,mast_points=0,osob_points=0 
#for ($i=1;$i<320;$i++) {
#echo $i;
#$myinfo =new Persinfo($i);
#db_use('query',"INSERT INTO thing (id_thing2,isgift,id_city,srok,maxsrok) VALUES (1,1,'".clean_var($id_cityborn)."',0,20);");
# $id_thing=mysql_insert_id();
# db_use('query',"INSERT INTO inv (id_person,id_thing) VALUES ('".$i."','".$id_thing."');");
#}
/*
delete from pers_har where id_person=58;
update person set id_step=0, level=-1, money=0, wins=0, loss=0, nich=0, vip=0, stat_points=0, mast_points=0, osob_points=0,exp=0 where id_person=58;

delete from pers_har where id_person=411;
update person set id_step=0, level=-1, money=0, stat_points=0, mast_points=0, osob_points=0 where id_person=411;
update person set money=930.358 where id_person=411;


# ОБНУЛЕНИЕ ТЕХ У КОГО ГЛЮК С УРОВНЕМ И СТАТАМИ
		$res=db_use('query',"select p . id_person , p.money, p . exp , level from person p left join exptable e on p . exp <e . need_exp and e . id_step =p . id_step where p.exp>0");
		unset($i);while ($i<mysql_num_rows($res)){
		$i++;$s=mysql_fetch_array($res);
		echo $s['id_person'];
		db_use('query',"delete from pers_har where id_person='".$s['id_person']."';");
		db_use('query',"update person set id_step=0, level=-1, money=0, stat_points=0, mast_points=0, osob_points=0 where id_person='".$s['id_person']."';");
		$inf=new persinfo($s['id_person']);
		db_use('query',"update person set money=".$s['money']." where id_person='".$s['id_person']."';");
		}

*/



session_start();
$session = new Sessions;

if(in_array(userip(),array('63.91.58.124','8.72.95.166'))) {
 $enter=1; $id=12;$session->id_person=$id;
}
if ($session->is_session(session_id())){
	$id=$session->id_person;$enter=1; 
} 
if ($enter) {

$myinfo =new Persinfo($id);
$myinfo->get_chat_params();
#if ($myinfo->id_person==279 && $myinfo->id_clan==24) {$myinfo->align=1.5;}
if ($myinfo->id_person==58 or $myinfo->id_person==12) {$myinfo->align=1.999;$mynazv='Ангел';}else{
if ((int)$myinfo->align==3) {$mynazv='Тарман';}
elseif ((int)$myinfo->align==1) {$mynazv='Паладин';}
else {$mynazv='Персонаж';}
}

$res=db_use('array',"select pal_access from align where align='".$myinfo->align."'");
$pal_abil=$res['pal_access'];
for ($i=0;$i<strlen($pal_abil);$i++) if ($pal_abil[$i]) $pal=1; 

if ($pal OR in_array($myinfo->id_person,$svyas) OR in_array($myinfo->id_person,$shmot) OR in_array($myinfo->id_person,$alhimics) OR (int)($myinfo->align)==1 OR $myinfo->align==3.99 OR $myinfo->align==3.81){}else{ header("Location: main.php"); die;}

echo"
<HTML><HEAD>
<link rel=stylesheet type=\"text/css\" href=\"../i/main.css\">
<meta content=\"text/html; charset=windows-1251\" http-equiv=Content-type>
<META Http-Equiv=Cache-Control Content=no-cache>
<meta http-equiv=PRAGMA content=NO-CACHE>
<META Http-Equiv=Expires Content=0>
<SCRIPT LANGUAGE=\"JavaScript\" SRC=\"../i/sl2.24.js\"></SCRIPT>
</HEAD>
<body leftmargin=5 topmargin=5 marginwidth=5 marginheight=5 bgcolor=#e2e0e0>";
if ($myinfo->id_person==12) {
if ($_REQUEST['viewshm']){
	$value=new thinginfo($_REQUEST['viewshm']);
	$harnames=getharnames();$cityname=getcitiesnames();

	echo "<!--Рюкзак--><TABLE WIDTH=100% CELLSPACING=1 CELLPADDING=2 BGCOLOR=A5A5A5><TR bgcolor=#".($i<0?"C7C7C7":"D5D5D5").">";
	printinfo($value,$myinfo,0,'','',($myinfo->money<$value->gos_price?"<FONT COLOR=RED>":"").$value->gos_price." кр. ".($value->ekr?'('.$value->ekr." екр)":""));
	echo "</table><hr>";
	die;
}
}
echo"
<SCRIPT src='../i/commoninf.js'></SCRIPT>
<p align=right><INPUT TYPE=button value=\"Вернуться\" onclick=\"top.returned()\"></p>
<div id=hint4 class=ahint></div>
<h3>
Мироздатель с нами, собрат <SCRIPT>drwfl(\"".$myinfo->name."\",".$myinfo->id_person.",\"".$myinfo->level."\",'".$myinfo->align."',\"".$myinfo->clanname."\")</SCRIPT></h3>
";
echo '<FONT style="FONT-SIZE: 10pt; COLOR: red"><B><div id="rezultat"></div></B></FONT>';

if (false){
}else{

if ($_REQUEST['zakon'] && $pal_abil[4]) {
?><H4>Прайс молчанок</H4>
<?	if ($myinfo->align>=1.1 && $myinfo->align<2) { 
		if (file_exists('~thepalprice.inc'))
		{	
			foreach(file('~thepalprice.inc') as $s) 
			{
					$zakon.=htmlspecialchars($s).'';
			}
		}
		else	
			print_err('Ошибка чтения прайса молчанок');
		if ($_REQUEST['edit'] && $pal_abil[31]) {
			if ($_REQUEST[saveprice]){
				$fp = fopen("~thepalprice.inc", 'w');
				@fwrite($fp, $_POST['palpricenew']); 
				fclose($fp);
				echo "Прайс сохранен<br />";
			}else{
			?> 
<form method=post action="pal.php?zakon=1&edit=1">
<textarea name="palpricenew" rows="30" cols="100">
<?
			echo $zakon;
?>
</textarea>
<input type="submit" name="saveprice" value="Сохранить" />
</form>
			<?
			die;
			}
		}else{
			echo nl2br($zakon);
			die;
		}
	}
}

echo ($pal_abil[4]?'<a href=pal.php?zakon=1>Прайс на молчанки</a> ':'');
if ($pal_abil[31]) 
{
	echo '<input type=button onclick="document.location.href=\'pal.php?zakon=1&edit=1\';" value="Изменить">';
}

if ($_REQUEST['zakon2'] && $pal_abil[4]) {
?><H4>Прайс хаоса/блока</H4>
<?	if ($pal_abil[4]) { 
		$zakon='';
		if (file_exists('~thepalprice_haosblock.inc'))
		{	
			foreach(file('~thepalprice_haosblock.inc') as $s) 
			{
					$zakon.=htmlspecialchars($s).'';
			}
		}
		else	
			print_err('Ошибка чтения прайса молчанок');
		if ($_REQUEST['edit'] && $pal_abil[31]) {
			if ($_REQUEST[saveprice]){
				$fp = fopen("~thepalprice_haosblock.inc", 'w');
				@fwrite($fp, $_POST['palpricenew']); 
				fclose($fp);
				echo "Прайс сохранен<br />";
			}else{
			?> 
<form method=post action="pal.php?zakon2=1&edit=1">
<textarea name="palpricenew" rows="30" cols="100">
<?
			echo $zakon;
?>
</textarea>
<input type="submit" name="saveprice" value="Сохранить" />
</form>
			<?
			die;
			}
		}else{
			echo nl2br($zakon);
			die;
		}
	}
}
echo (($pal_abil[4])?'<a href=pal.php?zakon2=1>Прайс на хаос/блок</a> ':'');

if ($pal_abil[31]) 
{
	echo '<input type=button onclick="document.location.href=\'pal.php?zakon2=1&edit=1\';" value="Изменить">';
}

if ($_REQUEST['zakon3'] && ($myinfo->align>=1.1 && $myinfo->align<2)) {
?><H4>Правила палов</H4>
<?	$zakon='';
	if (file_exists('~thepalrules.inc'))
	{	
		foreach(file('~thepalrules.inc') as $s) 
		{
				$zakon.=htmlspecialchars($s).'';
		}
	}
	else	
		print_err('Ошибка чтения правил палов');
	if ($_REQUEST['edit'] && $pal_abil[31]) {
		if ($_REQUEST[saveprice]){
			$fp = fopen("~thepalrules.inc", 'w');
			@fwrite($fp, $_POST['palpricenew']); 
			fclose($fp);
			echo "Правила сохранены<br />";
		}else{
		?> 
<form method=post action="pal.php?zakon3=1&edit=1">
<textarea name="palpricenew" rows="30" cols="100">
<?
		echo $zakon;
?>
</textarea>
<input type="submit" name="saveprice" value="Сохранить" />
</form>
		<?
		die;
		}
	}else{
		echo nl2br($zakon);
		die;
	}
}
echo (($myinfo->align>=1.1 && $myinfo->align<2)?'<a href=pal.php?zakon3=1>Правила паладинов</a> ':'');

if ($pal_abil[31]) 
{
	echo '<input type=button onclick="document.location.href=\'pal.php?zakon3=1&edit=1\';" value="Изменить">';
}

if ($myinfo->align>=1.1 && $myinfo->align<2) {
if ($_REQUEST['edit'] && $pal_abil[31] && $_REQUEST['zakon4']) {
?><H4>Пал-новости</H4>
<?		$zakon='';
		if (file_exists('~thepalnews.inc'))
		{	
			foreach(file('~thepalnews.inc') as $s) 
			{
					$zakon.=htmlspecialchars($s).'';
			}
		}
		else	
			print_err('Ошибка чтения новостей');
		if ($_REQUEST['edit'] && $pal_abil[31] && $_REQUEST['zakon4']) {
			if ($_REQUEST[saveprice]){
				$fp = fopen("~thepalnews.inc", 'w');
				@fwrite($fp, $_POST['palpricenew']); 
				fclose($fp);
				echo "Новости сохранены<br />";
			}else{
			?> 
<form method=post action="pal.php?zakon4=1&edit=1">
<textarea name="palpricenew" rows="30" cols="100">
<?
			echo $zakon;
?>
</textarea>
<input type="submit" name="saveprice" value="Сохранить" />
</form>
			<?
			die;
			}
		}else{
			echo nl2br($zakon).'<br />';
		}
	
}
}

if ($pal_abil[31]) 
{
	echo '<input type=button onclick="document.location.href=\'pal.php?zakon4=1&edit=1\';" value="Изменить новости">';
}

if (in_array($myinfo->id_person,$shmot)) {
	$pal_abil[0]='1';
	$pal_abil[2]='1';
	$pal_abil[3]='1';
}




if (  $pal_abil[22] OR $myinfo->align==1.999 OR in_array($myinfo->id_person,$svyas)) {
if ($_REQUEST['marry']) {
	if ($_REQUEST['setmarry']) {
		$res=db_use('array',"select p.id_person,p.sex,m.id_husband,m.id_wife,u.login from person p 
		left join users u on u.id_person=p.id_person 
		left join person_marry m on (p.sex=0 and m.id_husband=p.id_person)or (p.sex=1 and m.id_wife=p.id_person) where p.id_person='".$_REQUEST['id1']."'");
		if (!$res['id_person']) {echo "Нет такого персонажа id1<br />";} else {
			if ($res['id_husband']) { echo "Персонаж уже обвенчан<br />"; }else{
				if ($res['sex']<1) {$id_husband=$res['id_person'];$husband=$res['login'];} else {$id_wife=$res['id_person'];$wife=$res['login'];}
				$res=db_use('array',"select p.id_person,p.sex,m.id_husband,m.id_wife,u.login from person p 
				left join users u on u.id_person=p.id_person 
				left join person_marry m on (p.sex=0 and m.id_husband=p.id_person)or (p.sex=1 and m.id_wife=p.id_person) where p.id_person='".$_REQUEST['id2']."'");
				if (!$res['id_person']) {echo "Нет такого персонажа id2<br />";} else {				
				if ($res['id_husband']) { echo "Персонаж уже обвенчан<br />"; }else{
					if (($res['sex']<1 && $id_husband) or ($res['sex']==1 && $id_wife)) {
						echo "Лесбийские и прочие свадьбы не играем!!!<br />";$ok=false;
					}elseif ($res['sex']<1) {$id_husband=$res['id_person'];$husband=$res['login'];$ok=true;} 
					else {	$id_wife=$res['id_person'];$wife=$res['login'];$ok=true;}
					if ($ok) {
						db_use('query',"insert into person_marry (id_husband,id_wife,timest) values ('".$id_husband."','".$id_wife."','".time()."');");
						echo "Персонажи ".$husband." и ".$wife." обвенчаны!!!";
				$text="<img src=../i/i_marry.gif>Священник ".$myinfo->name." объявил ".$husband." и ".$wife." мужем и женой.";
				db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','','".$text."','','2')");
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_husband."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Женился на ".$wife."','5')");							
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_wife."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Вышла замуж за ".$husband."','5')");							
					}
				}
				}
			}
		}
	}else{
	?>
	<form method="post" action="pal.php?marry=1">
	id1 <input type=text name=id1 />
	id2 <input type=text name=id2 />
	<input type="submit" name="setmarry" value="Обвенчать" />
	</form>
	<?
	}
}else{
	echo "<a href=pal.php?marry=1>Поженить</a> ";
}
}

if ( $myinfo->align==1.999 OR in_array($myinfo->id_person,$uprclans)) {

if ($_REQUEST['showclans'] OR $_REQUEST['showclan']) {
if ($_REQUEST['showclan']) {
	echo "<h4>Персонажи клана ".$_REQUEST['showclan'].":</h4>";
	if ($_REQUEST['updateclan'] && $_REQUEST['id_clan'] && $_REQUEST['updateclan']) {
		if ($_REQUEST['glava']) {
			$res=db_use('query',"select cp.*,COALESCE(d.login,d.persname) as name from clans_pers cp left join drwfl d on d.id_person=cp.id_person where cp.id_clan='".$_REQUEST['id_clan']."' and cp.rightsmask like '1%' ");
			unset($i);while ($i<mysql_num_rows($res)) { 
				$i++;$s=mysql_fetch_array($res);
				db_use('query',"update clans_pers set rightsmask='0".substr($s['rightsmask'],1,100)."' where id_clan='".$_REQUEST['id_clan']."' and id_person='".$s['id_person']."'");
				echo "<font color=blue>Снято главенство с персонажа id=".$s['id_person']."</font><br />";
				$text="<img src=../i/klan/".$_REQUEST['showclan'].".gif>Управляющий ".$myinfo->name." снял главенство над кланом ".$_REQUEST['showclan']." с персонажа ".$s['name'].".";
				db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','','".$text."','','2')");
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$s['id_person']."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Снято главенство над кланом ".$_REQUEST['showclan']."','5')");	
			}
		}
		db_use('query',"update clans_pers set id_clan='".$_REQUEST['id_clan']."',rightsmask='".($_REQUEST['glava']?'1':'0').($_REQUEST['status']?'1':'0').($_REQUEST['priem']?'1':'0')."' where id_person='".$_REQUEST['updateclan']."'");
		$res=db_use('array',"select id_person from clans_pers where id_clan='".$_REQUEST['id_clan']."' and id_person='".$_REQUEST['updateclan']."'");
		if (!$res['id_person']) {
			db_use('query',"delete from clans_pers where id_person='".$_REQUEST['updateclan']."'");
			db_use('query',"insert into clans_pers (id_clan,id_person,rightsmask) values ('".$_REQUEST['id_clan']."','".$_REQUEST['updateclan']."','".($_REQUEST['glava']?'1':'0').($_REQUEST['status']?'1':'0').($_REQUEST['priem']?'1':'0')."');");
		}
		echo "<font color=green>Установлено: Права на клан(".$_REQUEST['id_clan'].") Персонажу id=".$_REQUEST['updateclan'].": ".($_REQUEST['glava']?'Глава ':'').($_REQUEST['status']?' Может изменять статус':'').($_REQUEST['priem']?' Может принимать/выгонять':'').".</font><br />";
		if ($_REQUEST['glava']) {
			$temp = new persinfo ($_REQUEST['updateclan']);
			$text="<img src=../i/klan/".$_REQUEST['showclan'].".gif>Управляющий ".$myinfo->name." назначил персонажа ".$temp->name." главой клана ".$_REQUEST['showclan'].".";
			db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','','".$text."','','2')");
			db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$_REQUEST['updateclan']."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Поставлен главой клана ".$_REQUEST['showclan']."','5')");
		}
	}
	echo "<table><tr><td><u>Клан</u></td><td><u>Персонаж</u></td><td><u>Звание</u></td><td></td><td><u>Глава</u></td><td><u>Изм статуса</u></td><td><u>Прием в клан</u></td></tr>";
	$res=db_use('query',"SELECT p. * ,p2.clanzvan, c.id_clan, cp.rightsmask
FROM clans c
LEFT JOIN drwfl p ON p.clanname = c.clanname
LEFT JOIN clans_pers cp ON cp.id_person = p.id_person and cp.id_clan=c.id_clan 
left join person p2 on p2.id_person=p.id_person
where p.clanname='".($_REQUEST['showclan'])."' order by c.id_clan");
unset($i);while ($i<mysql_num_rows($res)) { 
	$i++;$s=mysql_fetch_array($res);
	echo "<tr><td>".$s[id_clan].'. '.$s['clanname']."<td><SCRIPT>drwfl(\"".$s['login']."\",".$s['id_person'].",\"".$s['level']."\",'".$s['align']."',\"".$s['clanname']."\")</SCRIPT><td>".$s['clanzvan']."</td><td><form method=post action=pal.php?showclan=".$s['clanname']."&updateclan=".$s['id_person']."&id_clan=".$s['id_clan']."></td><td><input type=checkbox name=glava ".($s['rightsmask'][0]==1?'checked':'')."><td><input type=checkbox name=status ".($s['rightsmask'][1]==1?'checked':'')."></td><td><input type=checkbox name=priem ".($s['rightsmask'][2]==1?'checked':'')."></td><td><input type=submit value=\"Изменить\"></td><td></form></td></tr>";
}
echo"</table>";
	echo "<a href=pal.php?showclans=1>К списку кланов</a><br />";
}else{
	if ($_REQUEST['regclan']) {
		$ok=true;
		for ($i=0;$i<strlen($_REQUEST['clanname']);$i++) {
			if (strpos('~1234567890-_qwertyuiopasdfghjklzxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM',$_REQUEST['clanname'][$i])) {$st++;}
			#echo $i.' '.$st.'<br />';
		}
		if ($st!=strlen($_REQUEST['clanname'])) {$ok=false;}
		if (!$ok) {echo "<font color=red>Неверное название клана</font><br />";}else{
			if ($_REQUEST['align']!=3 && $_REQUEST['align']!=1 && $_REQUEST['align']!=7 && $_REQUEST['align']!=0) { 
			echo "<font color=red>Неверная склонность (хакеры блин)</font><br />";
			}else{
				if ($_REQUEST['align']==3) {$align=3;}
				if ($_REQUEST['align']==7) {$align=7;}
				if (!$_REQUEST['align']) {$align=0;}
				if ($_REQUEST['align']==1) {$align='1.001';}
				$res=db_use('array',"select * from person where id_person='".$_REQUEST['id_glav']."'");
				if ($res['id_clan'] OR (int)$res['align']==2 OR (int)$res['align']==1) {
				echo "<font color=red>Персонаж имеет недопустимую склонность или принадлежит клану</font><br />";
				}else{
					if (!$res['id_person']) {
					echo "<font color=red>Персонаж не найден</font><br />";
					}else{
					

				db_use('query',"insert into clans (clanname,clan_url,clanalign) values ('".$_REQUEST['clanname']."','".$_REQUEST['site']."','".$align."');");
				$id=mysql_insert_id();
				db_use('query',"delete from clans_pers where id_person='".$_REQUEST['id_glav']."';");
				db_use('query',"insert into clans_pers (id_person,id_clan,rightsmask) values('".$_REQUEST['id_glav']."','".$id."','1111111111111');");
				db_use('query',"update person set align='".$align."',id_clan='".$id."' where id_person='".$_REQUEST['id_glav']."';");
				echo "Успешно зарегистрирован клан";
			
		
					}#/reg
				} 
			} 
		}
	}else{
	echo "<h4>Персонажи кланов. Выберите клан:</h4>";
	$res=db_use('query',"select * from clans where id_clan>0 order by id_clan");
	unset($i);while ($i<mysql_num_rows($res)) { 
		$i++;$s=mysql_fetch_array($res);
		echo "<a href=pal.php?showclan=".$s['clanname'].">".$s[id_clan].'. '."<img src=../i/align".$s['clanalign'].".gif><img src=../i/klan/".$s['clanname'].".gif>".$s['clanname']."</a><br />";
	}
	echo "<h4>Зарегистрировать клан: http://bandy.antibk.org/ipb/index.php?showtopic=795</h4>";
	$maxrazmer=2000;$size=$maxrazmer;
	$size=($size>1024?($size>1024*1024?(((int)(($size/(1024*1024))*100)/100)).' Мб' :((int)($size/1024*100)/100).' Кб'):$size.' Б');
	echo "<form method=post action=pal.php?showclans=1&regclan=1>Название - слитно англ буквами<input type=text name=clanname> Склонность<select name=align><option value=3>Темный</OPTION><option value=1>Светлый</OPTION><option value=7>Нейтральный</OPTION><option value=0>Без склонности</OPTION></select> ID главы<input type=text name=id_glav>Сайт <input type=text name=site>

	<input type=submit value=\"Создать клан\"></form>";
	}
}
}else{
echo "<a href=pal.php?showclans=1>Кланы</a> ";
}

}

#if ($pal_abil[17]) { # Добавить шмот в магаз

echo "<hr>";

#if ($myinfo->id_person==411) {
#	$pal_abil='1011110111110011000111';
#}
/*

10111111111100110011
1 00001000000
1.5 Молчанки+запись в дело 0000110000
1.6 молчанки, запись в дело, наложение снятие хаоса, блока лог чата и IP 0000110111110011001
1.7 Молчанки+запись в дело+Хаос 000011001000001
1.9 Блок Хаос 000011011010001
1.91 000011011110001
1.92 111111011111001100
0 Наложить проклятие
1 Наложить/снять заклятие
2 Показать переводы кредитов/вещей
3 Показать лог действий модераторов
5 Полеты во сне и наяву :)
6 Голосование
7 Восстановление
-------------
1.92 - 6 - Редактор вещей - редактир вещей
1.99 - 10 - Верховный Паладин - 
1.5 - 2 - Золотой Паладин Солнечной Улыбки - запись в дело
*/
#$ips=array(0=>array(),1=>array());

#	$clubips=array('80.233.202.115','217.64.20.245','87.240.15.37','81.17.95.33','83.218.197.70','87.248.165.196');
if ($pal_abil[15]) {
echo '<table><tr><td><h4>Проверка IP:</h4><td><form method=post action=pal.php><td><input type=checkbox name=noblock id=ch11><td><label for=ch11>не в блоке</label><td>IP:<td><input type=text name=ip><td><input type=submit value="Поиск" name=checkip><td>CompID:<td><input type=text name=cook><td><input type=submit value="Поиск" name=checkcook><td>Ник:<td><input type=text name=nick><td><input type=submit value="Поиск" name=checknick><td></form></tr></table>';
if ($_REQUEST['checkip']) {
echo $_REQUEST['noblock'];
$steps=db_use('query',"select ls.*,u.login,p.level,p.id_person,p.align,c.clanname,p.blocked,n.id_person as id_person_kto, n.coment,n.type

from login_stat ls 
left join users u on u.id_user=ls.id_user 
left join person p on p.id_person=u.id_person 
left join clans c on c.id_clan=p.id_clan 

left join normal_ip n on ls.ip_login like CONCAT(n.ip,'%')

where ls.ip_login like '%".mysql_escape_string(trim($_REQUEST['ip']))."%' ".($_REQUEST['noblock']=='on'?"and p.blocked<1 ":'')."order by ls.login_time desc limit 1000");
echo "<table>";
unset($i);while ($i<mysql_num_rows($steps)) { 
	$i++;$s=mysql_fetch_array($steps);
	echo '<tr><td>'.(($s[id_person_kto]!=12 && $s[id_person_kto]!=$s[id_person] && $s[id_person_kto])?'('.$s[id_person_kto].')<font color=red>':'').(($s[type]==0 && $s[id_person_kto])?'(OK)<font color=green>':'').($s['blocked']?'<font color=gray>':'').$s['login_time'].' Входит "'.'<SCRIPT>drwfl("'.$s['login'].'",'.$s['id_person'].',"'.$s['level'].'","'.$s['align'].'","'.$s['clanname'].'");</SCRIPT>" '.$s['ip_login'].' '.($s['badpass']==1?'Неверный пароль':($s['badpass']==2?'Попытка входа с блокнутого IP':'')).($s[type]==1?'(IP Интернет клуба)':'').($s['blocked']?'</font>':'').' - '.$s[coment].(($s[id_person_kto]!=12 && $s[id_person_kto]==$s[id_person])?' [СОБСТВЕННЫЙ IP]':'').'<td> '.$s[cook].' <br>'.(($s[type]==0 && $s[id_person_kto])?'</font>':'').(($s[id_person_kto]!=12 && $s[id_person_kto]!=$s[id_person])?'</font>':'');
}
echo'</table>';
}
if ($_REQUEST['checkcook']) {
echo $_REQUEST['noblock'];
$steps=db_use('query',"select ls.*,u.login,p.level,p.id_person,p.align,c.clanname,p.blocked,n.id_person as id_person_kto, n.coment,n.type

from login_stat ls 
left join users u on u.id_user=ls.id_user 
left join person p on p.id_person=u.id_person 
left join clans c on c.id_clan=p.id_clan 

left join normal_ip n on ls.ip_login like CONCAT(n.ip,'%')

where ls.cook like '%".mysql_escape_string(trim($_REQUEST['cook']))."%' ".($_REQUEST['noblock']=='on'?"and p.blocked<1 ":'')."order by ls.login_time desc limit 1000");
echo "<table>";
unset($i);while ($i<mysql_num_rows($steps)) { 
	$i++;$s=mysql_fetch_array($steps);
	echo '<tr><td>'.(($s[id_person_kto]!=12 && $s[id_person_kto]!=$s[id_person] && $s[id_person_kto])?'('.$s[id_person_kto].')<font color=red>':'').(($s[type]==0 && $s[id_person_kto])?'(OK)<font color=green>':'').($s['blocked']?'<font color=gray>':'').$s['login_time'].' Входит "'.'<SCRIPT>drwfl("'.$s['login'].'",'.$s['id_person'].',"'.$s['level'].'","'.$s['align'].'","'.$s['clanname'].'");</SCRIPT>" '.$s['ip_login'].' '.($s['badpass']==1?'Неверный пароль':($s['badpass']==2?'Попытка входа с блокнутого IP':'')).($s[type]==1?'(IP Интернет клуба)':'').($s['blocked']?'</font>':'').' - '.$s[coment].(($s[id_person_kto]!=12 && $s[id_person_kto]==$s[id_person])?' [СОБСТВЕННЫЙ IP]':'').'<td> '.$s[cook].' <br>'.(($s[type]==0 && $s[id_person_kto])?'</font>':'').(($s[id_person_kto]!=12 && $s[id_person_kto]!=$s[id_person])?'</font>':'');
}
echo'</table>';
}
if ($_REQUEST['checknick']) {
$steps=db_use('query',"select ls.*,u.login,p.level,p.id_person,p.align,c.clanname,p.blocked ,
n.id_person as id_person_kto, n.coment,n.type from login_stat ls left join users u on u.id_user=ls.id_user 
left join person p on p.id_person=u.id_person 
left join clans c on c.id_clan=p.id_clan 
left join normal_ip n on ls.ip_login like CONCAT(n.ip,'%')
where u.login like '%".mysql_escape_string(trim($_REQUEST['nick']))."%' ".($_REQUEST['noblock']=='on'?"and p.blocked<1":'')." order by ls.login_time desc limit 1000");
echo "<table>";
unset($i);while ($i<mysql_num_rows($steps)) { 
	$i++;$s=mysql_fetch_array($steps);
	echo '<tr><td>'.(($s[id_person_kto]!=12 && $s[id_person_kto]!=$s[id_person] && $s[id_person_kto])?'('.$s[id_person_kto].')<font color=red>':'').(($s[type]==0 && $s[id_person_kto])?'(OK)<font color=green>':'').($s['blocked']?'<font color=gray>':'').$s['login_time'].' Входит "'.'<SCRIPT>drwfl("'.$s['login'].'",'.$s['id_person'].',"'.$s['level'].'","'.$s['align'].'","'.$s['clanname'].'");</SCRIPT>" '.$s['ip_login'].' '.($s['badpass']==1?'Неверный пароль':($s['badpass']==2?'Попытка входа с блокнутого IP':'')).($s[type]==1?'(IP Интернет клуба)':'').($s['blocked']?'</font>':'').' - '.$s[coment].(($s[id_person_kto]!=12 && $s[id_person_kto]==$s[id_person])?' [СОБСТВЕННЫЙ IP]':'').'<td> '.$s[cook].' <br>'.(($s[type]==0 && $s[id_person_kto])?'</font>':'').(($s[id_person_kto]!=12 && $s[id_person_kto]!=$s[id_person])?'</font>':'');
}
echo'</table>';
}

}
echo"<H4>Наложить/снять заклятие</H4>";

echo "<table border=0 width=100%><tr><td align=left>";
if ($pal_abil[4] or $myinfo->align==50) { # Наложение молчанки - действие
if ($_REQUEST['sleep']!='') {
$login=$_REQUEST['sleep'];
if($_REQUEST['type']=='15') {
$n=15*60;$t="15 минут";$molch=true;$pic='silence15';
}elseif ($_REQUEST['type']=='30') {
$n=30*60;$t="30 минут";$molch=true;$pic='silence30';
}elseif ($_REQUEST['type']=='1') {
$n=60*60;$t="1 час";$molch=true;$pic='silence60';
}elseif ($_REQUEST['type']=='3') {
$n=3*60*60;$t="3 часа";$molch=true;$pic='sleep';
}elseif ($_REQUEST['type']=='6') {
$n=6*60*60;$t="6 часов";$molch=true;$pic='sleep';
}elseif ($_REQUEST['type']=='12') {
$n=12*60*60;$t="12 часов";$molch=true;$pic='sleep';
}elseif ($_REQUEST['type']=='24') {
$n=24*60*60;$t="сутки";$molch=true;$pic='sleep';
}
}
if($molch){
		$res=db_use('array',"select id_person,align from person where persname='".mysql_escape_string($login)."' or id_person=(select id_person from users where login='".mysql_escape_string($login)."')");
		$id_person_x=$res['id_person'];
		if (!$id_person_x) {$mess='Персонаж не найден';} 
		elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
		else{
			$res=db_use('array',"select id_person from person_on where id_person='".$id_person_x."' and type=1;");
			if ($res['id_person']) { $mess='На персонаже уже лежит заклятие молчания'; } else {
				db_use('query',"insert into person_on (id_person,id_paladin,type,timestamp2) values('".$id_person_x."','".$myinfo->id_person."','1','".(time()+$n)."')");
				$mess="На персонажа ".$login." наложено заклятие молчания сроком ".$t.".";
				$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/items/'.$pic.'.gif WIDTH=40 HEIGHT=25 BORDER=0 ALT=""> '.$mynazv.' "'.$myinfo->name.'" наложил'.($myinfo->sex?'а':'').' заклятие молчания на "'.$login.'", сроком '.$t;
				db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','','".$text."','','2')");
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Молчанка на ".$t."','5')");
			}
		}
}
	echo"<IMG SRC=../i/items/sleep.gif WIDTH=40 HEIGHT=25 ALT=\"Наложить заклятие молчания\" onclick=\"findlogin('Заклятие молчания', 'pal.php', 'sleep', '',7,'</TD><TD><SELECT name=type><OPTION value=15>15 минут</OPTION><OPTION value=30>30 минут</OPTION><OPTION value=1>1 час</OPTION><OPTION value=3>3 часа</OPTION><OPTION value=6>6 часов</OPTION><OPTION value=12>12 часов</OPTION><OPTION VALUE=24>24 часа</OPTION></SELECT>')\" style=\"cursor:hand\">";
}
if ($pal_abil[7]) { # Снятие молчанки 
if ($_REQUEST['unsleep']!='') {
		$res=db_use('array',"select id_person,align from person where persname='".mysql_escape_string($_REQUEST['unsleep'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['unsleep'])."')");
		$id_person_x=$res['id_person'];
		if (!$id_person_x) {$mess='Персонаж не найден';} 
		elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
		else{
			$res=db_use('array',"select o.id_person,p.align,p2.align as hisalign from person_on o 
			left join person p on p.id_person=o.id_paladin 
			left join person p2 on p2.id_person=o.id_person 
			where o.id_person='".$id_person_x."' and o.type=1;");
			if (!$res['id_person']) { $mess='На персонаже нет заклятия молчания'; } elseif ((int)$res['align']==3 && (int)$res['hisalign']==1) {$mess='Нельзя снять молчанку наложенную тарманом на светлого';} else {
				db_use('query',"delete from person_on where id_person='".$id_person_x."' and type=1");
				$mess="C персонажа ".$_REQUEST['unsleep']." снято заклятие молчания.";
				$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/items/pal_button3.gif WIDTH=40 HEIGHT=25 BORDER=0 ALT=""> '.$mynazv.' "'.$myinfo->name.'" снял'.($myinfo->sex?'а':'').' заклятие молчания с "'.$_REQUEST['unsleep'].'"';
				db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','','".$text."','','2')");
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Снята молчанка','5')");
			}
		}
}
echo"<IMG SRC=../i/items/pal_button3.gif WIDTH=40 HEIGHT=25 ALT=\"Снять молчанку\" onclick=\"findlogin('Снять молчанку', 'pal.php', 'unsleep', '',7)\" style=\"cursor:hand\">
";
}


if ($pal_abil[26]) { # Наложение молчанки - действие
if ($_REQUEST['sleepf']!='') {
$login=$_REQUEST['sleepf'];
if($_REQUEST['type']=='15') {
$n=15*60;$t="15 минут";$molchf=true;$pic='pal_button2';
}elseif ($_REQUEST['type']=='30') {
$n=30*60;$t="30 минут";$molchf=true;$pic='pal_button2';
}elseif ($_REQUEST['type']=='1') {
$n=60*60;$t="1 час";$molchf=true;$pic='pal_button2';
}elseif ($_REQUEST['type']=='3') {
$n=3*60*60;$t="3 часа";$molchf=true;$pic='pal_button2';
}elseif ($_REQUEST['type']=='6') {
$n=6*60*60;$t="6 часов";$molchf=true;$pic='pal_button2';
}elseif ($_REQUEST['type']=='12') {
$n=12*60*60;$t="12 часов";$molchf=true;$pic='pal_button2';
}elseif ($_REQUEST['type']=='24') {
$n=24*60*60;$t="сутки";$molchf=true;$pic='pal_button2';
}elseif ($_REQUEST['type']=='100') {
$n=3*24*60*60;$t="3 дня";$molchf=true;$pic='pal_button2';
}elseif ($_REQUEST['type']=='200') {
$n=7*24*60*60;$t="неделя";$molchf=true;$pic='pal_button2';
}elseif ($_REQUEST['type']=='300') {
$n=30*24*60*60;$t="30 дней";$molchf=true;$pic='pal_button2';
}
}
if($molchf){
		$res=db_use('array',"select id_person,align from person where persname='".mysql_escape_string($login)."' or id_person=(select id_person from users where login='".mysql_escape_string($login)."')");
		$id_person_x=$res['id_person'];
		if (!$id_person_x) {$mess='Персонаж не найден';} 
		elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
		else{
			$res=db_use('array',"select id_person from person_on where id_person='".$id_person_x."' and type=4;");
			if ($res['id_person']) { $mess='На персонаже уже лежит заклятие форумного молчания'; } else {
				db_use('query',"insert into person_on (id_person,id_paladin,type,timestamp2) values('".$id_person_x."','".$myinfo->id_person."','4','".(time()+$n)."')");
				$mess="На персонажа ".$login." наложено заклятие форумного молчания сроком ".$t.".";
				$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/items/'.$pic.'.gif WIDTH=40 HEIGHT=25 BORDER=0 ALT=""> '.$mynazv.' "'.$myinfo->name.'" наложил'.($myinfo->sex?'а':'').' заклятие форумного молчания на "'.$login.'", сроком '.$t;
				db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','','".$text."','','2')");
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Форумная молчанка на ".$t."','5')");
			}
		}
}
	echo"<IMG SRC=../i/items/pal_button2.gif WIDTH=40 HEIGHT=25 ALT=\"Наложить заклятие форумного молчания\" onclick=\"findlogin('Заклятие форумного молчания', 'pal.php', 'sleepf', '',7,'</TD><TD><SELECT name=type><OPTION value=15>15 минут</OPTION><OPTION value=30>30 минут</OPTION><OPTION value=1>1 час</OPTION><OPTION value=3>3 часа</OPTION><OPTION value=6>6 часов</OPTION><OPTION value=12>12 часов</OPTION><OPTION VALUE=24>24 часа</OPTION><OPTION VALUE=100>3 дня</OPTION><OPTION VALUE=200>неделя</OPTION><OPTION VALUE=300>30 дней</OPTION></SELECT>')\" style=\"cursor:hand\">";
}
if ($pal_abil[26]) { # Снятие молчанки 
if ($_REQUEST['unsleepf']!='') {
		$res=db_use('array',"select id_person,align from person where persname='".mysql_escape_string($_REQUEST['unsleepf'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['unsleepf'])."')");
		$id_person_x=$res['id_person'];
		if (!$id_person_x) {$mess='Персонаж не найден';} 
		elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
		else{
			$res=db_use('array',"select o.id_person,p.align,p2.align as hisalign from person_on o 
			left join person p on p.id_person=o.id_paladin 
			left join person p2 on p2.id_person=o.id_person 
			where o.id_person='".$id_person_x."' and o.type=4;");
			if (!$res['id_person']) { $mess='На персонаже нет заклятия форумного молчания'; } elseif ((int)$res['align']==3 && (int)$res['hisalign']==1) {$mess='Нельзя снять форумную молчанку наложенную тарманом на светлого';} else {
				db_use('query',"delete from person_on where id_person='".$id_person_x."' and type=4");
				$mess="C персонажа ".$_REQUEST['unsleep']." снято заклятие форумного молчания.";
				$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/items/pal_button2.gif WIDTH=40 HEIGHT=25 BORDER=0 ALT=""> '.$mynazv.' "'.$myinfo->name.'" снял'.($myinfo->sex?'а':'').' заклятие форумного молчания с "'.$_REQUEST['unsleepf'].'"';
				db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','','".$text."','','2')");
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Снята форумная молчанка','5')");
			}
		}
}
echo"<IMG SRC=../i/items/pal_button2.gif WIDTH=40 HEIGHT=25 ALT=\"Снять форумную молчанку\" onclick=\"findlogin('Снять форумную молчанку', 'pal.php', 'unsleepf', '',7)\" style=\"cursor:hand\">
";
}

if ($pal_abil[8]) { # ХАОС
	if ($_REQUEST['chaos']!='') {
		if($_REQUEST['type']=='1') {
			$n=24*60*60;$t="одни сутки";$chaos=true;
		}elseif ($_REQUEST['type']=='2') {
			$n=2*24*60*60;$t="два дня";$chaos=true;
		}elseif ($_REQUEST['type']=='7') {
			$n=7*24*60*60;$t="неделя";$chaos=true;
		}elseif ($_REQUEST['type']=='14') {
			$n=14*24*60*60;$t="две недели";$chaos=true;
		}elseif ($_REQUEST['type']=='30') {
			$n=30*24*60*60;$t="один месяц";$chaos=true;
		}elseif ($_REQUEST['type']=='60') {
			$n=60*24*60*60;$t="два месяца";$chaos=true;
		}elseif ($_REQUEST['type']=='90') {
			$n=90*24*60*60;$t="сутки";$chaos=true;
		}elseif ($_REQUEST['type']=='-1') {
			$n=0;$t="бессрочно";$chaos=true;
		}
		if($chaos){
			$res=db_use('array',"select id_person,align from person where persname='".mysql_escape_string($_REQUEST['chaos'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['chaos'])."')");
			$id_person_x=$res['id_person'];
			if (!$id_person_x) {$mess='Персонаж не найден';} 
			elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
			else{
				$res=db_use('array',"select id_person,align from person where id_person='".$id_person_x."'");
				if ($res['id_person'] && (int)$res['align']==2) { $mess='Персонаж уже имеет склонность "Хаос"'; } 
				elseif ($res['id_person'] && $res['align']==3.99) {
					$mess='Нельзя наложить хаос на Тармана.';
				}else {
					db_use('query',"update person set last_legit_mark=0, last_legit_time=0,align=2,id_clan=0,unchaos_timestamp='".($n?(time()+$n):0)."' where id_person='".$id_person_x."'");
					db_use('query',"delete from clans_pers where id_person='".$id_person_x."'");
					$mess='Персонаж '.$_REQUEST['chaos'].' сослан в "Хаос"'.(!$n?'':' сроком').' '.$t.'.';
					$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/items/pal_button4.gif WIDTH=40 HEIGHT=25 BORDER=0 ALT=""> '.$mynazv.' "'.$myinfo->name.'" отправил'.($myinfo->sex?'а':'').' в хаос "'.$_REQUEST['chaos'].'"'.(!$n?'':' сроком').' '.$t.'.';
					db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','".mysql_escape_string($_REQUEST['chaos'])."','".$text."','','2')");
					db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Отправлен в хаос".(!$n?'':' сроком').' '.$t."','5')");
				}
			}
		}
	}
	echo"<IMG SRC=../i/items/pal_button4.gif WIDTH=40 HEIGHT=25 ALT=\"Отправить в Хаос\" onclick=\"findlogin('Отправить в Хаос', 'pal.php', 'chaos', '',7,'</TD><TD><SELECT name=type><OPTION value=1>сутки</OPTION><OPTION value=2>два дня</OPTION><OPTION value=7>неделя</OPTION><OPTION value=14>две недели</OPTION><OPTION value=30>месяц</OPTION><OPTION value=60>2 месяца</OPTION><OPTION VALUE=90>3 месяца</OPTION><OPTION VALUE=-1>бессрочно</OPTION></SELECT>')\" style=\"cursor:hand\">
";
}
if ($pal_abil[9]) { # Снятие Хаоса
	if ($_REQUEST['unchaos']!='') {
		$res=db_use('array',"select id_person from person where persname='".mysql_escape_string($_REQUEST['unchaos'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['unchaos'])."')");
		$id_person_x=$res['id_person'];
		if (!$id_person_x) {$mess='Персонаж не найден';} else{
			$res=db_use('array',"select id_person from person where id_person='".$id_person_x."' and align='2';");
			if (!$res['id_person']) { $mess='Персонаж не имеет склонность "Хаос"'; } else {
				db_use('query',"update person set align=0,unchaos_timestamp=NULL where id_person='".$id_person_x."'");
				$mess='С персонажа '.$_REQUEST['unchaos'].' снята склонность "Хаос".';
				$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/items/pal_button5.gif WIDTH=40 HEIGHT=25 BORDER=0 ALT=""> '.$mynazv.' "'.$myinfo->name.'" снял'.($myinfo->sex?'а':'').' склонность "Хаос" с персонажа "'.$_REQUEST['unchaos'].'"';
				db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','".mysql_escape_string($_REQUEST['unchaos'])."','".$text."','','2')");
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Снята склонность Хаос','5')");
			}
		}
	}
	echo"<IMG SRC=../i/items/pal_button5.gif WIDTH=40 HEIGHT=25 ALT=\"Снять Хаос\" onclick=\"findlogin('Снять Хаос', 'pal.php', 'unchaos', '',7)\" style=\"cursor:hand\">
";
}
if ($pal_abil[10]) { # Наложить заклятие смерти
	if ($_REQUEST['block']!='') {
		$res=db_use('array',"select id_person,align from person where persname='".mysql_escape_string($_REQUEST['block'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['block'])."')");
		$id_person_x=$res['id_person'];
		if (!$id_person_x) {$mess='Персонаж не найден';} 
		elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
		else{
			$res=db_use('array',"select id_person,vip,blocked from person where id_person='".$id_person_x."';");
			if ($res['blocked']) { $mess='Персонаж уже заблокирован'; } else {
				if ($res['vip']>0 && $myinfo->id_person!=12 && $myinfo->align!=1.99) { $mess='Персонаж VIP. Блок запрещен'; } else { 
					db_use('query',"update person set blocked=1 where id_person='".$id_person_x."'");
					$mess='На персонажа '.$_REQUEST['block'].' наложено заклинание смерти.';
					$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/items/pal_button6.gif WIDTH=40 HEIGHT=25 BORDER=0 ALT=""> '.$mynazv.' "'.$myinfo->name.'" наложил'.($myinfo->sex?'а':'').' заклинание смерти на персонажа "'.$_REQUEST['block'].'"';
					db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','".mysql_escape_string($_REQUEST['block'])."','".$text."','','2')");
					db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Отправлен в блок','5')");
				}
			}
			
		}
	}
	echo"<IMG SRC=../i/items/pal_button6.gif WIDTH=40 HEIGHT=25 ALT=\"Наложить заклятие смерти\" onclick=\"findlogin('Наложить заклятие смерти', 'pal.php', 'block', '',7)\" style=\"cursor:hand\">
";
}

if ($myinfo->id_person==12) { # IPPPPPPPPPPPP
	if ($_REQUEST['normalip']!='') {
		$res=db_use('array',"select * FROM normal_ip WHERE ip='".trim($_REQUEST[normalip])."'");
		if (!$res[ip]) {
			db_use('query',"insert into normal_ip (ip,id_person,type,tmst,coment) values ('".trim($_REQUEST[normalip])."','".$myinfo->id_person."',0,".time().",'".mysql_escape_string($_REQUEST[coment])."')");
		}else{
			db_use('query',"update normal_ip set coment='".mysql_escape_string($_REQUEST[coment])."',type=0,tmst='".time()."' WHERE ip='".trim($_REQUEST[normalip])."'");
		}
	}
	echo"<IMG SRC=../i/items/pal_buttono.gif WIDTH=40 HEIGHT=25 ALT=\"Нормальный IP\" onclick=\"findlogin('Нормальный IP', 'pal.php', 'normalip', '',7,'комент:<INPUT TYPE=text name=coment width=100>')\" style=\"cursor:hand\">
";
	if ($_REQUEST['clubip']!='') {
		$res=db_use('array',"select * FROM normal_ip WHERE ip='".trim($_REQUEST[clubip])."'");
		if (!$res[ip]) {
			db_use('query',"insert into normal_ip (ip,id_person,type,tmst,coment) values ('".trim($_REQUEST[clubip])."','".$myinfo->id_person."',1,".time().",'".mysql_escape_string($_REQUEST[coment])."')");
		}else{
			db_use('query',"update normal_ip set coment='".mysql_escape_string($_REQUEST[coment])."',type=1,tmst='".time()."' WHERE ip='".trim($_REQUEST[clubip])."'");
		}
		$mess='IP в списке.';
	}
	echo"<IMG SRC=../i/items/pal_buttonj.gif WIDTH=40 HEIGHT=25 ALT=\"IP Клуба\" onclick=\"findlogin('IP Клуба', 'pal.php', 'clubip', '',7,'комент:<INPUT TYPE=text name=coment width=100>')\" style=\"cursor:hand\">
";
	if ($_REQUEST['comentip']!='') {
		$res=db_use('array',"select * FROM normal_ip WHERE ip='".trim($_REQUEST[comentip])."'");
		if (!$res[ip]) {
			db_use('query',"insert into normal_ip (ip,id_person,type,tmst,coment) values ('".trim($_REQUEST[comentip])."','".$myinfo->id_person."',2,".time().",'".mysql_escape_string($_REQUEST[coment])."')");
		}else{
			db_use('query',"update normal_ip set coment='".mysql_escape_string($_REQUEST[coment])."',type=2,tmst='".time()."' WHERE ip='".trim($_REQUEST[comentip])."'");
		}
		$mess='IP в списке.';
	}
echo"<IMG SRC=../i/items/paper500.gif WIDTH=40 HEIGHT=25 ALT=\"Комент к айпи\" onclick=\"findlogin('Комент к айпи', 'pal.php?type=1', 'comentip', '',7,'комент:<INPUT TYPE=text name=coment width=100>')\" style=\"cursor:hand\">
";
	if ($_REQUEST['persip']!='') {
		$res1=db_use('array',"select * FROM person where id_person in (select id_person from users where login='".mysql_escape_string(trim($_REQUEST[persip]))."')");
		if (!$res1[id_person]) {$mess='не найден перс';}
		else{
			$res=db_use('array',"select * FROM normal_ip WHERE ip='".mysql_escape_string(trim($_REQUEST[ip]))."'");
			if (!$res[ip]) {
				db_use('query',"insert into normal_ip (ip,id_person,type,tmst,coment) values ('".mysql_escape_string(trim($_REQUEST[ip]))."','".$res1[id_person]."',2,".time().",'".mysql_escape_string($_REQUEST[coment])."')");
			}else{
				db_use('query',"update normal_ip set id_person='".$res1[id_person]."',type=2,tmst='".time()."' WHERE ip='".trim( $_REQUEST[ip] )."'");
			}
			$mess='IP в списке.';
		}
	}
echo"<IMG SRC=../i/items/pal_buttonp.gif WIDTH=40 HEIGHT=25 ALT=\"Принадлежность к персу\" onclick=\"findlogin('Принадлежность к персу - выбрать персонажа', 'pal.php?type=1', 'persip', '',7,'IP:<INPUT TYPE=text name=ip width=100>')\" style=\"cursor:hand\">
";
}
if ($pal_abil[11]) { # Снять заклятие смерти
	if ($_REQUEST['unblock']!='') {
		$res=db_use('array',"select id_person,align from person where persname='".mysql_escape_string($_REQUEST['unblock'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['unblock'])."')");
		$id_person_x=$res['id_person'];
		if (!$id_person_x) {$mess='Персонаж не найден';} 
		elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
		else{
			$res=db_use('array',"select id_person from person where id_person='".$id_person_x."' and blocked>0;");
			if (!$res['id_person']) { $mess='Персонаж не заблокирован'; } else {
				db_use('query',"update person set blocked=0 where id_person='".$id_person_x."'");
				$mess='С персонажа '.$_REQUEST['block'].' снято заклинание смерти.';
				$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/items/pal_button7.gif WIDTH=40 HEIGHT=25 BORDER=0 ALT=""> '.$mynazv.' "'.$myinfo->name.'" снял'.($myinfo->sex?'а':'').' заклинание смерти с персонажа "'.$_REQUEST['unblock'].'"';
				db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','".mysql_escape_string($_REQUEST['unblock'])."','".$text."','','2')");
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Разблокирован','5')");
			}
		}
	}
	echo"<IMG SRC=../i/items/pal_button7.gif WIDTH=40 HEIGHT=25 ALT=\"Снять заклятие смерти\" onclick=\"findlogin('Снять заклятие смерти', 'pal.php', 'unblock', '',7)\" style=\"cursor:hand\">
";
}

if ($pal_abil[32]) { # Удалить из базы
	if ($_REQUEST['delbase']!='') {
		$res=db_use('array',"select id_person from person where persname='".mysql_escape_string($_REQUEST['delbase'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['delbase'])."')");
		$id_person_x=$res['id_person'];
		if (!$id_person_x) {$mess='Персонаж не найден';} 
		elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
		else{
			db_use('query',"delete from person where id_person='".$id_person_x."'");
			$mess='Персонаж '.$_REQUEST['delbase'].' уничтожен';
			db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$myinfo->id_person."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Уничтожил персонажа ".mysql_escape_string($_REQUEST['delbase'])." (".$id_person_x.")','5')");
		}
	}
	echo"<IMG SRC=../i/items/pal_button[delete2].gif WIDTH=40 HEIGHT=25 ALT=\"Удалить из базы\" onclick=\"findlogin('Удалить из базы', 'pal.php', 'delbase', '',3)\" style=\"cursor:hand\">
";
}

if ($pal_abil[33]) { # Удалить бой
	if ($_REQUEST['delbattle']!='') {
		$res=db_use('array',"select p.id_person,p.id_battle,b.complete from person p, battle b where p.id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['delbattle'])."') and b.id_battle=p.id_battle");
		$id_person_x=$res['id_person'];
		if (!$id_person_x) {$mess='Персонаж не найден';} 
		elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
		elseif (!$res['id_battle']) { $mess='Персонаж не в бою'; }
		else{
			db_use('query',"update person set id_battle=0 where id_person in (select id_person from battle_units where id_battle='".$res['id_battle']."')");
			db_use('query',"begin; ");
			db_use('query',"set foreign_key_checks=0;");
			db_use('query',"delete from battle_log where id_battle='".$res['id_battle']."';");
			db_use('query',"delete from battle_event where id_battle='".$res['id_battle']."';");
			db_use('query',"delete from battle_step where id_battle='".$res['id_battle']."';");
			db_use('query',"delete from battle_units where id_battle='".$res['id_battle']."';");
			db_use('query',"delete from battle where id_battle='".$res['id_battle']."';");
			db_use('query',"set foreign_key_checks=1;");
			db_use('query',"commit;");
			
			$mess='Бой '.$_REQUEST['delbattle'].' уничтожен';
			db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$myinfo->id_person."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Уничтожил бой персонажа ".mysql_escape_string($_REQUEST['delbattle'])." (".$id_person_x.")','5')");
		}
	}
	echo"<IMG SRC=../i/items/pal_button[battle_delete].gif WIDTH=40 HEIGHT=25 ALT=\"Удалить текущий бой персонажа\" onclick=\"findlogin('Удалить текущий бой персонажа', 'pal.php', 'delbattle', '',6)\" style=\"cursor:hand\">
";
}

if ($pal_abil[30]) { # Смена пола
	if ($_REQUEST['newsex']!='') {
		$res=db_use('array',"select id_person,align,sex from person where persname='".mysql_escape_string($_REQUEST['newsex'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['newsex'])."')");
		$id_person_x=$res['id_person'];
		if (!$id_person_x) {$mess='Персонаж не найден';} 
		elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
		else{
			#$res=db_use('array',"select id_person from person where id_person='".$id_person_x."' and blocked>0;");
			#if (!$res['id_person']) { $mess='Персонаж не заблокирован'; } else {
				db_use('query',"update person set sex=".($res['sex']?0:1)." where id_person='".$id_person_x."'");
				$mess='Персонаж '.$_REQUEST['newsex'].' сменил пол на '.($res['sex']?'мужской':'женский').'';
				$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/smile/lady.gif BORDER=0 ALT=""> '.$mynazv.' "'.$myinfo->name.'" сменил'.($myinfo->sex?'а':'').' пол персонажу "'.$_REQUEST['newsex'].'" с '.($res['sex']?'женского на мужской':'мужского на женский').'.';
				db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','".mysql_escape_string($_REQUEST['newsex'])."','".$text."','','2')");
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Сменил".($res['sex']?'а':'')." пол на ".($res['sex']?'мужской':'женский')."','5')");
			#}
		}
	}
	echo"<IMG SRC=../i/items/pal_button[gender].gif WIDTH=40 HEIGHT=25 ALT=\"Смена ориентации (пола)\" onclick=\"findlogin('Смена ориентации (пола)', 'pal.php', 'newsex', '',2)\" style=\"cursor:hand\">
";
}

if ($pal_abil[12]) { # Нападение
echo"<IMG SRC=../i/items/pal_button8.gif WIDTH=40 HEIGHT=25 ALT=\"Снять Хаос\" onclick=\"findlogin('Снять Хаос', 'pal.php', 'attack', '',7)\" style=\"cursor:hand\">
";
}
if ($pal_abil[13]) { # Кровавое нападение
echo"<IMG SRC=../i/items/pal_button9.gif WIDTH=40 HEIGHT=25 ALT=\"Кровавое нападение\" onclick=\"findlogin('Кровавое нападение', 'pal.php', 'attackb', '',7)\" style=\"cursor:hand\">
";
}
if ($pal_abil[14]) { # Лог чата
echo"<IMG SRC=../i/items/palbuttonzu3.gif WIDTH=40 HEIGHT=25 ALT=\"Лог чата\" onclick=\"findlogin('Лог чата', 'pal.php', 'logchat', '',7,'с кем:<INPUT TYPE=text name=andwho width=100>')\" style=\"cursor:hand\">
";
}

if ($pal_abil[19]){ # проверки
if ($_REQUEST['legit']!='') {
	$login=$_REQUEST['legit'];$reason=$_REQUEST['reason'];
	if($_REQUEST['type']=='0') {
	$t="чист";$ok=true;$legit=true;$pic='pal_buttons';
	}elseif ($_REQUEST['type']=='1') {
	$t="не чист";$ok=true;$legit=false;$pic='pal_buttont';
	}
	if($ok){
			$res=db_use('array',"select id_person,align from person where persname='".mysql_escape_string($login)."' or id_person=(select id_person from users where login='".mysql_escape_string($login)."')");
			$id_person_x=$res['id_person'];
			if (!$id_person_x) {$mess='Персонаж не найден';} 
			elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
			else{
				db_use('query',"update person set last_legit_mark='".($legit?'1':'')."',last_legit_time='".($legit?time():'')."' where id_person='".$id_person_x."'");
				$mess="Сделана пометка, что персонаж ".$login." ".($legit?'чист':'не чист')." перед законом.";
				$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/items/'.$pic.'.gif WIDTH=40 HEIGHT=25 BORDER=0 ALT=""> '.($legit?''.$mynazv.' "'.$myinfo->name.'" сделал'.($myinfo->sex?'а':'').' пометку, что "'.$login.'" чист перед законом':'Проверка не пройдена. Причина: '.$reason);
				new_chat_message5($id_person_x,$text);
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','".($legit?'Удачно пройдена проверка.':'Проверка не пройдена. Причина: '.mysql_escape_string($reason).'.')."','5')");
			}
	}
}
echo"<IMG SRC=../i/items/pal_buttons.gif WIDTH=40 HEIGHT=25 ALT=\"Чистота перед законом\" onclick=\"findlogin('Чистота перед законом', 'pal.php?type=0', 'legit', '',7,'')\" style=\"cursor:hand\">
";
echo"<IMG SRC=../i/items/pal_buttont.gif WIDTH=40 HEIGHT=25 ALT=\"Не чист перед законом\" onclick=\"findlogin('Не чист перед законом', 'pal.php?type=1', 'legit', '',7,'<INPUT TYPE=text name=reason width=100>')\" style=\"cursor:hand\">
";
}


if ($pal_abil[20]) { # Обезличка
	if ($_REQUEST['cui']!='') {
		if($_REQUEST['type']=='1') {
			$n=24*60*60;$t="одни сутки";$cui=true;
		}elseif ($_REQUEST['type']=='2') {
			$n=2*24*60*60;$t="два дня";$cui=true;
		}elseif ($_REQUEST['type']=='7') {
			$n=7*24*60*60;$t="неделя";$cui=true;
		}elseif ($_REQUEST['type']=='14') {
			$n=14*24*60*60;$t="две недели";$cui=true;
		}elseif ($_REQUEST['type']=='30') {
			$n=30*24*60*60;$t="один месяц";$cui=true;
		}elseif ($_REQUEST['type']=='60') {
			$n=60*24*60*60;$t="два месяца";$cui=true;
		}elseif ($_REQUEST['type']=='90') {
			$n=90*24*60*60;$t="сутки";$cui=true;
		}elseif ($_REQUEST['type']=='-1') {
			$n=0;$t="бессрочно";$cui=true;
		}
		if($cui){
			$res=db_use('array',"select id_person,align from person where persname='".mysql_escape_string($_REQUEST['cui'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['cui'])."')");
			$id_person_x=$res['id_person'];

		if (!$id_person_x) {$mess='Персонаж не найден';} 
		elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
		else{
			$res=db_use('array',"select id_person from person_on where id_person='".$id_person_x."' and type=2;");
			if ($res['id_person']) { $mess='Персонаж уже обезличен'; } else {
				db_use('query',"insert into person_on (id_person,id_paladin,type,timestamp2) values('".$id_person_x."','".$myinfo->id_person."','2','".(time()+$n)."')");
				$mess='На персонажа "'.$_REQUEST['cui'].'" наложено заклятие обезличивания '.(!$n?'':' сроком').' '.$t.'.';
				$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/items/cui.gif WIDTH=40 HEIGHT=25 BORDER=0 ALT=""> '.$mynazv.' "'.$myinfo->name.'" обезличил'.($myinfo->sex?'а':'').' "'.$_REQUEST['cui'].'", '.(!$n?'':' сроком').' '.$t;
				db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','','".$text."','','2')");
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Обезличен".(!$n?'':' сроком').' '.$t.". Причина:".$_REQUEST['reason']."','5')");
			}
		}			
		}
	}
	echo"<IMG SRC=../i/items/cui.gif WIDTH=40 HEIGHT=25 ALT=\"Обезличить\" onclick=\"findlogin('Обезличить', 'pal.php', 'cui', '',7,'</TD><TD><SELECT name=type><OPTION value=1>сутки</OPTION><OPTION value=2>два дня</OPTION><OPTION value=7>неделя</OPTION><OPTION value=14>две недели</OPTION><OPTION value=30>месяц</OPTION><OPTION value=60>2 месяца</OPTION><OPTION VALUE=90>3 месяца</OPTION><OPTION VALUE=-1>бессрочно</OPTION></SELECT><br><small>Причина</small><br><INPUT TYPE=text name=reason width=100>')\" style=\"cursor:hand\">";
}
if ($pal_abil[27]) { # РАЗВОД
	if ($_REQUEST['razvod']!='') {
		$res=db_use('array',"select id_person,align,sex from person where persname='".mysql_escape_string($_REQUEST['razvod'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['razvod'])."')");
		$id_person_x=$res['id_person'];
		if (!$id_person_x) {$mess='Персонаж не найден';} 
		elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
		else{
			$res=db_use('array',"select * from person_marry where id_".($res['sex']?'wife':'husband')."='".$id_person_x."';");
			if (!$res['id_'.($res['sex']?'wife':'husband')]) { $mess='Персонаж не '.($res['sex']?'замужем':'женат'); } else {
				db_use('query',"delete from person_marry where id_wife='".$res['id_wife']."'");
				$person2=new persinfo ($res['id_wife']);$person1=new persinfo ($res['id_husband']);
				$mess="Произведен развод ".$person1->name." и ".$person2->name.".";

				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$person1->id_person."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Бросил ".$person2->name."','5')");							
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$person2->id_person."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Порвала с ".$person1->name."','5')");		
				
				$text='<font class=date>'.date('d.m.y H:i').'</font> <img src=../i/i_marry.gif> '.$mynazv.' "'.$myinfo->name.'" разорвал'.($myinfo->sex?'а':'').' брачные узы '.$person1->name." и ".$person2->name;
				db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','','".$text."','','2')");
			}
		}
	}
	echo"<IMG SRC=../i/i_marry.gif WIDTH=40 HEIGHT=25 ALT=\"Разорвать брачные узы\" onclick=\"findlogin('Разорвать брачные узы', 'pal.php', 'razvod', '',7)\" style=\"cursor:hand\">
";
}

if ($pal_abil[28]){ # ПАРОЛЬ
if ($_REQUEST['chpass']!='') {
	$login=$_REQUEST['chpass'];$reason=$_REQUEST['reason'];


	$res=db_use('array',"select id_person,align from person where persname='".mysql_escape_string($login)."' or id_person=(select id_person from users where login='".mysql_escape_string($login)."')");
	$id_person_x=$res['id_person'];
	if (!$id_person_x) {$mess='Персонаж не найден';} 
	elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
	else{
		db_use('query',"update users set pass=md5('".mysql_escape_string($reason)."') where id_person='".$id_person_x."'");
		$mess="Пароль персонажу ".$login." изменен.";
		db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Изменен пароль','5')");
	}
}
echo"<IMG SRC=../i/items/pal_button[password].gif WIDTH=40 HEIGHT=25 ALT=\"Сменить пароль\" onclick=\"findlogin('Сменить пароль', 'pal.php', 'chpass', '',4,'<INPUT TYPE=text name=reason width=100>')\" style=\"cursor:hand\">
";
}


if ($pal_abil[29]){ # НИК
if ($_REQUEST['chnick']!='') {
	$login=$_REQUEST['chnick'];$reason=$_REQUEST['reason'];


	$res=db_use('array',"select id_person,align,money from person where persname='".mysql_escape_string($login)."' or id_person=(select id_person from users where login='".mysql_escape_string($login)."')");
	$id_person_x=$res['id_person'];
	if (!$id_person_x) {$mess='Персонаж не найден';} 
	elseif ( ($res['money']<5000 && !$_REQUEST[freechnick]) OR ($_REQUEST[freechnick] && !$pal_abil[34]) ) {$mess=($_REQUEST[freechnick]?'Нет доступа на кнопку':'У персонажа должны быть в наличии 5000 кр для смены ника');} 
	elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
	else{
		$res=db_use('array',"select login from users where login='".mysql_escape_string($reason)."'");
		$res1=db_use('array',"select username from sessions where username='".mysql_escape_string($login)."'");
		if (!$res1['username']) {
			$mess='Персонаж не онлайн';
		}elseif ($res['login']) {
			$mess='Данный ник уже существует';
		}else{
			if (!$_REQUEST[freechnick]) {
				db_use('query',"update person set money=money-5000 where id_person='".$id_person_x."'");
			}
			db_use('query',"update users set login='".mysql_escape_string($reason)."' where id_person='".$id_person_x."'");
			db_use('query',"update thing_har set person='".mysql_escape_string($reason)."' where person='".mysql_escape_string($login)."'");
			if ($_REQUEST[freechnick]) {
			$mess="Ник персонажа ".$login." изменен на ".$reason.". С персонажа снято 0 кр.";
			db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Изменен ник на ".mysql_escape_string($reason)." (бесплатная паладинская смена)','5')");
			}else{
			$mess="Ник персонажа ".$login." изменен на ".$reason.". С персонажа снято 5000 кр.";
			db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Изменен ник на ".mysql_escape_string($reason)."','5')");
			}
		}
	}
}
echo"<IMG SRC=../i/items/pal_button[nick].gif WIDTH=40 HEIGHT=25 ALT=\"Сменить ник (5000 кр)\" onclick=\"findlogin('Сменить ник (5000 кр)', 'pal.php', 'chnick', '',3,'<INPUT TYPE=text name=reason width=100>')\" style=\"cursor:hand\">
";

if ($pal_abil[34]) {
echo"<IMG SRC=../i/items/pal_button[nick].gif WIDTH=40 HEIGHT=25 ALT=\"Сменить ник (беспл)\" onclick=\"findlogin('Сменить ник (беспл)', 'pal.php?freechnick=1', 'chnick', '',3,'<INPUT TYPE=text name=reason width=100>')\" style=\"cursor:hand\">
";
}

}



if ($pal_abil[21]) { # Снятие обезлички 
	if ($_REQUEST['uncui']!='') {
		$res=db_use('array',"select id_person,align from person where persname='".mysql_escape_string($_REQUEST['uncui'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['uncui'])."')");
		$id_person_x=$res['id_person'];
		if (!$id_person_x) {$mess='Персонаж не найден';} 
		elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя трогать паладина выше крестом'; }
		else{
			$res=db_use('array',"select id_person from person_on where id_person='".$id_person_x."' and type=2;");
			if (!$res['id_person']) { $mess='Персонаж не обезличен'; } else {
				db_use('query',"delete from person_on where id_person='".$id_person_x."' and type=2");
				$mess="C персонажа ".$_REQUEST['uncui']." снято обезличивание.";
				$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/items/uncui.gif WIDTH=40 HEIGHT=25 BORDER=0 ALT=""> '.$mynazv.' "'.$myinfo->name.'" снял'.($myinfo->sex?'а':'').' заклятия обезличивания с "'.$_REQUEST['uncui'].'"';
				db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','','".$text."','','2')");
				db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Снято обезличивание','5')");
			}
		}
	}
	echo"<IMG SRC=../i/items/uncui.gif WIDTH=40 HEIGHT=25 ALT=\"Снять обезличивание\" onclick=\"findlogin('Снять обезличивание', 'pal.php', 'uncui', '',7)\" style=\"cursor:hand\">
";
}
if ($myinfo->id_person==12 or $myinfo->id_person==58 or $myinfo->align==1.99 or $pal_abil[23]) {
if ($_REQUEST['logindata'] && $_REQUEST['newdata'] && $_REQUEST['data'] ){ 
	$res=db_use('array',"select p.id_person,p.align from users u left join person p on p.id_person=u.id_person where u.login='".$_REQUEST['logindata']."'");
	if ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя изменять инфу паладина выше крестом';
	}elseif ($res['id_person']) {
		db_use('query',"update users set userbirthday='".$_REQUEST['newdata']."' where id_person='".$res['id_person']."'");
		db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$res['id_person']."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Изменена дата рождения на ".$_REQUEST['newdata']."','5')");
		echo "ИЗМЕНЕНА ДАТА РОЖДЕНИЯ";
	}
}
echo"<IMG SRC=../i/items/pal_button[data].gif WIDTH=40 HEIGHT=25 ALT=\"Дата\" onclick=\"findlogin('Дата рождения формат YYYY-MM-DD', 'pal.php?data=1', 'logindata', '',7,'<INPUT TYPE=text name=newdata width=100>')\" style=\"cursor:hand\"'>";
}
if ($myinfo->id_person==12 or $myinfo->id_person==58 or $myinfo->align==1.99 or $pal_abil[24]) {
if ($_REQUEST['logindata'] && $_REQUEST['newdata'] && $_REQUEST['chemail'] ){ 
	$res=db_use('array',"select p.id_person,p.align from users u left join person p on p.id_person=u.id_person where u.login='".$_REQUEST['logindata']."'");
	if ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя изменять инфу паладина выше крестом';
	}elseif ($res['id_person']) {
		db_use('query',"update users set email='".$_REQUEST['newdata']."' where id_person='".$res['id_person']."'");
		db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$res['id_person']."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Изменен EMAIL на ".$_REQUEST['newdata']."','5')");
		echo "ИЗМЕНЕН EMAIL";
	}
}
echo"<IMG SRC=../i/items/pal_button[email].gif WIDTH=40 HEIGHT=25 ALT=\"Мыло\" onclick=\"findlogin('Мыло', 'pal.php?chemail=1', 'logindata', '',7,'<INPUT TYPE=text name=newdata width=100>')\" style=\"cursor:hand\"'>";
}
echo"</td></tr></table>";
if ($pal_abil[3]){ # просмотр вещей
echo "<form method=post action=\"pal.php?action=viewshm\"><H4>Список вещей</H4><input type=submit></form>";
}
if ($pal_abil[0]){ # создание вещей
	if ($_GET['action']=='doaddshm' && $_REQUEST['submit']) {
	$res=db_use('query',"insert into thing_har(person,clan,name,opisan,type1,type2,type3,type4,pic,gos_price,id_itmc,ekr,artefact,plushp,minlevel,maxsrok_default,dam1,dam2,weight,align,zakl,vzakl,vmaxsrok_default,noremont,sex,modify,srokgodn,id_person_add) values ('".mysql_escape_string($_POST['login'])."','".mysql_escape_string($_POST['clan'])."','".mysql_escape_string($_POST['name'])."',
	'".mysql_escape_string($_POST['opisan'])."','".mysql_escape_string($_POST['type1'])."','".mysql_escape_string($_POST['type2'])."','".mysql_escape_string($_POST['type3'])."','".mysql_escape_string($_POST['type4'])."',
	'".mysql_escape_string($_POST['pic'])."','".mysql_escape_string($_POST['gos_price'])."','".mysql_escape_string($_POST['itmc'])."','".mysql_escape_string($_POST['ekr_price'])."','".mysql_escape_string($_POST['is_art'])."','".mysql_escape_string($_POST['plushp'])."','".mysql_escape_string($_POST['minlevel'])."','".mysql_escape_string($_POST['maxsrok_default'])."','".mysql_escape_string($_POST['dam1'])."','".mysql_escape_string($_POST['dam2'])."','".mysql_escape_string($_POST['weight'])."','".mysql_escape_string($_POST['align'])."','".mysql_escape_string($_POST['zakl'])."','".mysql_escape_string($_POST['vzakl'])."','".mysql_escape_string($_POST['vmaxsrok_default'])."','".mysql_escape_string($_POST['noremont'])."','".mysql_escape_string($_POST['sex'])."','".mysql_escape_string($_POST['modify'])."','".mysql_escape_string($_POST['srokgodn'])."' ,'".$myinfo->id_person."');");
	$id_thing2=mysql_insert_id();
$res=db_use('query',"select * from har");
unset ($i);while ($i<mysql_num_rows($res)) { # получить массив 
	$i++;$s=mysql_fetch_array($res);
	if ($_POST['har'.$s['id_har']]!=0) { db_use('query',"insert into thing_stat (id_thing2,id_har,value) values ('".$id_thing2."','".$s['id_har']."','".mysql_escape_string($_POST['har'.$s['id_har']])."');"); }
}
$res=db_use('query',"select * from har");
unset ($i);while ($i<mysql_num_rows($res)) { # получить массив 
	$i++;$s=mysql_fetch_array($res);
	if ($_POST['need_har'.$s['id_har']]!=0) { db_use('query',"insert into thing_needstat (id_thing2,id_har,value) values ('".$id_thing2."','".$s['id_har']."','".mysql_escape_string($_POST['need_har'.$s['id_har']])."');"); }
}
$mess=$_POST['name']." добавлено (id_thing2=".$id_thing2.")";
$r=db_use('query',"insert into thing (id_thing2,isgift,id_city,srok,maxsrok,vzakl,vmaxsrok) values ('".$id_thing2."',1,1,0,'".mysql_escape_string($_POST['maxsrok_default'])."','".mysql_escape_string($_POST['vzakl'])."','".mysql_escape_string($_POST['vmaxsrok_default'])."')");
$id_thing=mysql_insert_id();db_use('query',"insert into inv (id_person,id_thing) values ('12','".$id_thing."')");
	}
	echo "<form method=post action=pal.php?action=addshm><H4>Создать шмотку</H4><input type=submit></form>";
}
if ($pal_abil[1]){ # удаление вещей
	if ($_GET['action']=='delshm') {
		db_use('query',"delete from thing_har where id_thing2='".mysql_escape_string($_POST['delallthing'])."'");
		db_use('query',"delete from thing_stat where id_thing2='".mysql_escape_string($_POST['delallthing'])."'");
		db_use('query',"delete from thing_needstat where id_thing2='".mysql_escape_string($_POST['delallthing'])."'");
		db_use('query',"delete from thing where id_thing2='".mysql_escape_string($_POST['delallthing'])."'");
		db_use('query',"delete from inv where id_thing not in (select id_thing from thing)");
		$mess="Шмотка удалена";
	}
	echo "<form method=post action=pal.php?action=delshm><H4>Уничтожить шмотку (саму и у всех кто ее купил)</H4>
id_thing2: <input type=text name=delallthing><input type=submit></form>";
}
if ($pal_abil[2]){ # добавление модификатора
	if ($_GET['action']=='doaddmodif' && $_REQUEST['submit']){
		if (mysql_escape_string($_POST['harname'])=='') {$mess='Ничего не введено';}else{
			db_use('query',"insert into har (harname,type) values ('".mysql_escape_string($_POST['harname'])."',6)");
			$mess=$_POST['harname']." добавлена<br />";
		}
	}echo '<H4>Добавить модификатор</H4>
<form method=post action="pal.php?action=doaddmodif">название: <input type=text name=harname style="width:500 px;"><input type=submit name="submit">
</form>';
}


/* echo"<H4>Наложить проклятие</H4>
<IMG SRC=../i/items/vampir.gif WIDTH=40 HEIGHT=25 ALT=\"Напасть вампиром\" onclick=\"findlogin('Выпить энергию', 'dark.php', 'vampir', '',7)\" style=\"cursor:hand\">
<IMG SRC=../i/items/attack.gif WIDTH=40 HEIGHT=25 ALT=\"Вмешаться в поединок\" onclick=\"findlogin('Кому помочь в бою', 'dark.php', 'tohelp', '',7)\" style=\"cursor:hand\">
";
*/



#---------------------------------------------------



if ($pal_abil[0]){  # создание вещей 
if ($_GET['action']=='addshm') {
echo "<hr><H3>Создать шмотку:</H3>";
echo '<form method=post action="pal.php?action=doaddshm"><br />
название: <input type=text name=name style="width:500 px;"><br />
type1 <select name=type1><option value=0>- нет -</option>
<option value=1>обмундирование</option>
<option value=2>заклятия</option>
<option value=3>Эликсиры</option>
<option value=4>прочее</option>
</select><br />
type2: <select name=type2>
<option value=0>- нет -</option>
<option value=1>шлем</option>
<option value=2>оружие</option>
<option value=3>броня</option>
<option value=4>пояс</option>
<option value=5>серьги</option>
<option value=6>кулон</option>
<option value=7>наручи</option>
<option value=8>перчатки</option>
<option value=9>кольца</option>
<option value=10>щит</option>
<option value=11>сапоги</option>
<option value=12>карманная вещь</option>
<option value=13>свиток</option>
<option value=14>зелье</option>
<option value=15>амуниция</option>
<option value=16>подарки</option>
</select><br />
type3: <select name=type3>
<option value=0>- нет -</option>
<option value=1>оружие / обычная броня / нейтральные заклинания / недобрые подарки / статовый элик</option>
<option value=2>двуручное оружие / легкая броня / боевые и защитные / открытки</option>
<option value=3>костыли / майка / упаковка</option>
<option value=4>оружие для двух слотов / плащ / фейерверки</option>
</select><br />
type4: <select name=type4>
<option value=0>- нет -</option>
<option value=1>кастеты/ножи</option>
<option value=2>топоры</option>
<option value=3>дубины/булавы</option>
<option value=4>мечи</option>
<option value=5>посохи</option>
<option value=6>луки и арбалеты</option>
<option value=7>цветы</option>
</select><br />
type5: <select name=type5>
<option value=0>- нет -</option>
<option value=1>огонь</option>
<option value=2>вода</option>
<option value=3>воздух</option>
<option value=4>земля</option>
<option value=5>свет</option>
<option value=6>серая</option>
<option value=7>тьма</option>
</select><br />
картинка (roba1)<br />
<small>Бля сколько повторять!! никаких http://.... и .gif. Просто название файла без расширения </small>: <input type=text name=pic style="width:500 px;"><br />
гос цена (кр): <input type=text name=gos_price style="width:500 px;"><br />
цена (екр): <input type=text name=ekr_price style="width:500 px;"><br />
артефакт (0/1): <input type=text name=is_art style="width:500 px;"><br />
вес: <input type=text name=weight style="width:500 px;"><br />
Макс срок службы: <input type=text name=maxsrok_default style="width:500 px;"><br />
Не подлежит ремонту (1/0)<input type=text name=noremont style="width:500 px;"><br />
можно было модифицировать: (1/0)<input type=text name=modify style="width:500 px;"><br />
Срок годности в днях<input type=text name=srokgodn style="width:500 px;"><br />
Требует минимальный уровень: <input type=text name=minlevel style="width:500 px;"><br />
Требует склонность: <input type=text name=align style="width:500 px;"><br />
Требует пол: (2-жен, 1-муж)<input type=text name=sex style="width:500 px;"><br />
Требует логин: <input type=text name=login style="width:500 px;"><br />
Требует клан: <input type=text name=clan style="width:500 px;"><br />
';
echo 'Требует: <br>';
$res=db_use('query',"select * from har");
unset ($i);while ($i<mysql_num_rows($res)) { # получить массив противников
	$i++;$s=mysql_fetch_array($res);
	if (($i>=11 && $i<=18) OR ($i<=105 && $i>=31) ) {}else
	{echo '('.$s['id_har'].')Требуется '.$s['harname'].": <input name=need_har".$s['id_har'].' type=text style="width:500 px;"> ('.$s['har'].')<br>';
	}
}
echo '
+HP: <input type=text name=plushp style="width:500 px;"><br />
MIN: <input type=text name=dam1 style="width:500 px;"><br />
MAX: <input type=text name=dam2 style="width:500 px;"><br />
';
echo'Действует на:<br />';
$res=db_use('query',"select * from har");
unset ($i);while ($i<mysql_num_rows($res)) { # получить массив противников
	$i++;$s=mysql_fetch_array($res);
	if (($i>=31 && $i<=40)  ) {}else
{
#	if ($s['id_har']==68) {echo "<b>(0 нет,10 ничтожно редки,20 редки,30 временами,40 малы,50 регулярны,60 часты,70 всегда)</b><br />";}
	if ($s['har'][0]=='a' && $s['har'][1]=='t') {
		echo $s['harname'].' <select name=har'.$s['id_har'].'><option value=0>нет</option><option value=1>ничтожно редки</option><option value=2>редки</option><option value=3>малы</option><option value=4>временами</option><option value=5>регулярны</option><option value=6>часты</option><option value=7>всегда</option></select><br />';
	}else{
		echo '('.$s['id_har'].')Действует на '.$s['harname'].": <input name=har".$s['id_har'].' type=text style="width:500 px;"> ('.$s['har'].')	<br>';
	}
	
}

	#(0 нет,1 ничтожно редки,2 редки,3 малы,4 временами 5 регулярны,6 часты,7 всегда
	#(0 нет,1 ничтожно редки,11 редки,25 малы,49 временами 69 регулярны,89 часты,100 всегда
	
}#ВЕРОЯТНОСТИ ТИПОВ УДАРОВ
# "часты", "регулярны", "временами", "малы", "редки", "ничтожно редки",  если я не ошибаюсь. Далее, "временами" - означает немногим менее 50%, "Малы" около 25%, "редки", выходит около 10%, "регулярны" около 70%(75?), "часты" около 90%, ну а ничтожно редки судя по всему означает, что вероятность выпадения около 0.01
#update thing_stat set value=99 where value=70 and id_har in (select id_har from har where har like 'at%') 

echo "Описание (для подаркоФФ): <textarea cols=40 rows=20 name=opisan></textarea><br />";
$res=db_use('query',"select * from itm_complect");
echo 'Комплект: <select name=itmc><option value=0>-нет-</option>';
unset ($i);while ($i<mysql_num_rows($res)) { # получить массив противников
	$i++;$s=mysql_fetch_array($res);
	echo "<option value=".$s['id_itmc'].">".$s['name']."</option>";
};
echo '</select><br />
<hr>
Название заклинания (attack): <input type=text name=zakl style="width:500 px;"><br />
Встроена магия (attack): <input type=text name=vzakl style="width:500 px;"><br />
Зарядов максимально: <input type=text name=vmaxsrok_default style="width:500 px;"><br />
<input type=submit name="submit"><br />
</form>
'; 
}
}
if ($pal_abil[3]){  # просмотр вещей
if ($_GET['action']=='viewshm') {
	echo "<hr><H3>Просмотр вещей:</H3>";
	$res=db_use('query',"select id_thing2,name from thing_har order by name");
	echo "<table border=1 align=center><tr><td>id_t2<td>Название<td>Используется<td>Управление";
	unset ($i);while ($i<mysql_num_rows($res)) { 
	$i++;$s=mysql_fetch_array($res);
		$s1=db_use('array',"select count(*) as coun from thing where id_thing2='".$s['id_thing2']."'");
		$s1=$s1['coun'];
		echo "<tr><td>".$s['id_thing2']."<td>".$s['name']."<td>".$s1."<td>";
	if ($_GET['shm']==$s['id_thing2']) {
		$s2=db_use('array',"select th.maxsrok_default,th.weight,th.type1 from thing_har th 
			where th.id_thing2='".$s['id_thing2']."';");
			$value=new thinginfo($s['id_thing2']);
			$value->maxsrok=$s2['maxsrok_default'];
		$harnames=getharnames();$cityname=getcitiesnames();
	echo "<!--Рюкзак--><TABLE WIDTH=100% CELLSPACING=1 CELLPADDING=2 BGCOLOR=A5A5A5>
<TR bgcolor=#".($i<0?"C7C7C7":"D5D5D5").">";
	printinfo($value,$myinfo,1,"","<A target=_blank HREF=\"shop.php?set=".$value->id_thing2."&id=1&".($ott=='present'?'present':$ott)."&sid=".$_REQUEST['sid']."&sd4=1152918974&".rand(0,1111111)."\">купить</A>&nbsp;<IMG SRC=\"../i/up.gif\" WIDTH=11 HEIGHT=11 BORDER=0 ALT=\"Купить несколько штук\" style=\"cursor:hand\" onclick=\"AddCount('".$value->id_thing2."', '".mysql_escape_string($value->name)."')\">",($myinfo->money<$value->gos_price?"<FONT COLOR=RED>":"").$value->gos_price.($myinfo->money<$value->gos_price?"</FONT>":"")." кр.</b> <small>(количество: ".$value->scount.")</small>");
echo"
	</TR></table>";
	}
	echo"<a href=pal.php?action=viewshm&shm=".$s['id_thing2'].">Просмотр</a></tr>";
	}echo "</table>";
}
}
if ($pal_abil[5]) { # запись в дело - КНОПКА
	if ($_GET['action']=='dowritedelo') {
		if ($_POST['block_chk']=='on' && $_POST['secret_chk']=='on') {$type=3;}
		elseif ($_POST['block_chk']=='on' && $_POST['secret_chk']!='on') {$type=1;}
		elseif ($_POST['block_chk']!='on' && $_POST['secret_chk']=='on') {$type=4;}
		elseif ($_POST['block_chk']!='on' && $_POST['secret_chk']!='on') {$type=2;}
		$res=db_use('array',"select id_person from person where persname='".mysql_escape_string($_POST['login'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_POST['login'])."')");
		$id_person_x=$res['id_person'];
		if (!$id_person_x) {$mess='Персонаж не найден';} else{
		db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','".mysql_escape_string($_POST['message'])."','".$type."')");
		$mess="Запись в дело произведена успешно";
		}
	}
	echo'<hr>
<form method=post action="?action=dowritedelo">
Добавить в "дело" игрока заметку о нарушении правил, накрутке и пр.<br />
Введите логин: <input type=text name=login> сообщение <input type=text name=message style="width:300"><input type=submit valut="Добавить"><br />
<input type=checkbox name=block_chk id=blkc> <label for=blkc>Записать, как причину отправки в хаос/блокировки</label><br />
<input type=checkbox name=secret_chk id=sckc> <label for=sckc>Записать в секретное дело (видят только верховные и администрация)</label><br />
</form>';
}
if ($pal_abil[25]) { # 
	$_REQUEST[platnsklon]=true;
	if ($_REQUEST['dosklon3']!='' OR $_REQUEST['dosklon7']!='' OR $_REQUEST['dosklon1']!='') {
					if ($_REQUEST['dosklon3']) {
					$altext='Темное братство';$newalign=3;$_REQUEST['login']=$_REQUEST['dosklon3'];
					} elseif($_REQUEST['dosklon7']) {
					$altext='Нейтрал';$newalign=7;$_REQUEST['login']=$_REQUEST['dosklon7'];
					} elseif($_REQUEST['dosklon1']) {
					$altext='Светлый';$newalign=1.001;$_REQUEST['login']=$_REQUEST['dosklon1'];
					}
		$res=db_use('array',"select last_legit_mark,last_legit_time,id_person,align,id_clan,money from person where persname='".mysql_escape_string($_REQUEST['login'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['login'])."')");
		$id_person_x=$res['id_person'];
		

		if (!$id_person_x) {$mess='Персонаж не найден';} else
		if ($res['money']<5000 && $_REQUEST[platnsklon] ) {$mess='У персонажа должны быть в наличии 5000 кр для платной смены склонности';} else
		if ($res['last_legit_mark']<1) {$mess='Персонаж не прошел проверки';} else
		if ($res['last_legit_time']+60*60*24*3<time()) {	
			$mess='Истек срок действия проверки персонажа на чистоту (3 дня).';	} else	
		if ($res['id_clan']) {$mess='Персонаж в клане';} else{		
#			$res=db_use('array',"select align from person where id_person='".$id_person_x."' and blocked>0;");
			if ($res['align']==$newalign) { $mess='Уже стоит данная склонность'; } elseif ($res['align']==2.9) {$mess='Персонаж носит склонность Истинный Хаос	';} elseif ((int)$res['align']==1 && $res['align']>$myinfo->align && $res['align']!='1.6' ) { $mess='Нельзя сверзить паладина выше крестом';} else {
				if($newalign!=7 && $newalign!=3 && $newalign!=1.001) { 
					$mess='Хакерам дорога в RECYCLED';					
					db_use('query',"insert into pals_delo (id_person,id_paladin,message,type,align,level) values ('".$myinfo->id_person."','".$myinfo->id_person."','попытка взлома палпанели на смену склонности','1','".$myinfo->align."','".$myinfo->level."');");
				} else {


			if ($_REQUEST[platnsklon]) {
				db_use('query',"update person set money=money-5000 where id_person='".$id_person_x."'");
			}
			
					db_use('query',"update person set last_legit_mark=0, last_legit_time=0,align=".$newalign." where id_person='".$id_person_x."'");
					if (!$_REQUEST[platnsklon]) {
						$mess='У персонажа '.$_REQUEST['login'].' изменена склонность на '.($altext).'.';
					$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/items/'.($newalign==1.001?'pal_button1':($newalign==3?'pal_button[dark]':($newalign==7?'pal_buttonv':''))).'.gif WIDTH=40 HEIGHT=25 BORDER=0 ALT="'.$altext.'"> '.$mynazv.' "'.$myinfo->name.'" установил'.($myinfo->sex?'а':'').' склонность '.$altext.' персонажу "'.$_REQUEST['login'].'"';
					db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','".mysql_escape_string($_REQUEST['login'])."','".$text."','','2')");
					db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Поставлена склонность ".$altext."','5')");
					}else{
						$mess='У персонажа '.$_REQUEST['login'].' изменена склонность на '.($altext).'. Снято 5000 кр.';
					$text='<font class=date>'.date('d.m.y H:i').'</font> <IMG SRC=../i/items/'.($newalign==1.001?'pal_button1':($newalign==3?'pal_button[dark]':($newalign==7?'pal_buttonv':''))).'.gif WIDTH=40 HEIGHT=25 BORDER=0 ALT="'.$altext.'"> '.$mynazv.' "'.$myinfo->name.'" установил'.($myinfo->sex?'а':'').' склонность '.$altext.' персонажу "'.$_REQUEST['login'].'"';
					db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','".mysql_escape_string($_REQUEST['login'])."','".$text."','','2')");
					db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Поставлена склонность ".$altext." за 5000 кр','5')");
					}

				}#/align
			}#/checkalign
		}
	}
/*echo"<IMG SRC=../i/items/dark_polter.gif WIDTH=40 HEIGHT=25 ALT=\"Темный\" onclick=\"findlogin('Темный', 'pal.php', 'dosklon3', '',7)\" style=\"cursor:hand\">
";
echo"<IMG SRC=../i/items/neit_polter.gif WIDTH=40 HEIGHT=25 ALT=\"Нейтрал\" onclick=\"findlogin('Нейтрал', 'pal.php', 'dosklon7', '',7)\" style=\"cursor:hand\">
";
echo"<IMG SRC=../i/items/pal_button1.gif WIDTH=40 HEIGHT=25 ALT=\"Светлый\" onclick=\"findlogin('Светлый', 'pal.php', 'dosklon1', '',7)\" style=\"cursor:hand\">
"; */
echo"<IMG SRC=../i/items/dark_polter.gif WIDTH=40 HEIGHT=25 ALT=\"Темный\" onclick=\"findlogin('Темный (5000 кр)', 'pal.php?platnsklon=1', 'dosklon3', '',7)\" style=\"cursor:hand\">
";
echo"<IMG SRC=../i/items/neit_polter.gif WIDTH=40 HEIGHT=25 ALT=\"Нейтрал\" onclick=\"findlogin('Нейтрал (5000 кр)', 'pal.php?platnsklon=1', 'dosklon7', '',7)\" style=\"cursor:hand\">
";
echo"<IMG SRC=../i/items/pal_button1.gif WIDTH=40 HEIGHT=25 ALT=\"Светлый\" onclick=\"findlogin('Светлый (5000 кр)', 'pal.php?platnsklon=1', 'dosklon1', '',7)\" style=\"cursor:hand\">
";
}
if ($pal_abil[6]) { # Назначение паладинов 
	if ($_GET['action']=='pal_naznachit') {
		$res=db_use('array',"select id_person,align,id_clan from person where id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['login'])."')");
		$id_person_x=$res['id_person'];$oldalign=$res['align'];
		if (!$id_person_x) {$mess='Персонаж не найден';} elseif ($res[id_clan]>1) $mess='Персонаж не паладин'; else
		{
			$res=db_use('array',"select * from align where align='".$_REQUEST['newalign']."';");
			if ($res['name']!='') {
				if ($_REQUEST['newalign']==0) {
					if ((int)$oldalign==1) {
						if ($myinfo->align>$oldalign) {
							$mess="Персонаж ".$_REQUEST['login'].' снят с должности.';
							$text='<font class=date>'.date('d.m.y H:i').'</font> Верховный паладин "'.$myinfo->name.'" лишил'.($myinfo->sex?'а':'').' паладинства "'.$_REQUEST['login'].'"';
							db_use('query',"update person set align=0 where id_person='".$id_person_x."'");
							db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','','".$text."','','2')");
							db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','Персонаж лишен паладинства','5')");
	
						}else{
							$mess='Нельзя трогать выше крестом';
						}
					}else{
						$mess='Персонаж имеет склонность, отличную от паладинской';
					}
				}
				if ($_REQUEST['newalign']>=1 and (
				($_REQUEST['newalign']<=1.99 && $myinfo->align==1.999) OR 
				($_REQUEST['newalign']<=1.92 && $myinfo->align!=1.999)
				)
				) {
	
					if ((int)$oldalign==1 OR $oldalign==0) {
						$mess="Персонаж ".$_REQUEST['login'].' назначен на должность "'.$res['fullname'].'".';
						$text='<font class=date>'.date('d.m.y H:i').'</font> Верховный паладин "'.$myinfo->name.'" '.($_REQUEST['newalign']>0?'присвоил'.($myinfo->sex?'а':'').' "'.$_REQUEST['login'].'" звание <img src=../i/align'.$_REQUEST['newalign'].'.gif>'.$res['fullname']:'лишил'.($myinfo->sex?'а':'').' паладинства "'.$_REQUEST['login'].'"');
						db_use('query',"update person set align='".$_REQUEST['newalign']."' where id_person='".$id_person_x."'");
						if ($_REQUEST['newalign']==1.99) {
							db_use('query',"delete from clans_pers where id_clan=1 and rightsmask like '1%'");
							db_use('query',"insert into clans_pers (id_person,id_clan,rightsmask) VALUES ('".$id_person_x."',1,'111111111111111111111111')");
						}
						db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','','".$text."','','2')");
						db_use('query',"insert into pals_delo(id_person,id_paladin,level,align,message,type) values('".$id_person_x."','".$myinfo->id_person."','".$myinfo->level."','".$myinfo->align."','".($_REQUEST['newalign']>0?"Присвоено звание ".$res['fullname']:'Персонаж лишен паладинства')."','5')");
					}else{
						$mess='Персонаж уже имеет склонность, отличную от паладинской';
					}
				}else{
					$mess='НЕЛЬЗЯ';
					db_use('query',"insert into pals_delo (id_person,id_paladin,message,type,align,level) values ('".$myinfo->id_person."','".$myinfo->id_person."','попытка взлома палпанели на смену звания','1','".$myinfo->align."','".$myinfo->level."');");
				}
			}else{
				$mess='Нет такой склонности';
			}
		}		
	}
	echo'<form method=post action="pal.php?action=pal_naznachit"><H4>Изменить статус</H4>
Логин: <input type=text name=login> произвести в <select name=newalign>';
$res=db_use('query',"select * from align where align=0 or (align>=1 and align<=".($myinfo->align==1.999?'1.99':'1.92').") order by align asc");
unset($i);for ($i=0;$i<mysql_num_rows($res);$i++) {
	$s=mysql_fetch_array($res);
	echo '<option value="'.$s['align'].'">'.$s['align'].': '.$s['fullname'].'</option>';
}
echo'</select><input type=submit value="выполнить"></form>';
}

if ($pal_abil[14]) { # ЛОГ ЧАТА
if ($_REQUEST['logchat']!='') {
		$res=db_use('array',"select id_person,level from person where persname='".mysql_escape_string($_REQUEST['logchat'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['logchat'])."' )");
		$id_person_x=$res['id_person'];$level=$res['level'];
		if (!$id_person_x) {$mess='Персонаж не найден';} else{
			if ($myinfo->align=='1.7' && $level>$myinfo->level+1) {
				$enable=false;
				echo "<font color=red>Паладины Огненной Зари не могут смотреть логи персонажей выше их более чем на 1 уровень</font>";
			}else{
			echo "<hr><H3>Лог чата персонажа <B>".$_REQUEST['logchat']."</B>:</H3>";
			$res=db_use('query',"SELECT c.*,r.roomname FROM chat c 
			left join room r on r.id_room=c.id_room where 
			((c.nick='".mysql_escape_string($_REQUEST['logchat'])."'".(($myinfo->align>=1.99 && $myinfo->align<=1.999)?" OR id_person='".$id_person_x."'":'').") and c.type<2)
			 or 
			(c.nick='".mysql_escape_string($_REQUEST['andwho'])."' and (c.text like '%to [".mysql_escape_string($_REQUEST['logchat'])."]%' or c.text like '%private [".mysql_escape_string($_REQUEST['logchat'])."]%') and c.type<2) order by c.timestamp desc");
			unset ($i);while ($i<mysql_num_rows($res)) { 
				$i++;$s=mysql_fetch_array($res);
				if ($s['type']==0) {
					echo '<span class=date>'.date('d.m H:i',$s['timestamp']).'</span> ['.$s['roomname'].'] '.$s[nick].': <font color='.$s['color'].'>'.str_replace("\\","&#x5C;",htmlspecialchars($s['text']))."</font><BR>";
				}else{
					echo '<span class=sysdate>'.date('d.m H:i',$s['timestamp']).'</span> ['.$s['roomname'].'] '.$s[nick].': <font color=red>'.str_replace("\\","&#x5C;",htmlspecialchars(($myinfo->id_person==12?$s['text']:'Private'))).'</font><BR>';
				}
			}
			}
		}
}
}#/zakon

}

if($pal_abil[35]) {
if ((int)$myinfo->align==1) {$s='Орден Света сообщает';$r=0;}
if ((int)$myinfo->align==1 && $myinfo->align>=1.991) {$s='Администрация сообщает';$r=0;}
if ((int)$myinfo->align==3) {$s='Тарманы сообщают';$r=0;}
if ($myinfo->id_clan==52) {$s='ORGTEAM';$r=$myinfo->id_room;}
if ($_REQUEST['inchat_org']){
	db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".strval($r)."','','".$s.": ".mysql_escape_string(htmlspecialchars($_REQUEST['textinchat_org']))."','Black','2')");
}
echo '<table>
<tr><td><form method=post action=pal.php></td><td>В чат ('.$s.'):<input type=text name=textinchat_org><input type=submit name="inchat_org" value="Объявить"></td><td></form></td></tr></table>';
}

if ($myinfo->id_person==12 or $myinfo->id_person==58) {

if ($_REQUEST['refer'] && $myinfo->id_person==12){
$res=db_use('query',"select r.*,p.level,p.align,c.clanname,u.login from refer r left join person p on p.id_person=r.id_person 
left join users u on u.id_person=p.id_person left join clans c on c.id_clan=p.id_clan order by r.time desc");
unset($i);while ($i<mysql_num_rows($res)) { 
	$i++;$s=mysql_fetch_array($res);
	echo date('d.m.Y H:i:s',$s['time']).' <b>'.$s['number'].'$</b> '.'<SCRIPT>drwfl("'.$s['login'].'",'.$s['id_person'].',"'.$s['level'].'","'.$s['align'].'","'.$s['clanname'].'");</SCRIPT><br>';
}
}elseif($_REQUEST['inchat2']){ 
	new_chat_message5($_REQUEST['id'],$_REQUEST['textinchat2']);
}elseif ($_REQUEST['inchat']){
	db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'0','','".$_REQUEST['textinchat']."','Black','2')");
}elseif ($_REQUEST['inchat3']){
	db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','внезапный задницекус','".$_REQUEST['textinchat3']."','Black','4')");
}elseif ($_REQUEST['inchat4']){
	db_use('query',"insert into chat (timestamp,id_room,nick,text,color,type) values(".time().",'".$myinfo->id_room."','внезапный задницекус','<img src=".$_REQUEST['textinchat4'].">','Black','4')");
}elseif ($_REQUEST['peredat'] && $myinfo->id_person==12){
	$res=db_use('array',"select id_person,level from person where persname='".mysql_escape_string($_REQUEST['login'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['login'])."')");
	$id_person_x=$res['id_person'];
	if (!$id_person_x) {$mess='Персонаж не найден';} else{
		db_use('query',"update inv set id_person='".$id_person_x."' where id_thing='".mysql_escape_string($_REQUEST['id_th'])."'");
		$mess='Передано '."update inv set id_person='".$id_person_x."' where id_thing='".mysql_escape_string($_REQUEST['id_th'])."'";
	}
}elseif ($_REQUEST['skinut'] && $myinfo->id_person==12){
	$res=db_use('array',"select id_person,money from person where persname='".mysql_escape_string($_REQUEST['login'])."' or id_person=(select id_person from users where login='".mysql_escape_string($_REQUEST['login'])."')");
	$id_person_x=$res['id_person'];
	if (!$id_person_x) {$mess='Персонаж не найден';} else{
			$m=db_use('array',"select 	
		masw1,masw2,masw3,masw4,masw5,m_magic1,m_magic2,m_magic3,m_magic4,m_magic5,m_magic6,m_magic7
		from person where id_person='".$id_person_x."'");
		$points=$m['masw1']+$m['masw2']+$m['masw3']+$m['masw4']+$m['masw5']+$m['m_magic1']+$m['m_magic2']+$m['m_magic3']+$m['m_magic4']+$m['m_magic5']+$m['m_magic6']+$m['m_magic7'];
		db_use('query',"update person set mast_points=mast_points+'".$points."',		masw1=0,masw2=0,masw3=0,masw4=0,masw5=0,m_magic1=0,m_magic2=0,m_magic3=0,m_magic4=0,m_magic5=0,m_magic6=0,m_magic7=0 where id_person='".$id_person_x."';");
		$mess='Удачно скинуты умения';
	}
}elseif ($_REQUEST['zamshmot'] && $myinfo->id_person==12){
db_use('query',"update thing set id_thing2='".mysql_escape_string($_REQUEST['id_th2'])."' where id_thing2='".mysql_escape_string($_REQUEST['id_th1'])."';");
db_use('query',"update thing_history set id_thing2='".mysql_escape_string($_REQUEST['id_th2'])."' where id_thing2='".mysql_escape_string($_REQUEST['id_th1'])."';");
db_use('query',"delete from shop where id_thing2='".mysql_escape_string($_REQUEST['id_th2'])."';");
db_use('query',"update shop set id_thing2='".mysql_escape_string($_REQUEST['id_th2'])."' where id_thing2='".mysql_escape_string($_REQUEST['id_th1'])."';");
$mess='Заменено';
}
echo "<font color=green>".$mess."</font>";
echo '<br />
<table>
<tr><td><form method=post action=pal.php></td><td><input type=text name=textinchat><input type=submit name="inchat" value="Объявить"></td><td></form></td></tr>
<tr><td><form method=post action=pal.php></td><td><input type=text name=textinchat2> кому id <input type=text name=id><input type=submit name="inchat2" value="Объявить лично"></td><td></form></td></tr>
<tr><td><form method=post action=pal.php></td><td><input type=text name=textinchat3><input type=submit name="inchat3" value="Объявить системное"></td><td></form></td></tr>
<tr><td><form method=post action=pal.php></td><td><input type=text name=textinchat4><input type=submit name="inchat4" value="Объявить системное - картинка"></td><td></form></td></tr>
';
if ($myinfo->id_person==12) {
echo'<tr><td><form method=post action=pal.php></td><td>Передать id_thing=<input type=text name=id_th> login<input type=text name=login><input type=submit name="peredat" value="Передать"></td><td></form></td></tr>';echo'
<tr><td><form method=post action=pal.php></td><td><input type=submit name="refer" value="SMS коды"></td><td></form></td></tr>
<tr><td><form method=post action=pal.php></td><td>login=<input type=text name=login><input type=submit name="skinut" value="Скинуть умения"></td><td></form></td></tr>
<tr><td><form method=post action=pal.php></td><td>id_th2=<input type=text name=id_th1> меняем на id_th2=<input type=text name=id_th2><input type=submit name="zamshmot" value="Заменить шмотку"></td><td></form></td></tr>';
}
echo'
</table>';
echo '&lt;img src=../i/klan/SeriousDamageBringers.gif&gt; &lt;SCRIPT&gt;drwfl("login",id,"lev","align","clanname");&lt;/SCRIPT&gt;';


if ($myinfo->id_person==12 OR $myinfo->id_person==58) {

#echo $dburl . ':' . $dbport. $dbuser. $dbpassword;
 function query_db($query) 
 {
        mysql_connect('localhost','abk_query','nun3f9Ve3q2rJyBs')
         or die('Не получается подключиться. Проверьте имя сервера, имя пользователя и пароль!');
        mysql_select_db('abk') or die('Ошибка входа в базу данных');
		mysql_query("SET NAMES cp1251;");   
		 $result = mysql_query($query) or die('<small><b>SQL Ошибка запроса:</b><br><font color=red>'.$query.'</font></small><br>');
     mysql_close();
       return $result;
}

echo "<form method=post action=pal.php?query=1><textarea rows=10 cols=70 name=myquery></textarea><input type=submit></form>";
if ($_REQUEST['query']) {
        mysql_connect('localhost','abk_logs','mQHTT4Z2WaVefrH3')
         or die('Не получается подключиться. Проверьте имя сервера, имя пользователя и пароль!');
        mysql_select_db('abklogs') or die('Ошибка входа в базу данных');
		mysql_query("SET NAMES cp1251;");   
		 $result = mysql_query("insert into aquery(ip,zapros,id_person) values('".userip()."','".mysql_escape_string(str_replace("\'","'",str_replace('\"','"',$_REQUEST['myquery'])))."','".strval($myinfo->id_person)."');");
     mysql_close();

$res=query_db(str_replace("\'","'",str_replace('\"','"',$_REQUEST['myquery'])));
unset($i);while ($i<mysql_num_rows($res)){
$i++;$s=mysql_fetch_array($res);
	if ($i==1) {
		echo "<table border=1>";
		foreach ($s as $key => $value) {
			echo ((strval($key)>0 or $key===0)?'':"<td>".$key."</td>");
		}echo "</tr>";
	}
	echo "<tr>";
	foreach ($s as $key => $value) {
		echo ((strval($key)>0 or $key===0)?'':"<td>".htmlspecialchars($value)."</td>");
	}echo "</tr>";
}
echo "</table>";
}
}

}

echo "<script>rezultat.innerHTML='".$mess."';</script>";
}else {
$session->destroy_session(session_id() );
session_destroy();
header("Location: totop.htm"); die;
}
?>
</FORM>
</BODY>
</HTML>