Ver Mensaje Individual
  #18  
Antiguo 15-03-2016
xangiesaurx xangiesaurx is offline
Miembro
NULL
 
Registrado: feb 2016
Posts: 57
Reputación: 11
xangiesaurx Va por buen camino
Que tal chicos, la verdad, no se me da nada ensamblador, me cuesta mucho entenderle, entonces me preguntaba si me podrian ayudar a traducir algunas partes a código para Delphi please?

Como este:
asm
PUSH EBX
LEA EBX, ReverseTable
MOV ECX, [PackedSize]
MOV EDX, [Source]
MOV EDX, [EDX]
@@1:
MOV AL, [EDX]
{$ifdef COMPILER_6}
XLATB
{$else}
XLAT
{$endif COMPILER_6}
MOV [EDX], AL
INC EDX
DEC ECX
JNZ @@1
POP EBX
end;

Gracias
Responder Con Cita