// ищет в указанном контейнере руну и по ней реколится. Procedure Recall(Container: cardinal); Label TryAgain ; Var x : integer; Begin TryAgain: FindType(RuneType,ReagsChest); If FindCount=0 then raiseException(erCustomError,'Рунка НЕ НАЙДЕНА!'); LoadItems(MR,$FFFF,ReagsChest,1); LoadItems(BP,$FFFF...

Мне тоже нравится =) спасибо Грундику =)
Спасибо, все заработало!)

Procedure HideMove(X,Y: integer; accurance: word); var i: integer; Dir: byte; PathArr: TPathArray; Begin While Dest(X,Y)>accurance do begin If (Not Dead) then If (Stam<Dex) then begin // если стамины меньше чем дексы, устанавливаем хумов и элемов в bad objects For i:=0 to 4 do SetBadObject(BadObj[i...

увы и ах

Увы и их (

CFA wrote:Увы, но ничего конкретного не посоветую. Только разбираться с настройками сети и всем сопутствующим.

Ясно, ну все равно спасибо за внимание

Сегодня заметил, что на висте в текущем подключении, почему-то, весит "Доступ: Только локальная сеть", хотя должно быть "Доступ: Локальная сеть и Интернет", но при этом я спокойно нахожусь в интернете. может ли быть связано с этим? Именно в этом и дело. Интернет ограничивается б...

Сегодня заметил, что на висте в текущем подключении, почему-то, весит "Доступ: Только локальная сеть", хотя должно быть "Доступ: Локальная сеть и Интернет", но при этом я спокойно нахожусь в интернете. может ли быть связано с этим? Так как на нетбуке работает данная версия стелса...

Запустил его на другом нетбуке, про обновление ничего не писал, конектится без каких либо траблов.
Нет бук подключен так же как и прошлая машина, фаервол и антивирус не отключал. Разница: на нетбуке - ХП, на ноуте - Виста.
Что на висте может препятствовать?

версии по релиз 1 работают без каких-либо проблем.
У меня Акадо и что бы на всех машинах было подключение сижу через wifi роутер(кабель интера в маршрутизатор, далее второй кабель от маршрутизатора к роутеру), на нем у меня висит 3 ноута и принтер. Может быть защита самого роутера?

CFA wrote:Могу только предположить, что его не выпускает в интернет фаер или антивирус.

Отключил и фаервол и антивирус, ситуация не изменилась

Вначале выдавал ошибку что не может законектится к серверу для обновления, потом после того как вбил все настройки стал выдавать вот это 01:08:35:977 [pim]: Login Error: Сделана попытка выполнить операцию на сокете при отключенной сети До этого сидел на рц1 рц2 рц3 и первом релизе в них все прекрасн...

да

если не сложно мохни то что там нужно, а то что-то вообще не улавливаю тему.. =( Var StartSborTimer: cardinal; Const Bales=$0DF9; Cotton=$0C4F; Spools=$0FA0; Cloth=$175D; Scissors=$0F9E; Bolt=$0F95; Procedure InitStartSbor; Begin StartSborTimer:=Timer; End; Procedure Sbor(Container : cardinal); Begi...

Или я что-то не улавливаю но помоему это и есть весь цикл, остальное проверка к нему не относящаяся.