Тема: XTEA2
Показать сообщение отдельно
  #6  
Старый 19.06.2013, 10:31
Stamerlan Stamerlan вне форума
Прохожий
 
Регистрация: 18.06.2013
Сообщения: 5
Версия Delphi: Delphi XE3
Репутация: 10
По умолчанию

Цитата:
Сообщение от PhoeniX
Значения a, b, c, d, sum, k[] на этом этапе совпадают с "эталонными" (из оригинального кода)?
Да, если расшифровывать одну и ту же строку одинаковым ключем, то с принимает неверное значение.

Код:
function rol(base:LongWord; shift:LongWord) :LongWord;
Я попробовал заменить, но с так и осталось с прежним значением.

UPD: не хватало скобочек в выражениях при с и а. Надо было написать с := c - (... + ... + ...), а у меня было c := c - ... + ... + ...
Всем спасибо!
Ответить с цитированием