Код доступа к портам с помощью ассемблера
Код доступа к портам с помощью ассемблера
Код доступа к портам с помощью ассемблера. procedure WritePortByte(Port:Word; Value:Byte); asm XCHG EDX,EAX OUT DX,AL end; procedure WritePortWord(Port:Word; Value:Word); asm XCHG EDX,EAX OUT DX,AX end; function ReadPortByte(Port:Word) : Byte; asm MOV EDX,EAX IN AL,DX end; function ReadPortWord(Port:Word) : Word; asm MOV EDX,EAX IN AX,DX end;