Skip to content
Outlands Hub

Razor script

Hops & Barley Farmer

by oakman8490 · 818 lines
Download

Compatibility unverified

This community Razor script has not been tested in game by the Hub. Read its setup and client requirements before use.

"Oaks [KoU]" Script for Farming Hops & Barley Any issues with the script, please message me on Discord: Oakman8490

Bard
Hops Barley Farmer.razor
1# This is an automated backup - check out https://outlands.uorazorscripts.com/script/e2e579e4-4728-43db-80da-00fdbe3df50a for latest2# Automation by Jaseowns3## Script: Hops & Barley Farmer4## Created by: oakman8490#05#############################################6 7## "Oaks [KoU]" Script for Farming Hops & Barley8## Any issues with the script, please message me on Discord: Oakman84909 10# Script is written specifically for Hops & Barley to make Cleansing Brews, but other seed types can be manually added.11# Does not handle the initial planting. That will need to be done manually, so it will know what to plant.12 13# Items used in Harvest Process:14    ## 100 skill in Taste ID15    ## Watering Can (25570) - 116    ## Water Bucket (4090) - as many as you need. I have 5, but larger gardens will need more.17    ## Defoliant (6187) - Keep plenty in inventory18    ## Fungicide (6193) - Keep plenty in inventory19    ## Farmers Almanac (29343) - Keep plenty in inventory20    ## Dirt (2323) - Keep plenty in inventory21    ## Fertilizer (4154.2897) - Keep plenty in inventory22    ## Spade (29868) - A couple should be fine23    ## Hops Seed (51078.2208) - Enough to re-plant what you harvest24    ## Barley Seed (51078.2418) - Enough to re-plant what you harvest25    26    27# Work Order28    ## Harvests any crops that are ready, and then re-plants with the same seed.29    ## Determines the ideal levels of heat, water, and dirt30    ## Refills water to the ideal31    ## Refills dirt to the ideal32    ## Applies Labor & Toil buff33    ## Applies Fertilizer (if needed)34    ## Removes debuffs (Fungal, Creature, Pest)35    ## Moves on to the next planter36    ## Tells you to move when you have tended every planter within 2 tiles37 38@setvar! minWait 30039 40clearignore41while not dead42    while findtype 4550|4551|6327|6328|6330|6341|56413|56415|56408|56410|28987|6333|6334|6335|6337|6338 ground -1 -1 243        @setvar! effect1 144        @setvar! effect2 145        @setvar! effect3 146        @setvar! effect4 147        @setvar! effect5 148        @setvar! effect6 149        @setvar! effect7 150        @setvar! effect8 151        @setvar! effect9 152        @setvar! effect10 153        @setvar! effect11 154        @setvar! effect12 155        if findtype 4550|4551|6327|6328|6330|6341|56413|56415|56408|56410|28987|6333|6334|6335|6337|6338 ground -1 -1 2 as myPot56            getlabel myPot myPotLabel57            overhead '{{myPotLabel}}' 55 myPot58            if 'harvest' in myPotLabel59                if 'barley' in myPotLabel60                    @setvar! myCrop 161                elseif 'hops' in myPotLabel62                    @setvar! myCrop 263//Additional plant descriptions can be added here with an elseif                64                else 65                    @setvar! myCrop 066                endif67                if myCrop = 168                    if findtype 51078 backpack 2418 as seeds69                        @setvar! mySeeds seeds70                    else 71                        overhead 'No Barley Seeds' 3372                    endif73                elseif myCrop = 274                    if findtype 51078 backpack 2208 as seeds75                        @setvar mySeeds seeds76                    else 77                        overhead 'No Hops Seeds' 3378                    endif79//Additional seed types can be added here with an elseif                    80                else 81                    @setvar! mySeeds 082                endif83                dclick myPot84                overhead 'Harvesting'85                gumpresponse 2 322460837586                wait 45087                gumpresponse 2 322460837588                wait 450    89                overhead 'Planting'90                while not targetexists 91                    gumpresponse 2 322460837592                    wait 450    93                endwhile94                if mySeeds = 095                    overhead 'Manual Seeding Required' 3396                    hotkey 'Cancel Current Target'97                    @ignore! myPot98                else 99                    target mySeeds100                    wait 1000101                endif102            endif103            getlabel myPot myPotLabel104            if 'grown' in myPotLabel105                dclick myPot106                overhead 'Setting Ideals'107                waitforgump 3224608375108                gumpresponse 3 3224608375109                waitforgump 3224608375110                gumpresponse 4 3224608375111                waitforgump 3224608375112                gumpresponse 5 3224608375113                wait minWait114                if findtype 56416|56417|25570 backpack as myWater115                    overhead 'Watering'116                    dclick myWater117                    wait minWait118                    gumpresponse 2 3224608375119                    waitfortarget 5000120                    target myWater121                    waitforgump 3929333591122                    gumpresponse 2 3929333591123                    wait minWait124                    gumpclose 3929333591125                else      126                    overhead 'No Water' 33127                endif128                if findtype 2323 backpack as myDirt129                    overhead 'Adding Dirt'130                    gumpresponse 2 3224608375131                    waitfortarget 5000132                    target myDirt133                    waitforgump 4024474571134                    gumpresponse 2 4024474571135                    wait minWait136                    gumpclose 4024474571137                else 138                    overhead 'No Dirt' 33139                endif140                if findtype 29868 backpack as mySpade141                    overhead 'Tilling'142                    gumpresponse 2 3224608375143                    waitfortarget 5000144                    target mySpade145                    waitforgump 1429840072146                    gumpresponse 6 1429840072147                    wait minWait148                    gumpclose 1429840072149                else 150                    overhead 'No Spade' 33151                endif152                if findtype 4154|19403|29217 backpack as myFertilizer153                    overhead 'Fertilizing'154                    gumpresponse 2 3224608375155                    waitfortarget 5000156                    target myFertilizer157                    wait minWait158                else 159                    overhead 'No Fertilizer'160                endif161                wait minWait162                clearsysmsg163                overhead "Treating Status Effects"164                while effect1 = 1165                    gumpresponse 10 3224608375166                    wait minWait167                    if insysmsg "Labor and Toil" or insysmsg "Permanent Effect" or insysmsg "Increases the growth" or insysmsg "Increases total growth" or insysmsg "Prevents"168                        break169                    elseif insysmsg "That plant effect no longer exists"170                        @setvar! effect1 0171                        @setvar! effect2 0172                        @setvar! effect3 0173                        @setvar! effect4 0174                        @setvar! effect5 0175                        @setvar! effect6 0176                        @setvar! effect7 0177                        @setvar! effect8 0178                        @setvar! effect9 0179                        @setvar! effect10 0180                        @setvar! effect11 0181                        @setvar! effect12 0182                        break183                    elseif insysmsg 'Fungal Effect' or insysmsg 'Brain Fungi'184                        if findtype 6193 backpack as myFungicide185                            gumpresponse 2 3224608375186                            waitfortarget 5000187                            target myFungicide188                        else 189                            overhead 'No Fungicide' 33190                            break191                        endif192                    elseif insysmsg 'Creature Effect'193                        if findtype 29343 backpack as myAlmanac194                            gumpresponse 2 3224608375195                            waitfortarget 5000196                            target myAlmanac197                        else 198                            overhead 'No Almanac' 33199                            break200                        endif                    201                    elseif insysmsg 'Pestilent Effect'202                        if findtype 6187 backpack as myDefoliant203                            gumpresponse 2 3224608375204                            waitfortarget 5000205                            target myDefoliant206                        else 207                            overhead 'No Defoliant' 33208                            break209                        endif210                    else 211                        overhead "Error in Determining Effect" 33 myPot212                        break213                    endif214                    wait minWait215                endwhile216                while effect2 = 1217                    clearsysmsg218                    gumpresponse 11 3224608375219                    wait minWait220                    if insysmsg "Labor and Toil" or insysmsg "Permanent Effect" or insysmsg "Increases the growth" or insysmsg "Increases total growth" or insysmsg "Prevents"221                        break222                    elseif insysmsg "That plant effect no longer exists"223                        @setvar! effect1 0224                        @setvar! effect2 0225                        @setvar! effect3 0226                        @setvar! effect4 0227                        @setvar! effect5 0228                        @setvar! effect6 0229                        @setvar! effect7 0230                        @setvar! effect8 0231                        @setvar! effect9 0232                        @setvar! effect10 0233                        @setvar! effect11 0234                        @setvar! effect12 0235                        break236                    elseif insysmsg 'Fungal Effect' or insysmsg 'Brain Fungi'237                        if findtype 6193 backpack as myFungicide238                            gumpresponse 2 3224608375239                            waitfortarget 5000240                            target myFungicide241                        else 242                            overhead 'No Fungicide' 33243                            break244                        endif245                    elseif insysmsg 'Creature Effect'246                        if findtype 29343 backpack as myAlmanac247                            gumpresponse 2 3224608375248                            waitfortarget 5000249                            target myAlmanac250                        else 251                            overhead 'No Almanac' 33252                            break253                        endif                    254                    elseif insysmsg 'Pestilent Effect'255                        if findtype 6187 backpack as myDefoliant256                            gumpresponse 2 3224608375257                            waitfortarget 5000258                            target myDefoliant259                        else 260                            overhead 'No Defoliant' 33261                            break262                        endif263                    else 264                        overhead "Error in Determining Effect" 33 myPot265                        break266                    endif267                    wait minWait268                endwhile                  269                while effect3 = 1270                    clearsysmsg271                    gumpresponse 12 3224608375272                    wait minWait273                    if insysmsg "Labor and Toil" or insysmsg "Permanent Effect" or insysmsg "Increases the growth" or insysmsg "Increases total growth" or insysmsg "Prevents"274                        break275                    elseif insysmsg "That plant effect no longer exists"276                        @setvar! effect1 0277                        @setvar! effect2 0278                        @setvar! effect3 0279                        @setvar! effect4 0280                        @setvar! effect5 0281                        @setvar! effect6 0282                        @setvar! effect7 0283                        @setvar! effect8 0284                        @setvar! effect9 0285                        @setvar! effect10 0286                        @setvar! effect11 0287                        @setvar! effect12 0288                        break289                    elseif insysmsg 'Fungal Effect' or insysmsg 'Brain Fungi'290                        if findtype 6193 backpack as myFungicide291                            gumpresponse 2 3224608375292                            waitfortarget 5000293                            target myFungicide294                        else 295                            overhead 'No Fungicide' 33296                            break297                        endif298                    elseif insysmsg 'Creature Effect'299                        if findtype 29343 backpack as myAlmanac300                            gumpresponse 2 3224608375301                            waitfortarget 5000302                            target myAlmanac303                        else 304                            overhead 'No Almanac' 33305                            break306                        endif                    307                    elseif insysmsg 'Pestilent Effect'308                        if findtype 6187 backpack as myDefoliant309                            gumpresponse 2 3224608375310                            waitfortarget 5000311                            target myDefoliant312                        else 313                            overhead 'No Defoliant' 33314                            break315                        endif316                    else 317                        overhead "Error in Determining Effect" 33 myPot318                        break319                    endif320                    wait minWait321                endwhile 322                while effect4 = 1323                    clearsysmsg324                    gumpresponse 13 3224608375325                    wait minWait326                    if insysmsg "Labor and Toil" or insysmsg "Permanent Effect" or insysmsg "Increases the growth" or insysmsg "Increases total growth" or insysmsg "Prevents"327                        break328                    elseif insysmsg "That plant effect no longer exists"329                        @setvar! effect1 0330                        @setvar! effect2 0331                        @setvar! effect3 0332                        @setvar! effect4 0333                        @setvar! effect5 0334                        @setvar! effect6 0335                        @setvar! effect7 0336                        @setvar! effect8 0337                        @setvar! effect9 0338                        @setvar! effect10 0339                        @setvar! effect11 0340                        @setvar! effect12 0341                        break342                    elseif insysmsg 'Fungal Effect' or insysmsg 'Brain Fungi'343                        if findtype 6193 backpack as myFungicide344                            gumpresponse 2 3224608375345                            waitfortarget 5000346                            target myFungicide347                        else 348                            overhead 'No Fungicide' 33349                            break350                        endif351                    elseif insysmsg 'Creature Effect'352                        if findtype 29343 backpack as myAlmanac353                            gumpresponse 2 3224608375354                            waitfortarget 5000355                            target myAlmanac356                        else 357                            overhead 'No Almanac' 33358                            break359                        endif                    360                    elseif insysmsg 'Pestilent Effect'361                        if findtype 6187 backpack as myDefoliant362                            gumpresponse 2 3224608375363                            waitfortarget 5000364                            target myDefoliant365                        else 366                            overhead 'No Defoliant' 33367                            break368                        endif369                    else 370                        overhead "Error in Determining Effect" 33 myPot371                        break372                    endif373                    wait minWait374                endwhile375                if effect5 = 1376                    gumpresponse 7 3224608375377                    wait minWait378                endif379                while effect5 = 1380                    clearsysmsg381                    gumpresponse 10 3224608375382                    wait minWait383                    if insysmsg "Labor and Toil" or insysmsg "Permanent Effect" or insysmsg "Increases the growth" or insysmsg "Increases total growth" or insysmsg "Prevents"384                        break385                    elseif insysmsg "That plant effect no longer exists"386                        @setvar! effect1 0387                        @setvar! effect2 0388                        @setvar! effect3 0389                        @setvar! effect4 0390                        @setvar! effect5 0391                        @setvar! effect6 0392                        @setvar! effect7 0393                        @setvar! effect8 0394                        @setvar! effect9 0395                        @setvar! effect10 0396                        @setvar! effect11 0397                        @setvar! effect12 0398                        break399                    elseif insysmsg 'Fungal Effect' or insysmsg 'Brain Fungi'400                        if findtype 6193 backpack as myFungicide401                            gumpresponse 2 3224608375402                            waitfortarget 5000403                            target myFungicide404                        else 405                            overhead 'No Fungicide' 33406                            break407                        endif408                    elseif insysmsg 'Creature Effect'409                        if findtype 29343 backpack as myAlmanac410                            gumpresponse 2 3224608375411                            waitfortarget 5000412                            target myAlmanac413                        else 414                            overhead 'No Almanac' 33415                            break416                        endif                    417                    elseif insysmsg 'Pestilent Effect'418                        if findtype 6187 backpack as myDefoliant419                            gumpresponse 2 3224608375420                            waitfortarget 5000421                            target myDefoliant422                        else 423                            overhead 'No Defoliant' 33424                            break425                        endif426                    else 427                        overhead "Error in Determining Effect" 33 myPot428                        break429                    endif430                    wait minWait431                endwhile432                while effect6 = 1433                    clearsysmsg434                    gumpresponse 11 3224608375435                    wait minWait436                    if insysmsg "Labor and Toil" or insysmsg "Permanent Effect" or insysmsg "Increases the growth" or insysmsg "Increases total growth" or insysmsg "Prevents"437                        break438                    elseif insysmsg "That plant effect no longer exists"439                        @setvar! effect1 0440                        @setvar! effect2 0441                        @setvar! effect3 0442                        @setvar! effect4 0443                        @setvar! effect5 0444                        @setvar! effect6 0445                        @setvar! effect7 0446                        @setvar! effect8 0447                        @setvar! effect9 0448                        @setvar! effect10 0449                        @setvar! effect11 0450                        @setvar! effect12 0451                        break452                    elseif insysmsg 'Fungal Effect' or insysmsg 'Brain Fungi'453                        if findtype 6193 backpack as myFungicide454                            gumpresponse 2 3224608375455                            waitfortarget 5000456                            target myFungicide457                        else 458                            overhead 'No Fungicide' 33459                            break460                        endif461                    elseif insysmsg 'Creature Effect'462                        if findtype 29343 backpack as myAlmanac463                            gumpresponse 2 3224608375464                            waitfortarget 5000465                            target myAlmanac466                        else 467                            overhead 'No Almanac' 33468                            break469                        endif                    470                    elseif insysmsg 'Pestilent Effect'471                        if findtype 6187 backpack as myDefoliant472                            gumpresponse 2 3224608375473                            waitfortarget 5000474                            target myDefoliant475                        else 476                            overhead 'No Defoliant' 33477                            break478                        endif479                    else 480                        overhead "Error in Determining Effect" 33 myPot481                        break482                    endif483                    wait minWait484                endwhile                  485                while effect7 = 1486                    clearsysmsg487                    gumpresponse 12 3224608375488                    wait minWait489                    if insysmsg "Labor and Toil" or insysmsg "Permanent Effect" or insysmsg "Increases the growth" or insysmsg "Increases total growth" or insysmsg "Prevents"490                        break491                    elseif insysmsg "That plant effect no longer exists"492                        @setvar! effect1 0493                        @setvar! effect2 0494                        @setvar! effect3 0495                        @setvar! effect4 0496                        @setvar! effect5 0497                        @setvar! effect6 0498                        @setvar! effect7 0499                        @setvar! effect8 0500                        @setvar! effect9 0501                        @setvar! effect10 0502                        @setvar! effect11 0503                        @setvar! effect12 0504                        break505                    elseif insysmsg 'Fungal Effect' or insysmsg 'Brain Fungi'506                        if findtype 6193 backpack as myFungicide507                            gumpresponse 2 3224608375508                            waitfortarget 5000509                            target myFungicide510                        else 511                            overhead 'No Fungicide' 33512                            break513                        endif514                    elseif insysmsg 'Creature Effect'515                        if findtype 29343 backpack as myAlmanac516                            gumpresponse 2 3224608375517                            waitfortarget 5000518                            target myAlmanac519                        else 520                            overhead 'No Almanac' 33521                            break522                        endif                    523                    elseif insysmsg 'Pestilent Effect'524                        if findtype 6187 backpack as myDefoliant525                            gumpresponse 2 3224608375526                            waitfortarget 5000527                            target myDefoliant528                        else 529                            overhead 'No Defoliant' 33530                            break531                        endif532                    else 533                        overhead "Error in Determining Effect" 33 myPot534                        break535                    endif536                    wait minWait537                endwhile 538                while effect8 = 1539                    clearsysmsg540                    gumpresponse 13 3224608375541                    wait minWait542                    if insysmsg "Labor and Toil" or insysmsg "Permanent Effect" or insysmsg "Increases the growth" or insysmsg "Increases total growth" or insysmsg "Prevents"543                        break544                    elseif insysmsg "That plant effect no longer exists"545                        @setvar! effect1 0546                        @setvar! effect2 0547                        @setvar! effect3 0548                        @setvar! effect4 0549                        @setvar! effect5 0550                        @setvar! effect6 0551                        @setvar! effect7 0552                        @setvar! effect8 0553                        @setvar! effect9 0554                        @setvar! effect10 0555                        @setvar! effect11 0556                        @setvar! effect12 0557                        break558                    elseif insysmsg 'Fungal Effect' or insysmsg 'Brain Fungi'559                        if findtype 6193 backpack as myFungicide560                            gumpresponse 2 3224608375561                            waitfortarget 5000562                            target myFungicide563                        else 564                            overhead 'No Fungicide' 33565                            break566                        endif567                    elseif insysmsg 'Creature Effect'568                        if findtype 29343 backpack as myAlmanac569                            gumpresponse 2 3224608375570                            waitfortarget 5000571                            target myAlmanac572                        else 573                            overhead 'No Almanac' 33574                            break575                        endif                    576                    elseif insysmsg 'Pestilent Effect'577                        if findtype 6187 backpack as myDefoliant578                            gumpresponse 2 3224608375579                            waitfortarget 5000580                            target myDefoliant581                        else 582                            overhead 'No Defoliant' 33583                            break584                        endif585                    else 586                        overhead "Error in Determining Effect" 33 myPot587                        break588                    endif589                    wait minWait590                endwhile591                if effect9 = 1592                    gumpresponse 7 3224608375593                    wait minWait594                endif595                while effect9 = 1596                    clearsysmsg597                    gumpresponse 10 3224608375598                    wait minWait599                    if insysmsg "Labor and Toil" or insysmsg "Permanent Effect" or insysmsg "Increases the growth" or insysmsg "Increases total growth" or insysmsg "Prevents"600                        break601                    elseif insysmsg "That plant effect no longer exists"602                        @setvar! effect1 0603                        @setvar! effect2 0604                        @setvar! effect3 0605                        @setvar! effect4 0606                        @setvar! effect5 0607                        @setvar! effect6 0608                        @setvar! effect7 0609                        @setvar! effect8 0610                        @setvar! effect9 0611                        @setvar! effect10 0612                        @setvar! effect11 0613                        @setvar! effect12 0614                        break615                    elseif insysmsg 'Fungal Effect' or insysmsg 'Brain Fungi'616                        if findtype 6193 backpack as myFungicide617                            gumpresponse 2 3224608375618                            waitfortarget 5000619                            target myFungicide620                        else 621                            overhead 'No Fungicide' 33622                            break623                        endif624                    elseif insysmsg 'Creature Effect'625                        if findtype 29343 backpack as myAlmanac626                            gumpresponse 2 3224608375627                            waitfortarget 5000628                            target myAlmanac629                        else 630                            overhead 'No Almanac' 33631                            break632                        endif                    633                    elseif insysmsg 'Pestilent Effect'634                        if findtype 6187 backpack as myDefoliant635                            gumpresponse 2 3224608375636                            waitfortarget 5000637                            target myDefoliant638                        else 639                            overhead 'No Defoliant' 33640                            break641                        endif642                    else 643                        overhead "Error in Determining Effect" 33 myPot644                        break645                    endif646                    wait minWait647                endwhile648                while effect10 = 1649                    clearsysmsg650                    gumpresponse 11 3224608375651                    wait minWait652                    if insysmsg "Labor and Toil" or insysmsg "Permanent Effect" or insysmsg "Increases the growth" or insysmsg "Increases total growth" or insysmsg "Prevents"653                        break654                    elseif insysmsg "That plant effect no longer exists"655                        @setvar! effect1 0656                        @setvar! effect2 0657                        @setvar! effect3 0658                        @setvar! effect4 0659                        @setvar! effect5 0660                        @setvar! effect6 0661                        @setvar! effect7 0662                        @setvar! effect8 0663                        @setvar! effect9 0664                        @setvar! effect10 0665                        @setvar! effect11 0666                        @setvar! effect12 0667                        break668                    elseif insysmsg 'Fungal Effect' or insysmsg 'Brain Fungi'669                        if findtype 6193 backpack as myFungicide670                            gumpresponse 2 3224608375671                            waitfortarget 5000672                            target myFungicide673                        else 674                            overhead 'No Fungicide' 33675                            break676                        endif677                    elseif insysmsg 'Creature Effect'678                        if findtype 29343 backpack as myAlmanac679                            gumpresponse 2 3224608375680                            waitfortarget 5000681                            target myAlmanac682                        else 683                            overhead 'No Almanac' 33684                            break685                        endif                    686                    elseif insysmsg 'Pestilent Effect'687                        if findtype 6187 backpack as myDefoliant688                            gumpresponse 2 3224608375689                            waitfortarget 5000690                            target myDefoliant691                        else 692                            overhead 'No Defoliant' 33693                            break694                        endif695                    else 696                        overhead "Error in Determining Effect" 33 myPot697                        break698                    endif699                    wait minWait700                endwhile                  701                while effect11 = 1702                    clearsysmsg703                    gumpresponse 12 3224608375704                    wait minWait705                    if insysmsg "Labor and Toil" or insysmsg "Permanent Effect" or insysmsg "Increases the growth" or insysmsg "Increases total growth" or insysmsg "Prevents"706                        break707                    elseif insysmsg "That plant effect no longer exists"708                        @setvar! effect1 0709                        @setvar! effect2 0710                        @setvar! effect3 0711                        @setvar! effect4 0712                        @setvar! effect5 0713                        @setvar! effect6 0714                        @setvar! effect7 0715                        @setvar! effect8 0716                        @setvar! effect9 0717                        @setvar! effect10 0718                        @setvar! effect11 0719                        @setvar! effect12 0720                        break721                    elseif insysmsg 'Fungal Effect' or insysmsg 'Brain Fungi'722                        if findtype 6193 backpack as myFungicide723                            gumpresponse 2 3224608375724                            waitfortarget 5000725                            target myFungicide726                        else 727                            overhead 'No Fungicide' 33728                            break729                        endif730                    elseif insysmsg 'Creature Effect'731                        if findtype 29343 backpack as myAlmanac732                            gumpresponse 2 3224608375733                            waitfortarget 5000734                            target myAlmanac735                        else 736                            overhead 'No Almanac' 33737                            break738                        endif                    739                    elseif insysmsg 'Pestilent Effect'740                        if findtype 6187 backpack as myDefoliant741                            gumpresponse 2 3224608375742                            waitfortarget 5000743                            target myDefoliant744                        else 745                            overhead 'No Defoliant' 33746                            break747                        endif748                    else 749                        overhead "Error in Determining Effect" 33 myPot750                        break751                    endif752                    wait minWait753                endwhile 754                while effect12 = 1755                    clearsysmsg756                    gumpresponse 13 3224608375757                    wait minWait758                    if insysmsg "Labor and Toil" or insysmsg "Permanent Effect" or insysmsg "Increases the growth" or insysmsg "Increases total growth" or insysmsg "Prevents"759                        break760                    elseif insysmsg "That plant effect no longer exists"761                        @setvar! effect1 0762                        @setvar! effect2 0763                        @setvar! effect3 0764                        @setvar! effect4 0765                        @setvar! effect5 0766                        @setvar! effect6 0767                        @setvar! effect7 0768                        @setvar! effect8 0769                        @setvar! effect9 0770                        @setvar! effect10 0771                        @setvar! effect11 0772                        @setvar! effect12 0773                        break774                    elseif insysmsg 'Fungal Effect' or insysmsg 'Brain Fungi'775                        if findtype 6193 backpack as myFungicide776                            gumpresponse 2 3224608375777                            waitfortarget 5000778                            target myFungicide779                        else 780                            overhead 'No Fungicide' 33781                            break782                        endif783                    elseif insysmsg 'Creature Effect'784                        if findtype 29343 backpack as myAlmanac785                            gumpresponse 2 3224608375786                            waitfortarget 5000787                            target myAlmanac788                        else 789                            overhead 'No Almanac' 33790                            break791                        endif                    792                    elseif insysmsg 'Pestilent Effect'793                        if findtype 6187 backpack as myDefoliant794                            gumpresponse 2 3224608375795                            waitfortarget 5000796                            target myDefoliant797                        else 798                            overhead 'No Defoliant' 33799                            break800                        endif801                    else 802                        overhead "Error in Determining Effect" 33 myPot803                        break804                    endif805                    wait minWait806                endwhile807                      808            else 809                overhead 'Manual Seeding Required' 33810            endif811            @ignore! myPot812            gumpclose813        endif814    endwhile815    overhead 'Time to Move' 33816    wait 5000817endwhile818