mod10_1.asm

汇编的例子利用汇编工具可编译通过不知是否有

 .MODEL SMALL, C
 .DATA
    buff DB "ABCDEFG",0
    msg  db 5 DUP('0'), 0ah, 0dh, '$'
 .CODE
 Strlen  PROC USES AX BX, String:PTR BYTE
	 MOV  BX,String
	 XOR  CX,CX
	 MOV  AL,[BX]
	 .WHILE AL!=0
	   INC CX
	   INC BX
	   MOV AL,[BX]
	 .ENDW
	 RET
 Strlen ENDP

DISPBX	PROC data1:ptr byte
        PUSH	DS
	PUSH	DX
	PUSH	CX
	PUSH	AX

        CMP	BX, 0
	JGE	next
	MOV	DL, '-'
	MOV	AH, 2
	INT	21H
	NEG	BX
next:	MOV	SI, data1
        add     si, 4
	MOV	AX, BX
	MOV	CX, 10D
again:	XOR	DX, DX
	IDIV	CX
	ADD	DL, '0'
	MOV     [SI], DL
	DEC	SI
	JGE	again

        mov	DX, data1
	MOV	AH, 9
	INT	21H
	POP	AX
	POP	CX
	POP	DX
	POP	DS
	RET
dispbx  endp
	.STARTUP
	INVOKE Strlen,ADDR buff

        mov bx, cx
        invoke dispbx, addr msg

        .EXIT 0
	END