汽车动力性计算图表软件

一、引言

目的

汽车工程师在做整车系统配置时,需要对动力总成、传动系统进行详细的计算校核,比较,筛选方案。动力性能的计算与分析,是一个重复计算、作图与比较的过程。本软件就是针对这一特点,来针对性的开发的,使用Microsoft Visual Basic 6.0语言编写。在汽车项目总布置整体匹配设计中可以应用此软件,对多个方案进行计算比较,可以直观的从计算图表中来判断方案的优劣,得到最合理的方案,从而减轻汽车工程师重复的计算劳动。各个功能模块实现视觉清晰,图线直观,操作方便。为汽车工程师提供很好的设计辅助,是编写本软件的初衷。

二、汽车动力性计算功能架构

2.1程序概括

软件计算功能主要有10部分内容,包括:

1.发动机特性拟合曲线;

2.汽车速度曲线;

3.汽车驱动力曲线;

4.汽车驱动力曲线-行驶阻力曲线;

5.汽车加速度曲线;

6.汽车加速时间-速度曲线;

7.汽车爬坡性能曲线;

8.汽车功率平衡图。

9.变速箱输出扭矩。

10.驱动桥输出扭矩。

2.2输入与输出

输入:

初始化界面,选择计算模式,分拟合模式与精确模式

拟合模式

发动机参数录入,需要的参数有:

发动机或车辆型号、额定功率(kW)、额定功率转速(r/min)、最大扭矩(N.M):、最大扭矩转速(r/min)。

整车参数包括:

迎风面积B*H(M^2)、空气阻力系数、车轮滚动半径(M)、主减传动比I0、满载总质量(kg)、直接档传动效率、其他档传动效率、辅件消耗(%)

变速器的各档速比。

精确模式

录入发动机的外特性参数,最好是从怠速到最高转速时的各功况参数。按发动机转速(r/min), 对应功率(kW/r/min),对应扭矩(N.m)输入。

发动机每组数据中各项参数之间以“,”隔开。

整车参数的录入与拟合模式相同。

输出:

-------------以下为计算结果信息----------------------       

计算所得最高车速:       

计算所得最大爬坡度:       

计算所得最大驱动力:         

1档最小稳定车速:         

倒车时最小稳定速度:      

计算所得最大加速度:        

驱动桥总输出扭矩可达:       

驱动桥最大滑动阻力矩:         

最小稳定车速加速至60km/h时间:

2.3计算功能结构设计

本软件的开发,整个结构的框架结构以及计算功能流程,如下图所示:

  • 2
    点赞
  • 11
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 4
    评论
汽车动力性计算 VB源代码 部分代码 Private Sub Command2_Click() '加速度曲线 Label17.Caption = "" Picture1.Cls Picture1.Scale (-12, 3)-(125, -0.3) Picture1.Line (0, 0)-(0, 2.8) Picture1.Line (0, 0)-(120, 0) For j = 1 To 100 For i = 1 To 10 Picture1.Line (0, i * 0.25)-(2, i * 0.25) '取纵坐标刻度线 Picture1.Line (i * 10, 0.04)-(i * 10, 0) '取横坐标刻度线 Picture1.Line (1.5 - j * 0.015, 2.65)-(0, 2.8) '画纵坐标箭头 Picture1.Line (-1.5 + j * 0.015, 2.65)-(0, 2.8) Picture1.Line (120, 0)-(114, 0.05 - j * 0.0005) '画横坐标箭头 Picture1.Line (120, 0)-(114, -0.05 + j * 0.0005) Picture1.CurrentX = -4: Picture1.CurrentY = -0.02: Picture1.Print 0 Picture1.CurrentX = -10: Picture1.CurrentY = i * 0.25 + 0.02: Picture1.Print i * 0.25 '读取纵坐标刻度线数值 Picture1.CurrentX = 16: Picture1.CurrentY = 2.7: Picture1.Print "a / (m/s)" Picture1.CurrentX = 10 * i - 7: Picture1.CurrentY = -0.05: Picture1.Print i * 10 '读取纵坐标刻度线数值 Picture1.CurrentX = 103: Picture1.CurrentY = -0.05: Picture1.Print "Ua/(Km / h)" Next i Next j For i = 1 To 5 Ff = 0: ft = 0: a = 0: Ua = 0 If i = 1 Then Ig = 5.56: Uamax = 0.377 * r * Nmax / (Ig * io): Uamin = 0.377 * r * Nmin / (Ig * io) If i = 2 Then Ig = 2.769: Uamax = 0.377 * r * Nmax / (Ig * io): Uamin = 0.377 * r * Nmin / (Ig * io) If i = 3 Then Ig = 1.644: Uamax = 0.377 * r * Nmax / (Ig * io): Uamin = 0.377 * r * Nmin / (Ig * io) If i = 4 Then Ig = 1: Uamax = 0.377 * r * Nmax / (Ig * io): Uamin = 0.377 * r * Nmin / (Ig * io) If i = 5 Then Ig = 0.793: Uamax = 0.377 * r * Nmax / (Ig * io): Uamin = 0.377 * r * Nmin / (Ig * io) Ff = M3 * 9.8 * f + CDA * Ua * Ua / 21.15 For Ua = Uamin To Uamax Step 0.01 n = Ua * io * Ig / (0.377 * r) tq = -19.313 + 295.27 * (n / 1000) - 165.44 * (n / 1000) ^ 2 + 40.874 * (n / 1000) ^ 3 - 3.8445 * (n / 1000) ^ 4 ft = tq * Ig * io * Nt / r δ = 1 + (Iw1 + Iw2 + Iff) / (M3 * r ^ 2) + Iff * Ig ^ 2 * io ^ 2 * Nt / (M3 * r ^ 2) a = (ft - Ff) / (M3 * δ) If a > 0 Then Picture1.PSet (Ua, a), RGB(100 + i ^ 2 * 6 - 15 * i, i ^ 2 * 15 - i * 5, i ^ 4 / 4 + 10) Next Ua Next i

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 4
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

xxlcar

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值