大家好,又见面了,我是全栈君,今天给大家准备了Idea注册码。
本文来自http://blog.csdn.net/hellogv/ 。引用必须注明出处!
上次讲了LUA移植到STM32。这次讲讲Basic脚本解释器移植到STM32。
在STM32上跑Basic脚本,相同能够跟穿戴设备结合。也能够作为刚開始学习的人学习MCU的入门工具,当然前提是有人做好Basic的STM32交互实现。这里使用的是uBasic开源脚本解释器(http://dunkels.com/adam/ubasic/),只是uBasic不支持完整的Basic算法,所以用起来略费心,假设有好的Basic开源脚本解释器。ANSI-C实现的,欢迎推荐。。
。
本文实现的功能是输入下面basic脚本:
10 v=1 20 for p = 4 to 7 40 write "gpioa",p,v 50 next p 60 if v=0 then goto 10 70 if v=1 then v=0 80 goto 20 run
实现的功能是同一时候把4个LED灯同一时候开后再同一时候关,通过自己定义的命令 write来实现,p是IO脚。v是IO的数值。
write "gpioa",p,v
例如以下图:
本文代码能够到这里下载http://download.csdn.net/detail/hellogv/7391265。
main.c的源代码例如以下,通过USART1来发送Basic脚本到STM32,另外还要通过readline()来做些预处理,比如收到“run”这个字符串就表示脚本结束開始执行:
#include "stm32f10x_lib.h" #include <assert.h> #include "stdio.h" #include <stdlib.h> #include <string.h> #include "ubasic.h" /******************************************************************************* * 函数名 : RCC_Configuration * 函数描写叙述 : 设置系统各部分时钟 *******************************************************************************/ void RCC_Configuration(void) { /* 定义枚举类型变量 HSEStartUpStatus */ ErrorStatus HSEStartUpStatus; /* 复位系统时钟设置*/ RCC_DeInit(); /* 开启HSE*/ RCC_HSEConfig(RCC_HSE_ON ); /* 等待HSE起振并稳定*/ HSEStartUpStatus = RCC_WaitForHSEStartUp(); /* 推断HSE起是否振成功,是则进入if()内部 */ if (HSEStartUpStatus == SUCCESS) { /* 选择HCLK(AHB)时钟源为SYSCLK 1分频 */ RCC_HCLKConfig(RCC_SYSCLK_Div1 ); /* 选择PCLK2时钟源为 HCLK(AHB) 1分频 */ RCC_PCLK2Config(RCC_HCLK_Div1 ); /* 选择PCLK1时钟源为 HCLK(AHB) 2分频 */ RCC_PCLK1Config(RCC_HCLK_Div2 ); /* 设置FLASH延时周期数为2 */ FLASH_SetLatency(FLASH_Latency_2 ); /* 使能FLASH预取缓存 */ FLASH_PrefetchBufferCmd(FLASH_PrefetchBuffer_Enable ); /* 选择锁相环(PLL)时钟源为HSE 1分频。倍频数为9。则PLL输出频率为 8MHz * 9 = 72MHz */ RCC_PLLConfig(RCC_PLLSource_HSE_Div1, RCC_PLLMul_9 ); /* 使能PLL */ RCC_PLLCmd(ENABLE); /* 等待PLL输出稳定 */ while (RCC_GetFlagStatus(RCC_FLAG_PLLRDY ) == RESET) ; /* 选择SYSCLK时钟源为PLL */ RCC_SYSCLKConfig(RCC_SYSCLKSource_PLLCLK ); /* 等待PLL成为SYSCLK时钟源 */ while (RCC_GetSYSCLKSource() != 0x08) ; } /* 开启USART1和GPIOA时钟 */ RCC_APB2PeriphClockCmd(RCC_APB2Periph_USART1 | RCC_APB2Periph_GPIOA, ENABLE); } /******************************************************************************* * 函数名 : GPIO_Configuration * 函数描写叙述 : 设置各GPIOport功能 *******************************************************************************/ void GPIO_Configuration(void) { /* 定义GPIO初始化结构体 GPIO_InitStructure */ GPIO_InitTypeDef GPIO_InitStructure; /* 设置USART1的Tx脚(PA.9)为第二功能推挽输出功能 */ GPIO_InitStructure.GPIO_Pin = GPIO_Pin_9; GPIO_InitStructure.GPIO_Mode = GPIO_Mode_AF_PP; GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz; GPIO_Init(GPIOA, &GPIO_InitStructure); /* 设置USART1的Rx脚(PA.10)为浮空输入脚 */ GPIO_InitStructure.GPIO_Pin = GPIO_Pin_10; GPIO_InitStructure.GPIO_Mode = GPIO_Mode_IN_FLOATING; GPIO_Init(GPIOA, &GPIO_InitStructure); } /******************************************************************************* * 函数名 : USART_Configuration * 函数描写叙述 : 设置USART1 *******************************************************************************/ void USART_Configuration(void) { /* 定义USART初始化结构体 USART_InitStructure */ USART_InitTypeDef USART_InitStructure; /* 定义USART初始化结构体 USART_ClockInitStructure */ USART_ClockInitTypeDef USART_ClockInitStructure; /* 波特率为115200bps; * 8位数据长度; * 1个停止位。无校验; * 禁用硬件流控制; * 禁止USART时钟; * 时钟极性低; * 在第2个边沿捕获数据 * 最后一位数据的时钟脉冲不从 SCLK 输出; */ USART_ClockInitStructure.USART_Clock = USART_Clock_Disable; USART_ClockInitStructure.USART_CPOL = USART_CPOL_Low; USART_ClockInitStructure.USART_CPHA = USART_CPHA_2Edge; USART_ClockInitStructure.USART_LastBit = USART_LastBit_Disable; USART_ClockInit(USART1, &USART_ClockInitStructure); USART_InitStructure.USART_BaudRate = 9600; USART_InitStructure.USART_WordLength = USART_WordLength_8b; USART_InitStructure.USART_StopBits = USART_StopBits_1; USART_InitStructure.USART_Parity = USART_Parity_No ; USART_InitStructure.USART_HardwareFlowControl =USART_HardwareFlowControl_None; USART_InitStructure.USART_Mode = USART_Mode_Rx | USART_Mode_Tx; USART_Init(USART1, &USART_InitStructure); /* 使能USART1 */ USART_Cmd(USART1, ENABLE); } int fputc(int ch, FILE *f) { USART_SendData(USART1, (u8) ch); while (USART_GetFlagStatus(USART1, USART_FLAG_TC ) == RESET); return ch; } int getKey(void) { while (!(USART1 ->SR & USART_FLAG_RXNE )); return ((int) (USART1 ->DR & 0x1FF)); } /******************************************************************************* * 函数名 : readLine * 函数描写叙述 : 从串口读取Basic代码 *******************************************************************************/ bool readLines(char *s) { bool isString = FALSE; //推断是否字符串 char ch; char *p = s; if(*p!='#include "stm32f10x_lib.h" #include <assert.h> #include "stdio.h" #include <stdlib.h> #include <string.h> #include "ubasic.h" /******************************************************************************* * 函数名 : RCC_Configuration * 函数描写叙述 : 设置系统各部分时钟 *******************************************************************************/ void RCC_Configuration(void) { /* 定义枚举类型变量 HSEStartUpStatus */ ErrorStatus HSEStartUpStatus; /* 复位系统时钟设置*/ RCC_DeInit(); /* 开启HSE*/ RCC_HSEConfig(RCC_HSE_ON ); /* 等待HSE起振并稳定*/ HSEStartUpStatus = RCC_WaitForHSEStartUp(); /* 推断HSE起是否振成功,是则进入if()内部 */ if (HSEStartUpStatus == SUCCESS) { /* 选择HCLK(AHB)时钟源为SYSCLK 1分频 */ RCC_HCLKConfig(RCC_SYSCLK_Div1 ); /* 选择PCLK2时钟源为 HCLK(AHB) 1分频 */ RCC_PCLK2Config(RCC_HCLK_Div1 ); /* 选择PCLK1时钟源为 HCLK(AHB) 2分频 */ RCC_PCLK1Config(RCC_HCLK_Div2 ); /* 设置FLASH延时周期数为2 */ FLASH_SetLatency(FLASH_Latency_2 ); /* 使能FLASH预取缓存 */ FLASH_PrefetchBufferCmd(FLASH_PrefetchBuffer_Enable ); /* 选择锁相环(PLL)时钟源为HSE 1分频。倍频数为9。则PLL输出频率为 8MHz * 9 = 72MHz */ RCC_PLLConfig(RCC_PLLSource_HSE_Div1, RCC_PLLMul_9 ); /* 使能PLL */ RCC_PLLCmd(ENABLE); /* 等待PLL输出稳定 */ while (RCC_GetFlagStatus(RCC_FLAG_PLLRDY ) == RESET) ; /* 选择SYSCLK时钟源为PLL */ RCC_SYSCLKConfig(RCC_SYSCLKSource_PLLCLK ); /* 等待PLL成为SYSCLK时钟源 */ while (RCC_GetSYSCLKSource() != 0x08) ; } /* 开启USART1和GPIOA时钟 */ RCC_APB2PeriphClockCmd(RCC_APB2Periph_USART1 | RCC_APB2Periph_GPIOA, ENABLE); } /******************************************************************************* * 函数名 : GPIO_Configuration * 函数描写叙述 : 设置各GPIOport功能 *******************************************************************************/ void GPIO_Configuration(void) { /* 定义GPIO初始化结构体 GPIO_InitStructure */ GPIO_InitTypeDef GPIO_InitStructure; /* 设置USART1的Tx脚(PA.9)为第二功能推挽输出功能 */ GPIO_InitStructure.GPIO_Pin = GPIO_Pin_9; GPIO_InitStructure.GPIO_Mode = GPIO_Mode_AF_PP; GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz; GPIO_Init(GPIOA, &GPIO_InitStructure); /* 设置USART1的Rx脚(PA.10)为浮空输入脚 */ GPIO_InitStructure.GPIO_Pin = GPIO_Pin_10; GPIO_InitStructure.GPIO_Mode = GPIO_Mode_IN_FLOATING; GPIO_Init(GPIOA, &GPIO_InitStructure); } /******************************************************************************* * 函数名 : USART_Configuration * 函数描写叙述 : 设置USART1 *******************************************************************************/ void USART_Configuration(void) { /* 定义USART初始化结构体 USART_InitStructure */ USART_InitTypeDef USART_InitStructure; /* 定义USART初始化结构体 USART_ClockInitStructure */ USART_ClockInitTypeDef USART_ClockInitStructure; /* 波特率为115200bps; * 8位数据长度; * 1个停止位。无校验; * 禁用硬件流控制; * 禁止USART时钟; * 时钟极性低; * 在第2个边沿捕获数据 * 最后一位数据的时钟脉冲不从 SCLK 输出; */ USART_ClockInitStructure.USART_Clock = USART_Clock_Disable; USART_ClockInitStructure.USART_CPOL = USART_CPOL_Low; USART_ClockInitStructure.USART_CPHA = USART_CPHA_2Edge; USART_ClockInitStructure.USART_LastBit = USART_LastBit_Disable; USART_ClockInit(USART1, &USART_ClockInitStructure); USART_InitStructure.USART_BaudRate = 9600; USART_InitStructure.USART_WordLength = USART_WordLength_8b; USART_InitStructure.USART_StopBits = USART_StopBits_1; USART_InitStructure.USART_Parity = USART_Parity_No ; USART_InitStructure.USART_HardwareFlowControl =USART_HardwareFlowControl_None; USART_InitStructure.USART_Mode = USART_Mode_Rx | USART_Mode_Tx; USART_Init(USART1, &USART_InitStructure); /* 使能USART1 */ USART_Cmd(USART1, ENABLE); } int fputc(int ch, FILE *f) { USART_SendData(USART1, (u8) ch); while (USART_GetFlagStatus(USART1, USART_FLAG_TC ) == RESET); return ch; } int getKey(void) { while (!(USART1 ->SR & USART_FLAG_RXNE )); return ((int) (USART1 ->DR & 0x1FF)); } /******************************************************************************* * 函数名 : readLine * 函数描写叙述 : 从串口读取Basic代码 *******************************************************************************/ bool readLines(char *s) { bool isString = FALSE; //推断是否字符串 char ch; char *p = s; if(*p!='\0') return FALSE; while (1) { ch = getKey(); if (ch == '\"') { //检測到字符串 isString = !isString; } if (ch == '\r') //屏蔽'\r'这个字符 continue; else { if (isString) //不改变代码中字符串的大写和小写 *p++ = ch; else //关键字都转为小写 *p++ = tolower(ch); } if (*(p-3) == 'r' &&*(p-2)=='u' &&*(p-1)=='n'){ //run表示程序结束 *(p-3) = '\0'; break; } } return TRUE; } #define _MAX_LINE_LENGTH 256 int main(void) { /* 设置系统时钟 */ RCC_Configuration(); /* 设置GPIOport */ GPIO_Configuration(); /* 设置USART */ USART_Configuration(); char line[_MAX_LINE_LENGTH]; while(1){ memset(line, 0, _MAX_LINE_LENGTH); if(readLines(line)){ ubasic_init(line); do { ubasic_run(); } while(!ubasic_finished()); } }; return 0; }') return FALSE; while (1) { ch = getKey(); if (ch == '\"') { //检測到字符串 isString = !isString; } if (ch == '\r') //屏蔽'\r'这个字符 continue; else { if (isString) //不改变代码中字符串的大写和小写 *p++ = ch; else //关键字都转为小写 *p++ = tolower(ch); } if (*(p-3) == 'r' &&*(p-2)=='u' &&*(p-1)=='n'){ //run表示程序结束 *(p-3) = '#include "stm32f10x_lib.h" #include <assert.h> #include "stdio.h" #include <stdlib.h> #include <string.h> #include "ubasic.h" /******************************************************************************* * 函数名 : RCC_Configuration * 函数描写叙述 : 设置系统各部分时钟 *******************************************************************************/ void RCC_Configuration(void) { /* 定义枚举类型变量 HSEStartUpStatus */ ErrorStatus HSEStartUpStatus; /* 复位系统时钟设置*/ RCC_DeInit(); /* 开启HSE*/ RCC_HSEConfig(RCC_HSE_ON ); /* 等待HSE起振并稳定*/ HSEStartUpStatus = RCC_WaitForHSEStartUp(); /* 推断HSE起是否振成功,是则进入if()内部 */ if (HSEStartUpStatus == SUCCESS) { /* 选择HCLK(AHB)时钟源为SYSCLK 1分频 */ RCC_HCLKConfig(RCC_SYSCLK_Div1 ); /* 选择PCLK2时钟源为 HCLK(AHB) 1分频 */ RCC_PCLK2Config(RCC_HCLK_Div1 ); /* 选择PCLK1时钟源为 HCLK(AHB) 2分频 */ RCC_PCLK1Config(RCC_HCLK_Div2 ); /* 设置FLASH延时周期数为2 */ FLASH_SetLatency(FLASH_Latency_2 ); /* 使能FLASH预取缓存 */ FLASH_PrefetchBufferCmd(FLASH_PrefetchBuffer_Enable ); /* 选择锁相环(PLL)时钟源为HSE 1分频。倍频数为9。则PLL输出频率为 8MHz * 9 = 72MHz */ RCC_PLLConfig(RCC_PLLSource_HSE_Div1, RCC_PLLMul_9 ); /* 使能PLL */ RCC_PLLCmd(ENABLE); /* 等待PLL输出稳定 */ while (RCC_GetFlagStatus(RCC_FLAG_PLLRDY ) == RESET) ; /* 选择SYSCLK时钟源为PLL */ RCC_SYSCLKConfig(RCC_SYSCLKSource_PLLCLK ); /* 等待PLL成为SYSCLK时钟源 */ while (RCC_GetSYSCLKSource() != 0x08) ; } /* 开启USART1和GPIOA时钟 */ RCC_APB2PeriphClockCmd(RCC_APB2Periph_USART1 | RCC_APB2Periph_GPIOA, ENABLE); } /******************************************************************************* * 函数名 : GPIO_Configuration * 函数描写叙述 : 设置各GPIOport功能 *******************************************************************************/ void GPIO_Configuration(void) { /* 定义GPIO初始化结构体 GPIO_InitStructure */ GPIO_InitTypeDef GPIO_InitStructure; /* 设置USART1的Tx脚(PA.9)为第二功能推挽输出功能 */ GPIO_InitStructure.GPIO_Pin = GPIO_Pin_9; GPIO_InitStructure.GPIO_Mode = GPIO_Mode_AF_PP; GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz; GPIO_Init(GPIOA, &GPIO_InitStructure); /* 设置USART1的Rx脚(PA.10)为浮空输入脚 */ GPIO_InitStructure.GPIO_Pin = GPIO_Pin_10; GPIO_InitStructure.GPIO_Mode = GPIO_Mode_IN_FLOATING; GPIO_Init(GPIOA, &GPIO_InitStructure); } /******************************************************************************* * 函数名 : USART_Configuration * 函数描写叙述 : 设置USART1 *******************************************************************************/ void USART_Configuration(void) { /* 定义USART初始化结构体 USART_InitStructure */ USART_InitTypeDef USART_InitStructure; /* 定义USART初始化结构体 USART_ClockInitStructure */ USART_ClockInitTypeDef USART_ClockInitStructure; /* 波特率为115200bps; * 8位数据长度; * 1个停止位。无校验; * 禁用硬件流控制; * 禁止USART时钟; * 时钟极性低; * 在第2个边沿捕获数据 * 最后一位数据的时钟脉冲不从 SCLK 输出; */ USART_ClockInitStructure.USART_Clock = USART_Clock_Disable; USART_ClockInitStructure.USART_CPOL = USART_CPOL_Low; USART_ClockInitStructure.USART_CPHA = USART_CPHA_2Edge; USART_ClockInitStructure.USART_LastBit = USART_LastBit_Disable; USART_ClockInit(USART1, &USART_ClockInitStructure); USART_InitStructure.USART_BaudRate = 9600; USART_InitStructure.USART_WordLength = USART_WordLength_8b; USART_InitStructure.USART_StopBits = USART_StopBits_1; USART_InitStructure.USART_Parity = USART_Parity_No ; USART_InitStructure.USART_HardwareFlowControl =USART_HardwareFlowControl_None; USART_InitStructure.USART_Mode = USART_Mode_Rx | USART_Mode_Tx; USART_Init(USART1, &USART_InitStructure); /* 使能USART1 */ USART_Cmd(USART1, ENABLE); } int fputc(int ch, FILE *f) { USART_SendData(USART1, (u8) ch); while (USART_GetFlagStatus(USART1, USART_FLAG_TC ) == RESET); return ch; } int getKey(void) { while (!(USART1 ->SR & USART_FLAG_RXNE )); return ((int) (USART1 ->DR & 0x1FF)); } /******************************************************************************* * 函数名 : readLine * 函数描写叙述 : 从串口读取Basic代码 *******************************************************************************/ bool readLines(char *s) { bool isString = FALSE; //推断是否字符串 char ch; char *p = s; if(*p!='\0') return FALSE; while (1) { ch = getKey(); if (ch == '\"') { //检測到字符串 isString = !isString; } if (ch == '\r') //屏蔽'\r'这个字符 continue; else { if (isString) //不改变代码中字符串的大写和小写 *p++ = ch; else //关键字都转为小写 *p++ = tolower(ch); } if (*(p-3) == 'r' &&*(p-2)=='u' &&*(p-1)=='n'){ //run表示程序结束 *(p-3) = '\0'; break; } } return TRUE; } #define _MAX_LINE_LENGTH 256 int main(void) { /* 设置系统时钟 */ RCC_Configuration(); /* 设置GPIOport */ GPIO_Configuration(); /* 设置USART */ USART_Configuration(); char line[_MAX_LINE_LENGTH]; while(1){ memset(line, 0, _MAX_LINE_LENGTH); if(readLines(line)){ ubasic_init(line); do { ubasic_run(); } while(!ubasic_finished()); } }; return 0; }'; break; } } return TRUE; } #define _MAX_LINE_LENGTH 256 int main(void) { /* 设置系统时钟 */ RCC_Configuration(); /* 设置GPIOport */ GPIO_Configuration(); /* 设置USART */ USART_Configuration(); char line[_MAX_LINE_LENGTH]; while(1){ memset(line, 0, _MAX_LINE_LENGTH); if(readLines(line)){ ubasic_init(line); do { ubasic_run(); } while(!ubasic_finished()); } }; return 0; }
实现write命令的源代码例如以下:
#include "tokenizer.h" #include "stm32f10x_lib.h" #include <string.h> #include <ctype.h> #include <stdlib.h> GPIO_TypeDef *gpio_x; u16 gpio_pin_x; u16 gpio_value; struct GPIO_KEYWORD gpio_kt; struct PIN_KEYWORD pin_kt; #define GET_ARRAY_LEN(array,len){len = (sizeof(array) / sizeof(array[0]));} struct GPIO_KEYWORD { char *keyword; GPIO_TypeDef *token; }; static const struct GPIO_KEYWORD gpio_keywords[] = { { "GPIOA", GPIOA }, { "GPIOB", GPIOB }, { "GPIOC", GPIOC }, { "GPIOD", GPIOD }}; struct PIN_KEYWORD { u16 keyword; u16 token;; }; static const struct PIN_KEYWORD pin_keywords[17] = { { 0, GPIO_Pin_0 }, { 1, GPIO_Pin_1 }, { 2, GPIO_Pin_2 }, { 3, GPIO_Pin_3 }, { 4, GPIO_Pin_4 }, { 5, GPIO_Pin_5 }, { 6, GPIO_Pin_6 }, { 7, GPIO_Pin_7 }, { 8, GPIO_Pin_8 }, { 9, GPIO_Pin_9 }, { 10, GPIO_Pin_10 }, { 11, GPIO_Pin_11 }, { 12, GPIO_Pin_12 }, { 13, GPIO_Pin_13 }, { 14, GPIO_Pin_14 }, { 15, GPIO_Pin_15 }}; void init_my_statement(){ gpio_x=NULL; gpio_pin_x=NULL; gpio_value=NULL; } void put_value(u16 value){ gpio_value=value; } u16 get_value(){ return gpio_value; } /** **获取GPIO_PIN_X **/ bool put_pin(u16 pin){ int size=0; if(gpio_pin_x==NULL){ GET_ARRAY_LEN(pin_keywords,size); if(pin<size){ gpio_pin_x = pin_keywords[pin].token; printf ("------P");printf ("%d\r\n",pin); return TRUE; } } return FALSE; } u16 get_pin(){ return gpio_pin_x; } /** **获取获取GPIO_X **/ bool put_gpio(char* p){ int i=0; int size=0; if(gpio_x==NULL){ GET_ARRAY_LEN(gpio_keywords,size); for (i=0; i<size; i++) { gpio_kt = gpio_keywords[i]; if (strncasecmp(p, gpio_kt.keyword, strlen(p)) == 0) { printf ("------");printf ("%s\r\n",gpio_kt.keyword); gpio_x = gpio_kt.token; return TRUE; } } } return FALSE; } GPIO_TypeDef * get_gpio(){ return gpio_x; } bool write_gpio(){ //USART1不能被写 if(gpio_x== GPIOA && (gpio_pin_x==GPIO_Pin_9 || gpio_pin_x==GPIO_Pin_10)){ return FALSE; } GPIO_InitTypeDef GPIO_InitStructure; GPIO_InitStructure.GPIO_Pin = gpio_pin_x; GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz; GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP; GPIO_Init(gpio_x , &GPIO_InitStructure); GPIO_WriteBit(gpio_x , gpio_pin_x,(BitAction)gpio_value); return TRUE; }
发布者:全栈程序员-用户IM,转载请注明出处:https://javaforall.cn/116738.html原文链接:https://javaforall.cn
【正版授权,激活自己账号】: Jetbrains全家桶Ide使用,1年售后保障,每天仅需1毛
【官方授权 正版激活】: 官方授权 正版激活 支持Jetbrains家族下所有IDE 使用个人JB账号...