Yoko

All sides of Injection
It is currently 2018-02-24 10:11:20

All times are UTC+02:00




Post new topic  Reply to topic  [ 1 post ] 
Author Message
 Post subject: Моб+ лут
PostPosted: 2018-01-28 16:08:48 
Offline

Joined: 2015-11-26 10:16:44
Posts: 60
Народ помогите пожалуста со скриптом я хз что с ним делать уже мне надо чтобы скрипт работал постояна я буду бегать по пещере искать мобы он находит по списку и начинает убивать его и потом уже лутать его вот скрипт но он чета крэшит спс


Code:

sub main()
   var n, m, mob
   var distance='1'
   
   Dim npc[10]
   npc[0]=1 # count
   npc[1]='0x013D'
   npc[2]=''
   npc[3]=''
   
   
   uo.set('finddistance',distance)
   while 1
      UO.DeleteJournal()
      repeat
         for n=1 to npc[0]
            uo.findtype(npc[n],-1,'ground')
            if uo.findcount() then
               wait(100)
               mob=uo.getserial('finditem')
               uo.attack(mob)
            endif
         next
      until UO.InJournal("Corpse of")
      if uo.journal('Corpse of') then
         wait(100)
         corpser()
      end if
      wait(1000)
   wend
endsub

sub corpser()
   uo.waittargetobject('lastcorpse')
   uo.usetype('0x0EC4')
   wait(500)
   Lootground()
endsub
sub Lootground()
   VAR i
   
   Dim Loot[40]
   Loot[0]=0x0EED ; gp
   Loot[1]=0x09F1 ; Raw Ribs
   Loot[2]=0x0F78 ; Bat wing
   Loot[3]=0x0F87 ; Eye of Newt
   Loot[4]=0x0F08 ; Mana
   Loot[5]=0x1AE2 ; Skull
   Loot[6]=0x100E ; koper key
   Loot[7]=0x1010 ; Old key
   
   for i=0 to 7
      UO.FindType(Loot[i],-1,'lastcontainer')
      if UO.GetQuantity('finditem') then
         UO.Grab('0','finditem')
         wait(1000)
      endif
   next
   uo.print(' -= done =- ')
   uo.msg('.bandageself')
endsub


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

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:  
Powered by phpBB® Forum Software © phpBB Limited