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