Вобщем. Вот отключение почти в "голом" виде:
Оффтоп
PHP код:
const nameCon='АяПростоБулка'; var tempnick,tempstr:string; tempint:integer; procedure Init; //Вызывается при включении скрипта begin sendmsg('begin'); end; procedure Free; //Вызывается при выключении скрипта begin end;
begin if ConnectName<>nameCon then exit; if fromserver then begin if pck[1]=#$4a then begin tempint:=10; tempnick:=ReadS(tempint);tempint:=tempint+4; tempstr:=ReadS(tempint);sendMSG(tempnick+' сообщает: '+tempstr); end; exit;//заглушка, мне не требовалось end else begin if pck[1]=#$00 then begin pck:=''; NoCloseServerAfterClientDisconnect; NoCloseClientAfterServerDisconnect; sendMsg('Клиент - отключен, соединение сохранено'); buf:=#$84;SendToClientEx(nameCon);exit; end; end; end.
Вот такой лог получил в итоге (в чат пишет СладкаяПупсенька, а на скрипте - АяПростоБулка):
Оффтоп
18.03.2014 19:02:51 Имя соединения для тунеля ($257055264): АяПростоБулка
18.03.2014 19:02:57 Script: АяПростоБулка сообщает: Вас приветствует сервер Arena-World
18.03.2014 19:02:57 Script: АяПростоБулка сообщает: Сайт сервера: http://www.Arena-World.com
18.03.2014 19:02:57 Script: АяПростоБулка сообщает: Добро пожаловать на сервер от команды High Five x5000
18.03.2014 19:02:57 Script: АяПростоБулка сообщает: Связь с администрацией осуществляется только через форум!
18.03.2014 19:02:57 Script: АяПростоБулка сообщает: О всех найденых недоработках просьба сообщать на форум.
18.03.2014 19:02:57 Script: АяПростоБулка сообщает: PvP Zona > use command .pvp
18.03.2014 19:02:57 Script: АяПростоБулка сообщает: Farm Zona > use command .farm_hard>.farm_low
18.03.2014 19:02:57 Script: АяПростоБулка сообщает: Желаем приятной игры!
18.03.2014 19:03:09 Script: Клиент - отключен, соединение сохранено
18.03.2014 19:03:09 Тунель ($257055264) Отвалились от клиента
18.03.2014 19:03:19 Script: СладкаяПупсенька сообщает: 12345
18.03.2014 19:03:22 Script: СладкаяПупсенька сообщает: 54321
18.03.2014 19:03:43 Script: СладкаяПупсенька сообщает: ---------------
Где ты у себя напорол - что "по два раза заводить перса приходится" - без понятия.
ЗЫ спасибо администрации сервера за возможность демонстрации и т.д....
__________________
На фразы в аську типа "слух карочь 1)как точить 2)как раскачаться за 5 мин" - игнор. ИМХО идиотизм
Дай голодному рыбу - он будет один день сыт. Покажи ему, как удить рыбу - он пошлёт тебя и скажет, что у него есть более интересные занятия, чем забрасывать снасти в воду
David Kastrup @ de.comp.text.tex.
"Приобретенные навыки общения с маленькими детьми - сильно упрощают взаимопонимание на форумах..."
А вы знаете, что для качественной сварки - место шва нужно протереть спиртом?
Последний раз редактировалось Breadfan, 18.03.2014 в 20:11.
|