汇编语言程序设计：在附加段中有一数组，数地址为BUFF，数组中第一个字存放了数组的长度。编写程序，在数组中查找0，若找到则将其从数组中删去，后续项向前压缩，其余部分补0.

源程序：

DATA      SEGMENT

ST1  DB   50H

BUFF      DB   ?

       DB   50H DUP('0')

       DB   '$'

DATA      ENDS

 

CODE    SEGMENT

MAIN     PROC    FAR

       ASSUME CS:CODE,DS:DATA

START:    MOV      AX,DATA

       MOV      DS,AX

       MOV      AH,0AH

       MOV      DX,OFFSET ST1