Simple Fishing and Fish Steak by demlar

Description: No dress setup needed!!

1#Original: Tribal Leader
2#Modified by: Demlar
3#1.1 no longer need to have a 'dress' name just works!
4#set this number when you want to carve up fish
5@setvar! fishtoCarveCount 20
6
7if lhandempty
8    if findtype 3520 backpack as pole
9        lift pole
10        drop 'self' LeftHand    
11        wait 500
12    endif
13endif
14clearsysmsg 
15hotkey 'Use item in hand'
16wait 8000
17for 10
18    wait 1000
19    if insysmsg "You fish" or insysmsg "You catch"
20        #        say 'Guards!' 55
21        #info says its cooked fish but I assure you its fish you just caught!
22        if counttype 'cooked fish' backpack > fishtoCarveCount
23            dclicktype 'dagger' backpack
24            waitfortarget 
25            targettype 'cooked fish'
26        endif
27        break
28    endif
29    if insysmsg 'world is saving'
30        for 30
31            overhead 'Waiting for world save...'
32            wait 1000
33            if insysmsg 'save complete'
34                overhead 'Save complete - continue on!' 88
35                replay
36            endif
37        endfor
38    endif
39endfor
40
41
42
43loop