编程实现如下函数式

编写下列函数的实现程序：

    

DATA SEGMENTX DB 064H ;测试值Y DB 5 DUP(0)DATA ENDSSTAK SEGMENTDB 10 DUP(0)STAK ENDSCODE SEGMENT      ASSUME DS:DATA,SS:STAK,CS:CODESTART: MOV AX,DATA      MOV DS,AX      MOV BL,BYTE PTR X      CMP BL,0      JG  NEXT      ADD BL,10      MOV BYTE PTR Y,BL      JMP NEXT2NEXT:CMP BL,10      JG  NEXT1      MOV DL,BL      MOV BH,0      MOV DH,0      MOV CL,2      SAL DX,CL      MOV CL,4      SAL BX,CL      ADD BX,DX      MOV WORD PTR Y,BX      JMP NEXT2NEXT1: SUB BL,19       MOV BYTE PTR Y,BLNEXT2:MOV DL, BYTE PTR Y       MOV AH,02H       INT 21H       MOV AH,4CH       INT 21HCODE  ENDS       END START