ВЕТЕРЕНАРИЯ И АРЧЕРИ!

Anything and all.

Moderators: Murderator+, Murderator

ДРВ
Posts: 121
Joined: 2006-04-14 10:51:44

Post by ДРВ »

BigMouseI wrote:У меня есть такой скрипт :D
поделится можешь?
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Post by Askaneli »

BigMouseI wrote:У меня есть такой скрипт :D


Я так понял палить из лука придётся через паталок ???
Сделал дело - флуди смело !!!
klonuk
Posts: 145
Joined: 2006-05-23 11:48:22
Contact:

Post by klonuk »

Одно интерсно как через потолок будет лечить? ))) :lol:
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Post by Askaneli »

klonuk wrote:Одно интерсно как через потолок будет лечить? ))) :lol:

Одно то что палишь через паталок уже есть БАГ.
Сделал дело - флуди смело !!!
klonuk
Posts: 145
Joined: 2006-05-23 11:48:22
Contact:

Post by klonuk »

Askaneli wrote:
klonuk wrote:Одно интерсно как через потолок будет лечить? ))) :lol:

Одно то что палишь через паталок уже есть БАГ.


Знаю не раз за это лес рубил )))
ДРВ
Posts: 121
Joined: 2006-04-14 10:51:44

Post by ДРВ »

Кто нибудь мне поможет?
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

Veterinary качай морфом
Archery руками или стрелай по левочару
ДРВ
Posts: 121
Joined: 2006-04-14 10:51:44

Post by ДРВ »

NMY wrote:Veterinary качай морфом
Archery руками или стрелай по левочару
если бы я хотел так качать,я бы качал....
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

хотеть вредно для вашего здоровя :mrgreen:
klonuk
Posts: 145
Joined: 2006-05-23 11:48:22
Contact:

Post by klonuk »

NMY wrote:хотеть вредно для вашего здоровя :mrgreen:


Аватарку изменил.. )) Такая же на олдп? Извеняюсь за флуд. ))
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

klonuk wrote:
NMY wrote:хотеть вредно для вашего здоровя :mrgreen:


Аватарку изменил.. )) Такая же на олдп? Извеняюсь за флуд. ))


да... хватит тему заполнять... закрываем...
BigMouseI
Posts: 93
Joined: 2006-04-15 09:00:35

Post by BigMouseI »

Code: Select all

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;ARCHERY;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Всё что надо сделать это либо попросить друга постоять пока вы будете прокачиваться,
; либо купить(затамить) дракона, поставить его на 2 этаж дома, обставить ящиками так,
; чтобы можно было стрелять и хелить его из хотябы 1 точки.
; Внимание! На шарде ДРВ за использование бага со 2 этажом и драком наказывают!!

; Итак, всё что нам надо:
; пачку бинтов (обязательно)
; мойку для бинтов (обязательно)
; стрелы (обязательно)
; еда
; лук (обязательно)
; соучаснег =) (обязательно)

; By BigMouseII [SoW] для сервера Dragon World.
; Версия 1.0b

sub archery()
var sunduk = '0x4047216A' ; сундук со стрелами
var drak = '0x004E0220' ; айди драка или соучаснега
while not UO.Dead()
   UO.usetype("0x13B1")            ; тип лука
   UO.Attack(drak)    ; ид врага
   Repeat
      uo.FindType('0x0F3F','0x0000', 'ground')
      if uo.findCount()>0 then
         uo.grab('0','finditem')
         wait(200)
      endif                     
      wait(1000)
   Until ((UO.GetHP("self") <80)or (UO.GetHP(drak) <80))
   UO.Exec("warmode 0")            ; убираем вар
   While not UO.Hidden()
      UO.Exec("warmode 0")
      UO.Useskill('Hiding')
      wait(4000)
      wend
   UO.DeleteJournal()
   wait(200)
   Repeat
      While not UO.Hidden()
         UO.Exec("warmode 0")
         UO.Useskill('Hiding')
         wait(4000)
      wend
      UO.Exec("bandageself")
      wait(1500)
   Until (UO.InJournal("need healing"))
   UO.DeleteJournal()
   Repeat
      UO.Exec("warmode 0")            ; убираем вар
      While not UO.Hidden()
         UO.Exec("warmode 0")
         UO.Useskill('Hiding')
         wait(4000)
      wend
      UO.Usetype("0x0E21")         ;    тип бинтов
      UO.waittargetobject(drak)  ; ид врага
      wait(1500)
   Until (UO.InJournal("need you"))
   While UO.Count('0x0E20') > 0
      UO.Waittargettype('0x1008')
      wait(200)
      UO.Usetype('0x0E20')
   wend
wend
end sub
Post Reply