local monitor = peripharal.wrap("top")



--Großes Paket--
local gmeca = 30
local gmeeb = 10
local gmeib = 10
local gmec = 1
local gmed = 2
local gmect = 1
local gvier = 2
local gviersechs = 1

--Mittleres Paket--
local mmec = 20
local mmeeb = 10
local mmeib = 10
local mmec = 1
local mmed = 1
local mmect = 1
local mvier = 6
local mviersechs = 0

--Kleines Paket--
local kmec = 1
local kmeeb = 5
local kmeib = 5
local kmeca = 10
local kmed = 1
local kmect = 1
local kvier = 2
local kviersechs = 0

--Mini Paket--
local mimec = 5
local mimeeb = 2
local mimeib = 2
local mimec = 1
local mimed = 1
local mimect = 1
local mivier = 1
local miviersechs = 0

function info(var)
	monitor.setCursorPos(1.1)
	monitor.write("Das ..var.. Paket besteht aus:")
	monitor.setCursorPos(1,2)
	monitor.write("Me Controller:")
	monitor.setCursorPos(1,3)
	monitor.write("Me Drive:")
	monitor.setCursorPos(1,4)
	monitor.write("Me crafting Terminal:")
	monitor.setCursorPos(1,5)
	monitor.write("Me export Bus")
	monitor.setCursorPos(1,6)
	monitor.write("Me import Bus")
	monitor.setCursorPos(1,7)
	monitor.write("Me Cable")
	monitor.setCursorPos(1,8)
	monitor.write("4K Platte")
	monitor.setCursorPos(1,9)
	monitor.write("64K Platte")
end

function gross()
	monitor.clear()
	monitor.setCursorPos(5,5)
	monitor.write(gmec)
	monitor.setCursorPos(5,5)
	monitor.write(gmed)
	monitor.setCursorPos(5,5)
	monitor.write(gmect)
	monitor.setCursorPos(5,5)
	monitor.write(gmeeb)
	monitor.setCursorPos(5,5)
	monitor.write(gmeib)
	monitor.setCursorPos(5,5)
	monitor.write(gmeca)
	monitor.setCursorPos(5,5)
	monitor.write(gvier)
	monitor.setCursorPos(5,5)
	monitor.write(gviersechs)
end

function mittel()
	monitor.clear()
	monitor.setCursorPos(5,5)
	monitor.write(mmec)
	monitor.setCursorPos(5,5)
	monitor.write(mmed)
	monitor.setCursorPos(5,5)
	monitor.write(mmect)
	monitor.setCursorPos(5,5)
	monitor.write(mmeeb)
	monitor.setCursorPos(5,5)
	monitor.write(mmeib)
	monitor.setCursorPos(5,5)
	monitor.write(mmeca)
	monitor.setCursorPos(5,5)
	monitor.write(mvier)
	monitor.setCursorPos(5,5)
	monitor.write(mviersechs)
end

function klein()
	monitor.clear()
	monitor.setCursorPos(5,5)
	monitor.write(kmec)
	monitor.setCursorPos(5,5)
	monitor.write(kmed)
	monitor.setCursorPos(5,5)
	monitor.write(kmect)
	monitor.setCursorPos(5,5)
	monitor.write(kmeeb)
	monitor.setCursorPos(5,5)
	monitor.write(kmeib)
	monitor.setCursorPos(5,5)
	monitor.write(kmeca)
	monitor.setCursorPos(5,5)
	monitor.write(kvier)
	monitor.setCursorPos(5,5)
	monitor.write(kviersechs)
end

function standart()
	monitor.clear()
	monitor.setCursorPos(5,5)
	monitor.write(mimec)
	monitor.setCursorPos(5,5)
	monitor.write(mimed)
	monitor.setCursorPos(5,5)
	monitor.write(mimect)
	monitor.setCursorPos(5,5)
	monitor.write(mimeeb)
	monitor.setCursorPos(5,5)
	monitor.write(mimeib)
	monitor.setCursorPos(5,5)
	monitor.write(mimeca)
	monitor.setCursorPos(5,5)
	monitor.write(mivier)
	monitor.setCursorPos(5,5)
	monitor.write(miviersechs)
end

function mecablekauf()
rs.setBundledOutput("bottom", colours.magenta)
sleep(0,5)
rs.setBundledOutput("bottom", colours.brown)
sleep(0,5)
end

function viersechskauf()
rs.setBundledOutput("bottom", colours.blue)
sleep(0,5)
rs.setBundledOutput("bottom", colours.brown)
sleep(0,5)
end

function vierkauf()
rs.setBundledOutput("bottom", colours.yellow)
sleep(0,5)
rs.setBundledOutput("bottom", colours.brown)
sleep(0,5)
end

function importkauf()
rs.setBundledOutput("bottom", colours.lime)
sleep(0,5)
rs.setBundledOutput("bottom", colours.brown)
sleep(0,5)
end

function exportkauf()
rs.setBundledOutput("bottom", colours.pink)
sleep(0,5)
rs.setBundledOutput("bottom", colours.brown)
sleep(0,5)
end

function craftingterminalkauf()
rs.setBundledOutput("bottom", colours.gray)
sleep(0,5)
rs.setBundledOutput("bottom", colours.brown)
sleep(0,5)
end

function controllerkauf()
rs.setBundledOutput("bottom", colours.cyan)
sleep(0,5)
rs.setBundledOutput("bottom", colours.brown)
sleep(0,5)
end

function drivekauf()
rs.setBundledOutput("bottom", colours.green)
sleep(0,5)
rs.setBundledOutput("bottom", colours.brown)
sleep(0,5)
end

function gkauf()
	rs.setBundledOutput("bottom", colours.orange)
	if rs.testBundledImput("bottom",colours.light blue) then
	controllerkauf()
	drivekauf()
	craftingterminalkauf()
	mecablekauf()
	mecablekauf()
	mecablekauf()
	mecablekauf()
	mecablekauf()
	mecablekauf()
	importkauf()
	importkauf()
	importkauf()
	importkauf()
	importkauf()
	importkauf()
	importkauf()
	importkauf()
	importkauf()
	importkauf()
	exportkauf()
	exportkauf()
	exportkauf()
	exportkauf()
	exportkauf()
	exportkauf()
	exportkauf()
	exportkauf()
	exportkauf()
	exportkauf()
	vierkauf()
	vierkauf()
	viersechskauf()
	end
end

while true do
	monitor.setCursorPos(1,1)
	monitor.write("Willkommen im Me Händler")
	monitor.setCursorPos(1,2)
	monitor.write("Wenn du Infos über die Inhalte")
	monitor.setCursorPos(1,3)
	monitor.write("von den Paketen möchtest tippe:")
	monitor.setCursorPos(1,4)
	monitor.write("Gross , Mittel , Klein , Mini")
	monitor.setCursorPos(1,5)
	monitor.write("Falls du in den Kaufmodus wechseln")
	monitor.setCursorPos(1,6)
	monitor.write("tippe: Kaufen")
	monitor.setCursorPos(1,7)
	monitor.write("Die Preise siehst du bei den Infos")
	local antwort = read()
	if antwort == "..Kaufen.." then
		monitor.clear()
		monitor.setCursorPos(1,1)
		monitor.write("Welches Paket möchtest du kaufen?")
		monitor.setCursorPos(1,2)
		monitor.write("Tippe entweder:")
		monitor.setCursorPos(1,2)
		monitor.write("Gross , Mittel , Klein , Standart")
		monitor.setCursorPos(1,3)
		monitor.write("Die benötigten Techcoins müssen")
		monitor.setCursorPos(1,4)
		monitor.write("im Me-System liegen")

	elseif antwort == "..Gross.." then
		monitor.clear()
		monitor.setCursorPos(1,1)
		info(große)
		gross()
		sleep(10)
		os.reboot()

	elseif antwort == "..Mittel.." then
		monitor.clear()
		monitor.setCursorPos(1,1)
		info(mittlere)
		mittel()
		sleep(10)
		os.reboot()

	elseif antwort == "..Klein.." then
		monitor.clear()
		monitor.setCursorPos(1,1)
		info(kleine)
		klein()
		sleep(10)
		os.reboot()

	elseif antwort == "..Mini.." then
		monitor.clear()
		monitor.setCursorPos(1,1)
		info(mini)
		standart()
		sleep(10)
		os.reboot()
	else
		os.reboot()
	end
end