Если не трудно киньте скрипт на veterinary

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
-Time-
Posts: 28
Joined: 2004-06-15 00:49:22
Contact:

Если не трудно киньте скрипт на veterinary

Post by -Time- »

Если не трудно киньте скрипт на veterinary ;)


Спасиб
Shestak
Posts: 22
Joined: 2004-07-23 11:05:19

Post by Shestak »

sub main()
var x
var s
UO.addtype('bint','0x0E21')
UO.addtype('bintG','0x0E20')
UO.addobject('hors1','0x00611F16')
UO.addobject('hors2','0x000FF3B7')


start:
if UO.GetQuantity('^bint')<100 then
UO.moveitem('~bint','50')
wait(1500)
end if
if UO.GetQuantity('^bintG')>249 then
uo.drophere('^bintG')
wait(1500)
end if
UO.WaitTargetObject('hors1')
uo.sayu("all kill")
wait(3000)
s=0
UO.DeleteJournal()
wait(100)
while not UO.InJournal("mummy")
if s>1 then
uo.sayu("all stay")
wait(1500)
s=0
end if
UO.DeleteJournal()
wait(100)
UO.WaitTargetObject('hors1')
UO.Usetype('bint') ;aeiou
wait(2000)
x=0
while not UO.InJournal("apply") and not UO.InJournal("mummy") and x<10
wait(500)
x=x+1
s=s+0.5
wend
Wend

UO.WaitTargetObject('hors1')
uo.sayu("all kill")
wait(3000)
s=0
UO.DeleteJournal()
wait(100)
while not UO.InJournal("mummy")
if s>1 then
uo.sayu("all stay")
wait(1500)
s=0
end if
UO.DeleteJournal()
wait(100)
UO.WaitTargetObject('hors2')
UO.Usetype('bint') ;aeiou
wait(2000)
x=0
while not UO.InJournal("apply") and not UO.InJournal("mummy") and x<10
wait(500)
x=x+1
s=s+0.5
wend
Wend
goto start

end sub
DAGAN
Posts: 4
Joined: 2004-08-15 11:45:34

ummm HELP

Post by DAGAN »

Code: Select all

sub main() 
var x
var s
UO.addtype('bint','0x0E21')
UO.addtype('bintG','0x0E20')
UO.addobject('hors1','0x00611F16')
UO.addobject('hors2','0x000FF3B7')


I dont get this part of the script

I will be fighting the animal with my ranger so horse or chicken and I wanna remove its hides/feathers then res it

can u help in that respect?
Post Reply