扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条
function ReadPort(Port:WORD):BYTE; var B:BYTE; begin ASM MOV DX, Port; IN AL, DX; MOV B, AL; END; Result:=B; end; procedure WritePort(Port:WORD;ConByte:BYTE); begin ASM MOV DX, Port; MOV AL, ConByte; OUT DX, AL; END; end; |
如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。