Подсветка кода МК-61 на JS

var мнемоники_команд = [
    [   0x15,
        ["10^x", "10x", "F10^x", "F10x"],
        0, 3, 2, [2, 3]
    ],
    [   0x54,
        ["НОП", "KНОП", "КНОП"],
        0, 1, 1, [1, 2]
    ],
    [   0x16,
        ["e^x", "ex", "Fe^x", "Fex"],
        0, 3, 2, [2, 3]
    ],
    [   0x17,
        ["lg", "Flg"],
        0, 3, 1, [1]
    ],
    [   0x18,
        ["ln", "Fln"],
        0, 3, 1, [1]
    ],
    [   0x30,
        ["ЧМ", "KЧМ", "КЧМ"],
        0, 3, 1, [1, 2]
    ],
    [   0x19,
        ["arcsin", "Farcsin"],
        0, 3, 1, [1]
    ],
    [   0x31,
        ["|x|", "K|x|", "К|x|"],
        0, 3, 1, [1, 2]
    ],
    [   0x1A,
        ["arccos", "Farccos"],
        0, 3, 1, [1]
    ],
    [   0x32,
        ["ЗН", "KЗН", "КЗН"],
        0, 3, 1, [1, 2]
    ],
    [   0x1B,
        ["arctg", "Farctg"],
        0, 3, 1, [1]
    ],
    [   0x33,
        ["ГМ", "KГМ", "КГМ"],
        0, 3, 1, [1, 2]
    ],
    [   0x1C,
        ["sin", "Fsin"],
        0, 3, 1, [1]
    ],
    [   0x34,
        ["[x]", "K[x]", "К[x]"],
        0, 3, 1, [1, 2]
    ],
    [   0x1D,
        ["cos", "Fcos"],
        0, 3, 1, [1]
    ],
    [   0x35,
        ["{x}", "(x)", "K{x}", "К{x}", "K(x)", "К(x)"],
        0, 3, 2, [2, 3, 4, 5]
    ],
    [   0x1E,
        ["tg", "Ftg"],
        0, 3, 1, [1]
    ],
    [   0x36,
        ["max", "Kmax", "Кmax"],
        0, 3, 1, [1, 2]
    ],
    [   0x10,
        ["+"],
        0, 3, 0, []
    ],
    [   0x11,
        ["-", "–"],
        0, 3, 0, []
    ],
    [   0x12,
        ["*", "x", "х", "×", "⋅"],
        0, 3, 1, []
    ],
    [   0x13,
        ["/", ":", "÷"],
        0, 3, 1, []
    ],
    [   0x20,
        ["пи", "π", "Fпи", "Fπ"],
        0, 0, 2, [2, 3]
    ],
    [   0x26,
        ["МГ", "KМГ", "КМГ"],
        0, 3, 1, [1, 2]
    ],
    [   0x21,
        ["КвКор", "квкор", "корень", "√", "FКвКор", "Fквкор", "Fкорень", "F√"],
        0, 3, 4, [4, 5, 6, 7]
    ],
    [   0x22,
        ["x^2", "x2", "x²", "Fx^2", "Fx2", "Fx²"],
        0, 3, 3, [3, 4, 5]
    ],
    [   0x23,
        ["1/x", "F1/x"],
        0, 3, 1, [1]
    ],
    [   0x14,
        ["<->", "XY", "↔", "X↔Y"],
        0, 1, 0, []
    ],
    [   0x0E,
        ["^", "В^", "↑", "В↑"],
        0, 1, 1, []
    ],
    [   0x24,
        ["x^y", "xy", "Fx^y", "Fxy"],
        0, 3, 2, [2, 3]
    ],
    [   0x27,
        ["K-", "К-"],
        0, 0, 0, []
    ],
    [   0x28,
        ["Kx", "Кх", "K*", "К*"],
        0, 0, 0, []
    ],
    [   0x29,
        ["K/", "К/", "K:", "К:", "K÷", "К÷"],
        0, 0, 2, []
    ],
    [   0x2A,
        ["МЧ", "KМЧ", "КМЧ"],
        0, 3, 1, [1, 2]
    ],
    [   0x0F,
        ["Вx", "FВx"],
        0, 1, 1, [1]
    ],
    [   0x3B,
        ["СЧ", "KСЧ", "КСЧ"],
        0, 0, 1, [1, 2]
    ],
    [   0x0A,
        [",", "."],
        0, 0, 0, []
    ],
    [   0x0B,
        ["/-/", "+/-"],
        0, 0, 0, []
    ],
    [   0x0C,
        ["ВП"],
        0, 0, 0, []
    ],
    [   0x0D,
        ["Сx"],
        0, 1, 0, []
    ],
    [   0x25,
        ["->", "↻", "→", "F->", "F↻", "F→"],
        0, 1, 3, [3, 4, 5]
    ],
    [   0x37,
        ["/\\", "⋀", "K/\\", "К/\\", "K⋀", "К⋀"],
        0, 3, 2, [2, 3, 4, 5]
    ],
    [   0x38,
        ["\\/", "⋁", "K\\/", "К\\/", "K⋁", "К⋁"],
        0, 3, 2, [2, 3, 4, 5]
    ],
    [   0x39,
        ["(+)", "⊕", "K(+)", "К(+)", "K⊕", "К⊕"],
        0, 3, 2, [2, 3, 4, 5]
    ],
    [   0x3A,
        ["ИНВ", "KИНВ", "КИНВ"],
        0, 3, 1, [1, 2]
    ],
    [   0x52,
        ["В/О", "В/0"],
        0, 4, 0, []
    ],
    [   0x50,
        ["С/П"],
        0, 4, 0, []
    ],
    [   0x59,
        ["x>=0", "x≥0", "x≥0", "x⩾0", "Fx>=0", "Fx≥0", "Fx≥0", "Fx⩾0"],
        2, 4, 4, [4, 5, 6, 7]
    ],
    [   0x57,
        ["x#0", "x!=0", "x<>0", "x≠0", "Fx#0", "Fx!=0", "Fx<>0", "Fx≠0"],
        2, 4, 4, [4, 5, 6, 7]
    ],
    [   0x51,
        ["БП"],
        2, 4, 0, []
    ],
    [   0x53,
        ["ПП"],
        2, 4, 0, []
    ],
    [   0x58,
        ["L2", "FL2"],
        2, 4, 1, [1]
    ],
    [   0x5A,
        ["L3", "FL3"],
        2, 4, 1, [1]
    ],
    [   0x5C,
        ["x<0", "Fx<0"],
        2, 4, 1, [1]
    ],
    [   0x5E,
        ["x=0", "Fx=0"],
        2, 4, 1, [1]
    ],
    [   0x5D,
        ["L0", "FL0"],
        2, 4, 1, [1]
    ],
    [   0x5B,
        ["L1", "FL1"],
        2, 4, 1, [1]
    ],
    [   0x40,
        ["П", "XП"],
        1, 2, 0, []
    ],
    [   0x60,
        ["ИП", "ПX", "Пx"],
        1, 2, 0, []
    ],
    [   0x70,
        ["Kx#0", "Кx#0", "Kx!=0", "Кx!=0", "Kx<>0", "Кx<>0", "Kx≠0", "Кx≠0",],
        1, 4, 0, []
    ],
    [   0x80,
        ["KБП", "КБП"],
        1, 4, 0, []
    ],
    [   0x90,
        ["Kx>=0", "Кx>=0", "Kx≥0", "Кx≥0", "Kx⩾0", "Кx⩾0"],
        1, 4, 0, []
    ],
    [   0xA0,
        ["KПП", "КПП"],
        1, 4, 0, []
    ],
    [   0xB0,
        ["KП", "КП", "KXП", "КXП"],
        1, 2, 0, []
    ],
    [   0xC0,
        ["Kx<0", "Кx<0"],
        1, 4, 0, []
    ],
    [   0xD0,
        ["KИП", "КИП", "KПX", "КПX"],
        1, 2, 0, []
    ],
    [   0xE0,
        ["Kx=0", "Кx=0"],
        1, 4, 0, []
    ]
];

var подсв_ном = "font-size: 75%; color: #A0A0A0;";
var подсв_адр = "text-decoration: underline; color: #A000A0;";
var подсв = ["color: #000000;", "color: #A0A000;", "color: #00A000;", "color: #A00000;", "color: #0000A0;"];
var подсв_преф = "font-weight: lighter; font-size: 90%; color: #404040;";

function Подсветить_блок_кода_МК_61(блок) {
    var текст = блок.innerHTML;
    текст = текст.split(/\s+/);
    var код = [];
    for (var сч = 0; сч < текст.length; сч++)
        if (текст[сч].length > 0)
            код.push(текст[сч]);
    var подсвеченный_код = "";
    var команда_с_адресом = (код[0].length == 2 && !/[^[0-9A\.]/.test(код[0]));
    var найдено, номер_мнемоники;
    for (var сч = 0; сч < код.length; сч++) {
        if (сч > 0) {
            if (сч % 10 == 0)
                подсвеченный_код += "\r\n";
            else
                подсвеченный_код += "\t";
        }
        if (код[сч].length > 3 && код[сч][2] == ".") {
            подсвеченный_код += "<span style='" + подсв_ном + "'>" + код[сч].slice(0, 3) + "</span>";
            код[сч] = код[сч].slice(3);
        }
        if (команда_с_адресом) {
            подсвеченный_код += "<span style='" + подсв_адр + "'>" + код[сч] + "</span>";
            команда_с_адресом = false;
        }
        else {
            найдено = false;
            код[сч] = код[сч].replace(/&lt;/g, "<");
            код[сч] = код[сч].replace(/&gt;/g, ">");
            for (var сч_м = 0; сч_м < мнемоники_команд.length; сч_м++) {
                номер_мнемоники = мнемоники_команд[сч_м][1].indexOf(код[сч]);
                if (номер_мнемоники != -1) {
                    команда_с_адресом = мнемоники_команд[сч_м][2] == 2;
                    if (мнемоники_команд[сч_м][5].indexOf(номер_мнемоники) != -1)
                        подсвеченный_код += "<span style='" + подсв_преф + "'>" + код[сч].slice(0, 1) + "</span><span style='" + подсв[мнемоники_команд[сч_м][3]] + "'>" + код[сч].slice(1) + "</span>";
                    else
                        подсвеченный_код += "<span style='" + подсв[мнемоники_команд[сч_м][3]] + "'>" + код[сч] + "</span>";
                    найдено = true;
                    break;
                }
            }
            if (!найдено)
                for (var сч_м = 0; сч_м < мнемоники_команд.length; сч_м++) {
                    if (мнемоники_команд[сч_м][2] != 1)
                        continue;
                    номер_мнемоники = мнемоники_команд[сч_м][1].indexOf(код[сч].slice(0, код[сч].length - 1));
                    if (номер_мнемоники != -1) {
                        команда_с_адресом = мнемоники_команд[сч_м][2] == 2;
                        if (мнемоники_команд[сч_м][5].indexOf(номер_мнемоники) != -1)
                            подсвеченный_код += "<span style='" + подсв_преф + "'>" + код[сч].slice(0, 1) + "</span><span style='" + подсв[мнемоники_команд[сч_м][3]] + "'>" + код[сч].slice(1) + "</span>";
                        else
                            подсвеченный_код += "<span style='" + подсв[мнемоники_команд[сч_м][3]] + "'>" + код[сч] + "</span>";
                        найдено = true;
                        break;
                    }
                }
            if (!найдено)
                подсвеченный_код += "<span style='" + подсв[0] + "'>" + код[сч] + "</span>";
        }
    }

    блок.innerHTML = "<pre>" + подсвеченный_код + "</pre>";
}

function Подсветить_код_МК_61() {
    var блоки = document.getElementsByName("Код_МК-61");
    for (var сч = 0; сч < блоки.length; сч++)
        Подсветить_блок_кода_МК_61(блоки[сч]);
}