Char.cs

using System;
using System.IO;
using System.Threading.Tasks;
using System.Xml;
using Waher.Script;
 
namespace TAG.Simulator.ObjectModel.Values.BinaryElements
{
    public class Char : SimulationNode, IBinaryElement
    {
        private System.Char? value;
        private Expression script;
 
        public Char(ISimulationNode Parent, Model Model)
            : base(Parent, Model)
        {
        }
 
        public override string LocalName => nameof(Char);
 
        public override ISimulationNode Create(ISimulationNode Parent, Model Model)
        {
            return new Char(Parent, Model);
        }
 
        public override Task FromXml(XmlElement Definition)
        {
            if (System.Char.TryParse(Definition.InnerText, out System.Char Value))
            {
                this.value = Value;
                this.script = null;
            }
            else
            {
                this.value = null;
                this.script = new Expression(Definition.InnerText);
            }
 
            return Task.CompletedTask;
        }
 
        public async Task Append(MemoryStream Output, Variables Variables)
        {
            object Result;
 
            Output.Write(BitConverter.GetBytes(this.value ?? 
                ((Result = await this.script.EvaluateAsync(Variables)) is System.Char Value ? Value :
                Convert.ToChar(Result))), 0, 2);
        }
    }
}