Programming Example - Generate square wave of specified frequency and duty cycle

I have created this function to generate a square wave to be used as a clock for various system processes. It's pretty simple but provides a convenient way to generate such a signal.

Function in SCL below, example project attached.

//**************************************************************************************************//
//squareWave
//**************************************************************************************************//
// This function block generates a square wave of specified frequency and duty cycle
//
// Inputs:
// frequency --> Frequency of desired square wave in Hz
// dutyCycle --> Duty cycle of desired square wave in % (i.e. 50.0 results in a square wave of
// 50% dutycycle)
//
// Outputs:
// squareWave <-- Square wave signal generated

//Calculate period and on / off times based on frequency
#period := 1 / #frequency;
#real_OnTime := (#dutyCycle / 100) * #period;
#real_OffTime := #period - #real_OnTime;

//Convert on and off times from real to dint
#dint_OnTime := REAL_TO_DINT(1000 * #real_OnTime);
#dint_OffTime := REAL_TO_DINT(1000 * #real_OffTime);

//Convert on and off times from dint to time
#time_OnTime := DINT_TO_TIME(#dint_OnTime);
#time_OffTime := DINT_TO_TIME(#dint_OffTime);

//Generate timer clock signal
#onTimer(IN := NOT #out,
PT := #time_OnTime,
Q => #onTimerOutput);
#offTimer(IN := #out,
PT := #time_OffTime,
Q => #offTimerOutput);

//Control squareWave output based on timer clock signal
IF #onTimerOutput THEN
#out := 1;
END_IF;
IF #offTimerOutput THEN
#out := 0;
END_IF;