TCP/IP协议栈

开发平台：

DOS

INTEL.ASM：源码内容

							PAGE    66,132
;
;
;
;
;
;
;
;
;  intel - convert intel <--> bigendian
;
;
;  (c) 1990 Erick Engelke
;
;
;
	include masmdefs.hsm
	include	model.hsm
codedef intel
datadef
cstart  intel
;*************************************************************************
;  USAGE:  ULONG intel( ULONG val )
;          - convert to intel format
;*************************************************************************
cpublic intel
	mov	AX, +@AB + 2 [BP]
	mov	DX, +@AB + 0 [BP]
	xchg	AL, AH
	xchg	DL, DH
creturn intel
;*************************************************************************
;  USAGE:  UINT intel16( UINT val )
;          - convert to intel format
;*************************************************************************
cpublic intel16
	mov	AX, +@AB [BP]
	xchg	AL, AH
creturn intel16
cend    intel
        end

						