GPT答：

7i24.cn

以下是一个基于STM32单片机的超声波测距仪蜂鸣器报警的子程序设计示例：

```c
#include "stm32f10x.h"

// 超声波测距仪引脚定义
#define TRIG_PIN GPIO_Pin_0
#define ECHO_PIN GPIO_Pin_1

// 蜂鸣器引脚定义
#define BUZZER_PIN GPIO_Pin_2

void delay_us(uint32_t us) {
    // 根据系统时钟频率调整延迟时间，假设系统时钟为72MHz
    uint32_t count = us * 9;
    while(count--);
}

void init_GPIO(void) {
    // 初始化超声波测距仪引脚（TRIG和ECHO）
    RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA, ENABLE);

    GPIO_InitTypeDef gpio_init;
    
    gpio_init.GPIO_Mode = GPIO_Mode_Out_PP;  // TRIG设置为输出模式
	gpio_init.GPIO_Speed = GPIO_Speed_50MHz;
	gpio_init.GPIO_Pin = TRIG_PIN;
	GPIO_Init(GPIOA, &gpio_init);
	
	gpio_init.GPIO_Mode = GPIO_Mode_IN_FLOATING;  // ECHO设置为输入模式（不带上拉电阻）
	gpio_init.GPIO_Speed = GPIO_Speed_50MHz;
	gpio_init.GPIO_Pin = ECHO_PIN;
	GPIO_Init(GPIOA, &gpio_init);

	// 初始化蜂鸣器引脚（BUZZER）
	RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOB, ENABLE);
	
	gpio_init.GPIO_Mode=GPIO_Mode_Out_PP;   // 设置推挽输出
	gpio_init.GPIO_Speed=GPIO_Speed_50MHz;  // 设置输出速度为50MHz
	gpio_init.GPIO_Pin=BUZZER_PIN;
	GPIO_Init(GPIOB,&gpio_init);
}

float measure_distance(void) {
    GPIO_SetBits(GPIOA, TRIG_PIN);  // 发送超声波信号
	delay_us(10);
	GPIO_ResetBits(GPIOA, TRIG_PIN);

	while (GPIO_ReadInputDataBit(GPIOA, ECHO_PIN) == RESET);  // 等待超声波返回信号开始

	uint32_t start_time = TIM2->CNT;  // 记录起始时间

	while (GPIO_ReadInputDataBit(GPIOA, ECHO_PIN) != RESET);  // 等待超声波返回信号结束

	uint32_t end_time = TIM2->CNT;  // 记录结束时间
	
	// 根据公式计算距离（假设音速为343m/s，单位为米）
	float distance = ((end_time - start_time) * (343.0 / SystemCoreClock)) / 2;

	return distance;
}

void buzzer_alarm(void) {
    GPIO_SetBits(GPIOB, BUZZER_PIN);   // 打开蜂鸣器
	delay_us(1000000);   // 延迟1秒钟（1000000微秒）
	GPIO_ResetBits(GPIOB, BUZZER_PIN);   // 关闭蜂鸣器
}

int main(void)
{
	init_GPIO();

	while(1)
	{
		float distance = measure_distance();   // 测量距离
		
		if(distance < 1.0)
			buzzer_alarm();   // 如果距离小于1米，则触发报警
	}
}
```

以上代码中，我们首先定义了超声波测距仪的引脚（TRIG和ECHO）以及蜂鸣器的引脚（BUZZER）。然后，在`init_GPIO()`函数中初始化了这些引脚。接下来，`measure_distance()`函数用于测量距离，并根据公式计算出实际距离。最后，在主循环中不断测量距离，如果距离小于1米，则触发报警。

需要注意的是，以上代码只是一个示例，并未考虑到实际应用场景中可能存在的其他因素和问题。在实际应用中，请根据具体需求进行相应调整和优化。