Cita:
Empezado por TOPX
Hola,
Ahora yo, con mi interpretación de la cuestión; que espero no estar enredando las cosas.
Pues, ya que este hilo está en " ASM y Microcontroladores", es posible que trate de Assembler "en línea" y que lo que busque esté aquí.
|
Pues como digo, tal vez me equivoque con el requerimiento de
mario2000, pero esto funciona en delphi con ASM.
Código Delphi
[-]
procedure WritePort(Port: word; Value: byte);
asm
push word ptr Port
mov al, Value
pop dx
out dx, al
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
WritePort(1016,ord('A'));
WritePort(1016,65);
WritePort($3F8,65);
WritePort($3F8,$41);
end;
Salud OS