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.***
#Buffs gumpresponse 2 3224608375 wait 450 gumpresponse 2 3224608375 wait 450 clearlist "GardeningPots" if not listexists "GardeningPots" createlist "GardeningPots" endif clearignore while findtype "planter" ground 0 0 2 as fc overhead "trough Found" wait 450 pushlist "GardeningPots" fc @ignore fc endwhile while findtype "trough" ground 0 0 2 as fc overhead "trough Found" wait 450 pushlist "GardeningPots" fc @ignore fc endwhile while findtype "flower pot" ground 0 0 2 as fc overhead "flower pot Found" wait 450 pushlist "GardeningPots" fc @ignore fc endwhile overhead "Done" foreach "trough|planter|flower pot" in "GardeningPots" getlabel "trough|flower pot|planter" potLabel overhead potLabel dclick "trough|planter|flower pot" wait 350 if "grown" in potLabel //gardeningstuff gumpresponse 2 wait 450 overhead "Gardening" if findtype 20502 backpack as soluGard overhead "Applying Superior purified water solution" gumpresponse 2 3224608375 wft target soluGard wait 450 elseif findtype 20501 backpack as soluGard overhead "Applying purified water solution" gumpresponse 2 3224608375 wft target soluGard wait 450 endif if findtype 20499 backpack as growthGard overhead "Applying Superior Growth Serum" gumpresponse 2 3224608375 wft target growthGard wait 450 elseif findtype 20498 backpack as growthGard overhead "Applying Growth Serum" gumpresponse 2 3224608375 wft target growthGard wait 450 endif if findtype 11942 backpack as heatGard overhead "Applying Superior Heat Filter" gumpresponse 2 3224608375 wft target heatGard wait 450 elseif findtype 28741 backpack as heatGard overhead "Applying Heat Filter" gumpresponse 2 3224608375 wft target heatGard wait 450 endif if findtype 19403 backpack as fertilizerGard overhead "Applying Superior Fertilizer" gumpresponse 2 3224608375 wft target fertilizerGard wait 450 elseif findtype 4154 backpack as fertilizerGard overhead "Applying Fertilizer" gumpresponse 2 3224608375 wft target fertilizerGard wait 450 endif #Water gumpresponse 4 3224608375 wait 450 gumpresponse 2 3224608375 wft if findtype "watering can" backpack as wCan target wCan wait 450 gumpresponse 2 3929333591 wait 450 dclick wCan wait 450 endif gumpclose 3929333591 #Soil gumpresponse 5 3224608375 wait 450 gumpresponse 2 3224608375 wft if findtype "dirt patch" backpack as dPatch target dPatch wait 450 gumpresponse 2 4024474571 wait 450 endif gumpclose 4024474571 wait 450 clearsysmsg gumpresponse 10 3224608375 wait 450 while insysmsg "Reduces" overhead "Debuff Detected" wait 450 gumpresponse 10 3224608375 wait 450 if insysmsg "Increases" break elseif insysmsg "Creature Effect" overhead "Creature Effect" if findtype 29343 backpack as solution gumpresponse 2 3224608375 wft target solution wait 450 endif elseif insysmsg "Pestilent effect" overhead "Pestilent Effect" if findtype 6187 backpack as solution gumpresponse 2 3224608375 wft target solution wait 450 endif elseif insysmsg "Fungal effect" overhead "Fungal Effect" if findtype 6193 backpack as solution gumpresponse 2 3224608375 wft target solution wait 450 endif endif gumpresponse 10 3224608375 wait 450 endwhile if insysmsg "The world will save in 15 seconds" while not insysmsg "World ssave complete" wait 550 endwhile clearsysmsg endif elseif "harvest" in potLabel overhead "Harvesting" gumpresponse 2 3224608375 wait 450 gumpresponse 2 3224608375 wait 450 overhead "planting" #plant seeds while not targetexists gumpresponse 2 3224608375 wait 450 endwhile if findtype "dungeon seed" backpack as seedtype target seedtype elseif findtype "bag of seeds" backpack as seedtype target seedtype elseif findtype "seed of renewal" backpack as seedtype target seedtype endif wait 450 #Buffs overhead "Gardening" if findtype 20502 backpack as soluGard overhead "Applying Superior purified water solution" gumpresponse 2 3224608375 wft target soluGard wait 450 elseif findtype 20501 backpack as soluGard overhead "Applying purified water solution" gumpresponse 2 3224608375 wft target soluGard wait 450 endif if findtype 20499 backpack as growthGard overhead "Applying Superior Growth Serum" gumpresponse 2 3224608375 wft target growthGard wait 450 elseif findtype 20498 backpack as growthGard overhead "Applying Growth Serum" gumpresponse 2 3224608375 wft target growthGard wait 450 endif if findtype 11942 backpack as heatGard overhead "Applying Superior Heat Filter" gumpresponse 2 3224608375 wft target heatGard wait 450 elseif findtype 28741 backpack as heatGard overhead "Applying Heat Filter" gumpresponse 2 3224608375 wft target heatGard wait 450 endif if findtype 19403 backpack as fertilizerGard overhead "Applying Superior Fertilizer" gumpresponse 2 3224608375 wft target fertilizerGard wait 450 elseif findtype 4154 backpack as fertilizerGard overhead "Applying Fertilizer" gumpresponse 2 3224608375 wft target fertilizerGard wait 450 endif #Water gumpresponse 4 3224608375 wait 450 gumpresponse 2 3224608375 wft if findtype "watering can" backpack as wCan target wCan wait 450 gumpresponse 2 3929333591 wait 450 dclick wCan wait 450 endif gumpclose 3929333591 #Soil gumpresponse 5 3224608375 wait 450 gumpresponse 2 3224608375 wft if findtype "dirt patch" backpack as dPatch target dPatch wait 450 gumpresponse 2 4024474571 wait 450 endif gumpclose 4024474571 else overhead "Incorrect plant label detected" wait 450 overhead "planting" #plant seeds gumpresponse 2 3224608375 wait 450 gumpresponse 2 3224608375 wait 450 if findtype "dungeon seed" backpack as seedtype target seedtype elseif findtype "bag of seeds" backpack as seedtype target seedtype elseif findtype "seed of renewal" backpack as seedtype target seedtype endif wait 450 #Buffs overhead "Gardening" if findtype 20501 backpack as soluGard overhead "Applying purified water solution" gumpresponse 2 3224608375 wft target soluGard wait 450 endif if findtype 20499 backpack as growthGard overhead "Applying Growth Serum" gumpresponse 2 3224608375 wft target growthGard wait 450 elseif findtype 20498 backpack as growthGard overhead "Applying Growth Serum" gumpresponse 2 3224608375 wft target growthGard wait 450 endif if findtype 28741 backpack as heatGard overhead "Applying Heat Filter" gumpresponse 2 3224608375 wft target heatGard wait 450 endif if findtype 4154 backpack as fertilizerGard overhead "Applying Fertilizer" gumpresponse 2 3224608375 wft target fertilizerGard wait 450 endif #Water gumpresponse 4 3224608375 wait 450 gumpresponse 2 3224608375 wft if findtype "watering can" backpack as wCan target wCan wait 450 gumpresponse 2 3929333591 wait 450 dclick wCan wait 450 endif gumpclose 3929333591 #Soil gumpresponse 5 3224608375 wait 450 gumpresponse 2 3224608375 wft if findtype "dirt patch" backpack as dPatch target dPatch wait 450 gumpresponse 2 4024474571 wait 450 endif clearsysmsg gumpresponse 10 3224608375 wait 450 while insysmsg "Reduces" overhead "Debuff Detected" wait 450 gumpresponse 10 3224608375 wait 450 if insysmsg "Increases" break elseif insysmsg "Creature Effect" overhead "Creature Effect" if findtype 29343 backpack as solution gumpresponse 2 3224608375 wft target solution wait 450 endif elseif insysmsg "Pestilent effect" overhead "Pestilent Effect" if findtype 6187 backpack as solution gumpresponse 2 3224608375 wft target solution wait 450 endif elseif insysmsg "Fungal effect" overhead "Fungal Effect" if findtype 6193 backpack as solution gumpresponse 2 3224608375 wft target solution wait 450 endif endif gumpresponse 10 3224608375 wait 450 endwhile endif #Labor and Toil if findtype "spade" backpack as toolGard gumpresponse 2 3224608375 wft target toolGard wait 450 gumpresponse 6 1429840072 wait 450 endif if insysmsg "The world will save in 15 seconds" while not insysmsg "World save complete" wait 550 endwhile clearsysmsg endif endfor