Показать сообщение отдельно
  #15  
Старый 05.09.2011, 18:28
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Стеком сколько угодно, пока не будет переполнения.
Еще один извращенский вариант:
Код:
var
   a,b,c,d,...,z:integer;
begin
 asm
  mov esi, offset z
  mov ecx, 25
  mov ebx, z
  @1:
     sub esi, 4
     mov eax, [esi]
     mov [esi+4], eax
     loop @1
  mov eax, [esi]
  mov a, ebx  
 end;
end;
Правда сработает ТОЛЬКО если эти переменные подряд объявлены и если компилятор не поменяет их порядок.
Хотя обычно компилятор такой ерундой не занимается.
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием