call.asm

简单的虚拟机

	.486
DATA	SEGMENT	USE16
NUM	DW	1122H
	DW	3344H
	DW	5566H
DATA	ENDS
STACK_	SEGMENT	STACK 'STACK' USE16
	DB	100 DUP(?)
STACK_	ENDS

CODE	SEGMENT  USE16
	ASSUME	CS:CODE,DS:DATA,SS:STACK_
BEG:	MOV	AX,DATA
	MOV	DS,AX
	MOV	SI,OFFSET NUM
	CALL	COMPUTE
XYZ:	CALL	DISP
EXIT:	MOV	AH,4CH
	INT	21H

COMPUTE	PROC
	MOV	BX,0
	ADD	BX,[SI+0]
	ADD	BX,[SI+2]
	ADD	BX,[SI+4]
	RET
COMPUTE	ENDP

DISP	PROC
	MOV	CX,16
LAST:	MOV	DL,'0'
	RCL	BX,1
	JNC	NEXT
	MOV	DL,'1'
NEXT:	MOV	AH,2
	INT	21H
	LOOP	LAST
	RET
DISP	ENDP
CODE	ENDS
	END	BEG