Created: 06/08/2023, 01:53:27 AM Updated: 03/14/2024, 01:44:28 AM View Change History
1
2
3
4if not varexist recallNextRunePosition
5 @setvar! recallNextRunePosition 0
6endif
7
8if recallNextRunePosition = 0
9 @setvar! recallNextRunePosition 1
10elseif recallNextRunePosition = 1
11 @setvar! recallNextRunePosition 2
12elseif recallNextRunePosition = 2
13 @setvar! recallNextRunePosition 3
14elseif recallNextRunePosition = 3
15 @setvar! recallNextRunePosition 4
16elseif recallNextRunePosition = 4
17 @setvar! recallNextRunePosition 5
18elseif recallNextRunePosition = 5
19 @setvar! recallNextRunePosition 6
20elseif recallNextRunePosition = 6
21 @setvar! recallNextRunePosition 7
22elseif recallNextRunePosition = 7
23 @setvar! recallNextRunePosition 8
24elseif recallNextRunePosition = 8
25 @setvar! recallNextRunePosition 9
26elseif recallNextRunePosition = 9
27 @setvar! recallNextRunePosition 10
28elseif recallNextRunePosition = 10
29 @setvar! recallNextRunePosition 11
30elseif recallNextRunePosition = 11
31 @setvar! recallNextRunePosition 12
32elseif recallNextRunePosition = 12
33 @setvar! recallNextRunePosition 13
34elseif recallNextRunePosition = 13
35 @setvar! recallNextRunePosition 14
36elseif recallNextRunePosition = 14
37 @setvar! recallNextRunePosition 15
38elseif recallNextRunePosition = 15
39 @setvar! recallNextRunePosition 16
40elseif recallNextRunePosition = 16
41 @setvar! recallNextRunePosition 17
42elseif recallNextRunePosition = 17
43 @setvar! recallNextRunePosition 18
44elseif recallNextRunePosition = 18
45 @setvar! recallNextRunePosition 19
46elseif recallNextRunePosition = 19
47 @setvar! recallNextRunePosition 20
48elseif recallNextRunePosition = 20
49 @setvar! recallNextRunePosition 21
50elseif recallNextRunePosition = 21
51 @setvar! recallNextRunePosition 22
52elseif recallNextRunePosition = 22
53 @setvar! recallNextRunePosition 23
54elseif recallNextRunePosition = 23
55 @setvar! recallNextRunePosition 24
56elseif recallNextRunePosition = 24
57 @setvar! recallNextRunePosition 25
58elseif recallNextRunePosition = 25
59 @setvar! recallNextRunePosition 26
60elseif recallNextRunePosition = 26
61 @setvar! recallNextRunePosition 1
62endif
63
64
65if not findtype "runebook" backpack and not findtype "runetome" backpack
66 overhead "We do not have a runebook or runetome" 34
67 stop
68endif
69
70if not varexist farmingBook
71 if counttype "runebook" backpack = 1 and counttype "runetome" backpack = 0 and findtype "runebook" backpack as myBook
72 overhead "Automatically selected your one runebook" 88
73 @setvar farmingBook myBook
74 elseif counttype "runebook" backpack = 0 and counttype "runetome" backpack = 1 and findtype "runetome" backpack as myBook
75 overhead "Automatically selected your one runetome" 88
76 @setvar farmingBook myBook
77 else
78 overhead "Select your farming book (runebook or runetome)" 88
79 @setvar farmingBook
80 endif
81endif
82
83if farmingBook = 0 or not find farmingBook backpack
84 unsetvar farmingBook
85 replay
86endif
87
88if mana < 12
89 overhead "Need more mana... trying again" 34
90 wait 500
91 replay
92endif
93
94
95
96@setvar! escapePlanUseMagery 0
97if skill "Magery" >= 60
98 if counttype "Black Pearl%s%" self >= 1 and counttype "Blood Moss" self >= 1 and counttype "Mandrake Root%s%" self >= 1
99 @setvar! escapePlanUseMagery 1
100 else
101 if findtype "reagent satchel" self as satchel
102 if counttype "Black Pearl%s%" satchel >= 1 and counttype "Blood Moss" satchel >= 1 and counttype "Mandrake Root%s%" satchel >= 1
103 @setvar! escapePlanUseMagery 1
104 endif
105 endif
106 if escapePlanUseMagery = 0
107 overhead "No regs, using scroll instead" 34
108 endif
109 endif
110endif
111
112
113getlabel farmingBook desc
114@setvar! escapePlanGumpId 1551740969
115@setvar! secondaryGumpResponse 0
116if "rune tome" in desc
117
118 if escapePlanUseMagery = 1
119 if recallNextRunePosition = 1
120 @setvar! recallHomeGumpResponse 200
121 elseif recallNextRunePosition = 2
122 @setvar! recallHomeGumpResponse 201
123 elseif recallNextRunePosition = 3
124 @setvar! recallHomeGumpResponse 202
125 elseif recallNextRunePosition = 4
126 @setvar! recallHomeGumpResponse 203
127 elseif recallNextRunePosition = 5
128 @setvar! recallHomeGumpResponse 204
129 elseif recallNextRunePosition = 6
130 @setvar! recallHomeGumpResponse 205
131 elseif recallNextRunePosition = 7
132 @setvar! recallHomeGumpResponse 206
133 elseif recallNextRunePosition = 8
134 @setvar! recallHomeGumpResponse 207
135 elseif recallNextRunePosition = 9
136 @setvar! recallHomeGumpResponse 208
137 elseif recallNextRunePosition = 10
138 @setvar! recallHomeGumpResponse 209
139 elseif recallNextRunePosition = 11
140 @setvar! recallHomeGumpResponse 210
141 elseif recallNextRunePosition = 12
142 @setvar! recallHomeGumpResponse 211
143 elseif recallNextRunePosition = 13
144 @setvar! recallHomeGumpResponse 212
145 elseif recallNextRunePosition = 14
146 @setvar! recallHomeGumpResponse 213
147 elseif recallNextRunePosition = 15
148 @setvar! recallHomeGumpResponse 214
149 elseif recallNextRunePosition = 16
150 @setvar! recallHomeGumpResponse 215
151 elseif recallNextRunePosition = 16
152 @setvar! recallHomeGumpResponse 215
153 elseif recallNextRunePosition = 17
154 @setvar! recallHomeGumpResponse 216
155 elseif recallNextRunePosition = 18
156 @setvar! recallHomeGumpResponse 217
157 elseif recallNextRunePosition = 19
158 @setvar! recallHomeGumpResponse 218
159 elseif recallNextRunePosition = 20
160 @setvar! recallHomeGumpResponse 219
161 elseif recallNextRunePosition = 21
162 @setvar! recallHomeGumpResponse 220
163 elseif recallNextRunePosition = 22
164 @setvar! recallHomeGumpResponse 221
165 elseif recallNextRunePosition = 23
166 @setvar! recallHomeGumpResponse 222
167 elseif recallNextRunePosition = 24
168 @setvar! recallHomeGumpResponse 223
169 elseif recallNextRunePosition = 25
170 @setvar! recallHomeGumpResponse 224
171 elseif recallNextRunePosition = 26
172 @setvar! recallHomeGumpResponse 225
173 else
174
175 @setvar! recallNextRunePosition 1
176 @setvar! recallHomeGumpResponse 200
177 endif
178
179 if recallHomeGumpResponse = 201 or recallHomeGumpResponse = 203 or recallHomeGumpResponse = 205 or recallHomeGumpResponse = 207 or recallHomeGumpResponse = 209 or recallHomeGumpResponse = 211 or recallHomeGumpResponse = 213 or recallHomeGumpResponse = 215 or recallHomeGumpResponse = 217 or recallHomeGumpResponse = 219 or recallHomeGumpResponse = 221 or recallHomeGumpResponse = 223 or recallHomeGumpResponse = 223 or recallHomeGumpResponse = 225
180 @setvar! secondaryGumpResponse 20
181 else
182 @setvar! secondaryGumpResponse 10
183 endif
184 else
185 if recallNextRunePosition = 1
186 @setvar! recallHomeGumpResponse 100
187 elseif recallNextRunePosition = 2
188 @setvar! recallHomeGumpResponse 101
189 elseif recallNextRunePosition = 3
190 @setvar! recallHomeGumpResponse 102
191 elseif recallNextRunePosition = 4
192 @setvar! recallHomeGumpResponse 103
193 elseif recallNextRunePosition = 5
194 @setvar! recallHomeGumpResponse 104
195 elseif recallNextRunePosition = 6
196 @setvar! recallHomeGumpResponse 105
197 elseif recallNextRunePosition = 7
198 @setvar! recallHomeGumpResponse 106
199 elseif recallNextRunePosition = 8
200 @setvar! recallHomeGumpResponse 107
201 elseif recallNextRunePosition = 9
202 @setvar! recallHomeGumpResponse 108
203 elseif recallNextRunePosition = 10
204 @setvar! recallHomeGumpResponse 109
205 elseif recallNextRunePosition = 11
206 @setvar! recallHomeGumpResponse 110
207 elseif recallNextRunePosition = 12
208 @setvar! recallHomeGumpResponse 111
209 elseif recallNextRunePosition = 13
210 @setvar! recallHomeGumpResponse 112
211 elseif recallNextRunePosition = 14
212 @setvar! recallHomeGumpResponse 113
213 elseif recallNextRunePosition = 15
214 @setvar! recallHomeGumpResponse 114
215 elseif recallNextRunePosition = 16
216 @setvar! recallHomeGumpResponse 115
217 elseif recallNextRunePosition = 16
218 @setvar! recallHomeGumpResponse 115
219 elseif recallNextRunePosition = 17
220 @setvar! recallHomeGumpResponse 116
221 elseif recallNextRunePosition = 18
222 @setvar! recallHomeGumpResponse 117
223 elseif recallNextRunePosition = 19
224 @setvar! recallHomeGumpResponse 118
225 elseif recallNextRunePosition = 20
226 @setvar! recallHomeGumpResponse 119
227 elseif recallNextRunePosition = 21
228 @setvar! recallHomeGumpResponse 120
229 elseif recallNextRunePosition = 22
230 @setvar! recallHomeGumpResponse 121
231 elseif recallNextRunePosition = 23
232 @setvar! recallHomeGumpResponse 122
233 elseif recallNextRunePosition = 24
234 @setvar! recallHomeGumpResponse 123
235 elseif recallNextRunePosition = 25
236 @setvar! recallHomeGumpResponse 124
237 elseif recallNextRunePosition = 26
238 @setvar! recallHomeGumpResponse 125
239 else
240
241 @setvar! recallNextRunePosition 1
242 @setvar! recallHomeGumpResponse 100
243 endif
244 endif
245
246
247 @setvar! escapePlanGumpId 167090027
248elseif "runebook" in desc
249
250 if escapePlanUseMagery = 1
251 if recallNextRunePosition = 1
252 @setvar! recallHomeGumpResponse 5
253 elseif recallNextRunePosition = 2
254 @setvar! recallHomeGumpResponse 11
255 elseif recallNextRunePosition = 3
256 @setvar! recallHomeGumpResponse 17
257 elseif recallNextRunePosition = 4
258 @setvar! recallHomeGumpResponse 23
259 elseif recallNextRunePosition = 5
260 @setvar! recallHomeGumpResponse 29
261 elseif recallNextRunePosition = 6
262 @setvar! recallHomeGumpResponse 35
263 elseif recallNextRunePosition = 7
264 @setvar! recallHomeGumpResponse 41
265 elseif recallNextRunePosition = 8
266 @setvar! recallHomeGumpResponse 47
267 elseif recallNextRunePosition = 9
268 @setvar! recallHomeGumpResponse 53
269 elseif recallNextRunePosition = 10
270 @setvar! recallHomeGumpResponse 59
271 elseif recallNextRunePosition = 11
272 @setvar! recallHomeGumpResponse 65
273 elseif recallNextRunePosition = 12
274 @setvar! recallHomeGumpResponse 71
275 elseif recallNextRunePosition = 13
276 @setvar! recallHomeGumpResponse 77
277 elseif recallNextRunePosition = 14
278 @setvar! recallHomeGumpResponse 83
279 elseif recallNextRunePosition = 15
280 @setvar! recallHomeGumpResponse 89
281 elseif recallNextRunePosition = 16
282 @setvar! recallHomeGumpResponse 95
283 else
284
285 @setvar! recallNextRunePosition 1
286 @setvar! recallHomeGumpResponse 5
287 endif
288
289 else
290 if recallNextRunePosition = 1
291 @setvar! recallHomeGumpResponse 2
292 elseif recallNextRunePosition = 2
293 @setvar! recallHomeGumpResponse 8
294 elseif recallNextRunePosition = 3
295 @setvar! recallHomeGumpResponse 14
296 elseif recallNextRunePosition = 4
297 @setvar! recallHomeGumpResponse 20
298 elseif recallNextRunePosition = 5
299 @setvar! recallHomeGumpResponse 26
300 elseif recallNextRunePosition = 6
301 @setvar! recallHomeGumpResponse 32
302 elseif recallNextRunePosition = 7
303 @setvar! recallHomeGumpResponse 38
304 elseif recallNextRunePosition = 8
305 @setvar! recallHomeGumpResponse 44
306 elseif recallNextRunePosition = 9
307 @setvar! recallHomeGumpResponse 50
308 elseif recallNextRunePosition = 10
309 @setvar! recallHomeGumpResponse 56
310 elseif recallNextRunePosition = 11
311 @setvar! recallHomeGumpResponse 62
312 elseif recallNextRunePosition = 12
313 @setvar! recallHomeGumpResponse 68
314 elseif recallNextRunePosition = 13
315 @setvar! recallHomeGumpResponse 74
316 elseif recallNextRunePosition = 14
317 @setvar! recallHomeGumpResponse 80
318 elseif recallNextRunePosition = 15
319 @setvar! recallHomeGumpResponse 86
320 elseif recallNextRunePosition = 16
321 @setvar! recallHomeGumpResponse 92
322 else
323
324 @setvar! recallNextRunePosition 1
325 @setvar! recallHomeGumpResponse 2
326 endif
327 endif
328else
329 overhead "Unknown escape plan" 34
330 unsetvar farmingBook
331 replay
332endif
333
334hotkey '> Interrupt'
335while targetexists
336 hotkey 'Cancel Current Target'
337 wait 200
338endwhile
339
340while not gumpexists escapePlanGumpId
341 dclick farmingBook
342 wait 200
343endwhile
344gumpresponse recallHomeGumpResponse escapePlanGumpId
345if secondaryGumpResponse > 0
346 waitforgump escapePlanGumpId 5000
347 gumpresponse secondaryGumpResponse escapePlanGumpId
348endif
349wait 200
350gumpclose escapePlanGumpId
351if insysmsg "There are no charges left on that item."
352 overhead "Oh no! Out of charges!" 34
353endif
354
355if listexists jaseowns_PreviousScript
356 foreach myScript in jaseowns_PreviousScript
357 hotkey myScript
358 endfor
359endif
360
361if name = "Jase Owns"
362 hotkey "Play Script: Mage\MageBot"
363endif