Public Function New( _
   ByVal frequency As Integer, _
   ByVal redAmplitude As Integer, _
   ByVal greenAmplitude As Integer, _
   ByVal blueAmplitude As Integer, _
   ByVal angle As Integer, _
   ByVal buffer() As Integer, _
   ByVal flags As FunctionalLightCommandFlags _
)

Dim frequency As Integer
Dim redAmplitude As Integer
Dim greenAmplitude As Integer
Dim blueAmplitude As Integer
Dim angle As Integer
Dim buffer() As Integer
Dim flags As FunctionalLightCommandFlags
 
Dim instance As New FunctionalLightCommand(frequency, redAmplitude, greenAmplitude, blueAmplitude, angle, buffer, flags)

public FunctionalLightCommand( 
   int frequency,
   int redAmplitude,
   int greenAmplitude,
   int blueAmplitude,
   int angle,
   int[] buffer,
   FunctionalLightCommandFlags flags
)

public:
FunctionalLightCommand( 
   int frequency,
   int redAmplitude,
   int greenAmplitude,
   int blueAmplitude,
   int angle,
   array<int>^ buffer,
   FunctionalLightCommandFlags flags
)

Public Sub FunctionalLightConstructorExample_S3()
   Dim codecs As New RasterCodecs()
   codecs.ThrowExceptionsOnInvalidImages = True

   Dim leadImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Master.jpg"))

   ' Prepare the command
   Dim userPoint() As LeadPoint
   ReDim userPoint(3)
   'Apply the filter
   userPoint(0).X = 0
   userPoint(0).Y = 0
   userPoint(1).X = 3
   userPoint(1).Y = 10
   userPoint(2).X = 9
   userPoint(2).Y = -10
   userPoint(3).X = 12
   userPoint(3).Y = 0

   Dim curve() As Integer
   ReDim curve(12)
   EffectsUtilities.GetCurvePoints(curve, userPoint, CurvePointsType.Linear)

   Dim command As FunctionalLightCommand = New FunctionalLightCommand(5000, 90, 50, 70, 4500, curve, FunctionalLightCommandFlags.Freehand Or FunctionalLightCommandFlags.Addition)
   ' Apply the linear lighting effect.
   command.Run(leadImage)
   codecs.Save(leadImage, Path.Combine(LEAD_VARS.ImagesDir, "Result.jpg"), RasterImageFormat.Jpeg, 24)

End Sub

Public NotInheritable Class LEAD_VARS
   Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class

public void FunctionalLightConstructorExample_S3()
   {
      // Load an image
      RasterCodecs codecs = new RasterCodecs();
      codecs.ThrowExceptionsOnInvalidImages = true;

      RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Master.jpg"));

      // Prepare the command
      LeadPoint[] userPoint = new LeadPoint[4];
      //Apply the filter
      userPoint[0].X = 0;
      userPoint[0].Y = 0;
      userPoint[1].X = 3;
      userPoint[1].Y = 5;
      userPoint[2].X = 9;
      userPoint[2].Y = 7;
      userPoint[3].X = 12;
      userPoint[3].Y = 10; 

      int[] curve = new int[13];
      EffectsUtilities.GetCurvePoints(curve, userPoint, CurvePointsType.Linear);

      FunctionalLightCommand command = new FunctionalLightCommand(5000, 90, 50, 70, 4500, curve,FunctionalLightCommandFlags.Freehand | FunctionalLightCommandFlags.Addition);
      // Apply the linear lighting effect.
      command.Run(image);
      codecs.Save(image, Path.Combine(LEAD_VARS.ImagesDir, "Result.jpg"), RasterImageFormat.Jpeg, 24);

   }

static class LEAD_VARS
{
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}