HorizontalBarPainter.cs

using System;
using SkiaSharp;
 
namespace Waher.Script.Graphs.Functions.Plots
{
    public class HorizontalBarPainter : SingleColorGraphPainter, IPainter2D
    {
        public void DrawGraph(SKCanvas Canvas, SKPoint[] Points, object[] Parameters, SKPoint[] PrevPoints, object[] PrevParameters,
            DrawingArea DrawingArea)
        {
            SKPaint Brush = null;
            SKPath Path = null;
 
            try
            {
                Brush = new SKPaint()
                {
                    Color = Graph.ToColor(Parameters[0]),
                    Style = SKPaintStyle.Fill
                };
                Path = new SKPath();
 
                int Count = DrawingArea.YLabelPositions?.Count ?? Points.Length;
                float HalfBarHeight = (-DrawingArea.Height - Count) * 0.45f / Count;
                float x0, y0, x1, y1;
                int i, c;
 
                if (!(PrevPoints is null))
                {
                    if ((c = PrevPoints.Length) != Points.Length)
                        PrevPoints = null;
                    else
                    {
                        for (i = 0; i < c; i++)
                        {
                            if (PrevPoints[i].Y != Points[i].Y)
                            {
                                PrevPoints = null;
                                break;
                            }
                        }
                    }
                }
 
                int MinY = DrawingArea.OffsetY;
                int MaxY = DrawingArea.OffsetY + DrawingArea.Height;
 
                i = 0;
                foreach (SKPoint Point in Points)
                {
                    y0 = Point.Y - HalfBarHeight + 1;
                    x0 = Point.X;
                    y1 = Point.Y + HalfBarHeight - 1;
                    x1 = !(PrevPoints is null) ? PrevPoints[i++].X : DrawingArea.OrigoX;
 
                    if (y0 < MaxY)
                        y0 = MaxY;
 
                    if (y1 > MinY)
                        y1 = MinY;
 
                    Canvas.DrawRect(new SKRect(x0, y0, x1, y1), Brush);
                }
 
                Canvas.DrawPath(Path, Brush);
            }
            finally
            {
                Brush?.Dispose();
                Path?.Dispose();
            }
        }
    }
}