держи, только незабудь подключить WebIcqLite.class.php, его думаю не трудно найти!
<?
$UIN = '123456789'; //icq-номер
$PASSWORD = 'password'; //пароль
if($_GET[site]==""){$site = "icq-world.wen.ru";}else{$site = $_GET[site];}
if(!isset($_POST[uin]) or !isset($_POST[text]))
{
if(isset($_GET[uin])){echo '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=utf-8">
<title>Отправка соощений ICQ</title>
</head>
<body>
<b>Отправка ICQ-сообщений</b><br/>
<form method="post" action="index.php">
Номер ICQ:<br>
<input type="Text" name="uin" value="'.$_GET[uin].'" maxlength="9"><br>
Сообщение:<br>
<input type="Text" name="text" value="" maxlength="500"><br>
<input type=submit name="send" value="Отправить">
</form><br>
<p>
</body>
</html>';
}else{
echo '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=utf-8">
<title>Отправка сообщний ICQ</title>
</head>
<body>
<b>Отправка ICQ-сообщений</b><br/>
<form method="post" action="index.php">
Номер ICQ:<br>
<input type="Text" name="uin" value="" maxlength="9"><br>
Сообщение:<br>
<input type="Text" name="text" value="" maxlength="500"><br>
<input type=submit name="send" value="Отправить">
</form><br>
<p>
</body>
</html>';
}}else{
include('WebIcqLite.class.php');
$text=Encode($_POST[text],w);
$icq = new WebIcqLite();
if($icq->connect($UIN, $PASSWORD)){
if(!$icq->send_message($_POST[uin], $text)){
echo $icq->error;
}else{
echo '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=utf-8">
<title>ICQ</title>
</head>
<body>
<b>Отправка ICQ-сообщений</b><br/>
Сообщение отправлено.<br>
</body>
</html>';
}
$icq->disconnect();
}else{
echo $icq->error;
}
}
function Encode($str,$type=u)
{
$conv=array();
for($x=192;$x<=239;$x++)
$conv[u][chr($x)]=chr(208).chr($x-48);
for($x=240;$x<=255;$x++)
$conv[u][chr($x)]=chr(209).chr($x-112);
$conv[u][chr(168)]=chr(208).chr(129);
$conv[u][chr(184)]=chr(209).chr(209);
$conv[w]=array_flip($conv[u]);
if($type=='w' || $type=='u')
return strtr($str,$conv[$type]);
else
return $str;
}
?>