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

помогите со скриптом
http://forum.yoko.com.ua/viewtopic.php?f=20&t=12788		 Page 1 of 1
Author:  Sp [ 2007-11-20 18:53:05 ]
Post subject:  помогите со скриптом
sub Magery2()
var LastTimer
while not uo.Dead()
uo.DeleteJournal()
CheckLag()
while uo.Mana>=20
uo.Cast('Magic Arrow','0x00091E56')
wait(4500)
wend
while uo.Mana<uo.INT
LastTimer=uo.Timer()
uo.UseSkill('Meditation')
repeat
wait(100)
until uo.InJournal("You are" or uo.InJournal("You lose" or uo.Timer()>LastTimer+200
uo.DeleteJournal()
wait(2000)
wend
wend
end sub

sub CheckLag()
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(500)
until uo.InJournal('backpack')
end sub

вот скрипт помогите сделать так что бы он из сундука брал НС и БП....

пробовал вставлять в скрипт:

VAR NS='0x0F88' ; type Nighshade.
VAR GA='0x0F7A' ; type Black Pears.
VAR Sunduk='0x40075B93' ; ID sunduka.
VAR Kolvo=500 ; kol-vo resursov.

но все равно не берет...
Author:  -=JoKeR=- [ 2007-11-20 19:29:17 ]
Post subject: 
Code:
sub Magery2() 
var LastTimer 
VAR Sunduk='0x40075B93' ; ID sunduka. 
while not uo.Dead() 
uo.DeleteJournal() 
CheckLag() 
uo.FindType('0x0F7A',-1,'backpack')
if uo.GetQuantity('finditem')<5 then
uo.FindType('0x0F7A','0x0000','Sunduk')
wait(1000)
uo.Grab('500','finditem')
wait(1000)
end if
uo.FindType('0x0F88',-1,'backpack')
if uo.GetQuantity('finditem')<5 then
uo.FindType('0x0F88','0x0000','Sunduk')
wait(1000)
uo.Grab('500','finditem')
wait(1000)
end if
while uo.Mana>=20 
uo.Cast('Magic Arrow','0x00091E56') 
wait(4500) 
wend 
while uo.Mana<uo.INT 
LastTimer=uo.Timer() 
uo.UseSkill('Meditation') 
repeat 
wait(100) 
until uo.InJournal("You are" or uo.InJournal("You lose" or uo.Timer()>LastTimer+200 
uo.DeleteJournal() 
wait(2000) 
wend 
wend 
end sub 

sub CheckLag() 
uo.DeleteJournal() 
uo.Click('backpack') 
repeat 
wait(500) 
until uo.InJournal('backpack') 
end sub
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/