Vizit0r wrote:...

Так-же очень благодарен за старания.

drabadan wrote: угу, так и есть

Все! Заработало! Низкий поклон!

Ну чо там как оно, работает не? Хм, вроде все как надо, но.. Короче, когда запускаю этот скрипт на реконнект, только этот один и само-собой, персонаж стоит на месте, то реконнект работает как положено и указано в самом скрипте :!: но вот если запустить вместе с ним другой, в котором персонаж бегает...

drabadan wrote:Ну чо там как оно, работает не?

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

p.s.: огромное спасибо за старание!

drabadan wrote: Щас отремонтируем

Буду ждать

Не работает дисконнект на этом скрипте :( Я даже, интереса ради, изменил: (_WAITTIME_MINS * 6) Вот лог спустя некоторое время: 17:41:02:030 [needmore]: Compiling 17:41:02:043 [needmore]: Compiled succesfully 17:54:07:911 [needmore]: Succesfully executed 17:54:07:912 [needmore]: Script CHECK STOP.sc ...

Попробуй, может будет работать, но писал на работе и не тестил... Чет не совсем понял сколько минут должно пройти до следующей проверки и дисконнекта. По идеи 6 минут. Я запустил этот скрипт, персонаж при этом просто стоит на месте. Прошло уже больше 12 минут - никакой реакции. Может там не 6 минут...

Попробуй, может будет работать, но писал на работе и не тестил... Program CheckStop; const _WAITTIME_MINS = 1; type TPosition = record X : Word; Y : Word; end; function SetPosition(X, Y : Integer) : TPosition; begin Result.X := X; Result.Y := Y; end; var OldPosition : TPosition; G_Index : Integer; ...

А вот еще что заметил.. Если запустить этот скрипт на реконнект и параллельно запустить мой основной, в котором персонаж бегает, добывает ресурсы и т.п., то происходит примерно следующее: после запуска основного, когда персонаж не стоит на месте, а передвигается, то скрипт на реконнект делает отключ...

currX := GetX(Self); currY := GetY(Self); repeat строки поменять местами, чтобы установка переменных была в цикле. Благодарю! *ушел тестить* После запуска, уже измененного, скрипта персонажа продолжает отключать и подключать обратно к серверу. Если запущен только этот скрипт и персонаж просто стоит...

Vizit0r wrote:currX := GetX(Self); currY := GetY(Self);
repeat

строки поменять местами, чтобы установка переменных была в цикле.

Благодарю! *ушел тестить*

Сделал еще такой вариант var stime : TDateTime; currX, currY : Word; Begin while true do begin stime := Now; currX := GetX(Self); currY := GetY(Self); repeat wait(9000); if (currX <> GetX(Self)) or (currY <> GetY(Self)) then Break; UseObject(backpack); until Now > stime + (5.0/1440); while true do b...

var stime : TDateTime; currX, currY : Word; Begin while true do begin stime := Now; currX := GetX(Self); currY := GetY(Self); repeat wait(9000); if (currX <> GetX(Self)) or (currY <> GetY(Self)) then Break; UseObject(backpack); until Now > stime + (5.0/1440); if (currX = GetX(Self)) or (currY = Get...

Vizit0r wrote:5 минут
9 секунд

Понял, благодарю

Столкнулся еще с такой проблемкой.. Слепил скрипт, но видимо где-то неправильно и после дисконнекта скрипт останавливается... var stime : TDateTime; currX, currY : Word; begin stime := Now; currX := GetX(Self); currY := GetY(Self); repeat wait(9000); if (currX <> GetX(Self)) or (currY <> GetY(Self))...