Yoko

All sides of Injection
It is currently 2025-12-25 10:56:38

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 8 posts ] 
  Print view Previous topic | Next topic 
Author Message
abas
 Post subject: Автомат
PostPosted: 2005-06-15 09:13:52 
Offline

Joined: 2005-05-26 12:25:53
Posts: 58
Может ли быть такой скрипт ??если у мен 30 хп чтобы автоматом я рекалился домой.Или если в меня кидают бомбу и я нивижу чтобы овтоматом она поднялась?А если мана к примеру 15 чтобы пило автоматически??Если есть такие скрипты выложите тут ....
Top
   
Reply with quote  
flake
 Post subject:
PostPosted: 2005-06-15 09:52:32 
Offline
Expert!
User avatar

Joined: 2004-08-11 23:56:17
Posts: 746
Location: The Citadel
Code:
sub Afftamat()
UO.Exec( 'set finddistance 2' )
Repeat
  
  If UO.Life < 30 Then
      UO.Cast( 'Recall', 'айди_руны' )
  EndIf

  If UO.Mana < 15 Then
    UO.UseType( 'тип_бутылки', 'цвет_бутылки' )
  EndIf


  UO.FindType( 'тип_бомбы', 'цвет_бомбы', 'ground' )
    If UO.FindCount() Then
      While UO.FindCount()
        UO.Grab( 'finditem' )
        Wait( 600 )
        UO.FindType( 'тип_бомбы', 'цвет_бомбы', 'ground' )
      Wend
    EndIf

  Wait( 500 )
Until UO.Dead()
end sub
Top
   
Reply with quote  
abas
 Post subject:
PostPosted: 2005-06-15 10:10:11 
Offline

Joined: 2005-05-26 12:25:53
Posts: 58
Спосибо за скрипт но я попробовал если у меня 12 нп он не рекалится дайте такой скрипт если меньше 30 то тогда рекол
Top
   
Reply with quote  
flake
 Post subject:
PostPosted: 2005-06-15 10:17:05 
Offline
Expert!
User avatar

Joined: 2004-08-11 23:56:17
Posts: 746
Location: The Citadel
Как так не рекалится? Вписал айди руны?
Top
   
Reply with quote  
abas
 Post subject:
PostPosted: 2005-06-15 10:24:56 
Offline

Joined: 2005-05-26 12:25:53
Posts: 58
да
Code:
sub Afftamat() -это забендил нажал ран функшен и начался граб некончаемый
UO.Exec( 'set finddistance 2' ) 
Repeat 

    If UO.Life < 30 Then 
      UO.Cast( 'Recall', '0x4175DC9E' ) 
  EndIf 
 
  If UO.Mana < 15 Then 
    UO.UseType( 'тип_бутылки', 'цвет_бутылки' ) 
  EndIf 


  UO.FindType( 'тип_бомбы', 'цвет_бомбы', 'ground' ) 
    If UO.FindCount() Then 
      While UO.FindCount() 
        UO.Grab( 'finditem' ) 
        Wait( 600 ) 
        UO.FindType( 'тип_бомбы', 'цвет_бомбы', 'ground' ) 
      Wend 
    EndIf 

  Wait( 500 ) 
Until UO.Dead() 
end sub

[теги =( I'm]
Top
   
Reply with quote  
flake
 Post subject:
PostPosted: 2005-06-15 10:27:40 
Offline
Expert!
User avatar

Joined: 2004-08-11 23:56:17
Posts: 746
Location: The Citadel
Уууу....
Вставь везде нужные типы и цвета :shock:
И срочно иди читать учебники Едреда!
Top
   
Reply with quote  
Edred
 Post subject:
PostPosted: 2005-06-15 14:11:28 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
В данном случае не поможет. Учебник может пригодиться только тому, кто "помогите написать", а не "дайте мне".
Top
   
Reply with quote  
Kinder Zurpraiz
 Post subject:
PostPosted: 2005-06-25 21:05:23 
Offline
User avatar

Joined: 2005-05-06 21:08:08
Posts: 44
Location: Будку в Деле зажигаю :D ГЫГЫ
ГЫ! Бывает, скрипт дадут, так ещо и обясняй типу куда записывать : )

_________________
Я просто ****** ******* ****** ****** ***** ** ***
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 8 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: No registered users and 2 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:  
Powered by phpBB® Forum Software © phpBB Limited