搜索
bottom↓
回复: 3

EKSTM32F LCD程序移植Protothreads

[复制链接]

出0入0汤圆

发表于 2008-3-27 15:48:30 | 显示全部楼层 |阅读模式
EKSTM32F LCD程序移植Protothreads。

四个线程,
Thread1,LED4闪烁;
Thread2,LED5闪烁;
Thread3,LCD显示;
Thread4,LCD扫描;


#include "config.h"

THR_Create(Thread1);
THR_Create(Thread2);
THR_Create(Thread3);
THR_Create(Thread4);

TMR_Create(timer1);
TMR_Create(timer2);
TMR_Create(timer3);
TMR_Create(timer4);

uint8 Thread1(Tpt *pt)
{
  PT_BEGIN(pt);
    while(1)
    {
      PT_TIMER_DELAY(&timer1,250);
      GPIO_SetBits(GPIOC, GPIO_Pin_4);
      PT_TIMER_DELAY(&timer1,250);
      GPIO_ResetBits(GPIOC, GPIO_Pin_4);
    }
   PT_END(pt);
}

uint8 Thread2(Tpt *pt)
{
   PT_BEGIN(pt);
    while(1)
    {
      PT_TIMER_DELAY(&timer2,500);
      GPIO_SetBits(GPIOC, GPIO_Pin_5);
      PT_TIMER_DELAY(&timer2,500);
      GPIO_ResetBits(GPIOC, GPIO_Pin_5);
    }
   PT_END(pt);
}

uint8 Thread3(Tpt *pt)
{
   PT_BEGIN(pt);
    while(1)
    {
      write_string("   S");
      PT_TIMER_DELAY(&timer3,500);
      write_string("  ST");
      PT_TIMER_DELAY(&timer3,500);
      write_string(" STM");
      PT_TIMER_DELAY(&timer3,500);
      write_string("STM32");
      PT_TIMER_DELAY(&timer3,500);
      write_string("TM32");
      PT_TIMER_DELAY(&timer3,500);
      write_string("M32 ");
      PT_TIMER_DELAY(&timer3,500);
      write_string("32 L");
      PT_TIMER_DELAY(&timer3,500);
      write_string("2 LC");
      PT_TIMER_DELAY(&timer3,500);
      write_string(" LCD");
      PT_TIMER_DELAY(&timer3,500);
      write_string("LCD ");
      PT_TIMER_DELAY(&timer3,500);
      write_string("CD D");
      PT_TIMER_DELAY(&timer3,500);;
      write_string("D DE");
      PT_TIMER_DELAY(&timer3,500);
      write_string(" DEM");
      PT_TIMER_DELAY(&timer3,500);
      write_string("DEMO");
      PT_TIMER_DELAY(&timer3,500);
      write_string("EMO");
      PT_TIMER_DELAY(&timer3,500);
      write_string("MO");
      PT_TIMER_DELAY(&timer3,500);
      write_string("O");
      PT_TIMER_DELAY(&timer3,500);
      write_string("");
      PT_TIMER_DELAY(&timer3,500);
    }
   PT_END(pt);
}


uint8 Thread4(Tpt *pt)
{
   PT_BEGIN(pt);
    while(1)
    {
      LcdScan();
      PT_TIMER_DELAY(&timer4,1);
    }
   PT_END(pt);
}


int main()
{
  cli();
  RCC_Configuration();
  NVIC_Configuration();
  GPIO_Configuration();
  SysTick_Config();
  Led_Config();
  sei();

  while(1)
  {
     pt_execute(PT(Thread1));
     pt_execute(PT(Thread2));
     pt_execute(PT(Thread3));
     pt_execute(PT(Thread4));  
  }
  //return 0;
}

点击此处下载 ourdev_240736.rar(文件大小:660K) (原文件名:test_pt_stm32_iar.rar)


不知道对不对?

阿莫论坛20周年了!感谢大家的支持与爱护!!

一只鸟敢站在脆弱的枝条上歇脚,它依仗的不是枝条不会断,而是自己有翅膀,会飞。

出0入0汤圆

发表于 2008-3-28 10:14:17 | 显示全部楼层
終於攪明白Protothreads了, 感覺Protothreads是雞肋, 不過相對os 來說簡單多了.

出0入0汤圆

 楼主| 发表于 2008-3-28 10:34:52 | 显示全部楼层
一般的OS在AVR上不好用,AVRX又不能移植。

Protothreads虽然不是OS,但也有类似协作式OS调度,移植性超好。
在小RAM的MCU上用非常合适。

出0入0汤圆

发表于 2008-3-28 11:06:16 | 显示全部楼层
的確是這樣, 不過樓主是在arm上玩, 好像顯不了優勢!
回帖提示: 反政府言论将被立即封锁ID 在按“提交”前,请自问一下:我这样表达会给举报吗,会给自己惹麻烦吗? 另外:尽量不要使用Mark、顶等没有意义的回复。不得大量使用大字体和彩色字。【本论坛不允许直接上传手机拍摄图片,浪费大家下载带宽和论坛服务器空间,请压缩后(图片小于1兆)才上传。压缩方法可以在微信里面发给自己(不要勾选“原图),然后下载,就能得到压缩后的图片】。另外,手机版只能上传图片,要上传附件需要切换到电脑版(不需要使用电脑,手机上切换到电脑版就行,页面底部)。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

手机版|Archiver|amobbs.com 阿莫电子技术论坛 ( 粤ICP备2022115958号, 版权所有:东莞阿莫电子贸易商行 创办于2004年 (公安交互式论坛备案:44190002001997 ) )

GMT+8, 2024-5-20 18:58

© Since 2004 www.amobbs.com, 原www.ourdev.cn, 原www.ouravr.com

快速回复 返回顶部 返回列表