没有合适的资源?快使用搜索试试~ 我知道了~
资源推荐
资源详情
资源评论
DATA SEGMENT
DATA1 DB 33H,39H,31H,37H,38H ;第一个数据(作为被减数)
DATA2 DB 36H,35H,30H,38H,32H ;第二个数据(作为减数)
DATA3 DB 36H,35H,30H,38H,32H ;第二个数据(作为减数)
DATA4 DB 36H,35H,30H,38H,32H ;第二个数据(作为减数)
DATA5 DB 36H,35H,30H,38H,32H ;第二个数据(作为减数)
DATA6 DB 36H,35H,30H,38H,32H ;第二个数据(作为减数)
MES1 DB '-','$'
MES2 DB '+','+','$' ;0代表+,1代表-
DATA ENDS
STACK SEGMENT ;堆栈段
STA DB 20 DUP(?)
TOP EQU LENGTH STA
STACK ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA,SS:STACK,ES:DATA
START:
MOV AX,DATA
MOV DS,AX
MOV ES,AX
MOV AX,STACK
MOV SS,AX
MOV AX,TOP
MOV SP,AX ;堆栈处理阶段
JMP KAISHI
;------------------------------------------------------------------------------------
QINGLING PROC FAR ;清零
Q1: MOV BYTE PTR[SI+BX-1],'0'
DEC BX
JNZ Q1
DATA1 DB 33H,39H,31H,37H,38H ;第一个数据(作为被减数)
DATA2 DB 36H,35H,30H,38H,32H ;第二个数据(作为减数)
DATA3 DB 36H,35H,30H,38H,32H ;第二个数据(作为减数)
DATA4 DB 36H,35H,30H,38H,32H ;第二个数据(作为减数)
DATA5 DB 36H,35H,30H,38H,32H ;第二个数据(作为减数)
DATA6 DB 36H,35H,30H,38H,32H ;第二个数据(作为减数)
MES1 DB '-','$'
MES2 DB '+','+','$' ;0代表+,1代表-
DATA ENDS
STACK SEGMENT ;堆栈段
STA DB 20 DUP(?)
TOP EQU LENGTH STA
STACK ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA,SS:STACK,ES:DATA
START:
MOV AX,DATA
MOV DS,AX
MOV ES,AX
MOV AX,STACK
MOV SS,AX
MOV AX,TOP
MOV SP,AX ;堆栈处理阶段
JMP KAISHI
;------------------------------------------------------------------------------------
QINGLING PROC FAR ;清零
Q1: MOV BYTE PTR[SI+BX-1],'0'
DEC BX
JNZ Q1
RET
QINGLING ENDP
;出错函数
ERROR PROC FAR
MOV DL,'E'
MOV AH,02H
INT 21H
MOV AH,01
INT 21H
MOV AH,4CH
INT 21H
RET
ERROR ENDP
;------------------------------------------------------------------------------
KAISHI: MOV SI,OFFSET DATA1 ;一号数据清零
MOV BX,05
CALL QINGLING
MOV SI,OFFSET DATA2 ;二号数据清零
MOV BX,05
CALL QINGLING
MOV SI,OFFSET DATA3 ;三号数据清零
MOV BX,05
CALL QINGLING
MOV SI,OFFSET DATA4 ;三号数据清零
MOV BX,05
QINGLING ENDP
;出错函数
ERROR PROC FAR
MOV DL,'E'
MOV AH,02H
INT 21H
MOV AH,01
INT 21H
MOV AH,4CH
INT 21H
RET
ERROR ENDP
;------------------------------------------------------------------------------
KAISHI: MOV SI,OFFSET DATA1 ;一号数据清零
MOV BX,05
CALL QINGLING
MOV SI,OFFSET DATA2 ;二号数据清零
MOV BX,05
CALL QINGLING
MOV SI,OFFSET DATA3 ;三号数据清零
MOV BX,05
CALL QINGLING
MOV SI,OFFSET DATA4 ;三号数据清零
MOV BX,05
剩余20页未读,继续阅读
资源评论
- ccsshh123452014-03-24对我非常有帮助。虽然不是很完善
zt19900510
- 粉丝: 0
- 资源: 4
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功