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

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

Если не робит, значит твой макр кривой, а тут на форуме их полно:
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