16

package.loaded.curlib = nil;
package.loaded.textalign = nil;
local curlib = require("curlib");
local align = require("textalign");
component = require("component");
local term = require("term");
local gpu = component.gpu;
local running = true;
x1,y1,z1 = 0,-1,0
debug = component.debug;
world = debug.getWorld();
player = debug.getPlayer("3131CuNb");

function refreshCord ()
  x,y,z = player.getPosition();
  x1,y1,z1 = math.floor(x),math.floor(y)+2,math.floor(z);
  end

local app = curlib.app:new();
local win1 = curlib.window:new({ x = 3, y = 2,
  width = 60, height = 20, shadow = true});
local button = curlib.button:new({
  x = win1.width - 9,
  y = win1.height -1,
  width = 8, height = 1,
  text = "Quit", shadow = true}
);

input1 = curlib.input:new({x = 10, y = 3, width = 30});
input2 = curlib.input:new({x = 2, y = 17, width = 30,text="dreamcraft:item.GlowingMarshmallow"});
meta = curlib.input:new({x = 35, y = 14, width = 6,text = "0"})
inputBlockID = curlib.input:new({x = 35, y = 12, width = 6,text = "3327"})
button.onClick = function(control, x, y)
  app.status("my click function called");
  running = false;
end


local btnAlign1 = curlib.button:new({ x = 2,  y = 10, width = 15, height = 2, text = "CommandBlock"});
local addCode = curlib.button:new({ x = 2,  y = 3, width = 10, height = 1, text = "addCode"});
local removeBlockUp = curlib.button:new({ x = 2,  y = 7, width = 15, height = 2, text = "removeBlockUp"});
local btnAlign2 = curlib.button:new({ x = 2, y = 5, width = 10, height = 1, text = "give Items"});
local popInfinityChest = curlib.button:new({ x = 35, y = 5, width = 5, height = 5, text = "popBlock"});
local doubleAll = curlib.button:new({ x = 57, y = 8, width = 10, height = 5, text = "doubleAll"});


btnAlign1.onClick = function (control, x, y)
  refreshCord ()
  world.setBlock(x1,y1,z1,137,0);
end

removeBlockUp.onClick = function (control, x, y)
  refreshCord ()
  world.setBlock(x1,y1,z1,0,0);
end


popInfinityChest.onClick = function (control, x, y)
  refreshCord ()
  world.setBlock(x1,y1,z1,tonumber(inputBlockID.text),tonumber(meta.text));
end


doubleAll.onClick = function (control, x, y)
      refreshCord ()
      if world.getBlockId(x1,y1,z1) == 3327 then
      nbt = world.getTileNBT(x1,y1,z1)
    for k = 1, 244 do
      nbtk=nbt["value"]["Contents"]["value"][k]
      if nbtk~= nil then
        nbt["value"]["Contents"]["value"][k]["value"]["intCount"]["value"]=nbtk["value"]["intCount"]["value"]*2
        end
      end
    world.setTileNBT(x1,y1,z1,nbt)
    end
  end


addCode.onClick = function (control, x, y)
    refreshCord ()
      inpu = input1.text
      nbt = world.getTileNBT(x1,y1,z1)
      nbt["value"]["Command"]["value"]=inpu
      world.setTileNBT(x1,y1,z1,nbt)
end

btnAlign2.onClick = function (control, x, y)
  refreshCord ()
  inpu = input2.text
  metaData = 0
  if meta.text ~= "" and inpu ~= ""  then
    metaData = tonumber(meta.text)
    world.insertItem(inpu,64,tonumber(metaData),"",x1,y1,z1,1)

  end

end





--adds the button to the window
win1:addChild(button);
--adds the text to the window
win1:addChild(btnAlign1);
win1:addChild(btnAlign2);
win1:addChild(popInfinityChest);
win1:addChild(removeBlockUp);
win1:addChild(addCode);
win1:addChild(doubleAll);

win1:addChild(input1);
win1:addChild(input2);
win1:addChild(inputBlockID);
win1:addChild(meta);

--adds the window to the app
app:addChild(win1);

--initializes the app and makes a first screen draw of everything
app:init();


-- application main loop
while running do

  local event, addr, arg1, arg2, arg3 =  app:doEvents();

  if (event == "clipboard") then
    input2.text= arg1
  end
  if (event == "interrupted") then
    running = false;
  end
end


curlib.cleanPalette();

gpu.setBackground(0);
gpu.setForeground(0xc1c1c1);
term.clear();