Page 1 of 1
drink blood
Posted: 2007-05-21 19:12:23
by -=Morf=-
драсте люди, я вернулсо...=))
мне типерь офигеть как нужен скриптик воть такой вота:
запускаеш скрипт, он не выключается, и ищет вокруг чара на расстоянии 3 клетки кровь по типу, типы будут вписывать сам =)
воть если найдет кровь то просто тупо дабл клик на нее, и поновой поиск крови вокруг... и так далее цикл вообщем
Posted: 2007-05-21 19:14:43
by DerMeister =)
ПОИСК!
Posted: 2007-05-21 19:20:06
by -=Morf=-
тиж мну знаеш, я ленивый как чёрттт)) и глупый притом =)
Posted: 2007-05-21 19:22:59
by DerMeister =)
Posted: 2007-05-21 22:16:15
by Nmy
свой старый могу выложыть- если для альфы то типы можно неменять
Code: Select all
sub BFG()
var n
If uo.GetGlobal('BFG')=='On' then
return
else
uo.setglobal('BFG','On')
end if
Dim Blood[5]
Blood[0] = '0x122A'
Blood[1] = '0x122B'
Blood[2] = '0x122C'
Blood[3] = '0x122D'
Blood[4] = '0x122E'
UO.Set('finddistance', 3 )
While NOT UO.Dead() && uo.life < uo.str
For n = 0 TO 4
UO.FindType( Blood[n] ,'-1','1')
If UO.FindCount() then
UO.UseObject('finditem')
wait(10)
endif
Next
Wait(250)
wend
uo.setglobal('BFG', 0)
end sub
Posted: 2007-05-21 22:40:59
by Ururu
Нужно добавить еще и проверку на сообщения.
Posted: 2007-05-22 09:18:12
by u0rypT
Code: Select all
sub krov()
var x
dim a[5]
a[1]=0x122E
a[2]=0x122A
a[3]=0x122C
a[4]=0x122D
a[5]=0x122B
for x=1 to 5
repeat
uo.usefromground(a[x])
next
end sub
sub blood()
If UO.Life<UO.Str Then
uo.usetype("0x0F06","0x0020")
Else
UO.Print("Your HP at maximum!!!")
Endif
end sub
Posted: 2007-05-22 21:06:50
by -=Morf=-
3Jlo6Hblu' u0ry®T wrote:Code: Select all
sub krov()
var x
dim a[5]
a[1]=0x122E
a[2]=0x122A
a[3]=0x122C
a[4]=0x122D
a[5]=0x122B
for x=1 to 5
repeat
uo.usefromground(a[x])
next
end sub
sub blood()
If UO.Life<UO.Str Then
uo.usetype("0x0F06","0x0020")
Else
UO.Print("Your HP at maximum!!!")
Endif
end sub
Так а как сделать чтобы постоянно шла проверка на кровь на растоянии 3 клетки от чара?
Posted: 2007-05-22 22:44:42
by I'm
Posted: 2007-05-23 06:39:19
by -=Morf=-
Posted: 2007-05-23 11:50:27
by I'm
Красавец!
Так держать
