ldd-CC/roterm.lua

local getAPI = function(apiname, apipath, apiurl, doDoFile, doScroll)
	apipath = fs.combine(".roterm-api", apipath)
	if (not fs.exists(apipath)) then
		if doScroll then term.scroll(1) end
		print(apiname .. " API not found! Downloading...")
		local prog = http.get(apiurl)
		if not prog then
			if doScroll then term.scroll(1) end
			error("Failed to download " .. apiname .. " API. Abort.")
			term.setCursorPos(1,1)
			return
		end
		local file = fs.open(apipath,"w")
		file.write(prog.readAll())
		file.close()
	end
	if doDoFile then
		return dofile(apipath)
	else
		os.loadAPI(apipath)
	end
	if not _ENV[fs.getName(apipath)] then
		if doScroll then term.scroll(1) end
		error("Failed to load " .. apiname .. " API. Abort.")
		term.setCursorPos(1,1)
		return
	else
		return _ENV[fs.getName(apipath)]
	end
end

local nfte 	= getAPI("NFT Extra", 	"nfte.lua", 	"https://github.com/LDDestroier/NFT-Extra/raw/master/nfte.lua", true)
local lddterm 	= getAPI("LDDTerm", 	"lddterm.lua", 	"https://github.com/LDDestroier/CC/raw/master/lddterm-cc.lua", 	true)

local scr_x, scr_y = term.getSize()

lddterm.alwaysRender = false
lddterm.baseTerm = term.current()
local win = lddterm.newWindow(scr_x, scr_y, 1, 1)
local t = win.handle

local angle = 0

term.redirect(t)

lddterm.transformation = function(image)
	local output, adjX, adjY = nfte.rotateImage(image, math.rad(angle))
	return output
end

lddterm.drawFunction = function(image, baseTerm)
	baseTerm.clear()
	nfte.drawImageCenter(image, nil, nil, baseTerm)
end

lddterm.cursorTransformation = function(x, y)
	local originX = math.floor(scr_x / 2)
	local originY = math.floor(scr_y / 2)
	local ang = math.rad(angle)
	return
		math.floor( 0.5 + (x-originX) * math.cos(ang) - (y-originY) * math.sin(ang) ) + originX,
		math.floor( 0.5 + (x-originX) * math.sin(ang) + (y-originY) * math.cos(ang) ) + originY
end

parallel.waitForAny(
	function()
		shell.run("/rom/programs/shell.lua")
	end,
	function()
		local evt
		local tID = os.startTimer(0.05)
		while true do
			evt = {os.pullEvent()}
			if evt[1] == "key" then
				if evt[2] == keys.pageDown then
					angle = (angle + 2) % 360
					lddterm.render(lddterm.transformation, lddterm.drawFunction)
				elseif evt[2] == keys.pageUp then
					angle = (angle - 2) % 360
					lddterm.render(lddterm.transformation, lddterm.drawFunction)
				end
			elseif evt[1] == "timer" then
				if evt[2] == tID then
					lddterm.render(lddterm.transformation, lddterm.drawFunction)
					tID = os.startTimer(0.05)
				end
			end
		end
	end
)