Дайте плз скрипту на loot из трупов

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Silf
Posts: 5
Joined: 2004-10-22 10:24:09
Contact:

Дайте плз скрипту на loot из трупов

Post by Silf »

Дайте плз скрипту на loot из трупов
Весна покажет кто где срал!!
MitAl
Posts: 60
Joined: 2004-06-01 16:24:44
Location: DRW

Re: Дайте плз скрипту на loot из трупов

Post by MitAl »

Silf wrote:Дайте плз скрипту на loot из трупов
Неужели поиском не можешь воспользоваться ???

Code: Select all

sub Loot() 
var i,n 
Dim A[38] 
A[1] = 0x0f7b ;BloodMoss 
A[2] = 0x0f09 ;Invisibility 
A[3] = 0x0f09 ;ManaRefresh 
A[4] = 0x0f0b ;Refresh 
A[5] = 0x13B9 ;VikingSword 
A[6] = 0x0f0c ;Heal 
A[7] = 0x143E ;Halberd 
A[8] = 0x1ce1 ;haed 
A[9] = 0x1f14 ;Runa 
A[10] = 0x204e ;RobeOfDarkMage 
A[11] = 0x0f51 ;Dagger 
A[12] = 0x0f7a ;BlackPearl 
A[13] = 0x1404 ;WarFork 
A[14] = 0x0f84 ;Garlic 
A[15] = 0x0f85 ;Ginseng 
A[16] = 0x1B76 ;Heater 
A[17] = 0x1411 ;PlatemailLegs 
A[18] = 0x1415 ;Platemail 
A[19] = 0x1410 ;PlatemailArms 
A[20] = 0x1414 ;PlatemailGauntlets 
A[21] = 0x1412 ;PlatemailHelm 
A[22] = 0x1413 ;PlatemailHelm 
A[23] = 0x1F40 ;Poison 
A[24] = 0x1F4A ;Light 
A[25] = 0x0f86 ;MandrakeRoot 
A[26] = 0x0f88 ;Nightshade 
A[27] = 0x0E76 ;Bag 
A[28] = 0x09B0 ;BeltPouch 
A[29] = 0x0E75 ;Backpack 
A[30] = 0x0E21 ;bandage 
A[31] = 0x1F5F ;FS 
A[32] = 0x1F49 ;GH 
A[33] = 0x1F4C ;Recall 
A[34] = 0x0f8c ;SulphorousAsh 
A[35] = 0x0f8d ;SpidersSilk 
A[36] = 0x0EED ;Gold
A[37] = 0x1BD1; Feathers
A[38] = 0x09F1; myaso ptichek

UO.WaitTargetObject("lastcorpse") 
UO.useobject (0x4013EE14); ID того,чем будешь резать
wait(1000)

i = 1200 
FOR n=1 TO 38 
uo.findtype(A[n],"-1","lastcorpse") 
if uo.findcount() > 0 then 
UO.grab(1, "finditem") 
uo.print("Found "+str(uo.findcount())) 
Wait(i) 
END if 
next 
end sub
данный скрипт режет и лутит последний труп
MadUser
Posts: 20
Joined: 2004-10-12 22:45:11
Contact:

Post by MadUser »

А данный скрипт будет работать на DRW ?
MitAl
Posts: 60
Joined: 2004-06-01 16:24:44
Location: DRW

Post by MitAl »

MadUser wrote:А данный скрипт будет работать на DRW ?
:-)
посмотри Location и тебе сразу станет все ясно
:-)
CANNABIS
Posts: 23
Joined: 2004-08-03 05:25:13
Contact:

Post by CANNABIS »

Народ а вот у меня вопрос по скрипту.Короче я переправил типы в этом скрипте и протестил,так у меня труп режится,а шмотки не лутятся(это я пробывал когда автооупен выклучен),когда автооупен врубаю все пашет.Так а можно сделать так что скрипт пахал при отключенном автооупене ? Подскажите плиз
Ekkie
Posts: 56
Joined: 2005-01-13 08:40:40
Contact:

Re: Дайте плз скрипту на loot из трупов

Post by Ekkie »

MitAl wrote:
Silf wrote:Дайте плз скрипту на loot из трупов
Неужели поиском не можешь воспользоваться ???

Code: Select all

sub Loot() 
var i,n 
Dim A[38] 
A[1] = 0x0f7b ;BloodMoss 
A[2] = 0x0f09 ;Invisibility 
A[3] = 0x0f09 ;ManaRefresh 
A[4] = 0x0f0b ;Refresh 
A[5] = 0x13B9 ;VikingSword 
A[6] = 0x0f0c ;Heal 
A[7] = 0x143E ;Halberd 
A[8] = 0x1ce1 ;haed 
A[9] = 0x1f14 ;Runa 
A[10] = 0x204e ;RobeOfDarkMage 
A[11] = 0x0f51 ;Dagger 
A[12] = 0x0f7a ;BlackPearl 
A[13] = 0x1404 ;WarFork 
A[14] = 0x0f84 ;Garlic 
A[15] = 0x0f85 ;Ginseng 
A[16] = 0x1B76 ;Heater 
A[17] = 0x1411 ;PlatemailLegs 
A[18] = 0x1415 ;Platemail 
A[19] = 0x1410 ;PlatemailArms 
A[20] = 0x1414 ;PlatemailGauntlets 
A[21] = 0x1412 ;PlatemailHelm 
A[22] = 0x1413 ;PlatemailHelm 
A[23] = 0x1F40 ;Poison 
A[24] = 0x1F4A ;Light 
A[25] = 0x0f86 ;MandrakeRoot 
A[26] = 0x0f88 ;Nightshade 
A[27] = 0x0E76 ;Bag 
A[28] = 0x09B0 ;BeltPouch 
A[29] = 0x0E75 ;Backpack 
A[30] = 0x0E21 ;bandage 
A[31] = 0x1F5F ;FS 
A[32] = 0x1F49 ;GH 
A[33] = 0x1F4C ;Recall 
A[34] = 0x0f8c ;SulphorousAsh 
A[35] = 0x0f8d ;SpidersSilk 
A[36] = 0x0EED ;Gold
A[37] = 0x1BD1; Feathers
A[38] = 0x09F1; myaso ptichek

UO.WaitTargetObject("lastcorpse") 
UO.useobject (0x4013EE14); ID того,чем будешь резать
wait(1000)

i = 1200 
FOR n=1 TO 38 
uo.findtype(A[n],"-1","lastcorpse") 
if uo.findcount() > 0 then 
UO.grab(1, "finditem") 
uo.print("Found "+str(uo.findcount())) 
Wait(i) 
END if 
next 
end sub
данный скрипт режет и лутит последний труп

Line 91 : Rune time Error
Это как понят и как исправаить...?
666Man666
Junior Expert
Posts: 474
Joined: 2004-11-13 00:43:55
Location: Киберзадроцк
Contact:

Post by 666Man666 »

CANNABIS wrote:Народ а вот у меня вопрос по скрипту.Короче я переправил типы в этом скрипте и протестил,так у меня труп режится,а шмотки не лутятся(это я пробывал когда автооупен выклучен),когда автооупен врубаю все пашет.Так а можно сделать так что скрипт пахал при отключенном автооупене ? Подскажите плиз
Нельзя, т.к Инжект не знает, что находится в нутри нового трупа...
Ekkie
Posts: 56
Joined: 2005-01-13 08:40:40
Contact:

Post by Ekkie »

Как добавить в скрипт чтоб брал бат винги?=)
BETEPAH
Expert!
Posts: 838
Joined: 2004-05-31 09:31:51
Contact:

Post by BETEPAH »

A[38] = 0x09F1; myaso ptichek

вставь тайп свой )))
Все просто.
BETEPAH ™
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

666Man666 wrote:
CANNABIS wrote:Народ а вот у меня вопрос по скрипту.Короче я переправил типы в этом скрипте и протестил,так у меня труп режится,а шмотки не лутятся(это я пробывал когда автооупен выклучен),когда автооупен врубаю все пашет.Так а можно сделать так что скрипт пахал при отключенном автооупене ? Подскажите плиз
Нельзя, т.к Инжект не знает, что находится в нутри нового трупа...
Можно, просто вставь в скрипт после его резанья команды:

Code: Select all

UO.UseObject( 'труп' )
wait(500)
Post Reply