🚀 go-pugleaf

��bc3.1�б�д�ĶԶ˿ڲ�����dll,�����ִ�ж�ͨ��.���Զ˿ڵIJ�����δ
�ﵽԤ��Ч��,��֪��dll�ı�д�͵�������û�д�,�����ָ��.

����.cpp��������:
#include <windows.h>
#include <dos.h>
int FAR PASCAL LibMain(HANDLE hInstance,WORD wDataSeg,WORD wHeapSize,
			LPSTR lpszCmdLine)
{
	if(wHeapSize!=0)
		UnlockData(0);
	return(1);
}

extern "C" int far pascal inpbyte(unsigned int port)
{
	int value;
	value=inp(port);
        	return value;
}

extern "C" void far pascal outpbyte(unsigned int port,unsigned int value)
{
	outp(port,value);
}


.def�ļ�����
LIBRARY myio
DESCRIPTION 'TEST'
EXETYPE WINDOWS
CODE PRELOAD MOVEABLE DISCARDABLE
DATA PRELOAD MOVEABLE SINGLE
HEAPSIZE 1024
EXPORTS outpbyte
	inpbyte
	outpword
	inpword


��vb3.0�������
Declare Function inpbyte% Lib "d:\zyw\cpp\myio.dll" (ByVal port%)
Declare Sub outpbyte Lib "d:\zyw\cpp\myio.dll" (ByVal port%, ByVal portvalue%)

�����������
dim temp as integer    
dim data as integer
temp = 2500 
outpbyte &H21C, temp
data=inpbyte &H210

--
�� ��Դ: �й�ƴ�BBSվ [bbs.ustc.edu.cn]