Back to "jaseowns" tags

Lazy Gardener by singsingfan

Description: For all you lazy gardeners out there who have been bugging Jaseowns for this. Here you go!

Have a water source like a fountain/water tile near you to refill your watering can.

Noticeable bugs:

If your script stops working while running, click the OKAY in your gardening gump. Its usually waiting for target and bugs out due to lag.

***IMPORTANT: Like Subscribe and Follow Jaseowns on youtube/twitch to remind him how good of a scripter I am whenever he is online.***

Functions of script are as follows:

1)find all the huge clay pots around you (only 1 type detected, cause I'm lazy and dont wanna add the whole range)

put water purifier/fertilizer/heat grill/growth serum (Only store bought ones, and I've included the player made serums. I don't do player made stuff cause I'm cheap and lazy to edit the code to include those)

2)harvest/plant seeds u have in your backpack

3)optimize soil and water

4)remove red debuffs,

5)Toil and Labour **New additional

***IMPORTANT: Like Subscribe and Follow Jaseowns on youtube/twitch to remind him how good of a scripter I am whenever he is online.***

1    #Buffs
2    gumpresponse 2 3224608375
3    wait 450
4    gumpresponse 2 3224608375
5    wait 450
6clearlist "GardeningPots"
7if not listexists "GardeningPots"
8    createlist "GardeningPots"
9endif
10
11clearignore 
12
13while findtype "planter" ground 0 0 2 as fc
14    overhead "trough Found"
15    wait 450
16    pushlist "GardeningPots" fc
17    @ignore fc
18endwhile
19
20while findtype "trough" ground 0 0 2 as fc
21    overhead "trough Found"
22    wait 450
23    pushlist "GardeningPots" fc
24    @ignore fc
25endwhile
26
27while findtype "flower pot" ground 0 0 2 as fc
28    overhead "flower pot Found"
29    wait 450
30    pushlist "GardeningPots" fc
31    @ignore fc
32endwhile
33
34overhead "Done"
35
36foreach "trough|planter|flower pot" in "GardeningPots"
37    getlabel "trough|flower pot|planter" potLabel
38    overhead potLabel
39    dclick "trough|planter|flower pot"
40    wait 350
41
42if "grown" in potLabel
43    //gardeningstuff
44    gumpresponse 2
45    wait 450
46    
47    overhead "Gardening"
48    if findtype 20502 backpack as soluGard
49        overhead "Applying Superior purified water solution"
50        gumpresponse 2 3224608375
51        wft
52        target soluGard
53        wait 450
54    elseif findtype 20501 backpack as soluGard
55        overhead "Applying purified water solution"
56        gumpresponse 2 3224608375
57        wft
58        target soluGard
59        wait 450
60    endif
61    
62    if findtype 20499 backpack as growthGard
63        overhead "Applying Superior Growth Serum"
64        gumpresponse 2 3224608375
65        wft
66        target growthGard
67        wait 450
68    elseif findtype 20498 backpack as growthGard
69        overhead "Applying Growth Serum"
70        gumpresponse 2 3224608375
71        wft
72        target growthGard
73        wait 450
74    endif
75
76    if findtype 11942 backpack as heatGard
77        overhead "Applying Superior Heat Filter"
78        gumpresponse 2 3224608375
79        wft
80        target heatGard
81        wait 450
82    elseif findtype 28741 backpack as heatGard
83        overhead "Applying Heat Filter"
84        gumpresponse 2 3224608375
85        wft
86        target heatGard
87        wait 450
88    endif
89    
90    if findtype 19403 backpack as fertilizerGard
91        overhead "Applying Superior Fertilizer"
92        gumpresponse 2 3224608375
93        wft
94        target fertilizerGard
95        wait 450
96    elseif findtype 4154 backpack as fertilizerGard
97        overhead "Applying Fertilizer"
98        gumpresponse 2 3224608375
99        wft
100        target fertilizerGard
101        wait 450
102    endif    
103
104    #Water
105    gumpresponse 4 3224608375
106    wait 450
107    gumpresponse 2 3224608375
108    wft
109    if findtype "watering can" backpack as wCan
110        target wCan
111        wait 450
112        gumpresponse 2 3929333591
113        wait 450
114        dclick wCan
115        wait 450
116    endif
117    gumpclose 3929333591
118    
119    #Soil
120    gumpresponse 5 3224608375
121    wait 450
122    gumpresponse 2 3224608375
123    wft
124    if findtype "dirt patch" backpack as dPatch
125        target dPatch
126        wait 450
127        gumpresponse 2 4024474571
128        wait 450
129    endif
130    gumpclose 4024474571
131    wait 450
132    clearsysmsg
133    gumpresponse 10 3224608375
134    wait 450
135
136    while insysmsg "Reduces"
137       overhead "Debuff Detected"
138
139        wait 450
140        gumpresponse 10 3224608375
141        wait 450
142        if insysmsg "Increases"
143            break
144            
145        elseif insysmsg "Creature Effect"
146            overhead "Creature Effect"
147            if findtype 29343 backpack as solution
148                gumpresponse 2 3224608375
149                wft
150                target solution
151                wait 450
152            endif
153        elseif insysmsg "Pestilent effect"
154            overhead "Pestilent Effect"
155            if findtype 6187 backpack as solution
156                gumpresponse 2 3224608375
157                wft
158                target solution
159                wait 450
160            endif
161        elseif insysmsg "Fungal effect"
162            overhead "Fungal Effect"
163            if findtype 6193 backpack as solution
164                gumpresponse 2 3224608375
165                wft
166                target solution
167                wait 450
168            endif
169            
170            
171        endif
172    gumpresponse 10 3224608375
173    wait 450
174    endwhile
175    
176    if insysmsg "The world will save in 15 seconds"
177        while not insysmsg "World ssave complete"
178            wait 550
179        endwhile
180    clearsysmsg 
181    endif
182    
183elseif "harvest" in potLabel
184    
185    overhead "Harvesting"
186    gumpresponse 2 3224608375
187    wait 450
188    gumpresponse 2 3224608375
189    wait 450    
190    overhead "planting"
191    #plant seeds
192    while not targetexists 
193        gumpresponse 2 3224608375
194        wait 450    
195    endwhile
196    
197       if findtype "dungeon seed" backpack as seedtype
198            target seedtype
199        elseif findtype "bag of seeds" backpack as seedtype
200            target seedtype
201        elseif findtype "seed of renewal" backpack as seedtype
202            target seedtype
203        endif
204
205    wait 450
206        #Buffs
207    overhead "Gardening"
208    if findtype 20502 backpack as soluGard
209        overhead "Applying Superior purified water solution"
210        gumpresponse 2 3224608375
211        wft
212        target soluGard
213        wait 450
214    elseif findtype 20501 backpack as soluGard
215        overhead "Applying purified water solution"
216        gumpresponse 2 3224608375
217        wft
218        target soluGard
219        wait 450
220    endif
221    
222    if findtype 20499 backpack as growthGard
223        overhead "Applying Superior Growth Serum"
224        gumpresponse 2 3224608375
225        wft
226        target growthGard
227        wait 450
228    elseif findtype 20498 backpack as growthGard
229        overhead "Applying Growth Serum"
230        gumpresponse 2 3224608375
231        wft
232        target growthGard
233        wait 450
234    endif
235
236    if findtype 11942 backpack as heatGard
237        overhead "Applying Superior Heat Filter"
238        gumpresponse 2 3224608375
239        wft
240        target heatGard
241        wait 450
242    elseif findtype 28741 backpack as heatGard
243        overhead "Applying Heat Filter"
244        gumpresponse 2 3224608375
245        wft
246        target heatGard
247        wait 450
248    endif
249    
250    if findtype 19403 backpack as fertilizerGard
251        overhead "Applying Superior Fertilizer"
252        gumpresponse 2 3224608375
253        wft
254        target fertilizerGard
255        wait 450
256    elseif findtype 4154 backpack as fertilizerGard
257        overhead "Applying Fertilizer"
258        gumpresponse 2 3224608375
259        wft
260        target fertilizerGard
261        wait 450
262    endif    
263
264    #Water
265    gumpresponse 4 3224608375
266    wait 450
267    gumpresponse 2 3224608375
268    wft
269    if findtype "watering can" backpack as wCan
270        target wCan
271        wait 450
272        gumpresponse 2 3929333591
273        wait 450
274        dclick wCan
275        wait 450
276    endif
277    gumpclose 3929333591
278    
279    #Soil
280    gumpresponse 5 3224608375
281    wait 450
282    gumpresponse 2 3224608375
283    wft
284    if findtype "dirt patch" backpack as dPatch
285        target dPatch
286        wait 450
287        gumpresponse 2 4024474571
288        wait 450
289    endif
290    gumpclose 4024474571
291    else 
292        overhead "Incorrect plant label detected"
293    wait 450
294        overhead "planting"
295    #plant seeds
296    gumpresponse 2 3224608375
297    wait 450
298    gumpresponse 2 3224608375
299    wait 450
300
301
302        if findtype "dungeon seed" backpack as seedtype
303            target seedtype
304        elseif findtype "bag of seeds" backpack as seedtype
305            target seedtype
306        elseif findtype "seed of renewal" backpack as seedtype
307            target seedtype
308        endif
309
310    wait 450
311        #Buffs
312    overhead "Gardening"
313    if findtype 20501 backpack as soluGard
314        overhead "Applying purified water solution"
315        gumpresponse 2 3224608375
316        wft
317        target soluGard
318        wait 450
319    endif
320    
321    if findtype 20499 backpack as growthGard
322        overhead "Applying Growth Serum"
323        gumpresponse 2 3224608375
324        wft
325        target growthGard
326        wait 450
327    elseif findtype 20498 backpack as growthGard
328        overhead "Applying Growth Serum"
329        gumpresponse 2 3224608375
330        wft
331        target growthGard
332        wait 450
333    endif
334
335    if findtype 28741 backpack as heatGard
336        overhead "Applying Heat Filter"
337        gumpresponse 2 3224608375
338        wft
339        target heatGard
340        wait 450
341    endif
342    
343    if findtype 4154 backpack as fertilizerGard
344        overhead "Applying Fertilizer"
345        gumpresponse 2 3224608375
346        wft
347        target fertilizerGard
348        wait 450
349    endif    
350
351    #Water
352    gumpresponse 4 3224608375
353    wait 450
354    gumpresponse 2 3224608375
355    wft
356    if findtype "watering can" backpack as wCan
357        target wCan
358        wait 450
359        gumpresponse 2 3929333591
360        wait 450
361        dclick wCan
362        wait 450
363    endif
364    gumpclose 3929333591
365    
366    #Soil
367    gumpresponse 5 3224608375
368    wait 450
369    gumpresponse 2 3224608375
370    wft
371    if findtype "dirt patch" backpack as dPatch
372        target dPatch
373        wait 450
374        gumpresponse 2 4024474571
375        wait 450
376    endif
377
378clearsysmsg
379gumpresponse 10 3224608375
380wait 450
381
382while insysmsg "Reduces"
383   overhead "Debuff Detected"
384
385    wait 450
386    gumpresponse 10 3224608375
387    wait 450
388    if insysmsg "Increases"
389        break
390        
391    elseif insysmsg "Creature Effect"
392        overhead "Creature Effect"
393        if findtype 29343 backpack as solution
394            gumpresponse 2 3224608375
395            wft
396            target solution
397            wait 450
398        endif
399    elseif insysmsg "Pestilent effect"
400        overhead "Pestilent Effect"
401        if findtype 6187 backpack as solution
402            gumpresponse 2 3224608375
403            wft
404            target solution
405            wait 450
406        endif
407    elseif insysmsg "Fungal effect"
408        overhead "Fungal Effect"
409        if findtype 6193 backpack as solution
410            gumpresponse 2 3224608375
411            wft
412            target solution
413            wait 450
414        endif
415        
416    endif
417gumpresponse 10 3224608375
418wait 450
419endwhile
420    
421endif
422
423#Labor and Toil
424if findtype "spade" backpack as toolGard
425    gumpresponse 2 3224608375
426    wft
427    target toolGard
428    wait 450
429    gumpresponse 6 1429840072
430    wait 450
431endif
432    if insysmsg "The world will save in 15 seconds"
433        while not insysmsg "World save complete"
434            wait 550
435        endwhile
436    clearsysmsg 
437    endif
438endfor