Modbus test source code written by delphi