Trolling and Trawling the Seas by rustedrook
Description: Set sail and catch fish, search for fishing spots and enter war mode to toss nets!
1# Run another script in a loop
2# Trolling the Ocean /Fishing&Glassing Out of War/Harpoon&Nets in War/Auto Healer
3# Requirements: Harpoon, Fishing Nets, Fishing Pole, Spyglass, Pots
4# Additional Info: Call another script after this one finishes
5
6//Set timers
7if not timerexists "healpot"
8 createtimer "healpot"
9 settimer "healpot" 11000
10endif
11if not timerexists "bandage"
12 createtimer "bandage"
13 settimer "bandage" 11000
14endif
15if not timerexists "warning"
16 createtimer "warning"
17 settimer "warning" 31000
18endif
19if not timerexists "curepot"
20 createtimer "curepot"
21 settimer "curepot" 11000
22endif
23if not timerexists "nets"
24 createtimer "nets"
25 settimer "nets" 4500
26endif
27if not timerexists "fishingpole"
28 createtimer "fishingpole"
29 settimer "fishingpole" 8000
30endif
31if not timerexists "spyGlassTimer"
32 createtimer "spyGlassTimer"
33 settimer "spyGlassTimer" 6600
34endif
35
36
37
38//Begin Script
39while not dead
40
41
42// Never steal a target cursor
43if targetexists
44 wait 1000
45 loop
46endif
47
48
49//Auto Healer/Cure...Bandaids, Pots
50if poisoned and timer 'curepot' > 11000
51 potion 'cure'
52 wait 200
53 settimer 'curepot' 0
54endif
55if poisoned or hp < maxhits
56 if targetexists
57 continue
58 endif
59 if timer 'bandage' > 10250
60 hotkey 'Use Bandage (No Timer)'
61 wft 200
62 hotkey 'Target Self'
63 wait 200
64 if insysmsg 'You begin applying the bandages'
65 settimer 'bandage' 0
66 endif
67 endif
68endif
69if insysmsg 'You begin applying the bandages'
70 settimer 'bandage' 0
71endif
72if not findtype 'Yellow Potion' backpack and timer 'warning' > 30000
73 overhead 'No heal pots!' 34
74 wait 200
75 settimer 'warning' 0
76endif
77if hp < 39 and timer 'bandage' < 8000
78 if findtype "Yellow Potion" backpack
79 if timer "healpot" > 11000
80 overhead 'Drinking heal!'
81 wait 200
82 potion "heal"
83 wait 200
84 settimer "healpot" 0
85 endif
86 endif
87endif
88
89
90//Trolling...Harpoon/Nets in Warmode
91if warmode
92 if findtype "Fishing Pole" hand or lhandempty
93 if findtype 31169 backpack as jarpoon
94 dclick jarpoon
95 wait 100
96 endif
97 else
98 if timer 'nets' > 4000
99 if findtype "fishing net" backpack as net
100 wait 100
101 dclick net backpack
102 waitfortarget 200
103 target "self"
104 settimer 'nets' 0
105 endif
106 endif
107 endif
108
109
110//Fishing/Glassing in Peace
111else
112 if timer 'fishingpole' > 7500
113 if findtype "harpoon" hand or lhandempty
114 if findtype "Fishing Pole" backpack
115 dress "Fishing Pole"
116 wait 100
117 endif
118 else
119 hotkey "Use item in hand"
120 waitfortarget 1000
121 target "self"
122 settimer 'fishingpole' 0
123 endif
124 endif
125wait 200
126
127
128// Never steal a target cursor
129if targetexists
130 wait 1000
131 loop
132endif
133if not findtype "spyglass" backpack
134 overhead "No spyglass"
135 stop
136endif
137if timer "spyGlassTimer" > 6500
138 if targetexists
139 wait 1000
140 loop
141 endif
142 gumpclose 2890020940
143 gumpclose 2890020940
144 if targetexists
145 wait 1000
146 loop
147 endif
148 dclicktype "spyglass" backpack
149 wft 1000
150 if targetexists neutral
151 target 'self'
152 endif
153 waitforgump 2890020940
154 gumpresponse 11 2890020940
155 waitforgump 2890020940
156 gumpresponse 4 2890020940
157 waitforgump 2890020940
158 settimer 'spyGlassTimer' 0
159 cooldown Spyglass
160endif
161
162
163endif
164
165wait 200
166
167loop
168
169endwhile