Ultima BR | Ultima Online | MMORPG

Macro EasyUO Fishing

; ==--== INICIO ==--==
initevents
; =====================================================================
; Macro de Fishing
; Distribuição: Gratúita
; ========================CONFIGURAÇÕES INICIAIS - Variáveis=====================

Set %Pole XHF
Set %Tentativa 4
Set %Comando 1
Set %ComandoX 1
Set %msg Forward

Set %cnt 0

Set #ltargetid 0
Set #ltargetz 0
Set #ltargetkind 2

; ========================CONFIGURAÇÕES INICIAIS - Variáveis=====================

loop:
Set %cnt %cnt + 1
gosub %cnt

if %cnt > 7
{
Set %cnt 0
goto Move
}

Set %Chance 0
goto Fish

; ====================FISH====================
Fish:

Set %Chance %Chance + 1
if %Chance > %Tentativa
{
goto loop
}

gosub pole

Set #SCNT 0

jornal:
if #SCNT > 7
{
goto Fish
}

deletejournal
scanjournal

if you_can't in #journal
{
goto loop
}

if nao_pescou in #journal
{
goto Fish
}

if see in #journal
{
goto loop
}

if voce_retira_fish in #journal
{
goto loop
}

if nao_a_peixe in #journal
{
goto loop
}

if pull in #journal
{
goto Fish
}

if too in #journal
{
goto loop
}

goto jornal

; ====================MOVE====================
Move:

if %Comando = 1
{
msg Raise Anchor$
msg Forward$
}
if %Comando = 2
{
msg Raise Anchor$
msg Left$
}
if %Comando = 3
{
msg Raise Anchor$
msg Back$
}
if %Comando = 4
{
msg Raise Anchor$
msg Right$
}

Set %ComandoX %ComandoX + 1

IF %ComandoX > 6
{
Set %ComandoX 1
Set %Comando %Comando + 1

IF %Comando > 4
{
Set %Comando 1
}
}

wait 6s
msg Drop Anchor$
goto loop

sub 1
set #ltargetx #charposx
set #ltargety #charposy + 3
return

sub 2
set #ltargetx #charposx + 1
set #ltargety #charposy + 3
return

sub 3
set #ltargetx #charposx + 2
set #ltargety #charposy + 3
return

sub 4
set #ltargetx #charposx + 3
set #ltargety #charposy + 3
return

sub 5
set #ltargetx #charposx - 1
set #ltargety #charposy + 3
return

sub 6
set #ltargetx #charposx - 2
set #ltargety #charposy + 3
return

sub 7
set #ltargetx #charposx - 3
set #ltargety #charposy + 3
return

;----------

sub 8
set #ltargetx #charposx
set #ltargety #charposy - 3
return

sub 9
set #ltargetx #charposx + 1
set #ltargety #charposy - 3
return

sub 10
set #ltargetx #charposx + 2
set #ltargety #charposy - 3
return

sub 11
set #ltargetx #charposx + 3
set #ltargety #charposy - 3
return

sub 12
set #ltargetx #charposx - 1
set #ltargety #charposy - 3
return

sub 13
set #ltargetx #charposx - 2
set #ltargety #charposy - 3
return

sub 14
set #ltargetx #charposx - 3
set #ltargety #charposy - 3
return

;---------

sub 15
set #ltargetx #charposx
set #ltargety #charposy - 4
return

sub 16
set #ltargetx #charposx + 1
set #ltargety #charposy - 4
return

sub 17
set #ltargetx #charposx + 2
set #ltargety #charposy - 4
return

sub 18
set #ltargetx #charposx + 3
set #ltargety #charposy - 4
return

sub 19
set #ltargetx #charposx - 1
set #ltargety #charposy - 4
return

sub 20
set #ltargetx #charposx - 2
set #ltargety #charposy - 4
return

sub 21
set #ltargetx #charposx - 3
set #ltargety #charposy - 4
return

;---------

sub 22
set #ltargetx #charposx
set #ltargety #charposy + 4
return

sub 23
set #ltargetx #charposx + 1
set #ltargety #charposy + 4
return

sub 24
set #ltargetx #charposx + 2
set #ltargety #charposy + 4
return

sub 25
set #ltargetx #charposx + 3
set #ltargety #charposy + 4
return

sub 26
set #ltargetx #charposx - 1
set #ltargety #charposy + 4
return

sub 27
set #ltargetx #charposx - 2
set #ltargety #charposy + 4
return

sub 28
set #ltargetx #charposx - 3
set #ltargety #charposy + 4
return

sub pole
finditem %Pole
if #findkind = 0
{
set #LObjectID #FindID
event macro 17 0
target
event macro 25 0
event macro 22 0
return
}

if #findkind = 1
{
ignoreitem #FindID
gosub pole
return
}

if #findkind = -1
{
ignoreitem reset
event sysmessage Pole nao encontrado
wait 3s
return
}
return

; ==--== FIM ==--==

Lumberjack Yew

Marcadores: lumber-yew 0 comentários

initevents
Set %Target 0
Set %Comida RUD_FUD_HND_RGG
Set %Tentativa 6
Set %Machado ZRF_BPH_FSF_ASF_FFF_POH_BSF
Set %Tempo 10
set %logs ZLK

cordenadas:
if #weight >= 350
goto guardar

; Configure suas cordenadas

; Arvore 97
MOVE 689 956 0
GOSUB LUMBER 690 955 3280

; Arvore 98
MOVE 689 956 0
GOSUB LUMBER 688 957 3277

; Arvore 99
MOVE 691 962 0
GOSUB LUMBER 692 960 3296

; Arvore 100
MOVE 691 962 0
GOSUB LUMBER 692 963 3296

; Arvore 101
MOVE 695 968 0
GOSUB LUMBER 696 966 3302

; Arvore 102
MOVE 695 976 0
GOSUB LUMBER 696 975 3296

; Arvore 103
MOVE 695 982 0
GOSUB LUMBER 696 981 3302

; Arvore 104
MOVE 707 994 0
GOSUB LUMBER 708 993 3283

; Arvore 105
MOVE 711 994 0
GOSUB LUMBER 712 993 3293

; Arvore 106
MOVE 715 1004 0
GOSUB LUMBER 716 1005 3299

; Arvore 107
MOVE 714 1010 0
GOSUB LUMBER 712 1008 3299

; Arvore 108
MOVE 714 1010 0
GOSUB LUMBER 716 1011 3290

; Arvore 109
MOVE 707 1016 0
GOSUB LUMBER 708 1014 3286

; Arvore 112
MOVE 698 1018 0
MOVE 683 1018 0
MOVE 666 1019 0
MOVE 652 1022 0
GOSUB LUMBER 652 1020 3299

; Arvore 113
MOVE 652 1022 0
GOSUB LUMBER 652 1023 3302

; Arvore 114
MOVE 644 1022 0
GOSUB LUMBER 644 1023 3283

; Arvore 115
MOVE 642 1027 0
GOSUB LUMBER 640 1026 3283

; Arvore 116
MOVE 642 1027 0
GOSUB LUMBER 644 1029 3302

; Arvore 117
MOVE 642 1027 0
GOSUB LUMBER 644 1026 3277

; Arvore 117A
MOVE 638 1027 0
GOSUB LUMBER 636 1026 3277

; Arvore 118
MOVE 634 1027 0
MOVE 644 1017 0
MOVE 639 1016 0
GOSUB LUMBER 640 1017 3283

; Arvore 119
MOVE 639 1016 0
GOSUB LUMBER 640 1014 3280

; Arvore 120
MOVE 632 1016 0
GOSUB LUMBER 632 1014 3288

; Arvore 121
MOVE 629 1019 0
GOSUB LUMBER 628 1020 3280

; Arvore 122
MOVE 623 1025 0
GOSUB LUMBER 624 1026 3280

; Arvore 123
MOVE 617 1025 0
GOSUB LUMBER 616 1026 3290

; Arvore 124
MOVE 617 1019 0
GOSUB LUMBER 616 1020 3283

; Arvore 125
MOVE 609 1016 0
GOSUB LUMBER 608 1017 3280

; Arvore 126
MOVE 596 1019 0
GOSUB LUMBER 596 1020 3283

; Arvore 127
MOVE 596 1019 0
GOSUB LUMBER 596 1017 3296

; Arvore 128
MOVE 586 1026 0
GOSUB LUMBER 588 1026 3299

; Arvore 129
MOVE 586 1026 0
GOSUB LUMBER 584 1026 3290

; Arvore 130
MOVE 571 1024 0
GOSUB LUMBER 572 1023 3299

; Arvore 131
MOVE 569 1022 0
GOSUB LUMBER 568 1023 3280

; Arvore 132
MOVE 558 1019 0
GOSUB LUMBER 556 1020 3288

goto cordenadas

sub lumber
comida:
finditem %Comida
if #findkind = -1
{
ignoreitem reset
event sysmessage Comida nao encontrada!
}

if #findkind = 1
{
ignoreitem #findid
goto comida
}

set #lobjectid #findid
event macro 17 0

Set %Chance 0
inicio:

if %Chance >= %Tentativa
{
return
}

Set %Chance %Chance + 1

machado:
finditem %Machado C
if #findkind = -1
{
ignoreitem reset
event sysmessage Machado nao encontrado!
goto machado
}

if #findkind = 1
{
ignoreitem #findid
goto machado
}

set #lobjectid #findid
event macro 17 0

set #lTargetX %1
set #lTargetY %2
set #lTargetZ 0
set #lTargetKind 3
set #lTargetTile %3

target
event macro 25 0
event macro 22 0

Set #SCNT 0

; ============================================================
jornal:
if #SCNT > %Tempo
{
goto inicio
}

delete journal
scanjournal

if #hits < #maxhits
{
msg Guards ! $
}
if ATTEMPTING_TO_PEEK_INTO_YOUR in #journal
{
msg Guards ! $
}
if ATTEMPTING_TO_STEAL in #journal
{
msg Guards ! $
}
if TRYING_TO_STEAL in #journal
{
msg Guards ! $
}
if ATTACKING_YOU in #journal
{
msg Guards ! $
}
if HITS_YOU in #journal
{
msg Guards ! $
}

if catou_gravetos_podres in #journal
{
goto inicio
}

if chop in #journal
{
return
}

if ai in #journal
{
return
}

if put in #journal
{
goto inicio
}
if lumberjacking in #journal
{
goto inicio
}
if no_logs in #journal
{
return
}
if Nao_a_madeiras in #journal
{
return
}
if You_can't in #journal
{
return
}
if immune in #journal
{
return
}
if foliage in #journal
{
return
}
if too_far in #journal
{
return
}
if fail in #journal
{
goto inicio
}
if errado in #journal
{
goto inicio
}
goto jornal

;============guardar===============
guardar:

move 533 991 0 20s
;=========COORDENADAS ACIMA====
msg bank$
wait 60
set #contposx 50
set #contposy 50

pegar:
finditem %logs C_
if #findkind = -1
{
goto sair
}
If #FindKind = 0
{
event drag #findID
wait 10
msg $
wait 10
click 93 166 p
}
If #FindKind = 1
{
IgnoreItem #FindID
goto pegar
}
goto pegar
return
sair:
click 156 180 r
wait 20
goto coordenadas
return

; =-=-=- FIM -=-=-=

Lumberjack Minoc

Marcadores: lumber-minoc 0 comentários

;/////////////////////////////////////////////////////////////////
; Macro básica feita por Away
; Por favor não tire os créditos
;/////////////////////////////////////////////////////////////////

Set %Target 0
Set %Comida RUD_FUD_HND_YSD_FWI_JQE
Set %Tentativa 6
Set %Machado ZRF_BPH_FSF_ASF_FFF_POH_MPH_BSF_NSF
set %Log ZLK
Set %Tempo 8

event sysmessage Macro feita por Away, Iniciando ...

cordenadas:
Arvore 01
MOVE 2489 559 0
{

}
GOSUB LUMBER 2488 558 3302
Arvore 2
{

}
wait 10s
MOVE 2488 550 0
GOSUB LUMBER 2488 549 3299
Arvore 3
{

}
wait 10s
MOVE 2485 552 0
GOSUB LUMBER 2484 552 3280
Arvore 4
{

}
wait 10s
MOVE 2480 551 0
GOSUB LUMBER 2480 550 3299
Arvore 5
{

}
wait 10s
MOVE 2477 558 0
GOSUB LUMBER 2476 558 3291
Arvore 6
{

}
wait 10s
MOVE 2477 552 0
GOSUB LUMBER 2476 552 3290
Arvore 7
{

}
wait 10s
MOVE 2477 548 0
GOSUB LUMBER 2476 549 3289
Arvore 8
{

}
wait 10s
MOVE 2480 548 0
GOSUB LUMBER 2480 549 3290
Arvore 9
{

}
wait 10s
MOVE 2495 541 0
GOSUB LUMBER 2496 540 3296
Arvore 10
{

}
wait 10s
MOVE 2495 538 0
GOSUB LUMBER 2496 537 3280
Arvore 11
{

}
wait 10s
MOVE 2497 532 0
GOSUB LUMBER 2496 531 3283
Arvore 12
{

}
wait 10s
MOVE 2499 532 0
GOSUB LUMBER 2500 531 3302
Arvore 13
{

}
wait 10s
MOVE 2497 528 0
GOSUB LUMBER 2496 528 3288
Arvore 14
{

}
wait 10s
MOVE 2497 526 0
GOSUB LUMBER 2496 525 3280
Arvore 15
{

}
wait 10s
MOVE 2503 530 0
GOSUB LUMBER 2504 531 3293
Arvore 16
{

}
wait 10s
MOVE 2503 529 0
GOSUB LUMBER 2504 528 3283
Arvore 17
{

}
wait 10s
MOVE 2503 526 0
GOSUB LUMBER 2504 525 3299
Arvore 18
{

}
wait 10s
MOVE 2503 526 0
GOSUB LUMBER 2504 525 3299
Arvore 19
{

}
wait 10s
MOVE 2503 526 0
GOSUB LUMBER 2504 525 3299
Arvore 20
{

}
wait 10s
MOVE 2502 526 0
GOSUB LUMBER 2480 550 3299
Arvore 21
{

}
wait 10s
MOVE 2497 513 0
GOSUB LUMBER 2496 513 3296
Arvore 22
{

}
wait 10s
MOVE 2497 507 0
GOSUB LUMBER 2496 507 3293
Arvore 23
{

}
wait 10s
MOVE 2499 507 0
GOSUB LUMBER 2500 507 3286
Arvore 24
{

}
wait 10s
MOVE 2497 503 0
GOSUB LUMBER 2496 504 3299
Arvore 25
{

}
wait 10s
MOVE 2498 501 0
GOSUB LUMBER 2496 501 3302
Arvore 26
{

}
wait 10s
MOVE 2502 497 0
GOSUB LUMBER 2504 498 3286
Arvore 27
{

}
wait 10s
MOVE 2501 494 0
GOSUB LUMBER 2500 495 3302
Arvore 28
{

}
wait 10s
MOVE 2501 491 0
GOSUB LUMBER 2500 492 3280
Arvore 29
{

}
wait 10s
MOVE 2501 491 0
GOSUB LUMBER 2500 489 3288
Arvore 30
{

}
wait 10s
MOVE 2508 491 0
GOSUB LUMBER 2508 492 3296
Arvore 31
{

}
wait 10s
MOVE 2509 495 0
GOSUB LUMBER 2508 495 3286
Arvore 32
{

}
wait 10s
MOVE 2509 497 0
GOSUB LUMBER 2508 498 3290
Arvore 33
{

}
wait 10s
MOVE 2509 500 0
GOSUB LUMBER 2508 501 3286
Arvore 34
{

}
wait 10s
MOVE 2509 506 0
GOSUB LUMBER 2508 507 3283
Arvore 35
{

}
wait 10s
MOVE 2511 505 0
GOSUB LUMBER 2512 504 3296
Arvore 36
{

}
wait 10s
MOVE 2511 502 0
GOSUB LUMBER 2512 501 3277
Arvore 37
{

}
wait 10s
MOVE 2511 499 0
GOSUB LUMBER 2512 498 3290
Arvore 38
{

}
wait 10s
MOVE 2511 496 0
GOSUB LUMBER 2512 495 3277
Arvore 39
{

}
wait 10s
MOVE 2517 491 0
GOSUB LUMBER 2516 492 3286
Arvore 40
{

}
wait 10s
MOVE 2517 497 0
GOSUB LUMBER 2516 498 3290
Arvore 41
{

}
wait 10s
MOVE 2522 493 0
GOSUB LUMBER 2520 492 3288
Arvore 42
{

}
wait 10s
MOVE 2522 495 0
GOSUB LUMBER 2520 495 3280
Arvore 43
{

}
wait 10s
MOVE 2523 495 0
GOSUB LUMBER 2524 495 3290
Arvore 44
{

}
wait 10s
MOVE 2521 497 0
GOSUB LUMBER 2520 498 3283
Arvore 45
{

}
wait 10s
MOVE 2521 500 0
GOSUB LUMBER 2520 501 3294
Arvore 46
{

}
wait 10s
MOVE 2521 503 0
GOSUB LUMBER 2520 504 3293
Arvore 47
{

}
wait 10s
MOVE 2521 509 0
GOSUB LUMBER 2520 510 3296
Arvore 48
{

}
wait 10s
MOVE 2517 509 0
GOSUB LUMBER 2516 507 3280

goto cordenadas

sub lumber
comida:
finditem %Comida
if #findkind = -1
{
ignoreitem reset
event sysmessage Comida nao encontrada!
}

{

}

if #findkind = 1
{
ignoreitem #findid
goto comida
}

set #lobjectid #findid
event macro 17 0

Set %Chance 0
inicio:

if #weight >= 430
goto guardar

if %Chance >= %Tentativa
{
return
}
{

}

Set %Chance %Chance + 1

machado:
finditem %Machado ZRF_BPH_FSF_ASF_FFF_POH_BSF
if #findkind = -1
{
ignoreitem reset
event sysmessage Machado nao encontrado!
goto machado
}

if #findkind = 1
{
ignoreitem #findid
goto machado
}

set #lobjectid #findid
event macro 17 0

set #lTargetX %1
set #lTargetY %2
set #lTargetZ 0
set #lTargetKind 3
set #lTargetTile %3

target
event macro 25 0
event macro 22 0

Set #SCNT 0

if #hits < #maxhits
{

}

; ============================================================
jornal:
if #SCNT > %Tempo
{
goto inicio
}

delete journal
scanjournal

if put in #journal
{
goto inicio
}
if lumberjacking in #journal
{
goto inicio
}
if nothing in #journal
{
return
}
if immune in #journal
{
return
}

if foliage in #journal
{
return
}
if too_far in #journal
{
return
}
if you_have_no_line_of_sight in #journal
{
return
}

if fail in #journal
{
goto inicio
}
if you_can't_reach_this in #journal
{
return
}
if nao_ha_madeiras_aqui in #journal
{
return
}
goto jornal

;============guardar===============
guardar:
;configurar onde ira guardar (chama por bank)
;no easy uo ltargetx ltargety 0 50s
move 2508 561 0 90s
;=========COORDENADAS ACIMA====
msg bank$
wait 60
set #contposx 50
set #contposy 50

pegar:
finditem %Log C_
if #findkind = -1
{
goto sair
}
If #FindKind = 0
{
event drag #findID
wait 10
msg $
wait 10
click 93 166 p
}
If #FindKind = 1
{
IgnoreItem #FindID
goto pegar
}
goto pegar
return
sair:
click 156 180 r
wait 20
return

; =-=-=- FIM -=-=-=

Emuladores :

Jogo Completo :

Ultilitários :

Macro EasyUO Fishing

Lumberjack Yew

Lumberjack Minoc

Visitas Totais :

Macros :

Outos Downloads :

.:: Sua Segurança ::.