Bapeth's Butler by barryroser
Description: This script will use an alt character to sort your shipping crate into your one-tile loot dump setup. If you have a house it can be used to Expedite your ship crate from an inn room to your house, where it will sort the loot into your one-tile setup and buff the closest friendly character.
1# Bapeths Butler
2#
3# December 28th 2024 - Ship crate code changed for new unlockable ship crate tile
4#
5# Video link on how to use : (not made yet)
6#
7# This script will buff the closest friendly character, sort items from shipping crates, recycle items, and sort items
8# If you ever need to reset storage items, tomes, containers etc... simply delete the variables in Script Options
9#
10# "***REQUIRED***"
11#
12# This script should be used on ALT account with and ALT character with the following skills:
13#
14# "120 Item ID" (Hard requirement must have)
15# "120 Inscription" (Is not needed, but the higher this skill is the longer your buffs last)
16# "100 Magery" (Required if you are using the Inn transfer to house feature, must be able to gate travel)
17#
18# Items this script uses are as follows:
19#
20# All of these items should be locked down/secured in your inn room or house
21# Do not put any of these items inside containers
22#
23# "Two containers of any kind"
24# "A rune tome"
25# "A rare cloth tome"
26# "A dyes tome"
27# "An arcane rune tome"
28# "A treasure map tome"
29# "A ship upgrade tome"
30# "A skill mastery tome"
31# "A collectible card tome"
32# "An ore map tome"
33# "A skinning map tome"
34# "A lumber map tome"
35# "A fishing map tome"
36# "A storage shelf"
37# "A bank deposit box"
38# "A garden shelf"
39# "A resource stockpile"
40# "A magic item recycler"
41# "A magic item vault"
42# "A repair bench"
43#
44# Script starts here
45
46if not varexist firsttimedumper
47 @setvar firsttimedumper backpack
48 overhead "Welcome to Bapeths One Tile Item Eater and Ship Crate Expeditor..." 156
49 pause 8000
50 overhead "This script uses many required storage items within a 2 tile radius..." 1172
51 pause 9000
52 overhead "Please ensure that you have all required items locked down and/or secured within 2 tiles of your character before using the script..." 156
53 pause 10000
54 overhead "This script should be used with an alt character on an alt account, and, should have 120 Item ID skill..." 156
55 pause 10000
56 overhead "If you do not have 120 Item ID or are missing items from the required list, stop the script now and get those things..." 1172
57 pause 10000
58 overhead "Inscription skill is recommended to have, the higher it is the longer your buffs will last..." 156
59 pause 10000
60 overhead "When you are ready, place your character on your one-tile dump spot and play the script" 156
61 stop
62endif
63
64if not varexist lootchestdump
65 overhead "Set Main Loot Container" 88
66 hotkey "Cancel Current Target"
67 setlasttarget
68 wft 500
69 while targetexists
70 //donothing
71 endwhile
72 @setvar "lootchestdump" lasttarget
73 overhead "Loot Container Set" 77
74endif
75if not varexist lootchestdump2
76 overhead "Set Second Loot Container" 88
77 hotkey "Cancel Current Target"
78 setlasttarget
79 wft 500
80 while targetexists
81 //donothing
82 endwhile
83 @setvar "lootchestdump2" lasttarget
84 overhead "Loot Container Set" 77
85endif
86
87if not varexist rareclothtome
88 if findtype "book" ground 1495 -1 2 as book
89 @setvar "rareclothtome" book
90 endif
91endif
92if not varexist dyestome
93 if findtype "book" ground 1494 -1 2 as book
94 @setvar "dyestome" book
95 endif
96endif
97if not varexist arcanerunetome
98 if findtype "book" ground 2085 -1 2 as book
99 @setvar "arcanerunetome" book
100 endif
101endif
102if not varexist treasuremaptome
103 if findtype "book" ground 2990 -1 2 as book
104 @setvar "treasuremaptome" book
105 endif
106endif
107if not varexist shipupgradetome
108 if findtype "book" ground 2877 -1 2 as book
109 @setvar "shipupgradetome" book
110 endif
111endif
112if not varexist skillmasterytome
113 if findtype "book" ground 2963 -1 2 as book
114 @setvar "skillmasterytome" book
115 endif
116endif
117if not varexist collectablecardtome
118 if findtype "book" ground 2141 -1 2 as book
119 @setvar "collectablecardtome" book
120 endif
121endif
122if not varexist oremaptome
123 if findtype "book" ground 2796 -1 2 as book
124 @setvar "oremaptome" book
125 endif
126endif
127if not varexist skinningmaptome
128 if findtype "book" ground 2651 -1 2 as book
129 @setvar "skinningmaptome" book
130 endif
131endif
132if not varexist lumbermaptome
133 if findtype "book" ground 2799 -1 2 as book
134 @setvar "lumbermaptome" book
135 endif
136endif
137if not varexist fishingmaptome
138 if findtype "book" ground 2722 -1 2 as book
139 @setvar "fishingmaptome" book
140 endif
141endif
142if not varexist myshelf
143 if findtype "storage shelf" ground -1 -1 2 as shelf
144 @setvar "myshelf" shelf
145 endif
146endif
147if not varexist repbench
148 if findtype "repair bench" ground -1 -1 2 as rbench
149 @setvar "repbench" rbench
150 endif
151endif
152if not varexist gardenshelf
153 if findtype "barrel planter shelf|garden shelf" ground -1 -1 2 as gshelf
154 @setvar "gardenshelf" gshelf
155 endif
156endif
157if not varexist respile
158 if findtype "resource container" ground -1 -1 2 as pile
159 @setvar "respile" pile
160 endif
161endif
162if not varexist magicrecycler
163 if findtype "magic item recycler|ornate elven chest" ground -1 -1 2 as recycle
164 @setvar "magicrecycler" recycle
165 endif
166endif
167if not varexist magicchest
168 if findtype "sm magic item vault|magic item chest" ground -1 -1 2 as mchest
169 @setvar "magicchest" mchest
170 endif
171endif
172
173if not timerexists bufftimer
174 createtimer bufftimer
175 settimer bufftimer 33000
176endif
177clearsysmsg
178hotkey "Next Friend Target"
179pause 600
180if insysmsg "No one matching that"
181 //donothing
182elseif timer bufftimer >= 33000
183 say "Hey bud, need a buff?" 78
184 settimer bufftimer 0
185endif
186
187gumpresponse 6
188getlabel backpack ping
189gumpclose 4045111101
190getlabel backpack ping
191
192if not hidden
193 hotkey 'Set Grab Item HotBag'
194 wft 500
195 target backpack
196 say "[belch"
197 while cooldown "Hiding"
198 //donothing
199 endwhile
200 if skill "Item ID" = 120
201 clearsysmsg
202 while not insysmsg "What do you wish to appraise"
203 skill "itemidentification"
204 endwhile
205 wft 500
206 target "magicrecycler"
207 getlabel backpack ping
208 pause 500
209 if not dead
210 dclick "magicrecycler"
211 waitforgump 4045111101 500
212 gumpresponse 10
213 waitforgump 4045111101 500
214 pause 500
215 if ingump "Begin" 4045111101
216 gumpresponse 6
217 waitforgump 4045111101 500
218 pause 350
219 endif
220 if ingump "Confirm" 4045111101
221 gumpresponse 6
222 waitforgump 4045111101 500
223 pause 500
224 getlabel backpack ping
225 endif
226 endif
227 if gumpexists 4045111101
228 while ingump "Begin" 4045111101
229 gumpresponse 6
230 waitforgump 4045111101 500
231 pause 350
232 if ingump "No recyclable items found"
233 menu magicchest 0
234 wft 500
235 target "magicrecycler"
236 gumpclose 4045111101
237 break
238 endif
239 endwhile
240 endif
241 endif
242 dclick "myshelf"
243 waitforgump 3232825965 500
244 gumpresponse 7
245 waitforgump 3232825965 500
246 gumpclose 3232825965
247 if mana >= 20 and skill "Magery" >= 60
248 cast "bless"
249 wft 2500
250 hotkey "Next Friend Target"
251 lasttarget
252 clearall
253 pause 350
254 cast "arch protection"
255 wft 2500
256 target self
257 clearall
258 endif
259 say "SALLY FOURTH!!!" 88
260 while not hidden
261 skill "hiding"
262 cooldown "Hiding" 10000
263 endwhile
264endif
265if findtype 3645|3644 ground -1 -1 2 as shipcrate
266 while cooldown "World Save"
267 //donothing
268 endwhile
269 hotkey 'Set Grab Item HotBag'
270 wft 500
271 target backpack
272 pause 300
273 dclick shipcrate
274 getlabel backpack ping
275
276 while findtype "gold coin" shipcrate as bgold
277 lift bgold 60000
278 drop lootchestdump -1 -1 0
279 while queued
280 pause 600
281 endwhile
282 endwhile
283 while findtype "doubloon" shipcrate as bdoubloon
284 lift bdoubloon 60000
285 drop lootchestdump -1 -1 0
286 while queued
287 pause 600
288 endwhile
289 endwhile
290 while findtype "cathedral tapestry|Darkscale tapestry|large painting|landscape painting|portrait painting|hieroglyph|figurine|statue|44987|49730|47107|18653|45127|47105|29361|43453|5899|47109|45250|41509|43447|18657|4025|51308|45156|51304|45214|28769|28799|28803|28765|45211|45248|51259|45220|51328|45218|3842|51327|45222|45241|51336|51375|45282|54722|45255|45246|28795|44983|45235|45251|45238|51258|51314|28761|45236|51260|54718|18400|45252|18656|47111|3839|45239|45242|45254|45281|45247|42241|45216|28775|2594|51321|3838|51318|5901|5905|5903|48407|51302|4248|27611|15296|43166|5359|5981|4026|3985|25359|17686|3836|17087|5356|29030|24434|22336|29036|3843|29025|51098|8826|576|3827|22326|45315|3891|2539|39898|39896|39892|39918|39911|39916|39897|39905|39891|39917|39912|39909|39889|31047|31017|31049|31019|31055|31051|31053|31025|31027|31031|31041|54717|31021|31011|31023|31029|31043|31003|31035|31033|31045|31037|31002|20006|31169|31006|30999|31012|31009|30996|7109|7107|3922|31128|31188|20014|31014|31004|31142|31001|31000|37181|31010|30998|31172|30988|30997|31038|31141|7947|20008|31005|31191|31008|31007|30994|30993|31182|30989|20012|31186|31178|31015|30991|20010|20016|31184|31190|30990|30995|31176|31180|30992|31130|5207|7031|7026|7034|7033|7027|7035|7029|5078|5063|5059|5105|5060|5138|5129|5201|5142|5143|5076|5106|7610|5139|5090|5103|5132|7177|5061|7181|7179|3920|5042|5127|5117|5185|5125|3938|5177|3937|5044|5121|3915|3909|3568|3932|5123|5144|5119|5056|5135|5187|5074|5089|3934|3913|3917|3721|5075|5046|5049|7170|5146|5205|5203|5115|5204|5040|5179|5070|5182|5085|5181|3719|7173|5131|3911|5101|7175|7169|3713|5112|22187|9917|3859|3862|3878|3865|3856|3873|3877|3834|3742|3762|3740|3763|10245|3572|3573|3571|3885|7127|4225|12686|19985|19981|19984|19982|19983|19991|19989|19986|19987|19988|19994|19995|19992|19993|19990|19980|19977|19976|19978|7154|19979|3861|3821" shipcrate as bitem
291 hotkey 'Grab Item'
292 target bitem
293 while queued
294 wait 600
295 endwhile
296 if insysmsg "That container cannot hold"
297 break
298 endif
299 endwhile
300 //Dumping all items
301 menu respile 0
302 waitfortarget 1000
303 target 'self'
304 menu gardenshelf 0
305 waitfortarget 1000
306 target 'self'
307 menu rareclothtome 0
308 menu dyestome 0
309 menu arcanerunetome 0
310 menu treasuremaptome 0
311 menu shipupgradetome 0
312 menu skillmasterytome 0
313 menu collectablecardtome 0
314 menu oremaptome 0
315 menu skinningmaptome 0
316 menu lumbermaptome 0
317 menu fishingmaptome 0
318 menu magicrecycler 1
319 while findtype "void orb" backpack as bvoid
320 lift bvoid 60000
321 drop lootchestdump -1 -1 0
322 while queued
323 pause 600
324 endwhile
325 endwhile
326
327 while findtype "research materials" backpack as bresearch
328 lift bresearch 60000
329 drop lootchestdump -1 -1 0
330 while queued
331 pause 600
332 endwhile
333 endwhile
334
335 while findtype "deed" backpack as bdeed
336 lift bdeed 60000
337 drop lootchestdump -1 -1 0
338 while queued
339 pause 600
340 endwhile
341 endwhile
342
343 while findtype "bag of gems" backpack as bpirateboot
344 lift bpirateboot 60000
345 drop lootchestdump2 -1 -1 0
346 while queued
347 pause 600
348 endwhile
349 endwhile
350
351 while findtype "12686" backpack as bessence
352 lift bessence 60000
353 drop magicrecycler -1 -1 0
354 while queued
355 pause 600
356 endwhile
357 endwhile
358
359 while findtype "black market goods" backpack as bmg
360 lift bmg 60000
361 drop lootchestdump -1 -1 0
362 while queued
363 pause 600
364 endwhile
365 endwhile
366
367 while findtype "redline bottle" backpack as redlinebot
368 lift redlinebot 60000
369 drop lootchestdump -1 -1 0
370 while queued
371 pause 600
372 endwhile
373 endwhile
374
375 while findtype "redline bottle" backpack as redlinebot
376 lift redlinebot 60000
377 drop lootchestdump -1 -1 0
378 while queued
379 pause 600
380 endwhile
381 endwhile
382
383 while findtype "card" backpack as eventitem
384 lift eventitem 60000
385 drop lootchestdump2 -1 -1 0
386 while queued
387 pause 600
388 endwhile
389 endwhile
390
391 if skill "Item ID" = 120
392 clearsysmsg
393 while not insysmsg "What do you wish to appraise"
394 skill "itemidentification"
395 endwhile
396 wft 500
397 target "magicrecycler"
398 getlabel backpack ping
399 pause 500
400 if not dead
401 dclick "magicrecycler"
402 waitforgump 4045111101 500
403 gumpresponse 10
404 waitforgump 4045111101 500
405 pause 500
406 if ingump "Begin" 4045111101
407 gumpresponse 6
408 waitforgump 4045111101 500
409 pause 350
410 endif
411 if ingump "Confirm" 4045111101
412 gumpresponse 6
413 waitforgump 4045111101 500
414 pause 500
415 getlabel backpack ping
416 endif
417 endif
418 if gumpexists 4045111101
419 while ingump "Begin" 4045111101
420 gumpresponse 6
421 waitforgump 4045111101 500
422 pause 350
423 if ingump "No recyclable items found"
424 menu magicchest 0
425 wft 500
426 target "magicrecycler"
427 gumpclose 4045111101
428 break
429 endif
430 endwhile
431 endif
432 endif
433
434 dclick "myshelf"
435 waitforgump 3232825965 500
436 gumpresponse 7
437 waitforgump 3232825965 500
438 gumpclose 3232825965
439
440 clearsysmsg
441 hotkey "Next Friend Target"
442 pause 600
443 if insysmsg "No one matching that"
444 //donothing
445 elseif timer bufftimer >= 33000
446 say "Hey bud, need a buff?" 78
447 settimer bufftimer 0
448 endif
449 if mana >= 20 and not hidden and skill "Magery" >= 60
450 cast "bless"
451 wft 2500
452 hotkey "Next Friend Target"
453 lasttarget
454 clearall
455 pause 350
456 cast "arch protection"
457 wft 2500
458 target self
459 clearall
460 say "SALLY FOURTH!!!" 88
461 endif
462
463 while not hidden
464 skill "Hiding"
465 endwhile
466endif
467loop