delphi Код:
var
Form : tform;
Button : Tbutton;
Procedure ButtonHandle(sender:tobject);
begin
//Сюда - реакцию по нажатию кнопки.
//Как пример - отправка пм'а "привет -)" от игрока "скрипт" на клиент с именем соединения "mychar"
buf := #$4a;
writed(0);
writed(2);
writes('Скрипт');
writes('Привет -)');
sendtoclientex('mychar');
end;
procedure Init; //Вызывается при включении скрипта
begin
Form := tform.create(nil);
Button := tbutton.create(form);
Button.parent := form;
button.onclick := @ButtonHandle;
button.caption := 'Отправить';
Form.autosize := true;
form.formstyle := fsstayontop;
form.borderwidth := 15;
form.show;
end;
procedure Free; //Вызывается при выключении скрипта
begin
button.free;
form.free;
end;
//основная часть скрипта
//вызывается при приходе каждого пакета если скрипт включен
begin
end.
всунь содержимое в новый скрипт, отредактируй имя чара на свое, поставь галочку напротив скрипта, зайди в игру и потыкай кнопку.
Добавлено через 3 минуты
это пример создания формы с кнопкой с привязкой на кнопку реакции. а так же пример "сборки" пакета и отправки его по имени соединения.
модифицируя содержимое ButtonHandle думаю добъешся чего хочешь.