Rectangle.sel

#!./Selene
--- The famous "horizontal line test"

Selene.UseDRMCairo()

	-- Open default card.
	-- As no argument is passed it's the default one
	-- /dev/dri/card0
card,err,msg = SelDCCard.Open()
if not card then
	print("*E*", err,msg)
	os.exit()
end

local srf = card:GetPrimarySurface()
local w,h = srf:GetSize()	-- Retrieve its size

----------------------------

srf:Clear(0,0,0)

srf:SetPenWidth(10)
srf:SetColor(0.5,0.5,0.5,1)	-- grey
srf:FillRectangle( 20, 20, w-40, h-40 )

srf:SetPenWidth(1)
srf:SetColor(1,0,0,1)	-- Red
srf:DrawRectangle( 20, 20, w-40, h-40 );

----------------------------

fch,err,msg = srf:Dump("/tmp","Line")
if not fch then	-- An error happened
	print("Can't dump", err,msg);
else
	print("Dumped to", fch);
end

print "Hit 'enter' key to exit"
io.stdin:read'*l'	-- wait for enter
	---
	-- cleanup
	---

srf:Release()
card:Release()
generated by LDoc 1.4.6 Last updated 2022-09-05 22:24:51