нужен маленький скриптик

Anything and all.

Moderators: Murderator+, Murderator

Locked
Kashita
Posts: 22
Joined: 2004-12-30 13:18:54

нужен маленький скриптик

Post by Kashita »

Люди если не сложно напишите маленький скриптик...
мой чар стреляет один раз из лука, если попал то лечит, если нет то повторяется...
VlastV
Posts: 37
Joined: 2005-02-07 19:28:26
Contact:

Re: нужен маленький скриптик

Post by VlastV »

Kashita wrote:Люди если не сложно напишите маленький скриптик...
мой чар стреляет один раз из лука, если попал то лечит, если нет то повторяется...
куда стреляет? кого лечит? лечит до полного востановления жизни?
Kashita
Posts: 22
Joined: 2004-12-30 13:18:54

Post by Kashita »

мой чар стоит на втором этаже дома, и стреляет в лошадь, которая на первом этаже, если попал, то лечит ее полностью, и потом повторяется
Porvalo
Posts: 32
Joined: 2005-02-03 17:36:11

Post by Porvalo »

"спаринг двух чаров с одного компа" скрипт запусти просто лук дай вместо меча
ыыы...
SAMURAI
Posts: 203
Joined: 2004-07-10 00:38:43
Location: From DrW
Contact:

Re: нужен маленький скриптик

Post by SAMURAI »

Kashita wrote:Люди если не сложно напишите маленький скриптик...
мой чар стреляет один раз из лука, если попал то лечит, если нет то повторяется...
Мдее... А SEARCH на что дан?

Code: Select all

sub Archery() 


while 1 
   uo.usetype("0x13B1") # тип оружия 
   UO.Exec("attack 0x002D23EF") #айди 2-го чара 
   Repeat 
      wait (500) 
   if uo.injournal("destroyed")then 
   UO.usetype("0x13B1") # тип оружия 
   uo.deletejournal() 
   endif 
   Until ((UO.GetHP("0x0007424F") <75)or (UO.GetHP("0x002D23EF")  <100)) # 
#жизни 1-го и 2-го чара 
   repeat 
   wait (500) 
   UO.Exec("warmode 0") # выключаем вар мод  
      UO.Usetype("0x0E21") #Bandages 
      UO.Exec("waittargetobject 0x002D23EF") # айди 2-го чара 
      wait(3500) 
   Until (UO.InJournal("need you")) 
      UO.DeleteJournal() 
   Repeat  
      UO.Usetype("0x0E21") #Bandages 
      UO.Exec("waittargetobject 0x0007424F")  # айди 1-го чара 
      wait(3500) 
   Until (UO.InJournal("need healing")) 
wend 
end sub 


sub Healing() 
   UO.SetArm('CWeapon') 
   UO.Exec("bandageself") 
   wait(500) 
 
   UO.Arm('CWeapon') 
Нет ничего невозможного...
Кто [url=http://forum.yoko.com.ua/search.php]ИЩЕТ[/url], тот всегда найдёт...
[code]sub UO()
UO.Chto-To("S Chem-To")
end sub[/code]
© I'm
Locked