IndicatorLamp

model IndicatorLamp "Dynamically show Boolean input signal (false/true = white/green color)"
    extends Modelica.Icons.ObsoleteModel;

    Modelica.Blocks.Interfaces.BooleanInput u annotation (Placement(transformation(extent = {
        {-140, -20}, 
        {-100, 20}})));

    annotation (
        obsolete = "Obsolete model - use Modelica.Blocks.Interaction.Show.BooleanValue instead",
        Icon(
            coordinateSystem(
                preserveAspectRatio = true,
                extent = {
                    {-100, -100}, 
                    {100, 100}}),
            graphics = {
                Ellipse(
                    extent = {
                        {-100, -100}, 
                        {100, 100}},
                    fillColor = DynamicSelect({235, 235, 235}, if u then {0, 255, 0} else {235, 235, 235}),
                    pattern = LinePattern.None,
                    fillPattern = FillPattern.Sphere), 
                Text(
                    extent = {
                        {-150, 150}, 
                        {150, 110}},
                    textString = "%name",
                    lineColor = {0, 0, 255})}));
end IndicatorLamp;