diff --git a/VeggieTales/images/vineyard/Action_AS.png b/VeggieTales/images/vineyard/Action_AS.png
new file mode 100755
index 0000000..0b30b76
Binary files /dev/null and b/VeggieTales/images/vineyard/Action_AS.png differ
diff --git a/VeggieTales/images/vineyard/Action_MG.png b/VeggieTales/images/vineyard/Action_MG.png
new file mode 100755
index 0000000..9f507f0
Binary files /dev/null and b/VeggieTales/images/vineyard/Action_MG.png differ
diff --git a/VeggieTales/images/vineyard/Action_PO.png b/VeggieTales/images/vineyard/Action_PO.png
new file mode 100755
index 0000000..61847a6
Binary files /dev/null and b/VeggieTales/images/vineyard/Action_PO.png differ
diff --git a/VeggieTales/images/vineyard/Action_SL.png b/VeggieTales/images/vineyard/Action_SL.png
new file mode 100755
index 0000000..3cf3f27
Binary files /dev/null and b/VeggieTales/images/vineyard/Action_SL.png differ
diff --git a/VeggieTales/images/vineyard/Action_SV.png b/VeggieTales/images/vineyard/Action_SV.png
new file mode 100755
index 0000000..380ed00
Binary files /dev/null and b/VeggieTales/images/vineyard/Action_SV.png differ
diff --git a/VeggieTales/images/vineyard/Action_TL.png b/VeggieTales/images/vineyard/Action_TL.png
new file mode 100755
index 0000000..38f5183
Binary files /dev/null and b/VeggieTales/images/vineyard/Action_TL.png differ
diff --git a/VeggieTales/images/vineyard/Action_TV.png b/VeggieTales/images/vineyard/Action_TV.png
new file mode 100755
index 0000000..46ffc17
Binary files /dev/null and b/VeggieTales/images/vineyard/Action_TV.png differ
diff --git a/VeggieTales/images/vineyard/CanBeTended.png b/VeggieTales/images/vineyard/CanBeTended.png
new file mode 100755
index 0000000..e2b2196
Binary files /dev/null and b/VeggieTales/images/vineyard/CanBeTended.png differ
diff --git a/VeggieTales/images/vineyard/Cutting.png b/VeggieTales/images/vineyard/Cutting.png
new file mode 100755
index 0000000..f1f78b1
Binary files /dev/null and b/VeggieTales/images/vineyard/Cutting.png differ
diff --git a/VeggieTales/images/vineyard/Harvest.png b/VeggieTales/images/vineyard/Harvest.png
new file mode 100755
index 0000000..cff1120
Binary files /dev/null and b/VeggieTales/images/vineyard/Harvest.png differ
diff --git a/VeggieTales/images/vineyard/Number_Acid.png b/VeggieTales/images/vineyard/Number_Acid.png
new file mode 100755
index 0000000..e376a7a
Binary files /dev/null and b/VeggieTales/images/vineyard/Number_Acid.png differ
diff --git a/VeggieTales/images/vineyard/Number_Color.png b/VeggieTales/images/vineyard/Number_Color.png
new file mode 100755
index 0000000..062c12d
Binary files /dev/null and b/VeggieTales/images/vineyard/Number_Color.png differ
diff --git a/VeggieTales/images/vineyard/Number_Grapes.png b/VeggieTales/images/vineyard/Number_Grapes.png
new file mode 100755
index 0000000..ecb403d
Binary files /dev/null and b/VeggieTales/images/vineyard/Number_Grapes.png differ
diff --git a/VeggieTales/images/vineyard/Number_Quality.png b/VeggieTales/images/vineyard/Number_Quality.png
new file mode 100755
index 0000000..e1d8cf5
Binary files /dev/null and b/VeggieTales/images/vineyard/Number_Quality.png differ
diff --git a/VeggieTales/images/vineyard/Number_Skin.png b/VeggieTales/images/vineyard/Number_Skin.png
new file mode 100755
index 0000000..adead18
Binary files /dev/null and b/VeggieTales/images/vineyard/Number_Skin.png differ
diff --git a/VeggieTales/images/vineyard/Number_Sugar.png b/VeggieTales/images/vineyard/Number_Sugar.png
new file mode 100755
index 0000000..b8b3a57
Binary files /dev/null and b/VeggieTales/images/vineyard/Number_Sugar.png differ
diff --git a/VeggieTales/images/vineyard/Number_Vigor.png b/VeggieTales/images/vineyard/Number_Vigor.png
new file mode 100755
index 0000000..36d4ec3
Binary files /dev/null and b/VeggieTales/images/vineyard/Number_Vigor.png differ
diff --git a/VeggieTales/images/vineyard/State_Fat.png b/VeggieTales/images/vineyard/State_Fat.png
new file mode 100755
index 0000000..68e88b0
Binary files /dev/null and b/VeggieTales/images/vineyard/State_Fat.png differ
diff --git a/VeggieTales/images/vineyard/State_Musty.png b/VeggieTales/images/vineyard/State_Musty.png
new file mode 100755
index 0000000..e245668
Binary files /dev/null and b/VeggieTales/images/vineyard/State_Musty.png differ
diff --git a/VeggieTales/images/vineyard/State_Rustle.png b/VeggieTales/images/vineyard/State_Rustle.png
new file mode 100755
index 0000000..ae38dad
Binary files /dev/null and b/VeggieTales/images/vineyard/State_Rustle.png differ
diff --git a/VeggieTales/images/vineyard/State_Sagging.png b/VeggieTales/images/vineyard/State_Sagging.png
new file mode 100755
index 0000000..f8a9c65
Binary files /dev/null and b/VeggieTales/images/vineyard/State_Sagging.png differ
diff --git a/VeggieTales/images/vineyard/State_Shimmer.png b/VeggieTales/images/vineyard/State_Shimmer.png
new file mode 100755
index 0000000..ba8831c
Binary files /dev/null and b/VeggieTales/images/vineyard/State_Shimmer.png differ
diff --git a/VeggieTales/images/vineyard/State_Shrivel.png b/VeggieTales/images/vineyard/State_Shrivel.png
new file mode 100755
index 0000000..4ebcf27
Binary files /dev/null and b/VeggieTales/images/vineyard/State_Shrivel.png differ
diff --git a/VeggieTales/images/vineyard/State_Wilting.png b/VeggieTales/images/vineyard/State_Wilting.png
new file mode 100755
index 0000000..406b91d
Binary files /dev/null and b/VeggieTales/images/vineyard/State_Wilting.png differ
diff --git a/VeggieTales/images/vineyard/Vine_Appreciation.png b/VeggieTales/images/vineyard/Vine_Appreciation.png
new file mode 100755
index 0000000..88c770b
Binary files /dev/null and b/VeggieTales/images/vineyard/Vine_Appreciation.png differ
diff --git a/VeggieTales/images/vineyard/Vine_Balance.png b/VeggieTales/images/vineyard/Vine_Balance.png
new file mode 100755
index 0000000..7efc6b8
Binary files /dev/null and b/VeggieTales/images/vineyard/Vine_Balance.png differ
diff --git a/VeggieTales/images/vineyard/Vine_Contemplation.png b/VeggieTales/images/vineyard/Vine_Contemplation.png
new file mode 100755
index 0000000..2be6135
Binary files /dev/null and b/VeggieTales/images/vineyard/Vine_Contemplation.png differ
diff --git a/VeggieTales/images/vineyard/Vine_Distraction.png b/VeggieTales/images/vineyard/Vine_Distraction.png
new file mode 100755
index 0000000..a817347
Binary files /dev/null and b/VeggieTales/images/vineyard/Vine_Distraction.png differ
diff --git a/VeggieTales/images/vineyard/Vine_P_Dexaglucose_10S.png b/VeggieTales/images/vineyard/Vine_P_Dexaglucose_10S.png
new file mode 100755
index 0000000..6ba14ef
Binary files /dev/null and b/VeggieTales/images/vineyard/Vine_P_Dexaglucose_10S.png differ
diff --git a/VeggieTales/images/vineyard/Vine_P_FOUR_Skin_KKKK.png b/VeggieTales/images/vineyard/Vine_P_FOUR_Skin_KKKK.png
new file mode 100755
index 0000000..3e43b15
Binary files /dev/null and b/VeggieTales/images/vineyard/Vine_P_FOUR_Skin_KKKK.png differ
diff --git a/VeggieTales/images/vineyard/Vine_P_Rainbow_AACCC.png b/VeggieTales/images/vineyard/Vine_P_Rainbow_AACCC.png
new file mode 100755
index 0000000..3a611d5
Binary files /dev/null and b/VeggieTales/images/vineyard/Vine_P_Rainbow_AACCC.png differ
diff --git a/VeggieTales/images/vineyard/Vine_P_Sugar_High_11S.png b/VeggieTales/images/vineyard/Vine_P_Sugar_High_11S.png
new file mode 100755
index 0000000..3d2ced4
Binary files /dev/null and b/VeggieTales/images/vineyard/Vine_P_Sugar_High_11S.png differ
diff --git a/VeggieTales/images/vineyard/Yes.png b/VeggieTales/images/vineyard/Yes.png
new file mode 100755
index 0000000..923c025
Binary files /dev/null and b/VeggieTales/images/vineyard/Yes.png differ
diff --git a/VeggieTales/luaScripts/VineTender.lua b/VeggieTales/luaScripts/VineTender.lua
new file mode 100755
index 0000000..11ac9c1
--- /dev/null
+++ b/VeggieTales/luaScripts/VineTender.lua
@@ -0,0 +1,426 @@
+-- VineTender.lua v1.1 by Teti, revised by Tallow)
+--
+-- Automatically tends vines based on the tends you specify.
+--
+
+loadfile("luaScripts/common.inc")( );
+
+askText = singleLine([[
+  Vine Tender v1.1 (by Teti, revised by Tallow) --
+  Automatically tends vineyards based on vine type.
+]]);
+
+knownVineNames = {
+  { name = "Appreciation",
+    image = "vineyard/Vine_Appreciation.png" },
+  { name = "Balance",
+    image = "vineyard/Vine_Balance.png" },
+  { name = "Contemplation",
+    image = "vineyard/Vine_Contemplation.png" },
+  { name = "Distraction",
+    image = "vineyard/Vine_Distraction.png" },
+  { name = "P Dexaglucose 10S",
+    image = "vineyard/Vine_P_Dexaglucose_10S.png" },
+  { name = "P FOUR Skin KKKK",
+    image = "vineyard/Vine_P_FOUR_Skin_KKKK.png" },
+  { name = "P Rainbow AACCC",
+    image = "vineyard/Vine_P_Rainbow_AACCC.png" },
+  { name = "P Sugar High 11S",
+    image = "vineyard/Vine_P_Sugar_High_11S.png" }
+};
+
+vineyardActions = { "Tend", "Harvest", "Cutting" };
+vineyardImages = { "", "vineyard/Harvest.png", "vineyards/Cutting.png" };
+
+stateNames = {"Fat", "Musty", "Rustle", "Sagging", "Shimmer",
+	      "Shrivel", "Wilting"};
+
+vineStates = { "vineyard/State_Fat.png", "vineyard/State_Musty.png",
+	       "vineyard/State_Rustle.png", "vineyard/State_Sagging.png",
+	       "vineyard/State_Shimmer.png", "vineyard/State_Shrivel.png",
+	       "vineyard/State_Wilting.png" };
+
+tendActions = {"AS", "MG", "PO", "SL", "SV", "TL", "TV"};
+tendIndices = { ["AS"] = 1, ["MG"] = 2, ["PO"] = 3, ["SL"] = 4, ["SV"] = 5,
+		["TL"] = 6, ["TV"] = 7 };
+
+tendImages = {
+  ["AS"] = "vineyard/Action_AS.png",
+  ["MG"] = "vineyard/Action_MG.png",
+  ["PO"] = "vineyard/Action_PO.png",
+  ["SL"] = "vineyard/Action_SL.png",
+  ["SV"] = "vineyard/Action_SV.png",
+  ["TL"] = "vineyard/Action_TL.png",
+  ["TV"] = "vineyard/Action_TV.png" };
+
+vigorNames = { "1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11",
+	       "12", "13", "14", "15" };
+
+vines = {};
+vinesUsed = {};
+vineImagesUsed = {};
+tendedCount = 0;
+
+function doit()
+  askForWindow(askText);
+  parseVines();
+
+  local status = "";
+  while 1 do
+    local action = promptVineyard(status);
+
+    local x, y = srMousePos();
+    openAndPin(x, y, 500);
+
+    if action == 1 then
+      status = processVineyard();
+    else
+      srReadScreen();
+      local clickPos = srFindImage(vineyardImages[action]);
+      if clickPos then
+	safeClick(clickPos[0], clickPos[1]);
+	tendedCount = tendedCount + 1;
+	status = "(" .. tendedCount .. ") " .. vineyardActions[action]
+	  .. " complete";
+      else
+	status = "Cannot find " .. vineyardActions[action] .. " button";
+      end
+    end
+    closeAllWindows();
+  end
+end
+
+function promptVineyard(status)
+  local action = 1;
+  while not lsControlHeld() do
+    local edit = lsButtonText(10, lsScreenY - 30, 0, 120, 0xffffffff,
+			      "Edit Tends");
+--    action = lsDropdown("VineyardAction", 80, lsScreenY - 120, 0, 150, action,
+--			vineyardActions);
+    lsPrint(10, lsScreenY - 90, 0, 0.7, 0.7, 0xd0d0d0ff,
+	    "Tap control over a vineyard");
+    statusScreenPause(status);
+    if edit then
+      promptTends();
+    end
+    lsSleep(tick_delay);
+  end
+
+  while lsControlHeld() do
+    statusScreen("Release control");
+  end
+  return action;
+end
+
+function promptTends()
+  local done = false;
+  local vineIndex = 1;
+  while not done do
+    local add = lsButtonText(lsScreenX/2 - 60, 10, 0, 120, 0xffffffff,
+			     "Add Tend");
+    local edit = false;
+    local delete = false;
+    if #vines > 0 then
+      local tends = {};
+      for i=1,#vines do
+	tends[i] = vines[i].name;
+      end
+      vineIndex = lsDropdown("TendIndex", 30, 80, 0, 250, vineIndex,
+			     tends);
+      edit = lsButtonText(lsScreenX/2 - 60, 120, 0, 120, 0xffffffff,
+			  "Edit Tend");
+      delete = lsButtonText(lsScreenX/2 - 60, 150, 0, 120, 0xffffffff,
+			    "Delete Tend");
+    end
+    done = lsButtonText(10, lsScreenY - 30, 0, 100, 0xffffffff, "Done");
+    if lsButtonText(lsScreenX - 110, lsScreenY - 30, 0, 100, 0xffffffff,
+		    "End Script") then
+      error(quitMessage);
+    end
+    checkBreak();
+    lsSleep(tick_delay);
+    lsDoFrame();
+    if add then
+      promptAdd();
+    elseif edit then
+      promptEdit(vines[vineIndex]);
+    elseif delete then
+      table.remove(vines, vineIndex);
+      saveVines();
+      parseVines();
+    end
+    lsSleep(tick_delay);
+  end
+end
+
+function promptAdd()
+  local vineNames = {};
+  local vineImages = {};
+  for i=1,#knownVineNames do
+    if not vinesUsed[knownVineNames[i].name]
+      and not vineImagesUsed[knownVineNames[i].image]
+    then
+      vineNames[#vineNames + 1] = knownVineNames[i].name;
+      vineImages[#vineImages + 1] = knownVineNames[i].image;
+    end
+  end
+  vineNames[#vineNames + 1] = "Other";
+  local otherIndex = #vineNames;
+  local addIndex = 1;
+
+  local done = false;
+  while not done do
+    lsPrint(10, 10, 0, 1.0, 1.0, 0xffffffff, "Adding New Vine");
+    done = lsButtonText(10, lsScreenY - 30, 0, 80, 0xffffffff, "Next");
+    local cancel = lsButtonText(100, lsScreenY - 30, 0, 80, 0xffffffff,
+				"Cancel");
+    if lsButtonText(lsScreenX - 110, lsScreenY - 30, 0, 100, 0xffffffff,
+		    "End Script") then
+      error(quitMessage);
+    end
+    
+    addIndex = lsDropdown("VineAddIndex", 30, 50, 0, 250, addIndex,
+			  vineNames);
+    local vineName, vineImage;
+    if addIndex == otherIndex then
+      local foo;
+      lsPrint(5, 100, 0, 1.0, 1.0, 0xd0d0d0ff, "Name:");
+      foo, vineName = lsEditBox("aVineName", 80, 100, 0, 200, 30, 1.0, 1.0,
+				0x000000ff, "Custom");
+      lsPrint(5, 140, 0, 1.0, 1.0, 0xd0d0d0ff, "Image:");
+      foo, vineImage = lsEditBox("aVineImage", 80, 140, 0, 200, 30, 1.0, 1.0,
+				 0x000000ff, "vineyard/Custom.png");
+    else
+      vineName = vineNames[addIndex];
+      vineImage = vineImages[addIndex];
+    end
+
+    if vinesUsed[vineName] then
+      done = false;
+      lsPrint(10, 220, 10, 0.7, 0.7, 0xFF2020ff, "Vine Name In Use");
+    elseif vineImagesUsed[vineImage] then
+      done = false;
+      lsPrint(10, 220, 10, 0.7, 0.7, 0xFF2020ff, "Image In Use");
+    else
+      local status, error = pcall(srImageSize, vineImage);
+      if not status then
+	done = false;
+	lsPrint(10, 220, 10, 0.7, 0.7, 0xFF2020ff, "Image Not Found");
+      end
+    end
+
+    checkBreak();
+    lsSleep(tick_delay);
+    lsDoFrame();
+
+    if done then
+      vines[#vines + 1] = {
+	name = vineName,
+	image = vineImage,
+	tends = {1, 1, 1, 1, 1, 1, 1},
+	vigors = {1, 1, 1, 1, 1, 1, 1}
+      };
+      vinesUsed[vineName] = vines[#vines];
+      vineImagesUsed[vineImage] = vines[#vines];
+      promptEdit(vines[#vines]);
+    elseif cancel then
+      done = true;
+    end
+    lsSleep(tick_delay);
+  end
+end
+
+function promptEdit(vine)
+  local done = false;
+  while not done do
+    lsPrint(10, 10, 0, 1.0, 1.0, 0xffffffff, "Editing " .. vine.name);
+    lsPrint(80, 50, 0, 0.7, 0.7, 0xd0d0d0ff, "Action");
+    lsPrint(160, 50, 0, 0.7, 0.7, 0xd0d0d0ff, "Vigor");
+    local y = 70;
+    for i=1,#stateNames do
+      lsPrint(10, y, 0, 0.7, 0.7, 0xd0d0d0ff, stateNames[i] .. ":");
+      local tendIndex = tendIndices[vine.tends[i]];
+      local tend  = lsDropdown(stateNames[i] .. "T" .. "-" .. vine.name,
+			       80, y, 0, 60, tendIndex, tendActions);
+      vine.tends[i] = tendActions[tend];
+      vine.vigors[i] = lsDropdown(stateNames[i] .. "V" .. "-" .. vine.name,
+				  160, y, 0, 60, vine.vigors[i], vigorNames);
+				  
+      y = y + 30;
+    end
+    done = lsButtonText(10, lsScreenY - 30, 0, 80, 0xffffffff, "Save");
+    local cancel = lsButtonText(100, lsScreenY - 30, 0, 80, 0xffffffff,
+				"Cancel");
+    if lsButtonText(lsScreenX - 110, lsScreenY - 30, 0, 100, 0xffffffff,
+		    "End Script") then
+      error(quitMessage);
+    end
+
+    checkBreak();
+    lsSleep(tick_delay);
+    lsDoFrame();
+    if done then
+      saveVines();
+    elseif cancel then
+      parseVines();
+      done = true;
+    end
+    lsSleep(tick_delay);
+  end
+end
+
+function processVineyard()
+  local status = "";
+  srReadScreen();
+
+  local window = srFindImage("vineyard/CanBeTended.png" );
+  if not window then
+    return "Vineyard is not ready for tending";
+  end
+
+  local vigorPos = srFindImage("vineyard/Number_Vigor.png" );
+  if not vigorPos then
+    return "Could not find Vigor";
+  end
+
+  local vigor = ocrNumber(vigorPos[0]+44, vigorPos[1], BOLD_SET);
+  if not vigor then
+    return "Could not read Vigor";
+  end
+
+  local vineType = nil;
+  for i=1,#vines do
+    lsPrintln("Testing " .. vines[i].image);
+    if srFindImage(vines[i].image, 10000) then
+      lsPrintln("Found " .. vines[i].image);
+      vineType = vines[i];
+      break;
+    end
+  end
+  if not vineType then
+    return "Could not identify this vine type";
+  end
+
+  local vineState = findVineState();
+  if vineState == 0 then
+    return "Could not determine vine state";
+  end
+
+  if vigor <= vineType.vigors[vineState] then
+    return "This vine does not have enough vigor. Time to harvest.";
+  end
+
+  local clickPos = srFindImage(tendImages[vineType.tends[vineState]]);
+  if not clickPos then
+    return "Could not find tend action to click";
+  end
+  safeClick(clickPos[0], clickPos[1]);
+  sleepWithStatus(200, "Tending vineyard");
+  return statusSuccess(vineType);
+end
+
+function statusSuccess(vine)
+  srReadScreen();
+  tendedCount = tendedCount + 1;
+  local result = "(" .. tendedCount .. ") Tended " .. vine.name .. "\n\n";
+  result = result .. statusNumber("Acid");
+  result = result .. statusNumber("Color");
+  result = result .. statusNumber("Grapes");
+  result = result .. statusNumber("Quality");
+  result = result .. statusNumber("Skin");
+  result = result .. statusNumber("Sugar");
+  result = result .. statusNumber("Vigor");
+  return result;
+end
+
+function statusNumber(name)
+  local result = "";
+  local image = "vineyard/Number_" .. name .. ".png"
+  local anchor = srFindImage(image);
+  if anchor then
+    local number = ocrNumber(anchor[0] + srImageSize(image)[0] + 5,
+			     anchor[1], BOLD_SET);
+    if number then
+      result = name .. ": " .. number .. "\n";
+    end
+  end
+  return result;
+end
+
+
+--      elseif vine == 2 then
+--	if sagging and vigor -1>0 then
+--	  clickpos=srFindImage("V_TV.png")		
+--	elseif wilting and vigor -1>0 then
+--	  clickpos=srFindImage("V_PO.png")		
+--	elseif musty and vigor -2 >0 then
+--	  clickpos=srFindImage("V_TV.png")		
+--	elseif fat and vigor -4 >0 then 
+--	  clickpos=srFindImage("V_TL.png")		
+--	elseif rustle and vigor -1>0 then
+--	  clickpos=srFindImage("V_AS.png")		
+--	elseif shrivel and vigor -3>0 then
+--	  clickpos=srFindImage("V_SV.png")		
+--	elseif shimmer and vigor -1>0 then
+--	  clickpos=srFindImage("V_SV.png")		
+--	end
+
+function findVineState()
+  local result = 0;
+  for i=1,#vineStates do
+    if srFindImage(vineStates[i]) then
+      result = i;
+      break;
+    end
+  end
+  return result;
+end
+
+function parseVines()
+  vines = {};
+  vinesUsed = {};
+  vineImagesUsed = {};
+  local file = io.open("vines.txt", "a+");
+  io.close(file);
+  for line in io.lines("vines.txt") do
+    local fields = csplit(line, ",");
+    if #fields == 9 then
+      vines[#vines + 1] = {
+	name = fields[1],
+	image = fields[2],
+	tends = {},
+	vigors = {}
+      };
+      vinesUsed[fields[1]] = vines[#vines];
+      vineImagesUsed[fields[2]] = vines[#vines];
+
+      for i=3,#fields do
+	local sub = csplit(fields[i], "-");
+	if #sub ~= 2 then
+	  error("Failed parsing line: " .. line);
+	end
+	if not tendImages[sub[1]] then
+	  error("Failed parsing line: " .. line);
+	end
+	vines[#vines].tends[i-2] = sub[1];
+	local vigor = tonumber(sub[2])
+	if not vigor then
+	  error("Failed parsing line: " .. line);
+	end
+	vines[#vines].vigors[i-2] = vigor;
+      end
+    end
+  end
+end
+
+function saveVines()
+  local file = io.open("vines.txt", "w+");
+  for i=1,#vines do
+    file:write(vines[i].name .. "," .. vines[i].image);
+    for j=1,#vines[i].tends do
+      file:write("," .. vines[i].tends[j] .. "-" .. vines[i].vigors[j]);
+    end
+    file:write("\n");
+  end
+  io.close(file);
+end