Yoko
http://forum.yoko.com.ua/

Если не трудно киньте скрипт на veterinary
http://forum.yoko.com.ua/viewtopic.php?f=20&t=900
Page 1 of 1

Author:  -Time- [ 2004-07-18 22:45:14 ]
Post subject:  Если не трудно киньте скрипт на veterinary

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


Спасиб

Author:  Shestak [ 2004-07-23 11:06:05 ]
Post subject: 

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

Author:  DAGAN [ 2004-08-16 05:53:47 ]
Post subject:  ummm HELP

Code:
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?

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/