Chest/inventory Peripherals

local p = "me_drive_0"
p.getTotalItemBytes()

for key, value in pairs(peripheral.getMethods("me_drive_0")) do
  print(key.." "..value)
end

local p = "me_drive_0"

local p = peripheral.wrap("me_drive_0")

Noobular, on 14 September 2014 - 01:33 AM said:

i tried that before and it still didnt work for what ever reason.
…

m.write(slot.name)

Bomb Bloke, on 14 September 2014 - 10:34 AM said:

Or more specifically, that "slot" isn't a table that can be indexed into.
…

function CheckItems(s)
    local InvSize = Catagory.getInventorySize()
for CurrSlot = 1, InvSize-1 do
   local slot = C1.getStackInSlot(CurrSlot)
  if CurrSlot == nil then -- cycling
   m.write("Nothing")
   else
	 m.setCursorPos(1,CurrSlot+2)
   m.write("|"..slot.name)
   m.setCursorPos(25,CurrSlot+2)
   m.write(""..slot.id.."")
   m.setCursorPos(33,CurrSlot+2)
   m.write(""..slot.qty)
    end
end
end

Noobular, on 14 September 2014 - 09:32 PM said:

Actually… it turns out that when it is going over the catagory.getStackInSlot() it hits a nil then it stops it self, but i changed the code to
…
but for some reason it still wont like stop error….

if CurrSlot == nil then
  m.write("Nothing")
else
  local slot = C1.getStackInSlot(CurrSlot)
  m.setCursorPos(1,CurrSlot+2)
  m.write("|"..slot.name)
  --# rest of code

Dog, on 14 September 2014 - 09:43 PM said:

You need to move your check for nil before your first invocation of the variable, like so…

Dog, on 15 September 2014 - 02:29 AM said:

D'oh, talk about not seeing the forest for the trees - slightly embarrassed that I missed something so obvious. Thanks, yet again, Bomb Bloke.

for i = 1, #itemList do --# cycle through the master item list
  if newItem.name == itemList[i].name then --# if the new item's name matches the name of item [i] in the master list then...
    itemList[i].count = itemList[i].count + newItem.count --# add the count of the matching item to the total in the master list
    itemList[i].slots[#itemList[i].slots+1] = newItem.slotNumber --# store the slot number, so we know which slot(s) this item is in
    break --# break out of the loop because we're done and don't need to let the loop finish
  end
end

os.loadAPI("button")
m = peripheral.wrap("back")
C1 = peripheral.wrap("obsidian_10") -- Basic materials
C2 = peripheral.wrap("obsidian_11") -- Machines
C3 = peripheral.wrap("obsidian_12") -- Armor / Weapons
C4 = peripheral.wrap("obsidian_13") -- Misc
C5 = peripheral.wrap("obsidian_14") -- Extra
C6 = peripheral.wrap("obsidian_15") -- Extra
Catagory = C1
m.clear()
-- ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄
--▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌
-- ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀
-- ▄			   ▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄   ▄		    ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄
--▐░▌			 ▐░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░▌ ▐░▌		  ▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌
-- ▐░▌		   ▐░▌ ▐░█▀▀▀▀▀▀▀█░▌▐░█▀▀▀▀▀▀▀█░▌ ▀▀▀▀█░█▀▀▀▀ ▐░█▀▀▀▀▀▀▀█░▌▐░█▀▀▀▀▀▀▀█░▌▐░▌		  ▐░█▀▀▀▀▀▀▀▀▀ ▐░█▀▀▀▀▀▀▀▀▀
--  ▐░▌		 ▐░▌  ▐░▌	   ▐░▌▐░▌	   ▐░▌	 ▐░▌	 ▐░▌	   ▐░▌▐░▌	   ▐░▌▐░▌		  ▐░▌		  ▐░▌		 
--   ▐░▌	   ▐░▌   ▐░█▄▄▄▄▄▄▄█░▌▐░█▄▄▄▄▄▄▄█░▌	 ▐░▌	 ▐░█▄▄▄▄▄▄▄█░▌▐░█▄▄▄▄▄▄▄█░▌▐░▌		  ▐░█▄▄▄▄▄▄▄▄▄ ▐░█▄▄▄▄▄▄▄▄▄
--    ▐░▌	 ▐░▌    ▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌	 ▐░▌	 ▐░░░░░░░░░░░▌▐░░░░░░░░░░▌ ▐░▌		  ▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌
--	 ▐░▌   ▐░▌	 ▐░█▀▀▀▀▀▀▀█░▌▐░█▀▀▀▀█░█▀▀	  ▐░▌	 ▐░█▀▀▀▀▀▀▀█░▌▐░█▀▀▀▀▀▀▀█░▌▐░▌		  ▐░█▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀█░▌
--	  ▐░▌ ▐░▌	  ▐░▌	   ▐░▌▐░▌	 ▐░▌	   ▐░▌	 ▐░▌	   ▐░▌▐░▌	   ▐░▌▐░▌		  ▐░▌				    ▐░▌
--	   ▐░▐░▌	   ▐░▌	   ▐░▌▐░▌	  ▐░▌  ▄▄▄▄█░█▄▄▄▄ ▐░▌	   ▐░▌▐░█▄▄▄▄▄▄▄█░▌▐░█▄▄▄▄▄▄▄▄▄ ▐░█▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄█░▌
--	    ▐░▌	    ▐░▌	   ▐░▌▐░▌	   ▐░▌▐░░░░░░░░░░░▌▐░▌	   ▐░▌▐░░░░░░░░░░▌ ▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌
--		 ▀		  ▀		 ▀  ▀		 ▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀		 ▀  ▀▀▀▀▀▀▀▀▀▀   ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀
																														  
Vers = "[1.0]"
FirstButtonLength = 24
ItemValue = 5
ScreenVal = "Idle"

function header()
m.setTextColor(colors.red)
m.setBackgroundColor(colors.gray)
CText("*********************",15,1,colors.red,colors.gray)
CText("				    *",15,2,colors.red,colors.gray)
    CText("*Noobs Shop "..Vers,15,2,colors.red,colors.gray)
CText("				    *",15,3,colors.red,colors.gray)
    CText("*Currently: "..ScreenVal,15,3,colors.red,colors.gray)
CText("*********************",15,4,colors.red,colors.gray)
    m.setBackgroundColor(colors.black)
   
end
function CText(text,x,y,color,background)
m.setBackgroundColor(background)
m.setTextColor(color)
m.setCursorPos(x,y)
   m.write(text) 
end
-- ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄
--▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌
-- ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀
-- ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄	    ▄  ▄▄▄▄▄▄▄▄▄▄▄
--▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░▌	  ▐░▌▐░░░░░░░░░░░▌
--▐░█▀▀▀▀▀▀▀▀▀ ▐░█▀▀▀▀▀▀▀▀▀ ▐░█▀▀▀▀▀▀▀▀▀  ▀▀▀▀█░█▀▀▀▀  ▀▀▀▀█░█▀▀▀▀ ▐░█▀▀▀▀▀▀▀█░▌▐░▌░▌	 ▐░▌▐░█▀▀▀▀▀▀▀▀▀
--▐░▌		  ▐░▌		  ▐░▌			   ▐░▌		  ▐░▌	 ▐░▌	   ▐░▌▐░▌▐░▌    ▐░▌▐░▌		 
--▐░█▄▄▄▄▄▄▄▄▄ ▐░█▄▄▄▄▄▄▄▄▄ ▐░▌			   ▐░▌		  ▐░▌	 ▐░▌	   ▐░▌▐░▌ ▐░▌   ▐░▌▐░█▄▄▄▄▄▄▄▄▄
--▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░▌			   ▐░▌		  ▐░▌	 ▐░▌	   ▐░▌▐░▌  ▐░▌  ▐░▌▐░░░░░░░░░░░▌
-- ▀▀▀▀▀▀▀▀▀█░▌▐░█▀▀▀▀▀▀▀▀▀ ▐░▌			   ▐░▌		  ▐░▌	 ▐░▌	   ▐░▌▐░▌   ▐░▌ ▐░▌ ▀▀▀▀▀▀▀▀▀█░▌
--		  ▐░▌▐░▌		  ▐░▌			   ▐░▌		  ▐░▌	 ▐░▌	   ▐░▌▐░▌    ▐░▌▐░▌		  ▐░▌
-- ▄▄▄▄▄▄▄▄▄█░▌▐░█▄▄▄▄▄▄▄▄▄ ▐░█▄▄▄▄▄▄▄▄▄	  ▐░▌	  ▄▄▄▄█░█▄▄▄▄ ▐░█▄▄▄▄▄▄▄█░▌▐░▌	 ▐░▐░▌ ▄▄▄▄▄▄▄▄▄█░▌
--▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌	 ▐░▌	 ▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░▌	  ▐░░▌▐░░░░░░░░░░░▌
-- ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀	   ▀	   ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀	    ▀▀  ▀▀▀▀▀▀▀▀▀▀▀
function CheckItems()
m.setBackgroundColor(colors.red)
   local InvSize = Catagory.getInventorySize()
for CurrSlot = 1, InvSize-1 do --Checking slots
   local slot = C1.getStackInSlot(CurrSlot)
  if slot ~= nil then -- Slots with stuff in them
   m.setBackgroundColor(colors.red)
   m.write(slot.name.."  QTY: "..slot.qty)
    end
end
end
function NewItem(itemname,itemvar,xmin,price) -- Constructor for Items
m.setTextColor(colors.red)
m.setBackgroundColor(colors.gray)
itemvar = 0
ItemYStart = ItemYStart + 1
ymax = 1 
xmax = 20
price = ("$"..price)
m.setTextColor(colors.black)
m.setCursorPos(xmin,ItemYStart)
    m.write("				    "..itemvar.." ("..price.."/Ea)")
    m.setTextColor(colors.red)
    m.setCursorPos(xmin,ItemYStart)
    m.write(itemname..": ")
end
function BuyBasicMaterialsList() -- All Basic Materials
NewItem("Sand",Sand,2,100)
NewItem("Sandstone",Sandstone,2,100)
NewItem("Cobble Stone",CobbleStone,2,100)
NewItem("Stone",Stone,2,100)
NewItem("Grass", Grass,2,100)
NewItem("Dirt",Dirt,2,100)
NewItem("Oak log",Olog,2,100)
NewItem("Spruce Log",Slog,2,100)
NewItem("Maple Log",Mlog,2,100)
NewItem("Jungle Log",Jlog,2,100)
NewItem("Wooden Planks",Planks,2,100)
end
function BuyMachinesList()
NewItem("MFSU",MFSU,2,100) 
end
function BuyArmorWeaponList()
  NewItem("Nano Chestplate",NanoChest,2,100)
end
function BuyMiscList()
  NewItem("Wooden Fence",WoodFence,2,100) 
end
-- ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄
--▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌
-- ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀
-- ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄	    ▄  ▄▄▄▄▄▄▄▄▄▄▄
--▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░▌	  ▐░▌▐░░░░░░░░░░░▌
--▐░█▀▀▀▀▀▀▀▀▀ ▐░█▀▀▀▀▀▀▀▀▀ ▐░█▀▀▀▀▀▀▀█░▌▐░█▀▀▀▀▀▀▀▀▀ ▐░█▀▀▀▀▀▀▀▀▀ ▐░▌░▌	 ▐░▌▐░█▀▀▀▀▀▀▀▀▀
--▐░▌		  ▐░▌		  ▐░▌	   ▐░▌▐░▌		  ▐░▌		  ▐░▌▐░▌    ▐░▌▐░▌		 
--▐░█▄▄▄▄▄▄▄▄▄ ▐░▌		  ▐░█▄▄▄▄▄▄▄█░▌▐░█▄▄▄▄▄▄▄▄▄ ▐░█▄▄▄▄▄▄▄▄▄ ▐░▌ ▐░▌   ▐░▌▐░█▄▄▄▄▄▄▄▄▄
--▐░░░░░░░░░░░▌▐░▌		  ▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░▌  ▐░▌  ▐░▌▐░░░░░░░░░░░▌
-- ▀▀▀▀▀▀▀▀▀█░▌▐░▌		  ▐░█▀▀▀▀█░█▀▀ ▐░█▀▀▀▀▀▀▀▀▀ ▐░█▀▀▀▀▀▀▀▀▀ ▐░▌   ▐░▌ ▐░▌ ▀▀▀▀▀▀▀▀▀█░▌
--		  ▐░▌▐░▌		  ▐░▌	 ▐░▌  ▐░▌		  ▐░▌		  ▐░▌    ▐░▌▐░▌		  ▐░▌
-- ▄▄▄▄▄▄▄▄▄█░▌▐░█▄▄▄▄▄▄▄▄▄ ▐░▌	  ▐░▌ ▐░█▄▄▄▄▄▄▄▄▄ ▐░█▄▄▄▄▄▄▄▄▄ ▐░▌	 ▐░▐░▌ ▄▄▄▄▄▄▄▄▄█░▌
--▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░▌	   ▐░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░▌	  ▐░░▌▐░░░░░░░░░░░▌
-- ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀		 ▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀	    ▀▀  ▀▀▀▀▀▀▀▀▀▀▀
function TerminalScreen()
term.setCursorPos(1,1)
term.write("***************************************************")
term.setCursorPos(1,2)
term.write("***************************************************")
term.setCursorPos(1,7)
term.write("***************************************************")
term.setCursorPos(1,8)
term.write("***************************************************")
for val = 3,7 do
  term.setCursorPos(1,val)
  term.write("**")
  term.setCursorPos(50,val)
  term.write("**")
end
end
function TermUpdate()
term.setCursorPos(3,3)
term.write(" Rainbow Text Total: "..what)
term.setCursorPos(1,10)
end
function BuyScreen()
ItemYStart = ItemValue
m.setBackgroundColor(colors.black)
ScreenVal = "Buying"
button.clearTable()
m.setTextColor(colors.black)
m.setBackgroundColor(colors.black)
BuySections()
    back1()
    button.screen()
    header()
end
function SellScreen()
ItemYStart = ItemValue
ScreenVal = "Selling"
button.clearTable()
m.setTextColor(colors.black)
m.setBackgroundColor(colors.black)
SellSections()
    back3()
    button.screen()
    header()
end
function StartScreen()
ScreenVal = "Idle"
ItemYStart = ItemValue
m.setTextColor(colors.black)
m.setBackgroundColor(colors.black)
button.clearTable()
header()
m.setTextColor(colors.black)
button.setTable("Buy Items",BuyScreen,15,35,7,9,colors.red,colors.gray)
button.setTable("Sell Items",SellScreen,15,35,11,13,colors.red,colors.gray)
button.screen()
end
-- fillSECTION used to load the screen
-- fillSECTION used to load the screen
-- fillSECTION used to load the screen
function fillMaterials()  -- Materials
Catagory = C1
ItemYStart = ItemValue
m.setTextColor(colors.red)
   button.clearTable()
    back2()
   if ScreenVal == "Buying" then
	 CheckItems()
    --print("Basic Materials [Buying]")
    --BuyBasicMaterialsList()
   elseif ScreenVal == "Selling" then
    print("Basic Materials [Selling]")
    SellBasicMaterialsList()
  end
   button.screen()
   header()
end
function fillMachines() -- Machines
ItemYStart = ItemValue
button.clearTable()
    back2()
    if ScreenVal == "Buying" then
	 print("Machines [Buying]")
	    BuyMachinesList()
    elseif ScreenVal == "Selling" then
	 print("Machines [Selling]")
	  SellMachinesList()
  end
    button.screen()
    header()
end
function fillArmorWeapon() -- Armor or Weapons
ItemYStart = ItemValue
button.clearTable()
m.setBackgroundColor(colors.black)
    back2()
	   if ScreenVal == "Buying" then
    print("Armor / Weapons [Buying]")
    BuyArmorWeaponList()
   elseif ScreenVal == "Selling" then
    print("Armor / Weapons [Selling]")
    SellArmorWeapons()
  end
    button.screen()
    header()
  
end
function fillMisc() -- Misc stuff
ItemYStart = ItemValue
button.clearTable()
    back2()
	   if ScreenVal == "Buying" then
    print("Misc [Buying]")
    BuyMisc()
   elseif ScreenVal == "Selling" then
    print("Misc [Selling]")
    SellMisc()
  end
   button.screen()
    header()
end
-- ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄
--▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌
-- ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀
-- ▄▄▄▄▄▄▄▄▄▄   ▄		 ▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄	    ▄  ▄▄▄▄▄▄▄▄▄▄▄
--▐░░░░░░░░░░▌ ▐░▌	   ▐░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░▌	  ▐░▌▐░░░░░░░░░░░▌
--▐░█▀▀▀▀▀▀▀█░▌▐░▌	   ▐░▌ ▀▀▀▀█░█▀▀▀▀  ▀▀▀▀█░█▀▀▀▀ ▐░█▀▀▀▀▀▀▀█░▌▐░▌░▌	 ▐░▌▐░█▀▀▀▀▀▀▀▀▀
--▐░▌	   ▐░▌▐░▌	   ▐░▌	 ▐░▌		  ▐░▌	 ▐░▌	   ▐░▌▐░▌▐░▌    ▐░▌▐░▌		 
--▐░█▄▄▄▄▄▄▄█░▌▐░▌	   ▐░▌	 ▐░▌		  ▐░▌	 ▐░▌	   ▐░▌▐░▌ ▐░▌   ▐░▌▐░█▄▄▄▄▄▄▄▄▄
--▐░░░░░░░░░░▌ ▐░▌	   ▐░▌	 ▐░▌		  ▐░▌	 ▐░▌	   ▐░▌▐░▌  ▐░▌  ▐░▌▐░░░░░░░░░░░▌
--▐░█▀▀▀▀▀▀▀█░▌▐░▌	   ▐░▌	 ▐░▌		  ▐░▌	 ▐░▌	   ▐░▌▐░▌   ▐░▌ ▐░▌ ▀▀▀▀▀▀▀▀▀█░▌
--▐░▌	   ▐░▌▐░▌	   ▐░▌	 ▐░▌		  ▐░▌	 ▐░▌	   ▐░▌▐░▌    ▐░▌▐░▌		  ▐░▌
--▐░█▄▄▄▄▄▄▄█░▌▐░█▄▄▄▄▄▄▄█░▌	 ▐░▌		  ▐░▌	 ▐░█▄▄▄▄▄▄▄█░▌▐░▌	 ▐░▐░▌ ▄▄▄▄▄▄▄▄▄█░▌
--▐░░░░░░░░░░▌ ▐░░░░░░░░░░░▌	 ▐░▌		  ▐░▌	 ▐░░░░░░░░░░░▌▐░▌	  ▐░░▌▐░░░░░░░░░░░▌
-- ▀▀▀▀▀▀▀▀▀▀   ▀▀▀▀▀▀▀▀▀▀▀	   ▀		    ▀	   ▀▀▀▀▀▀▀▀▀▀▀  ▀	    ▀▀  ▀▀▀▀▀▀▀▀▀▀▀
function BuySections()
button.setTable("Basic Materials", BuyBasicMaterials, 2,FirstButtonLength,6,8,colors.red,colors.gray)
    button.setTable("Machines", BuyMachines, 2,FirstButtonLength,10,12,colors.red,colors.gray)
    button.setTable("Armor / Weapons", BuyArmorWeapons,26,FirstButtonLength*2,6,8,colors.red,colors.gray)
    button.setTable("Misc", BuyMisc,26, FirstButtonLength*2,10,12,colors.red,colors.gray)
end
function SellSections()
button.setTable("Basic Materials", SellBasicMaterials, 2,FirstButtonLength,6,8,colors.red,colors.gray)
    button.setTable("Machines", SellMachines, 2,FirstButtonLength,10,12,colors.red,colors.gray)
    button.setTable("Armor / Weapons", SellArmorWeapons,26,FirstButtonLength*2,6,8,colors.red,colors.gray)
    button.setTable("Misc", SellMisc,26, FirstButtonLength*2,10,12,colors.red,colors.gray)
end
function BuyBasicMaterials()
button.flash("Basic Materials")
fillMaterials()
end
function BuyArmorWeapons()
button.flash("Armor / Weapons")
fillArmorWeapon()
end
function BuyMachines()
button.flash("Machines")
fillMachines()
end
function BuyMisc()
button.flash("Misc")
fillMisc()
end

function SellBasicMaterials()
button.flash("Basic Materials")
fillMaterials()
end
function SellArmorWeapons()
button.flash("Armor / Weapons")
fillArmorWeapon()
end
function SellMachines()
button.flash("Machines")
fillMachines()
end
function SellMisc()
--button.flash("Misc")
fillMisc()
end
function basicfunc()
print("I don't do anything yet.. but someday I might.")
end
function back1()
m.setTextColor(colors.black)
m.setBackgroundColor(colors.black)
button.setTable("Back",StartScreen,44,50,1,1,colors.red,colors.gray)
button.setTable("Done",StartScreen,44,50,2,2,colors.red,colors.gray)
button.screen()
m.setBackgroundColor(colors.black)
end
function back2()
m.setTextColor(colors.black)
m.setBackgroundColor(colors.black)
button.setTable("Back",BuyScreen,44,50,1,1,colors.red,colors.gray)
button.setTable("Done",StartScreen,44,50,2,2,colors.red,colors.gray)
button.screen()
m.setBackgroundColor(colors.black)
end
function back3()
m.setTextColor(colors.black)
m.setBackgroundColor(colors.black)
button.setTable("Back",SellScreen,44,50,1,1,colors.red,colors.gray)
button.setTable("Done",StartScreen,44,50,2,2,colors.red,colors.gray)
button.screen()
m.setBackgroundColor(colors.black)
end
-- ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄  ▄▄▄▄▄▄▄▄▄▄▄
--▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌▐░░░░░░░░░░░▌
-- ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀  ▀▀▀▀▀▀▀▀▀▀▀
function getClick()
   event,side,x,y = os.pullEvent("monitor_touch")
   button.checkxy(x,y)
   button.checkxy(1,1)
end
function Start()
term.clear()
TerminalScreen()
StartScreen()
end

Start()
TotalClicks = 0
num = 0
while num == 0 do
term.setCursorPos(3,3)
term.write(" Total Clicks: "..TotalClicks)
term.setCursorPos(1,10)
getClick()
TotalClicks = TotalClicks + 1
end

local itemList = { }  --# place this at or near the beginning of your code

local function drawScreen()  --# place this *before* any calls to this function
  m.setBackgroundColor(colors.red)
  m.clear()
  local tmpY = 1
  m.setCursorPos(1,tmpY)
  for i = 1, #itemList do
    m.write(itemList[i].name .. "  QTY: " .. itemList[i].qty)
    tmpY = tmpY + 1
    m.setCursorPos(1,tmpY)
  end
end

function CheckItems()
  local InvSize = Catagory.getInventorySize()
  for CurrSlot = 1, InvSize-1 do --Checking slots
    local slot = C1.getStackInSlot(CurrSlot)
    if slot ~= nil then -- Slots with stuff in them
      local success = false
      for i = 1, #itemList do --# cycle through the master item list
        if slot.name == itemList[i].name then                --# if the new item's name matches the name of item [i] in the master list then...
          local match = false
          for j = 1,#itemList[i].slots do                    --# see if we've already inventoried the slot before
            if itemList[i].slots[j].slot == CurrSlot then    --# if we have inventoried it before, we update the qty
              itemList[i].qty = itemList[i].qty - itemList[i].slots[j].qty
              itemList[i].slots[j].qty = slot.qty
              itemList[i].qty = itemList[i].qty + itemList[i].slots[j].qty
              match = true
              break --# break out of the loop because we're done and don't need to let the loop finish
            end
          end
          if not match then
            itemList[i].qty = itemList[i].qty + slot.qty   --# add the count of the matching item to the total in the master list
            itemList[i].slots[#itemList[i].slots+1].slot = CurrSlot --# store the slot number, so we know which slot(s) this item is in
            itemList[i].slots[#itemList[i].slots].qty = slot.qty
            success = true
            break --# break out of the loop because we're done and don't need to let the loop finish
          end
        end
      end
      if not success then
        itemList[#itemList+1].name = slot.name
        itemList[#itemList].slots[1].slot = CurrSlot
        itemList[#itemList].slots[1].qty = slot.qty
        itemList[#itemList].qty = slot.qty
      end
    end
  end
end

local itemList = { }  --# place this at or near the beginning of your code

local function drawScreen()  --# place this *before* any calls to this function
  m.setBackgroundColor(colors.red)
  m.clear()
  local tmpY = 1
  m.setCursorPos(1,tmpY)
  for i = 1, #itemList do
    m.write(itemList[i].name .. "  QTY: " .. tostring(itemList[i].qty))
    tmpY = tmpY + 1
    m.setCursorPos(1,tmpY)
  end
end

function CheckItems()
  itemList = { }
  local InvSize = Catagory.getInventorySize()
  for CurrSlot = 1, InvSize-1 do --Checking slots
    local slot = C1.getStackInSlot(CurrSlot)
    if slot ~= nil then -- Slots with stuff in them
      local match = false
      if #itemList == 0 then --# if there are no entries yet, add the first one
        itemList[1].name = slot.name
        itemList[1].slots[1].slot = CurrSlot
        itemList[1].slots[1].qty = slot.qty
        itemList[1].qty = slot.qty 
      else
        for i = 1, #itemList do                 --# cycle through the master item list
          if slot.name == itemList[i].name then --# if the new item's name matches the name of item [i] in the master list then update the info
            itemList[i].slots[#itemList[i].slots+1].slot = CurrSlot
            itemList[i].slots[#itemList[i].slots].qty = slot.qty
            itemList[i].qty = itemList[i].qty + slot.qty
            match = true
            break
          end
        end
        if not match then --# if the item isn't already in the list, add it
          itemList[#itemList+1].name = slot.name
          itemList[#itemList].slots[1].slot = CurrSlot
          itemList[#itemList].slots[1].qty = slot.qty
          itemList[#itemList].qty = slot.qty 
        end
      end
    end
  end
end

local C1 = peripheral.wrap("obsidian_1")
local itemList = { }  --# place this at or near the beginning of your code
local function drawScreen()  --# place this *before* any calls to this function
  m.setBackgroundColor(colors.red)
  m.clear()
  local tmpY = 1
  m.setCursorPos(1,tmpY)
  for i = 1, #itemList do
    m.write(itemList[i].name .. "  QTY: " .. itemList[i].qty)
    tmpY = tmpY + 1
    m.setCursorPos(1,tmpY)
  end
end
Catagory = C1
function CheckItems()
  local InvSize = Catagory.getInventorySize()
  for CurrSlot = 1, InvSize-1 do --Checking slots
    local slot = Catagory.getStackInSlot(CurrSlot)
    if slot ~= nil then -- Slots with stuff in them
	  local success = false
	  for i = 1, #itemList do --# cycle through the master item list
	    if slot.name == itemList[i].name then			    --# if the new item's name matches the name of item [i] in the master list then...
		  local match = false
		  for j = 1,#itemList[i].slots do				    --# see if we've already inventoried the slot before
		    if itemList[i].slots[j].slot == CurrSlot then    --# if we have inventoried it before, we update the qty
			  itemList[i].qty = itemList[i].qty - itemList[i].slots[j].qty
			  itemList[i].slots[j].qty = slot.qty
			  itemList[i].qty = itemList[i].qty + itemList[i].slots[j].qty
			  match = true
			  break --# break out of the loop because we're done and don't need to let the loop finish
		    end
		  end
		  if not match then
		    itemList[i].qty = itemList[i].qty + slot.qty   --# add the count of the matching item to the total in the master list
		    itemList[i].slots[#itemList[i].slots+1].slot = CurrSlot --# store the slot number, so we know which slot(s) this item is in
		    itemList[i].slots[#itemList[i].slots].qty = slot.qty
		    success = true
		    break --# break out of the loop because we're done and don't need to let the loop finish
		  end
	    end
	  end
	  if not success then
	    itemList[#itemList+1].name = slot.name
	    itemList[#itemList].slots[1].slot = CurrSlot
	    itemList[#itemList].slots[1].qty = slot.qty
	    itemList[#itemList].qty = slot.qty
	  end
    end
  end
end

CheckItems()
drawScreen()

local C1 = peripheral.wrap("obsidian_1")
local itemList = { }  --# place this at or near the beginning of your code
local function drawScreen()  --# place this *before* any calls to this function
  m.setBackgroundColor(colors.red)
  m.clear()
  local tmpY = 1
  m.setCursorPos(1,tmpY)
  for i = 1, #itemList do
    m.write(itemList[i].name .. "  QTY: " .. tostring(itemList[i].qty))
    tmpY = tmpY + 1
    m.setCursorPos(1,tmpY)
  end
end
function CheckItems()
  itemList = { }
  local InvSize = Catagory.getInventorySize()
  for CurrSlot = 1, InvSize-1 do --Checking slots
    local slot = C1.getStackInSlot(CurrSlot)
    if slot ~= nil then -- Slots with stuff in them
	  local match = false
	  if #itemList == 0 then --# if there are no entries yet, add the first one
	    itemList[1].name = slot.name
	    itemList[1].slots[1].slot = CurrSlot
	    itemList[1].slots[1].qty = slot.qty
	    itemList[1].qty = slot.qty
	  else
	    for i = 1, #itemList do				 --# cycle through the master item list
		  if slot.name == itemList[i].name then --# if the new item's name matches the name of item [i] in the master list then update the info
		    itemList[i].slots[#itemList[i].slots+1].slot = CurrSlot
		    itemList[i].slots[#itemList[i].slots].qty = slot.qty
		    itemList[i].qty = itemList[i].qty + slot.qty
		    match = true
		    break
		  end
	    end
	    if not match then --# if the item isn't already in the list, add it
		  itemList[#itemList+1].name = slot.name
		  itemList[#itemList].slots[1].slot = CurrSlot
		  itemList[#itemList].slots[1].qty = slot.qty
		  itemList[#itemList].qty = slot.qty
	    end
	  end
    end
  end
end

CheckItems()
drawScreen()

itemList[i].qty = slot.qty

function CheckItems()
  itemList = { }
  local InvSize = Catagory.getInventorySize()
  for CurrSlot = 1, InvSize-1 do --Checking slots
    local slot = C1.getStackInSlot(CurrSlot)
    if slot ~= nil then -- Slots with stuff in them
	  local match = false
	  if #itemList == 0 then --# if there are no entries yet, add the first one
	    itemList[1].name = "test value"
	    itemList[1].slots[1].slot = CurrSlot
	    itemList[1].slots[1].qty = slot.qty
	    itemList[1].qty = slot.qty
	  else
	    for i = 1, #itemList do				 --# cycle through the master item list
		  if slot.name == itemList[i].name then --# if the new item's name matches the name of item [i] in the master list then update the info
		    itemList[i].slots[#itemList[i].slots+1].slot = CurrSlot
		    itemList[i].slots[#itemList[i].slots].qty = slot.qty
		    itemList[i].qty = itemList[i].qty + slot.qty
		    match = true
		    break
		  end
	    end
	    if not match then --# if the item isn't already in the list, add it
		  itemList[#itemList+1].name = slot.name
		  itemList[#itemList].slots[1].slot = CurrSlot
		  itemList[#itemList].slots[1].qty = slot.qty
		  itemList[#itemList].qty = slot.qty
	    end
	  end
    end
  end
end

for i = 1, 5 do
  local example = i
end
if example == nil then
  print("yes")
end

local C1 = peripheral.wrap("obsidian_0")
local m = peripheral.wrap("top")
local itemList = { }        --# place this at or near the beginning of your code

local function drawScreen() --# place this *before* any calls to this function
  m.setBackgroundColor(colors.red)
  m.clear()
  local tmpY = 1
  m.setCursorPos(1,tmpY)
  for i = 1, #itemList do
    m.write(itemList[i].name .. "  QTY: " .. tostring(itemList[i].qty))
    tmpY = tmpY + 1
    m.setCursorPos(1,tmpY)
  end
end

function CheckItems()
  itemList = { }
  local InvSize = C1.getInventorySize()
  for CurrSlot = 1, InvSize-1 do --Checking slots
    local slot = C1.getStackInSlot(CurrSlot)
    if slot ~= nil then -- Slots with stuff in them
      local match = false
      if #itemList == 0 then --# if there are no entries yet, add the first one
        itemList[1] = { name = slot.name }
        itemList[1].slots = { }
        itemList[1].slots[1] = { slot = CurrSlot }
        itemList[1].slots[1].qty = slot.qty
        itemList[1].qty = slot.qty 
      else
        for i = 1, #itemList do                 --# cycle through the master item list
          if slot.name == itemList[i].name then --# if the new item's name matches the name of item [i] in the master list then update the info
            itemList[i].slots[#itemList[i].slots+1] = { }
            itemList[i].slots[#itemList[i].slots] = { slot = CurrSlot }
            itemList[i].slots[#itemList[i].slots].qty = slot.qty
            itemList[i].qty = itemList[i].qty + slot.qty
            match = true
            break
          end
        end
        if not match then --# if the item isn't already in the list, add it
          itemList[#itemList+1] = { name = slot.name }
          itemList[#itemList].slots = { }
          itemList[#itemList].slots[1] = { slot = CurrSlot }
          itemList[#itemList].slots[1].qty = slot.qty
          itemList[#itemList].qty = slot.qty 
        end
      end
    end
  end
end

CheckItems()
drawScreen()

function NewItem(itemname,itemvar,xmin,price) -- Constructor for Items
m.setTextColor(colors.red)
m.setBackgroundColor(colors.gray)
itemvar = itemList[1].name

ItemYStart = ItemYStart + 1
ymax = 1 
xmax = 20
price = ("$"..price)
m.setTextColor(colors.black)
m.setCursorPos(xmin,ItemYStart)
    m.write("				    "..itemList[1].qty.." ("..price.."/Ea)")
    m.setTextColor(colors.red)
    m.setCursorPos(xmin,ItemYStart)
    m.write(itemname..": ")
end

Noobular, on 17 September 2014 - 03:01 AM said:

Tad bit confused how to reference the Item specifically in NewItem()

When doing this, i get (end of post) , There is only cobble stone , jungle wood and Sandstone, when Jungle wood i don't even think is identified correctly the way i made newitem

function NewItem(itemname,itemvar,xmin,price) -- Constructor for Items
m.setTextColor(colors.red)
m.setBackgroundColor(colors.gray)
itemvar = itemList[1].name

ItemYStart = ItemYStart + 1
ymax = 1
xmax = 20
price = ("$"..price)
m.setTextColor(colors.black)
m.setCursorPos(xmin,ItemYStart)
	m.write("					"..itemList[1].qty.." ("..price.."/Ea)")
	m.setTextColor(colors.red)
	m.setCursorPos(xmin,ItemYStart)
	m.write(itemname..": ")
end

local tmpY = 5 --# Y position for first entry
for i = 1, #itemList do
  m.setCursorPos(1,tmpY)
  m.write(itemList[i].name .. "	 " .. itemList[i].qty .. " (" .. price .. "/Ea)")
  tmpY = tmpY + 1
end

function NewItem(itemname,itemvar,xmin,price) -- Constructor for Items
--[[
m.setTextColor(colors.red)
m.setBackgroundColor(colors.gray)
itemvar = itemList[1].name

ItemYStart = ItemYStart + 1
ymax = 1 
xmax = 20
price = ("$"..price)
m.setTextColor(colors.black)
m.setCursorPos(xmin,ItemYStart)
    m.write("				    "..itemList[1].qty.." ("..price.."/Ea)")
    m.setTextColor(colors.red)
    m.setCursorPos(xmin,ItemYStart)
    m.write(itemname..": ") ]]

end

for i = 1, #itemList do
  if itemname == itemList[i].name then --# itemvar or itemname ?
    m.setCursorPos(xmin,ItemYStart)
    m.write(itemList[i].name .. "  " .. itemList[i].qty .. " (" .. price .. "/Ea)")
    --# rest of your stuff
    break
  end
end

function NewItem(itemname,itemvar,xmin,price) -- Constructor for Items
itemvar = 0
m.setTextColor(colors.red)
m.setBackgroundColor(colors.gray)
ItemYStart = ItemYStart + 1
ymax = 1 
xmax = 20
price = ("$"..price)
m.setTextColor(colors.black)
m.setCursorPos(xmin,ItemYStart)
    m.write("				    "..itemvar.." ("..price.."/Ea)")
    m.setTextColor(colors.red)
    m.setCursorPos(xmin,ItemYStart)
    m.write(itemname..": ")
  for CurrSlot = 1, InvSize-1 do --Checking slots
    local slot = Catagory.getStackInSlot(CurrSlot)
	 if slot ~= nil then -- Slots with stuff in them
	  itemList[i].name = itemname
	  itemvar = itemList[i].qty
	 else
	  break
	 end
   
  end
end

	  itemList[i].name = itemname

Noobular, on 21 September 2014 - 02:13 AM said:

I haven't worked on the shop in the last few days but, i see a lot of people use inpairs or pairs and i'm really not sure what exactly it does i'm guessing it takes these to bits of info and keeps them together but .. i'm unsure lol

for k, v in pairs( tbl ) do
end

for k, v in ipairs( tbl ) do
end

Noobular, on 22 September 2014 - 12:27 AM said:

You've shown me how to use it but i don't know what its used for lol