Yoko

All sides of Injection
It is currently 2025-11-12 19:59:48

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
-=Morf=-
 Post subject: drink blood
PostPosted: 2007-05-21 19:12:23 
Offline
User avatar

Joined: 2006-04-22 20:37:37
Posts: 79
драсте люди, я вернулсо...=))
мне типерь офигеть как нужен скриптик воть такой вота:
запускаеш скрипт, он не выключается, и ищет вокруг чара на расстоянии 3 клетки кровь по типу, типы будут вписывать сам =)
воть если найдет кровь то просто тупо дабл клик на нее, и поновой поиск крови вокруг... и так далее цикл вообщем :oops:
Top
   
Reply with quote  
DerMeister =)
 Post subject:
PostPosted: 2007-05-21 19:14:43 
Offline
Expert!
User avatar

Joined: 2006-02-25 21:48:38
Posts: 1032
ПОИСК!

_________________
DerMeister сейчас на нейрале!
Top
   
Reply with quote  
-=Morf=-
 Post subject:
PostPosted: 2007-05-21 19:20:06 
Offline
User avatar

Joined: 2006-04-22 20:37:37
Posts: 79
тиж мну знаеш, я ленивый как чёрттт)) и глупый притом =)
Top
   
Reply with quote  
DerMeister =)
 Post subject:
PostPosted: 2007-05-21 19:22:59 
Offline
Expert!
User avatar

Joined: 2006-02-25 21:48:38
Posts: 1032
Ну тогда тема закрыта :) :) :)

_________________
DerMeister сейчас на нейрале!
Top
   
Reply with quote  
Nmy
 Post subject:
PostPosted: 2007-05-21 22:16:15 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
свой старый могу выложыть- если для альфы то типы можно неменять
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

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Top
   
Reply with quote  
Ururu
 Post subject:
PostPosted: 2007-05-21 22:40:59 
Offline
User avatar

Joined: 2007-02-21 20:15:57
Posts: 479
Нужно добавить еще и проверку на сообщения.

_________________
Шард Антарес
Ururu
Top
   
Reply with quote  
u0rypT
 Post subject:
PostPosted: 2007-05-22 09:18:12 
Offline
User avatar

Joined: 2004-12-30 18:13:16
Posts: 175
Location: Russia
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

_________________
Design, webdev, coding, c#, php, asp.net, xml, perl, sql, ajax, drawing, illustrating, restoration, photo, photoshop, schedule, pron, guitar, lead-guitar, js, jsp, java, dom, html, *nix, struts, cs, etc
Top
   
Reply with quote  
-=Morf=-
 Post subject:
PostPosted: 2007-05-22 21:06:50 
Offline
User avatar

Joined: 2006-04-22 20:37:37
Posts: 79
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 клетки от чара?
Top
   
Reply with quote  
I'm
 Post subject:
PostPosted: 2007-05-22 22:44:42 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
Code:
While TRUE
...
Wend

_________________
The End.
Top
   
Reply with quote  
-=Morf=-
 Post subject:
PostPosted: 2007-05-23 06:39:19 
Offline
User avatar

Joined: 2006-04-22 20:37:37
Posts: 79
I`m пасиба+) :wink:
А Прикиньте я сам догадался куда впихнуть это все + еще добавил задержку для удобства =))))) гыыы :twisted: :evil: :twisted: :idea:
Top
   
Reply with quote  
I'm
 Post subject:
PostPosted: 2007-05-23 11:50:27 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
-=Morf=- wrote:
I`m пасиба+) :wink:
А Прикиньте я сам догадался куда впихнуть это все + еще добавил задержку для удобства =))))) гыыы :twisted: :evil: :twisted: :idea:

Красавец! :)
Так держать :)

_________________
The End.
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: No registered users and 0 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