Вернуться   CoderX :: Forums > Lineage II > L2PacketHack > Скриптинг
Войти через OpenID

Скриптинг Форум посвещенный созданию скриптов для L2PacketHack

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
Ответ
 
Опции темы Опции просмотра
Старый 09.11.2012, 20:53   #1
Новичок
 
Регистрация: 09.11.2012
Сообщений: 1
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
Elloe пока неопределено
По умолчанию HTML

скритп для HF, собственно хотел что бы при вводе в чат Elloe, вылетала HTMLка с кнопками, помогите решить поставленную задачу

Цитата:
// скрипт на телепор
// вводим в ALL чате Elloe


var
bypass: string;
objectID, actionID, status: integer;

const
HTML='<html><body><center>'+
'<img src="L2UI_CH3.herotower_deco width=256 height=32>'+
'<img src="L2UI.SquareWhite" width=260 height=1>'+
'<img src="L2UI.SquareBlank" width=260 height=4><br>'+
'<button value="Town" action="bypass -h Town" width=100 height=15 back="sek.cbui94" fore="sek.cbui92">'+
'<img src="L2UI.SquareWhite" width=260 height=1>'+
'<img src="L2UI.SquareBlank" width=260 height=4><br>'+

'</center></body></html>';

const
HTML_Town='<html><body><center>'+
'<img src="L2UI_CH3.herotower_deco" width=256 height=32>'+
'<font color="04fbfb">Town</font><br>'+
'<img src="L2UI.SquareWhite" width=260 height=1>'+
'<img src="L2UI.SquareBlank" width=260 height=4><br><td>'+
'<a action="_bbsteleport;teleport; 147450 27120 -2208 5000">Aden</a>'+
'<button value="Назад" action="bypass -h main" width=60 height=15 back="sek.cbui94" fore="sek.cbui92"><br>'+
'<img src="L2UI.SquareWhite" width=260 height=1>'+
'<img src="L2UI.SquareBlank" width=260 height=4><br>'+

'</center></body></html>';




Procedure ShowHTML( _html : string );
begin
buf:=#$0Ef;
WriteD(5);
WriteS(_HTML);
SendToClient;
end;

begin
if FromClient and (pck=#$49#$45#$00#$6C#$00#$6C#$00#$6F#$00#$65#$00# $00#$00#$00#$00#$00#$00) then
begin
ShowHTML(HTML);
end;

if FromClient and (pck[1]=#$21) then
begin
Bypass:=ReadS(2);
case Bypass of
'main' : ShowHTML(HTML);
'Town' : ShowHTML(HTML_Town);

end;
end;
end.
Elloe вне форума   Ответить с цитированием
Старый 11.11.2012, 00:53   #2
Местный
 
Аватар для J-Fobos
 
Регистрация: 09.06.2008
Сообщений: 867
Сказал Спасибо: 175
Имеет 468 спасибок в 259 сообщенях
J-Fobos пока неопределено
По умолчанию

SendToClientEx
__________________

В любом из нас спит гений. И с каждым днем все крепче.

Переходим на протокол нового поколения jabber
J-Fobos вне форума   Ответить с цитированием
Ответ

  CoderX :: Forums > Lineage II > L2PacketHack > Скриптинг



Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +4, время: 03:43.

vBulletin style designed by MSC Team.
Powered by vBulletin® Version 3.6.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод: zCarot
Locations of visitors to this page
Rambler's Top100

Вы хотите чувствовать себя в безопасности? чоп Белган обеспечит её!