Article View: cn.bbs.comp.program
Article #2383Re: �����Foxpro for DOS ��Ƕ���жϳ���
From: lucky
Date: Fri, 26 Dec 1997 00:00
Date: Fri, 26 Dec 1997 00:00
76 lines
2895 bytes
2895 bytes
����� wrote:
>
> �� foxpro ��д��Ӧ�ó����������һ�����ȼ���ߵ��жϳ���
> �����ж��źŵ���ʱ�����жϵ�ǰ��Ӧ�ó�����ϵ㡣���ж�
> ��������ϣ��ٷ���ԭӦ�ó���ϵ㴦������ִ�С����ʵ����
> �ṩ������лл��λ��Ϻ��
>
> --
> [m[1;37m�� ��Դ:���̺����� bbs.dlut.edu.cn��[FROM: 202.118.68.63][m
������ʵ�ַ�����
1��ʹ��Foxpro LCK����Foxpro2.5 for
DOS��ҵ���еĵ�ʮ���̡���ʹ����C���Ա�д����������ӵ�Foxpro2.5��������Ŀ�ִ���ļ�������C���Եİ����жϳ���Ӧ�ò������⡣
2�������Foxpro 2.0�汾�������Ҫ���������ԡ�
ʹ�ñ����������С�ġ����ο�Foxpro�鼮�е�load���
1�������ó���32K�����ұ�����COM�����ļ���BIN�����ļ�
2���������˳�ʱ�����ܸı�μĴ�����BX�Ĵ�����BP�Ĵ�����SP�Ĵ���
����ʱ������ retf.
3��Foxpro���ݵı����������Ҫ�ӻ����ؽ�������Ϊ�ַ�
����
4��Foxpro���ݵı����ĵ�ַ��DS:BX
5��ʹ�û�����ʱ����Foxpro�����м���. load
��
�Ѿ���һ����������Ļ����� int_fox.bin
push bx
push ax
mov ax, [bx]
cmp ax, '1'
jz init_interrupt
cmp ax, '2'
jz close_interrupt
jnz error_parameter
.
.
.
pop ax
pop bx
retf
��Foxpro������
load c:\fox\bin\int_fox.bin
.
.
.
init_para = "1"
call int_fox.bin with int_para
if int_para="0" then
.
.
.
else
.
.
.
end if
.
.
.
close_para = "2"
call int_fox with close_para
if close_para="0" then
.
.
.
else
.
.
.
endif
return
Technical Details
Message-ID:
<34A334D9.5A51@nobsys.com>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<3LhYB0$GfE@bbs.dlut.edu.cn>Show Full Headers
Complete Article Headers
X-Google-Language: Chinese,GB X-Google-Thread: fc86e,e8118a8a6ba72098 X-Google-Attributes: gidfc86e,public From: lucky <qh.lu@nobsys.com> Subject: Re: �����Foxpro for DOS ��Ƕ���жϳ��� Date: 1997/12/26 Message-ID: <34A334D9.5A51@nobsys.com> X-Deja-AN: 310225362 Content-Transfer-Encoding: 8bit References: <3LhYB0$GfE@bbs.dlut.edu.cn> Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Organization: Net Ease Newsgroups: cn.bbs.comp.program