Page 1 of 1
Iron droping
Posted: 2007-11-13 21:45:17
by Mazer
Hi, i wanted a script i will try to discribe you
1. For ores droping and smelting
2. it should pickup one ore from backpack and drop it under me
3. then i think i can use UO.usefromground
4. so thats all only one requipment that a script should be with a VAR (for easier configuration)
very thanks
Posted: 2007-11-13 22:04:20
by Mazer
maybe something like this ?? maybe anyone can make it beter ?
sub drop()
pradz:
wait(30)
uo.findtype('0x19B9','-1','backpack')
if uo.findcount() then
uo.moveitem('finditem','1','ground')
wait(400)
uo.usefromground('0x19B7')
wait(200)
goto pradz
endsub
Posted: 2007-11-15 21:07:29
by -=JoKeR=-
Code: Select all
sub drop()
var type = '19b9'
var type2 = '19b7'
while not Uo.Dead()
uo.findtype(type)
if Uo.Findcount() > 0 then
Uo.Drophere('finditem')
wait(400)
Uo.Usefromground(type2)
wait(200)
wend
endsub
something like this ? =)
Posted: 2007-11-17 08:36:19
by Mazer
yes aboslutly this
thanks
Posted: 2007-11-17 09:31:54
by Scripts Writer
-=JoKeR=- wrote:Code: Select all
sub drop()
var type = '19b9'
var type2 = '19b7'
while not Uo.Dead()
uo.findtype(type)
if Uo.Findcount() > 0 then
Uo.Drophere('finditem')
wait(400)
Uo.Usefromground(type2)
wait(200)
wend
endsub
something like this ? =)
You have a mistake. COrrect this
You have to close if operator
Posted: 2007-11-17 09:58:19
by Mazer
there is a lot of mistakes
it drops 25 iron
not 1 ;D
Posted: 2007-11-17 10:16:52
by Scripts Writer
Change
to
Code: Select all
uo.moveitem('finditem','1','ground')
Posted: 2007-11-17 10:25:54
by Mazer
Code: Select all
sub metymas()
Dim Ruda[3]
Ruda[0] = '0x19B9' # then > 3
Ruda[1] = '0x19B8' # then = 3
Ruda[2] = '0x19BA' # then = 2
Ruda[3] = '0x19B7' # then = 1
Var i
for i = 0 to 3
UO.FindType(Ruda[i],'-1','backpack')
if uo.findcount() > 0 then
uo.moveitem('finditem','1','ground')
wait(400)
UO.usefromground('0x19B7')
wait(200)
wend
endsub
whats wrong here ?
i writed it by my self
) i want something like this:)
Posted: 2007-11-17 10:53:41
by Scripts Writer
Mazer wrote:Code: Select all
sub metymas()
Dim Ruda[3]
Ruda[0] = '0x19B9' # then > 3
Ruda[1] = '0x19B8' # then = 3
Ruda[2] = '0x19BA' # then = 2
Ruda[3] = '0x19B7' # then = 1
Var i
for i = 0 to 3
UO.FindType(Ruda[i],'-1','backpack')
if uo.findcount() > 0 then
uo.moveitem('finditem','1','ground')
wait(400)
UO.usefromground('0x19B7')
wait(200)
wend
endsub
whats wrong here ?
i writed it by my self
) i want something like this:)
1.U have 4 elements in array, but definition only for 3.
2.Close if operator
Posted: 2007-11-17 10:58:06
by Mazer
how to close if operation ? :/
Posted: 2007-11-17 11:02:08
by Scripts Writer
Not operation,- operator. Look for it in other scripts.