bill0333 2022-11-22 16:42 采纳率: 50%
浏览 5
已结题

如何将PIC单片机的程序移到51单片机上

如何将这段代码移植到STC15F104W才能正常工作?


#include<pic.h>
__CONFIG(0X1B4);
#define uchar unsigned char//宏定义,相当于uchar=unsigned char
#define uint unsigned int//宏定义,相当于uint=unsigned  int




uint key2_time_cnt;//按键去抖计数器
uchar key2_lock;//按键有效标志
uchar key2_num_s;//功能散转变量
uchar key2_touch_s_flag;//交流断电信号有效标志
uint shuzi;//时标计数变量
uchar SYS1MS;//时标开关标志

void PORT_init()
{
ANSEL=0X00;//普通端口设置
CMCON=0X07;//比较器关闭
TRISA=0b00110100;
TRISC=0b00110000;
PORTC=0X00;
PORTA=0X00;
T0CS=0;//定时器内部时钟选择
;
T0IF=0;//定时器中断标志清零
T0IE=1;//定时器中断使能
GIE=1;//全局中断使能
TMR0=9;//定时器初值为零
}

void key_scan2()
{
if(RA5==1)//如果RA5上按键没有按下
{
  key2_lock=0;//2号键标志清零
  key2_time_cnt=0;//去抖计数器清零
  if(key2_touch_s_flag==1)//如果交流断电信号有效
  {
     
      key2_touch_s_flag=0;//清交流信号标志
      key2_num_s++;//功能号开始自加
      if(key2_num_s>3)key2_num_s=0;//一共4种功能
  }

}
else if(key2_lock==0)//如果有键第一次按下
{
   key2_time_cnt++;//去抖计数器开始计数
   if(key2_time_cnt>149)//当计数器值大于149,说明低电平持续的时间大于10MS,而交流电高低电平的持续时间是8——10MS,这就表示交流电被断电了。
  {
     key2_touch_s_flag=1;//交流断电有效,标志置一。
     key2_time_cnt=0;//清去抖动计数器
     key2_lock=1;//自锁标志置1,避免一直触发
     
  }
}
}

void key_service2()
{

switch(key2_num_s)
{
  case 0:
        RC2=1;
  RC3=0;
  RA0=0;
  RA1=0;
        //key2_num_s=0;
        break;
   case 1:
      RC2=0;
  RC3=1;
  RA0=0;
  RA1=0;
        //key2_num_s=0;
        break;
   case 2:
        RC2=1;
  RC3=1;
  RA0=0;
  RA1=0;
       // key2_num_s=0;
        break;
  case 3:
      RC2=0;
  RC3=0;
  RA0=0;
  RA1=0;
        //key2_num_s=0;
        break;
  }
  
}

void main()
{
PORT_init();
while(1)
{
if(SYS1MS==1)
{
SYS1MS=0;
key_scan2();
}
key_service2();
}
}
void interrupt isr()//定时器0中断函数
{
      if((T0IE&T0IF)==1)//判断定时器中断
  {   
      T0IF=0;//清定时器中断标志
            T0IE=0;//关定时器中断
            TMR0=9;//9加到256所用时间是250US
            shuzi++;
            if(shuzi==4)
            {
               shuzi=0;
               SYS1MS=1;
            }
           
            
            T0IE=1;//开定时器中断
  }
}
  • 写回答

5条回答

      报告相同问题?

      相关推荐 更多相似问题

      问题事件

      • 已结题 11月28日
      • 创建了问题 11月22日

      悬赏问题

      • ¥20 Django网页部署到服务器后不能post请求
      • ¥15 编写java代码,拷贝特定包下的文件到指定路径,禁止使用IO流读写操作
      • ¥50 pyinstaller 打包问题
      • ¥15 无法使用cnssc调取网页数据
      • ¥15 Pycharm安装en_core_web_sm失败出现Could not find a version that satisfies the requirement spacy报错
      • ¥15 Python社区划分
      • ¥15 selenium一旦切换焦点到别的窗口就会检测不到元素
      • ¥15 mrcp发现语音丢包
      • ¥15 vue3如何改变svg字体大小,以及子组件如何改变父组件背景色
      • ¥15 ABAQUS简单的带传动系统运转不了