Автолут

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
Dja
Posts: 1
Joined: 2009-09-28 21:37:53
Contact:

Автолут

Post by Dja »

Скрипт или консульная команда на Автоматический лут ( Гп, Регов и тд. ) с последнего открытого контейнера. Желательно в Hotkeys Injection. Для шарда Age of Power
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Post by Mirage »

что такое консульная команда?
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

Посмотрите через поиск. Такие вещи для Вас искать не кто не будет.
u0rypT
Posts: 175
Joined: 2004-12-30 18:13:16
Location: Russia
Contact:

Post by u0rypT »

В таком контексте пишется "никто". Да к черту - не важно.

Луталки:

1. Лутаем из последнего открывшегося контейнера(трупа)

Code: Select all

sub Loot()
   VAR i,Exit
   DIM Loot[18]
   
 
Loot[0]=0x0EED ; gp
Loot[1]=0x0F7B ; BM
Loot[2]=0x0F7A ; BP
Loot[3]=0x0F84 ; GA
Loot[4]=0x0F85 ; GI
Loot[5]=0x0F86 ; MR
Loot[6]=0x0F88 ; NS
Loot[7]=0x0F8C ; SA
Loot[8]=0x0F8D ; SS
Loot[9]=0x13FA ;two handed axe
Loot[10]=0x1413 ;arm
Loot[11]=0x1415 ;arm
Loot[12]=0x1411 ;arm
Loot[13]=0x1410 ;arm
Loot[14]=0x1414 ;arm
Loot[15]=0x0E21 ;ban
Loot[16]=0x0F78 ;batw
Loot[17]=0x0F8B ;pumise

UO.SetReceivingContainer('0x4000C313') ;ID backpacka
 
   For i=0 to 17
      Exit=0
      repeat
       UO.FindType(Loot[i],-1,'lastcontainer')           
        if UO.GetQuantity('finditem') then
         UO.Grab('0','finditem')
          wait(100)
          Else
         Exit=1
        endif
      until Exit==1 OR uo.injournal("loot")
   Next
UO.UnSetReceivingContainer()
end sub


2. Лутаем с земли

Code: Select all

sub Loot2()
  uo.Set('finddistance','3')
  uo.Ignore('self')
  uo.FindType('-1','-1','ground')
  while uo.FindCount() && uo.Weight <= 600
    uo.findtype('-1','-1','ground')
    uo.moveitem('finditem','all','backpack')
    wait(750)
  wend
  uo.IgnoreReset()
endsub



3. Режем и лутаем с земли

Code: Select all

sub Loot3()
  VAR dagger='0x0F51'
  uo.Set('finddistance','3')
  uo.WaitTargetObject('lastcorpse')
  uo.UseType(dagger)
  uo.Ignore('self')
  uo.FindType('-1','-1','ground')
  while uo.FindCount() && uo.Weight <= 600
    uo.findtype('-1','-1','ground')
    uo.moveitem('finditem','all','backpack')
    wait(750)
  wend
  uo.IgnoreReset()
endsub


4. Режем и лутаем из трупа -dagger имеем при себе

Code: Select all

sub Loot4()
   VAR i,Exit
   DIM Loot[18]
   
 
Loot[0]=0x0EED ; gp
Loot[1]=0x0F7B ; BM
Loot[2]=0x0F7A ; BP
Loot[3]=0x0F84 ; GA
Loot[4]=0x0F85 ; GI
Loot[5]=0x0F86 ; MR
Loot[6]=0x0F88 ; NS
Loot[7]=0x0F8C ; SA
Loot[8]=0x0F8D ; SS
Loot[9]=0x13FA ;two handed axe
Loot[10]=0x1413 ;arm
Loot[11]=0x1415 ;arm
Loot[12]=0x1411 ;arm
Loot[13]=0x1410 ;arm
Loot[14]=0x1414 ;arm
Loot[15]=0x0E21 ;ban
Loot[16]=0x0F78 ;batw
Loot[17]=0x0F8B ;pumise

UO.SetReceivingContainer('0x4000C313') ;ID backpacka
   uo.waittargetobject('lastcorpse')
   uo.UseType('0x0F51')
   For i=0 to 17
      Exit=0
      repeat
       UO.FindType(Loot[i],-1,'lastcontainer')           
        if UO.GetQuantity('finditem') then
         UO.Grab('0','finditem')
          wait(100)
          Else
         Exit=1
        endif
      until Exit==1 OR uo.injournal("loot")
   Next
UO.UnSetReceivingContainer()
end sub


Если есть проблемы в настройке - говори, помогу. Хотя, на будущее, совет: пройди по форуму, посмотри "прикрепленные" темы, посмотри FAQ, посмотри как пишутся скрипты. Есть даже уроки. Попробуй найти то, что тебе подходит. Если подходит, но не совсем - измени. Успехов.
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
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

u0rypT wrote:В таком контексте пишется "никто". Да к черту - не важно.
Посмотрел подпись - таким людям памятник при жизни надо ставить. :D
u0rypT
Posts: 175
Joined: 2004-12-30 18:13:16
Location: Russia
Contact:

Post by u0rypT »

Savage wrote:Посмотрел подпись - таким людям памятник при жизни надо ставить. :D


Какой раритет объявился. :roll:

Просто когда "жена" филолог да еще и редактор... и занимается копирайтингом - то сам перенимаешь привычки замечать касяки в написании/произношении слов, предложений и т.д. Диагноз в общем :D

А подпись - понимаешь, когда думаешь, что у тебя уйма свободного времени - так и получается, что свободного времени много. А читать постоянно худ. литературу - не интересно. А вот техническую - круто. Да и вообще - развиваться надо в любом направлении. Да и достаточно знать C++ как все остальное становится сразу ясным и понятным.
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
Post Reply