![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Дельфийские аналоги функций _lrotr и _lrotr [D7, WinXP]
andreil © (2008-05-06 23:53:00)Собственно никтог не видел? А то без них никак OBJ-файл не подключить, ругается на отсутствие этих функций. Их описание я на шел, но вот сами функции - нет :(
Поможет кто?
andreil (2008-05-06 23:56:00) [41]Вроде как нашел на АСМ-ие, но может не то?
function lrotr(N: ULONG; Num: byte): ULONG;
asm
@@loop:
ROR EAX, 1
SUB EDX, 1
JNZ @@loop
end;
function lrotl(n: ulong; num: integer): ulong;
asm
@@loop:
ROL EAX, 1
SUB EDX, 1
JNZ @@loop
end;