📄 669.c

📁 用keil便宜代码超过64k的程序例子
💻 C
📖 第 1 页 / 共 5 页
字号:
12 3 4 5 下一页
#include "reg669.h"
#include "tcode.h"
#include "tcode2.h"

#define uchar unsigned char
#define uint unsigned int
uchar xdata  d[350];
uchar xdata  d3[250];
//unsigned char const far far_const_variable[60700];
sbit led=P1^0 ;	 
const char far text[] = "This is a text in the HCONST memory class";
unsigned int far iarray[0x100];  // This array is in HDATA 

void delay(uint t)//延时子程序
{int i,j; 
 for(i=0;i<t;i++)
    for (j=0;j<1000;j++);    
}
void hextobcd(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd1(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex1(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd2(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex2(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd3(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex3(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd4(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex4(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd5(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex5(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}void hextobcd6(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex6(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd7(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex7(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd8(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex8(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd9(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex9(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd10(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex10(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd11(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex11(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd12(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex12(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd13(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex13(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd14(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex14(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd15(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex15(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd16(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex16(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd17(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex17(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd18(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex18(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd19(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex19(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd20(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex20(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd21(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex21(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd22(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex22(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd23(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex23(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd24(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex24(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd25(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex25(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd26(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex26(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
}
void hextobcd27(uint x,uchar bcd[4])
{  char i;
   uint d1[6];
   uchar d2[6];
    for(i=0;i<6;i++)
    {
	 d1[i]=x/10;
	 d2[i]=x%10;
	 x=d1[i];
	}	
	bcd[3]=(d2[1]<<4)|d2[0];
	bcd[2]=(d2[3]<<4)|d2[2];
	bcd[1]=(d2[5]<<4)|d2[4];
    bcd[0]=0x00;
}
uint  bcdtohex27(uchar bcd[2])
{uint x;
 uchar d[4];
 d[0]=bcd[0]%16;
 d[1]=bcd[0]/16;
 d[2]=bcd[1]%16;
 d[3]=bcd[1]/16;
 x=d[1]*1000+d[0]*100+d[3]*10+d[2];
 return x;
12 3 4 5 下一页
💿 文件大小 267 K
👤 上传用户 karon9999
📂 所属分类单片机开发
🏷️ 相关标签

#keil #64k #代码 #程序
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -