三、数据传送子程序（把(R2,R3)源RAM区首地址内的（R6,R7）个字节数据，传送到（R4,R5）目的RAM区。）数据传输ORG0MOVR2,#60HMOVR3,#00HMOVR4,#70HMOVR5,#00HMOVR6,#0FHMOVR7,#0FFHSE22:MOVDPL,R3MOVDPH,R2MOVXA,@DPTRMOVDPL,R5MOVDPH,R4MOVX@DPTR,ACJNER3,#0FFH,LO42INCR2LO42:INCR3CJNER5,#0FFH,LO43INCR4LO43:INCR5CJNER7,#00H,LO44CJNER6,#00H,LO45SJMP$NOPLO44:DECR7SJMPSE22LO45:DECR7DECR6SJMPSE22END二、拆字程序（把7000H的内容拆开，高位送7001H低位，低位送7002H低位。7001H/7002H高位清零，一般本程序用于把数据送显示缓冲区时用。）ORG0000HMOVA,#34HMOVDPTR,#7000HMOVXA,@DPTRMOVR1,ASWAPAANLA,#0FHMOVDPTR,#7001HMOVX@DPTR,AMOVDPTR,#7000HMOVA,,R1ANLA,#0FHMOVDPTR,#7002HMOVX@DPTR,ASJMP$END内部：ORG0000HMOVA,#34HMOVR0,#30HMOV@R0,ASWAPAANLA,#0FHMOVR0,#31HMOV@R0,AMOVR0,#30HMOVA,#34HMOV@R0,AANLA,#0FHMOVR0,#32HMOV@R0,ASJMP$END7000H，7001H的低位相拼后送入7002H：ORG0000HMOVA,#12HMOVDPTR,#7000HMOVX@DPTR,AANLA,#0FHMOVR0,AMOVA,#34HMOVDPTR,#7001HMOVX@DPTR,AANLA,#0FHSWAPAORLA,R0MOVDPTR,#7002HMOVX@DPTR,ASJMP$END把7000H内容拆开，高位送7001H低位，低位送7002H低位，7001H、7002H高位清零外部：ORG0000HMOVDPTR,#7000HMOVXA,@DPTRMOVB,AANLA,#0F0HSWAPAINCDPTRMOVX@DPTR,AMOVA,BANLA,#0FHINCDPTRMOVX@DPTR,ASJMP$END内部：ORG0000HMOVR0,#30HMOVA,@R0MOVB,AANLA,#0F0HSWAPAINCR0MOV@R0,AMOVA,BANLA,#0FHINCR0MOV@R0,ASJMP$END四、查找相同数个数（在7000H-700FH中查出几个字节是零，统计“00”的个数再显示在30H单元内。）ORG0000HSS:MOVR0,#10HMOVR1,#00HMOVDPTR,#7000HAA:MOVXA,@DPTRCJNEA,#00H,BBINCR1BB:INCDPTRDJNZR0,AAMOV30H,R1SJMP$END五、P3.3输入、P1口输出（1、3.3口做输入口，外接一脉冲，每输入一个脉冲，P1口按十六进制加一。P1口做输出口，编写程序，使P1口接的8个发光二极管L1-L8按16进制加一方式点亮发光二极管。）ORG0000HCIA:MOVA,#00HCIA1:JBP3.3,CIA1LCALLDELAYJBP3.3,CIA1CIA2:JNBP3.3,CIA2LCALLDELAYJNBP3.3,CIA2INCAPUSHACCMOVP1,APOPACCAJMPCIA1DELAY:MOVR6,#20HDELAY1:MOVR7,#50HDJNZR7,$DJNZR6,DELAY1RETEND六、并行I/O口8255扩展(模拟交通灯)交通灯ORG0MOVDPTR,#0FF2BHMOVA,#80HMOVX@DPTR,AMOVDPTR,#0FF29HMOVA,#09HMOVX@DPTR,AINCDPTRMOVA,#24HMOVX@DPTR,AACALLDELAY1LOOP3:MOVDPTR,#0FF29HMOVA,#01HMOVX@DPTR,AINCDPTRMOVA,#86HMOVX@DPTR,AACALLDELAY1LOOP:MOVR0,#3MOVDPTR,#0FF29HMOVA,#01HMOVX@DPTR,AINCDPTRMOVA,#45HMOVX@DPTR,AACALLDELAY2MOVDPTR,#0FF29HMOVA,#01HMOVX@DPTR,AINCDPTRMOVA,#04HMOVX@DPTR,AACALLDELAY2DJNZR0,LOOPMOVDPTR,#0FF29HMOVA,#0CHMOVX@DPTR,AINCDPTRMOVA,#30HMOVX@DPTR,AACALLDELAY1LOOP2:MOVR0,#3MOVDPTR,#0FF29HMOVA,#0AHMOVX@DPTR,AINCDPTRMOVA,#28HMOVX@DPTR,AACALLDELAY2MOVDPTR,#0FF29HMOVA,#08HMOVX@DPTR,AINCDPTRMOVA,#20HMOVX@DPTR,AACALLDELAY2DJNZR0,LOOP2AJMPLOOP3DELAY1:MOVR7,#10DELAY3:MOVR6,#200DELAY6:MOVR5,#250DJNZR5,$DJNZR6,DELAY6DJNZR7,DELAY3RETDELAY2:MOVR7,#10DELAY4:MOVR6,#100DELAY5:MOVR5,#250DJNZR5,$DJNZR6,DELAY5DJNZR7,DELAY4RETEND七、串并转换实验ORG0000HLJMPMAINORG000BHAJMPPT0FORG0033HMAIN:MOVSP,#60HMOVTMOD,#01HMOVTL0,#00HMOVTH0,#4BHMOVR0,#0HMOVR4,#20MOVSCON,#00HCLRTICLRRISETBTR0SETBET0SETBEASJMP$PT0F:PUSHACCPUSHPSWCLREACLRTR0MOVTL0,#00HMOVTH0,#4BHSETBTR0DJNZR4,EXITMOVR4,#20MOVDPTR,#TABMOVA,R0MOVCA,@A+DPTRCLRTIMOVSBUF,AINCR0CJNER0,#0AH,EXITMOVR0,#00HEXIT:SETBEASETBET0SETBTR0POPPSWPOPACCRETITAB:DB0FCH,60H,0DAH,0F2H,66H,0B6H,0BEH,0E0H,0FEH,0F6HEND1.R0(30H)内部RAM区域首地址内的R1(20H)个字节数据传送到(R2,R3)目的RAM区ORG0000HMOVR0,#30HMOVR1,#20HMOVR2,#60HMOVR3,#00HMAIN:MOVA,@R0MOVDPH,#60HMOVDPL,#00HMOVX@DPTR,AINCR0INCR3DJNZR2,MAINEND2.在7000H和700FH中查出几个字节是零,统计00的个数,显示在30H上ORG0000HMOVR0,#00HMOVR1,#00HMOVDPTR,#7000HMAIN:MOVXA,@DPTRCJNEA,#00H,LOOPINCR0LOOP:INCDPTRINCR1CJNER1,#10H,MAINMOV30H,R0SJMP$END3.外部3000H-300FH内容传送到内部30H-3FH中ORG0000HMOVR2,#30HMOVR3,#00HMOVR4,#10HMOVR0,#30HMAIN:MOVDPTR,#3000HMOVXA,@DPTRMOVX@R0,AINCR3INCR0DJNZR4,MAINEND
