Script - Harvester

RoomEnv = {
["Forest"] = {"echinacea", "elm", "ginger", "ginseng", "lobelia", "myrrh"},
["Garden"] = {"echinacea", "elm", "ginger", "ginseng", "lobelia", "myrrh"},
["Desert"] = {"pear", "weed"},
["Grasslands"] = {"goldenseal", "slipper"},
["Mountains"] = {"valerian"},
["Jungle"] = {"kuzu", "kola", "skullcap"},
["Natural underground"] = {"moss", "bloodroot"},
["Hills"] = {"bayberry", "hawthorn"},
["Swamp"] = {"ash", "cohosh", "bellwort"},
["Valley"] = {"sileris"},
["Freshwater"] = {"kelp"},
["River"] = {"kelp"},
["Water"] = {"kelp"},
["Ocean"] = {"kelp"},
};
CurrentEnv = ""
HarvestQueue = {
};

function harvestBegin(env)
for i = 1,table.maxn(RoomEnv[env]) do
table.insert(HarvestQueue, RoomEnv[env][i])
end
cecho("\n<white>[<blue>Harvesting<white>]<grey>: Commencing Plant Snatching!")
enableTrigger("HarvestBal")
pickPlants()
end

function pickPlants()
	if HarvestQueue[1] == nil  then
		cecho("\n<white>[<blue>Harvesting<white>]<grey>: Finished Snatching Plants!")
		disableTrigger("HarvestBal")
	else
	send("harvest " .. HarvestQueue[1])
	table.remove(HarvestQueue,1)
	end
end

Trigger - Bal

Match Lines -

That plant has been fully harvested.
You have already harvested from this plant recently.
You have recovered balance on all limbs.
You find that you don't know how to harvest that. How odd.
What do you wish to harvest?

Body -

pickPlants()

Trigger - HarvestRift

^You reach out and carefully harvest(?: \d+| a| an| some|\s+)(.+)s?\.$


if not string.find(matches[2],"pear") then
send("inr all "..matches[2])
else
send("inr all pear")
end


Trigger - harvestNewRoom

You see exits leading
You see a single exit
There are no obvious exits.

if autoHarvest then
echo("\n")
harvestBegin(CurrentEnv)
end

ALIAS -

autoHarvest

^aharv$

if not autoHarvest then
	autoHarvest=true
else
	autoHarvest=false
end

if not autoHarvest then
	omni.echo("Auto Harvesting is Paused!")
else
	omni.echo("Auto Harvesting is unPaused!")
end

if autoHarvest then
harvestBegin(CurrentEnv)
end