写一段基于32F103基于如R232通信的程序

当然可以！下面是一个基于STM32F103芯片的R232通信程序的示例：

首先，需要在STM32F103芯片上配置R232通信的引脚。假设我们使用USART1进行通信，将PA9配置为USART1的TX引脚，将PA10配置为USART1的RX引脚。以下是配置GPIO和USART的代码：

#include "stm32f10x.h"

void USART1_Init(void) {
  // Enable USART1 clock
  RCC_APB2PeriphClockCmd(RCC_APB2Periph_USART1, ENABLE);

  // Configure USART1 pins
  GPIO_InitTypeDef GPIO_InitStructure;
  GPIO_InitStructure.GPIO_Pin = GPIO_Pin_9; // TX (PA9)
  GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;
  GPIO_InitStructure.GPIO_Mode = GPIO_Mode_AF_PP;
  GPIO_Init(GPIOA, &GPIO_InitStructure);

  GPIO_InitStructure.GPIO_Pin = GPIO_Pin_10; // RX (PA10)
  GPIO_InitStructure.GPIO_Mode = GPIO_Mode_IN_FLOATING;
  GPIO_Init(GPIOA, &GPIO_InitStructure);

  // Configure USART1 settings
  USART_InitTypeDef USART_InitStructure;
  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;

  // Initialize USART1
  USART_Init(USART1, &USART_InitStructure);

  // Enable USART1
  USART_Cmd(USART1, ENABLE);
}

接下来，我们可以编写一个简单的函数来发送和接收数据，示例代码如下：

void USART1_SendChar(char ch) {
  // Wait until transmit data register is empty
  while (!(USART1->SR & USART_SR_TXE));

  // Send a character
  USART1->DR = (ch & 0xFF);
}

char USART1_ReceiveChar(void) {
  // Wait until receive data is available
  while (!(USART1->SR & USART_SR_RXNE));

  // Read a character
  return (USART1->DR & 0xFF);
}

最后，我们可以在主函数中使用这些函数发送和接收数据：

int main(void) {
  // Initialize USART1
  USART1_Init();

  // Send a character
  USART1_SendChar('H');

  // Receive a character
  char receivedChar = USART1_ReceiveChar();

  // Check the received character
  if (receivedChar == 'H') {
    // Do something if the received character is 'H'
  }

  while (1) {
    // Your code here
  }
}

这是一个简单的基于STM32F103芯片的R232通信程序示例。你可以根据自己的需求进行修改和扩展。希望对你有所帮助！