autopiano.c

这是我自己做过的多功能电子琴的c源码

#include <reg51.H> 
                  sbit P1_0=P1^0;
				    sbit P3_5=P3^5;
					  sbit P3_7=P3^7;
					 sbit P3_4=P3^4;
					 sbit P3_6=P3^6;
                  unsigned char code table[]={0x4f,0x66,0x6d,0x7d,0x07, 
                                              0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
                                              0x06,0x5b,0x4f,0x66}; 
                  unsigned char temp; 
                  unsigned char key; 
                  unsigned char j; 
				  unsigned int n,i,cnt;
                  unsigned char STH0; 
                  unsigned char STL0; 
                  unsigned int code tab[]={64021,64103,64260,64400, 
                                            64524,64580,64684,64777, 
                                            64820,64898,64968,65030, 
                                            65058,65110,65157,65178}; 


void delay1(void) 
                  { 
                    unsigned char i,j,k; 
                    for(k=10;k>0;k--) 
                    for(i=50;i>0;i--) 
                    for(j=248;j>0;j--); 
                    
                  } 
                    
                  void main(void) 
                  { 
                    TMOD=0x01; 
                    ET0=1; 
                    EA=1; 
                    
                    while(1) 
                      { 
                        P3=0xff; 
                        P3_4=0; 
                        temp=P3; 
                        temp=temp & 0x0f; 
                        if (temp!=0x0f) 
                          { 
                            for(i=5;i>0;i--) 
                            for(j=20;j>0;j--); 
                            temp=P3; 
                            temp=temp & 0x0f; 
                            if (temp!=0x0f) 
                              { 
                                temp=P3; 
                                temp=temp & 0x0f;              
                                switch(temp) 
                                  { 
                                    case 0x0e: 
                                      key=0; 
                                      break; 
                                    case 0x0d: 
                                      key=1; 
                                      break; 
                                    case 0x0b: 
                                      key=2; 
                                      break; 
                                    case 0x07: 
                                      key=3; 
                                      break; 
                                  } 
                                temp=P3;  
                                P2=table[key]; 
                                STH0=tab[key]/256; 
                                STL0=tab[key]%256; 
                                TR0=1; 
                                temp=temp & 0x0f;              
                                while(temp!=0x0f) 
                                  { 
                                    temp=P3; 
                                    temp=temp & 0x0f;              
                                  } 
                                TR0=0; 
                              } 
                          } 
                    
                        P3=0xff; 
                        P3_5=0; 
                        temp=P3; 
                        temp=temp & 0x0f; 
                        if (temp!=0x0f) 
                          { 
                            for(i=5;i>0;i--) 
                            for(j=20;j>0;j--); 
                            temp=P3; 
                            temp=temp & 0x0f; 
                            if (temp!=0x0f) 
                              { 
                                temp=P3; 
                                temp=temp & 0x0f;              
                                switch(temp) 
                                  { 
                                    case 0x0e: 
                                      key=4; 
                                      break; 
                                    case 0x0d: 
                                      key=5; 
                                      break; 
                                    case 0x0b: 
                                      key=6; 
                                      break; 
                                    case 0x07: 
                                      key=7; 
                                      break; 
                                  } 
                                temp=P3; 
                               
                                P2=table[key]; 
                                STH0=tab[key]/256; 
                                STL0=tab[key]%256; 
                                TR0=1; 
                                temp=temp & 0x0f;              
                                while(temp!=0x0f) 
                                  { 
                                    temp=P3; 
                                    temp=temp & 0x0f;              
                                  } 
                                TR0=0; 
                              } 
                          } 
                    
                        P3=0xff; 
                        P3_6=0; 
                        temp=P3; 
                        temp=temp & 0x0f; 
                        if (temp!=0x0f) 
                          { 
                            for(i=5;i>0;i--) 
                            for(j=20;j>0;j--); 
                            temp=P3; 
                            temp=temp & 0x0f; 
                            if (temp!=0x0f) 
                              { 
                                temp=P3; 
                                temp=temp & 0x0f;              
                                switch(temp) 
                                  { 
                                    case 0x0e: 
                                      key=8; 
                                      break; 
                                    case 0x0d: 
                                      key=9; 
                                      break; 
                                    case 0x0b: 
                                      key=10; 
                                      break; 
                                    case 0x07: 
                                      key=11; 
                                      break; 
                                  } 
                                temp=P3; 
                                
                                P2=table[key]; 
                                STH0=tab[key]/256; 
                                STL0=tab[key]%256; 
                                TR0=1; 
                                temp=temp & 0x0f;              
                                while(temp!=0x0f) 
                                  { 
                                    temp=P3; 
                                    temp=temp & 0x0f;              
                                  } 
                                TR0=0; 
                              } 
                          } 
                    
                        P3=0xff; 
                        P3_7=0; 
                        temp=P3; 
                        temp=temp & 0x0f; 
                        if (temp!=0x0f) 
                          { 
                            for(i=5;i>0;i--) 
                            for(j=20;j>0;j--); 
                            temp=P3; 
                            temp=temp & 0x0f; 
                            if (temp!=0x0f) 
                              { 
                                temp=P3; 
                                temp=temp & 0x0f;              
                                switch(temp) 
                                  { 
                                    case 0x0e: 
                                      key=12; 
                                      break; 
                                    case 0x0d: 
                                      key=13; 
                                      break; 
                                    case 0x0b: 
                                      key=14; 
                                      break; 
                                    case 0x07: 
                                      key=15; 
                                      break; 
                                  } 

								 if(key==15)
							  {


                          while(1)
		                   {
											
                                  if{cnt==0)
                                 {
								     STH0=tab[2]/256;
									 STL0=tab[2]%256;
                                     P2=table[2];
									 TR0=1;
									      	    delay1();
								                    TR0=0;
 												    for(i=0;i<8000;i++);
                                                            
                                                             STH0=tab[2]/256;
									                         STL0=tab[2]%256;
															 TR0=1;
                                                             P2=table[2];
												       delay1();
													
												  
								                               STH0=tab[3]/256;
									                           STL0=tab[3]%256;
                                                                P2=table[3];
	                                                   delay1();
												       delay1();
										           
												    
								                               STH0=tab[2]/256;
									                           STL0=tab[2]%256;
                                                               P2=table[2];
                                                       delay1();
												   	  delay1();
										          
								                               STH0=tab[5]/256;
									                           STL0=tab[5]%256;
                                                               P2=table[5];
                                                       delay1();
												       delay1();

										           
								                               STH0=tab[4]/256;
									                           STL0=tab[4]%256;