原创力文档- 1、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
- 2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
[其它]实验室汇编源程序
;==================== 软件实验四 数据区传送子程序 =====================
ORG 07B0H
MOV R2,00H
MOV R3,#00H
MOV R4,#10H
MOV R5,#00H
MOV R6,#00H
MOV R7,#08H
SE22: MOV DPL,R3
MOV DPH,R2 ;建立源程序首址
MOVX A,@DPTR ;取数
MOV DPL,R5
MOV DPH,R4 ;目的地首址
MOVX @DPTR,A ;传送
CJNE R3,#0FFH,LO42
INC R2
LO42: INC R3 ;源地址加1
CJNE R5,#0FFH,LO43
INC R4
LO43: INC R5 ;目地址加1
CJNE R7,#00H,LO44
CJNE R6,#00H,LO45 ;字节数减1
SJMP $
NOP
LO44: DEC R7
SJMP SE22
LO45: DEC R7
DEC R6
SJMP SE22 ;未完继续
END
;================== 软件实验一 清零程序 =============
ORG 0640H
SE01: MOV R0,#00H
MOV DPTR,#2000H ;(2000H)送DPTR
LOO1: MOVX @DPTR,A ;0送(DPTR)
INC DPTR ;DPTR+1
INC R0 ;字节数加1
CJNE R0,#00H,LOO1 ;不到FF个字节再清
SJMP $
END
;=================== 软件实验二 拆字程序 ===========================
ORG 0660H
SE02: MOV DPTR,#2000H
MOVX A,@DPTR
MOV B,A ;(2000)→A→B
SWAP A ;交换
ANL A,#0FH ;屏敝高位
INC DPTR
MOVX @DPTR,A ;送2001H
INC DPTR
MOV A,B
ANL A,#0FH ;(2000)内容屏敝高位
MOVX @DPTR,A ;送2002H
SJMP $
END
;=================== 软件实验三 拼字程序 ==============================
ORG 0680H
SE03: MOV DPTR,#2000H
MOVX A,@DPTR
ANL A,#0FH ;(2000H)内容屏敝高位
SWAP A ;交换
MOV B,A ;保存
INC DPTR
MOVX A,@DPTR ;(2001H)内容送A
ANL A,#0FH ;屏敝高位
ORL A,B ;或
INC DPTR
MOVX @DPTR,A ;送2002H
SJMP $
END
;==============
文档评论（0）