void Motor_Set(int Motor1,int Motor2) {Motor1 =-Motor1; Motor2 =-Motor2; if(Motor1 <0) BIN1_SET; else BIN1_RESET; if(Motor2 <0) AIN1_SET; else AIN1_RESET; if(Motor1 <0) { if(Motor1 <-99) Motor1 =-99; __HAL_TIM_SET_COMPARE(&htim1, TIM_CHANNEL_1, (100+Motor1)); } else { if(Motor1 >99) Motor1 = 99; __HAL_TIM_SET_COMPARE(&htim1, TIM_CHANNEL_1,Motor1); } if(Motor2<0) { if(Motor2 <-99) Motor2=-99; __HAL_TIM_SET_COMPARE(&htim1, TIM_CHANNEL_4, (100+Motor2)); } else { if(Motor2 >99) Motor2 =99; __HAL_TIM_SET_COMPARE(&htim1, TIM_CHANNEL_4, Motor2); } }

时间: 2024-03-30 13:33:59 浏览: 13
是的,这段代码是用来控制直流电机转动的。下面是各个部分的作用: 1. `Motor1 =-Motor1; Motor2 =-Motor2;`:将传入的电机速度参数取反,是为了保证电机正反转的控制。 2. `if(Motor1 <0) BIN1_SET; else BIN1_RESET;` 和 `if(Motor2 <0) AIN1_SET; else AIN1_RESET;`:根据电机速度参数的正负,选择对应的GPIO输出高电平或低电平,控制电机正反转。 3. `if(Motor1 <0)` 和 `if(Motor2<0)`:判断电机速度参数的正负,选择对应的定时器通道(TIM_CHANNEL)。 4. `if(Motor1 <-99) Motor1 =-99;` 和 `if(Motor2 <-99) Motor2=-99;`:对电机速度参数进行限幅,保证在-99到99之间。 5. `__HAL_TIM_SET_COMPARE(&htim1, TIM_CHANNEL_1, (100+Motor1));` 和 `__HAL_TIM_SET_COMPARE(&htim1, TIM_CHANNEL_4, (100+Motor2));`:设置定时器比较值,控制电机转速。其中,100是因为定时器的比较值范围是0-199,+100是为了将-99到99转换为1到199。
相关问题

对下列代码进行注释:#define Init_motor4B Motor_LA = 0,Motor_LB = 0,Motor_LC = 0,Motor_LD = 0 void Init_Motor(void); void Set_Motor( bit a, bit b, int c );//a是否开启,b是否,c步进间隔1ms * c static bit fangxiang = 1;//0是逆时针 static bit kaiqi = 0;//0是停止 static int sudu = 10;//每次步进间隔时间为 1ms * sudu(最低2.5ms) void Init_Motor(void) { TMOD |= 0x01; TH0 = 0x0FC; TL0 = 0x18; EA = 1; ET0 = 1; TR0 = 1; Init_motor4B; } void Set_Motor( bit a, bit b, int c ) { kaiqi = a; fangxiang = b; if( sudu < 3 ) sudu = 3; sudu = c; } void Motor_Star(void) interrupt 1 { static int times = 0, star = 0; TH0 = 0x0FC; TL0 = 0x18; times++; if( kaiqi == 1 && times >= sudu ) { times = 0; if( star >= 9 ) { star = 1; } if( star <= 0 ) { star = 8; } switch ( star ) { case 1: Motor_LA = 1,Motor_LB = 0,Motor_LC = 0,Motor_LD = 0; break; case 2: Motor_LA = 1,Motor_LB = 1,Motor_LC = 0,Motor_LD = 0; break; case 3: Motor_LA = 0,Motor_LB = 1,Motor_LC = 0,Motor_LD = 0; break; case 4: Motor_LA = 0,Motor_LB = 1,Motor_LC = 1,Motor_LD = 0; break; case 5: Motor_LA = 0,Motor_LB = 0,Motor_LC = 1,Motor_LD = 0; break; case 6: Motor_LA = 0,Motor_LB = 0,Motor_LC = 1,Motor_LD = 1; break; case 7: Motor_LA = 0,Motor_LB = 0,Motor_LC = 0,Motor_LD = 1; break; case 8: Motor_LA = 1,Motor_LB = 0,Motor_LC = 0,Motor_LD = 1; break; } if( fangxiang == 1 ) { star++; } else { star--; } } }

这段代码是控制步进电机的程序,主要包括以下几个函数: 1. `#define Init_motor4B Motor_LA = 0,Motor_LB = 0,Motor_LC = 0,Motor_LD = 0`:定义了一个宏,用于初始化电机引脚。 2. `void Init_Motor(void)`:初始化步进电机的参数,并开启定时器。 3. `void Set_Motor( bit a, bit b, int c )`:设置步进电机的运行参数,包括电机是否开启、旋转方向、步进间隔时间。 4. `void Motor_Star(void) interrupt 1`:定时器中断函数,用于控制电机的旋转方向、速度和步进。 整个程序的主要流程是:通过调用 `Init_Motor()` 函数进行电机的初始化和定时器的开启,然后通过调用 `Set_Motor()` 函数设置电机的运行参数,最后在定时器中断函数 `Motor_Star()` 中控制电机的旋转方向、速度和步进。具体实现方式是通过改变电机引脚的电平状态来控制电机的旋转方向和步进。

解释这段代码static void chassis_control_loop(chassis_move_t *chassis_move_control_loop) { fp32 max_vector = 0.0f, vector_rate = 0.0f; fp32 temp = 0.0f; fp32 wheel_speed[4] = {0.0f, 0.0f, 0.0f, 0.0f}; uint8_t i = 0; float position_error, speed_error; float position_output, speed_output; float current_position, current_speed; float target_position, target_speed; chassis_move_control_loop->vx_set=vx_set; chassis_move_control_loop->vy_set=vy_set; chassis_move_control_loop->wz_set=angle_set; chassis_vector_to_mecanum_wheel_speed(chassis_move_control_loop->vx_set, chassis_move_control_loop->vy_set, chassis_move_control_loop->wz_set, wheel_speed); if (chassis_move_control_loop->chassis_mode == CHASSIS_VECTOR_RAW) { for (i = 0; i < 4; i++) { chassis_move_control_loop->motor_chassis[i].give_current = (int16_t)(wheel_speed[i]); } } for (i = 0; i < 4; i++) { chassis_move_control_loop->motor_chassis[i].speed_set = wheel_speed[i]; temp = fabs(chassis_move_control_loop->motor_chassis[i].speed_set); if (max_vector < temp) { max_vector = temp; } } if (max_vector > MAX_WHEEL_SPEED) { vector_rate = MAX_WHEEL_SPEED / max_vector; for (i = 0; i < 4; i++) { chassis_move_control_loop->motor_chassis[i].speed_set *= vector_rate; } } for (i = 0; i < 4; i++) { PID_Calc(&chassis_move_control_loop->motor_speed_pid[i], chassis_move_control_loop->motor_chassis[i].speed, chassis_move_control_loop->motor_chassis[i].speed_set); } for (i = 0; i < 4; i++) { chassis_move_control_loop->motor_chassis[i].give_current = (int16_t)(chassis_move_control_loop->motor_speed_pid[i].out); } }

chassis_move_control_loop->motor_chassis[i].position_pid, chassis_move_control_loop->motor_chassis[i].speed_pid, chassis_move_control_loop->motor_chassis[i].position_get, chassis_move_control_loop->motor_chassis[i].speed_get, chassis_move_control_loop->motor_chassis[i].speed_set, &position_error, &speed_error, &position_output, &speed_output); current_position = chassis_move_control_loop->motor_chassis[i].position_get; current_speed = chassis_move_control_loop->motor_chassis[i].speed_get; target_position = chassis_move_control_loop->motor_chassis[i].position_set; target_speed = speed_output; if(chassis_move_control_loop->motor_chassis[i].position_pid.enable == 1) //PID启动 { chassis_move_control_loop->motor_chassis[i].give_current = PID_Calc(&chassis_move_control_loop->motor_chassis[i].position_pid, current_position, target_position); } else { chassis_move_control_loop->motor_chassis[i].give_current = PID_Calc(&chassis_move_control_loop->motor_chassis[i].speed_pid, current_speed, target_speed); } } } 该函数为底盘控制代码,主要实现底盘的位置和速度控制。 具体实现方法为: 1.根据控制指令,将底盘的速度向量转换为各个驱动电机的速度。 2.根据底盘模式选择不同的控制方式: 如果模式为 CHASSIS_VECTOR_RAW,直接将每个驱动电机的输出电流设置为对应速度。 3.根据电机的最大速度设置,对转换后的速度进行限制。 4.对每个驱动电机进行PID控制,计算出目标位置和目标速度,并根据位置控制或速度控制模式下达电机电流控制指令。 5.将目标速度和目标位置在PID计算中使用,并将计算出的电流控制指令转换为电机的输出电流。

相关推荐

float speed; int main(void) { Breath_Init (); KEY_InitU(); OLED_Init(); Motor_init(); OLED_ShowString(1,1,"Rspeed:"); while (1) { Motor_derection(20); } } #include "stm32f10x.h" // Device header void Breath_Init () { RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA,ENABLE); RCC_APB1PeriphClockCmd(RCC_APB1Periph_TIM2,ENABLE); GPIO_InitTypeDef GPIO_Initstucture; GPIO_Initstucture.GPIO_Mode=GPIO_Mode_AF_PP;//复用推挽 GPIO_Initstucture.GPIO_Pin=GPIO_Pin_0; GPIO_Initstucture.GPIO_Speed=GPIO_Speed_50MHz; GPIO_Init(GPIOA,&GPIO_Initstucture); TIM_InternalClockConfig(TIM2); TIM_TimeBaseInitTypeDef TIM_TimeBaseInitstucture; TIM_TimeBaseInitstucture.TIM_ClockDivision=TIM_CKD_DIV1; TIM_TimeBaseInitstucture.TIM_CounterMode=TIM_CounterMode_Up; TIM_TimeBaseInitstucture.TIM_Period=100-1;//72M/TIM_Period为频率也是ARR TIM_TimeBaseInitstucture.TIM_Prescaler=72-1;//分频也是PSC TIM_TimeBaseInitstucture.TIM_RepetitionCounter=0;//周期数 TIM_TimeBaseInit(TIM2,&TIM_TimeBaseInitstucture); TIM_OCInitTypeDef TIM_OCInitstructure; TIM_OCStructInit(&TIM_OCInitstructure); TIM_OCInitstructure.TIM_OCMode=TIM_OCMode_PWM1; TIM_OCInitstructure.TIM_OCPolarity=TIM_OCPolarity_High; TIM_OCInitstructure.TIM_OutputState=TIM_OutputState_Enable; TIM_OCInitstructure.TIM_Pulse=0;//CCR TIM_OC1Init(TIM2,&TIM_OCInitstructure); TIM_Cmd(TIM2,ENABLE); } void TIM_Compare(uint16_t compare) { TIM_SetCompare1(TIM2,compare); } void KEY_InitD (void)//下拉 { //GPIOB初始化 RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOB,ENABLE); GPIO_InitTypeDef GPIO_Initstructure; GPIO_Initstructure.GPIO_Mode =GPIO_Mode_IPD ; GPIO_Initstructure.GPIO_Pin = GPIO_Pin_0|GPIO_Pin_1; GPIO_Initstructure.GPIO_Speed = GPIO_Speed_50MHz; GPIO_Init(GPIOB,&GPIO_Initstructure); } void KEY_InitU (void)//上拉 { //GPIOB初始化 RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOB,ENABLE); GPIO_InitTypeDef GPIO_Initstructure; GPIO_Initstructure.GPIO_Mode =GPIO_Mode_IPU ; GPIO_Initstructure.GPIO_Pin = GPIO_Pin_1; GPIO_Initstructure.GPIO_Speed = GPIO_Speed_50MHz; GPIO_Init(GPIOB,&GPIO_Initstructure); } uint16_t Key_GetNum () { uint8_t KeyNum = 0; if (GPIO_ReadInputDataBit(GPIOB, GPIO_Pin_1) == 0) { Delay_ms(20); while (GPIO_ReadInputDataBit(GPIOB, GPIO_Pin_1) == 0); Delay_ms(20); KeyNum = 1; } } void Motor_init () { RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA,ENABLE); GPIO_InitTypeDef GPIO_InitStructure; GPIO_InitStructure.GPIO_Mode = GPIO_Mode_IPU; GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz; GPIO_InitStructure.GPIO_Pin = GPIO_Pin_4|GPIO_Pin_5; GPIO_Init(GPIOA, &GPIO_InitStructure); } void Motor_derection (float speed) { if(speed>0) { GPIO_SetBits(GPIOA,GPIO_Pin_4);//in1 GPIO_ResetBits(GPIOA,GPIO_Pin_5);//in2 TIM_Compare(speed); } else GPIO_ResetBits(GPIOA,GPIO_Pin_4);//in1 GPIO_SetBits(GPIOA,GPIO_Pin_5);//in2 TIM_Compare(-speed); } 为什么直流电机不转

最新推荐

recommend-type

保险服务门店新年工作计划PPT.pptx

在保险服务门店新年工作计划PPT中,包含了五个核心模块:市场调研与目标设定、服务策略制定、营销与推广策略、门店形象与环境优化以及服务质量监控与提升。以下是每个模块的关键知识点: 1. **市场调研与目标设定** - **了解市场**:通过收集和分析当地保险市场的数据,包括产品种类、价格、市场需求趋势等,以便准确把握市场动态。 - **竞争对手分析**:研究竞争对手的产品特性、优势和劣势,以及市场份额,以进行精准定位和制定有针对性的竞争策略。 - **目标客户群体定义**:根据市场需求和竞争情况,明确服务对象,设定明确的服务目标,如销售额和客户满意度指标。 2. **服务策略制定** - **服务计划制定**:基于市场需求定制服务内容,如咨询、报价、理赔协助等,并规划服务时间表,保证服务流程的有序执行。 - **员工素质提升**:通过专业培训提升员工业务能力和服务意识,优化服务流程,提高服务效率。 - **服务环节管理**:细化服务流程,明确责任,确保服务质量和效率,强化各环节之间的衔接。 3. **营销与推广策略** - **节日营销活动**:根据节庆制定吸引人的活动方案,如新春送福、夏日促销,增加销售机会。 - **会员营销**:针对会员客户实施积分兑换、优惠券等策略,增强客户忠诚度。 4. **门店形象与环境优化** - **环境设计**:优化门店外观和内部布局,营造舒适、专业的服务氛围。 - **客户服务便利性**:简化服务手续和所需材料,提升客户的体验感。 5. **服务质量监控与提升** - **定期评估**:持续监控服务质量,发现问题后及时调整和改进,确保服务质量的持续提升。 - **流程改进**:根据评估结果不断优化服务流程,减少等待时间,提高客户满意度。 这份PPT旨在帮助保险服务门店在新的一年里制定出有针对性的工作计划,通过科学的策略和细致的执行,实现业绩增长和客户满意度的双重提升。
recommend-type

管理建模和仿真的文件

管理Boualem Benatallah引用此版本:布阿利姆·贝纳塔拉。管理建模和仿真。约瑟夫-傅立叶大学-格勒诺布尔第一大学,1996年。法语。NNT:电话:00345357HAL ID:电话:00345357https://theses.hal.science/tel-003453572008年12月9日提交HAL是一个多学科的开放存取档案馆,用于存放和传播科学研究论文,无论它们是否被公开。论文可以来自法国或国外的教学和研究机构,也可以来自公共或私人研究中心。L’archive ouverte pluridisciplinaire
recommend-type

MATLAB图像去噪最佳实践总结:经验分享与实用建议,提升去噪效果

![MATLAB图像去噪最佳实践总结:经验分享与实用建议,提升去噪效果](https://img-blog.csdnimg.cn/d3bd9b393741416db31ac80314e6292a.png) # 1. 图像去噪基础 图像去噪旨在从图像中去除噪声,提升图像质量。图像噪声通常由传感器、传输或处理过程中的干扰引起。了解图像噪声的类型和特性对于选择合适的去噪算法至关重要。 **1.1 噪声类型** * **高斯噪声:**具有正态分布的加性噪声,通常由传感器热噪声引起。 * **椒盐噪声:**随机分布的孤立像素,值要么为最大值(白色噪声),要么为最小值(黑色噪声)。 * **脉冲噪声
recommend-type

InputStream in = Resources.getResourceAsStream

`Resources.getResourceAsStream`是MyBatis框架中的一个方法,用于获取资源文件的输入流。它通常用于加载MyBatis配置文件或映射文件。 以下是一个示例代码,演示如何使用`Resources.getResourceAsStream`方法获取资源文件的输入流: ```java import org.apache.ibatis.io.Resources; import java.io.InputStream; public class Example { public static void main(String[] args) {
recommend-type

车辆安全工作计划PPT.pptx

"车辆安全工作计划PPT.pptx" 这篇文档主要围绕车辆安全工作计划展开,涵盖了多个关键领域,旨在提升车辆安全性能,降低交通事故发生率,以及加强驾驶员的安全教育和交通设施的完善。 首先,工作目标是确保车辆结构安全。这涉及到车辆设计和材料选择,以增强车辆的结构强度和耐久性,从而减少因结构问题导致的损坏和事故。同时,通过采用先进的电子控制和安全技术,提升车辆的主动和被动安全性能,例如防抱死刹车系统(ABS)、电子稳定程序(ESP)等,可以显著提高行驶安全性。 其次,工作内容强调了建立和完善车辆安全管理体系。这包括制定车辆安全管理制度,明确各级安全管理责任,以及确立安全管理的指导思想和基本原则。同时,需要建立安全管理体系,涵盖安全组织、安全制度、安全培训和安全检查等,确保安全管理工作的系统性和规范性。 再者,加强驾驶员安全培训是另一项重要任务。通过培训提高驾驶员的安全意识和技能水平,使他们更加重视安全行车,了解并遵守交通规则。培训内容不仅包括交通法规,还涉及安全驾驶技能和应急处置能力,以应对可能发生的突发情况。 此外,文档还提到了严格遵守交通规则的重要性。这需要通过宣传和执法来强化,以降低由于违反交通规则造成的交通事故。同时,优化道路交通设施,如改善交通标志、标线和信号灯,可以提高道路通行效率,进一步增强道路安全性。 在实际操作层面,工作计划中提到了车辆定期检查的必要性,包括对刹车、转向、悬挂、灯光、燃油和电器系统的检查,以及根据车辆使用情况制定检查计划。每次检查后应记录问题并及时处理,以确保车辆始终处于良好状态。 最后,建立车辆安全信息管理系统也是关键。通过对车辆事故和故障情况进行记录和分析,可以为安全管理提供数据支持,以便及时发现问题,预防潜在风险,并对事故进行有效处理和责任追究。 这份车辆安全工作计划全面覆盖了从车辆本身到驾驶员行为,再到道路环境的诸多方面,旨在构建一个全方位、多层次的车辆安全管理体系,以降低交通事故风险,保障道路交通安全。
recommend-type

"互动学习:行动中的多样性与论文攻读经历"

多样性她- 事实上SCI NCES你的时间表ECOLEDO C Tora SC和NCESPOUR l’Ingén学习互动,互动学习以行动为中心的强化学习学会互动,互动学习,以行动为中心的强化学习计算机科学博士论文于2021年9月28日在Villeneuve d'Asq公开支持马修·瑟林评审团主席法布里斯·勒菲弗尔阿维尼翁大学教授论文指导奥利维尔·皮耶昆谷歌研究教授:智囊团论文联合主任菲利普·普雷教授,大学。里尔/CRISTAL/因里亚报告员奥利维耶·西格德索邦大学报告员卢多维奇·德诺耶教授,Facebook /索邦大学审查员越南圣迈IMT Atlantic高级讲师邀请弗洛里安·斯特鲁布博士,Deepmind对于那些及时看到自己错误的人...3谢谢你首先,我要感谢我的两位博士生导师Olivier和Philippe。奥利维尔,"站在巨人的肩膀上"这句话对你来说完全有意义了。从科学上讲,你知道在这篇论文的(许多)错误中,你是我可以依
recommend-type

MATLAB图像去噪行业应用:从医疗到遥感,解锁图像去噪的无限潜力

![MATLAB图像去噪行业应用:从医疗到遥感,解锁图像去噪的无限潜力](https://img-blog.csdnimg.cn/img_convert/3aa5d0402a313c17c3c9ffa85b40f683.png) # 1. MATLAB图像去噪概述 **1.1 图像去噪的重要性** 图像去噪是图像处理中一项至关重要的任务,它旨在从图像中去除不需要的噪声,从而提高图像的质量和可理解性。图像噪声可能来自各种来源,如传感器缺陷、环境干扰和数据传输错误。 **1.2 MATLAB图像去噪的优势** MATLAB是一个强大的技术计算环境,提供了一系列图像去噪算法和工具。MATLA
recommend-type

使用pyrhon编写mapreduce

MapReduce是一种用于处理大规模数据集的编程模型和算法。它通常用于分布式计算环境中,可以高效地处理大量数据并实现并行计算。在Python中,我们可以使用Hadoop Streaming来编写MapReduce程序。 下面是使用Python编写MapReduce的基本步骤: 1. Map阶段: - 编写一个mapper函数,该函数接收输入数据并将其转换为键值对的形式。 - 使用标准输入(sys.stdin)读取输入数据,并使用标准输出(sys.stdout)输出键值对。 2. Reduce阶段: - 编写一个reducer函数,该函数接收来自mapper函数输出的键
recommend-type

ipqc工作总结PPT.pptx

"这是一份关于IPQC(在制品质量控制)的工作总结PPT,涵盖了IPQC的角色定义、工作总结、质量月报、质量提升计划、团队发展计划以及未来展望。" IPQC,全称为InProcess Quality Control,在制品质量控制,是制造过程中至关重要的一个环节。IPQC的主要职责在于通过抽检和检验在制品,确保生产出的产品符合预设的质量标准和客户期望。他们的工作包括但不限于: 1. **质量检验与控制**:对在制品进行定期抽样检验,以确认产品质量是否达标。 2. **环境与设备监控**:检查生产现场的环境条件和设备运行状态,确保符合生产要求。 3. **关键控制点检查**:在生产的关键阶段进行严格检查,及时发现问题。 4. **不合格品管理**:对不合格品进行标识、隔离,并追踪问题的解决过程。 5. **制定检验计划**:根据生产计划和产品标准,制定相应的检验程序和标准。 6. **数据收集与分析**:记录检验数据,通过分析找出潜在问题,提出改善建议。 在工作总结部分,IPQC强调了实时监控生产过程,确保每个环节都符合质量标准。他们定期抽检产品,快速反馈问题,并进行异常分析与改进,防止问题重复出现。此外,IPQC还负责对新员工进行培训,提高团队协作和管理,以提升整体工作效率和质量水平。 在IPQC质量月报中,提到了质量目标的达成情况。虽然目标完成率达到了98%,但仍有2%的差距,主要是由于员工操作失误和质量监控不足造成的。为了改进,IPQC计划加强员工培训,提高操作技能,增强质量意识,并增加检查频率,以更严格地控制产品质量。 对于未来的展望,IPQC可能会进一步强化团队建设,优化工作流程,持续提升产品质量,以达到更高的客户满意度。团队发展计划可能包括更系统的员工培训、更高效的沟通机制以及更有激励性的管理策略。 这份PPT详细呈现了IPQC在确保产品质量、处理异常情况、提高团队绩效等方面的工作内容和挑战,同时也展现了IPQC团队对质量提升和团队发展的持续关注和努力。
recommend-type

关系数据表示学习

关系数据卢多维奇·多斯桑托斯引用此版本:卢多维奇·多斯桑托斯。关系数据的表示学习机器学习[cs.LG]。皮埃尔和玛丽·居里大学-巴黎第六大学,2017年。英语。NNT:2017PA066480。电话:01803188HAL ID:电话:01803188https://theses.hal.science/tel-01803188提交日期:2018年HAL是一个多学科的开放存取档案馆,用于存放和传播科学研究论文,无论它们是否被公开。论文可以来自法国或国外的教学和研究机构,也可以来自公共或私人研究中心。L’archive ouverte pluridisciplinaireUNIVERSITY PIERRE和 MARIE CURIE计算机科学、电信和电子学博士学院(巴黎)巴黎6号计算机科学实验室D八角形T HESIS关系数据表示学习作者:Ludovic DOS SAntos主管:Patrick GALLINARI联合主管:本杰明·P·伊沃瓦斯基为满足计算机科学博士学位的要求而提交的论文评审团成员:先生蒂埃里·A·退休记者先生尤尼斯·B·恩