Yoko

All sides of Injection
It is currently 2025-11-09 11:02:42

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 11 posts ] 
  Print view Previous topic | Next topic 
Author Message
Qualis Eram
PostPosted: 2005-07-04 16:18:50 
Offline

Joined: 2005-04-16 23:33:13
Posts: 104
Привет

Вот хотелось бы чтобы умные люди помогли подправить процедуру:
Code:
SUB FGHeal() 
   Var ManaNeed=11 
   Var ManaNeedScroll=5 
   If Uo.Life<UO.Str Then 
      Uo.FindType('0x1F49',-1,'my') 
      If Uo.FindCount()>0 Then 
         If Uo.Mana>=ManaNeedScroll Then 
            Uo.WaitTargetSelf() 
            Uo.UseObject('finditem') 
            Uo.Print('Cast scroll!') 
         Else 
   UO.Print('Low mana!')
         Endif 
      Else 
         If Uo.Mana>=ManaNeed Then 
            Uo.Cast('Greater Heal','self') 
            Uo.Print('Cast spellbook!') 
         Else 
            Uo.Print('Low mana!') 
         Endif 
      Endif 
   Else 
      Uo.Print('Ok') 
   Endif 
END SUB

Вот скриптик.....чтобы хотелось чтобы его подправили:
1. Чтобы когда у Вас хелсиков было меньше 65 он кастовал Хеал (пробовал со скрола а потом если нет то с книги)
2. Если хелсов выше 65 то он кастовал Грит хел со скрола если нет скрола то с книги.

Еще одна тема:
Code:
SUB Steelskin()
Var Type='0x0F09' 
Var Color='0x0835' 
Uo.FindType(Type, Color, 2) 
Uo.UseObject('finditem') 
END SUB

Чтобы пробавал вначале пить Стил скин если его не то пробовал пить стоунскин......
Top
   
Reply with quote  
Qualis Eram
 Post subject:
PostPosted: 2005-07-07 07:28:13 
Offline

Joined: 2005-04-16 23:33:13
Posts: 104
Прани ну не игнорьте плиз топик епта!!!
Top
   
Reply with quote  
Askaneli
 Post subject:
PostPosted: 2005-07-07 08:10:06 
Offline
Sphere expert
User avatar

Joined: 2004-10-01 08:27:38
Posts: 1143
Location: Уфа
Qualis Eram wrote:
Прани ну не игнорьте плиз топик епта!!!

А кто сказал что игнорят.
Посмотри скока просмотров.
Так что не игнорят. :D

_________________
Сделал дело - флуди смело !!!
Top
   
Reply with quote  
666Man666
 Post subject:
PostPosted: 2005-07-07 11:06:49 
Offline
Junior Expert
User avatar

Joined: 2004-11-13 00:43:55
Posts: 474
Location: Киберзадроцк
Уже в 100-раз... говорю, все эти "автоматические хрени" тока мешают ПВП.... ну кроме авто куре :) юзайте руки.... ёпть...
Top
   
Reply with quote  
Qualis Eram
 Post subject:
PostPosted: 2005-07-07 22:43:55 
Offline

Joined: 2005-04-16 23:33:13
Posts: 104
666Man666 wrote:
Уже в 100-раз... говорю, все эти "автоматические хрени" тока мешают ПВП.... ну кроме авто куре :) юзайте руки.... ёпть...
Да это не автономник.........я и так на кнопку нажимаю просто у меня все клаивиши почти в уо забиты на клаве с шифтом и с альтом и контрлом.........Нужно просто чтобы если хп стоко я нажимал кнопку всю туже и делал Хеал а если хп больше то делал Грит хел плиз
Top
   
Reply with quote  
I'm
 Post subject:
PostPosted: 2005-07-12 01:40:28 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
666Man666 wrote:
Уже в 100-раз... говорю, все эти "автоматические хрени" тока мешают ПВП.... ну кроме авто куре :) юзайте руки.... ёпть...

Да нескажи я 1 время бегас со звуковыми сигналами :lol: :lol: :lol:
Top
   
Reply with quote  
omi4
 Post subject:
PostPosted: 2005-07-12 02:06:18 
Offline
User avatar

Joined: 2005-07-10 21:53:05
Posts: 457
Code:
sub FGHeal() 
   Var ManaNeed=11 
   Var ManaNeedScroll=5 
   If Uo.GetHP()<UO.GetMaxHP() Then

      If UO.GetHP>65 then
         Uo.FindType('0x1F31',-1,'my') 
         If Uo.FindCount()>0 Then 
            If Uo.Mana>=ManaNeedScroll Then 
               Uo.WaitTargetSelf() 
               Uo.UseObject('finditem') 
               Uo.Print('Cast scroll!') 
            Else 
               UO.Print('Low mana!') 
            Endif 
         Else 
            If Uo.Mana>=ManaNeed Then 
               Uo.Cast('Heal','self') 
               Uo.Print('Cast spellbook!') 
            Else 
               Uo.Print('Low mana!') 
            Endif 
      Endif 

      If UO.GetHP<65 then
         Uo.FindType('0x1F49',-1,'my') 
         If Uo.FindCount()>0 Then 
            If Uo.Mana>=ManaNeedScroll Then 
               Uo.WaitTargetSelf() 
               Uo.UseObject('finditem') 
               Uo.Print('Cast scroll!') 
            Else 
               UO.Print('Low mana!') 
            Endif 
         Else 
            If Uo.Mana>=ManaNeed Then 
               Uo.Cast('Greater Heal','self') 
               Uo.Print('Cast spellbook!') 
            Else 
               Uo.Print('Low mana!') 
            Endif 
         Endif 
      Endif
      
   Else 
      Uo.Print('Ok') 
   Endif 
end sub
Top
   
Reply with quote  
Qualis Eram
 Post subject:
PostPosted: 2005-07-13 17:34:31 
Offline

Joined: 2005-04-16 23:33:13
Posts: 104
omi4 wrote:
Code:
sub FGHeal() 
   Var ManaNeed=11 
   Var ManaNeedScroll=5 
   If Uo.GetHP()<UO.GetMaxHP() Then

      If UO.GetHP>65 then
         Uo.FindType('0x1F31',-1,'my') 
         If Uo.FindCount()>0 Then 
            If Uo.Mana>=ManaNeedScroll Then 
               Uo.WaitTargetSelf() 
               Uo.UseObject('finditem') 
               Uo.Print('Cast scroll!') 
            Else 
               UO.Print('Low mana!') 
            Endif 
         Else 
            If Uo.Mana>=ManaNeed Then 
               Uo.Cast('Heal','self') 
               Uo.Print('Cast spellbook!') 
            Else 
               Uo.Print('Low mana!') 
            Endif 
      Endif 

      If UO.GetHP<65 then
         Uo.FindType('0x1F49',-1,'my') 
         If Uo.FindCount()>0 Then 
            If Uo.Mana>=ManaNeedScroll Then 
               Uo.WaitTargetSelf() 
               Uo.UseObject('finditem') 
               Uo.Print('Cast scroll!') 
            Else 
               UO.Print('Low mana!') 
            Endif 
         Else 
            If Uo.Mana>=ManaNeed Then 
               Uo.Cast('Greater Heal','self') 
               Uo.Print('Cast spellbook!') 
            Else 
               Uo.Print('Low mana!') 
            Endif 
         Endif 
      Endif
      
   Else 
      Uo.Print('Ok') 
   Endif 
end sub
не пашит чего он скриптик то?
Top
   
Reply with quote  
Dard
 Post subject:
PostPosted: 2005-07-15 18:18:24 
Offline
User avatar

Joined: 2005-04-25 19:00:46
Posts: 79
Попробуй вместо:
Code:
If Uo.GetHP()<UO.GetMaxHP() Then
поставить:
Code:
If UO.Life < UO.STR Then

А дальше вместо Uo.GetHP поставь UO.Life, должно заработать.
Top
   
Reply with quote  
Qualis Eram
 Post subject:
PostPosted: 2005-07-17 02:55:36 
Offline

Joined: 2005-04-16 23:33:13
Posts: 104
Dard wrote:
Попробуй вместо:
Code:
If Uo.GetHP()<UO.GetMaxHP() Then
поставить:
Code:
If UO.Life < UO.STR Then

А дальше вместо Uo.GetHP поставь UO.Life, должно заработать.
Так и чего будет кидать магию Хел когда у меня меньше 65 хп и когда больше 65 будет кастить Гх?
Top
   
Reply with quote  
Dard
 Post subject:
PostPosted: 2005-07-17 17:27:24 
Offline
User avatar

Joined: 2005-04-25 19:00:46
Posts: 79
А ты пробовал?
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 11 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: Bing [Bot] and 1 guest

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