Здравствуйте, гость ( Вход | Регистрация )

> Автолоот, что там не хвотает добавь
KaPeIkA
сообщение 19.5.2011, 13:33
Сообщение #1


*****

Journeyman
Сообщений: 383
Регистрация: 21.12.2010
Группа: Пользователи
Наличность: 1679
Из: Aberdeen,Stockholm
Пользователь №: 13.302
Возраст: 29



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



Код
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; #


--------------------
Изображение
✵♛✵♛http://uowos.lv/

Skype Kapeika8
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
 
Ответить в эту темуОткрыть новую тему
Ответов
Mirage
сообщение 17.7.2011, 22:52
Сообщение #2


*******

Группа: Пользователи
Наличность: 0
Из: Иваново
Пользователь №: 13.089
Возраст: 35



Теже тапки только в профиль. По меньше строк.
Код
 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') так лучше не делать.
Но на вкус и цвет...


--------------------
Изображение
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения



Ответить в эту темуОткрыть новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

- Текстовая версия | Версия для КПК Сейчас: 9.7.2025, 6:40
Designed by Nickostyle