Буду очень бланодарен товариги скриптеры.


Moderators: Murderator+, Murderator
Code: Select all
sub Taming()
var count=0
uo.print('Тотем')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
while NOT UO.Dead()
UO.DeleteJournal()
UO.WaitTargetObject('TOT')
UO.UseType('0x13F8')
repeat
wait(1000)
until UO.InJournal('You fail') OR UO.InJournal('It seems')
If Uo.InJournal('It seems') Then
UO.Say('All release')
Endif
wend
end sub
Code: Select all
sub AnimalToShrink()
var idAnimal = uo.getserial('0x002FE46C')
var cAnimal = uo.getcolor(idAnimal)
var xA,yA,zA,dA
if uo.count('0x0F0E','0x0388') == 0 then
uo.print('шринков то и нет ')
return
end if
dA = uo.GetDistance(idAnimal)
xA = uo.GetX(idAnimal)
yA = uo.GetY(idAnimal)
zA = uo.GetZ(idAnimal)
uo.waittargetobject(idAnimal)
uo.usetype('0x0F0E','0x0388')
while uo.containerof(idAnimal) == '0xFFFFFFFF'
wait(100)
wend
uo.set('finddistance',str(dA))
uo.findtype('-1',cAnimal,'ground')
while uo.findcount() > 0
if uo.GetX('finditem') == xA and uo.GetZ('finditem') == zA and uo.GetZ('finditem') == zA then
uo.moveitem('finditem','-1','backpack')
return
else
uo.ignore('finditem')
end if
wend
uo.set('finddistance','14')
end sub
Code: Select all
sub Taming()
var count=0
var TOT = '0x00000000'
UO.DeleteJournal()
while NOT UO.Dead()
UO.DeleteJournal()
UO.WaitTargetObject('TOT')
UO.UseType('0x13F8')
repeat
wait(1000)
until UO.InJournal('You fail') OR UO.InJournal('It seems')
If Uo.InJournal('It seems') Then
AnimalToShrink()
Endif
wend
end sub
Code: Select all
sub AnimalToShrink()
var idAnimal = uo.getserial('0x002FE46C')
var cAnimal = uo.getcolor(idAnimal)
var xA,yA,zA,dA
if uo.count('0x0F0E','0x0388') == 0 then
uo.print('шринков то и нет ')
return
end if
dA = uo.GetDistance(idAnimal)
xA = uo.GetX(idAnimal)
yA = uo.GetY(idAnimal)
zA = uo.GetZ(idAnimal)
uo.waittargetobject(idAnimal)
uo.usetype('0x0F0E','0x0388')
while uo.containerof(idAnimal) == '0xFFFFFFFF'
wait(100)
wend
uo.set('finddistance',str(dA))
uo.findtype('-1',cAnimal,'ground')
while uo.findcount() > 0
if uo.GetX('finditem') == xA and uo.GetZ('finditem') == zA and uo.GetZ('finditem') == zA then
uo.moveitem('finditem','-1','backpack')
return
else
uo.ignore('finditem')
end if
wend
uo.set('finddistance','14')
end sub
В чем проблема?
Берем первый скрипт, убираем оттуда релиз и вставляем туда функцию шринка.
Кстати, что за UO.UseType('0x13F8') в функции тайминга?Code: Select all
sub Taming()
var count=0
var TOT = '0x00000000'
UO.DeleteJournal()
while NOT UO.Dead()
UO.DeleteJournal()
UO.WaitTargetObject('TOT')
UO.UseType('0x13F8')
repeat
Code: Select all
UO.UseType('0x13F8')
Code: Select all
var TOT = '0x00000000'
Code: Select all
sub Taming()
var count=0
var TOT
UO.DeleteJournal()
while NOT UO.Dead()
UO.DeleteJournal()
UO.set('finddistance', 4)
UO.findtype('0x0000','-1','ground') #Вот тут тайп живки
wait(100)
if UO.FindCount() then
TOT=UO.GetSerial('finditem')
UO.WaitTargetObject('TOT')
UO.UseType('0x13F8')
repeat
wait(1000)
until UO.InJournal('You fail') OR UO.InJournal('It seems')
If Uo.InJournal('It seems') Then
AnimalToShrink()
Endif
end if
wend
end sub
Code: Select all
sub AnimalToShrink()
var idAnimal
var cAnimal
var xA,yA,zA,dA
if uo.count('0x0F0E','0x0388') == 0 then
uo.print('шринков то и нет ')
return
end if
UO.set('finddistance', 3)
UO.findtype('0x0000','-1','ground') #Вот тут тайп шринкованной живности
wait(100)
if UO.FindCount() then
idAnimal=UO.GetSerial('finditem')
cAnimal = uo.getcolor(idAnimal)
dA = uo.GetDistance(idAnimal)
xA = uo.GetX(idAnimal)
yA = uo.GetY(idAnimal)
zA = uo.GetZ(idAnimal)
uo.waittargetobject(idAnimal)
uo.usetype('0x0F0E','0x0388')
while uo.containerof(idAnimal) == '0xFFFFFFFF'
wait(100)
wend
uo.set('finddistance',str(dA))
uo.findtype('-1',cAnimal,'ground')
while uo.findcount() > 0
if uo.GetX('finditem') == xA and uo.GetZ('finditem') == zA and uo.GetZ('finditem') == zA then
uo.moveitem('finditem','-1','backpack')
return
else
uo.ignore('finditem')
end if
wend
uo.set('finddistance','14')
end if
end sub