Loot Dump and Resupply by Goapirat by Goapirat
Related: Snippet organisationlootdumprepairrecyclebank deposit safestorage shelfrecyclerrepair benchrecource stockpile and now also added all tomesorganizationorganizerrestockresupply
Description: Script by Goapirat 09/22 V4.2
This is loot dump restock script that uses ideal following items when they are 2 tiles near you:
bank deposit safe, recource stockpile, recycler, repair bench, storage shelf
The script asks for your TomeChest.
If You have your Tomes in a chest => Target TomeChest
If you have your Tomes locked 2 Tiles near you in your house => Target yourself
Then the Script runs automatically.
It dumps your gold and doubloons into your bank deposit safe.
Restocks your recource container.
Moves unidetified items to your recycler.
It repairs your inventory and warn equippment.
Uses Shelf to clear your inventory and takes your current loadout.
V4.1 Added Doubloons
V4.2 Uses Organizer 1 now for Gold and Doubs to Bank safe
1// Script by Goapirat 09/22 v4.1
2// This is loot dump restock script that uses ideal following items when they are 2 tiles near you:
3// bank deposit safe, recource stockpile, recycler, repair bench, storage shelf
4//
5// >> Set your organizer 1 to your Bank Safe and add Gold and Doubs to it <<
6//
7// The script asks for your TomeChest.
8// If You have your Tomes in a chest => Target TomeChest
9// If you have your Tomes locked 2 Tiles near you in your house => Target yourself
10// Then the Script runs automatically.
11//
12// It dumps your gold into your bank deposit safe.
13// Restocks your recource container.
14// Moves unidetified items to your recycler.
15// It repairs your inventory and warn equippment.
16// Uses Shelf to clear your inventory and takes your current loadout.
17//
18// V4.1 Added Doubloons
19@clearsysmsg
20@setvar 'lootbag' self
21
22// Tomes Section
23// Tomes in Chest
24unsetvar 'TomeChest'
25if not find 'TomeChest' ground -1 1 2
26 overhead "Choose Tome Chest or yourself" 33
27 setvar! 'TomeChest'
28endif
29@clearignore
30@setvar 'Me' self
31if 'TomeChest' = 'Me'
32 overhead "Using Tomes on ground" 88
33else
34 dclick 'TomeChest'
35 overhead "Using Tomes in TomeChest" 88
36endif
37while @findtype 29104 "TomeChest" -1 -1 2 as 'Tome'
38 sysmsg "Loot goes to Tomes"
39 menu 'Tome' 0
40 @ignore 'Tome'
41endwhile
42@clearignore
43// Tomes on Ground
44@clearignore
45while @findtype 29104 ground -1 -1 2 as 'Tome'
46 menu 'Tome' 0
47 @ignore 'Tome'
48endwhile
49@clearignore
50
51
52// move gold to bank deposit safe
53# gold
54if @findtype '3821' backpack
55 sysmsg "Gold n Doubs goes to BankSafe"
56 organizer 1
57 waitforsysmsg "finished" 2000
58 overhead "Bank Deposit done"
59endif
60// move doubloons to bank deposit safe
61# doubs
62if @findtype '2539' backpack '2125'
63 sysmsg "Gold n Doubs go to BankSafe"
64 organizer 1
65 waitforsysmsg "finished" 2000
66 overhead "Bank Deposit done"
67endif
68
69
70#// move gold to bank deposit safe
71#while @findtype '3821' backpack as 'Gold'
72# while @findtype 'bank deposit safe' ground -1 1 2 as 'Safe'
73# sysmsg "Gold goes to BankSafe"
74# wait 650
75# lifttype '3821' 60000 backpack
76# wait 650
77# drop 'Safe'
78# wait 650
79# endwhile
80#endwhile
81#
82#// move doubloons to bank deposit safe
83#// doubloons, "muffins", '2539', Hue: 2125
84#while @findtype '2539' backpack '2125' as 'Doubs'
85# wait 650
86# while @findtype 'bank deposit safe' ground -1 1 2 as 'Safe'
87# sysmsg "Doubs goe to BankSafe"
88# wait 650
89# //lifttype name or graphic amt src hue
90# lifttype '2539' 5000 backpack 2125
91# wait 650
92# drop 'Safe'
93# wait 650
94# endwhile
95#endwhile
96
97// restock resource container
98if @findtype "resource container" ground any 1 2 as 'ResourceContainer'
99 sysmsg "Resources go to RecourceContainer"
100 menu 'ResourceContainer' 0
101 wft 2000
102 target self
103endif
104
105// dump loot from lootbag into recycler
106if @findtype "ornate elven chest" ground any 1 2 as 'Recycler'
107 sysmsg "Unidentified goes to Recycler"
108 menu 'Recycler' 1
109endif
110
111// repair your stuff at repair bench
112if @findtype "repair bench" ground any 1 2 as 'RepairBench'
113 sysmsg "Repairing..."
114 dclick 'RepairBench'
115 //pause 5000
116 waitforsysmsg "repair"
117 overhead "repaired" 82
118endif
119
120// Restock storage shelf and resupply
121if @findtype "storage shelf" ground any 1 2 as 'Shelf'
122 sysmsg "Restocking on Shelf"
123 menu 'Shelf' 0
124 wft 2000
125 target self
126 pause 500
127 gumpclose
128 menu 'Shelf' 1
129endif
130
131overhead "Script finished" 33
132stop