EEPW论坛

使用按键中断控制蜂鸣器 利用Buzzer 的 PCLBUZ0
参考 andery  的帖子

Applilet3 的设置




主要代码

void  main(void)
{
 /* Start user code. Do not edit comment generated here */

 KEY_Enable();
 while (1U)
 {
  if(flag == 1)
  {
     
   PORT_ChangeP77Output(0);
   PCLBUZ0_Start();
  }
  else
  {
     PORT_ChangeP77Output(1);
      PCLBUZ0_Stop();
  }
  
 }
 /* End user code. Do not edit comment generated here */
}

运行图像 （注意由于没有合适的蜂鸣器 我是用示波器测试PCLBUZ0 引脚）



代码： myKeyBuzzer.rar

使用RTOS 控制LED D2 P7.7
首先是移植 uCOS-II 
先到 官网上下载配合瑞萨的代码 
http://micrium.com/page/downloads/ports/renesas/renesas_rl78_family
而且这个代码使用的板子的芯片和我们的芯片正好是一样的 
但是附带的pdf文档和代码的版本不太一样
由于例子使用的开发板和我们的不一样，它是控制P6.2 P6.3 的LED灯 
下载完之后需要修改几个函数 
在 bsp.c 文件中 修改
void  BSP_LED_Off (CPU_INT08U led)
void  BSP_LED_On (CPU_INT08U led)
void  BSP_LED_Toggle (CPU_INT08U led)
在app.c的 main 函数 和 static  void  App_TaskStart (void *p_arg) 函数做针对LED的适当修改
最终要的 在  bsp.c 文件中 的 
void  BSP_PostInit (void)函数中 要添加
 // 设置P7.7 输出高电平
 P7 = 0x80U;
 // 设置P7.7 为输出口
 PM7 = 0x7F ;
否则无法点亮D2 估计是没有设置P7.7 口为输出的缘故



其次是移植embOS
这个在IAR的安装目录中其实已经有了 
C:\Program Files\IAR Systems\Embedded Workbench 6.0 Kickstart\rl78\examples\Segger\embOS\YRPBRL78G13
只需要做很小的修改
同样的 在 BSP.c 文件中 修改于LED灯端口相关的变量即可
/****** Assign LEDs to Ports ****************************************/
#define LEDPORT_DATA  (P7)
#define LEDPORT_MODE  (PM7)
#define LED0_BIT      (7)

代码 ： RTOS.rar


最后是移植FreeRTOS 还没接触 
在官网上下载文件 http://sourceforge.net/projects/freertos/files/
并且有说明 http://www.freertos.org/FreeRTOS-port-and-demo-for-Renesas-RL78-YRPBRL78G13-Promo-Board.html 
可能稍微需要修改下代码的路径
在使用E1 调试的时候 如果找不到板子 需要修改下ID

编译代码后下载到板子上
When executing correctly, the demo application will toggle the user LED every three seconds.  
如果没有错误的话 每隔3s LED 闪一次

代码： FreeRTOS.rar

其实我这次也是第一次尝试移植RTOS 以前都没试过 
我现在也只是知道如何控制LED灯 别的啥都不懂
欢迎指点

实现RTC实时时钟并串口发送显示
参考了 andery88 的对 RTC 的设置
http://forum.eepw.com.cn/thread/220121/1
http://forum.eepw.com.cn/thread/218945/6#54





主要代码 main函数
void  main(void)
{
 /* Start user code. Do not edit comment generated here */
   UART2_Start();
 txBuf[2] = txBuf[5] ='-';
 txBuf[8] =' ';
 txBuf[11] = txBuf[14] = ':';
 txBuf[17] = '\r';
 txBuf[18] = '\n';
 // 设置时间 这个大家可以随便改哈
 SEC = _53_RTC_COUNTER_SEC;
 MIN = _06_RTC_COUNTER_MIN;
 HOUR = _11_RTC_COUNTER_HOUR;
 WEEK = _03_RTC_COUNTER_WEEK;
 DAY = _29_RTC_COUNTER_DAY;
 MONTH = _08_RTC_COUNTER_MONTH;
 YEAR = _12_RTC_COUNTER_YEAR;
 // 启动
 RTC_CounterEnable();
 // 启动中断
 RTC_ConstPeriodInterruptEnable(ONESEC);
 while (1U)
 {
  if(RTCFlag == 1)
  {
     RTCFlag = 0;
   // 闪烁一下LED灯
   P7 = P7PORT;
   P7PORT = (~P7PORT) & 0x80;
   // 得到一次数据
   RTC_CounterGet(&counterValue);
   // 转换到串口中 发送出去 参考例子demo
   BCD_COM(counterValue.Year, 0);
            BCD_COM(counterValue.Month, 1);
            BCD_COM(counterValue.Day, 2);
            BCD_COM(counterValue.Hour, 3);
            BCD_COM(counterValue.Min, 4);
            BCD_COM(counterValue.Sec, 5);
   
   UART2_SendData(txBuf, 19);
  }
  else
  {
     NOP();
  }
 }
 /* End user code. Do not edit comment generated here */
}

// 将值转换为串口发送的数据
void BCD_COM(UCHAR x, UCHAR index)
{
 UCHAR y;
 y = x >> 4;
 // 高位
    txBuf[index*3] = y + '0' ;
 // 低位
    txBuf[index*3 + 1 ] = (x & 0x0F) + '0';
}

运行截图


代码： myComRTC.rar