| <DIV id=701><PRE>{$R *.DFM}
procedure portout(IOport:word;value:byte) ;assembler;
asm
xchg ax,dx //port`a deger göndermek
out dx,al
end;
function portin(IOport:word) :byte;assembler;
asm
mov dx,ax //port`taki degeri okumak için
in al,dx
end;
Devamını Görmek İçin Üye Girişi Yapmanız Gerekmektedir. |