明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1920|回复: 5

casiofx4800P程序-两线平移交点

[复制链接]
发表于 2005-1-14 16:28:00 | 显示全部楼层 |阅读模式

1.两直线交点

设有两直线L1L2,直线上的坐标分别为P1P2P3P4。交点坐标为INTP,则:

CASIO 4800P程序:

FilenameLANDL

L1:O”L1X1”P”L1Y1”Q”L1X2”R”L1Y2”U”L2X1”V”L2Y1”W”L2X2”Z”L2Y2”

L2:I=(R-P)/(Q-O)

L3: J=(Z-V)/(W-U)

L4:XINTX=(V-P+IO-JU)/(I-J)

L5:YINTY=I(X-O)+P

 楼主| 发表于 2005-1-14 16:29:00 | 显示全部楼层
本帖最后由 作者 于 2005-2-18 22:50:16 编辑

2.平移边线

设有两条直线L1L2,已知直线上点P1P2P3P4,求交点IntP,及分别向左或向右偏移后的直线交点P

其中P1P2P3P4的输入顺序不能乱,即以前进方向为准,左边偏移量为负,右边为正。

CASIO 4800P程序:

FilenameLLOFFSET

L1:Prog LANDL ――――――★此句fx4500p中不要引号

L2:E”OFFSET1 L-R+”F”OFFSET2 L-R+”

L3: Fixm ――――――★此句Fx4800P专用,fx4500p不用输入。

L4:Pol((Q-O),(R-P)

L5:J<0=>J=J+360G=J ――――――★fx4500pJ改为W输入。

L6:Pol((W-U),(Z-V))

L7:J<0=>J=J+360 H=J ――――――★fx4500pJ改为W输入

L8:K=H-G : K<-180=>K=K+360

L9:K>180=>K=K-360

L10:M=F/sinK : N=E/sinK

L11:XPX=X+NcosH+Mcos(G+180) L12:Y”PY”=Y+NsinH+Msin(G+180) ◢

 楼主| 发表于 2005-1-14 16:30:00 | 显示全部楼层

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
 楼主| 发表于 2005-1-14 16:34:00 | 显示全部楼层
由于在施工放样中经常用到,从这条线向左偏多少米,再从那条线向左偏多少米之类的问题,所以就编了这个程序。
发表于 2005-1-23 20:08:00 | 显示全部楼层
xue         xi         zhong....
发表于 2005-3-23 22:04:00 | 显示全部楼层
有交会的程序吗?朋友。谢谢
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-12-23 08:11 , Processed in 0.188100 second(s), 29 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表