单片机实验程序.docxVIP

软件实验 -.数据传送实验 1.1 ORG 0000H MAIN: MOV R0,#30H LOOP: MOV @R0,#55H ；给初始地址30H送55H INC RO CJNE R0,#60H,LOOP ；循环，将30H-5FH的数据均设置为55H SJMP $ END 1.2 ORG 0000H MAIN: MOV R0,#30H LOOP: MOV @RO,#55H INC RO CJNE RO,#60H,LOOP ;设置30H-5FH的数据为55H MOV R0,#30H MOV Rl,#90H LOOP1: MOV A,@R0 MOV @R1,A ;将30H的数据传送到90H INC RO INC R1 ；指针加1 CJNE RO,#60H,LOOP1 ；循环，将3OH-5FH的数据传送到90H-BFH SJMP $ END 1.3 ORG 0000H MAIN: MOV R0,#30H LOOP: MOV @R0,#55H INC RO CJNE RO,#60H,LOOP ;设置30H-5FH的数据为55H MOV DPTR,#0200H MOV R0,#30H LOOP1: MOV A,@R0 MOVX @DPTR,A ;将30H的内容送到外部RAM200H INC RO INC DPTR ；指针加1 CJNE RO,#60H,LOOP1 ;循环，将30H-5FH的内容送到外部 RAM200H-22FH SJMP $ END  二.数据分类与校验实验 2.1 ORG 0000H MAIN: MOV R0,#30H MOV @RO,#1 ;将30日的数据设为1 MOV A,@R0 ；保存数据 LOOP: INC RO INC A ；数据内容加1 MOV @R0,A ；加1后的数据送到下一个内部RAM单元 CJNE RO,#5FH,LOOP ；循环，将3OH-5FH的数据设置为1-48 SJMP $ END 2.2 ORG 0000H MAIN: MOV R0,#30H MOV A,#l LOOP: MOV @R0,A INC RO INC A CJNE RO,#6()H,LOOP ；设置30H-5FH的数据为1-48 TRAN: MOV R0,#30H MOV R1 ,#90H LOOP1: MOV A,@R0 ANL A,#01H JZ NEXT ;判断是否为奇数 MOV A,@R0 MOV @R1,A ；是奇数就传送到90H开始的单元屮 INC R1 NEXT: INC RO CJNE RO,#60H,LOOP1 ;循环，将1-48中的奇数送到90H-A7H SJMP $ END 2.3 ORG 0000H MAIN: MOV R0,#30H MOV A,#l LOOP: MOV @R0,A INC RO INC A CJNE RO,#60H,LOOP ;设置30H-5FH的数据为1-48 MOV R0,#30H LOOP1: MOV A,@R0 JNB ORL MOV P,NEXT A,#80H @R0,A NEXT: INC RO CJNE RO,#60H,LOOP1 SJMP $ END 三.简单算术运算实验 3.1 ORG 0000H X EQU 34H Y EQU 56H MAIN: MOV 30H,#X MOV 31H,#Y MOV 33H,#00H MOV A,30H ADD A,31H DA A MOV 32H,A MOV A,33H ADDC A,#00H MOV 33H,A CLR C MOV A,32H SUBB A,#30H MOV F0,C MOV RO,A MOV R4,A ANL A,#()FH CLR C MOV R1,A MOV A,#09H SUBB A,R1 JC NEXT1 CLR C MOV C,AC JNC NEXT2 NEXTI: MOV A,RO CLR C SUBB A,#06H MOV RO,A NEXT2: MOV A,R4 ANL A,#0F0H  ;数据中有奇数个1将最高位置1 ；将奇校验后的数据送回30H-5FH ;X,Y赋值 ；X+Y,并进行十进制调整，存在32H ;相加的进位存在33H ;X+Y?30,并保留借位 ；结果的低位是否大于9 ；AC是否为1 ；大于9对其进行BCD调整 SWAP SWAP A CLR C MOV R2,A MOV A,#09H SUBB A,R2 JC NEXT3 CLR C MOV C.0D7H MOV A,RO JNC NEXT4 NEXT3: MOV A,RO CLR C SUBB A,#60H NEXT4: MOV 32H,A MOV C,F0 MOV A,33H SUBB A,#00H MOV 33H,A