BCB高手进阶
（九）读写端口的两种技巧
在C++Builder中，不能够使用Turbo C中的outputb和inputb端口读写函数。但我们可以有另外两种办法实现这个功能。一种为内嵌汇编语言，另一种为使用__emit__函数。
1 通过内嵌汇编语言实现端口的读写
在C++Builder中，汇编语句必须被包含在以关键字asm为起始的一对大括号中：
asm {
汇编语句1
……
}
利用内嵌汇编语言编制端口输出函数如下：
void OutPort(unsigned short port,unsigned char value)//port参数为输出端口地址，value参数为输出值
{
asm{
mov dx , port //把端口地址送到处理器DX寄存器中
mov al , value // 把value 送到处理器AL寄存器中
out dx , al // 把AL寄存器中的值送到端口
};
}
该函数将无符号字符型8位的数据value写入地址为port的端口上，port的数据类型是unsigned short ，16位无符号短整形。
利用内嵌汇编语言编制端口输入函数如下：
unsigned char InPort(unsigned short port)//port参数为输入端口地址，返回为输入值
{
unsigned char value ;
asm{
mov dx , port // 把端口地址送到处理器DX寄存器中
in al, dx // 从DX指定端口中将一数据送到AL寄存器中
mov ind , value // 把AL寄存器中的值赋给value
};
return value; //返回端口数据
}
函数InPort从地址为port的端口读入一个无符号8位的字符型数据，其其参数只一个，即端口号。返回的数据为unsigned char类型的，为从端口读取的值。
2 通过__emit__函数实现端口的读写
__emit__ 函数一般极少用到。其用法如下：
void _ _emit_ _(argument, . . .);
该函数为C＋＋Builder 的一个内部函数，调用的参数为机器语言指令。它在编译的时侯，将机器语言指令直接嵌入目标码中，不必借助于汇编语言和汇编编译程序。
如果想使用__emit__ 函数，必须熟悉80x86处理器的机器语言指令。如果调用的参数是错误机器语言指令，则程序将非正常运行,并很容易导致死机。
利用__emit__函数编制端口输出函数如下：
void OutPort(unsigned short port,unsigned char value)//port参数为输出端口地址，value参数为输出值
{
__emit__(0x8b,0x95,&port); // 把端口地址送到处理器EDX寄存器中
__emit__(0x8a,0x85,&value); // 把value 送到处理器AL寄存器中
__emit__(0x66,0xee); // 把AL寄存器中的值送到端口
}
利用__emit__函数编制端口输入函数如下：
unsigned char InPort(unsigned short port)//port参数为输入端口地址，返回为输入值
{
unsigned char value ;
__emit__(0x8b,0x95,&port) ; // 把端口地址送到处理器DX寄存器中
__emit__(0x66,0xec); // 从DX指定端口中将一数据送到AL寄存器中
__emit__(0x88,0x85,&value); // 把AL寄存器中的值赋给value
return value; //返回端口数据
}
由这两种方法所编制的函数注释可以看出，它们每一句的功能都是一样的，只是一个是嵌入了汇编语言，另一个是直接使用机器语言。
3 应用举例
在C++Builder中，通过File/New Application菜单新建一工程。
在表单中加两个Button控件，Caption分别为“写端口”和“读端口”。
将第一种方法所编制的OutPort和InPort函数拷贝到表单的头文件中，并把这两个函数作为表单类的在表单类的公有成员函数。
分别双击两个Button控件，产生OnClick事件函数。在单元文件的.cpp文件添加如下代码：
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
OutPort(0x378,0x00);//向地址为378H的端口输出数据
OutPort(0x379,0x00);//向地址为379H的端口输出数据
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
int value;
value=InPort(0x37a);//从地址为37aH的端口读入数据
}
//---------------------------------------------------------------------------
