Unnamed

begin
	personaje();
	repeat
		frame;
	until (key(_ESC));
end

process personaje()
begin
	graph = load_png("imagen.png");
	loop
		frame;
	end
end