| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 570 人关注过本帖
标题:[求助]逆序(刚才发错了,现在搞定了)
只看楼主 加入收藏
SOS999
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-10-29
收藏
 问题点数:0 回复次数:1 
[求助]逆序(刚才发错了,现在搞定了)

本想让它输入数字,然后出现逆序,不过不行,如何改才可以达到要求?请帮帮忙
DATAS SEGMENT
strs db 10,?,10 dup(?)
STRD DB 11 DUP(?)

CR EQU 13
LF EQU 10
CRLF DB CR,LF,'$'
PROMPT DB 'PLEASE INPUT A STRING:','$'
RES DB 'THE NEW RESLUT IS:','$'

DATAS ENDS

STACKS SEGMENT
DW 32 DUP(0)
;此处输入堆栈段代码
STACKS ENDS

CODES SEGMENT
MAIN PROC FAR
ASSUME CS:CODES,DS:DATAS,SS:STACKS

MOV AX,DATA
MOV DS,AX

LEA DX,PROMPT
MOV AH,9
INT 21H



LEA DX,STRS
MOV AH,10
INT 21H

LEA DX,CRLF
MOV AH,9
INT 21H

LEA DX ,CRLF
MOV AH,9
INT 21H

LEA DX,RES
MOV AH,9
INT 21H



XOR BH,BH
MOV BL,STR+1
MOV STRD[BX],'$'

MOV CX,BX
LEA DI,STRD
STD
LEA SI,STRS+2
ADD SI,BX
DEC SI

NEXT:
LODSB
MOV [DI],AL
INC DI
LOOP NEXT

LEA DX,STRD
MOV AH,9
INT 21H

MOV AH,4CH
INT 21H
CODES ENDS
END START

[此贴子已经被作者于2006-11-20 22:23:42编辑过]

搜索更多相关主题的帖子: 逆序 
2006-11-20 21:28
SOS999
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-10-29
收藏
得分:0 

搞定啦
DATAS SEGMENT
strs db 10,?,10 dup(?)
STRD DB 11 DUP(?)

CR EQU 13
LF EQU 10
CRLF DB CR,LF,'$'
PROMPT DB 'PLEASE INPUT A STRING:','$'
RES DB 'THE NEW RESLUT IS:','$'

DATAS ENDS

STACKS SEGMENT
DW 32 DUP(0)
;此处输入堆栈段代码
STACKS ENDS

CODES SEGMENT
MAIN PROC FAR
ASSUME CS:CODES,DS:DATAS,SS:STACKS

MOV AX,DATAS
MOV DS,AX

LEA DX,PROMPT
MOV AH,9
INT 21H



LEA DX,STRS
MOV AH,10
INT 21H

LEA DX,CRLF
MOV AH,9
INT 21H

LEA DX ,CRLF
MOV AH,9
INT 21H

LEA DX,RES
MOV AH,9
INT 21H



XOR BH,BH
MOV BL,STRS+1
MOV STRD[BX],'$'

MOV CX,BX
LEA DI,STRD
STD
LEA SI,STRS+2
ADD SI,BX
DEC SI

NEXT:
LODSB
MOV [DI],AL
INC DI
LOOP NEXT

LEA DX,STRD
MOV AH,9
INT 21H

MOV AH,4CH
INT 21H
MAIN ENDP
CODES ENDS
END MAIN


我不懂就问,请别嫌我笨
2006-11-20 22:15
快速回复:[求助]逆序(刚才发错了,现在搞定了)
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.035052 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved