Show Posts
1
Script Debug / Seerius High Seas Land Fisher - Adding a second item to be dumped
« on: September 23, 2018, 09:27:19 PM »
Trying to see if I'm on the right track with adding a second item to be dumped along with the shoes.
Here at the bottom it shows gosub checkshoes. What I'm trying to accomplish, is for it to dump shoes and the meteorites in the trash and keep fishing.
Thank you.
Code: [Select]
;************************************************* #### SUB DUMPFISH ####
sub dumpfish
set %safety_timer #scnt + 30
if %hideATsecure = #TRUE
{
event macro 13 21
wait 20
}
repeat
set %droploot OMZ_NMZ_SMZ_RMZ_TYZ_WYZ_DQD_EQD_FQD_GQD_UYZ_ZYZ_WWS_UDHB
finditem %droploot C_ , #backpackid
exevent drag #findid #findstack
wait %dragspeed
exevent dropc %dropbox
wait 15
until #findkind = -1 || ( #scnt > %safety_timer )
set %overweight #FALSE
gosub checkshoes
; gosub nextspot
returnHere at the bottom it shows gosub checkshoes. What I'm trying to accomplish, is for it to dump shoes and the meteorites in the trash and keep fishing.
Code: [Select]
;************************************************* #### SUB checkshoes ####
sub checkshoes
set %shoetypes AWI_NVI_PVI_CWI_OVI_YDF_ZVI_QVI_TVI_YDF
event macro 8 7
wait 20
checkshoesloop:
finditem %shoetypes C_ , #backpackid
if #findcnt >= %QUANTITYshoes2DUMP
{
gosub TM_AdvJournalSync trash 100
gosub TM_TravelFromRunebook %travel_option 1 3 %trashbook
wait 20
gosub TM_AdvJournalScan NONE the_spell_fizzles blocking_the_location
if #RESULT = #TRUE
{
goto checkshoesloop
}
else
{
gosub dumpshoes
}
}
return
;************************************************* #### SUB dumpshoes ####
sub dumpshoes
if %hideATtrash = #TRUE
{
event macro 13 21
wait 20
}
dumploop:
finditem %shoetypes C_ , #backpackid
if #findkind = -1
goto enddump
if #findcnt >= 1
{
exevent drag #findid
wait %dragspeed
exevent dropc %trash
wait 15
}
goto dumploop
enddump:
gosub checkmeteorites
return
;************************************************* #### SUB checkmeteorites ####
sub checkmeteorites
set %meteoritetypes QGH_SGH_PGH
event macro 8 7
wait 20
checkmeteoritesloop:
finditem %meteoritetypes C_ , #backpackid
if #findcnt >= %QUANTITYmeteories2DUMP
{
gosub TM_AdvJournalSync trash 100
gosub TM_TravelFromRunebook %travel_option 1 3 %trashbook
wait 20
gosub TM_AdvJournalScan NONE the_spell_fizzles blocking_the_location
if #RESULT = #TRUE
{
goto checkmeteoritesloop
}
else
{
gosub dumpmeteorites
}
}
return
;************************************************* #### SUB dumpmeteorites ####
sub dumpmeteorites
if %hideATtrash = #TRUE
{
event macro 13 21
wait 20
}
dumploop:
finditem %meteoritetypes C_ , #backpackid
if #findkind = -1
goto enddump
if #findcnt >= 1
{
exevent drag #findid
wait %dragspeed
exevent dropc %trash
wait 15
}
goto dumploop
enddump:
return
;*************************************************
;*************************************************Thank you.