Просто замените and (pck[1]=#$1B) на id пакета написания в чат (Say2), а там где SocialID:=ReadD(2); вместо чтения dword читайте string ну и вместо оператора case приодеться использовать два оператора if так как case не может работать со строками.
__________________
В любом из нас спит гений. И с каждым днем все крепче.
Переходим на протокол нового поколения jabber
|