diff --git a/exchangeclone/emc_link.lua b/exchangeclone/emc_link.lua
index a5c8782..39288d1 100644
--- a/exchangeclone/emc_link.lua
+++ b/exchangeclone/emc_link.lua
@@ -1,71 +1,88 @@
--- I want to make this without a formspec.
+local S = minetest.get_translator()
 
-local function on_rightclick(pos, node, player, itemstack, pointed_thing)
-    local meta = minetest.get_meta(pos)
-    local inv = meta:get_inventory()
-    -- Would be sneak but that would require me to override the player's hand...
-    if player:get_player_control().aux1 then
-        local contained = inv:get_stack("star", 1)
-        if minetest.get_item_group(itemstack:get_name(), "klein_star") > 0 then
-            inv:set_stack("star", 1, itemstack)
-            return contained
-        elseif itemstack:is_empty() then
-            inv:set_stack("star", 1, ItemStack(""))
-            return contained
-        end
-    elseif not itemstack:is_empty() then
-        local dealiased = exchangeclone.handle_alias(itemstack)
-        local emc = exchangeclone.get_item_emc(dealiased)
-        if emc and emc > 0 then
-            minetest.chat_send_player(player:get_player_name(), "Target Item: "..ItemStack(dealiased):get_short_description())
-            meta:set_string("target_item", dealiased)
-        end
-    end
+local formspec = table.concat({
+    "size[",(exchangeclone.mcl and 9 or 8),",9]",
+    "label[1,2;",S("Input"),"]",
+    "list[context;input;2,2;1,1;]",
+    "label[4,1;",S("Target"),"]",
+    "list[context;target;3,1;1,1;]",
+    "label[4,2;",S("Star"),"]",
+    "list[context;star;3,2;1,1;]",
+    "label[4,3;",S("Output"),"]",
+    "list[context;output;3,3;1,1;]",
+    exchangeclone.inventory_formspec(0,5),
+    "listring[current_player;main]",
+    "listring[context;input]",
+    "listring[current_player;main]",
+    "listring[context;star]",
+    "listring[current_player;main]",
+    "listring[context;target]",
+    "listring[current_player;main]",
+    "listring[context;output]",
+})
+if exchangeclone.mcl then
+    formspec = formspec..
+    mcl_formspec.get_itemslot_bg(3,1,1,3)..
+    mcl_formspec.get_itemslot_bg(2,2,1,1)
 end
 
 local function link_action(pos)
-    local using_star = true
+    minetest.log("woo")
     local player
     local meta = minetest.get_meta(pos)
     local inv = meta:get_inventory()
-    if minetest.get_item_group(inv:get_stack("star", 1):get_name(), "klein_star") < 1 then
+    local limit
+    local using_star
+    local input_stack = inv:get_stack("input", 1)
+    local stored_emc
+    local target = inv:get_stack("target", 1):get_name()
+    local output_stack = inv:get_stack("output", 1)
+    local in_indiv_emc = exchangeclone.get_item_emc(input_stack:peek_item(1)) or 0
+    local target_emc = exchangeclone.get_item_emc(target)
+    local stack_max = ItemStack(target):get_stack_max()
+
+    local star_stack = inv:get_stack("star", 1)
+    if minetest.get_item_group(star_stack:get_name(), "klein_star") > 0 then
+        using_star = true
+        limit = exchangeclone.get_star_max(star_stack)
+        stored_emc = exchangeclone.get_star_itemstack_emc(star_stack)
+        minetest.log("oh no")
+    else
         using_star = false
+        limit = exchangeclone.limit
         player = minetest.get_player_by_name(meta:get_string("exchangeclone_placer"))
-        if not (player and player ~= "") then return end
+        if not (player and player ~= "") then minetest.log(dump(meta:get_string("exchangeclone_placer"))) return end
+        stored_emc = exchangeclone.get_player_emc(player)
     end
-    local target_item = meta:get_string("target_item")
-    if target_item and target_item ~= "" and minetest.registered_items[target_item] then
-        local input_stack = inv:get_stack("input", 1)
-        local output_stack = inv:get_stack("output", 1)
-        -- make sure the target matches the output (including enchantments)
-        if not inv:is_empty("output") then
-            if exchangeclone.handle_alias(target_item) ~= output_stack:get_name() then
-                return
+    -- Construct
+    minetest.log(dump({target, output_stack:get_name()}))
+    if target ~= "" and (output_stack:is_empty() or exchangeclone.handle_alias(output_stack) == target) then
+        local out_count = math.min(stack_max - output_stack:get_count(), math.floor(stored_emc/target_emc))
+        if out_count > 0 then
+            inv:add_item("output", ItemStack(target.." "..out_count))
+            if using_star then
+                exchangeclone.add_star_emc(inv, "star", 1, star_stack, -out_count*target_emc)
+            else
+                exchangeclone.add_player_emc(player, -out_count*target_emc)
             end
         end
-        local result = exchangeclone.handle_alias(target_item)
-        -- make sure star/player has enough EMC
-        local current_emc
-        if using_star then
-            current_emc = exchangeclone.get_star_emc(inv, "star", 1)
-        else
-            current_emc = exchangeclone.get_player_emc(player)
-        end
-        local emc_value = exchangeclone.get_item_emc(input_stack:get_name())
-        if emc_value and emc_value > 0 then
-            local max_amount = math.min(input_stack:get_stack_max(), math.floor(current_emc/emc_value))
-            local added_amount = max_amount - inv:add_item("output", ItemStack(result.." "..max_amount)):get_count()
-            local result_emc = math.min(current_emc, current_emc - (emc_value * added_amount)) -- not sure if "math.min()" is necessary
+    end
+
+    -- Deconstruct
+    if not input_stack:is_empty() and stored_emc < limit then
+        local max_count = math.min(math.floor((limit - stored_emc)/in_indiv_emc), input_stack:get_count())
+        if max_count > 0 then
+            inv:remove_item("input", ItemStack(input_stack:get_name().." "..max_count))
             if using_star then
-                exchangeclone.set_star_emc(inv, "star", 1, result_emc)
+                exchangeclone.add_star_emc(inv, "star", 1, max_count*in_indiv_emc)
             else
-                exchangeclone.set_player_emc(player, result_emc)
+                exchangeclone.add_player_emc(player, max_count*in_indiv_emc)
             end
         end
     end
 
     local timer = minetest.get_node_timer(pos)
-    if not (target_item and target_item ~= "" and minetest.registered_items[target_item]) then
+    if inv:get_stack("input", 1):is_empty() and inv:get_stack("target", 1):is_empty() then
         timer:stop()
     else
         if not timer:is_started() then
@@ -74,6 +91,50 @@ local function link_action(pos)
     end
 end
 
+local function allow_metadata_inventory_put(pos, listname, index, stack, player)
+    if player and player.get_player_name and minetest.is_protected(pos, player:get_player_name()) then
+        return 0
+    end
+    if listname == "star" then
+        if minetest.get_item_group(stack:get_name(), "klein_star") > 0 then
+            return stack:get_count()
+        end
+    elseif listname == "input" then
+        local emc = exchangeclone.get_item_emc(stack)
+        if emc and emc > 0 then
+            return stack:get_count()
+        end
+    elseif listname == "target" then
+        local single_item = stack:peek_item(1)
+        local emc = exchangeclone.get_item_emc(single_item)
+        if emc and emc > 0 then
+            minetest.get_meta(pos):get_inventory():set_stack("target", 1, ItemStack(exchangeclone.handle_alias(single_item)))
+            link_action(pos)
+        end
+    end
+    return 0
+end
+
+local function allow_metadata_inventory_move(pos, from_list, from_index, to_list, to_index, count, player)
+    local meta = minetest.get_meta(pos)
+    local inv = meta:get_inventory()
+    local stack = inv:get_stack(from_list, from_index)
+    return allow_metadata_inventory_put(pos, to_list, to_index, stack, player)
+end
+
+local function allow_metadata_inventory_take(pos, listname, index, stack, player)
+    if minetest.is_protected(pos, player:get_player_name()) then
+        return 0
+    end
+    if listname == "target" then
+        minetest.get_meta(pos):get_inventory():set_stack("target", 1, ItemStack(""))
+        link_action(pos)
+        return 0
+    else
+        return stack:get_count()
+    end
+end
+
 minetest.register_node("exchangeclone:emc_link", {
     description = "EMC Link\nAllows automation with personal EMC",
     tiles = {"exchangeclone_emc_link.png"},
@@ -85,7 +146,9 @@ minetest.register_node("exchangeclone:emc_link", {
         inv:set_size("star", 1)
         inv:set_size("input", 1)
         inv:set_size("output", 1)
+        inv:set_size("target", 1)
         meta:set_string("infotext", "EMC Link")
+        meta:set_string("formspec", formspec)
     end,
     can_dig = exchangeclone.can_dig,
     after_dig_node = exchangeclone.drop_after_dig({"input", "star", "output"}),
@@ -99,7 +162,14 @@ minetest.register_node("exchangeclone:emc_link", {
             pipeworks.after_place(pos, player, itemstack, pointed_thing)
         end
     end,
+    on_metadata_inventory_put = link_action,
+    on_metadata_inventory_move = link_action,
+    on_metadata_inventory_take = link_action,
+    on_timer = link_action,
 	sounds = exchangeclone.sound_mod.node_sound_stone_defaults(),
 	_mcl_blast_resistance = 10,
 	_mcl_hardness = 8,
+    allow_metadata_inventory_move = allow_metadata_inventory_move,
+    allow_metadata_inventory_put = allow_metadata_inventory_put,
+    allow_metadata_inventory_take = allow_metadata_inventory_take,
 })
\ No newline at end of file