004023AB        Проверка длины пароля (она должна быть >= 10)

0040273A -      Собираем строку szconst из отдельных символов (используя функции rtcVarBstrFromAnsi
00402B06        и __vbaVarCat) – «You are looking in the wrong place!»

00402D03        szencode = OPubOI1Event1(szconst, пароль) {
        004047AC        str = rtcLowerCaseVar(szconst) //в нижний регистр
        004047DF        return OPubOI1Event2(str, пароль) {
                               Шифруем строку str, применяя пароль. Возвращаем результат.
                               Анализ кода позволил выяснить, какое используется кодирование.
                               Это шифр Вижинера.
                               }
                           }
00402D45 -      Собираем строку szcheck из отдельных символов (используя функции rtcVarBstrFromAnsi
0040310B        и __vbaVarCat) – «efy akr pggqzrg ba xzw cisnz cpsuk!»

0040310E        Проверка: szencode == szcheck. Если они равны, то показываем goodboy-сообщение.