• Loginserver: illusions.com.br,2593
  • Ultima Online Custom
Hello There, Guest! Login Register


Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Macro] UOSteam
#1
Boa tarde!

Amigos,

Vejo que não possuímos no fórum muitos macros postados para pessoas que são novas e até mesmo as antigas (afinal ninguém sabe tudo), com esse intuito eu gostaria de gerar esse tópico aonde podemos compartilhar nossas macros de UOS para todos!


Eu particularmente conforme for utilizando as macros para gmzar as skill vou postando aqui!



UOs - Macro de Mining


Quote:// Você deve deixar as picaretas na bag e não equipadas.
// O mining é feito no spot 0 0 0 e aos seus arredores
if not @findalias 'Beetle'

promptalias 'Beetle'
endif
if counttype 0x19b9 'any' 'backpack' < 188
movetype 0x19b9 'backpack' 'Beetle'
endif
if not listexists 'miningerrormessages'
createlist 'miningerrormessages'
pushlist 'miningerrormessages' 'no metal here'
pushlist 'miningerrormessages' "You can't mine there"
pushlist 'miningerrormessages' "Target cannot be seen"
pushlist 'miningerrormessages' "You can't mine that"
endif
if @findtype 0xe86 'any' 'backpack' or @findtype 0xf39 'any' 'backpack'
useobject 'found'
else
sysmsg "You do not have any digging tools!"
stop
endif
waitfortarget 500
if direction == 0
targettileoffset 0 -1 0
elseif direction == 1
targettileoffset 1 -1 0
elseif direction == 2
targettileoffset 1 0 0
elseif direction == 3
targettileoffset 1 1 0
elseif direction == 4
targettileoffset 0 1 0
elseif direction == 5
targettileoffset -1 1 0
elseif direction == 6
targettileoffset -1 0 0
elseif direction == 7
targettileoffset -1 -1 0
endif
pause 200
if @findtype 0xe86 'any' 'backpack' or @findtype 0xf39 'any' 'backpack'
useobject 'found'
else
sysmsg "You do not have any digging tools!"
stop
endif
waitfortarget 500
if direction == 1
targettileoffset 0 -1 0
elseif direction == 2
targettileoffset 1 -1 0
elseif direction == 3
targettileoffset 1 0 0
elseif direction == 4
targettileoffset 1 1 0
elseif direction == 5
targettileoffset 0 1 0
elseif direction == 6
targettileoffset -1 1 0
elseif direction == 7
targettileoffset -1 0 0
elseif direction == 0
targettileoffset -1 -1 0
endif
pause 200
if @findtype 0xe86 'any' 'backpack' or @findtype 0xf39 'any' 'backpack'
useobject 'found'
else
sysmsg "You do not have any digging tools!"
stop
endif
waitfortarget 500
if direction == 7
targettileoffset 0 -1 0
elseif direction == 0
targettileoffset 1 -1 0
elseif direction == 1
targettileoffset 1 0 0
elseif direction == 2
targettileoffset 1 1 0
elseif direction == 3
targettileoffset 0 1 0
elseif direction == 4
targettileoffset -1 1 0
elseif direction == 5
targettileoffset -1 0 0
elseif direction == 6
targettileoffset -1 -1 0
endif
pause 10
 
Reply
#2
(28-02-2017, 03:00 PM)Kenom Wrote: Boa tarde!

Amigos,

Vejo que não possuímos no fórum muitos macros postados para pessoas que são novas e até mesmo as antigas (afinal ninguém sabe tudo), com esse intuito eu gostaria de gerar esse tópico aonde podemos compartilhar nossas macros de UOS para todos!


Eu particularmente conforme for utilizando as macros para gmzar as skill vou postando aqui!



UOs - Macro de Mining


Quote:// Você deve deixar as picaretas na bag e não equipadas.
// O mining é feito no spot 0 0 0 e aos seus arredores
if not @findalias 'Beetle'

promptalias 'Beetle'
endif
if counttype 0x19b9 'any' 'backpack' < 188
movetype 0x19b9 'backpack' 'Beetle'
endif
if not listexists 'miningerrormessages'
createlist 'miningerrormessages'
pushlist 'miningerrormessages' 'no metal here'
pushlist 'miningerrormessages' "You can't mine there"
pushlist 'miningerrormessages' "Target cannot be seen"
pushlist 'miningerrormessages' "You can't mine that"
endif
if @findtype 0xe86 'any' 'backpack' or @findtype 0xf39 'any' 'backpack'
useobject 'found'
else
sysmsg "You do not have any digging tools!"
stop
endif
waitfortarget 500
if direction == 0
targettileoffset 0 -1 0
elseif direction == 1
targettileoffset 1 -1 0
elseif direction == 2
targettileoffset 1 0 0
elseif direction == 3
targettileoffset 1 1 0
elseif direction == 4
targettileoffset 0 1 0
elseif direction == 5
targettileoffset -1 1 0
elseif direction == 6
targettileoffset -1 0 0
elseif direction == 7
targettileoffset -1 -1 0
endif
pause 200
if @findtype 0xe86 'any' 'backpack' or @findtype 0xf39 'any' 'backpack'
useobject 'found'
else
sysmsg "You do not have any digging tools!"
stop
endif
waitfortarget 500
if direction == 1
targettileoffset 0 -1 0
elseif direction == 2
targettileoffset 1 -1 0
elseif direction == 3
targettileoffset 1 0 0
elseif direction == 4
targettileoffset 1 1 0
elseif direction == 5
targettileoffset 0 1 0
elseif direction == 6
targettileoffset -1 1 0
elseif direction == 7
targettileoffset -1 0 0
elseif direction == 0
targettileoffset -1 -1 0
endif
pause 200
if @findtype 0xe86 'any' 'backpack' or @findtype 0xf39 'any' 'backpack'
useobject 'found'
else
sysmsg "You do not have any digging tools!"
stop
endif
waitfortarget 500
if direction == 7
targettileoffset 0 -1 0
elseif direction == 0
targettileoffset 1 -1 0
elseif direction == 1
targettileoffset 1 0 0
elseif direction == 2
targettileoffset 1 1 0
elseif direction == 3
targettileoffset 0 1 0
elseif direction == 4
targettileoffset -1 1 0
elseif direction == 5
targettileoffset -1 0 0
elseif direction == 6
targettileoffset -1 -1 0
endif
pause 10

show, como é esse macro? ele recala? guarda no banco? vlww
 
Reply
#3
Ele pelo oq entendi ele nao recalla, ele minera ao redor e smelta no beetle. É interessante pra macro assistido ou apenas pra upar mining, com um pouco de boa vontade a pessoa consegue fazer ele recalar pro banco e pra outros spots!
 
Reply
#4
Ola! Desculpa a demora!

Então sim é m macro assistido! assim que conseguir o Macro automining eu post!
 
Reply
#5
terça tinha 1 cara com esse macro de mining recalando.

Naty alguma coisa, nao me recordo.

Esquema parecido: besouro de fogo, minerava, smeltava e recalava p outro local.

eu ja testei alguns, até de easyuo, mas tenho dificuldades de configurar eu acho, nunca dao certo
 
Reply
#6
(02-03-2017, 04:34 PM)diego wakoff Wrote: terça tinha 1 cara com esse macro de mining recalando.

Naty alguma coisa, nao me recordo.

Esquema parecido: besouro de fogo, minerava, smeltava e recalava p outro local.

eu ja testei alguns, até de easyuo, mas tenho dificuldades de configurar eu acho, nunca dao certo

Mano eu também, da até desanimo tenso eu to testando VARIOS e nenhum funfa...ja ta começando a repensar AUHEUHAEHUAEHuae
 
Reply
#7
(02-03-2017, 04:34 PM)diego wakoff Wrote: terça tinha 1 cara com esse macro de mining recalando.

Naty alguma coisa, nao me recordo.

Esquema parecido: besouro de fogo, minerava, smeltava e recalava p outro local.

eu ja testei alguns, até de easyuo, mas tenho dificuldades de configurar eu acho, nunca dao certo

Consegui, estou usando o Razor para fazer a Macro de Mining + Recall + Smelt + Bank!
Logo menos vou postar aqui no fórum como rodar o Razor e fazer a macro!
 
Reply
#8
(03-03-2017, 03:53 PM)Kenom Wrote:
(02-03-2017, 04:34 PM)diego wakoff Wrote: terça tinha 1 cara com esse macro de mining recalando.

Naty alguma coisa, nao me recordo.

Esquema parecido: besouro de fogo, minerava, smeltava e recalava p outro local.

eu ja testei alguns, até de easyuo, mas tenho dificuldades de configurar eu acho, nunca dao certo

Consegui, estou usando o Razor para fazer a Macro de Mining + Recall + Smelt + Bank!
Logo menos vou postar aqui no fórum como rodar o Razor e fazer a macro!

Muito bacana, obrigado!! eu tenho visto teu char no macro la e aparentemente funciona bem!!
 
Reply
#9
(03-03-2017, 03:53 PM)Kenom Wrote:
(02-03-2017, 04:34 PM)diego wakoff Wrote: terça tinha 1 cara com esse macro de mining recalando.

Naty alguma coisa, nao me recordo.

Esquema parecido: besouro de fogo, minerava, smeltava e recalava p outro local.

eu ja testei alguns, até de easyuo, mas tenho dificuldades de configurar eu acho, nunca dao certo

Consegui, estou usando o Razor para fazer a Macro de Mining + Recall + Smelt + Bank!
Logo menos vou postar aqui no fórum como rodar o Razor e fazer a macro!
Ae galera sou novo aqui no server e vendo o movimento venho ajudar o pessoal. Estou terminando de organizar meu macro e dar umas polidas, mais à noite eu posto ele aqui pra vcs. (SteamUO) para variar a plataforma tb kkkkk vlw.
 
Reply
#10
Como prometido segue anexo uma versão "mining/smelting" com recall no runebook, e guardando os metais no banco.

Quote:removelist 'Runes'
removelist 'OreBook'
@clearjournal
if not listexists 'Runes'
createlist 'Runes'
endif
if not listexists 'OreBook'
createlist 'OreBook'
endif
if not @findobject 'Runas'
promptalias 'Runas'
endif
if list 'OreBook' == 0
pushlist 'OreBook' 'Runas'
endif
if list 'Runes' == 0
pushlist 'Runes' 5
pushlist 'Runes' 11
pushlist 'Runes' 17
pushlist 'Runes' 23
pushlist 'Runes' 29
pushlist 'Runes' 35
pushlist 'Runes' 41
pushlist 'Runes' 47
pushlist 'Runes' 53
pushlist 'Runes' 59
pushlist 'Runes' 65
pushlist 'Runes' 71
pushlist 'Runes' 77
pushlist 'Runes' 83
pushlist 'Runes' 89
pushlist 'Runes' 95
endif
for 0 to 'OreBook'
for 0 to 'Runes'
pause 500
while mana < 40
endwhile
if not findtype '0xe86' 'backpack'
useobject 0x400d30b3
headmsg 'Out of picks'
waitforgump 0x554b87f3 15000
replygump 0x554b87f3 95
pause 3000
msg 'bank'
organizer "pickaxe"
pause 6000
endif
@clearjournal
pause 500
useobject OreBook[]
waitforgump 0x554b87f3 5000
replygump 0x554b87f3 Runes[]
pause 4000
if injournal 'blocked' 'system'
@clearjournal
replay
endif
if weight < 350
for 5
while not @injournal 'There is no metal here to mine' 'system'
if weight > 350
break
endif
if not findtype '0xe86' 'backpack'
useobject 0x400d30b3
headmsg 'Out of picks'
waitforgump 0x554b87f3 15000
replygump 0x554b87f3 95
pause 3000
msg 'bank'
organizer "pickaxe"
pause 6000
endif
if @findtype 0xe86 'any' 'backpack' or @findtype 0xf39 'any' 'backpack'
useobject 'found'
endif
waitfortarget 500
if direction == 0
targettileoffset 0 -1 0
elseif direction == 1
targettileoffset 1 -1 0
elseif direction == 2
targettileoffset 1 0 0
elseif direction == 3
targettileoffset 1 1 0
elseif direction == 4
targettileoffset 0 1 0
elseif direction == 5
targettileoffset -1 1 0
elseif direction == 6
targettileoffset -1 0 0
elseif direction == 7
targettileoffset -1 -1 0
endif
pause 200
if @findtype 0xe86 'any' 'backpack' or @findtype 0xf39 'any' 'backpack'
useobject 'found'
endif
waitfortarget 500
if direction == 1
targettileoffset 0 -1 0
elseif direction == 2
targettileoffset 1 -1 0
elseif direction == 3
targettileoffset 1 0 0
elseif direction == 4
targettileoffset 1 1 0
elseif direction == 5
targettileoffset 0 1 0
elseif direction == 6
targettileoffset -1 1 0
elseif direction == 7
targettileoffset -1 0 0
elseif direction == 0
targettileoffset -1 -1 0
endif
pause 200
if @findtype 0xe86 'any' 'backpack' or @findtype 0xf39 'any' 'backpack'
useobject 'found'
endif
waitfortarget 500
if direction == 7
targettileoffset 0 -1 0
elseif direction == 0
targettileoffset 1 -1 0
elseif direction == 1
targettileoffset 1 0 0
elseif direction == 2
targettileoffset 1 1 0
elseif direction == 3
targettileoffset 0 1 0
elseif direction == 4
targettileoffset -1 1 0
elseif direction == 5
targettileoffset -1 0 0
elseif direction == 6
targettileoffset -1 -1 0
endif
pause 100
endwhile
endfor
endif
if weight > 350
useobject 0x400d30b3
waitforgump 0x554b87f3 15000
replygump 0x554b87f3 95
pause 3000
if inregion 'town' 'self'
while findtype 0x19ba "any" "backpack"
usetype! 0x19ba
waitfortarget 15000
pause 1000
target! 0x4009a7d7
pause 3000
endwhile
while findtype 0x19b7 "any" "backpack"
usetype! 0x19b7
waitfortarget 15000
pause 1000
target! 0x4009a7d7
pause 3000
endwhile
while findtype 0x19b9 "any" "backpack"
usetype! 0x19b9
waitfortarget 15000
pause 1000
target! 0x4009a7d7
pause 3000
endwhile
while findtype 0x19b8 "any" "backpack"
usetype! 0x19b8
waitfortarget 15000
pause 1000
target! 0x4009a7d7
pause 3000
endwhile
endif
while @findtype '0x1bf2' 'any' 'backpack' 'any' '2'
msg 'bank'
pause 2000
moveitem 'found' 'bank'
pause 800
endwhile
if not findtype '0xe86' 'backpack'
useobject 0x400d30b3
headmsg 'Out of picks'
waitforgump 0x554b87f3 15000
replygump 0x554b87f3 95
pause 3000
organizer "pickaxe"
pause 6000
replay
endif
endif
endfor
poplist 'Runes' 'front'
endfor
//recall home so Ore container is found
pause 1000
poplist 'Runas' 'front'

Eu particularmente uso a ultima runa do runebook para o recall para o banco, caso queira acrescentar mais spots, mais runebooks, deixar os minerios em casa ou qualquer coisa a mais, só manda um pm que vamos resolvendo. kkkk se alguem quiser acrescentar algo, fique a vontade também.
Para funcionar precisa de deixar um agente "organizer" com o nome "pickaxe" no uosteam. Já selecionado algum lugar para pegar as pickaxes.


Bom macro a todos!
 
Reply
  


Forum Jump:


Browsing: 1 Guest(s)