Помогите настроить скрипт

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Slavik
Posts: 18
Joined: 2006-08-22 13:32:04

Помогите настроить скрипт

Post by Slavik »

У меня вот такой скрипт на лут:

Code: Select all

sub Loot4() 
   VAR i,Exit  
   DIM Loot[18] 
    
  
Loot[0]=0x0EED ; gp 
Loot[1]=0x140E ; arm 
Loot[2]=0x1B76 ; arm 
Loot[3]=0x1410 ; arm 
Loot[4]=0x1415 ; arm
Loot[5]=0x1411 ; arm 
Loot[6]=0x1413 ; arm 
Loot[7]=0x1414 ; arm 
Loot[8]=0x13CA ; arm 
Loot[9]=0x13FA ;two handed axe 
Loot[10]=0x13C9 ;arm 
Loot[11]=0x1DB9 ;arm 
Loot[12]=0x13C7 ;arm 
Loot[13]=0x13C6 ;arm 
Loot[14]=0x13C5 ;arm 
Loot[15]=0x13B9 ;blade 
Loot[16]=0x1402 ;pika 
Loot[17]=0x1404 ;fork 
Loot[18]=0x13FC ;arb

UO.SetReceivingContainer('0x403A2088') ;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
Когда лутаешь через него, он вопервых не все вещи забирает из трупа которые должен, а во вторых виснет. Постоянно идет строка Items found: 1 и все, висняк. Подправте скрипт плз. Или объясните что в нем не так.

Code: Select all

Теги не забываем. I'm
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

DIM Loot[19]
For i=0 to 18
Slavik
Posts: 18
Joined: 2006-08-22 13:32:04

Post by Slavik »

И куда это вставить? Я не шарю в скриптах. Если можно вставте это в скрипт, и выложите его готовым. Пжалста. :roll:
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post by Savage »

Раз не шаришь, лутай руками тогда.
Slavik
Posts: 18
Joined: 2006-08-22 13:32:04

Post by Slavik »

Какой ты добрый я сморю.
Toolmate
Posts: 104
Joined: 2005-08-18 09:09:18
Location: RUSSIA

Post by Toolmate »

Тут не шарить надо, а глаза разуть, что тебе написал надо заменить в макре на эти значения.
-=^NOVA RunUO 2 Server^=-
www.nova-uo.com
сферовское ПВП
IRC Server: irc.netbynet.ru; канал: #nova
Slavik
Posts: 18
Joined: 2006-08-22 13:32:04

Post by Slavik »

Поставил все как наприсали и все равно тоже самое. Берет из трупа несколько предметов, а потом идет бегущая строка Items found: 1 и все, происходит висняк, приходится перезапускать уо. Если кто может сделать нормальный скрипт на лут, что бы брал все арморы плиту, кожу и оружие. Сделайте плиз.
Toolmate
Posts: 104
Joined: 2005-08-18 09:09:18
Location: RUSSIA

Post by Toolmate »

Code: Select all

sub Loot4() 
VAR i,Exit 
DIM Loot[19] 


Loot[0]=0x0EED ; gp 
Loot[1]=0x140E ; arm 
Loot[2]=0x1B76 ; arm 
Loot[3]=0x1410 ; arm 
Loot[4]=0x1415 ; arm 
Loot[5]=0x1411 ; arm 
Loot[6]=0x1413 ; arm 
Loot[7]=0x1414 ; arm 
Loot[8]=0x13CA ; arm 
Loot[9]=0x13FA ;two handed axe 
Loot[10]=0x13C9 ;arm 
Loot[11]=0x1DB9 ;arm 
Loot[12]=0x13C7 ;arm 
Loot[13]=0x13C6 ;arm 
Loot[14]=0x13C5 ;arm 
Loot[15]=0x13B9 ;blade 
Loot[16]=0x1402 ;pika 
Loot[17]=0x1404 ;fork 
Loot[18]=0x13FC ;arb 

UO.SetReceivingContainer('0x403A2088') ;ID backpacka 
uo.waittargetobject('lastcorpse') 
uo.UseType('0x0F51') 
For i=0 to 18 
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
Если не робит, значит твой макр кривой, а тут на форуме их полно:
https://yoko.uokit.com/search.php
-=^NOVA RunUO 2 Server^=-
www.nova-uo.com
сферовское ПВП
IRC Server: irc.netbynet.ru; канал: #nova
Slavik
Posts: 18
Joined: 2006-08-22 13:32:04

Post by Slavik »

Скрипт не кривой сто пудова, брал с этого же форума. Только типы поменял, что лутать.
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

бывает у сферы что в трупе есть ищо 1 итем но иго невидно, это есть борода или волосы, чтоб они непарили лут надо игнорировать файндитем, чтоб скрипт немешал в пвп, я итемы кидаю по координатам в один угол бекпака...
Mihail
Expert!
Posts: 548
Joined: 2005-05-20 20:30:10
Contact:

Post by Mihail »

Slavik wrote:Скрипт не кривой сто пудова,
если те грят что кривой значит кривой.. - вон тебе исправили было неправильно кол-во предметов в массиве
Slavik
Posts: 18
Joined: 2006-08-22 13:32:04

Post by Slavik »

Mihail wrote:
Slavik wrote:Скрипт не кривой сто пудова,
если те грят что кривой значит кривой.. - вон тебе исправили было неправильно кол-во предметов в массиве
Я имел ввиду что уже исправленный скрипт не кривой! тот то конечно немного не доделан. Так он кстати и не работает. Нашел себе другой скрипт, но все равно всем спасибо.:)
Post Reply