for

4850P

圓曲線(已知兩點和半徑)座標計算程序

for

4850P

一、編制原理：

因景觀工程、房建和市政工程的曲線大多是圓曲線并且設計僅給兩端點和半徑而無曲線要

素的前提下，

利用圓曲線兩端點和半徑，基于圓心點座標數學精確解析圓弧上任意點座標。

二、程序清單：

Lbl

0:CLS:{ABCGR}:A"X1":B"Y1":C"X2":G"Y2":R

Lbl

1:J=0:I=POL(C-A,G-B):J<0=>J=J+360

△

F=J-sin

-1

(I÷

2÷

R):U=A+Rcos

(F+90):V=B+Rsin

(F+90)

Lbl

2:Cls:{LD}:L"Lp":L<0=>Goto

0

△

D"Dp":

D=0=>D=1E-45

△

Q=Abs

D÷

D:T=F-

90+(180L÷R÷π

)

N=U+Rcos

T:E=V+Rsin

T

X=N+Dcos

(T+180Q):Y=E+Dsin

(T+180Q)

O

=0:I=Pol

(A-U,B-V):J<0=>

O

=J+360:≠>

O

=J

△

P=0:I=Pol

(C-U,G-

V):J<0=>P=J+360:≠

>P=J

△

J=P-

O

:Z=Abs

RJπ÷180

:"Xp=":Int(1E3X+0.5)÷1E3:Pause

0:"Yp=":Int(1E3Y+0.5)÷1E3▲

"Xc=":Int(1E3U+0.5)÷1E3:Pause

0:"Yc=":Int(1E3V+0.5)÷1E3▲

Cls:"Lc=":Int(1E3Z+0.5)÷1E3▲

Goto

2

三、程序說明：

1

、

A"X1":B"Y1":C"X2":G"Y2"

分別為第

1

個端點

A

的

X

、

Y

座標和第

2

個端點

B

的

X

、

Y

座

標。

2

、

I

、

J

分別為兩端點

AB

連線方位角和距離。

3

、

F

為第一點切線方位角

4

、

U

、

V

分別為圓曲線的圓心座標

x

、

Y

。

總結

以上是生活随笔為你收集整理的已知圆上任意两点求圆心和半径_圆曲线(已知两点和半径)座标计算的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。