/**************************************************************************
  для работы делаем drag&drop фолдера с картинками на ярлык скрипта
  парсинг субфолдеров не производится
  "защиты от дурака" почти нет
  
  изменяемые параметры в начале скрипта:
  - размер превьюшек
  - путь к фолдеру куда складывать результаты
  остальные параметры изменяем в недрах кода, при необходимости  
  также как пишем красивый UI :)
  
  инсталлер берем здесь:
  http://www.imagemagick.org/download/binaries/ImageMagick-6.3.4-9-Q16-windows-dll.exe
  при установке включаем галку Install ImageMagick Object OLE control
***************************************************************************/

var thumb_size = 120;
var out_path = 'c:\\_magick\\';

/**************************************************************************
***************************************************************************/

var fso = new ActiveXObject('Scripting.FileSystemObject');
var WshShell = new ActiveXObject('WScript.Shell');
var IM = new ActiveXObject('ImageMagickObject.MagickImage.1');

objArgs = WScript.Arguments;

if (!fso.FolderExists(objArgs(0)))
{
  WScript.Echo('no folder!');
  WScript.Quit(1)
};
if (!fso.FolderExists(out_path))
{
  fso.CreateFolder(out_path);
};

f = fso.GetFolder(objArgs(0));
fc = new Enumerator(f.files);
for (; !fc.atEnd(); fc.moveNext())
{
  try {
    wh = IM.Identify('-format','%w,%h',fc.item().Path);
    w = parseInt(wh.split(',')[0]);
    h = parseInt(wh.split(',')[1]);
    a = fc.item().Path;
    b = out_path + fc.item().Name.slice(0,-3) + 'jpg';
    if (w > h) {
      IM.Convert(a, '-thumbnail', 'x' + thumb_size, '-gravity', 'center', '-crop', '120x120+0+0', '+repage', '-strip', b)
    } else {
      IM.Convert(a, '-thumbnail', thumb_size + 'x', '-gravity', 'center', '-crop', '120x120+0+0', '+repage', '-strip', b)
    }    
  } catch(e) {} finally {}
};
WScript.Echo("THE END");