Yoko

Кстати извиняюсь поправил этот модуль. Просто когда писали его с Ветром я не особо заморачивался. Там мне неделя гдет до армии оставалась сами понимаете...

sub ControlOfDanger()
var Time,danger,Space
Time=Time()
Space=' '
while 1
uo.DeleteJournal()
repeat
wait(100)
until uo.InJournal ...

Есть скриптик старый на Time и Date by Michail


sub Date(Number,Divider)
var Ser=STR(Number),D=''
if Len(Ser)==5 then
Ser='0'+Ser
end if
D=right(Ser,2)+Divider+Mid(Ser,2,2)+Divider+Left(Ser,2)
return D
end sub

sub Time(Number,Divider)
var i,T=''
var Ser=STR(Number)
for i=0 to Len(Ser)-2 step 2
T ...

Не все я например не забил
Отвечу на вопрос задержки после usable...

sub ControlOfDanger()
var Time,danger,Space
Time=Time()
Space=' '
while 1
uo.DeleteJournal()
while not uo.InJournal(":")
wait(100)
wend
if uo.InJournal('Ent') then
uo.TextOpen()
uo.TextPrint("Был вырублен ...

Хотя вроди сам тупанул бью скеллетонов от которых не остается корпса. и нету Body of

Вот посмотри мираж вродибы так ?

var MobType,WeaponType,ShieldType,Mob,Distance,Corpse,Amount,i,Bandages
; Переменные
Distance=10 ; дистанция
Bandages='0x0E21' ; тип бинтов
MobType='0x0003' ; тип моба

sub UOKillerBot()
WeaponType=UO.GetSerial(UO.ObjAtLayer('Rhand'))
ShieldType=UO&#46 ...

а закрывать for где ? вот в этом основной вопрос

Имеется вот такой скрипт. Никак не могу понять как в него вставить массив мобов. Может быть кто-нибудь поможет...

var MobType,WeaponType,ShieldType,Mob,Distance,Corpse,Amount
; Переменные
WeaponType=UO.GetSerial(UO.ObjAtLayer('Rhand'))
ShieldType=UO.GetSerial(UO.ObjAtLayer('Lhand ...

подскажи допустим у меня работает скрипт lumberjacking и паралельно скрипт controlofdanger, тут бах вылетает дятел, срабатывает скрипт controlofdanger. как сделать чтобы если сработал controlofdanger скрипт lumberjacking ставился на паузу пока, controlofdanger выполняеться. Как только засейвились ...

подскажи допустим у меня работает скрипт lumberjacking и паралельно скрипт controlofdanger, тут бах вылетает дятел, срабатывает скрипт controlofdanger. как сделать чтобы если сработал controlofdanger скрипт lumberjacking ставился на паузу пока, controlofdanger выполняеться. Как только засейвились ...

Всем привет.2 года пользовался скриптом ветерана и компании на ламбер. Все было хорошо до сего момента.
То есть когда я заканчиваю маркнье и нажимаю на себя чтобы сохранились марки в файл мне выдает ошибку unhandled exception parser. В чем может быть проблема? Единственное различие в том что ...

##########################################################
### Lumberjacking / Рубка деревьев v6.9 (Last) ###
##########################################################
### Шард Dragon World / www.drw.ru ###
##########################################################
### СКРИПТ ...

Mirage wrote:И рядом будет постоянно какоу-нибудь Вася бегать и орать

Oak!
Oak!!
Oak!!!

И твой чар будет постоянно переходить и переходить...

Да но можно написать так что никакой вася не узнает

да и если не нравиться .dat сделай .txt

Все правильно так.
Если причина в том что чар подходит к дереву и не рубит то проверьте эти строчки:

TreeCount=TreeCount+1
TreeX[TreeCount]=uo.LastTile(1)
TreeY[TreeCount]=uo.LastTile(2)
TreeT[TreeCount]=uo.LastTile(0)-1

они должны выглядеть так:

TreeCount ...

sub CheckLogs()
var l1,l2,l3,l4,l5
l1="the Oak"
l2="the Gold"
l3="the Orion"
l4="the Logs"
l5="the Copper"

if UO.InJournal(l1) or UO.InJournal(l2) or UO.InJournal(l3) or UO.InJournal(l4) or UO.InJournal(l5) then
wait(500)
return 1
end if
return 0
end sub

сделал чек по ...

А если мне их дропать не надо... как тогда проверять логи?

сечас еще попробую вроди бы разобрался. Спс если что еще напишу...

sub WaitForChange()
var Text1=uo.GetName()+': You hack at the tree for a while, but fail to produce any useable wood.'
var Text2='There are no logs here to chop.'
var Text3="You can't reach this."
var Text4='That is too far away.'
var Text5="You can't do much in your ...

Mirage wrote:проблема с Patching решается выставлением совмиестимости с Windows XP SP3 в свойствах инжекта.
Версия инжекта 7** берет автолоад с корня игры
Версия инжекта 5** берет автолоад с папки инжекта.

Спасибо за разъяснение.

скинь весь скрипт

##################
### Переменные ###
##################
##################################################################################################################
###
var FileName=('D:\trees.dat') ## - Путь к файлу в котором будут хранится координаты деревьев ...