оптимизация кода Опции

[Dark]

Вопрос в следующем, как лучше, и чем(в сравнении):

Занесение в регистр es адреса буфера видеопамяти:

; 1
  push 0a000h
  pop es
  xor di, di

; 2
  mov ax, 0a000h
  mov es, ax
  xor di, di

; 3
  const vadr: pointer = ptr($a000,0);
  ; ...
  les di, vadr

и как мне в асме присвоить значение функции, т.е.

вместо

function a: byte;
begin
  a:=4;
end;

чтото типа

function a:byte;
begin
  asm
    a:=4;   !!!!!!!!!!!!!!!!!! не проходит.... а как ???
  end
end;

[GLuk]

Значение типа Byte - Word, возвращается в AL - AX соответственно. Все это очень легко можно посмотреть в TD. Остальные посмотри сам... ;)

А по поводу эффективности кода - в зависимости от проца (лично я всегда употребляю mov ax,0A000h)

А размер меньше у push ...

Смотри расклад тиков на 286-386-486 процы (на 8086 push 0A000h не покатит)

++++++++++++++++++++++++++
+ Command + Size + 286-386-486  +
++++++++++++++++++++++++++
PUSH 0A000h (3 байта):  3-2-1
POP ES (1):  5-7-3                    
----------------------------------------
MOV AX,0A000h (3): 2-2-1
MOV ES,AX (2): 2-2-3