INT 21H RET

INPUTSTR ENDP

HUICHE PROC NEAR ;回车换行函数 MOV DL,0DH MOV AH,02H INT 21H MOV DL,0AH MOV AH,02H INT 21H RET HUICHE ENDP OUTPUTSTR PROC NEAR MOV DX,BX ;输出字符串函数 MOV AH,09H INT 21H RET

OUTPUTSTR ENDP

DELETE PROC NEAR ;删除函数 LEA BX,BUF MOV DI,BX ADD DI,1

MOV AL,DELE XOR AH,AH ADD DI,AX XOR CH,CH MOV CL,NUMBER ADD BX,CX ADD BX,1 MOVE: CMP BX,DI JE LADE MOV DH,[DI+1] MOV [DI],DH INC DI CMP BX,DI JNE MOVE LADE:

MOV BYTE PTR [DI],'$' DEC NUMBER RET DELETE ENDP

MOVE1 PROC NEAR ;移动复制函数 LEA SI,BUF

ADD SI,2 LEA DI,BUF1 MOV CL,NUMBER XOR CH,CH REP MOVSB

MOV BYTE PTR [DI],'$' RET MOVE1 ENDP

INSERT PROC NEAR ;插入函数 LEA BX,BUF MOV DI,BX MOV AL,[INSER] XOR AH,AH ADD DI,AX INC DI XOR CH,CH MOV CL,NUMBER ADD BX,CX ADD BX,1 INS1: MOV DH,[BX] MOV [BX+1],DH

DEC BX CMP BX,DI JAE INS1 INC BX

MOV AL,[INSER+1] MOV [BX],AL INC NUMBER RET INSERT ENDP CODES ENDS END START （3）、实验结果 插入：