(19)国家知识产权局 (12)发明 专利申请 (10)申请公布号 (43)申请公布日 (21)申请 号 202211046774.9 (22)申请日 2022.08.30 (71)申请人 中国建筑装饰集团有限公司 地址 100037 北京市海淀区三里河路15号 (72)发明人 任党辉　赵菅记　代晨阳　张良侠　 柳蔷　张景涛　吴仁杰　 (74)专利代理 机构 北京中建联合知识产权代理 事务所(普通 合伙) 11004 专利代理师 王灵灵 (51)Int.Cl. G06F 30/13(2020.01) G06F 30/17(2020.01) (54)发明名称 一种在CAD中根据弧长和弦长计算圆弧半径 的绘制方法 (57)摘要 本发明公开了一种在CAD中根据弧长和弦长 计算圆弧半径的绘制方法， 具体操作是推导公 式、 编写函数模块、 编写函数建立新的功能模块， 调用功能模块后输出参数进行圆弧半径的计算。 本发明通过推导公式、 编写 函数模块、 编写函数、 输入命令的操作进行圆弧半径的计算， 实现了根 据现场弧形对象快速计算出圆弧半径， 为现场提 供校核依据以及后续施工提供数据支撑， 提升施 工质量和施工效率。 权利要求书1页 说明书4页 附图2页 CN 115455529 A 2022.12.09 CN 115455529 A 1.一种在CAD中根据弧长和弦长计算圆弧半径的绘制方法， 其特 征是， 包括以下步骤： S1， 推导公式： 根据弧长与弧度、 弦长与半径之间的关系， 推导出函数关系式， 函数关系 式两侧函数的交点 为弧度值； S2， 编写ACTIVE函数模块， 用作激活函数， 包括以下流 程步骤： 将 Visual LISP 扩展功能加载到  AutoLISP， 激 活当前AutoCAD程序对象， 激 活当前文 档， 取得当前模型空间或图纸空间的集 合对象； S3， 编写hx x函数： 用于根据弧长及弦长计算圆弧半径， 包括以下流 程步骤： 步骤31， 调用ACTIVE函数模块， 激活程序并取 得相关权限； 步骤32， 关闭对象捕捉； 步骤33， 输入弧长， 取弧长的一半作为 参数； 步骤34， 输入弦长， 取弦长的一半作为 参数； 步骤35， 弦长÷弧长的值 lx作为直线的斜 率； 步骤36， 将0 ‑π之间的范围500等分， 分别作为横轴上的点sin(X)对应 的点作为正弦函 数图形的拟合 点； 步骤37， 以上述拟合 点绘制横坐标为0 到 π 范围内的正弦曲线； 步骤38， 以0点 为起点， X=10为X坐标、 10 *lx为Y坐标的点 为终点绘制直线段； 步骤39， 计算多段线和直线非零 点的交点； 步骤40， 删除多段线和直线； 步骤41， 读取点的X坐标值 为弧长对应弧度值； 步骤42， 弧长除以弧度即可计算出弧形半径； 步骤43， 打开对象捕捉； S4， 输入命令： 在CAD的命令行中输入hx x命令； S5， 输入参数： 输入弧长数值， 输入弦长数值， 得到圆弧半径。 2.根据权利要求1所述的一种在CAD中根据弧长和弦长计算圆弧半径的绘制方法， 其特 征是： 步骤S1中， 推导公式的步骤如下： 步骤11， 参照参数示意， 取弧长的一半为arc， 半径为R， 弦长的一半为L， 弧度的一半为 a， 弧长arc =R*a， 弦长L=R*si na； 步骤12， 将等 式相除得出公式： sin a=a*L/arc， 公式左右两侧函数的交点的横坐标值即 为公式成立的a值； 其中公式左边si na为正弦函数， 公式右边 为以L/arc为 斜率的一次函数。 3.根据权利要求1所述的一种在CAD中根据弧长和弦长计算圆弧半径的绘制方法， 其特 征是： 步骤36中， 将0 ‑π进行500等分得到共计501个值作为横坐标， 对应点的正弦值作为纵 坐标， 计算出对应的采样点。 4.根据权利要求1所述的一种在CAD中根据弧长和弦长计算圆弧半径的绘制方法， 其特 征是： 步骤37中， 根据采样点调用多段线命令， 拟合出正弦曲线。 5.根据权利要求1所述的一种在CAD中根据弧长和弦长计算圆弧半径的绘制方法， 其特 征是： 步骤38中， 根据斜 率绘制斜线。 6.根据权利要求1所述的一种在CAD中根据弧长和弦长计算圆弧半径的绘制方法， 其特 征是： 步骤39中， 调用交点 函数， 计算 正弦曲线和斜线的非零交点。权　利　要　求　书 1/1 页 2 CN 115455529 A 2一种在CAD中根据弧长和弦长 计算圆弧半径的绘制方 法 技术领域 [0001]本发明涉及CAD 技术领域， 具体涉及一种 在CAD中根据弧长和弦长计算圆弧半径的 绘制方法。 背景技术 [0002]建筑施工过程中会遇到大面积弧形板以及弯弧型龙骨构件， 上述构件在进行安装 时， 经常会出现弧形板在高度方向， 半径统一， 但是弯弧型材安装后与其配套的板材无法安 装的问题； 由于弯弧的半径无法直接测 量， 无法判断弧形 的半径偏差值和对后续工序的影 响， 导致在现场需要反复返工才能完成构件的安装， 极大的影响施工成本和施工周期 。 现有 施工过程中使用的计算机辅助手段无法直接根据弧长和半径绘制圆或者计算圆的半径， 需 要施工人员手动计算， 工作量大且繁琐， 并且效率低、 误差大， 本发 明提供一种在CAD中根据 弧长和弦长计算圆弧半径的绘制方法解决上述问题。 发明内容 [0003]本发明提供一种在CAD中根据 弧长和弦长计算圆弧半径的绘制 方法， 实现根据现 场测量的弧长及弦长参数， 快速计算出圆弧半径。 [0004]本发明解决上述 技术问题所采用的技 术方案是： 一种在CAD中根据弧长和弦长计算圆弧半径的绘制方法， 包括以下步骤： S1， 推导公式： 根据弧长与弧度、 弦长与半径之间的关系， 推导出函数关系式， 函数 关系式两侧函数的交点 为弧度值； S2， 编写ACTIVE函数模块， 用作激活函数， 包括以下流 程步骤： 将 Visual LISP 扩展功能加载到  AutoLISP， 激活当前Aut oCAD程序对象， 激活当 前文档， 取 得当前模型空间或图纸空间的集 合对象； S3， 编写hx x函数： 用于根据弧长及弦长计算圆弧半径， 包括以下流 程步骤： 步骤31， 调用ACTIVE函数模块， 激活程序并取 得相关权限； 步骤32， 关闭对象捕捉； 步骤33， 输入弧长， 取弧长的一半作为 参数； 步骤34， 输入弦长， 取弦长的一半作为 参数； 步骤35， 弦长÷弧长的值 lx作为直线的斜 率； 步骤36， 将0 ‑π之间的范围500等分， 分别作为横轴 上的点sin(X)对应的点作为正 弦函数图形的拟合 点； 步骤37， 以上述拟合 点绘制横坐标为0 到 π 范围内的正弦曲线； 步骤38， 以0点 为起点， X=10为X坐标、 10 *lx为Y坐标的点 为终点绘制直线段； 步骤39， 计算多段线和直线非零 点的交点； 步骤40， 删除多段线和直线； 步骤41， 读取点的X坐标值 为弧长对应弧度值；说　明　书 1/4 页 3 CN 115455529 A 3