Yoko

All sides of Injection
It is currently 2025-10-30 00:32:19

All times are UTC+02:00




Post new topic  Reply to topic  [ 5 posts ] 
Author Message
 Post subject: Боевые
PostPosted: 2006-08-24 23:49:57 
Offline
User avatar

Joined: 2004-09-07 18:05:04
Posts: 25
Location: Latvija
Народ если не сложно выложите один старенкий скриптик, дапустим нада кочать сворд сумониш мишку его атакуеш убеваеш если у тебя хп не хватает хилишся и потом медицируеш до конца и снова сумониш и т.д! Буду очень благодарен.

_________________
Image
В передаче "За стеклом" стекло поменяли на лупу. Теперь думают как назвать передачу


Top
   
 Post subject: Re: Боевые
PostPosted: 2006-08-25 06:34:06 
Offline
User avatar

Joined: 2005-04-06 05:53:47
Posts: 124
xalat_ wrote:
Народ если не сложно выложите один старенкий скриптик, дапустим нада кочать сворд сумониш мишку его атакуеш убеваеш если у тебя хп не хватает хилишся и потом медицируеш до конца и снова сумониш и т.д! Буду очень благодарен.


Вот скрипт, нашел его но им никогда непользовался

Code:
VAR LASTTIMER 
sub abs(num)
if num>=0 then
return num
else
return num*(-1)
end if
end sub

sub battle()
var t
UO.CancelMenu()
UO.DeleteJournal()
UO.Setarm('arm')
UO.AutoMenu('What','Polar')
while NOT UO.Dead()
if UO.Life<UO.Str then
repeat
UO.Bandageself()
wait(5000)
if UO.Count('0x0e21')==0 then
uo.waittargettype('0x1008')
uo.usetype('0x0E20')
wait(500)
UO.DeleteJournal()
endif
until UO.Life==UO.Str
endif
UO.Arm('arm')
UO.WaitTargetSelf()
UO.Cast('Summ. Crea')
wait(500)
if UO.InJournal('lack sufficient') then
while UO.Mana<90
UO.WarMode(0)
LastTimer=UO.Timer()
UO.UseSkill('Meditation')
repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200
if not UO.InJournal("You lose") then
repeat
wait(100)
until UO.InJournal('You lose') or UO.Mana>=90
endif
UO.DeleteJournal()
wait(2000)
wend
endif
t=0
repeat
wait(500)
t=t+1
if t>15 then
UO.WaitTargetSelf()
UO.Cast('Summ. Crea')
t=0
if UO.InJournal('lack sufficient') then
while UO.Mana<90
UO.WarMode(0)
LastTimer=UO.Timer()
UO.UseSkill('Meditation')
repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200
if not UO.InJournal("You lose") then
repeat
wait(100)
until UO.InJournal('You lose') or UO.Mana>=90
endif
UO.DeleteJournal()
wait(2000)
wend
endif
endif
UO.findtype('0x00D5',-1,'ground')
until uo.FindCount()>0
UO.WarMode(1)
repeat
wait(500)
if abs(UO.GetX('finditem')-UO.GetX())>2 or abs(UO.GetY('finditem')-UO.GetY())>1 then
UO.UseType('0x0F4F')
endif
if UO.InJournal('too close') then
UO.Arm('arm')
endif
if UO.Life<35 then
UO.UseType('0x0F0E','0x09BB')
endif
UO.DeleteJournal()
UO.Attack('finditem')
wait(2000)
UO.findtype('0x00D5',-1,'ground')
until uo.FindCount()==0
wend
end sub

_________________
=== ? Como es tas ? ===


Top
   
 Post subject: Re: Боевые
PostPosted: 2006-08-25 11:23:08 
Offline
User avatar

Joined: 2004-09-07 18:05:04
Posts: 25
Location: Latvija
Dominator wrote:
xalat_ wrote:
Народ если не сложно выложите один старенкий скриптик, дапустим нада кочать сворд сумониш мишку его атакуеш убеваеш если у тебя хп не хватает хилишся и потом медицируеш до конца и снова сумониш и т.д! Буду очень благодарен.


Вот скрипт, нашел его но им никогда непользовался

Code:
VAR LASTTIMER 
sub abs(num)
if num>=0 then
return num
else
return num*(-1)
end if
end sub

sub battle()
var t
UO.CancelMenu()
UO.DeleteJournal()
UO.Setarm('arm')
UO.AutoMenu('What','Polar')
while NOT UO.Dead()
if UO.Life<UO.Str then
repeat
UO.Bandageself()
wait(5000)
if UO.Count('0x0e21')==0 then
uo.waittargettype('0x1008')
uo.usetype('0x0E20')
wait(500)
UO.DeleteJournal()
endif
until UO.Life==UO.Str
endif
UO.Arm('arm')
UO.WaitTargetSelf()
UO.Cast('Summ. Crea')
wait(500)
if UO.InJournal('lack sufficient') then
while UO.Mana<90
UO.WarMode(0)
LastTimer=UO.Timer()
UO.UseSkill('Meditation')
repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200
if not UO.InJournal("You lose") then
repeat
wait(100)
until UO.InJournal('You lose') or UO.Mana>=90
endif
UO.DeleteJournal()
wait(2000)
wend
endif
t=0
repeat
wait(500)
t=t+1
if t>15 then
UO.WaitTargetSelf()
UO.Cast('Summ. Crea')
t=0
if UO.InJournal('lack sufficient') then
while UO.Mana<90
UO.WarMode(0)
LastTimer=UO.Timer()
UO.UseSkill('Meditation')
repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200
if not UO.InJournal("You lose") then
repeat
wait(100)
until UO.InJournal('You lose') or UO.Mana>=90
endif
UO.DeleteJournal()
wait(2000)
wend
endif
endif
UO.findtype('0x00D5',-1,'ground')
until uo.FindCount()>0
UO.WarMode(1)
repeat
wait(500)
if abs(UO.GetX('finditem')-UO.GetX())>2 or abs(UO.GetY('finditem')-UO.GetY())>1 then
UO.UseType('0x0F4F')
endif
if UO.InJournal('too close') then
UO.Arm('arm')
endif
if UO.Life<35 then
UO.UseType('0x0F0E','0x09BB')
endif
UO.DeleteJournal()
UO.Attack('finditem')
wait(2000)
UO.findtype('0x00D5',-1,'ground')
until uo.FindCount()==0
wend
end sub

Щяс немагу потестить, Но очень болшое спасибо вечером приду тэстану :) :roll:

_________________
Image

В передаче "За стеклом" стекло поменяли на лупу. Теперь думают как назвать передачу


Top
   
 Post subject:
PostPosted: 2006-08-25 16:38:00 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
Вечером придеш и воспользуйся поиском.

_________________
The End.


Top
   
 Post subject:
PostPosted: 2006-08-25 17:35:48 
Offline
User avatar

Joined: 2004-09-07 18:05:04
Posts: 25
Location: Latvija
I'm wrote:
Вечером придеш и воспользуйся поиском.

Ты так сказал как будто я им не пользуюсь ? !! ты посматри когда создан мои акаунт и посматри скока постов, я искал и просто не нашё старые боевые скрипты, видел токо новые! :!: :D

_________________
Image

В передаче "За стеклом" стекло поменяли на лупу. Теперь думают как назвать передачу


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 5 posts ] 

All times are UTC+02:00


Who is online

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