Back to "mushrooms" tags

Garden-Bro V3 by nev0r

////////////////////////////// // // Gardening-Bot for UO Outlands, Version 3 // - Automatically processes all flower pots within the range specified below (default 2 tiles) // - This script will work without any change. There is an optional setup section below where you can find and adjust some parameters according to your own preferences // - Make sure to carry all items you want to be used in your backpack, the ground will not be checked for items (except for flower pots and water tiles) // - WARNING: server system messages are needed to determine necessary actions, make sure they are not filtered for scripts: // Razor -> Filters -> Text&Messages -> // - Uncheck "Filter repeating system messages" // - "Enable text filter" and "Filter system messages" (list entry sub-menu) can be checked, however "Ignore filtered messages in overhead and scripts" (list entry sub-menu) has to be unchecked // ////////////////////////////// ############################## ######## MANUAL SETUP ######## ############################## # gardeningRange: 1 - 18 # Amout of tiles around character that will be searched for flower pots. If there are no unprocessed flower pots left within this range the script will terminate. # Note: to actually work the flower pot you need to be in a range of 2 tiles, maximal visual range is 18 tiles setvar! gardeningRange 2 # gardeningSmartMode: defines how you want to use fungicides/farmer almanacs (if you do not want to use them at all do not put them into your backpack) # 0 ... Kill all negativ effects without considering collateral damage to (potentially stronger) positive effects (faster, uses more resources) # 1 ... Kill negativ effects only if they outweigh positive effects, avoid unneccessary collateral damage (slower, uses less resources) # Note: fungicides and farmer almanacs remove buffs and debuffs in a random fashion. With gardeningSmartMode set to 1 the script is going to ignore fungal and creature debuffs as long as there are stronger corresponding buffs in place setvar! gardeningSmartMode 0 # gardeningIgnoreHeatLevel: are we going to care about heat level? # 0 ... Identify optimal heat level, and remove black mushrooms (reducing optimal heat level bonus) if necessary (applies only when gardeningSmartMode is set to 1, since with gardeningSmartMode 0 all mushrooms will always be removed anyway) # 1 ... Let us not care about heat level, ignore black mushrooms (reducing optimal heat level bonus) in case gardeningSmartMode is set to 1 setvar! gardeningIgnoreHeatLevel 0 # gardeningIgnoreBrainFungus: are we going to remove brain fungi, or should we ignore them? # 0 ... Remove, and continue to keep the pot clean # 1 ... Ignore brain fungus and all other debuffs as long as the brain is active # 2 ... Ignore, leave all other debuffs, and do not apply buff items to this pot as long as the brain is active setvar! gardeningIgnoreBrainFungus 0 # gardeningSelectiveBuffs: apply buffs (growth serum/heat filter/fertilizer/purified water) only to certain planter types # 0 ... disabled (= best available buff items from your backpack are going to be applied to all planters without distinction) # 1 ... buff listed planters with superior, exceptional and basic items, do not buff any planter not listed below # 2 ... buff listed planters with superior and exceptional, and all others with basic items # Note: Do not forget to adjust the list items (see below) if you turn this functionality on, no further changes necessary if set to 0 setvar! gardeningSelectiveBuffs 0 # gardeningSelectiveBuffList: changes to the list items are only necessary if you set gardeningSelectiveBuffs to 1 or 2 # Do not change the next two lines createlist gardeningSelectiveBuffList clearlist gardeningSelectiveBuffList # Comment out planter types you do not want superior and exceptional materials to be used on (select line/s -> right click -> comment, or put a # at the beginning of the line): # Note: rustic planters and rustic window planters work as large wooden planters and are treated as such pushlist gardeningSelectiveBuffList "large wooden planter" pushlist gardeningSelectiveBuffList "small wooden planter" pushlist gardeningSelectiveBuffList "huge steel plant bowl" pushlist gardeningSelectiveBuffList "large steel plant bowl" pushlist gardeningSelectiveBuffList "average steel plant bowl" pushlist gardeningSelectiveBuffList "small steel plant bowl" pushlist gardeningSelectiveBuffList "tiny steel plant bowl" pushlist gardeningSelectiveBuffList "huge clay plant bowl" pushlist gardeningSelectiveBuffList "large clay plant bowl" pushlist gardeningSelectiveBuffList "average clay plant bowl" pushlist gardeningSelectiveBuffList "small clay plant bowl" pushlist gardeningSelectiveBuffList "tiny clay plant bowl" # gardeningAutoPlantNewSeed: defines the way new seeds are applied to empty flower pots # 0 ... disabled (manually plant seeds) # 1 ... plant all seed types to all flower pot types (higher rarity seeds first) # 2 ... plant higher rarity seeds exclusively to listed flower pots, leave pot empty if we do not have a high rarity seed # 3 ... plant higher rarity seeds exclusively to listed flower pots, also plant low rarity seeds if we do not have a high rarity seed # Note: If you want to use option 2 or 3 you also need to adjust the list items below to let the script know which pot and seed types you want to be handled as rare setvar! gardeningAutoPlantNewSeed 0 # Do not change the next four lines createlist gardeningSpecialSeedList createlist gardeningSpecialPlanterList clearlist gardeningSpecialSeedList clearlist gardeningSpecialPlanterList # gardeningSpecialSeedList: changes to the list items are only necessary if you set gardeningAutoPlantNewSeed to 2 or 3 # Comment out seed types you do not want to be handled as rare (select line/s -> right click -> comment, or put a # at the beginning of the line): pushlist gardeningSpecialSeedList "dungeon seed" pushlist gardeningSpecialSeedList "mushroom spore" pushlist gardeningSpecialSeedList "watermelon seeds" pushlist gardeningSpecialSeedList "melloweed seed" pushlist gardeningSpecialSeedList "barley seed" pushlist gardeningSpecialSeedList "hops seed" pushlist gardeningSpecialSeedList "extremely rare seed" pushlist gardeningSpecialSeedList "very rare seed" pushlist gardeningSpecialSeedList "rare seed" pushlist gardeningSpecialSeedList "uncommon seed" pushlist gardeningSpecialSeedList "common seed" pushlist gardeningSpecialSeedList "very common seed" pushlist gardeningSpecialSeedList "extremely common seed" # gardeningSpecialPlanterList: changes to the list items are only necessary if you set gardeningAutoPlantNewSeed to 2 or 3 # Comment out planter types you do not want to be handled as high quality (select line/s -> right click -> comment, or put a # at the beginning of the line): # Note: rustic planters and rustic window planters work as large wooden planters and are treated as such pushlist gardeningSpecialPlanterList "large wooden planter" pushlist gardeningSpecialPlanterList "small wooden planter" pushlist gardeningSpecialPlanterList "huge steel plant bowl" pushlist gardeningSpecialPlanterList "large steel plant bowl" pushlist gardeningSpecialPlanterList "average steel plant bowl" pushlist gardeningSpecialPlanterList "small steel plant bowl" pushlist gardeningSpecialPlanterList "tiny steel plant bowl" pushlist gardeningSpecialPlanterList "huge clay plant bowl" pushlist gardeningSpecialPlanterList "large clay plant bowl" pushlist gardeningSpecialPlanterList "average clay plant bowl" pushlist gardeningSpecialPlanterList "small clay plant bowl" pushlist gardeningSpecialPlanterList "tiny clay plant bowl" # gardeningDebugMode: 0 ... Off, 1 ... Low details, 2 ... High details # Display additional status information in our journal for easier debugging setvar! gardeningDebugMode 0 ############################## ###### END MANUAL SETUP ###### ############################## ////////////////////////////// // // Changelog // - Update 16-Nov-2023: Added option to apply superior and exceptional buffs to specific planter types // - Update 20-Nov-2023: Added option to apply new seeds to specific planter types // - Update 25-Nov-2023: Added watermelon seeds (event item) // - Update 30-Nov-2023: Added brewing seeds, fixed a plant too far away bug when using gumpclose on an old preexistent gump // - Update 19-Dec-2023: Added ground item overhead support // - Update 09-Mar-2024: Runspeed optimization - changed fixed wait times to dynamic ping checks via getlabel command (many thanks to Jaseowns for sharing the idea) // - Update 28-Apr-2024: Added option to ignore brain fungi infested pots // - Update 29-May-2024: Added short wait periods between actions to fix issues mainly related to object delay (making the script run slower but more stable for people with low ping) // - Update 05-Jul-2024: Addes rustic planters and rustic window planters // - Update 02-Nov-2024: Fixed a bug planting rare seeds to low quality planters when gardeningAutoPlantNewSeed set to 3 // ////////////////////////////// if gardeningDebugMode > 0 settimer gardeningRunTimer 0 endif @clearignore setvar! gardeningMinWaitForServerResponse 200 setvar! gardeningMaxWaitForServerResponse 1000 setvar! gardeningWaitForObjectDelay 600 while findtype 6341|56413|56415|56408|56410|28987|6338|6335|6337|6333|6334|6330|6328|4551|6327|4550 ground -1 -1 gardeningRange if not timerexists gardeningOverheadTimer overhead "|* Gardening *|" settimer gardeningOverheadTimer 4000 elseif timer gardeningOverheadTimer > 4000 overhead "|* Searching flower pot *|" settimer gardeningOverheadTimer 0 endif //World save if insysmsg "world is saving" sysmsg "Waiting for world save ..." settimer globalWorldSaveTimer 0 while timer globalWorldSaveTimer < 10000 if insysmsg "save complete" sysmsg "The world has been saved!" settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile break endif endwhile endif if targetexists target cancel endif //Refill water containers in proximity if we are next to a water tile if findtype "water" ground -1 -1 2 while findtype "water" ground -1 -1 2 and findtype 3703|3707|3715|4090|5344|5453 ground -1 -1 2 as myWaterContainer dclick myWaterContainer if gardeningDebugMode > 0 sysmsg "[Gardening] Trying to refill water containers (Timer: {{gardeningRunTimer}} ms)" 100 endif wait gardeningWaitForObjectDelay @ignore myWaterContainer endwhile while findtype "water" ground -1 -1 2 and findtype 3703|3707|3715|4090|5344|5453 backpack as myWaterContainer dclick myWaterContainer if gardeningDebugMode > 0 sysmsg "[Gardening] Trying to refill water containers (Timer: {{gardeningRunTimer}} ms)" 100 endif wait gardeningWaitForObjectDelay @ignore myWaterContainer endwhile endif clearsysmsg if findtype 6341|56413|56415|56408|56410|28987|6338|6335|6337|6333|6334|6330|6328|4551|6327|4550 ground -1 -1 2 as myFlowerPot overhead "|* New pot found *|" overhead "Active" 55 myFlowerPot overhead " ▼ " 55 myFlowerPot if gumpexists 3224608375 gumpclose 3224608375 settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile if insysmsg "That plant bowl is too far away." endif endif if gardeningDebugMode > 0 settimer gardeningRunTimer 0 endif getlabel myFlowerPot myFlowerPotLabel settimer gardeningMinWaitTimer 0 while timer gardeningMinWaitTimer < gardeningWaitForObjectDelay dclick myFlowerPot waitforgump 3224608375 gardeningMaxWaitForServerResponse while timer gardeningMinWaitTimer < gardeningWaitForObjectDelay if insysmsg "You must wait to perform another action." wait gardeningMinWaitForServerResponse settimer gardeningMinWaitTimer 0 break endif endwhile endwhile if gardeningDebugMode > 0 sysmsg "[Gardening] Active flower pot: {{myFlowerPot}}, {{myFlowerPotLabel}}" 100 endif //Harvest plant if growing done if "ready for harvest" in myFlowerPotLabel and gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." gumpresponse 2 3224608375 if gardeningDebugMode > 0 sysmsg "[Gardening] Harvesting flower (Timer: {{gardeningRunTimer}} ms)" 100 endif settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif //Check if we need to plant a seed if "% grown" in myFlowerPotLabel and gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." //Seed already planted elseif gardeningAutoPlantNewSeed > 0 and gumpexists 3224608375 and findtype 51078|51098|58196|55139|53611|54062|22326 backpack and not insysmsg! "That plant bowl is too far away." if gardeningDebugMode > 0 sysmsg "[Gardening] Trying to plant new seed (gardeningAutoPlantNewSeed: {{gardeningAutoPlantNewSeed}}, Timer: {{gardeningRunTimer}} ms)" 100 endif if gardeningAutoPlantNewSeed = 2 or gardeningAutoPlantNewSeed = 3 //plant high tier seeds to high tier planter if listexists gardeningSpecialSeedList and listexists gardeningSpecialPlanterList if "large wooden planter" in myFlowerPotLabel or "rustic planter" in myFlowerPotLabel or "rustic window planter" in myFlowerPotLabel if inlist gardeningSpecialPlanterList "large wooden planter" setvar! gardeningSpecialPlanter 1 endif elseif "small wooden planter" in myFlowerPotLabel and inlist gardeningSpecialPlanterList "small wooden planter" setvar! gardeningSpecialPlanter 1 elseif "huge steel plant bowl" in myFlowerPotLabel and inlist gardeningSpecialPlanterList "huge steel plant bowl" setvar! gardeningSpecialPlanter 1 elseif "large steel plant bowl" in myFlowerPotLabel and inlist gardeningSpecialPlanterList "large steel plant bowl" setvar! gardeningSpecialPlanter 1 elseif "average steel plant bowl" in myFlowerPotLabel and inlist gardeningSpecialPlanterList "average steel plant bowl" setvar! gardeningSpecialPlanter 1 elseif "small steel plant bowl" in myFlowerPotLabel and inlist gardeningSpecialPlanterList "small steel plant bowl" setvar! gardeningSpecialPlanter 1 elseif "tiny steel plant bowl" in myFlowerPotLabel and inlist gardeningSpecialPlanterList "tiny steel plant bowl" setvar! gardeningSpecialPlanter 1 elseif "huge clay plant bowl" in myFlowerPotLabel and inlist gardeningSpecialPlanterList "huge clay plant bowl" setvar! gardeningSpecialPlanter 1 elseif "large clay plant bowl" in myFlowerPotLabel and inlist gardeningSpecialPlanterList "large clay plant bowl" setvar! gardeningSpecialPlanter 1 elseif "average clay plant bowl" in myFlowerPotLabel and inlist gardeningSpecialPlanterList "average clay plant bowl" setvar! gardeningSpecialPlanter 1 elseif "small clay plant bowl" in myFlowerPotLabel and inlist gardeningSpecialPlanterList "small clay plant bowl" setvar! gardeningSpecialPlanter 1 elseif "tiny clay plant bowl" in myFlowerPotLabel and inlist gardeningSpecialPlanterList "tiny clay plant bowl" setvar! gardeningSpecialPlanter 1 else setvar! gardeningSpecialPlanter 0 endif if gardeningSpecialPlanter = 1 if inlist gardeningSpecialSeedList "dungeon seed" and findtype 51098 backpack as myNewSeed //Plant dungeon seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif inlist gardeningSpecialSeedList "mushroom spore" and findtype 58196|55139|53611 backpack as myNewSeed //Plant mushroom spore event item gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif inlist gardeningSpecialSeedList "watermelon seeds" and findtype 54062 backpack as myNewSeed //Plant watermelon seeds event item gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif inlist gardeningSpecialSeedList "melloweed seed" and findtype 51078 backpack 0 as myNewSeed //Plant melloweed seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif inlist gardeningSpecialSeedList "barley seed" and findtype 51078 backpack 2418 as myNewSeed //Plant barley seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif inlist gardeningSpecialSeedList "hops seed" and findtype 51078 backpack 2208 as myNewSeed //Plant hops seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif inlist gardeningSpecialSeedList "extremely rare seed" and findtype 22326 backpack 2465 as myNewSeed //Plant extremely rare seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif inlist gardeningSpecialSeedList "very rare seed" and findtype 22326 backpack 2661 as myNewSeed //Plant very rare seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif inlist gardeningSpecialSeedList "rare seed" and findtype 22326 backpack 1266 as myNewSeed //Plant rare seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif inlist gardeningSpecialSeedList "uncommon seed" and findtype 22326 backpack 63 as myNewSeed //Plant uncommon seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif inlist gardeningSpecialSeedList "common seed" and findtype 22326 backpack 2451 as myNewSeed //Plant common seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif inlist gardeningSpecialSeedList "very common seed" and findtype 22326 backpack 2882 as myNewSeed //Plant very common seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif inlist gardeningSpecialSeedList "extremely common seed" and findtype 22326 backpack 2401 as myNewSeed //Plant extremely common seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif if insysmsg! "You plant a seed." if gardeningDebugMode > 1 sysmsg "[Gardening] Special seed planted to listed pot (gardeningAutoPlantNewSeed: {{gardeningAutoPlantNewSeed}}, Timer: {{gardeningRunTimer}} ms)" 100 endif endif else //low tier planter, plant low tier seed if not inlist gardeningSpecialSeedList "dungeon seed" and findtype 51098 backpack as myNewSeed //Plant dungeon seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif not inlist gardeningSpecialSeedList "mushroom spore" and findtype 58196|55139|53611 backpack as myNewSeed //Plant mushroom spore gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif not inlist gardeningSpecialSeedList "watermelon seeds" and findtype 54062 backpack as myNewSeed //Plant watermelon seeds event item gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif not inlist gardeningSpecialSeedList "melloweed seed" and findtype 51078 backpack 0 as myNewSeed //Plant melloweed seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif not inlist gardeningSpecialSeedList "barley seed" and findtype 51078 backpack 2418 as myNewSeed //Plant barley seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif not inlist gardeningSpecialSeedList "hops seed" and findtype 51078 backpack 2208 as myNewSeed //Plant hops seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif not inlist gardeningSpecialSeedList "extremely rare seed" and findtype 22326 backpack 2465 as myNewSeed //Plant extremely rare seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif not inlist gardeningSpecialSeedList "very rare seed" and findtype 22326 backpack 2661 as myNewSeed //Plant very rare seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif not inlist gardeningSpecialSeedList "rare seed" and findtype 22326 backpack 1266 as myNewSeed //Plant rare seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif not inlist gardeningSpecialSeedList "uncommon seed" and findtype 22326 backpack 63 as myNewSeed //Plant uncommon seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif not inlist gardeningSpecialSeedList "common seed" and findtype 22326 backpack 2451 as myNewSeed //Plant common seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif not inlist gardeningSpecialSeedList "very common seed" and findtype 22326 backpack 2882 as myNewSeed //Plant very common seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif not inlist gardeningSpecialSeedList "extremely common seed" and findtype 22326 backpack 2401 as myNewSeed //Plant extremely common seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif if gardeningDebugMode > 1 and insysmsg! "You plant a seed." sysmsg "[Gardening] Non listed seed planted to non listed planter (gardeningAutoPlantNewSeed: {{gardeningAutoPlantNewSeed}}, Timer: {{gardeningRunTimer}} ms)" 100 endif endif else setvar! gardeningSpecialPlanter 0 endif endif if insysmsg! "You plant a seed." elseif gardeningAutoPlantNewSeed = 3 and gardeningSpecialPlanter = 1 or gardeningAutoPlantNewSeed = 1 //plant all types of seeds if findtype 51098 backpack as myNewSeed //Plant dungeon seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif findtype 58196|55139|53611 backpack as myNewSeed //Plant mushroom spore gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif findtype 54062 backpack as myNewSeed //Plant watermelon seeds event item gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif findtype 51078 backpack 0 as myNewSeed //Plant melloweed seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif findtype 51078 backpack 2418 as myNewSeed //Plant barley seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif findtype 51078 backpack 2208 as myNewSeed //Plant hops seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif findtype 22326 backpack 2465 as myNewSeed //Plant extremely rare seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif findtype 22326 backpack 2661 as myNewSeed //Plant very rare seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif findtype 22326 backpack 1266 as myNewSeed //Plant rare seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif findtype 22326 backpack 63 as myNewSeed //Plant uncommon seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif findtype 22326 backpack 2451 as myNewSeed //Plant common seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif findtype 22326 backpack 2882 as myNewSeed //Plant very common seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif findtype 22326 backpack 2401 as myNewSeed //Plant extremely common seed gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewSeed settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif if gardeningDebugMode > 1 and insysmsg! "You plant a seed." if gardeningAutoPlantNewSeed = 1 sysmsg "[Gardening] Seed planted (gardeningAutoPlantNewSeed: {{gardeningAutoPlantNewSeed}}, Timer: {{gardeningRunTimer}} ms)" 100 elseif gardeningAutoPlantNewSeed = 3 sysmsg "[Gardening] Non listed seed planted to listed planter (gardeningAutoPlantNewSeed: {{gardeningAutoPlantNewSeed}}, Timer: {{gardeningRunTimer}} ms)" 100 endif endif endif endif if "% grown" in myFlowerPotLabel or insysmsg "You plant a seed." if gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." //Add water and soil if findtype 25570|56416|56417 backpack setvar! gardeningWaterDone 0 else setvar! gardeningWaterDone 1 if gardeningDebugMode > 1 sysmsg "[Gardening] No watering can found (Timer: {{gardeningRunTimer}} ms)" 100 endif endif if findtype 2323 backpack setvar! gardeningSoilDone 0 else setvar! gardeningSoilDone 1 if gardeningDebugMode > 1 sysmsg "[Gardening] No soil found (Timer: {{gardeningRunTimer}} ms)" 100 endif endif //Heat if gardeningIgnoreHeatLevel = 0 and findtype 29868 backpack and gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." gumpresponse 3 3224608375 waitforgump 3224608375 gardeningMaxWaitForServerResponse endif while gardeningWaterDone != 1 or gardeningSoilDone != 1 if gardeningDebugMode > 0 sysmsg "[Gardening] Optimizing Soil&Water (Loop-Index: {{index}}, WaterDone: {{gardeningWaterDone}}, SoilDone: {{gardeningSoilDone}}, Timer: {{gardeningRunTimer}} ms)" 100 endif //World save if insysmsg "world is saving" sysmsg "Waiting for world save ..." settimer globalWorldSaveTimer 0 while timer globalWorldSaveTimer < 10000 if insysmsg "save complete" sysmsg "The world has been saved!" settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile break endif endwhile endif if targetexists target cancel endif //Water if gumpexists 3224608375 and gardeningWaterDone != 1 and findtype 25570|56416|56417 backpack as myWateringCan getlabel myWateringCan myWateringCanLabel if "250/250" in myWateringCanLabel else //Try a refill dclick myWateringCan wait gardeningWaitForObjectDelay endif //Fill to optimal if not gumpexists 3929333591 gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myWateringCan waitforgump 3929333591 gardeningMaxWaitForServerResponse endif gumpresponse 2 3929333591 waitforgump 3929333591 gardeningMaxWaitForServerResponse gumpclose 3929333591 endif //Soil if gumpexists 3224608375 and gardeningSoilDone != 1 and findtype 2323 backpack as myPlantSoil //Fill to optimal if not gumpexists 4024474571 gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myPlantSoil waitforgump 4024474571 gardeningMaxWaitForServerResponse endif gumpresponse 2 4024474571 waitforgump 4024474571 gardeningMaxWaitForServerResponse gumpclose 4024474571 endif if gumpexists 3224608375 settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile if insysmsg! "That is not a plant seed." if gardeningDebugMode > 1 sysmsg "[Gardening] Soil&Water ... no seed planted fail (Timer: {{gardeningRunTimer}} ms)" 100 endif break elseif insysmsg! "That plant bowl is too far away." if gardeningDebugMode > 1 sysmsg "[Gardening] Soil&Water ... out of range fail (Timer: {{gardeningRunTimer}} ms)" 100 endif break endif if insysmsg "You have not yet estimated this plant's ideal water needs." if gardeningDebugMode > 1 sysmsg "[Gardening] Soil&Water ... Taste ID water needed (Timer: {{gardeningRunTimer}} ms)" 100 endif if findtype 29868 backpack //Identify needed water amount, Planters Spade: 29868 gumpresponse 4 3224608375 waitforgump 3224608375 gardeningMaxWaitForServerResponse else overhead "|* No spade found *|" 33 setvar! gardeningWaterDone 1 endif elseif insysmsg "You add the ideal amount of water to the plant." or insysmsg "You have already met this plant's ideal water needs." or insysmsg "You have already added more water than this plant's ideal needs." if gardeningDebugMode > 1 sysmsg "[Gardening] Soil&Water ... water optimized (Timer: {{gardeningRunTimer}} ms)" 100 endif setvar! gardeningWaterDone 1 elseif insysmsg "You add some water to the plant (unable to meet ideal amount needed).." if gardeningDebugMode > 1 sysmsg "[Gardening] Soil&Water ... water missing (Timer: {{gardeningRunTimer}} ms)" 100 endif overhead "|* Not enough water *|" 33 overhead "Need water" 33 myFlowerPot overhead " ▼ " 33 myFlowerPot setvar! gardeningWaterDone 1 endif if insysmsg "You have not yet estimated this plant's ideal soil needs." if gardeningDebugMode > 1 sysmsg "[Gardening] Soil&Water ... Taste ID soil needed (Timer: {{gardeningRunTimer}} ms)" 100 endif if findtype 29868 backpack //Identify needed soil amount, Planters Spade: 29868 gumpresponse 5 3224608375 waitforgump 3224608375 gardeningMaxWaitForServerResponse else overhead "|* No spade found *|" 33 setvar! gardeningSoilDone 1 endif elseif insysmsg "You add the ideal amount of soil to the plant." or insysmsg "You have already met this plant's ideal soil needs." or insysmsg "You have already added more soil than this plant's ideal needs." if gardeningDebugMode > 1 sysmsg "[Gardening] Soil&Water ... soil optimized (Timer: {{gardeningRunTimer}} ms)" 100 endif setvar! gardeningSoilDone 1 elseif insysmsg "You add some soil to the plant (unable to meet ideal amount needed).." if gardeningDebugMode > 1 sysmsg "[Gardening] Soil&Water ... soil missing (Timer: {{gardeningRunTimer}} ms)" 100 endif overhead "|* Not enough soil *|" 33 overhead "Need soil" 33 myFlowerPot overhead " ▼ " 33 myFlowerPot setvar! gardeningSoilDone 1 endif else if gardeningDebugMode > 1 sysmsg "[Gardening] Soil&Water ... plant gump not found break (Timer: {{gardeningRunTimer}} ms)" 100 endif break endif endwhile //Work buffs and debuffs if findtype 6187|6193|29343|20500|20499|20498|28719|11942|28741|29217|19403|4154|20503|20502|20501 backpack and not insysmsg! "That is not a plant seed." and not insysmsg! "That plant bowl is too far away." //Remove debuffs if gardeningSmartMode = 1 //Kill negativ effects if stronger than positive effects if gardeningDebugMode > 0 sysmsg "[Gardening] Removing debuffs - smart mode (Timer: {{gardeningRunTimer}} ms)" 100 endif while not insysmsg! "That plant bowl is too far away." //World save if insysmsg "world is saving" sysmsg "Waiting for world save ..." settimer globalWorldSaveTimer 0 while timer globalWorldSaveTimer < 10000 if insysmsg "save complete" sysmsg "The world has been saved!" settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile break endif endwhile endif if targetexists target cancel endif gumpclose 3224608375 clearsysmsg setvar! gardeningClearPestilentEffects 0 setvar! gardeningClearFungalEffects 0 setvar! gardeningClearCreatureEffects 0 setvar! gardeningBees 0 setvar! gardeningActiveBrainFungus 0 if not listexists gardeningFungiCounterList createlist gardeningFungiCounterList else clearlist gardeningFungiCounterList endif if not listexists gardeningCreatureCounterList createlist gardeningCreatureCounterList else clearlist gardeningCreatureCounterList endif settimer gardeningMinWaitTimer 0 while timer gardeningMinWaitTimer < gardeningWaitForObjectDelay dclick myFlowerPot waitforgump 3224608375 gardeningMaxWaitForServerResponse while timer gardeningMinWaitTimer < gardeningWaitForObjectDelay if insysmsg "You must wait to perform another action." wait gardeningMinWaitForServerResponse settimer gardeningMinWaitTimer 0 break endif endwhile endwhile setvar! gardeningGumpResponse 10 gumpresponse gardeningGumpResponse 3224608375 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile while gumpexists 3224608375 and not insysmsg "Permanent" and not insysmsg "That plant effect no longer exists." and not insysmsg! "That plant bowl is too far away." if insysmsg "Brain Fungi" setvar! gardeningActiveBrainFungus 1 endif //Always remove pestilent effects - there are no positive ones if insysmsg "Pestilent" and findtype 6187 backpack setvar! gardeningClearPestilentEffects 1 endif //Fungi if findtype 6193 backpack if insysmsg! "Black Mushroom" or insysmsg! "White Mushroom" or insysmsg! "Red Mushroom" if gardeningIgnoreHeatLevel = 1 if insysmsg "Black Mushroom" endif endif if insysmsg "Troop" pushlist gardeningFungiCounterList "1" elseif insysmsg "Cluster" pushlist gardeningFungiCounterList "1" pushlist gardeningFungiCounterList "1" elseif insysmsg "Grove" pushlist gardeningFungiCounterList "1" pushlist gardeningFungiCounterList "1" pushlist gardeningFungiCounterList "1" endif endif if insysmsg! "Orange Mushroom" or insysmsg! "Green Mushroom" or insysmsg! "Blue Mushroom" if list gardeningFungiCounterList > 0 if gardeningIgnoreHeatLevel = 1 if insysmsg "Orange Mushroom" endif endif if insysmsg "Troop" poplist gardeningFungiCounterList front elseif insysmsg "Cluster" for 2 poplist gardeningFungiCounterList front if list gardeningFungiCounterList = 0 break endif endfor elseif insysmsg "Grove" for 3 poplist gardeningFungiCounterList front if list gardeningFungiCounterList = 0 break endif endfor endif endif endif endif //Creatures if findtype 29343 backpack //Bees if insysmsg "Bees" setvar! gardeningBees 1 elseif insysmsg! "Reduces total growth rate" for 10 pushlist gardeningCreatureCounterList "1" endfor if insysmsg "Reduces total growth rate by 10%" elseif insysmsg "Reduces total growth rate by 11%" pushlist gardeningCreatureCounterList "1" elseif insysmsg "Reduces total growth rate by 12%" pushlist gardeningCreatureCounterList "1" pushlist gardeningCreatureCounterList "1" elseif insysmsg "Reduces total growth rate by 13%" pushlist gardeningCreatureCounterList "1" pushlist gardeningCreatureCounterList "1" pushlist gardeningCreatureCounterList "1" elseif insysmsg "Reduces total growth rate by 14%" for 4 pushlist gardeningCreatureCounterList "1" endfor elseif insysmsg "Reduces total growth rate by 15%" for 5 pushlist gardeningCreatureCounterList "1" endfor elseif insysmsg "Reduces total growth rate by 16%" for 6 pushlist gardeningCreatureCounterList "1" endfor elseif insysmsg "Reduces total growth rate by 17%" for 7 pushlist gardeningCreatureCounterList "1" endfor elseif insysmsg "Reduces total growth rate by 18%" for 8 pushlist gardeningCreatureCounterList "1" endfor elseif insysmsg "Reduces total growth rate by 19%" for 9 pushlist gardeningCreatureCounterList "1" endfor elseif insysmsg "Reduces total growth rate by 20%" for 10 pushlist gardeningCreatureCounterList "1" endfor endif endif endif if gardeningGumpResponse = 10 setvar! gardeningGumpResponse 11 elseif gardeningGumpResponse = 11 setvar! gardeningGumpResponse 12 elseif gardeningGumpResponse = 12 setvar! gardeningGumpResponse 13 elseif gardeningGumpResponse = 13 if ingump "Perma" 3224608375 break else gumpresponse 7 3224608375 setvar! gardeningGumpResponse 10 waitforgump 3224608375 gardeningMaxWaitForServerResponse endif endif gumpresponse gardeningGumpResponse 3224608375 settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endwhile //Remove debuffs if necessary if list gardeningFungiCounterList > 0 and findtype 6193 backpack setvar! gardeningClearFungalEffects 1 endif if gardeningBees = 1 and list gardeningCreatureCounterList > 50 and findtype 29343 backpack setvar! gardeningClearCreatureEffects 1 elseif gardeningBees = 0 and list gardeningCreatureCounterList > 0 and findtype 29343 backpack setvar! gardeningClearCreatureEffects 1 endif if gardeningClearPestilentEffects = 0 and gardeningClearFungalEffects = 0 and gardeningClearCreatureEffects = 0 if gardeningDebugMode > 0 sysmsg "[Gardening] ... debuff removal finished (Timer: {{gardeningRunTimer}} ms)" 100 endif break elseif gardeningActiveBrainFungus = 1 and gardeningIgnoreBrainFungus > 0 if gardeningDebugMode > 0 sysmsg "[Gardening] ... debuff removal brain fungus break (Timer: {{gardeningRunTimer}} ms)" 100 endif break else if targetexists target cancel endif while gardeningActiveBrainFungus = 1 and gumpexists 3224608375 and findtype 6193 backpack as myFungicide and not insysmsg! "That plant bowl is too far away." if gardeningDebugMode > 1 sysmsg "[Gardening] ... trying to remove brain fungus (Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myFungicide settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile if insysmsg "You use a fungicide to remove a fungus from the plant bowl (Brain Fungi)." setvar! gardeningActiveBrainFungus 0 if gardeningDebugMode > 1 sysmsg "[Gardening] ... brain fungus removed (Timer: {{gardeningRunTimer}} ms)" 100 endif break endif endwhile if gardeningActiveBrainFungus = 0 if gardeningClearPestilentEffects = 1 and gumpexists 3224608375 and findtype 6187 backpack and not insysmsg! "That plant bowl is too far away." while gumpexists 3224608375 and not insysmsg "There are no active pestilent effects in this plant bowl." and not insysmsg! "That plant bowl is too far away." and findtype 6187 backpack as myDefoliant if gardeningDebugMode > 1 sysmsg "[Gardening] ... removing pestilent effect (Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myDefoliant settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endwhile if gardeningClearFungalEffects = 0 and gardeningClearCreatureEffects = 0 if gardeningDebugMode > 0 sysmsg "[Gardening] ... debuffs cleared (Timer: {{gardeningRunTimer}} ms)" 100 endif break endif endif if gardeningClearFungalEffects = 1 and gumpexists 3224608375 and findtype 6193 backpack as myFungicide and not insysmsg! "That plant bowl is too far away." if gardeningDebugMode > 1 sysmsg "[Gardening] ... removing fungal effect (Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myFungicide settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif if gardeningClearCreatureEffects = 1 and gumpexists 3224608375 and findtype 29343 backpack as myFarmerAlmanac and not insysmsg! "That plant bowl is too far away." if gardeningDebugMode > 1 sysmsg "[Gardening] ... removing creature effect (Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myFarmerAlmanac settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif else if gardeningDebugMode > 1 sysmsg "[Gardening] Brain fungus removal fail (Timer: {{gardeningRunTimer}} ms)" 100 endif overhead "|* Brain fungus removal failed *|" 33 overhead "Cannot clear debuffs" 33 myFlowerPot break endif endif endwhile else //Kill all negativ effects without considering collateral damage to (potentially stronger) positive effects if gardeningDebugMode > 0 sysmsg "[Gardening] Removing debuffs - normal mode (Timer: {{gardeningRunTimer}} ms)" 100 endif //World save if insysmsg "world is saving" sysmsg "Waiting for world save ..." settimer globalWorldSaveTimer 0 while timer globalWorldSaveTimer < 10000 if insysmsg "save complete" sysmsg "The world has been saved!" settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile break endif endwhile endif if targetexists target cancel endif gumpclose 3224608375 settimer gardeningMinWaitTimer 0 while timer gardeningMinWaitTimer < gardeningWaitForObjectDelay dclick myFlowerPot waitforgump 3224608375 gardeningMaxWaitForServerResponse while timer gardeningMinWaitTimer < gardeningWaitForObjectDelay if insysmsg "You must wait to perform another action." wait gardeningMinWaitForServerResponse settimer gardeningMinWaitTimer 0 break endif endwhile endwhile while gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." //Collect all active condition system messages gumpresponse 10 3224608375 waitforgump 3224608375 gardeningMaxWaitForServerResponse gumpresponse 11 3224608375 waitforgump 3224608375 gardeningMaxWaitForServerResponse gumpresponse 12 3224608375 waitforgump 3224608375 gardeningMaxWaitForServerResponse gumpresponse 13 3224608375 waitforgump 3224608375 gardeningMaxWaitForServerResponse if ingump "Perma" 3224608375 or insysmsg! "Permanent" or insysmsg "That plant effect no longer exists." break else gumpresponse 7 3224608375 waitforgump 3224608375 gardeningMaxWaitForServerResponse endif endwhile if insysmsg "Brain Fungi" setvar! gardeningActiveBrainFungus 1 //Remove brain fungus while gardeningIgnoreBrainFungus = 0 and gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and findtype 6193 backpack as myFungicide and not insysmsg "There are no active fungal effects in this plant bowl." if gardeningDebugMode > 1 sysmsg "[Gardening] ... removing brain fungus (Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myFungicide settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile waitforgump 3224608375 gardeningMaxWaitForServerResponse if insysmsg "You use a fungicide to remove a fungus from the plant bowl (Brain Fungi)." setvar! gardeningActiveBrainFungus 0 if gardeningDebugMode > 1 sysmsg "[Gardening] ... brain fungus removed (Index: {{Index}}, Timer: {{gardeningRunTimer}} ms)" 100 endif break endif endwhile else setvar! gardeningActiveBrainFungus 0 endif if insysmsg "Reduces" and gardeningActiveBrainFungus = 0 if insysmsg "Permanent" endif gumpclose 3224608375 settimer gardeningMinWaitTimer 0 while timer gardeningMinWaitTimer < gardeningWaitForObjectDelay dclick myFlowerPot waitforgump 3224608375 gardeningMaxWaitForServerResponse while timer gardeningMinWaitTimer < gardeningWaitForObjectDelay if insysmsg "You must wait to perform another action." wait gardeningMinWaitForServerResponse settimer gardeningMinWaitTimer 0 break endif endwhile endwhile gumpresponse 10 3224608375 settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while insysmsg! "Reduces" and gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and not insysmsg "That plant effect no longer exists." and not insysmsg "Permanent" if insysmsg "(Pestilent Effect)" and findtype 6187 backpack as myDefoliant if gardeningDebugMode > 1 sysmsg "[Gardening] ... removing pestilent effect (Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myDefoliant settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif insysmsg "(Fungal Effect)" and findtype 6193 backpack as myFungicide if gardeningDebugMode > 1 sysmsg "[Gardening] ... removing fungal effect (Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myFungicide settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile elseif insysmsg "(Creature Effect)" and findtype 29343 backpack as myFarmerAlmanac if gardeningDebugMode > 1 sysmsg "[Gardening] ... removing creature effect (Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myFarmerAlmanac settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif gumpresponse 10 3224608375 settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endwhile elseif gardeningActiveBrainFungus = 1 and gardeningIgnoreBrainFungus = 0 if gardeningDebugMode > 0 sysmsg "[Gardening] Brain fungus removal fail (Timer: {{gardeningRunTimer}} ms)" 100 endif overhead "|* Brain fungus removal failed *|" 33 overhead "Cannot clear debuffs" 33 myFlowerPot elseif gardeningActiveBrainFungus = 1 and gardeningIgnoreBrainFungus > 0 if gardeningDebugMode > 0 sysmsg "[Gardening] ... debuff removal brain fungus break (Timer: {{gardeningRunTimer}} ms)" 100 endif endif endif //Add buff items if gardeningDebugMode > 0 sysmsg "[Gardening] Checking buffs (Timer: {{gardeningRunTimer}} ms)" 100 endif if gardeningActiveBrainFungus = 0 or gardeningIgnoreBrainFungus < 2 if gardeningSelectiveBuffs = 1 or gardeningSelectiveBuffs = 2 if listexists gardeningSelectiveBuffList if "large wooden planter" in myFlowerPotLabel or "rustic planter" in myFlowerPotLabel or "rustic window planter" in myFlowerPotLabel if inlist gardeningSelectiveBuffList "large wooden planter" setvar! gardeningSpecialPlanter 1 endif elseif "small wooden planter" in myFlowerPotLabel and inlist gardeningSelectiveBuffList "small wooden planter" setvar! gardeningSpecialPlanter 1 elseif "huge steel plant bowl" in myFlowerPotLabel and inlist gardeningSelectiveBuffList "huge steel plant bowl" setvar! gardeningSpecialPlanter 1 elseif "large steel plant bowl" in myFlowerPotLabel and inlist gardeningSelectiveBuffList "large steel plant bowl" setvar! gardeningSpecialPlanter 1 elseif "average steel plant bowl" in myFlowerPotLabel and inlist gardeningSelectiveBuffList "average steel plant bowl" setvar! gardeningSpecialPlanter 1 elseif "small steel plant bowl" in myFlowerPotLabel and inlist gardeningSelectiveBuffList "small steel plant bowl" setvar! gardeningSpecialPlanter 1 elseif "tiny steel plant bowl" in myFlowerPotLabel and inlist gardeningSelectiveBuffList "tiny steel plant bowl" setvar! gardeningSpecialPlanter 1 elseif "huge clay plant bowl" in myFlowerPotLabel and inlist gardeningSelectiveBuffList "huge clay plant bowl" setvar! gardeningSpecialPlanter 1 elseif "large clay plant bowl" in myFlowerPotLabel and inlist gardeningSelectiveBuffList "large clay plant bowl" setvar! gardeningSpecialPlanter 1 elseif "average clay plant bowl" in myFlowerPotLabel and inlist gardeningSelectiveBuffList "average clay plant bowl" setvar! gardeningSpecialPlanter 1 elseif "small clay plant bowl" in myFlowerPotLabel and inlist gardeningSelectiveBuffList "small clay plant bowl" setvar! gardeningSpecialPlanter 1 elseif "tiny clay plant bowl" in myFlowerPotLabel and inlist gardeningSelectiveBuffList "tiny clay plant bowl" setvar! gardeningSpecialPlanter 1 else setvar! gardeningSpecialPlanter 0 endif else setvar! gardeningSpecialPlanter 1 endif else setvar! gardeningSpecialPlanter 1 endif if gardeningSelectiveBuffs = 1 and gardeningSpecialPlanter = 1 or gardeningSelectiveBuffs = 0 //Apply superior, exceptional and store-bought items if gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and not insysmsg "Growth Serum" and findtype 20500|20499|20498 backpack as myNewGrowthSerum if gardeningDebugMode > 1 sysmsg "[Gardening] ... installing growth serum (gardeningSelectiveBuffs: {{gardeningSelectiveBuffs}}, gardeningSpecialPlanter: {{gardeningSpecialPlanter}}, Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewGrowthSerum settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif if gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and not insysmsg "Heat Filter" and findtype 28719|11942|28741 backpack as myNewHeatFilter if gardeningDebugMode > 1 sysmsg "[Gardening] ... installing heat filter (gardeningSelectiveBuffs: {{gardeningSelectiveBuffs}}, gardeningSpecialPlanter: {{gardeningSpecialPlanter}}, Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewHeatFilter settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif if gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and not insysmsg "Fertilizer" and findtype 29217|19403|4154 backpack as myNewFertilizer if gardeningDebugMode > 1 sysmsg "[Gardening] ... installing fertilizer (gardeningSelectiveBuffs: {{gardeningSelectiveBuffs}}, gardeningSpecialPlanter: {{gardeningSpecialPlanter}}, Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewFertilizer settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif if gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and not insysmsg "Purified Water" and findtype 20503|20502|20501 backpack as myNewPurifiedWater if gardeningDebugMode > 1 sysmsg "[Gardening] ... installing purified water (gardeningSelectiveBuffs: {{gardeningSelectiveBuffs}}, gardeningSpecialPlanter: {{gardeningSpecialPlanter}}, Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewPurifiedWater settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif elseif gardeningSelectiveBuffs = 2 and gardeningSpecialPlanter = 1 //Apply superior and exceptional items only if gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and not insysmsg "Growth Serum" and findtype 20500|20499 backpack as myNewGrowthSerum if gardeningDebugMode > 1 sysmsg "[Gardening] ... installing growth serum (gardeningSelectiveBuffs: {{gardeningSelectiveBuffs}}, gardeningSpecialPlanter: {{gardeningSpecialPlanter}}, Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewGrowthSerum settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif if gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and not insysmsg "Heat Filter" and findtype 28719|11942 backpack as myNewHeatFilter if gardeningDebugMode > 1 sysmsg "[Gardening] ... installing heat filter (gardeningSelectiveBuffs: {{gardeningSelectiveBuffs}}, gardeningSpecialPlanter: {{gardeningSpecialPlanter}}, Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewHeatFilter settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif if gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and not insysmsg "Fertilizer" and findtype 29217|19403 backpack as myNewFertilizer if gardeningDebugMode > 1 sysmsg "[Gardening] ... installing fertilizer (gardeningSelectiveBuffs: {{gardeningSelectiveBuffs}}, gardeningSpecialPlanter: {{gardeningSpecialPlanter}}, Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewFertilizer settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif if gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and not insysmsg "Purified Water" and findtype 20503|20502 backpack as myNewPurifiedWater if gardeningDebugMode > 1 sysmsg "[Gardening] ... installing purified water (gardeningSelectiveBuffs: {{gardeningSelectiveBuffs}}, gardeningSpecialPlanter: {{gardeningSpecialPlanter}}, Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewPurifiedWater settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif elseif gardeningSelectiveBuffs = 2 and gardeningSpecialPlanter = 0 //Apply only store-bought items if gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and not insysmsg "Growth Serum" and findtype 20498 backpack as myNewGrowthSerum if gardeningDebugMode > 1 sysmsg "[Gardening] ... installing growth serum (gardeningSelectiveBuffs: {{gardeningSelectiveBuffs}}, gardeningSpecialPlanter: {{gardeningSpecialPlanter}}, Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewGrowthSerum settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif if gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and not insysmsg "Heat Filter" and findtype 28741 backpack as myNewHeatFilter if gardeningDebugMode > 1 sysmsg "[Gardening] ... installing heat filter (gardeningSelectiveBuffs: {{gardeningSelectiveBuffs}}, gardeningSpecialPlanter: {{gardeningSpecialPlanter}}, Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewHeatFilter settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif if gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and not insysmsg "Fertilizer" and findtype 4154 backpack as myNewFertilizer if gardeningDebugMode > 1 sysmsg "[Gardening] ... installing fertilizer (gardeningSelectiveBuffs: {{gardeningSelectiveBuffs}}, gardeningSpecialPlanter: {{gardeningSpecialPlanter}}, Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewFertilizer settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif if gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." and not insysmsg "Purified Water" and findtype 20501 backpack as myNewPurifiedWater if gardeningDebugMode > 1 sysmsg "[Gardening] ... installing purified water (gardeningSelectiveBuffs: {{gardeningSelectiveBuffs}}, gardeningSpecialPlanter: {{gardeningSpecialPlanter}}, Timer: {{gardeningRunTimer}} ms)" 100 endif gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myNewPurifiedWater settimer gardeningMinWaitTimer 0 getlabel backpack waitForPing while timer gardeningMinWaitTimer < gardeningMinWaitForServerResponse endwhile endif endif endif endif //Labor and Toil if findtype 29868 backpack as myPlanterSpade and gumpexists 3224608375 and not insysmsg! "That plant bowl is too far away." if gardeningDebugMode > 1 sysmsg "[Gardening] ... labor and toil (Timer: {{gardeningRunTimer}} ms)" 100 endif if not gumpexists 1429840072 gumpresponse 2 3224608375 wft gardeningMaxWaitForServerResponse target myPlanterSpade waitforgump 1429840072 gardeningMaxWaitForServerResponse endif gumpresponse 6 1429840072 waitforgump 1429840072 gardeningMaxWaitForServerResponse gumpclose 1429840072 endif endif endif gumpclose 3224608375 if not insysmsg "That is not a plant seed." and not insysmsg "That plant bowl is too far away." overhead "Done" 68 myFlowerPot overhead " ▼ " 68 myFlowerPot if gardeningDebugMode > 0 sysmsg "[Gardening] Plant Done (Serial: {{myFlowerPot}}) ... Timer: {{gardeningRunTimer}} ms" 100 endif @ignore myFlowerPot else overhead "Failed" 33 myFlowerPot overhead " ▼ " 33 myFlowerPot if gardeningDebugMode > 0 sysmsg "[Gardening] Plant Failed (Serial: {{myFlowerPot}}) ... Timer: {{gardeningRunTimer}} ms" 100 endif endif settimer gardeningOverheadTimer 0 endif endwhile removetimer globalWorldSaveTimer removetimer gardeningOverheadTimer removetimer gardeningRunTimer removetimer gardeningMinWaitTimer removelist gardeningSelectiveBuffList removelist gardeningSpecialSeedList removelist gardeningSpecialPlanterList removelist gardeningFungiCounterList removelist gardeningCreatureCounterList @clearignore overhead "|* Gardening Done *|" //General gardening information and relevant system messages #Plant gump ID 3224608375 #Effects info button: gumpresponse 10 - 13 #Effects next page arrow: gumpresponse 7 #Water gump ID 3929333591 #Soil gump ID 4024474571 #Spade gump ID 1429840072 #Flower pot getlabel info with seed placed: "% grown)" -> in progress, "ready for harvest" -> done #Always remove pestilent effects, because there are no positive ones #Mushroom effect strength (good and bad): troop (50 %) -> cluster (100 %) -> grove (150 %) # BAD <-> GOOD #black mushroom <-> orange mushroom (heat) #white mushroom <-> green mushroom (soil) #red mushroom <-> blue mushroom (water) //Watering Can (only works with item in backpack, game does not allow item to be on ground) #Fill can: #You completely fill the water container. #You partialy fill the watering can from what water you can find nearby. #You do not see any nearby water containers to fill this from. #Water plant: #You add the ideal amount of water to the plant. #You add some water to the plant (unable to meet ideal amount needed).. #Water needed: #You have not yet estimated this plant's ideal water needs. #You have already met this plant's ideal water needs. #Too much water: #You have already added more water than this plant's ideal needs. //Soil (only works with item in backpack, game does not allow item to be on ground) #Add soil: #You add the ideal amount of soil to the plant. #You add some soil to the plant (unable to meet ideal amount needed).. #Soil needed: #You have not yet estimated this plant's ideal soil needs. #You have already met this plant's ideal soil needs. #Too much soil: #You have already added more soil than this plant's ideal needs. //Buff items (better quality items add prefixes and change the % values, use basic item description until ":" to descriminate system messages from buffs/debuffs) #Growth Serum: Increases total growth rate by ...%. #Heat Filter: Increases the growth impact of achieving an ideal heat level by ...%. #Fertilizer: Increases the growth impact of achieving an ideal soil level by ...%. #Purified Water: Increases the growth impact of achieving an ideal water level by ...%. //Hostile effects sysmsgs //Creature - all done: There are no active creature effects in this plant bowl. #Flies Infestation: Reduces total growth rate by 10% (Creature Effect). #Rat Infestation: Reduces total growth rate by 11% (Creature Effect). #Frog Infestation: Reduces total growth rate by 12% (Creature Effect). #Giant Slug Infestation: Reduces total growth rate by 13% (Creature Effect). #? #Giant Locust Infestation: Reduces total growth rate by 15% (Creature Effect). #Goat Infestation: Reduces total growth rate by 16% (Creature Effect). #Giant Beetle Infestation: Reduces total growth rate by 17% (Creature Effect). #Juvenile Crawler Infestation: Reduces total growth rate by 18% (Creature Effect). #Deer Infestation: Reduces total growth rate by 19% (Creature Effect). #Plaguemite Infestation: Reduces total growth rate by 20% (Creature Effect). //Fungal - all done sysmsg: There are no active fungal effects in this plant bowl. #Brain Fungi: Has a 66% chance to negate the effects of Defoliants, Fungicides, and Farmer's Almanacs when used. #Remove fail sysmsg: A sentient brain fungi has adapted and negated the effects of your fungicide! #Remove success sysmsg: You use a fungicide to remove a fungus from the plant bowl (Brain Fungi). #Black Mushroom Troop: Reduces the growth impact of achieving an ideal heat level by 50% (Fungal Effect). #Black Mushroom Cluster: Reduces the growth impact of achieving an ideal heat level by 100% (Fungal Effect). #Black Mushroom Grove: Reduces the growth impact of achieving an ideal heat level by 150% (Fungal Effect). #Red Mushroom Troop: Reduces the growth impact of achieving an ideal water level by 50% (Fungal Effect). #Red Mushroom Cluster: Reduces the growth impact of achieving an ideal water level by 100% (Fungal Effect). #Red Mushroom Grove: Reduces the growth impact of achieving an ideal water level by 150% (Fungal Effect). #White Mushroom Troop: Reduces the growth impact of achieving an ideal soil level by 50% (Fungal Effect). #White Mushroom Cluster: Reduces the growth impact of achieving an ideal soil level by 100% (Fungal Effect). #White Mushroom Grove: Reduces the growth impact of achieving an ideal soil level by 150% (Fungal Effect). //Pestilent - all done: There are no active pestilent effects in this plant bowl. #Nox Cloud: Reduces the growth impact of achieving an ideal heat level by 75% (Pestilent Effect). #Strange Slime: Reduces the growth impact of achieving an ideal soil level by 75% (Pestilent Effect). #Deathmold: Reduces the growth impact of achieving an ideal water level by 75% (Pestilent Effect). #Corpseweed: Reduces the growth impact of achieving an ideal heat, water, and soil level by 25 each% (Pestilent Effect). //Beneficial effects sysmsgs #Lucky Clovers (Cannot be removed): Increases total growth rate by 200%. //Creature #Spider: Prevents Flies, Rats, Frogs, Giant Slugs, Giant Locusts, and Giant Beetles (Creature Effect). #Arboreal Wisp: Prevents all creature effects. (Creature Effect) #Bees: Increases total growth rate by 50% (Creature Effect). //Fungal #Orange Mushroom Troop: Increases the growth impact of achieving an ideal heat level by 50% (Fungal Effect). #Orange Mushroom Cluster: Increases the growth impact of achieving an ideal heat level by 100% (Fungal Effect). #Orange Mushroom Grove: Increases the growth impact of achieving an ideal heat level by 150% (Fungal Effect). #Blue Mushroom Troop: Increases the growth impact of achieving an ideal water level by 50% (Fungal Effect). #Blue Mushroom Cluster: Increases the growth impact of achieving an ideal water level by 100% (Fungal Effect). #Blue Mushroom Grove: Increases the growth impact of achieving an ideal water level by 150% (Fungal Effect). #Green Mushroom Troop: Increases the growth impact of achieving an ideal soil level by 50% (Fungal Effect). #Green Mushroom Cluster: Increases the growth impact of achieving an ideal soil level by 100% (Fungal Effect). #Green Mushroom Grove: Increases the growth impact of achieving an ideal soil level by 150% (Fungal Effect).