Yoko

All sides of Injection
It is currently 2024-03-29 06:35:53

All times are UTC+02:00




Post new topic  Reply to topic  [ 2 posts ] 
Author Message
PostPosted: 2011-08-09 18:38:34 
Offline

Joined: 2011-08-01 10:32:33
Posts: 13
Переделать что бы на себя со скроллов кастовал.

Code:
sub main()
   VAR Eval=0 ; Use Evaluating Intelligence on self 1:yes/0:no
   VAR NS='0x0F88'
   VAR w
   uo.addobject('Chest')
   while uo.targeting()
      wait(400)
   wend
   uo.useobject('Chest')
   wait(2000)
   While NOT UO.Dead()
      If Eval==1 then
         uo.useskill('Evaluating','self')
         wait(1000)
      endif
      if uo.bp>0 and uo.ns>0 then
         UO.Cast('Magic Arrow', 'self')
      else
         if uo.ns==0 then
            uo.findtype(NS,-1,'Chest')
            if uo.findcount() then
               uo.moveitem('finditem','50','backpack')
               checklag()
               wait(700)
            endif
         endif
         if uo.ns>0 then
            UO.Cast('Poison', 'self')
         endif
      endif
      WaitForMana()
      if uo.mana<14 then
         meditation()
      endif
   Wend
end sub
Sub WaitForMana()
   VAR w,m=uo.mana
   for w=0 to 100
      if uo.mana<m then
         return
      endif
      wait(500)
   next
endsub
sub checklag()
   repeat
      UO.DeleteJournal()
      UO.Click('backpack')
   until backpack()==1
endsub
sub backpack()
   var n
   for n=0 to 200
      if uo.injournal('a backpack') then
         return 1
      endif
      wait(200)
   next
endsub
sub meditation()
   uo.findtype('0x0F0E','0x09DF','backpack')
   if uo.findcount() then
      uo.useobject('finditem')
      wait(700)
   else
      while uo.mana < uo.int
         if uo.Journal(0)=='You are preoccupied with thoughts of battle.' then
            uo.warmode(0)
         endif
         checklag()
         Uo.Useskill('Meditation')
         waitformed()
      wend
   endif
endsub
sub waitformed()
   var n
   for n=0 to 100
      if uo.injournal('You lose|at peace') then
         return
      endif
      wait(500)
   next
endsub


Top
   
PostPosted: 2011-08-30 16:39:46 
Offline

Joined: 2006-11-07 00:52:08
Posts: 14
Location: Russia, Saratov
golod wrote:
Переделать что бы на себя со скроллов кастовал.


это приказ? :)

Это напоминалка себе ;) © Mirage

лол :lol:


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 12 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