;默认认采用ML6.11汇编程序
DATAS SEGMENT;此处输入数据段代码TAB DW -7,7,15,20,21N=($-TAB)/2;G DW 0
DATAS ENDS
STACKS SEGMENT;此处处输入堆栈段代码; DB 200 DUP(0)
STACKS ENDS
CODES SEGMENTASSUME CS:CODES,DS: DATAS, SS:STACKS
START:MOV AX, DATASMOV DS,AX;此处输入代码段代码MOV BX,0mov CX,0
LOP:
mov AX,[BX]
AND AX,07H
CMP AX,07H
JNE NEXT
TRUE:
;ADD G,1
ADD SI,1
NEXT:
ADD BX,2
INC CX 
CMP CX,N
JNE LOP
ANS:
;ADD G,30H
ADD SI,30H
;LEA DX,G
MOV AH,02H
;MOV DX,G
MOV DX,SI
INT 21H
EXIT:MOV AH,4CHINT 21H
CODES ENDS
END START