谁可以帮我看看 感激

DATAS SEGMENT
    KW DB 02H,79,00,00
    KW1 EQU THIS WORD;此处输入数据段代码 
DATAS ENDS

STACKS SEGMENT
    ;此处输入堆栈段代码
STACKS ENDS

CODES SEGMENT
    ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:LEA AX,KW1
      MOV SI,AX
      MOV AX,024FH
   MOV [SI],AX
   MOV AX,0000H
   MOV [SI+2],AX
;DELAY:MOV CX,0
;   INC CX
;   CMP CX,110
;   JNE DELAY
   CALL WALL
     MOV AH,4CH
     INT 21H
WALL PROC NEAR
    MOV AX,DATAS
    MOV DS,AX
    LEA AX,KW
    MOV SI,AX
    MOV CX,1
    MOV BL,06H
    MOV AL,'*'
    MOV DX,[SI+2]
WEI1:MOV BH,BYTE PTR[SI]
    CMP BH,DH
    JZ EXIT
NEI:MOV BH,BYTE PTR[DI+1]
    CMP BH, DL
    JZ WEI
    MOV AH,2
    MOV BH,0
    INT 10H
    MOV AH,9
    INT 10H
    INC DL
    JMP NEI
WEI:ADD DH,1
    MOV DL,BYTE PTR[SI+3]
    JMP WEI1
;此处输入代码段代码
EXIT:RET
WALL ENDP  
CODES ENDS
    END START