Yoko

All sides of Injection
It is currently 2026-01-16 16:45:21

All times are UTC+02:00




Post new topic  Reply to topic  [ 3 posts ] 
Author Message
PostPosted: 2007-01-25 21:48:56 
Offline

Joined: 2005-03-09 01:50:17
Posts: 16
Code:
Команда для изи уо

set *1 0
halt




sub main()
repeat
wait(20)
      If UO.GetEasyUO(2)=="0" then
         If UO.GetEasyUO(1)=="1" then
         UO.SetEasyUO(2,"1")
         UO.Exec('exec var1')
         end if
         If UO.GetEasyUO(1)=="2" then
         UO.SetEasyUO(2,"1")
         UO.Exec('exec var2')
         end if
         If UO.GetEasyUO(1)=="3" then
         UO.Exec('exec var3')
         UO.SetEasyUO(2,"1")
         end if
         If UO.GetEasyUO(1)=="4" then
         UO.Exec('exec var4')
         UO.SetEasyUO(2,"1")
         end if
         If UO.GetEasyUO(1)=="5" then
         UO.Exec('exec var5')
         UO.SetEasyUO(2,"1")
         end if
         If UO.GetEasyUO(1)=="6" then
         UO.Exec('exec var6')
         UO.SetEasyUO(2,"1")
         end if
         If UO.GetEasyUO(1)=="7" then
         UO.Exec('exec var7')
         UO.SetEasyUO(2,"1")
         end if
         If UO.GetEasyUO(1)=="8" then
         UO.Exec('exec var8')
         UO.SetEasyUO(2,"1")
         end if
         If UO.GetEasyUO(1)=="9" then
         UO.Exec('exec var9')
         UO.SetEasyUO(2,"1")
         end if
         If UO.GetEasyUO(1)=="10" then
         UO.Exec('exec var10')
         UO.SetEasyUO(2,"1")
         end if
      end if
         
      If UO.GetEasyUO(2)=="1" then
         If UO.GetEasyUO(1)>="1" then
         UO.SetEasyUO(3,(UO.GetEasyUO(1)))
         end if
      end if

until uo.life<1
end sub



sub var1()
UO.SetEasyUO(1,"666")
uo.cast("Magic Arrow","lasttarget")
wait(890)
If UO.GetEasyUO(3)>="1" then
UO.SetEasyUO(1,(UO.GetEasyUO(3)))
UO.SetEasyUO(2,"0")
end if
UO.SetEasyUO(2,"0")
end sub


sub var2()
UO.SetEasyUO(1,"666")
uo.cast("Poison","lasttarget")
wait(1520)
If UO.GetEasyUO(3)>="1" then
UO.SetEasyUO(1,(UO.GetEasyUO(3)))
UO.SetEasyUO(2,"0")
end if
UO.SetEasyUO(2,"0")
end sub


sub var3()
UO.SetEasyUO(1,"666")
uo.cast("Lightning","lasttarget")
wait(1890)
If UO.GetEasyUO(3)>="1" then
UO.SetEasyUO(1,(UO.GetEasyUO(3)))
UO.SetEasyUO(2,"0")
end if
UO.SetEasyUO(2,"0")
end sub


sub var4()
UO.SetEasyUO(1,"666")
uo.cast("Fireball","lasttarget")
wait(1700)
If UO.GetEasyUO(3)>="1" then
UO.SetEasyUO(1,(UO.GetEasyUO(3)))
UO.SetEasyUO(2,"0")
end if
UO.SetEasyUO(2,"0")
end sub


sub var5()
UO.SetEasyUO(1,"666")
uo.cast("Harm","lasttarget")
wait(1300)
If UO.GetEasyUO(3)>="1" then
UO.SetEasyUO(1,(UO.GetEasyUO(3)))
UO.SetEasyUO(2,"0")
end if
UO.SetEasyUO(2,"0")
end sub


sub var6()
UO.SetEasyUO(1,"666")
uo.cast("Mana Drain","lasttarget")
wait(1520)
If UO.GetEasyUO(3)>="1" then
UO.SetEasyUO(1,(UO.GetEasyUO(3)))
UO.SetEasyUO(2,"0")
end if
UO.SetEasyUO(2,"0")
end sub


sub var7()
uo.cast("Paralyze","lasttarget")
uo.msg("Cast Sample 7")
wait(2180)
If UO.GetEasyUO(3)>="1" then
UO.SetEasyUO(1,(UO.GetEasyUO(3)))
UO.SetEasyUO(2,"0")
end if
UO.SetEasyUO(2,"0")
end sub


sub var8()
UO.SetEasyUO(1,"666")
uo.cast("Clumsy","lasttarget")
wait(2000)
If UO.GetEasyUO(3)>="1" then
UO.SetEasyUO(1,(UO.GetEasyUO(3)))
UO.SetEasyUO(2,"0")
end if
UO.SetEasyUO(2,"0")
end sub


sub var9()
UO.SetEasyUO(1,"666")
uo.cast("Cure","lasttarget")
wait(1180)
If UO.GetEasyUO(3)>="1" then
UO.SetEasyUO(1,(UO.GetEasyUO(3)))
UO.SetEasyUO(2,"0")
end if
UO.SetEasyUO(2,"0")
end sub


sub var10()
UO.SetEasyUO(1,"666")
uo.cast("Heal","lasttarget")
wait(1720)
If UO.GetEasyUO(3)>="1" then
UO.SetEasyUO(1,(UO.GetEasyUO(3)))
UO.SetEasyUO(2,"0")
end if
UO.SetEasyUO(2,"0")
end sub


sub var1a()
UO.SetEasyUO(1,"1")
end sub

sub var2a()
UO.SetEasyUO(1,"2")
end sub

sub var3a()
UO.SetEasyUO(1,"3")
end sub

sub var4a()
UO.SetEasyUO(1,"4")
end sub

sub var5a()
UO.SetEasyUO(1,"5")
end sub

sub var6a()
UO.SetEasyUO(1,"6")
end sub

sub var7a()
UO.SetEasyUO(1,"7")
end sub

sub var8a()
UO.SetEasyUO(1,"8")
end sub

sub var9a()
UO.SetEasyUO(1,"9")
end sub

sub var10a()
UO.SetEasyUO(1,"10")
end sub

sub zero()
If UO.GetEasyUO(3)>="1" then
UO.SetEasyUO(1,(UO.GetEasyUO(3)))
UO.SetEasyUO(2,"0")
end if
UO.SetEasyUO(2,"0")
end sub

Вот скрипт на блокировку каста - тоесть если я чтото кастую и жму другой, скрипт ждет пока кончится первый каст и затем сам начнет второй. Здесь все сделано на задержках - я хотел бы узнать возможно ли его переделать, чтобы он работал на проверке траты маны...
Вот скрипт в котором реализована проверка на трату маны (автокаст)
Code:
sub cast() 
VAR m
repeat
m=uo.mana
#var t=uo.timer()
#uo.textopen()
uo.cast('Energy Bolt','last')
repeat
wait(5)
IF uo.mana==uo.int then
m=uo.int
end if
until uo.mana<m
#t=uo.timer()-t
#uo.textprint(t)
until 0
end sub

Плз помогите:(


Top
   
 Post subject:
PostPosted: 2007-01-27 20:14:09 
Offline

Joined: 2005-03-09 01:50:17
Posts: 16
Ап:(


Top
   
 Post subject:
PostPosted: 2007-02-06 03:39:34 
Offline

Joined: 2005-03-09 01:50:17
Posts: 16
magl wrote:
Ап:(

Плиз помогите :(


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 1 guest


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