Как.....

Anything and all.

Moderators: Murderator+, Murderator

Locked
Ekkie
Posts: 56
Joined: 2005-01-13 08:40:40
Contact:
Contact Ekkie

Как.....

Post by Ekkie »

Как к этому скрипту ещё медитацию прибавить??
sub a()
while UO.Count('0x1F37','0x0000') > 0
uo.waittargetself()
uo.usetype('0x1F37','0x0000')
wait(1000)
wend
end sub
Top
JIupus
Posts: 112
Joined: 2004-12-29 15:16:45
Contact:
Contact JIupus

Post by JIupus »

для кого темы "Скрипты..." прикреплены?
Ояень советую заглядывать туда и в поиск: http://yoko.netroof.net/forum/viewtopic ... 4838#14838
Top
JIupus
Posts: 112
Joined: 2004-12-29 15:16:45
Contact:
Contact JIupus

Re: Как.....

Post 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
Top
Ekkie
Posts: 56
Joined: 2005-01-13 08:40:40
Contact:
Contact Ekkie

Re: Как.....

Post 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

Не....Не работает медитациа.
Top
JIupus
Posts: 112
Joined: 2004-12-29 15:16:45
Contact:
Contact JIupus

Re: Как.....

Post 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
Top
Ekkie
Posts: 56
Joined: 2005-01-13 08:40:40
Contact:
Contact Ekkie

Re: Как.....

Post 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
Top
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Re: Как.....

Post 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
Сделал дело - флуди смело !!!
Top
Ekkie
Posts: 56
Joined: 2005-01-13 08:40:40
Contact:
Contact Ekkie

Re: Как.....

Post 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

Не как не медитирует...=((((
Top
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:
Contact Sfagnum

Re: Как.....

Post 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

Не как не медитирует...=((((
ну промазал человек ;) теперь прально.
Top
Ekkie
Posts: 56
Joined: 2005-01-13 08:40:40
Contact:
Contact Ekkie

Re: Как.....

Post 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

Не как не медитирует...=((((
ну промазал человек ;) теперь прально.

Ура !!! Ти мои спасител!!!
Top
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Re: Как.....

Post 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 поставил
В циклы не вникал !!!
Сделал дело - флуди смело !!!
Top
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:
Contact Sfagnum

Re: Как.....

Post by Sfagnum »

Askaneli wrote:Я исправлял Var LastTimer поставил
В циклы не вникал !!!
будешь теперь отмазываться :lol:
Top
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Re: Как.....

Post by Askaneli »

Sfagnum wrote:
Askaneli wrote:Я исправлял Var LastTimer поставил
В циклы не вникал !!!
будешь теперь отмазываться :lol:

Такой вот я !!!
Сделал дело - флуди смело !!!
Top
BETEPAH
Expert!
Posts: 838
Joined: 2004-05-31 09:31:51
Contact:
Contact BETEPAH

Post by BETEPAH »

Болтуны )))) топик Клоуз
Все просто.
BETEPAH ™
Top
Locked

Return to “Scripting Ore”