Page 1 of 1
Есть ли у каво?(
Posted: 2007-11-04 16:03:21
by No***Name
Вотобщем срипт - Чар стоит на респе, появляеться живка он ее таймит -шринкует -кидает-в пак-на протежении всего времени кричит Guards)
Буду очень бланодарен товариги скриптеры.

Posted: 2007-11-04 16:13:31
by Scripts Writer
Скрипт не сложный- совмести таминг с поиском животным, зашринкованием и криками гвардс если вокруг будет персонаж с красным ником -и зацикли всё это.
Posted: 2007-11-04 16:25:38
by No***Name
Scripts Writer wrote:Скрипт не сложный- совмести таминг с поиском животным, зашринкованием и криками гвардс если вокруг будет персонаж с красным ником -и зацикли всё это.
Я конешно супер мега скриптер)), но такой написать не смогу))
Posted: 2007-11-04 19:29:34
by Okypok
Ну возьми скрипт на таминг. ДОбавь туда шринк животного и grab по типу.
Posted: 2007-11-04 19:35:23
by No***Name
Okypok wrote:Ну возьми скрипт на таминг. ДОбавь туда шринк животного и grab по типу.
Для меня слова *добавь, напиши, перепиши, совмести и т.д* невозможны)), ну я вообще не рублу в скриптах)
Posted: 2007-11-04 20:09:00
by Okypok
Ты же когда-нибудь хочешь сам что-то сделать? Или всегда хотел просить только?

Posted: 2007-11-05 00:23:45
by No***Name
Okypok wrote:Ты же когда-нибудь хочешь сам что-то сделать? Или всегда хотел просить только?

Блин я очень редко пишу когда сам не смогу справиться, но тут не смогу)
Posted: 2007-11-05 10:57:26
by Okypok
Ну давай вместе

Полностью я не буду делать за тебя.
Итай, найди на тайминг скрипт и если есть, то и на шринк. Если нету такого, то как он должен выглядеть по твоему?
Posted: 2007-11-05 15:53:28
by No***Name
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
Posted: 2007-11-05 16:04:40
by Okypok
В чем проблема?
Берем первый скрипт, убираем оттуда релиз и вставляем туда функцию шринка.
Кстати, что за 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
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
Posted: 2007-11-05 16:23:59
by -=JoKeR=-
В чем проблема?
Берем первый скрипт, убираем оттуда релиз и вставляем туда функцию шринка.
Кстати, что за 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
- это мне кажеться таминг стаф =)
А это -->
зачем? ведь айди будут разные у животных, ну жно вместо этого кусочка скрипта, который я выделил, зделать так чтобы чар искал животину по типу и цвету и записывал как ТОТ при удачном поиске. Потом при It seems шринковал.
Posted: 2007-11-05 16:50:58
by Okypok
Да, кстати, я что-то не подумал об этом...
Ну тогда будет так выглядеть:
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
Что-то вроде того тогда будет. Тайпы животного и зашринкованного животного прописать там, где выделено.
Posted: 2007-11-05 17:16:03
by No***Name
Еще бы совместить это все в один скрипт, и я не вижу поиск животного и цикличность.
Posted: 2007-11-05 17:51:54
by Okypok
О_о скопируй, пожалуйста, в один файл оба скрипта и попробуй. Йокалэмэнэ. Они и так совмещены, это две функции. В первой вызывается вторая, если посмотришь внимательно.
А если еще внимательнее посмотреть и увидеть while NOT UO.Dead(), то можно догадаться, что он циклится пока не умрешь.