View difference between Paste ID: hS5SfdyR and FLG2SKe6

 local version = "Dev" --(26/06 2020)
 os.loadAPI("/spawner/f") -- a monitor API made by myself, it makes my life easier
 os.loadAPI("/spawner/lib/API") -- search_bar
 os.loadAPI("/spawner/lib/APIjson")
 local list_items,items = {},{}
 local a,b,c,chestSize = 1,1,1,100
 local Pcheck = false
 
-b = {}
+
-function addButton(m,x1,y1,x2,y2,name)
+
-  b[name] = {win = window.create(m,x1,y1,x2,y2)}
+
-  b[name]["pos"] = {b[name].win.getPosition()} b[name]["size"] = {b[name].win.getSize()}
+
-  b[name]["isClicked"] =
+
-  function(x,y)
+
-    local l = {x1,y1,x2+x1,y2+y1)
+
-    return f.box(x,y,l[1],l[2],l[3],l[4])
+
 
 function addWin(m,x1,y1,x2,y2,name)
   local b = window.create(m,x1,y1,x2,y2)
   b.pos = {b.getPosition()}
   b.size = {b.getSize()}
   b.name = name
   function b:getName() return b.name end
   function b:isClicked(x,y) return f.itrv(x,b.pos[1],b.pos[1]+b.size[1]) and f.itrv(y,b.pos[2],b.pos[2]+b.size[2]-1) end
   return b
 end
-  bg = window.create(m,1,1,w,h)
+
-  list = window.create(m,1,2,w*3/5-1,chestSize)
+function setWindows()
-  up_bar = window.create(m,1,1,w,1)
+  bg = addWin(m,1,1,w,h) bg.reset = {bg_color="black"}
-  down_bar = window.create(m,1,h,w,h)
+  list = addWin(m,1,2,w*3/5-1,chestSize) list.reset = {bg_color="black"}
-  scroll_bar = window.create(m,w*(3/5),2,1,h-1)
+  up_bar = addWin(m,1,1,w,1) up_bar.reset = {bg_color="lightGray"}
-  bg2 = window.create(m,w*0.6+1,2,w*0.4+1,h-1)
+  down_bar = addWin(m,1,h,w,h) down_bar.reset = {bg_color="lightGray",printText = function()
-  pbg2 = {bg2.getPosition()} sbg2 = {bg2.getSize()}
+    f.centerTextRight(down_bar,1,"v"..version,"black","lightGray") end}
-  addButton(bg2,2,13,sbg2[1]-2,3,"button1")
+  scroll_bar = addWin(m,w*(3/5),2,1,h-1) scroll_bar.reset = {bg_color="lightGray",printText = function()
-  addButton(bg2,2,9,5,3,"button2")
+    f.cprint(scroll_bar,1,1,"^","black","gray")
-  addButton(bg2,2,3,5,3,"spawner1") addButton(bg2,10,3,5,3,"spawner2") addButton(bg2,18,3,5,3,"spawner3")
+    f.cprint(scroll_bar,1,h-2,"v","black","gray") end}
-  for q=1,3 do bq = b["spawner"..q]
+  bg2 = addWin(m,w*0.6+1,2,w*0.4+1,h-1) bg2.reset = {bg_color="gray",printText = function()
-  b["spawner"..q].reset = function() b["spawner"..q].win.setBackgroundColor(colors.black) b["spawner"..q].win.clear()
+    f.cprint(bg2,2,1,"Mob: ","white","gray")
-  f.cprint(b["spawner"..q].win,3,2,q,"lightGray","black") end
+    f.cprint(bg2,8,10,"Status: ","white","gray") end}
-  b["spawner"..q].selected = function() b["spawner"..q].win.setBackgroundColor(colors.magenta)
+  b1 = addWin(m,2,13,bg2.size[1]-2,3,"button1") b1.reset = {bg_color="red",printText = function()
-  b["spawner"..q].win.clear() f.cprint(b["spawner"..q].win,3,2,q,"black","magenta") end
+    f.centerText(b1,2,"i/o","black","red") end}
-  b["spawner"..q].reset()
+  b2 = addWin(m,2,9,5,3,"button2") b2.reset = {bg_color="red",printText = function()
     f.centerText(b2,"Rafraichir","black","purple") end}
   b = {}
-getPeriphs()
+  b[1] = addWin(m,2,3,5,3) b[2] = addWin(m,10,3,5,3) b[3] = addWin(m,18,3,5,3)
   for i=1,3 do
     b[i]["notSelected"]={bg_color="black",printText=function() f.cprint(b[i],3,2,i,"lightGray","black") end}
     b[i]["selected"] = {bg_color="magenta",printText=function() f.cprint(b[i],3,2,i,"black","magenta") end}
   end
 end
 
 function apply(obj,name)
   if f.vn(obj[name]) then
     local metatable = {__Index = obj[name]}
     setmetatable(index, metatable)
     obj.setBackgroundColor(index.bg_color)
     obj.clear()
   else error("object not found") end
 end
 
 local default = {
   spawner1={side="east",curr_item=""},
   spawner2={side="north",curr_item=""},
-local VIP = {"TheBaslez","SesameChocolat","Jaguar","LeChikito","jungleis26","Ertupop","Veine","annelaure1912","Gaetann18",
+
-"GohuSan","boucherreb","Ciliste"}
+
-local GUIDES = {"zorinova","DaikiKaminari","maxou684"}
+
   player_name="MarkFergus",
   server="infinity.mineaurion.com",
-  bg.setBackgroundColor(colors.black) bg.clear()
+
-  list.setBackgroundColor(colors.black) list.clear()
+
-  up_bar.setBackgroundColor(colors.lightGray) up_bar.clear()
+
-  down_bar.setBackgroundColor(colors.lightGray) down_bar.clear()
+
-  scroll_bar.setBackgroundColor(colors.lightGray) scroll_bar.clear()
+
-  bg2.setBackgroundColor(colors.gray) bg2.clear()
+
-  b["button1"].win.setBackgroundColor(colors.purple) b["button1"].win.clear()
+
-  b["button2"].win.setBackgroundColor(colors.red) b["button2"].win.clear()
+
-  f.centerTextRight(down_bar,1,"v"..version,"black","lightGray")
+
-  if fxd~=nil then f.cprint(down_bar,1,1,fxd.getMaxEnergyStored()-fxd.getEnergyStored().." RF","red","lightGray") end
+
-  f.cprint(scroll_bar,1,1,"^","black","gray")
+  apply(bg,"reset") apply(bg2,"reset") apply(list,"reset")
-  f.cprint(scroll_bar,1,h-2,"v","black","gray")
+  apply(up_bar,"reset") apply(down_bar,"reset") apply(scroll_bar,"reset")
-  f.cprint(bg2,2,1,"Mob: ","white","gray")
+  apply(b1,"reset")  apply(b2,"reset")
   --for i=1,3 do
-  f.cprint(bg2,8,10,"Status: ","white","gray")
+  --  if rubrique == i then b[i].apply("selected") f.cprint(bb[i],3,2,i,"black","magenta")
-  if index.enable == true then f.cprint(bg2,16,10,"actif  ","lime","gray") else f.cprint(bg2,16,10,"inactif","purple","gray") end
+  --  else b[i].apply("notSelected") end
-  f.centerText(b["button1"].win,2,"Rafraichir","black","purple")
+  --end
-  f.centerText(b["button2"].win,2,"i/o","black","red")
+  if f.vn(fxd) then f.cprint(down_bar,1,1,fxd.getMaxEnergyStored()-fxd.getEnergyStored().." RF","red","lightGray") end
   f.cprint(bg2,7,1,index["spawner"..rubrique].curr_item,"purple","gray")
-  if rubrique == 1 then b["spawner1"].selected() f.centerText(up_bar,1,"config. spawner 1","black","lightGray")
+  if index.enable then f.cprint(bg2,16,10,"actif  ","lime","gray") else
-  else b["spawner1"].reset() end
+  f.cprint(bg2,16,10,"inactif","purple","gray") end
-  if rubrique == 2 then b["spawner2"].selected() f.centerText(up_bar,1,"config. spawner 2","black","lightGray")
+
-  else b["spawner2"].reset() end
+
-  if rubrique == 3 then b["spawner3"].selected() f.centerText(up_bar,1,"config. spawner 3","black","lightGray")
+
-  else b["spawner3"].reset() end
+
   if check1 == true then
   b = 1
   items = {}
   if chestSize ~= nil then
-  local b = 1
+
       item = p.getStackInSlot(a)
       if item ~= nil and item.name == "mobSoul" then
         items[b] = {}
         items[b][1] = a
         for ab=1,#nbt_index do
           if item.nbt_hash == nbt_index[ab].nbt_hash then items[b][2] = nbt_index[ab].name end
         end
         items[b]["qty"] = item.qty
         b = b + 1
       end
     end
   end
   if display == nil then display = items end
   end
 end
 
 function list_display(check1)
   if check1 == true then
   for c=1,#display do
     if c == selected then
       f.drawLine(list,1,c,w,"lightBlue")
       f.centerTextRight(list,c,tostring(items[c].qty),"black")
     else
       list.setBackgroundColor(colors.black)
     end
     if display[c][3] == nil then
       f.centerText(list,c,display[c][2],"purple")
     end
   end
   else f.centerText(list,1,"No chest found","red","black") end
 end
 
 function scroll(direction)
   local x,y = list.getPosition()
   if direction == "up" and y <=1 then
     list.reposition(1,y+2)
   elseif direction == "down" and y+#items > h-1 then
     list.reposition(1,y-2)
   end
 end
 
 function checkPlist()
   str = APIjson.decode(http.get("http://api.mineaurion.com/v1/serveurs/"..index.server).readAll())
   local Pcheck = false
   for i,v in pairs(str.joueurs) do
     if v == index.player_name then Pcheck = true end
   end
   if (Pcheck==true and index.enable==true) then rs.setAnalogOutput(index.rside,15) else rs.setAnalogOutput(index.rside,0) end
 end
 
 function updateIndex()
   shell.run("rm","/spawner/config")
   index.rubrique = rubrique index.selected = selected
   f3 = fs.open("/spawner/config","w") f3.write(textutils.serialise(index)) f3.close()
 end
 
  getPeriphs() setWindows()
 
 while true do
   reset() getItems(isChest) list_display(isChest)
-  reset()
+  down_bar.redraw() up_bar.redraw()
-  getItems(isChest)
+  checkPlist() updateIndex()
-  list_display(isChest)
+
-  down_bar.redraw()
+
-  up_bar.redraw()
+  if event[1] == "peripheral_detach" or event[1] == "peripheral" then getPeriphs() setWindows() end
-  checkPlist()
+
-  updateIndex()
+
-  xl,yl = list.getPosition()
+
-  j,k = scroll_bar.getPosition()
+    if y-list.pos[1]+1 == selected and display[selected] ~= nil and x < scroll_bar.pos[1]-1 then
       up_bar.clear()
       f.centerText(up_bar,1,"reconfiguration...","black")
-  if event[1] == "peripheral_detach" or event[1] == "peripheral" then getPeriphs() end
+
       p.pushItem(index["spawner"..rubrique].side,display[selected][1],1)
       index["spawner"..rubrique].curr_item = display[selected][2]
       getItems(isChest)
-    if y-yl+1 == selected and display[selected] ~= nil and x < j-1 then
+    elseif y > 1 and x < scroll_bar.pos[1]-1 then
       selected = y-yl+1
     elseif y == 2 and x == scroll_bar.pos[1] then
       scroll("up")
     elseif list.pos[2] == h-1 and event[3] == scroll_bar.pos[1] then
       scroll("down")
     elseif bg2.isClicked(x,y) then
-    elseif y > 1 and x < j-1 then
+
       for i=1,3 do if b[i].isClicked(xc,yc) then rubrique = i end end
-    elseif y == 2 and x == j then
+      if b1.isClicked(xc,yc) then
         if index.enable == true then index.enable = not index.enable end
-    elseif yl == h-1 and event[3] == j then
+
       if b2.isClicked(xc,yc) then
-    elseif f.itrv(x,pbg2[1],pbg2[1]+sbg2[1]) and f.itrv(y,pbg2[2],pbg2[2]+sbg2[2]) then
+
         sleep(0.4)
-      if b["button1"].isClicked(xc,yc) then
+
     end
   end
 end