Yoko

All sides of Injection
It is currently 2025-11-05 23:44:38

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 15 posts ] 
  Print view Previous topic | Next topic 
Author Message
ghost_hnt
PostPosted: 2006-05-06 22:49:25 
Offline

Joined: 2006-02-03 19:32:33
Posts: 156
в чем дело?
пытается стрелять , но потом сразу же хелит не тронутого чара(((
помогите
Code:
var Doll = '0x0026B61A' ##ID чара в которого стреляем 
var Cont = '0x4009EDAD' ##ID контейнера где лежат стрелы 
var Arrow = '0x0F3F'    ##тип стрел 
var Bow = '0x13B1'      ##тип лука 
sub Archery() 
#¤Leo¤# 
while 1 
   UO.UseType(Bow) 
   UO.Attack(Doll) 
   Repeat 
      wait (500) 
   if UO.InJournal('destroyed') then 
   UO.UseType(Bow) 
   UO.DeleteJournal() 
   endif 
   Until UO.GetHP(Doll)<100 
   repeat 
   wait (500) 
   UO.WarMode(0) 
      if UO.FindCount('0x0E21')<30 then 
         UO.WaitTargetType('0x1008') 
         UO.UseType('0x0E20') 
         CheckLag() 
      endif 
      UO.Usetype('0x0E21') 
      UO.WaitTargetObject(Doll) 
      wait(3500) 
   Until UO.InJournal('you need') 
      If UO.Count(Arrow) < 100 Then 
         UO.Findtype(Arrow, '-1',Cont) 
         If UO.FindCount() > 0 Then 
            UO.Grab('500','finditem') 
            wait(1000) 
            CheckLag() 
         Endif 
      Endif 
      UO.DeleteJournal() 
wend 
end sub 

sub Start() 
   repeat 
   UO.Findtype(Arrow) 
   If UO.FindCount() > 0 Then 
      UO.MoveItem('finditem','0',Cont) 
         wait(1000) 
   Endif 
   UO.Findtype(Arrow, '-1', '1' ) 
   If UO.FindCount() > 0 Then 
      UO.MoveItem('finditem','0',Cont) 
         wait(1000) 
   Endif 
      wait(10000) 
   until UO.Dead() 
endsub 

Sub CheckLag() 
   UO.DeleteJournal( 'backpack' ) 
   UO.Click( 'backpack' ) 
   repeat 
      wait(100) 
   until UO.InJournal( 'backpack' ) 
endsub

_________________
ЦСКА- чЕмПиОн, кто не верит, тот ...... (нехороший человек)
Top
   
Reply with quote  
CONDOMchick
 Post subject:
PostPosted: 2006-05-06 22:52:40 
Offline
User avatar

Joined: 2005-04-23 20:18:57
Posts: 362
попробуй увеличить задержку

_________________
Dragon World. [since 2004]
Top
   
Reply with quote  
ghost_hnt
 Post subject:
PostPosted: 2006-05-06 23:02:14 
Offline

Joined: 2006-02-03 19:32:33
Posts: 156
блин он почему то пробует стрельнуть, а потом сразу хелит и хелит все время чара с полными жизнями_(
ошибка где-то в этой строчке
Code:
Until UO.GetHP(Doll)<100 
   repeat 
   wait (500) 
   UO.WarMode(0) 
      if UO.FindCount('0x0E21')<30 then 
         UO.WaitTargetType('0x1008') 
         UO.UseType('0x0E20') 
         CheckLag() 
      endif 
      UO.Usetype('0x0E21') 
      UO.WaitTargetObject(Doll) 
      wait(3500) 
   Until UO.InJournal('you need')

можете скинуть другой рабочий скрипт)_!

_________________
ЦСКА- чЕмПиОн, кто не верит, тот ...... (нехороший человек)
Top
   
Reply with quote  
ghost_hnt
 Post subject:
PostPosted: 2006-05-06 23:06:33 
Offline

Joined: 2006-02-03 19:32:33
Posts: 156
как-то надо изменить проверку hp у куклы
что-то вместо until uo.getHP
типо if жизней у куклы меньше половины то бери бинты

_________________
ЦСКА- чЕмПиОн, кто не верит, тот ...... (нехороший человек)
Top
   
Reply with quote  
flake
 Post subject:
PostPosted: 2006-05-06 23:10:15 
Offline
Expert!
User avatar

Joined: 2004-08-11 23:56:17
Posts: 746
Location: The Citadel
Code:
Until UO.GetHP(Doll)<100

замени на
Code:
Until UO.GetHP(Doll)< (UO.GeMaxHP(Dol)/2)
Top
   
Reply with quote  
ghost_hnt
 Post subject:
PostPosted: 2006-05-06 23:14:56 
Offline

Joined: 2006-02-03 19:32:33
Posts: 156
не не хрена)
там подправил, но он убивает чара_)

_________________
ЦСКА- чЕмПиОн, кто не верит, тот ...... (нехороший человек)
Top
   
Reply with quote  
Kynep
 Post subject:
PostPosted: 2006-05-07 08:14:39 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
flake wrote:
Code:
Until UO.GetHP(Doll)<100

замени на
Code:
Until UO.GetHP(Doll)< (UO.GeMaxHP(Dol)/2)


Скока писал так ни разу не получалось, лучше сделать проверку по журналу на фразу, пробуй:
Code:
var Doll = '0x0026B61A' ##ID чара в которого стреляем 
var Cont = '0x4009EDAD' ##ID контейнера где лежат стрелы 
var Arrow = '0x0F3F'    ##тип стрел 
var Bow = '0x13B1'      ##тип лука 
sub Archery() 
#¤Leo¤# 
while 1 
   UO.UseType(Bow) 
   UO.Attack(Doll) 
   Repeat 
      wait (500) 
   if UO.InJournal('destroyed') then 
   UO.UseType(Bow) 
   UO.DeleteJournal() 
   endif 
   until UO.InJournal('Stop')
   UO.DeleteJournal() 
   repeat 
   wait (500) 
   UO.WarMode(0) 
      if UO.FindCount('0x0E21')<30 then 
         UO.WaitTargetType('0x1008') 
         UO.UseType('0x0E20') 
         CheckLag() 
      endif 
      UO.Usetype('0x0E21') 
      UO.WaitTargetObject(Doll) 
      wait(3500) 
   Until UO.InJournal('need healing') 
      If UO.Count(Arrow) < 100 Then 
         UO.Findtype(Arrow, '-1',Cont) 
         If UO.FindCount() > 0 Then 
            UO.Grab('500','finditem') 
            wait(1000) 
            CheckLag() 
         Endif 
      Endif 
      UO.DeleteJournal() 
wend 
end sub 

sub Start() 
   repeat 
   If UO.GetHP() < UO.GetMaxHP() / 2 then
   UO.Say('Stop')
   repeat
   wait(100)
   until UO.GetHP() == UO.GetMaxHP()
   else
   wait(100)
   endif
   UO.Findtype(Arrow) 
   If UO.FindCount() > 0 Then 
      UO.MoveItem('finditem','0',Cont) 
         wait(1000) 
   Endif 
   UO.Findtype(Arrow, '-1', '1' ) 
   If UO.FindCount() > 0 Then 
      UO.MoveItem('finditem','0',Cont) 
         wait(1000) 
   Endif  
   until UO.Dead() 
endsub 

Sub CheckLag() 
   UO.DeleteJournal( 'backpack' ) 
   UO.Click( 'backpack' ) 
   repeat 
      wait(100) 
   until UO.InJournal( 'backpack' ) 
endsub


Last edited by Kynep on 2006-05-11 21:14:08, edited 3 times in total.

Top
   
Reply with quote  
ghost_hnt
 Post subject:
PostPosted: 2006-05-07 15:13:42 
Offline

Joined: 2006-02-03 19:32:33
Posts: 156
блин сначало норм, но потом, как чар-кукла сказал STOP
атакующий его хилит, даже если у него хп полные(
надо что-то в этом роде
Code:
 until UO.InJournal('Stop')

until заменить на if

_________________
ЦСКА- чЕмПиОн, кто не верит, тот ...... (нехороший человек)
Top
   
Reply with quote  
Kynep
 Post subject:
PostPosted: 2006-05-07 15:52:43 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
ghost_hnt wrote:
блин сначало норм, но потом, как чар-кукла сказал STOP
атакующий его хилит, даже если у него хп полные(
надо что-то в этом роде
Code:
 until UO.InJournal('Stop')

until заменить на if


Немнога поправил, посмотри. Ты как запускаешь его? Кто качает должен запускать Archery, а кукла Start
Top
   
Reply with quote  
ghost_hnt
 Post subject:
PostPosted: 2006-05-07 18:28:05 
Offline

Joined: 2006-02-03 19:32:33
Posts: 156
да эт я понял
скоро буду тестить

_________________
ЦСКА- чЕмПиОн, кто не верит, тот ...... (нехороший человек)
Top
   
Reply with quote  
ghost_hnt
 Post subject:
PostPosted: 2006-05-11 14:05:32 
Offline

Joined: 2006-02-03 19:32:33
Posts: 156
блин не ПАШЕТ((((((((((
стреляет, пока тот не скажет STOP
потом хелит его до бесконечности..............

_________________
ЦСКА- чЕмПиОн, кто не верит, тот ...... (нехороший человек)
Top
   
Reply with quote  
Kynep
 Post subject:
PostPosted: 2006-05-11 17:02:37 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
ghost_hnt wrote:
блин не ПАШЕТ((((((((((
стреляет, пока тот не скажет STOP
потом хелит его до бесконечности..............


Мля!! телепаты в отпуске!!! В этой строке напиши что пишет клиент, когда у чела жизни полные и пытается лечить:
Code:
Until UO.InJournal('need healing')
Top
   
Reply with quote  
ghost_hnt
 Post subject:
PostPosted: 2006-05-11 17:53:01 
Offline

Joined: 2006-02-03 19:32:33
Posts: 156
скрипт работает, но почему то когда у куклы меньше половины хп он все время кричит STOP!!!!!!!!!!!!!!
не останавливаясь, поэтому чар стрельнет, потом сразу хелит :?

_________________
ЦСКА- чЕмПиОн, кто не верит, тот ...... (нехороший человек)
Top
   
Reply with quote  
Kynep
 Post subject:
PostPosted: 2006-05-11 21:02:28 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
ghost_hnt wrote:
скрипт работает, но почему то когда у куклы меньше половины хп он все время кричит STOP!!!!!!!!!!!!!!
не останавливаясь, поэтому чар стрельнет, потом сразу хелит :?


Попробуй так, ссылка на мой пост:
Тут
Только не забудь исправить это:
Code:
Until UO.InJournal('need healing')


Top
   
Reply with quote  
ghost_hnt
 Post subject:
PostPosted: 2006-05-12 12:10:36 
Offline

Joined: 2006-02-03 19:32:33
Posts: 156
спасибо вроде норм!

_________________
ЦСКА- чЕмПиОн, кто не верит, тот ...... (нехороший человек)
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 15 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: No registered users and 11 guests

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Limited