Цитата:
Сообщение от poizon
как подрубать внешние базы я хз так что база предметов прям в скрипте
|
Попробуй вот так (кусок из скрипта бота с картой):
delphi Код:
var
MobsName : TStringList; //имена мобов
procedure Init; //УПРАВЛЯЮЩИЕ ПЕРЕМЕННЫЕ
var
i: integer;
begin
kID:=1020000; //коэфф вычитаемый из NpcID C6 theAbyss.ru
MobsName:=nil;
MobsName:=TStringList.Create;
MobsName.LoadFromFile('.\npcsid.ini' );
end;
//***************************************************************
procedure Free;
begin
MobsName:=nil;
MobsName.free;
end;
//***************************************************************
procedure OnMap(Sender: TObject); //рисуем карту
begin
//ставим точку МОБа
TTlabel[i].caption:=MobsName.Strings[MobsID[i]];
end;