Показать сообщение отдельно
Re: Anyone here can help me with a mining macro?!
Старый 26.11.2009, 21:29   #7
Red Wind
Newbie
 
Аватар для Red Wind
 
Регистрация: 26.11.2009
Сообщений: 9
Репутация: 1 [+/-]
имеет нулевую репутацию
Red Wind имеет нулевую репутацию
Чар: Cheese Stone
По умолчанию Re: Anyone here can help me with a mining macro?!

here is one for UOpilot, wich u can dl from game web site.



set lasttargetkind 2
set $a1 You loosen some rocks
set $a2 You put
set $a3 That is too far away
set $a4 There is no ore here to mine
set $a5 Your // SKILL OR STRENGTH or others
set $a6 Try mining in rock
set $a7 You have no line of sight

for #j -2 2
set lasttargety charposy + #j
for #i -2 2
set lasttargetx charposx + #i
send F12
waitfortarget 2000
set #time timer + 6000
while_not (timer > #time) or (lastmsg $a1) or (lastmsg $a2) or (lastmsg $a3) or (lastmsg $a4) or (lastmsg $a5) or (lastmsg $a6) or (lastmsg $a7)
wait
end_while
if (lastmsg $a1) or (lastmsg $a2) or (lastmsg $a5)
while_not (lastmsg $a3) or (lastmsg $a4) or (lastmsg $a6) or (lastmsg $a7)
if wght > 610
stop_script
end_if
send F12
waitfortarget 2000
set #time timer + 6000
while_not timer > #time or (lastmsg $a1) or (lastmsg $a2) or (lastmsg $a3) or (lastmsg $a4) or (lastmsg $a5) or (lastmsg $a6) or (lastmsg $a7)
wait
end_while
wait 200
end_while
end_if
wait 200
end_for
end_for
msg !
stop_script

F12=lastobject, waitfortarget, lasttarget.


u must to set F12 for last object in game client ( u dont need assist ) where is macros. Then befor to use it just do 1 dig manualy, then UOpilot will do for u all what u need, sry for my english )
Red Wind вне форума   Ответить с цитированием