pimloader.lua

local inet=require'internet'
local c='component'
local gpu=require(c).gpu
local fs=require(c).filesystem
--local branch='https://raw.githubusercontent.com/Zardar/pimmarket/pimmarket_0.85/'
--local branch="https://raw.githubusercontent.com/Zardar/pimmarket/master/"
local computer=require'computer'
local events={'touch'}
local url,fd,bd='',0x68f029,0x303030
pullSignal=computer.pullSignal
computer.pullSignal=function(...)
    local e={pullSignal(...)}
    for k in pairs(events)do
        if e[1]==events[k] then
             return scrDr(e[3],e[4])
        end
    end
    return table.unpack(e)
end

local b={
s={x=2,xs=21,y=2,ys=3,text='запустить сервер',tx=2,ty=1,bg=bd,fg=fd,f='pimserver.lua'},
c={x=2,xs=21,y=6,ys=3,text='запустить клиент',tx=2,ty=1,bg=bd,fg=fd,f='pimmarket.lua'},
us={x=2,xs=28,y=10,ys=3,text='скачать+запустить сервер',tx=2,ty=1,bg=bd,fg=fd},
uc={x=2,xs=28,y=14,ys=3,text='скачать+запустить клиент',tx=2,ty=1,bg=bd,fg=fd},
ul={x=2,xs=20,y=22,ys=3,text='апгрейд загрузчика',tx=2,ty=1,bg=bd,fg=fd,f='loader.lua'},
up={x=2,xs=31,y=18,ys=3,text='скачать и запустить Ме крафт',tx=2,ty=1,bg=bd,fg=fd,f='pimmeprecraft.lua'}
}
local screen = {'s','c','us','uc'}

local function wget(url,name)
    local handle=inet.request(url)
    local result=''
    for chunk in handle do result=result..chunk end
    local file=io.open(name,'w')
    file:write(result)
    file:close()
    file=nil
    handle=nil
    result=nil
end

local sa={}
sa.c=function()if fs.exists('/home/'..b.c.f)then return os.execute(b.c.f)end end
sa.s=function()if fs.exists('/home/'..b.s.f)then return os.execute(b.s.f)end end
sa.us=function() url="https://pastebin.com/raw/jGMM1vqD" wget(url,b.s.f)return sa.s()end
sa.uc=function() url="https://pastebin.com/raw/M5anF9JW" wget(url,b.c.f)return sa.c()end
--sa.up=function() url=branch..b.up.f wget(url,b.up.f)return os.execute(b.up.f)end

local clear=function()
    local x,y=gpu.getViewport()
    gpu.setBackground(0x111111)
    gpu.fill(1,1,x,y,' ')
    return true
end
local function place(buttons)
    for n in pairs(buttons)do
        local btn=b[buttons[n]]
        gpu.setBackground(btn.bg)
        gpu.fill((btn.x),(btn.y),(btn.xs),(btn.ys),' ')
        gpu.setForeground(btn.fg)
        gpu.set((btn.x)+(btn.tx),(btn.y)+(btn.ty),btn.text)
    end
    return true
end

function scrDr(e3,e4)
    local x,y=e3,e4
    for f in pairs (screen) do
        local btn=b[screen[f]]
        local a=(x >= btn.x and x <=(btn.xs+btn.x-1))and(y >=(btn.y)and y <=(btn.ys+btn.y-1))
        if a then
            events={}
            return sa[screen[f]]()
        end
    end
    return false
end

local x=gpu.getViewport()
for n in pairs(b)do
    b[n].x = x/2-b[n].xs/2-1
end
wget("https://pastebin.com/raw/H3Mu2wi2"..b.ul.f,b.ul.f)
clear()
place(screen)
return true