[VORON]

var
frm:Tform;
shape:Tshape;

procedure Init; //Вызывается при включении скрипта
begin
frm := TForm.Create(nil);
frm.Caption := 'Chat';
frm.BorderStyle := bsSizeable;
frm.Position := poScreencenter;
frm.Width:=600;
frm.Height:=700;
frm.FormStyle:=FsStayOnTop;
frm.Show;

shape :=Tshape.create(nil);
shape.parent:=frm;

shape.left:=100; //координаты
shape.top:=150;
shape.width:=30; //размеры
shape.height:=40;

end;

procedure Free; //Вызывается при выключении скрипта
begin
shape.free; //тут вот главное очередность не перепутать- сначала объекты созданные на фОРМЕ
frm.Free; //А потом саму форму кил..
end;

//основная часть скрипта
//вызывается при приходе каждого пакета если скрипт включен
begin

end.

Добавлено спустя 3 минуты 47 секунд:
хотя думаю что для динамичково удаления и создания новых точек визуализирующих мобов нужно применять массив из ТШАПЕ:
var
frm:Tform;
shape: array [1..100] of Tshape;

procedure Init; //Вызывается при включении скрипта
begin
frm := TForm.Create(nil);
frm.Caption := 'Chat';
frm.BorderStyle := bsSizeable;
frm.Position := poScreencenter;
frm.Width:=600;
frm.Height:=700;
frm.FormStyle:=FsStayOnTop;
frm.Show;

shape[1]:=Tshape.create(nil);
shape[1].parent:=frm;

shape[1].left:=100; //координаты
shape[1].top:=150;
shape[1].width:=30; //размеры
shape[1].height:=40;

end;

procedure Free; //Вызывается при выключении скрипта
begin
shape[1].free; //тут вот главное очередность не перепутать- сначала объекты созданные на фОРМЕ
frm.Free; //А потом саму форму кил..
end;

//основная часть скрипта
//вызывается при приходе каждого пакета если скрипт включен
begin

end.

Добавлено спустя 8 минут 52 секунды:
по мере работы скрипта можно будет динамически удалять елементы из массива SHAPE[1..100] и создовать новые екземпляры.. а такжэ изменять у уже созданных екземпляров свойства TOP и LEFT (если моб перемешается)