混凝土搅拌车螺旋叶片展开图的实现
intPoints1 = qz2arc1O bj.IntersectW ith
sngM ulti(3,1)= intPoints1(0) '将交点 1 坐标
D im qz1startA ngle1InR adian A s D ouble
D im qz1endA ngle1InR adian A s D ouble
摘 要:混凝土搅拌输送车的拌筒叶片设计计算复杂, 图纸绘制的工作量大。介绍了利用 A U - TO C AD VBA 开发的混凝土搅拌输送车叶片参数化设计系统螺旋叶片展开图的实现过程, 该软件 能自动完成叶片展开图的设计计算和自动绘图。
D im qz4startA ngle1InR adian A s D ouble
D im qz4endA ngle1InR adian A s D ouble
qz1line11bjendPoint(1)= sngM ulti(4,2)
斜圆锥对数螺旋线·exp (θ·sinα/tgβ)·sinα·cosθ y=ρ0·exp (θ·sinα/tgβ)·sinα·sinθ z=ρ0·exp (θ·sinα/tgβ)·sinα·cosθ ( 1)
x=ρ0·exp (θ·sinα/tgβ)·sinα-d·sinφ·cosβ y=ρ0·exp (θ·sinα/tgβ)·sinα-d·sinφ·cosβ z=ρ0·exp (θ·sinα/tgβ)·cosα-dcosβ ( 2) 式中: α — ——圆锥顶角的一半
qz3center1Point(0)= sngM ulti(1,1) '圆弧中
A ddLine(qz1line1O bjstartPoint, qz1line1O bjendPoint) 心点坐标, B 点
D im qz1line1O bj A s A cadLine D im qz1line1O bjstartPoint(0 To 2) A s
目前多数输送车拌筒叶片主要由两组旋向相 同、互错 180°的螺旋叶片组成。螺旋叶片均为直纹 螺旋面, 可设计成左旋, 也可设计成右旋。
为便于计算, 引入了计算锥的概念。计算锥是一 个假想的平行于拌筒锥面的锥面, 该锥面与叶片螺 旋面交线上各处螺旋角均相等。目前, 设计的搅拌 输送车螺旋叶片, 多采用斜圆锥对数螺旋面。它是 在式( 1) 所列斜圆锥对数螺旋线方程的基础上, 由一 条长度为 d, 与 Z 轴夹角 Φ恒为常数的空间曲线 r, 沿圆锥对数螺旋线绕 Z 轴作螺旋运动而形成的。如 图 1 所示。
D im qz4center1Point(0 To 2)A s D ouble
qz4center1Point(0)= sngM ulti(3,1) '圆弧中 坐标
Setqz1arc1O bj= ThisD raw ing.M odelSpace.
A ddA rc (qz1center1Point,qz1radius1,
混 凝 土 搅 拌 输 送 车 (以 下 简 称 输 送 车 )是 运 输 商 品混凝土的理想工具, 它广泛地适用于公路、城乡建 设、铁道、机场和水泥制品等工程的现代化施工。混 凝土搅拌输送车的拌筒叶片是实现搅拌筒功能的主 体结构, 直接影响搅拌与输送混凝土的性能, 但其设 计计算复杂, 图纸绘制的工作量大。现在叶片的设 计计算多为人工手算, 然后根据计算结果绘制叶片 螺旋线图及展开图, 一位设计人员完成这些工作往 往需要一个月的时间。针对这一情况, 我们利用 A U TO CA D V BA 软件开发了输送车叶片的参数化设 计系统。只要在该软件界面中输入搅拌车各个部分 的参数, 即能迅速自动完成叶片的设计计算及图纸 的自动绘制, 提高了设计效率和质量。下面简单介 绍拌筒叶片的计算及展开图的绘制过程。
qz1startA ngle1InR adian,qz1endA ngle1InR adian)
qz1line11bjstartPoint(1)= sngM ulti(3,2)
qz1line11bjstartPoint(2)= 0 qz1line11bjendPoint(0)= sngM ulti(4,1)
qz1startA ngle1InR adian = retA ngle1 - pi/6 '
qz1endA ngle1InR adian = retA ngle1 + pi/6
绘制叶片的过程如图 4 和图 5 所示。 以前锥叶片为例, 具体绘制程序如下:
造工艺的需要常采用近似展开法加以处理, 以满足 '绘制 " 前锥叶片展开图 1" 的子程序
制造要求。我们在设计时, 利用制图法中“ 三角形” Sub D raw Q ianzhuiY epianZ1()
D im qz3endA ngle1InR adian A s D ouble
qz3startA ngle1InR adian = retA ngle3 - pi/6
qz3endA ngle1InR adian = retA ngle3 + pi/6
设 形。制造中根据平面图形下料经锻压成型后, 焊接 多, 叶片总长度达到一定值时, 退出循环绘制。叶片
在搅拌筒体的内壁上。所以, 叶片展开成平面图的 展开图绘制流程图如图 3 所示。
qz1center1Point(0)= sngM ulti(2,1) '圆弧中心
D im qz1line1O bjendPoint(0 To 2) A s
D im sngM ulti(1 To 200,1 To 200)A s D ouble '定
D im qz3startA ngle1InR adian A s D ouble
旋 叶 片 分 前 锥 叶 片 、圆 柱 叶 片 、后 锥 叶 片 三 段 进 行
β — ——螺旋线 — ——圆锥顶到圆台小头的母线长 φ — ——空间曲线 r 与 Z 轴夹角
i — ——等分编号 据此方程, 可推导出叶片顶部和叶片根部的螺 旋线方程, 进而对螺旋线叶片的各几何尺寸进行计 算。 设计中, 将空间螺旋面叶片分段展开成平面图
Setqz3arc1O bj= ThisD raw ing.M odelSpace.
A ddA rc(qz3center1Point,qz3radius1,
qz3startA ngle1InR adian,qz3endA ngle1InR adian)
qz1line1O bjendPoint(1) = qz1y0 + B A (0)
D im qz3center1Point(0 To 2)A s D ouble
Set qz1line1O bj = ThisD raw ing.M odelSpace.

