Back to "dump" tags

Restock Quick by AreYouKidden🐲

Description: Fully Auto Restock agent, finding and using Storage Shelves, Item Recyclers, Resource Containers, all your Tomes that are available. To configure follow the instructions at the top, you'll need to replace all container ID's, with your own container ID's that you'll need open to access additional containers inside (put them in order of nesting).

Uses RestockAgent 1 for scribe spell scrolls, and will search for satchels if you are wearing them to remove satchel, put scrolls in, and re-equip it.

1//Scroll Container & Restock Agent
2# if not 1 - change
3# Set Restock HotBag-01 below to match.
4@setvar 'RestockAgent' 1  
5@setvar 'ScrollContainer' 0x40680C8A
6
7//create list of containers to open for organizers to use
8removelist 'Containers'
9createlist 'Containers'
10pushlist 'Containers' 0x40E56A55
11pushlist 'Containers' 0x43C3870D
12pushlist 'Containers' 0x4117D4DE
13pushlist 'Containers' 0x40A46C89
14
15//create list of organizer agents
16removelist 'OrgAgents'
17createlist 'OrgAgents'
18pushlist 'OrgAgents' 6
19pushlist 'OrgAgents' 7
20pushlist 'OrgAgents' 8
21
22//create list of Tome Colors
23removelist 'TomeColors'
24createlist 'TomeColors'
25pushlist 'TomeColors' 2618
26pushlist 'TomeColors' 2963
27pushlist 'TomeColors' 2990
28pushlist 'TomeColors' 1495
29pushlist 'TomeColors' 1494
30pushlist 'TomeColors' 2085
31pushlist 'TomeColors' 2796
32pushlist 'TomeColors' 2651
33pushlist 'TomeColors' 2722
34pushlist 'TomeColors' 2799
35pushlist 'TomeColors' 2091
36
37removelist 'StorageTomes'
38createlist 'StorageTomes'
39
40if skill 'Musicianship' > 25
41    if not find 'MyInstrument' 'backpack'
42        overhead 'Choose your current instrument' 48        
43        setvar 'MyInstrument'
44        dclick 'MyInstrument'
45    endif
46endif
47
48overhead 'Finding Shelf, Container, Recycler...' 48
49if findtype '44997' ground any any 2 as SShelf
50    setvar 'Storage Shelf' SShelf
51endif    
52if findtype '23035' ground any any 2 as RContainer
53    setvar 'Resource Container' RContainer
54endif
55if findtype '11761' ground any any 2 as IRecycler
56    setvar 'Item Recycler' IRecycler
57endif
58
59if not hidden 'self'
60    skill 'Hiding'
61    pause 500
62endif
63
64overhead 'Finding Tomes on ground...' 48
65foreach x in 'TomeColors'
66    if findtype '29104' ground x any 2 as Book
67        overhead 'x'
68        pushlist 'StorageTomes' Book
69    endif   
70endfor
71
72overhead 'Finding Tomes in containers...' 48
73foreach x in 'Containers'
74    if find 'x' 'ground'
75        dclick x
76        pause 750
77        foreach y in 'TomeColors'
78        if findtype '29104' x y any 2 as STome
79                overhead 'y'
80                pushlist 'StorageTomes' STome
81            endif   
82        endfor 
83    endif
84endfor
85
86overhead 'Using Storage Tomes...' 48
87foreach x in 'StorageTomes'
88    menu x 0
89    pause 250
90endfor
91
92overhead 'Using Shelf, Container, Recyler...' 48
93if find 'Storage Shelf' 'ground' 'any' 'any' 2
94    menu 'Storage Shelf' 0
95    wft 5000
96    target 'self'
97    pause 500
98    gumpclose 'Storage Shelf'
99endif
100    
101if find 'Resource Container' 'ground' 'any' 'any' 2
102    menu 'Resource Container' 0
103    wft 5000
104    target 'self'
105    pause 500
106    gumpclose 'Resource Container'
107endif
108if find 'Item Recycler' 'ground' 'any' 'any' 2
109    dclick 'Item Recycler'
110    pause 500
111    gumpresponse 3
112    waitfortarget 5000
113    target 'self'
114    pause 500
115    gumpclose 'Item Recycler'    
116endif
117if find 'Storage Shelf' 'ground' 'any' 'any' 2
118    menu 'Storage Shelf' 1
119    pause 500
120endif
121
122overhead 'Using Organizers...' 48
123foreach x in 'OrgAgents'
124    organizer x
125    pause 100
126    while queued
127    endwhile
128endfor
129
130overhead 'Finishing UP...' 48
131if findlayer 'self' 'outerbody' as 'found' or findtype 30765 'self' as 'found'
132    overhead 'Satchel Found' 33  
133    setvar 'satchel' 'found'
134    hotkey 'Grab Item'
135    wft 200
136    target 'satchel'
137    pause 200
138endif
139
140if skill 'Inscription' > 50
141    hotkey 'Set Restock HotBag-01'
142    wft 200
143    target 'satchel'
144    pause 500
145    restock 'RestockAgent' 
146    waitfortarget 5000
147    target 'ScrollContainer'
148    pause 500
149endif
150
151if not findbuff 'Food Satisfaction'
152    overhead 'Eat some Food!!' 32
153    overhead 'Eat some Food!!' 32
154endif
155
156if skill 'Camping' > 0
157    if not findbuff 'Campfire Visit'
158        dclicktype 'kindling'
159    endif
160endif
161
162if skill 'Musicianship' > 25
163    hotkey 'Grab Item'
164    wft 200
165    target 'MyInstrument'
166endif
167
168if find 'satchel' 'self'
169    pause 1000
170    while queued
171    endwhile
172    pause 500
173    lift 'satchel'
174    pause 500
175    drop 'self' 'FirstValid'
176    pause 500
177    dclick 'satchel'
178endif