Page 1 of 1
Как.....
Posted: 2005-02-01 12:09:16
by Ekkie
Как к этому скрипту ещё медитацию прибавить??
sub a()
while UO.Count('0x1F37','0x0000') > 0
uo.waittargetself()
uo.usetype('0x1F37','0x0000')
wait(1000)
wend
end sub
Posted: 2005-02-01 13:11:35
by JIupus
для кого темы "Скрипты..." прикреплены?
Ояень советую заглядывать туда и в поиск:
http://yoko.netroof.net/forum/viewtopic ... 4838#14838
Re: Как.....
Posted: 2005-02-01 13:13:16
by JIupus
Попробуй так
Code: Select all
sub a()
while UO.Count('0x1F37','0x0000') > 0
uo.waittargetself()
uo.usetype('0x1F37','0x0000')
wait(1000)
wend
Repeat
uo.deletejournal()
uo.useskill('Meditation')
Wait(3000)
Until UO.InJournal("You must wait to perform another action") or uo.mana >= uo.int
While uo.mana < uo.int
Wait(100)
Wend
Wait(100)
Wend
end sub
Re: Как.....
Posted: 2005-02-01 13:20:58
by Ekkie
JIupus wrote:Попробуй так
Code: Select all
sub a()
while UO.Count('0x1F37','0x0000') > 0
uo.waittargetself()
uo.usetype('0x1F37','0x0000')
wait(1000)
wend
Repeat
uo.deletejournal()
uo.useskill('Meditation')
Wait(3000)
Until UO.InJournal("You must wait to perform another action") or uo.mana >= uo.int
While uo.mana < uo.int
Wait(100)
Wend
Wait(100)
Wend
end sub
Не....Не работает медитациа.
Re: Как.....
Posted: 2005-02-01 13:32:58
by JIupus
Так должна работать
Code: Select all
sub a()
while UO.Count('0x1F37','0x0000') > 0
uo.waittargetself()
uo.usetype('0x1F37','0x0000')
wait(1000)
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
end sub
Re: Как.....
Posted: 2005-02-01 13:39:05
by Ekkie
JIupus wrote:Так должна работать
Code: Select all
sub a()
while UO.Count('0x1F37','0x0000') > 0
uo.waittargetself()
uo.usetype('0x1F37','0x0000')
wait(1000)
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
end sub
"Line 13: Variable undefind-LASTTIMER
Re: Как.....
Posted: 2005-02-01 14:10:43
by Askaneli
Code: Select all
sub a()
Var LastTimer
while UO.Count('0x1F37','0x0000') > 0
uo.waittargetself()
uo.usetype('0x1F37','0x0000')
wait(1000)
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
end sub
Re: Как.....
Posted: 2005-02-01 14:58:35
by Ekkie
Askaneli wrote:Code: Select all
sub a()
Var LastTimer
while UO.Count('0x1F37','0x0000') > 0
uo.waittargetself()
uo.usetype('0x1F37','0x0000')
wait(1000)
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
end sub
Не как не медитирует...=((((
Re: Как.....
Posted: 2005-02-01 15:03:10
by Sfagnum
Ekkie wrote:Askaneli wrote:Code: Select all
sub a()
Var LastTimer
while UO.Count('0x1F37','0x0000') > 0
uo.waittargetself()
uo.usetype('0x1F37','0x0000')
wait(1000)
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
Не как не медитирует...=((((
ну промазал человек

теперь прально.
Re: Как.....
Posted: 2005-02-01 15:16:33
by Ekkie
Sfagnum wrote:Ekkie wrote:Askaneli wrote:Code: Select all
sub a()
Var LastTimer
while UO.Count('0x1F37','0x0000') > 0
uo.waittargetself()
uo.usetype('0x1F37','0x0000')
wait(1000)
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
Не как не медитирует...=((((
ну промазал человек

теперь прально.
Ура !!! Ти мои спасител!!!
Re: Как.....
Posted: 2005-02-01 15:30:19
by Askaneli
Sfagnum wrote:Ekkie wrote:Askaneli wrote:Code: Select all
sub a()
Var LastTimer
while UO.Count('0x1F37','0x0000') > 0
uo.waittargetself()
uo.usetype('0x1F37','0x0000')
wait(1000)
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
Не как не медитирует...=((((
ну промазал человек

теперь прально.
Я исправлял Var LastTimer поставил
В циклы не вникал !!!
Re: Как.....
Posted: 2005-02-01 15:51:50
by Sfagnum
Askaneli wrote:Я исправлял Var LastTimer поставил
В циклы не вникал !!!
будешь теперь отмазываться

Re: Как.....
Posted: 2005-02-02 06:11:09
by Askaneli
Sfagnum wrote:Askaneli wrote:Я исправлял Var LastTimer поставил
В циклы не вникал !!!
будешь теперь отмазываться

Такой вот я !!!
Posted: 2005-02-02 11:42:32
by BETEPAH
Болтуны )))) топик Клоуз