Yoko :: drink blood

Yoko http://forum.yoko.com.ua/

drink blood http://forum.yoko.com.ua/viewtopic.php?f=17&t=11984	Page 1 of 1

Author:	-=Morf=- [ 2007-05-21 19:12:23 ]
Post subject:	drink blood
драсте люди, я вернулсо...=)) мне типерь офигеть как нужен скриптик воть такой вота: запускаеш скрипт, он не выключается, и ищет вокруг чара на расстоянии 3 клетки кровь по типу, типы будут вписывать сам =) воть если найдет кровь то просто тупо дабл клик на нее, и поновой поиск крови вокруг... и так далее цикл вообщем

Author:	DerMeister =) [ 2007-05-21 19:14:43 ]
Post subject:
ПОИСК!

Author:	-=Morf=- [ 2007-05-21 19:20:06 ]
Post subject:
тиж мну знаеш, я ленивый как чёрттт)) и глупый притом =)

Author:	DerMeister =) [ 2007-05-21 19:22:59 ]
Post subject:
Ну тогда тема закрыта

Author:

Nmy [ 2007-05-21 22:16:15 ]

Post subject:

свой старый могу выложыть- если для альфы то типы можно неменять

Code:

sub BFG()
var n
 If uo.GetGlobal('BFG')=='On' then
    return
    else
    uo.setglobal('BFG','On')
 end if
Dim Blood[5]
Blood[0] = '0x122A'
Blood[1] = '0x122B'
Blood[2] = '0x122C'
Blood[3] = '0x122D'
Blood[4] = '0x122E'
UO.Set('finddistance', 3 )
While NOT UO.Dead() && uo.life < uo.str
For n = 0 TO 4
 UO.FindType( Blood[n] ,'-1','1')
    If UO.FindCount() then
        UO.UseObject('finditem')
        wait(10)
    endif
Next
Wait(250)
wend
uo.setglobal('BFG', 0)
end sub

Author:	Ururu [ 2007-05-21 22:40:59 ]
Post subject:
Нужно добавить еще и проверку на сообщения.

Author:

u0rypT [ 2007-05-22 09:18:12 ]

Post subject:

Code:

sub krov()
var x
dim a[5]
 a[1]=0x122E
 a[2]=0x122A
 a[3]=0x122C
 a[4]=0x122D
 a[5]=0x122B
  for x=1 to 5
  repeat
    uo.usefromground(a[x])
  next
end sub


sub blood() 
   If UO.Life<UO.Str Then 
     uo.usetype("0x0F06","0x0020")
   Else 
      UO.Print("Your HP at maximum!!!") 
   Endif 
end sub

Author:

-=Morf=- [ 2007-05-22 21:06:50 ]

Post subject:

3Jlo6Hblu' u0ry®T wrote:

Code:

sub krov()
var x
dim a[5]
 a[1]=0x122E
 a[2]=0x122A
 a[3]=0x122C
 a[4]=0x122D
 a[5]=0x122B
  for x=1 to 5
  repeat
    uo.usefromground(a[x])
  next
end sub


sub blood() 
   If UO.Life<UO.Str Then 
     uo.usetype("0x0F06","0x0020")
   Else 
      UO.Print("Your HP at maximum!!!") 
   Endif 
end sub

Так а как сделать чтобы постоянно шла проверка на кровь на растоянии 3 клетки от чара?

Author:	I'm [ 2007-05-22 22:44:42 ]
Post subject:
Code: While TRUE ... Wend

Author:	-=Morf=- [ 2007-05-23 06:39:19 ]
Post subject:
I`m пасиба+) А Прикиньте я сам догадался куда впихнуть это все + еще добавил задержку для удобства =))))) гыыы

Author:	I'm [ 2007-05-23 11:50:27 ]
Post subject:
-=Morf=- wrote: I`m пасиба+) А Прикиньте я сам догадался куда впихнуть это все + еще добавил задержку для удобства =))))) гыыы Красавец! Так держать

Page 1 of 1	All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/