字符串倒序-汇编语言

输入一个字符串，将该串倒序后在屏幕上显示

DATAS SEGMENT     
BUF DB 30         
DB ?         
DB 30 DUP(?)     
BUF1 DB 0DH,0AH,30 DUP('$') 
LEN EQU $-DB
DATAS ENDS 
CODES SEGMENT     
ASSUME CS:CODES,DS:DATAS 
START:     
MOV AX,DATAS     
MOV DS,AX     
LEA DX,BUF     
MOV AH,0AH     
INT 21H     
LEA SI,BUF[2]   
LEA DI,BUF1[2]       
MOV BL,BUF[1];长度   
XOR BH,BH ;自己变成0    
ADD SI,BX;到缓冲区
MOV CL,BUF+1 
AGAIN:     
DEC SI     
MOV AL,[SI]     
MOV [DI],AL     
INC DI     
LOOP AGAIN        
LEA DX,BUF1     
MOV AH,09H     
INT 21H     
MOV AH,4CH     
INT 21H 
CODES ENDS 
END START

结果图示例：