;==================================
; Virindi | BottleRocket
;==================================


initevents

set %ljtool FSF ; set your ljtool here
set %logType ZLK ; log type, don't change
set %boards TLK ; board tpye, don't change
set %bankLOCx 2513 ; x location of bank
set %bankLOCy 559 ; y location of bank
set %wp1x 2549 ; x location to move to right before heading to bank
set %wp1y 581 ; y location to move to right before heading to bank

; Copy and replace the ljroute (rail) with your own. Keep start: and gotostart in place.

start:
 GOSUB LJING 2548 582 0 3302
 GOSUB LJING 2544 579 0 3289
 GOSUB LJING 2544 576 0 3283
 GOSUB LJING 2544 570 0 3280
 GOSUB LJING 2544 567 0 3300
 GOSUB LJING 2548 567 0 3293
 GOSUB LJING 2548 570 0 3290
 GOSUB LJING 2548 576 0 3288
 GOSUB LJING 2552 576 0 3280
 GOSUB LJING 2556 579 0 3280
 GOSUB LJING 2556 585 0 3277
 GOSUB LJING 2552 585 0 3296
 GOSUB LJING 2548 585 0 3289
 GOSUB LJING 2548 588 0 3290
 GOSUB LJING 2548 594 0 3302
 GOSUB LJING 2544 591 0 3299
 GOSUB LJING 2540 597 0 3296
 GOSUB LJING 2540 600 0 3302
 GOSUB LJING 2544 600 0 3277
 GOSUB LJING 2544 603 0 3290
 GOSUB LJING 2544 606 0 3286
 GOSUB LJING 2544 609 0 3280
 GOSUB LJING 2544 612 0 3302
 GOSUB LJING 2540 612 0 3283
 GOSUB LJING 2540 609 0 3287
 GOSUB LJING 2536 606 0 3302
 GOSUB LJING 2536 609 0 3283
 GOSUB LJING 2532 615 0 3280
 GOSUB LJING 2529 610 0 3230
 GOSUB LJING 2524 609 0 3293
 GOSUB LJING 2520 615 0 3288
 GOSUB LJING 2516 614 0 3230
 GOSUB LJING 2508 615 0 3283
 GOSUB LJING 2508 612 0 3277
 GOSUB LJING 2504 615 0 3293
 GOSUB LJING 2504 627 0 3291
 GOSUB LJING 2504 624 0 3288
 GOSUB LJING 2508 624 0 3283
 GOSUB LJING 2524 627 0 3288
 GOSUB LJING 2532 615 0 3280
 GOSUB LJING 2536 609 0 3283
 GOSUB LJING 2540 612 0 3283
 GOSUB LJING 2540 609 0 3287
 GOSUB LJING 2544 612 0 3302
 GOSUB LJING 2544 609 0 3280
 GOSUB LJING 2544 606 0 3287
 GOSUB LJING 2544 603 0 3290
 GOSUB LJING 2548 603 0 3287
 GOSUB LJING 2548 609 0 3288
 GOSUB LJING 2548 612 0 3288
 GOSUB LJING 2552 612 0 3296
 GOSUB LJING 2552 615 0 3280
 GOSUB LJING 2556 612 0 3296
 GOSUB LJING 2556 606 0 3277
 GOSUB LJING 2560 603 0 3302
 GOSUB LJING 2564 609 0 3302
 GOSUB LJING 2564 612 0 3293
 GOSUB LJING 2564 603 0 3280
 GOSUB LJING 2564 600 0 3277
 GOSUB LJING 2560 597 0 3283
 GOSUB LJING 2560 588 0 3302
 GOSUB LJING 2564 582 0 3293
 GOSUB LJING 2556 585 0 3277
 GOSUB LJING 2556 579 0 3280

goto start

sub ljing
move %1 %2 1 60s
ljagain:
finditem %ljtool C_ , #CHARID
set #lobjectid #findid
event macro 17 0
target 10s
set #ltargetx %1
set #ltargety %2
set #ltargetz %3
set #ltargetkind 3
set #ltargettile %4
event macro 22 0
set %overtime #scnt + 10 ; change this if its too long, its a timeout if the #sysmsg check fails
gosub scan
wait 5
if %nexttree 2
set %nexttree #false
return
else
goto ljagain

sub scan
scan:
wait 1s
if YOU_PUT_SOME in #sysmsg || #scnt >= %overtime 2
gosub chop
return
if YOU_BROKE_YOUR_AXE in #sysmsg 2
goto newaxe
return
if YOU_HACK_AT_THE_TREE in #sysmsg 1
return
if THERE'S_NOT_ENOUGH in #sysmsg 2
set %nexttree #true
return
if YOU_CAN'T_USE in #sysmsg 2
set %nexttree #true
return
if TARGET_CANNOT_BE in #sysmsg 2
set %nexttree #true
return
goto scan

sub chop
chop:
finditem %ljtool
set #LOBJECTID #FINDID
event macro 17 0
target 5s
finditem %logType C_ , #BACKPACKID
set #LTARGETID #FINDID
set #ltargetkind 1
event macro 22 0
if #weight > #maxweight - 10
goto bank
else
return

bank:
set %charX #charposX
set %charY #charposY
move %wp1x %wp1y 0 60s
move %bankLOCx %bankLOCy 0 60s
msg $
msg bank$
wait 1s
contpos 570 350
finditem %boards C_ , #backpackid
Exevent Drag #findid #findstack
wait 1s
exevent dropc #contid
move %wp1x %wp1y 0 60s
move %charX %charY 0 60s
goto ljagain

newaxe:
finditem %ljtool C_ , #backpackid
event ExMsg #charID 3 0 Reequipping axe
exevent drag #findid
wait 1s
exevent droppd
goto ljagain