UoKit.com Форумы > Автолоот

Помощь - Поиск - Пользователи - Календарь

Полная версия: Автолоот

UoKit.com Форумы > Ultima Online > Программы для Ultima Online > Injection

KaPeIkA

19.5.2011, 13:33

Если не трудно добавьте что там не хватает а то я не понимаю ((( если не трудно это на инжу плс

Код

sub Loot()
var t,l
t=200
uo.UseObject('lastcorpse')
wait(t)
dim Loot[35]
uo.Print('Nu kas?...')
### Magic Looting Items ###
Loot[1]=0x27A5; Anshuar shield 
Loot[2]=0x26C2; Shroud
Loot[3]=0x2B04; Cloak of huj :D
Loot[4]=0x0EFA; Book
Loot[5]=0x140E; RINGMEILS
Loot[6]=0x13EC; $
Loot[7]=0x13F0; $
Loot[8]=0x13EE; $
Loot[9]=0x13EB; $
Loot[10]=0x1412; Platmeils
Loot[11]=0x1413; #
Loot[12]=0x1415; #
Loot[13]=0x1411; #
Loot[14]=0x1414; #
Loot[15]=0x1410; #
Loot[16]=0x317A; Elven boots
Loot[17]=0x1DB9; STUDENTS
Loot[18]=0x13DB; @
Loot[19]=0x13D4; @
Loot[20]=0x13C6; @
Loot[21]=0x13CB; @
Loot[22]=0x2b01; PARALIZE BOW
Loot[23]=0x1BC4; INVUL ShIELD
Loot[24]=0x27A8; DO katana
Loot[25]=0x2FB9; KRUSTS 0x26C2
Loot[26]=0x26C2; Noble elven bow
Loot[27]=0x2D2F; Paralize sword
Loot[28]=0x1B77; Shield
Loot[29]=0x2F5B; Cinture
Loot[30]=0x2647; JAUNAIS ARMORS
Loot[31]=0x2641; #
Loot[32]=0x2645; #
Loot[33]=0x2657; #
Loot[34]=0x2643; #
Loot[35]=0x2B01; #

Veter

19.5.2011, 19:14

Цитата(Kapeika @ 19.5.2011, 13:33)

Loot[3]=0x2B04; Cloak of huj

Mirage

20.5.2011, 9:44

Не хватает скрипта

Если ты играешь на бесте то там есть раздел в котором тонны скриптов. Если на ОлдП то там тоже есть раздел.

Хотя вроде на yoko лучше всего все расписано с примерами в УРОКАХ.

UO._.Detected

7.7.2011, 10:59

sub PvPloot()
VAR i,Exit
DIM LootingItem[50]

LootingItem[1] = 0x0EED ## - Shroud ( all type )
UO.SetReceivingContainer('0x4000BBE4');ID backpacka
LootingItem[2] = 0x204E ## - Gold 0x204E
LootingItem[3] = 0x1089 ## - Trolls ( all type )
LootingItem[4] = 0x1549 ## - Helm of the leader ( all type )
LootingItem[5] = 0x1F0B ## - Orc'a ( all type )
LootingItem[6] = 0x09D2 ## - Deamon Bysbl ( all type )
LootingItem[7] = 0x1086 ## - Deamon braclet ( all type )
LootingItem[8] = 0x1078 ## - Scrop koga ( all type )
LootingItem[9] = 0x1876 ## - Spider Wire ( all type)
LootingItem[10] = 0x0F90 ## - dead wood ( all type )
LootingItem[11] = 0x0FB8 ## - scorpion sting ( all type )
LootingItem[12] = 0x0F82 ## - Dragon Blood ( all type )
LootingItem[13] = 0x1515 ## - Thieves Cloak ( all type )
LootingItem[14] = 0x13FE ## - Katana ( all type )
LootingItem[15] = 0x1415 ## - Telo ( all type )
LootingItem[16] = 0x1411 ## - Nogi ( all type )
LootingItem[17] = 0x1410 ## - Ple4i ( all type )
LootingItem[18] = 0x1414 ## - Ryki ( all type )
LootingItem[19] = 0x1412 ## - Golova ( all type )
LootingItem[20] = 0x1413 ## - Gorget ( all type )
LootingItem[21] = 0x1B78 ## - Shield ( all type )
LootingItem[22] = 0x0E76 ## - Backback ( all type )
LootingItem[23] = 0x1842 ## - Banka ( all type )
LootingItem[24] = 0x0F3F ## - Titan hamer ( all type )
LootingItem[25] = 0x1B76 ## - Heater ( all type )
LootingItem[26] = 0x108A ## - Kolbco ( all type )
LootingItem[27] = 0x13D8 ## - koganie nogi ( all type )
LootingItem[28] = 0x1C04 ## - CuCbki ( all type )
LootingItem[29] = 0x1087 ## - Cerbgi ( all type )
LootingItem[30] = 0x14EB ## - Karta ( all type )
LootingItem[31] = 0x14EB ## - o4ko ( all type )
For i=1 to 1
Exit=0
repeat
UO.FindType(LootingItem[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

Mirage

10.7.2011, 22:22

Цитата(UO._.Detected @ 7.7.2011, 11:59)

sub PvPloot()

Классный скрипт для лута "Shroud ( all type )", жаль что больше ничего лутать не будет.

UO._.Detected

11.7.2011, 17:08

Всё лутит прекрасно)
серверы везде разные гдето есть задержка на лут и перекладывание
Наилушчий вариант скачать UO looter

UO._.Detected

14.7.2011, 19:41

For i=1 to 1 <<<< i=1 to 31 извини
Exit=0
repeat
UO.FindType(LootingItem[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

Mirage

17.7.2011, 22:52

Теже тапки только в профиль. По меньше строк.

Код

 sub PvPloot()
    VAR i,Exit
    DIM LootingItem[50]
    LootingItem[1] = '0x0EED' ## - Shroud ( all type )
    LootingItem[2] = '0x204E' ## - Gold 0x204E
    LootingItem[3] = '0x1089' ## - Trolls ( all type )
    LootingItem[4] = '0x1549' ## - Helm of the leader ( all type )
    LootingItem[5] = '0x1F0B' ## - Orc'a ( all type )
    LootingItem[6] = '0x09D2' ## - Deamon Bysbl ( all type )
    LootingItem[7] = '0x1086' ## - Deamon braclet ( all type )
    LootingItem[8] = '0x1078' ## - Scrop koga ( all type )
    LootingItem[9] = '0x1876' ## - Spider Wire ( all type)
    LootingItem[10] = '0x0F90' ## - dead wood ( all type )
    LootingItem[11] = '0x0FB8' ## - scorpion sting ( all type )
    LootingItem[12] = '0x0F82' ## - Dragon Blood ( all type )
    LootingItem[13] = '0x1515' ## - Thieves Cloak ( all type )
    LootingItem[14] = '0x13FE' ## - Katana ( all type )
    LootingItem[15] = '0x1415' ## - Telo ( all type )
    LootingItem[16] = '0x1411' ## - Nogi ( all type )
    LootingItem[17] = '0x1410 ## - Ple4i ( all type )
    LootingItem[18] = '0x1414' ## - Ryki ( all type )
    LootingItem[19] = '0x1412' ## - Golova ( all type )
    LootingItem[20] = '0x1413' ## - Gorget ( all type )
    LootingItem[21] = '0x1B78' ## - Shield ( all type )
    LootingItem[22] = '0x0E76' ## - Backback ( all type )
    LootingItem[23] = '0x1842' ## - Banka ( all type )
    LootingItem[24] = '0x0F3F' ## - Titan hamer ( all type )
    LootingItem[25] = '0x1B76' ## - Heater ( all type )
    LootingItem[26] = '0x108A' ## - Kolbco ( all type )
    LootingItem[27] = '0x13D8' ## - koganie nogi ( all type )
    LootingItem[28] = '0x1C04' ## - CuCbki ( all type )
    LootingItem[29] = '0x1087' ## - Cerbgi ( all type )
    LootingItem[30] = '0x14EB' ## - Karta ( all type )
    LootingItem[31] = '0x14EB' ## - o4ko ( all type )
    For i=1 to 31
        UO.FindType(LootingItem[i],-1,'lastcontainer')
        while UO.FindCount()
            uo.moveitem('finditem','0','backpack')
            wait(100)
            UO.FindType(LootingItem[i],-1,'lastcontainer')
        wend
    Next
end sub

На мой взгляд UO.FindType(LootingItem[i],-1,'lastcontainer') так лучше не делать.
Но на вкус и цвет...

Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.