это uo.od.ua?

Зимой настигла ностальгия, хочется поиграть, но ни один из известных мне серверов не привлекает.
Я играл на ДВ, ФоФе, Голден ворлде, Нью Эйдже, хотелось бы сервак с присутствием классов.
Киньте ссылочек, или не знаю что там)

Program Test; Const needName = 'Carpenter'; vendortype = $0190; Begin FindDistance := 5; While FindType(vendorType, Ground) > 0 Do Begin uosay('found vendor and it''s name is '+GetName(FindItem)); Wait(2000); If GetName(FindItem) <> needName then Begin UOSay('moving '+GetName(FindItem)+' to ignore'...

кто-то подскажет как решить проблему?

If (pos(venNames[0], GetName(FindItem)) <> 0) then begin
вот что не работает

Procedure findVendor; Var vType : Integer; Begin For vType := 0 to High(venTypes) Do Begin While FindType(venTypes[vType], Ground) > 0 Do Begin If (pos(venNames[0], GetName(FindItem)) <> 0) then begin //AddToSystemJournal(IntToStr(GetX(FindItem))+' '+IntToStr(GetY(FindItem))); MoveXY(GetX(FindItem)...

спасибо, попробую

сабж. собственно) чар иногда докупает реги на рекол, до определенного количества, но когда он достигает его то все равно автобай срабатывает хоть и стоит needReags := False;
Я так понимаю что если заюзал автобай то он все время будет покупать то что покупал раньше?

направь на путь истинный)

b:= GetStaticTilesArray(Xmin,Ymin,Xmax,Ymax, 0, TileType[s], a); AddToSystemJournal('Tile Count : ' + IntToStr(b));

Tile Count : 0

все 3 группы попробовал)

а че ему не копать)?
суть в том чтоб создать массив тайлов по которым чар может копать используя тайпы

Shinma соглашайся

действие происходит на брит песках, или на острове под тринсиком с песчаным берегом

,infotile это координаты тайла Вот к примеру тайлы шахт: TyleType[0] := 1386; TyleType[1] := 1363; TyleType[2] := 1362; TyleType[3] := 1361; TyleType[4] := 1359; TyleType[5] := 1358; TyleType[6] := 1357; TyleType[7] := 1356; TyleType[8] := 1355; TyleType[9] := 1354; TyleType[10] := 1353; TyleType[11...

Порыв форум, пробовал кое что и получилось 22, 23, 24, 25 но как-то скрипт не ищет их...