//
//  Module:       mptdn.slt
//  Version:      1.10
//  Description:  MPT protocol download script for Telix
//                Includes appropriate port, speed, and download directory in
//                the MPT command-line.
//  Author:       Brent Gleibs
//

//<f>
main()
{
  str     CmdLine[128];
  str     BaudStr[7];
  str     PortStr[2];

  itos(get_baud(), BaudStr);
  itos(get_port(), PortStr);

  CmdLine = "P";
  strcat(CmdLine, PortStr);

  strcat(CmdLine, " S");
  strcat(CmdLine, BaudStr);

  strcat(CmdLine, " A+");

  strcat(CmdLine, " R ");
  strcat(CmdLine, _down_dir);

  run("mpt", CmdLine, 0);

  return;
}