Stealth Client Forum

initevents
setuotitle Mining | #charname
wait 3s
event macro 8 2
wait 3s
contpos 742 330
wai 3s
event macro 8 7
wait 3s
contpos 765 480
set %UBYVJMD #CONTID
set %Comida RUD
set %bandbag ZLF
set %Pickaxe NPF_QPF
set %Tentativa 3
set %TempoEspera 10
set %TempoPickaxe 2
set %Minerios DWJ_EWJ_GWJ_TVJ_UVF_EVF_FVF_VUF_HVF_BVF_GVF_OVF_CPF
set %cnt 0
set %funcao 0
set #ltargetid 0
set #ltargetz 0
set #ltargetkind 3
Inicio:
if #weight >= 250
{
goto guardar
}
gosub %cnt 1
set %cnt %cnt + 1
if #hits < #maxhits
{
findItem %bandbag C_
if #findKind = 0
{
set #LOBJECTID #FindID
event Macro 17 0
Wait 1s
event Macro 23 0
msg Guards$
msg .gc Estou sendo atacado!$
}
}
if %cnt > 7
{
Set %cnt 0
goto caminha
}
set %Chance 0
goto mine
mine:
hiding:
if #hits < #maxhits
{
findItem %bandbag C_
if #findKind = 0
{
set #LOBJECTID #FindID
event Macro 17 0
Wait 1s
event Macro 23 0
msg Guards$
msg .gc Estou sendo atacado!$
}
}
scanjournal 1
if Voce_esta_preocupado_com in #journal
{
event macro 6 0
wait 2s
goto hiding
}
if #charstatus <> H
{
event macro 13 21
wait 3s
goto hiding
}
set %Chance %Chance + 1
if %Chance > %Tentativa
{
goto inicio
}
delete journal
gosub pickaxe
set #SCNT 0
goto jornal
jornal:
if #SCNT >= %TempoEspera
{
goto mine
}
scanjournal 1
if You_notice 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 play in #journal
{
goto espera
}
if nao_ha_nada in #journal
{
Set %Chance 0
goto espera
}
if voce_nao_tem in #journal
{
Set %Chance 0
goto espera
}
if tente_minerar in #journal
{
Set %Chance 0
goto espera
}
if fail in #journal
{
goto espera
}
if falhou in #journal
{
goto espera
}
if Voce_nao_encontrou_nenhum in #journal
{
goto espera
}
if tente_minerar in #journal
{
goto espera
}
if nao_pode in #journal
{
goto guardar
}
if aqui_nao in #journal
{
goto espera
}
if em_sua_mochila in #journal
{
goto mine
}
goto jornal
espera:
set #SCNT 0
espe:
if #SCNT >= %TempoPickaxe
{
if %Chance = 0
{
goto inicio
}
goto mine
}
goto espe
caminha:
gosub %funcao 2
move #ltargetx #ltargety 0 2s
set %funcao %funcao + 1
if %funcao > 7
{
set %funcao 0
}
goto inicio
sub 0
set #ltargetx #charposx
set #ltargety #charposy - %1
return
sub 1
set #ltargetx #charposx + %1
set #ltargety #charposy - %1
return
sub 2
set #ltargetx #charposx + %1
set #ltargety #charposy
return
sub 3
set #ltargetx #charposx + %1
set #ltargety #charposy + %1
return
sub 4
set #ltargetx #charposx
set #ltargety #charposy + %1
return
sub 5
set #ltargetx #charposx - %1
set #ltargety #charposy + %1
return
sub 6
set #ltargetx #charposx - %1
set #ltargety #charposy
return
sub 7
set #ltargetx #charposx - %1
set #ltargety #charposy - %1
return
sub pickaxe
finditem %Pickaxe C_ , %UBYVJMD
if #findkind = 0
{
set #LObjectID #FindID
event macro 17 0
target
event macro 22 0
return
}
if #findkind = 1
{
ignoreitem #FindID
gosub pickaxe
return
}
if #findkind = -1
{
ignoreitem reset
event sysmessage Pickaxe nao encontrada
wait 3s
return
}
return
guardar:
event macro 8 7
move 2571 481
wait 3s
msg bank$
wait 3s
set #contposx 50
set #contposy 50
wait 3s
finditem %comida
if #findkind = 0
{
set #LObjectID #FindID
event macro 17 0
}
pegar:
finditem %Minerios 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