Foros Club Delphi - assembler y el señor delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - assembler y el señor delphi (https://www.clubdelphi.com/foros/showthread.php?t=807)

fcran

26-05-2003 07:52:41

assembler y el señor delphi

bueno compañeros, la realidad es que puedo utilizar codigo en assembler en delphi, como por ejemplo
asm
mov dx,378h
mov al,01h <--------aqui
out dx,al
end;

este codigo me envia al puerto paralelo una señal electrica, que sale por la linea data 0, buena pero el problema radica en que no puedo asignar al registro al, una variable utilizada en delphi, ya sea hexagecimal, como lo exige, no se que deba hacer,ademas deseo saber de una funcion que me reciba un dato desde afuera, y lo pueda capturar y posteriormente, almacenar en cualquier variable que este manejando desde delphi...gracias por su atencion...

su amigo...

delphi.com.ar

26-05-2003 17:34:29

No lo pude probar, pero... ¿Qué te parece algo así?

Código:

procedure SendToPort(AAddr, AValue:Word);

var

  bValue : Byte;

begin

   bValue:= Byte(AValue);

   asm

      mov dx,AAddr

      mov AL,bValue

      out DX,AL

   end;

end;

Saludos!

apexcol

26-06-2006 11:32:14

La mejor forma

definitivamente, la mejor forma de acceder es esta:

Código Delphi [-]procedure ImprimirLPT1(const enviar: Byte);
begin
  asm
    mov dx, 378h
    mov al, enviar
    out dx, al
  end;
end;

Claro que puedes tambiérn usar enviar: Integer, pero eso te obligaría a usar un rango con AND AX, FFh y luego usar para asignar MOV AL, ENVIAR.BYTE[0]

Assembler con Delphi es suave, puedo usar lo mejor de turbo assembler, ya que está incorporado.

Edgar Rodriguez.:cool:

La franja horaria es GMT +2. Ahora son las 15:15:52.