Enea per favore posta qui lo script che dicevi che va bene per minare; se non hai problemi.
Thx. in anticipo.
Thx. in anticipo.



sub Mina
set %mx %1
set %my %2
set !cave %3
set !ttipe %4
gosub VisualizzaStato Mina
minap2:
findItem %pickaxe c_ , #backpackid
if #findkind = -1
{
gosub Crea_PickAxe
if #result = #false
{
return VATTENE
}
goto minap2
}
set #lobjectid #findid
event macro 17 0
set %error #scnt + 3
wait 2
wtperminare2:
if #targcurs = 1
{
wait 2
goto riclickmina2
}
if #scnt > %error
{
goto minap2
}
goto wtperminare2
riclickmina2:
set %error #scnt + 30
set %jindex #jindex + 1
set %ncr 0
rcminaripeti2:
if !cave = #true
{
set #ltargetx %mx
set #ltargety %my
set #LTargetZ #CHARPOSZ
set #LTargetKind 3
set #LTARGETTILE !ttipe
}
if !cave = #false
{
set #ltargetx %mx
set #ltargety %my
set #LTargetZ -1
set #LTargetKind 2
}
event Macro 22
set %npicconate %npicconate + 1
;event sysmessage %npicconate gocce di sudore!
minaloop2:
gosub check_HP
if #result = #false
{
if %guard = #true
{
msg Guards $
gosub heal uno
wait 10
}
if %guard = #false && %usafuga = #true
{
return FUGA
}
}
for %line #jindex %jindex
{
scanjournal %line
if YOU_PUT_SOME in #journal
{
gosub guarda_che_tipo #journal
if #result > 1
{
if #result > %mat . %nposto
{
set %mat . %nposto #result
gosub crea_info_spot %nposto #true
}
}
deletejournal
return GIUSTO
}
if TARGET_CANNOT in #journal || YOU_CAN'T_MINE in #journal || TARGET_CANNOT_BE_SEEN in #journal
{
deletejournal
return SBAGLIATO
}
if YOUR_BACKPACK_IS_FULL in #journal
{
deletejournal
return VATTENE
}
if THERE_IS_NO_METAL in #journal
{
deletejournal
return FINITO
}
if YOU_CAREFULLY_DIG_UP in #journal
{
gosub guarda_che_tipo #journal
if #result > 1
{
if #result > %mat . %nposto
{
set %mat . %nposto #result
gosub crea_info_spot %nposto #true
}
}
deletejournal
set %contasabbia %contasabbia + 1
if %contasabbia < %limitesand
return GIUSTO
else
return FINITO
}
if YOU_DIG_SOME in #journal
{
gosub guarda_che_tipo #journal
if #result > 1
{
if #result > %mat . %nposto
{
set %mat . %nposto #result
gosub crea_info_spot %nposto #true
}
}
deletejournal
return GIUSTO
}
if YOU_LOOSEN_SOME in #journal || YOU_CAREFULLY_EXTRACT in #journal || YOU_DIG_FOR_A_WHILE in #journal
{
deletejournal
return GIUSTO
}
}
if #scnt < %error
{
goto minaloop2
}
return SBAGLIATO
return

Commenta