这些小活动你都参加了吗?快来围观一下吧!>>
电子产品世界 » 论坛首页 » 高校专区 » 漓东e学堂 » 删删作业【~渣渣作业停止更新~】

共40条 2/4 1 2 3 4 跳转至
菜鸟
2014-10-22 11:25:53     打赏
11楼

LED灯循环&RGB闪烁


视频地址:http://player.youku.com/player.php/sid/XODA4NzU2MDg0/v.swf



程序忽略:D6灯——D6处焊盘已掉

               RGB——忽略红光部分及其红光部分组成的颜色光

/* Includes ------------------------------------------------------------------*/
#include "stm32f10x.h"
#include "stm32_eval.h"
GPIO_InitTypeDef GPIO_InitStructure;

void RCC_Configuration(void)//始终配置
{
  RCC_DeInit();
    
  RCC_HSICmd(ENABLE);
  while(RCC_GetFlagStatus(RCC_FLAG_HSIRDY) == RESET);
  
  RCC_SYSCLKConfig(RCC_SYSCLKSource_HSI);
  
  RCC_HSEConfig(RCC_HSE_OFF);
  RCC_LSEConfig(RCC_LSE_OFF);
  RCC_PLLConfig(RCC_PLLSource_HSI_Div2,RCC_PLLMul_9); //  72HMz
  RCC_PLLCmd(ENABLE);
  while(RCC_GetFlagStatus(RCC_FLAG_PLLRDY) == RESET);
  RCC_ADCCLKConfig(RCC_PCLK2_Div4);
  RCC_PCLK2Config(RCC_HCLK_Div1);
  RCC_PCLK1Config(RCC_HCLK_Div2);
  RCC_HCLKConfig(RCC_SYSCLK_Div1);
  RCC_SYSCLKConfig(RCC_SYSCLKSource_PLLCLK);
  while(RCC_GetSYSCLKSource() != 0x08);
	RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOD|RCC_APB2Periph_AFIO, ENABLE);
  GPIO_PinRemapConfig(GPIO_Remap_SWJ_JTAGDisable,ENABLE);//disable JTAG
  GPIO_InitStructure.GPIO_Pin = GPIO_Pin_2;
  GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;
  GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP;
  GPIO_Init(GPIOD, &GPIO_InitStructure);
	GPIO_ResetBits(GPIOD,GPIO_Pin_2);//关闭蜂鸣器
}
/*初始化GPIO*/
void GPIO_INIT()
{
  RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOC|RCC_APB2Periph_GPIOA, ENABLE);//使能PC、PA时钟

  GPIO_InitStructure.GPIO_Pin = GPIO_Pin_0|GPIO_Pin_1|GPIO_Pin_2|GPIO_Pin_3|GPIO_Pin_4|GPIO_Pin_5|GPIO_Pin_6|GPIO_Pin_7;//Ñ¡Ôñ¹Ü½Åp0ÖÁp7
  GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;//管脚最高输出速率为50MHZ
  GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP;//推挽输出
  GPIO_Init(GPIOC, &GPIO_InitStructure);//初始化PC
	GPIO_InitStructure.GPIO_Pin = GPIO_Pin_1|GPIO_Pin_2|GPIO_Pin_3;//使用PA1¡、PA2¡、PA3  
  GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;  
  GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP;
  GPIO_Init(GPIOA, &GPIO_InitStructure);//初始化PA
}  
/*微秒延时函数*/
void delay_us(u32 n)
{
	u8 j;
	while(n--)
	for(j=0;j<10;j++);
}
/*毫米延时函数*/
void  delay_ms(u32 n)
{
	while(n--)
	delay_us(1000);
}
			
/**
  * @brief  Main program.
  * @param  None
  * @retval None
  */
int main(void)  
{   
    RCC_Configuration();  
    GPIO_INIT();  
/*LED、RGB函数*/
    while(1)  
		{
					GPIO_ResetBits(GPIOC,GPIO_Pin_0);//点亮D1
					delay_ms(1000);            
          GPIO_SetBits(GPIOC,GPIO_Pin_0);//熄灭D1
					
					GPIO_ResetBits(GPIOC,GPIO_Pin_1);//点亮D2
					delay_ms(1000);      
          GPIO_SetBits(GPIOC,GPIO_Pin_1);
          
					GPIO_ResetBits(GPIOC,GPIO_Pin_2);//点亮D3
					delay_ms(1000);  
          GPIO_SetBits(GPIOC,GPIO_Pin_2);  
         
					GPIO_ResetBits(GPIOC,GPIO_Pin_3);//点亮D4 
          delay_ms(1000);  
          GPIO_SetBits(GPIOC,GPIO_Pin_3);  
          
					GPIO_ResetBits(GPIOC,GPIO_Pin_7);//点亮D8
          delay_ms(1000);  
          GPIO_SetBits(GPIOC,GPIO_Pin_7);
          
					GPIO_ResetBits(GPIOC,GPIO_Pin_6);//点亮D7  
          delay_ms(1000);  
          GPIO_SetBits(GPIOC,GPIO_Pin_6);
          
					GPIO_ResetBits(GPIOC,GPIO_Pin_4);//点亮D5  
          delay_ms(1000);  
					GPIO_SetBits(GPIOC,GPIO_Pin_4);


              
          GPIO_ResetBits(GPIOA,GPIO_Pin_1);//闪烁蓝光
          delay_ms(1000);  
          GPIO_SetBits(GPIOA,GPIO_Pin_1); //熄灭蓝光    
           
          GPIO_ResetBits(GPIOA,GPIO_Pin_3);//绿光
          delay_ms(1000);  
          GPIO_SetBits(GPIOA,GPIO_Pin_3);          
              
          GPIO_ResetBits(GPIOA,GPIO_Pin_1|GPIO_Pin_3);//靛=蓝光+绿光
          delay_ms(1000);  
          GPIO_SetBits(GPIOA,GPIO_Pin_1|GPIO_Pin_3);
}    

}





菜鸟
2014-10-22 13:14:14     打赏
12楼
叫你帮我焊一下灯,你都不帮焊~

菜鸟
2014-10-22 13:14:54     打赏
13楼

第三次作业已更新~


菜鸟
2014-10-22 23:27:27     打赏
14楼

菜鸟
2014-10-22 23:28:07     打赏
15楼
不焊了,焊盘会被我弄掉的。

菜鸟
2014-10-22 23:30:07     打赏
16楼

忘记自己设密码了~自己看视频的时候能看到


菜鸟
2014-10-22 23:30:42     打赏
17楼
机智大神

菜鸟
2014-10-23 13:07:15     打赏
18楼

收到~改了~


菜鸟
2014-10-25 23:10:10     打赏
19楼

你的智商~


菜鸟
2014-10-27 17:48:58     打赏
20楼

数码管显示:0~30

key1;key3切换到key2(动态扫描)


共40条 2/4 1 2 3 4 跳转至

回复

匿名不能发帖!请先 [ 登陆 注册 ]