помогите мне пожалуста ((((

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
warden@inbox.ru
Posts: 1
Joined: 2007-12-20 04:03:20
Contact:

помогите мне пожалуста ((((

Post by warden@inbox.ru »

нем очень хотелосьбы в этот скрипт добавить чтобы чар брал арморы из мешков которые лежат в сундуке (((
ПОМОГИТЕ
ЗАРАНЕЕ БЛОГАДАРЕН!!!!!!!!

sub SmelthingForIron()
uo.Set('findistance','5')
var i
var Forge='0x400D7F9C' #ID of your forge near house
var Sunduk='0x401E340D' #ID of a container near house
var ingot='0x1BEF' #Type of iron ingot

DIM chain[10]

chain[0]='0x13EC' #0-9 .Types of ringmail and chainmail items
chain[1]='0x13F0'
chain[2]='0x13BF'
chain[3]='0x13BB'
chain[4]='0x13EE'
chain[5]='0x13EB'
chain[6]='0x13BE'
chain[7]='0x1B76'
chain[8]='0x1411'
chain[9]='0x1413'

go(4320,3780,0) # X,Y near forge
while not uo.Hidden()
uo.UseSkill('Hiding')
wait(5000)
wend
for i = 0 to 9
uo.FindType(chain[i],'-1','backpack')
if uo.FindCount() then
while uo.FindCOunt()
uo.FindType(chain[i],'-1','backpack')
uo.WaitTargetObject('finditem')
uo.UseObject(Forge)
wait(1000)
wend
else
uo.Print('There are no chainmail armor')
end if
next
uo.FindType('0x1BEF','-1','backpack')
if uo.FindCOunt() then
uo.moveitem('finditem','all',Sunduk)
wait(1000)
end if
uo.FindType('0x1BEF','-1','ground')
if uo.FindCOunt() then
uo.moveitem('finditem','all',Sunduk)
wait(1000)
end if
end sub
Post Reply