var WshShell = new ActiveXObject("WScript.Shell");

objArgs = WScript.Arguments;
Names = "";
for (i = 0; i < objArgs.length; i++)
{
  var program = "c:\\ldraw\\vexparts\\Source\\stl2dat.exe ";
  var infile  = objArgs(i);
  var name = infile.substring(0, infile.length-4); // remove the .STL suffix
  name = name.substring(name.lastIndexOf('\\')+1); // remove abs path prefix
  name = "\"" + name.split('_').join(' ') + "\"";  // convert underbar to space
  var author = " \"Converted by Steve\" ";
  var origin = " 0 0 0 ";
  var matrix = " 2.51967744 0 0 0 2.51967744 0 0 0 2.51967744 "; // mm to 64ths
  var options = " -of -m " + origin + matrix; // -o option messes up name
  var cmd = program + infile + options + name + author;

  var oExec = WshShell.Run(cmd, 0, true);

  Names = Names + objArgs(i) + "\n";
}
WScript.Echo(Names + "Done.");