单片机课后习题

1、P148作业5-5请分别定义下列变量：（1） 片内RAM中无符号字符型变量x；unsigned char data x;（2） 片内RAM中位寻址区无符号字符型变量y，将y.0y.2再分别定义为位变量key_in、key_up、key_down;unsigned char bdata y;sbit key_in=y0;sbit key_up=y1;sbit key_down=y2;（3） 片外RAM中整型变量x，并指定变量x的绝对地址为4000H；xdata int x _at_ 0x4000;或 #define x XWORD0x2000（4）特殊功能寄存器变量PCON； sfr PCON=

2、0x87;57用C51语言编程实现，片内扩展RAM的000EH单元和000FH单元的内容交换。#includevoid main() unsigned char *pp1,*pp2,temp;AUXR&=0xfd;pp1=0x000e;pp2=0x000f;temp=*pp1;*pp1=*pp2;*pp2=temp;59 试用C51语言编写程序实现将片内RAM 21H单元存放的两位BCD码数转换为十六进制数存入30H单元。data unsigned char y1 _at_ 0x21;data unsigned char y2 _at_ 0x30;void main()unsigned cha

3、r temp;temp=y1;y1=(y1&0xf0)4;y2=y1*10+(temp&0x0f);P208作业7-7在STC12C5A60S2单片机中，假设系统的时钟频率为12MHz，利用定时/计数器T0，分别用汇编语言和C51编程实现在P1.0引脚输出周期为2s的方波。分析:仿例题7-3，要产生周期2s的方波，需定时1s，一个定时器完成不了，可定时50ms，T0工作在方式1，然后利用R7对50ms定时中断计数20次来实现。选择12T模式，T0x12=0，f=12MHz，则需计数50000，初值为65536-50000=15536=3CB0H（1）汇编程序：ORG 0000H LJMP MA

4、IN ORG 000BH ；T0的中断向量入口地址 LJMP T0_INT ORG 0100H MAIN：MOV SP,#0BFH ；初始化堆栈指针 MOV TMOD,# 01H ；T0工作在方式1 MOV TL0,#0B0H ；给T0写入初值 MOV TH0,#03CH MOV R7,#20 ；利用寄存器R7计数20次 SETB EA ；开放总中断 SETB ET0 ；T1溢出中断允许 SETB TR0 ；启动T1开始工作 SJMP $ T0_INT：MOV TL0,#0B0H ；重新赋初值 MOV TH0,#03CH DJNZ R7,NEXT CPL P1.0 MOV R7,#20 ；重新

5、赋给R7值50 NEXT：RETI END（1） C51程序：#include/ sbit P1_0=P10; unsigned char i=0; void main( ) TMOD=0x01;/T0工作在方式1 TL0=0xB0;/给T0装入初值 TH0=0x3C; EA=1;/开放总中断 ET0=1;/T0溢出中断允许 TR0=1;/启动T0开始工作 while(1); void T0_INT( ) interrupt 1/T0中断服务程序 TH0=0x3C; TL0=0xB0;/重新置入初值 i+; if(i= =20) P1_0=!P1_0; i=0; 7-8由P1口驱动8个指示灯，

6、利用定时/计数器T1的定时功能分别用汇编语言和C51编程实现8个指示灯依次循环点亮（输出高电平），点亮间隔为1s，反复循环。分析：仿照上题，T1需定时50ms，R7计数20次，达到定时1s的目的，每隔1s，循环一次，实现轮流点亮。（1）汇编程序ORG 0000H LJMP MAIN ORG 001BH ；T1的中断向量入口地址 LJMP T1_INT ORG 0100H MAIN：MOV SP,#0BFH ；初始化堆栈指针 MOV TMOD,# 10H ；T1工作在方式1 MOV TL1,#0B0H ；给T1写入初值 MOV TH1,#03CH MOV R7,#20 ；利用寄存器R7计数20次

7、MOV A，#01H SETB EA ；开放总中断 SETB ET1 ；T1溢出中断允许 SETB TR1 ；启动T1开始工作 SJMP $T1_INT：MOV TL1,#0B0H ；重新赋初值 MOV TH1,#03CH DJNZ R7,NEXT ； R7减1不为0，说明中断次数未;到20次，跳转到NEXT处返回 MOV P1，A； RL A ；为下一次做准备 MOV R7,#20 ；重新赋给R7值50 NEXT：RETI END（2） C51程序：#include unsigned char i=0; unsigned char j； void main( ) TMOD=0x10;/T1工

8、作在方式1 TL1=0xB0;/给T1装入初值 TH1=0x3C; j=0x01； EA=1;/开放总中断 ET1=1;/T1溢出中断允许 TR1=1;/启动T1开始工作 while(1); void T1_INT( ) interrupt 3/T1中断服务程序 TH1=0x3C; TL1=0xB0;/重新置入初值 i+; if(i= =20) P1=j;/已定时中断20次 i=0;j=_crol_(j,1); 7-12 假设系统时钟频率为12MHz，利用PCA模块的功能，分别用汇编语言和C51编程实现在P1.3引脚上间断重复输出频率为450Hz的方波，持续和停止时间均为4s。分析：将PCA模

9、块的工作方式寄存器CCAPM0寄存器写为4DH，即PCA0设为时钟输出方式，从而可以在P1.3引脚自动翻转，输出方波，并允许PCA中断。要求方波频率为450hz，即周期为1/450，定时时间应设定为1/900s，选择计数器时钟来源为系统时钟频率的12分频，即工作方式寄存器CMOD设为00H，需要计数（1/900）/（12/）=10000/91111=0457H个时钟脉冲，可将CL、CH初始值设为零，CCAP0H设为04H，CCAP0L设为57H，在每次PCA中断里：将计数值加到比较匹配寄存器里CCAP0H+=4,CCAP0L+=57H4秒启动一次PCA计数（CR=1），4秒停止（CR=0）；4

10、秒定时器由T1产生，工作在方式1定时50毫秒，计数时钟fosc/12初值N，则（65536-N）*1=50000N=15536=3cb0H(1)汇编程序：CCON EQU 0D8H;PCA控制寄存器CMOD EQU 0D9H;PCA模式寄存器CL EQU 0E9H;PCA定时器的低8位CH EQU 0F9H;PCA定时器的高8位CCAPM0 EQU 0DAH; PCA模块0的模式寄存器CCAP0L EQU 0EAH;PCA模块0的捕获寄存器的低8位CCAP0H EQU 0FAH;PCA模块0的捕获寄存器的高8位AUXR EQU 8EHCR BIT CCON.6;PCA定时控制位CF BIT C

11、CON.7;PCA溢出标志位ORG 0000HLJMP MAINORG 001BHLJMP T1_INTORG 003BHLJMP PCA_INTORG 0100HMAIN:CLR AMOV CCON,A；/（P197）MOV CL,A;MOV CH,A;MOV SP,#0BFH;初始化堆栈指针MOV TMOD,#10H;T1工作在方式1MOV TL1,#B0H;给T1写入初值MOV TH1,#3CH;ANL AUXR,#H;/T1X12=0MOV CCAPM0，#4DH;/ 允许中断,输出方波MOV CCAP0L,#57H;MOV CCAP0H,#04H;MOV CMOD,#0H;/FOSC

12、/12时钟计数MOV R7，#80;利用寄存器R7计数80次SETB EA;SETB ET1;SETB TR1;SETB CRSJMP $T1_INT: MOV TL1,#B0H;给T1写入初值 MOV TH1,#3CH; DJNZ R7，NEXT; MOV C,CR CPL C MOV CR,C MOV R7，#80;NEXT:RETIPCA_INT:PUSH PSWPUSH ACCCLR CCF0MOV A,CCAP0LADD A,#57HMOV CCAP0L,AMOV A,CCAP0HADDC A,#04HMOV CCAP0H,APOP ACCPOP PSWRETI ENDC51程序：#

13、includeunsigned char i=0;void main()TMOD=0x10;TL1=0xB0;TH1=0x3C;CMOD=0x00;AUXR&=0xBF;CCAPM0=0x4D;CCAP0L=0x57;CCAP0H=0x04;EA=1;ET1=1;TR1=1;CR=1;while(1);void T1_INT() interrupt 3TH1=0xB0;TH1=0x3C;i+;if(i=80)CR=!CR; i=0;void pca_INT() interrupt 7CCAP0L+=0x57;CCAP0H+=0x04;7-13假设系统的时钟频率为11.0592MHz，利用PCA

14、模块的PWM功能分别用汇编语言和C51编程实现输出400Hz且占空比为60%的矩形波。分析：仿照例题7-8，系统的时钟频率为11.0592MHz，根据公式PWM的频率=，计算出PCA的时钟源频率为Hz，用T0的溢出作为PCA时钟源，400=108，即对系统时钟源fosc进行108级分频，设T0工作在1T模式，T0的初值为256-108=148=80H，由占空比=0.6，可计算出CCAP0L=66H，CMOD寄存器应赋值为04H，CCAPM0寄存器初值为42H。(1)汇编语言程序：CCON EQU 0D8H；PCA控制寄存器CMOD EQU 0D9H；PCA模式寄存器CL EQU 0E9H；PC

15、A定时器的低8位CH EQU 0F9H；PCA定时器的高8位CCAPM0 EQU 0DAH；PCA模块0的模式寄存器CCAP0L EQU 0EAH；PCA模块0的捕获寄存器的低8位CCAP0H EQU 0FAH；PCA模块0的捕获寄存器的高8位AUXR EQU 8EH CR BIT CCON.6；PCA定时控制位CF BIT CCON.7；PCA 溢出标志位ORG 0000HCLR A MOV CCON,A MOV CL,A；计数器初值复位 MOV CH,AMOV TMOD ,#02H MOV TL0,#80H ;给T0赋初值 MOV TH0,#80H MOV CMOD,#04H ；利用T0的

16、溢出作PCA时钟源 MOV AUXR，#80H ；T0工作在1T模式MOV CCAPM0,#42H ；允许P1.3引脚作脉宽调节输出MOV CCAP0L,#66H ；用于输出占空比为60%的波形MOV CCAP0H,#66H SETB TR0 ；T0计数器启动工作SETB CR ；PCA计数器启动工作SJMP $（2）C51程序：#include /包含用于定义STC12C5Axx系列单片机片内资源的头文件 void main( )CCON=0x00; /PCA控制寄存器清0CL=0x00; /16位PCA计数器清0CH=0x00;TMOD=0x02；/T0工作在方式2TL0=0x80；/给T

17、0赋初值 TH0=0x80；CMOD=0x04; / 利用T0的溢出作PCA时钟源 AUXR=0x80; / T0工作在1T模式CCAPM0=0x42;/允许比较且作为PWM脉宽调节输出 CCAP0L=0x66;/控制模块0的输出占空比为40% CCAP0H=0x66； TR0=1；/T0开始工作 CR=1;/16位计数器开始工作 while（1）；89甲乙两机利用串行口1的方式1实现双机通信，甲机将片内RAM中30H3FH单元的内容传送到乙机片内RAM的50H5FH单元，假设甲乙两机的波特率为2400bps，系统的时钟频率为11.0592MHz，试画出双机通信的电路图，并用汇编语言和C51分

18、别编写相应的程序实现上述任务。分析：甲乙两机都选择串行口1工作在方式3,9位异步通信方式，TB8作为奇偶校验位，甲机控制字SCON=0C0H，乙机SCON=0D0H。利用定时器T1工作在12T模式，方式2作为串行口的波特率发生器，TMOD=20H，设SMOD=0，PCON=7FH，波特率为2400bps，系统的时钟频率为11.0592MHz，可知T1的重装初值为F4H， 汇编子程序：TRA_UART:MOV TMOD,#20H ANL AUXR,#0BFH MOV TL1，#0F4H MOV TH1，#0F4H ANL PCON,#7FH MOV SCON,#0C0H MOV R0，#30H

19、MOV R7，#10H SETB TR1LOOP: MOV A,R0 MOV C,P MOV TB8，C MOV SBUF,AWAIT: JNB TI,WAIT CLR TI INC R0 DJNZ R7，LOOP RET已机接收子程序：RES_UART: MOV TMOD,#20H MOV TL1，#0F4H MOV TH1，#0F4H ANL AUXR,#0BFH ANL PCON,#7FH MOV SCON,#0D0H MOV R0，#50H MOV R7，#10H SETB TR1LOOP: NOPWAIT: JNB RI,WAIT CLR RI MOV A,SBUF MOV C,P

20、ANL C,/RB8 MOV F0，C MOV C,RB8ANL C,/PORL C,F0JC ERRORMOV R0，AINC R0DJNZ R7，LOOPRETERROR: RETC语言程序：甲乙两机都选择方式1，8位异步通信方式，甲机的控制字SCON=40H，乙机的控制字SCON=50H，选择校验方式为和校验，其他不变甲机的发送程序：#include unsigned char idata buf16;unsigned char pf;void main()unsigned char i,j;SCON=0x40;TMOD=0x20;PCON=PCON&0x7F;AUXR=AUXR&0xB

21、F;TL1=0xF4;TH1=0xF4;TR1=1;pf=0;for(i=0;i16;i+) SBUF=bufi; pf+=bufi;while (TI=0);TI=0;SBUF=pf;while (TI=0);TI=0;while(1);已机接收程序：#includeunsigned char idata buf16;unsigned char pf;void error();void main()unsigned char i,j;SCON=0x50;TMOD=0x20;PCON=PCON&0x7F;AUXR=AUXR&0xBF;TL1=0xF4;TH1=0xF4;TR1=1;pf=0;f

22、or(i=0;i16;i+) while(RI=0) ;RI=0; bufi =SBUF; pf+=bufi;while (RI=0);RI=0;if(SBUFpf) error();while(1);void error().114设计电路并编写程序：使用8255A驱动2个共阳极数码管，从0开始显示，每隔1秒钟加1，直到99，反复循环。设计电路如图习题114。(此处74HC373作驱动之用，不是锁存)汇编语言程序段：APORT EQU 0F8FFH ;A口BPORT EQU 0F9FFH ;B口CONPORT EQU 0FBFFH ;控制字端口AUXR EQU 8EH ORG 0H LJMP

23、 MAINMAIN: MOV SP,#0AFH ORL AUXR,#B MOV A,#80H MOV DPTR,#CONPORT MOVX DPTR,A NOP NOP NOP NOP NOPBEGIN:MOV R0，#00HLOOP:MOV B,#10 MOV A,R0 DIV AB MOV DPTR,#TABMOVC A,A+DPTR XCH A,B MOVC A,A+DPTR MOV DPTR,#APORTMOVX DPTR,AMOV A,B MOV DPTR,#BPORT MOVX DPTR,AINC R0LCALL DELAY_1SCJNE R0，#100，LOOPLJMP BEGI

24、NDELAY_1S:MOV R7，#42HDL1: MOV R6，#0DAHDL0： MOV R5，#0CFH DJNZ R5,$ DJNZ R6,DL0DJNZ R7,DL1RETTAB:DB 0C0H,0F9H,0A4H,0B0H,99H,092H,082H,0F8H,080H,090H;TAB是0-9对应的段码值表 ENDC51程序：#include#include#include#define APORT XBYTE0XF8FF#define BPORT XBYTE0XF9FF#define CONPORT XBYTE0xFBFFunsingned char code seg10=0x

25、C0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90;void delay_1s();void main()unsinged char i;CONPORT=0x80;while(1)for(i=0;i0;c-)for(b=168;b0;b-)for(a=250;a0;a-);118如图1146所示，在P1.0P1.7引脚连接8个按键，分别定义为1号、2号.8号，在P3口连接一个共阳极数码管，编写程序，使8个按键中任意一个按下时，数码管上显示对应的键序号。图1146 习题118题的电路图汇编语言程序：ORG 0000HLJMP MAINORG 0100H

26、MAIN: MOV SP,#0AFHMOV P1，#0FFHNOPNOPNOPLOOP:MOV A,P1CJNE A,#0FFH,LOOP1SJMP LOOPLOOP1：LCALL DELAY_15msMOV A,P1CJNE A,#0FFH,LOOP2SJMP LOOPLOOP2:JNB ACC.0,KEY1JNB ACC.1,KEY2JNB ACC.2,KEY3JNB ACC.3,KEY4JNB ACC.4,KEY5JNB ACC.5,KEY6JNB ACC.6,KEY7JNB ACC.7,KEY8LJMP LOOPKEY1: MOV P3,#0F9HAJMP LOOPKEY2: MOV

27、P3,#0A4HAJMP LOOPKEY3: MOV P3,#0B0HAJMP LOOPKEY4: MOV P3,#99HAJMP LOOPKEY5: MOV P3,#92HAJMP LOOPKEY6: MOV P3,#82HAJMP LOOPKEY7: MOV P3,#0F8HAJMP LOOPKEY8: MOV P3,#80HAJMP LOOPDELAY_15ms:MOV R6,#177DL0: MOV R5,#0 DJNZ R5,$ DJNZ R6,DL0 RET ENDC51程序：#includeunsigned char temp,temp1;void delay_15ms();vo

28、id KEY1();void KEY8();void main()P1=0xFF;while(1) temp=P1;if(temp!=0xFF)delay_15ms();temp=P1;if(temp!=0xFF)switch(temp)case 0xFE:KEY1();break;case 0xFD:KEY2();break;case 0xFB:KEY3();break;case 0XF7:KEY4();break;case 0xEF:KEY5();break;case 0xDF:KEY6();break;case 0xBF:KEY7();break;case 0x7F:KEY8();bre

29、ak; void delay_15ms()unsigned char a,b,c;for(c=3;c0;c-)for(b=212;b0;b-)for(a=140;a0;a-);void KEY1()P3=0xF9;void KEY2()P3=0xA4;void KEY3()P3=0xB0;void KEY4()P3=0x99;void KEY5()P3=0x92;void KEY6()P3=0x82;void KEY7()P3=0xF8;void KEY8()P3=0x80;1110 44矩阵键盘与单片机的连接如图1147所示，编写程序，使不同按键按下时在数码管上能显示该键编号的十六进制码。图

30、1147 习题1110电路图汇编语言：K_CODE EQU 30HS_CODE EQU 31HC_CODE EQU 32HORG 0000HLJMP MAINORG 100HMAIN: MOV SP,#0AFHSTART:LCALL KEYMOV A,K_CODECJNE A,#0FFH,KEY_TLJMP STARTKEY_T: RL AADD A,K_CODEMOV DPTR,#KEY_TABJMP A+DPTRKEY_TAB: LJMP KEY0LJMP KEY1LJMP KEY2LJMP KEY3LJMP KEY4LJMP KEY5LJMP KEY6LJMP KEY7LJMP KEY8

31、LJMP KEY9LJMP KEY10LJMP KEY11LJMP KEY12LJMP KEY13LJMP KEY14LJMP KEY15KEY:MOV K_CODE,#0FFHMOV R0，#00HMOV P1，#0FHLCALL DELAY_1usMOV A,P1ANL A,#0FHCJNE A,#0FH,KEY_1RETKEY_1: LCALL DELAY_15msMOV C_CODE,#0EFHCOLUWN: MOV P1,C_CODEMOV A,C_CODERL AMOV C_CODE,AMOV A,P1ANL A,#0FHCJNE A,#0FH,KEY_2INC R0CJNE R0

32、,#4,COLUWNRETKEY_2： CJNE A,#0EH,K1MOV S_CODE,#00SJMP RESULTK1：CJNE A,#0DH,K2MOV S_CODE,#01HSJMP RESULTK2：CJNE A,#0BH,K3MOV S_CODE,#02SJMP RESULTK3: CJNE A,#07H,LENDMOV S_CODE,#03RESULT: MOV A,S_CODERL ARL AADD A,R0MOV K_CODE,ALEND: RETDELAY_15ms:.;略RETDELAY_1us:.;略RETKEY0：MOV P3，#0C0HLJMP STARTKEY1：

33、MOV P3，#0F9HLJMP STARTKEY2：MOV P3，#0A4HLJMP STARTKEY3：MOV P3，#0B0HLJMP STARTKEY4：MOV P3，#99HLJMP STARTKEY5：MOV P3，#92HLJMP STARTKEY6：MOV P3，#82HLJMP STARTKEY7：MOV P3，#0F8HLJMP STARTKEY8：MOV P3，#80HLJMP STARTKEY9：MOV P3，#90HLJMP STARTKEY10：MOV P3，#88HLJMP STARTKEY11：MOV P3，#83HLJMP STARTKEY12：MOV P3，

34、#0C6HLJMP STARTKEY13: MOV P3，#0A1HLJMP STARTKEY14：MOV P3，#86HLJMP STARTKEY15：MOV P3，#8EHLJMP STARTENDC51程序：#include#includesbit H0=P10;sbit H1=P11;sbit H2=P12;sbit H3=P13;sbit L0=P14;sbit L1=P15;sbit L2=P16;sbit L3=P17;void delay_15ms();void delay_1us();unsigned char key();void KEY0();void KEY1();vo

35、id KEY15();void main() unsigned char K_CODE; while(1); K_CODE=key(); switch(K_CODE) case 0: KEY0();break; case 1: KEY1();break; case 15: KEY15();break; default: break;unsigned char key( ) unsigned char KEY=0xFF,col=0,temp, i;P1=0x0F; /将所有列清零，行置1temp=0xEF; delay_1s( );i=P1; /读回P1口数值if (i & 0x0F)!=0x0

36、F) /如果条件成立,则有按键按下 delay_15ms( ); /延时15ms去抖动i=P1;if(i & 0x0F)!=0x0F) /再次判断是否有键按下while(col4) /col为列号 P1=temp|0x0F;delay_1s( );i=P1;switch(i & 0x0F) case 0x0E: KEY=col; doi=P1; /重新读回P1口数值，等待按键释放while(i & 0x0F)!=0x0F);delay_15ms( ); /延时15ms去抖动col=0xFE;break; case 0x0D: KEY=4+col; /KEY=14+coldoi=P1; /重新读

37、回P1口数值，等待按键释放while(i & 0x0F)!=0x0F);delay_15ms( ); /延时15ms去抖动col=0xFE;break; case 0x0B: KEY=8+col; /KEY=24+coldoi=P1; /重新读回P1口数值，等待按键释放while(i & 0x0F)!=0x0F);delay_15ms( ); /延时15ms去抖动col=0xFE;break; case 0x07: KEY=12+col; /KEY=34+col doi=P1; /重新读回P1口数值，等待按键释放while(i & 0x0F)!=0x0F);delay_15ms( ); /延时

38、15ms去抖动col=0xFE; break; default:break;col+;temp =_crol_(temp,1); /将temp中数值左移1位; return(KEY);void delay_15ms( ) /略 void delay_1s( ) /略 void KEY0( ) /按下K0键应执行的任务函数P3=0XC0void KEY1( ) P3=0XF9 /省略了KEY2（）等函数的定义void KEY15( ) P3=0X8E 1111 简述LED数码管动态显示和静态显示的驱动原理，两种方法各有什么特点？静态扫描法需要用一组I/O口驱动一位LED显示，若显示的内容不变，则

39、I/O口输出的数值就要稳定不变。特点是：各位数码管可以同时显示，显示亮度大，不闪烁。单片机送出显示段码后，可以处理其他工作，系统的运行效率高。缺点在于数码管占用了太多I/O口。所以静态显示法适合于显示位数少，或者软件负担重而无法承担动态扫描显示任务的场合。动态扫描法的原理：多个数码管共用一个数据口，每一个轮流选通工作，利用了人眼的视觉惰性，使每一个数码管看上去都是常亮的。特点：动态显示法简化了电路，节约了I/O口线，但是每隔一定时间就要重新发送出数码管的段码值，占用了单片机的执行时间。11-12如图1148所示，STC12C5A60S2单片机驱动4个7段数码管，分别显示千位、百位、十位、个位。

40、请编写程序，使这四个数码管显示数值5678。图1148 习题1112题电路图分析：P2.3驱动个位LED显示8，其段码为80H，P2.2驱动十位LED显示7，其段码为F8H，P2.1驱动百位LED显示6，其段码为82H，P2.0驱动千位LED显示5，其段码为92H，段码从P0口输出。P2.3、P2.2 、P2.1、P2.0作为输出位选端，加入小功率PNP型三极管9012增强驱动能力。限流电阻为330，使两位LED动态显示时，每一段的电流大约为10mA。取刷新频率为50Hz，刷新周期20ms，共4个数码管，所以每隔5ms就要交替刷新一个数码管的显示状态。选择延时5ms或更短时间即可（1） 汇编语言程序：ORG 00HLJMP STARTORG 80HSTART: MOV SP,#50HLLOOP: MOV 30H,#5 MOV R0,#30H MOV R1,#0FEHMOV R7，#4LOOP: MOV DPTR,#TABLE MOV A,R0 MOVC A,A+DPTR MOV P0,A INC R0 MOV A,R1 MOV P2,A RL A;左移 MOV R1,A ACALL DELAY DJNZ R7,LOOP SJMP LLOOP DEL