JScript Шестнадцатеричное представление файла

if (WScript.FullName.toLowerCase().indexOf("cscript.exe") < 0) {
    var wsh = WScript.CreateObject("WScript.Shell");
    wsh.Run ("CScript.exe " + "\"" + WScript.ScriptFullName + "\"");
    WScript.Quit();
}
eh = function (t) {WScript.Echo(t)}
stream = new ActiveXObject("ADODB.stream");

String.prototype.times = function(count){
    for(var i=0,result=''; i<count; i++) result += this;
    return result;
}

FILE_TO_READ = 'bin.dat';

//========== Скопипастил от сих
stream.Type = 2;
stream.Charset = 'ISO-8859-1'; // Если эту строку удалить, то будет неправильный результат. Почему?
stream.Open();
stream.LoadFromFile(FILE_TO_READ);
stream.Position = 0;
stream.Charset = 'ascii';
s1 = stream.ReadText();
stream.Position = 0;
stream.Charset = 'iso-8859-1';
s2 = stream.ReadText();
stream.Close();
//========== До сих
cap = "Offset (h) ";
for (i = 0; i < 16; i++) {
    cap += ("0" + i.toString(16)).slice(-2).toUpperCase() + " ";
    if (i == 7) cap += "  ";
}
eh (cap)
str = raw = "";
for(var i = 0; i < s1.length; i++){
    if ((i == 0) || !(i % 16)) {
        eh (str + raw);
        str = ("0000000" + (i).toString(16)).slice(-8).toUpperCase()+ ":  ";
        raw = ""
    }
    raw += s2.charAt(i).toString();
    str += ('0'+(s1.charCodeAt(i)|(s2.charCodeAt(i)<0x80?0:0x80)).toString(16)).slice(-2).toUpperCase() + " ";
    if ((i != 0) && !((i+1) % 8)) {str += "  "}
}
eh (str + " ".times(63 - str.length) + raw)
WScript.StdIn.Read(1);
WScript.Quit()

stream.Charset = 'ascii';
s1 = stream.ReadText();
...
stream.Charset = 'iso-8859-1';
s2 = stream.ReadText();

echo = function(t) {
    WScript.Echo(t)
}

quit = function() {
    WScript.Quit()
}

openFile = function () {
    var fop = new ActiveXObject( "UserAccounts.CommonDialog" );
    var OFN_NON                 =    0;
        OFN_READONLY            =    1;
        OFN_HIDEREADONLY        =    4;
        OFN_ALLOWMULTISELECT    =  512;
        OFN_FILEMUSTEXIST       = 4096;
    fop.InitialDir = "C:\\";
    fop.Filter = "Все файлы|*.*";
    fop.FilterIndex = 2;
    fop.Flags = OFN_FILEMUSTEXIST | OFN_HIDEREADONLY;
    var rtn = fop.ShowOpen();
    return (fop.FileName || false)
}

help = function () {
    str = "DUMP.JS v0.1\n\n"
    str += "        Usage :: DUMP.JS source [destination]\n\n";
    str += "        source :: Source file (drive:\\path\\name or name)\n";
    str += " destination :: Destination file (drive:\\path\\name or name)\n";
    str += "                        If not specified, will be stored in\n";
    str += "                        a directory for the source file\n";
    str += "                        with the prefix '.hex'\n";
    echo (str);
    quit();
}

String.prototype.times = function(count){
  for(i = 0, result = "" ; i < count; i++) result += this;
  return result;
}

var stream = new ActiveXObject("ADODB.stream"),
    fso = new ActiveXObject("Scripting.FileSystemObject"),
    DIR = WScript.ScriptFullName.replace(/(.*)\\.*/, "$1") + "\\",
    arg = WScript.Arguments,
    LEN = arg.length,
    ARGUMENTS = "";
    BYTES = 1024 * 1024 * 1;
    INDEX = POSITION = 0,
    S = [],
    R = [],
    RAW = "";
    SYMBOLS = ".".times(32) + 
        " !\"#$%&'()*+,-./0123456789:;<=>?" +
        "@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_" +
        "`abcdefghijklmnopqrstuvwxyz{|}~." +
        "ЂЃ‚ѓ„…†‡€‰Љ‹ЊЌЋЏђ‘’“”•–—.™љ›њќћџ" +
        " ЎўЈ¤Ґ¦§Ё©Є«¬®Ї°±Ііґµ¶·ё№є»јЅѕї" +
        "АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ" +
        "абвгдежзийклмнопрстуфхцчшщъыьэюя";

if (LEN) {
    arg.Item(0).match(/[\/-]\?|h|help/) ? help() : false;
    FILE_TO_READ = arg.Item(0);
    if (LEN == 2) {
        FILE_TO_SAVE = arg.Item(1);
    } else {
        FILE_TO_SAVE = FILE_TO_READ + ".hex" ;
    }
} else {
    FILE_TO_READ = openFile();
    if (FILE_TO_READ) {
        FILE_TO_SAVE = FILE_TO_READ + ".hex" ;
    } else {
        quit()
    }
}

if (FILE_TO_READ.match(/^\S:\\/)) {
    DIR = FILE_TO_READ.replace(/(.*\\).*$/,"$1")
} else {
    FILE_TO_READ = DIR + FILE_TO_READ
}

if (!FILE_TO_SAVE.match(/^\S:\\/)) {
    FILE_TO_SAVE = DIR + FILE_TO_SAVE
}

if (!fso.fileExists(FILE_TO_READ)) {
    echo ("The file " + FILE_TO_READ + " not found.\n");
    quit();
}

SIZE = fso.GetFile(FILE_TO_READ).size;

if (fso.fileExists(FILE_TO_SAVE)) {
    echo ("The file " + FILE_TO_SAVE + " already exists.\nWill not be recorded.\n");
    quit();
} else {
    try {
        file = fso.CreateTextFile(FILE_TO_SAVE);
    } catch(e) {
        echo ("Can not create file " + FILE_TO_SAVE, 1);
        quit();
    }
}


str = "Offset (h) 00 01 02 03 04 05 06 07   08 09 0A 0B 0C 0D 0E 0F";
file.WriteLine(str)

for (b = 0; b < SIZE; b += BYTES) {
    stream = new ActiveXObject("ADODB.stream");
    stream.Type = 2;
    stream.Charset = 'ISO-8859-1';
    stream.Open();
    stream.LoadFromFile(FILE_TO_READ);
    stream.Position = 0;
    stream.Charset = 'ascii';
    stream.Position = POSITION + BYTES * b;
    s1 = stream.ReadText(BYTES);
    stream.Position = 0;
    stream.Charset = 'iso-8859-1';
    stream.Position = POSITION + BYTES * b;
    s2 = stream.ReadText(BYTES);
    stream.Close();
    str = ""; s = r = "";
    len = s1.length;
    for (i = 0; i < len; i++) {
        SYM = (s1.charCodeAt(i) | (s2.charCodeAt(i) < 0x80 ? 0 : 0x80));
        S[i] = SYM.toString(16).slice(-2).toUpperCase();
        R[i] = SYMBOLS.charAt(SYM.toString(10));
    }

    while (S.length != 0) {
        str += ("0000000" + (INDEX).toString(16)).slice(-8).toUpperCase() + ":  ";
        INDEX += 16;
        for (i = 0; (i < 16) && (S.length != 0); i++) {
            SYM = ("0" + S.shift()).slice(-2)
            str += ((i == 8) ? "  " + SYM : SYM) + " ";
            RAW += R.shift();
        }
        str += " ".times(51 - RAW.length * 3) + RAW + "\n";
        RAW = "";
    }
    R = []; S = [];
    file.WriteLine(str)
}
echo("Ok");
quit()