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

боевые
http://forum.yoko.com.ua/viewtopic.php?f=20&t=6988		 Page 1 of 1
Author:  Drakonid [ 2006-03-15 20:01:57 ]
Post subject:  боевые
Шард дрв.Чары кастуют друг на друга блейд спиритов,как только убивают спиритов,должны лечиться и стирать кровавые бинты в миске.
Ну никак не получается написать функцию лечения:то лечатся раньше времени,то вообще не лечатся :? ...О стирке бинтов вообще молчу,видно руки кривые. :(
Помогите,пожалуйста,написать лечение и стирку бинтов

Code:

uo.FindType('0x023E','0x023E','ground')
if uo.FindCount()==0 then
#
#здесь должно быть лечение
#и стирка бинтов
#    
if UO.Life==UO.Str then
uo.say('gg')
wait(5000)
uo.say('gg')
wait(6000)
endif
Author:  Kynep [ 2006-03-15 21:21:04 ]
Post subject:  Re: боевые
Drakonid wrote:
Шард дрв.Чары кастуют друг на друга блейд спиритов,как только убивают спиритов,должны лечиться и стирать кровавые бинты в миске.
Ну никак не получается написать функцию лечения:то лечатся раньше времени,то вообще не лечатся :? ...О стирке бинтов вообще молчу,видно руки кривые. :(
Помогите,пожалуйста,написать лечение и стирку бинтов

Code:

uo.FindType('0x023E','0x023E','ground')
if uo.FindCount()==0 then
#
#здесь должно быть лечение
#и стирка бинтов
#    
if UO.Life==UO.Str then
uo.say('gg')
wait(5000)
uo.say('gg')
wait(6000)
endif



Ну для лечения себя вставь bandageself()
или функцию типа:

Code:
while uo.gethp() <> uo.str
       band()
       wait(000) 
wend 

sub band() 
uo.exec('setarm arm1') 
wait(1000) 
uo.exec('bandageself') 
wait(2000) 
uo.exec('arm arm1') 
end sub


а для мойки

Code:
UO.waittargetobject(ID тазика)
wait(300)
UO.usetype(тип бинтов) на ДРВ 0x0E20
Author:  Drakonid [ 2006-03-15 22:10:02 ]
Post subject: 
Code:

sub i()
var Vortex
var char='0x003F199D';ID чара на которого каст

UO.Set("finddistance","7")

While not uo.Dead()
uo.DeleteJournal()
UO.setarm('1')
uo.FindType('0x023E','0x023E','ground')
if uo.FindCount()>0 then
Vortex=uo.getserial('finditem')
uo.exec("warmode 1")
repeat
UO.attack('finditem')
wait(10000)
else
uo.FindType('0x023E','0x023E','ground')

if uo.FindCount()==0 then
while uo.gethp() <> uo.str 
band() 
wait(1000) 
wend
endif
endif

UO.waittargetobject('0x4044DD4D') 
wait(300) 
UO.usetype('0x0E20') 
      
if UO.Life==UO.Str then
uo.say('gg')
wait(5000)
uo.say('gg')
wait(6000)
endif

if UO.InJournal('kk') and UO.Life==UO.Str then
uo.cast('Blade Spirit',char)
repeat
wait(10000)
until not uo.InJournal('fizzles') or uo.InJournal('sufficient mana')
endif
wend
endsub

sub u()
var Vortex
var char='0x00065BD4';ID чара на кот каст

UO.Set("finddistance","7")

While not uo.Dead()
uo.DeleteJournal()
UO.setarm('1')
uo.FindType('0x023E','0x023E','ground')
if uo.FindCount()>0 then
Vortex=uo.getserial('finditem')
uo.exec("warmode 1")
repeat
UO.attack('finditem')
wait(10000)
else
uo.FindType('0x023E','0x023E','ground')
if uo.FindCount()==0 then

while uo.gethp() <> uo.str 
band() 
wait(1000) 
wend

endif
endif

UO.waittargetobject('0x4044DCC1') 
wait(300) 
UO.usetype('0x0E20') 
      
if UO.Life==UO.Str then
uo.say('kk')
wait(5000)
uo.say('kk')
wait(6000)
endif

if UO.InJournal('gg') and UO.Life==UO.Str then
uo.cast('Blade Spirit',char)
repeat
wait(10000)
until not uo.InJournal('fizzles') or uo.InJournal('sufficient mana')
endif
wend
endsub

sub band() 
uo.exec('setarm arm1') 
wait(1000) 
uo.exec('bandageself') 
wait(2000) 
uo.exec('arm arm1') 
end sub



воть сделал я все так :roll: лечится во время боя со спиритом.. (
мб в скрипте условия не хватает или еще что-нибудь неправильно?...
Author:  Kynep [ 2006-03-15 22:19:50 ]
Post subject: 
Drakonid wrote:
Code:

sub i()
var Vortex
var char='0x003F199D';ID чара на которого каст

UO.Set("finddistance","7")

While not uo.Dead()
uo.DeleteJournal()
UO.setarm('1')
uo.FindType('0x023E','0x023E','ground')
if uo.FindCount()>0 then
Vortex=uo.getserial('finditem')
uo.exec("warmode 1")
repeat
UO.attack('finditem')
wait(10000)
else
uo.FindType('0x023E','0x023E','ground')

if uo.FindCount()==0 then
while uo.gethp() <> uo.str 
band() 
wait(1000) 
wend
endif
endif

UO.waittargetobject('0x4044DD4D') 
wait(300) 
UO.usetype('0x0E20') 
      
if UO.Life==UO.Str then
uo.say('gg')
wait(5000)
uo.say('gg')
wait(6000)
endif

if UO.InJournal('kk') and UO.Life==UO.Str then
uo.cast('Blade Spirit',char)
repeat
wait(10000)
until not uo.InJournal('fizzles') or uo.InJournal('sufficient mana')
endif
wend
endsub

sub u()
var Vortex
var char='0x00065BD4';ID чара на кот каст

UO.Set("finddistance","7")

While not uo.Dead()
uo.DeleteJournal()
UO.setarm('1')
uo.FindType('0x023E','0x023E','ground')
if uo.FindCount()>0 then
Vortex=uo.getserial('finditem')
uo.exec("warmode 1")
repeat
UO.attack('finditem')
wait(10000)
else
uo.FindType('0x023E','0x023E','ground')
if uo.FindCount()==0 then

while uo.gethp() <> uo.str 
band() 
wait(1000) 
wend

endif
endif

UO.waittargetobject('0x4044DCC1') 
wait(300) 
UO.usetype('0x0E20') 
      
if UO.Life==UO.Str then
uo.say('kk')
wait(5000)
uo.say('kk')
wait(6000)
endif

if UO.InJournal('gg') and UO.Life==UO.Str then
uo.cast('Blade Spirit',char)
repeat
wait(10000)
until not uo.InJournal('fizzles') or uo.InJournal('sufficient mana')
endif
wend
endsub

sub band() 
uo.exec('setarm arm1') 
wait(1000) 
uo.exec('bandageself') 
wait(2000) 
uo.exec('arm arm1') 
end sub



воть сделал я все так :roll: лечится во время боя со спиритом.. (
мб в скрипте условия не хватает или еще что-нибудь неправильно?...


Попробуй поменять это:
Code:
uo.FindType('0x023E','0x023E','ground')

На:
Code:
uo.FindType('0x023E',-1,'ground')
Author:  Kynep [ 2006-03-15 22:20:09 ]
Post subject: 
Drakonid wrote:
Code:

sub i()
var Vortex
var char='0x003F199D';ID чара на которого каст

UO.Set("finddistance","7")

While not uo.Dead()
uo.DeleteJournal()
UO.setarm('1')
uo.FindType('0x023E','0x023E','ground')
if uo.FindCount()>0 then
Vortex=uo.getserial('finditem')
uo.exec("warmode 1")
repeat
UO.attack('finditem')
wait(10000)
else
uo.FindType('0x023E','0x023E','ground')

if uo.FindCount()==0 then
while uo.gethp() <> uo.str 
band() 
wait(1000) 
wend
endif
endif

UO.waittargetobject('0x4044DD4D') 
wait(300) 
UO.usetype('0x0E20') 
      
if UO.Life==UO.Str then
uo.say('gg')
wait(5000)
uo.say('gg')
wait(6000)
endif

if UO.InJournal('kk') and UO.Life==UO.Str then
uo.cast('Blade Spirit',char)
repeat
wait(10000)
until not uo.InJournal('fizzles') or uo.InJournal('sufficient mana')
endif
wend
endsub

sub u()
var Vortex
var char='0x00065BD4';ID чара на кот каст

UO.Set("finddistance","7")

While not uo.Dead()
uo.DeleteJournal()
UO.setarm('1')
uo.FindType('0x023E','0x023E','ground')
if uo.FindCount()>0 then
Vortex=uo.getserial('finditem')
uo.exec("warmode 1")
repeat
UO.attack('finditem')
wait(10000)
else
uo.FindType('0x023E','0x023E','ground')
if uo.FindCount()==0 then

while uo.gethp() <> uo.str 
band() 
wait(1000) 
wend

endif
endif

UO.waittargetobject('0x4044DCC1') 
wait(300) 
UO.usetype('0x0E20') 
      
if UO.Life==UO.Str then
uo.say('kk')
wait(5000)
uo.say('kk')
wait(6000)
endif

if UO.InJournal('gg') and UO.Life==UO.Str then
uo.cast('Blade Spirit',char)
repeat
wait(10000)
until not uo.InJournal('fizzles') or uo.InJournal('sufficient mana')
endif
wend
endsub

sub band() 
uo.exec('setarm arm1') 
wait(1000) 
uo.exec('bandageself') 
wait(2000) 
uo.exec('arm arm1') 
end sub



воть сделал я все так :roll: лечится во время боя со спиритом.. (
мб в скрипте условия не хватает или еще что-нибудь неправильно?...


Попробуй поменять это:
Code:
uo.FindType('0x023E','0x023E','ground')

На:
Code:
uo.FindType('0x023E',-1,'ground')


Или на:
Code:
uo.FindType('0x023E', '0x0000', 'ground')


Причем везде
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/