Create output_unit.pas