function  async_open(
     comport      : integer;
     baudrate     : word;
     parity       : char;
     wordsize     : integer;
     stopbits     : integer
  ): boolean;

   This function opens the asynchronous communications port to enable
   writing commands to it.