SINCE:2006/04/06

注1）使用は自由ですが、当プログラムが起因する如何なる　　　　　
　　 トラブル損害についても作者は一切の責任を負いません　　　　
　　 必ず、手計算との比較確認して下さいますよう、お願いします。
著作権は放棄しません。

カシオＦＸ−4800Ｐ

単曲線中間点設置計算 ver3.0

FILE　ＴＡＮ−ＸＹ

Ｘ"ＢＣ.ＫＥＸ＝":Ｙ"ＢＣ.ＫＥＹ＝":Ｊ＝"ＡＺ.ＨＯ＝”:
Ｈ"Ｒ＝":Ｅ"ＢＣ.ＫＥＴＵＩ＝":Lbl A:｛O｝:
Ｏ"ＮＯ.ＴＵＩ＝"ＥＸＥ
Ｑ＝Ｏ−Ｅ:Ｋ＝ Int Ｊ：Ｌ＝Frac Ｊ×100：
Ｍ＝Int Ｌ：Ｎ＝Frac Ｌ×100：
Ｗ＝Ｋ＋（Ｍ÷60＋Ｎ÷3600）：Ｐ＝（180÷π）×（Ｑ÷（2×Ｈ）:
Ｒ＝2×Ｈ×Sin　Ｐ:Ｈ＜0　⇒Goto 2：≠⇒Goto 3:
Lbl 2:Ａ＝Ｗ−Abs Ｐ：Ｄ＝Ａ−Abs Ｐ:Goto 4:
Lbl 3:Ａ＝Ｗ＋Ｐ:Ｄ＝Ａ＋Ｐ:Goto 4:Lbl 4:
Ｂ＝cos Ａ×Ｒ＋Ｘ:Ｃ＝sin Ａ×Ｒ＋Ｙ:
Ａ"ＰＨＯ＝"▲Ｄ"ＰＡＺ＝"▲Ｂ"ＰＸ＝"▲Ｃ"ＰＹ＝"▲
Goto A





BC.KEX=? 115.444
BC.KEY=? 144.048
AZ.HOU=? 50.5752 　　注) °′″は押さなくて良いです。BC/KEへの入射接線角
R=? 25　　　　　注)右カーブ＋左カーブ−でＲ入力
BC.KETUI=? 48.832
NO.TUI=? 55

PHO= 58.03245181 SHIFT°′″　58°01′56.83 ″BC・KEより中間点への方向角
PAZ= 65.10045917 SHIFT°′″　65°06′01.65 ″中間点の接線角
PX= 118.7013027
PY= 149.2673498

NO.TUI=? 続けて中間点の追加距離入力できます。


BC.KEX=? 100.354
BC.KEY=? 190.164
AZ.HOU=? 136.2807　　注) °′″は押さなくて良いです。BC/KEへの入射接線角
R=? -10　　　　　注)右カーブ＋左カーブ−でＲ入力
BCTUI=? 103.919
NO.TUI=? 115


PHO= 104.7238845 SHIFT°′″　104°43′25.98 ″BC.KEより中間点への方向角
PAZ= 72.97915783 SHIFT°′″　 72°58′44.97 ″中間点の接線角
PX= 97.67953523
PY= 200.3411671

単曲線中間点設置/方向杭設置　ver3.0

FILE　TAN−HABA

Ｘ"ＢＣ.ＫＥＸ＝":Ｙ"ＢＣ.ＫＥＹ＝":Ｊ＝"ＡＺ.ＨＯ＝”:
Ｈ"Ｒ＝":Ｅ"ＢＣ.ＫＥＴＵＩ＝":Lbl A｛O,F,G｝:
Ｏ"ＮＯ.ＴＵＩ＝":F"L=":G"R="ＥＸＥ
Ｑ＝Ｏ−Ｅ:Ｋ＝ Int Ｊ：Ｌ＝Frac Ｊ×100：
Ｍ＝Int Ｌ：Ｎ＝Frac Ｌ×100：
Ｗ＝Ｋ＋（Ｍ÷60＋Ｎ÷3600）：Ｐ＝（180÷π）×（Ｑ÷（2×Ｈ）:
Ｒ＝2×Ｈ×Sin　Ｐ:Ｈ＜0　⇒Goto 2：≠⇒Goto 3:
Lbl 2:Ａ＝Ｗ−Abs Ｐ：Ｄ＝Ａ−Abs Ｐ:Goto 4:
Lbl 3:Ａ＝Ｗ＋Ｐ:Ｄ＝Ａ＋Ｐ:Goto 4:Lbl 4:
Ｂ＝cos Ａ×Ｒ＋Ｘ:Ｃ＝sin Ａ×Ｒ＋Ｙ:
A＞360⇒A＝A−360:GOTO 5:≠⇒A＝A:Lbl 5:
A"ＰＨＯ＝"▲
D＞360⇒D＝D−360:GOTO 6:≠⇒D＝D:Lbl 6:
D"ＰＡＺ＝"▲Ｂ"ＰＸ＝"▲Ｃ"ＰＹ＝"▲
I=D+270:V=D+90:
Z［10］=B+((cos V)×G):
Z［11］=C+((sin V)×G):
Z［12］=B+((cos I)×F):
Z［13］=C+((sin I)×F):
Z［12］"P.LX="▲Z［13］"P.LY="▲
Z［10］"P.RX="▲Z［11］"P.RX="▲
GOTO A



BC.KEX=? 115.444
BC.KEY=? 144.048
AZ.HOU=? 50.5752 　　注) °′″は押さなくて良いです。BC/KEへの入射接線角
R=? 25　　　　　注)右カーブ＋左カーブ−でＲ入力
BC.KETUI=? 48.832
NO.TUI=? 55
L=? 20
R=? 20

PHO= 58.03245181 SHIFT°′″　58°01′56.83 ″BC・KEより中間点への方向角
PAZ= 65.10045917 SHIFT°′″　65°06′01.65 ″中間点の接線角
PX= 118.7013027
PY= 149.2673498
P.LX= 136.8422505
P.LY= 140.8467789
P.RX= 100.5603549
P.RY= 157.6879207

NO.TUI=? 続けて入力できます。
L=?
R=?



BC.KEX=? 100.354
BC.KEY=? 190.164
AZ.HOU=? 136.2807　　注) °′″は押さなくて良いです。BC/KEへの入射接線角
R=? -10　　　　　注)右カーブ＋左カーブ−でＲ入力
BCTUI=? 103.919
NO.TUI=? 115
L=? 20
R=? 20

PHO= 104.7238845 SHIFT°′″　104°43′25.98 ″BC.KEより中間点への方向角
PAZ= 72.97915783 SHIFT°′″　 72°58′44.97 ″中間点の接線角
PX= 97.67953523
PY= 200.3411671
P.LX= 116.803502
P.LY= 194.486776
P.RX= 78.55556846
P.RY= 206.1955582

NO.TUI=? 続けて入力できます。
L=?
R=?
放射状逆計算 Ver3.0

打設点を連続に入力出来るように更新しました。

M"BS.X=":T"BS.Y=":O"KI.X=":P"XI.Y="EXE
Z[20]=O-M:Z[21]=P-T:Pol(Z[20],Z[21]):
Fixm：J：Fixm：I：J≧0⇒L=J:Goto 0:
≠⇒L=J+360:Lbl 0:L"BS-KIHO="▲
I"BS-KI.S="▲
Lbl A:｛S,K｝:S"PX=":K"PY=":
Z[20]=S-O:Z[21]=K-P:
Pol(Z[20],Z[21]):Fixm：J：Fixm：I：
J≧0⇒Z[22]=J:Goto 1:≠⇒Z[22]=J+360:
Lbl 1:Z[23]=I:Z[23]"P.S="▲
Z[22]"P.HO="▲Z[24]=(Z[22]+180)-L:
Z[24]"P.KYO="▲
Goto A


BS.X=? 447.866 後視点X座標入力
BS.Y=? 186.874 後視点Y座標入力
KI.X=? 464.205 器械設置X座標
XI.X=? 177.441　　 器械設置Y座標


B-KIHO= 330.0008575 330°00′03.09″ 後視点より器械点への入射角
B-KI.S= 18.86648907 　　　　　　　　後視点より器械点への距離


PX=? 498.846 打設点X座標入力
PY=? 157.441 打設点Y座標入力
P.S= 39.99998601　　　　　　　　　　 器械点から打設点までの距離
P.HO= 329.9999884 329°59′59.96″ 器械点から打設点への方向角
P.KYO= 179.9991309 179°59′56.87″ 器械点から打設点への夾角

PX=? 524.281 打設点X座標入力
PY=? 142.756 打設点Y座標入力
P.S= 69.36984216　　　　　　　　　 器械点から打設点までの距離
P.HO= 329.9999247 329°59′59.73″ 器械点から打設点への方向角
P.KYO= 179.9990672 179°59′56.64″ 器械点から打設点への夾角




杭打ち計算
ＦＩＬＥ　ＳＴ

S "BACKTEN−X＝"：T "BACKTEN−Y＝"
：C "KIKAI−X＝"：D "KIKAI−Y＝"　
: A "DASETU−X＝"：B "DASETU−Y＝" ＥＸＥ
Ｅ＝C−S：Ｆ＝D−T：Ｐｏｌ（Ｅ，Ｆ）：
Fixm：Ｊ：Fixm：Ｉ：Ｊ≧0⇒L＝Ｊ ：Ｇｏｔｏ　2：≠⇒L＝J＋360：
Ｌｂｌ　2：L "NYUSYAKAKU＝"▲
Ｅ＝Ａ−Ｃ：Ｆ＝Ｂ−Ｄ：Ｐｏｌ　（Ｅ，Ｆ）
：Fixm：Ｊ：Fixm：Ｉ：Ｊ≧0⇒Ｋ＝Ｊ ：Ｇｏｔｏ　1
：≠⇒Ｋ＝Ｊ＋360：Ｌｂｌ　1：Ｉ　"Ｓ＝" ▲
Ｋ"ＨＯ．ＫＡＫＵ＝"▲
Ｈ＝（Ｋ＋１８０）−Ｌ
：Ｈ"ＫＹＯＵＫＡＫＵ＝" ▲



直角三角形計算

ＦＩＬＥ　ＳＡ　

Ｅ"Ｘ＝" ： Ｆ"Ｙ＝" ： Ｇ"Ｚ＝"： Ｃ"ＫＡ＝" ： W"ＫＡ.Z0×10"ＥＸＥ
W=0⇒Ｇｏｔｏ　1：≠⇒Ｍ＝Ｉｎｔ　C：Ｎ＝Ｆｒａｃ　C×100
:Ｏ＝Ｉｎｔ　Ｎ：Ｐ＝Ｆｒａｃ　Ｎ×100：Q＝Ｍ＋（Ｏ÷60＋Ｐ÷3600）
：E=0⇒Ｇｏｔｏ　4：≠⇒F=0⇒Ｇｏｔｏ　5：≠⇒G=0⇒Ｇｏｔｏ　8
：Ｌｂｌ 4:X＝√（Ｇ＾２−Ｆ＾２）：Ｘ"Ｘ＝"　▲Ｇｏｔｏ　7
：Ｌｂｌ 5:Ｙ＝√（Ｇ＾２−Ｅ＾２）：Ｙ"Ｙ＝"　▲
Ｌｂｌ 7：Ｈ＝Ｓｉｎ−１（Ｆ÷Ｇ）：Ｈ"ＹＺＡ＝"　▲
Ｉ＝Ｃｏｓ−１（Ｅ÷Ｇ）：Ｉ"ＸＺＡ＝"　▲
Ｊ＝ｔａｎ−１（Ｆ÷Ｅ）：Ｊ"ＹＸＡ＝"　▲Ｌｂｌ　1
:Ｍ＝Ｉｎｔ　C：Ｎ＝Ｆｒａｃ　C×100
:Ｏ＝Ｉｎｔ　Ｎ：Ｐ＝Ｆｒａｃ　Ｎ×100
：Q＝Ｍ＋（Ｏ÷60＋Ｐ÷3600）
:Ｒ＝Ｓｉｎ　Ｑ×Ｇ：Ｒ"ＹＹ＝"　▲
Ｓ＝Ｃｏｓ　Ｑ×Ｇ：Ｓ"ＸＸ＝"　▲Ｌｂｌ　8
：Ｔ＝√（Ｅ＾２＋Ｆ＾２）：Ｔ"Ｚ＝"　▲
Ｖ＝ｔａｎ−１（Ｆ÷Ｅ）：Ｆ＜0⇒Ｇｏｔｏ　3
：≠⇒Ｖ"ＫＡ＝"　▲Ｌｂｌ　3
：Ｓ＝Ｖ+360：Ｓ"ＫＡ＝"　▲

下記の記号に注意
E=0⇒Ｇｏｔｏ　4：≠⇒F=0⇒Ｇｏｔｏ　5：≠⇒G=0⇒Ｇｏｔｏ　8
=はファンクションキーの条件ジャンプ記号使って下さい。
１辺２角既知計算
ＦＩＬＥ　１Ｈ２Ｋ　

Ａ "ＡＫ＝" ： Ｃ"ＣＫ＝" ： Ｂ"ＢＬ＝" ＥＸＥ　
Ｍ＝Ｉｎｔ　Ａ：Ｎ＝Ｆｒａｃ　Ａ×100：Ｏ＝Ｉｎｔ　Ｎ
：Ｐ＝Ｆｒａｃ　Ｎ×１００：Ｑ＝Ｍ＋（Ｏ÷60＋Ｐ÷3600）
：Ｒ＝Ｉｎｔ　Ｃ：Ｓ＝Ｆｒａｃ　Ｃ×100：Ｔ＝Ｉｎｔ　Ｓ
：Ｕ＝Ｆｒａｃ　Ｓ×１００：Ｖ＝Ｒ＋（Ｔ÷60＋Ｕ÷3600）
：Ｄ＝１÷ｔａｎ　Ｑ：Ｅ＝１÷ｔａｎ　Ｖ：Ｈ＝Ｂ÷（Ｄ＋Ｅ）
：Ｈ＝"Ｈ＝"　▲Ｘ＝Ｈ×Ｄ：Ｙ＝Ｈ×Ｅ
：Ｘ"Ｘ１＝"　▲Ｙ"Ｘ２＝"　▲Ｆ＝√（Ｈ＾２＋Ｘ＾２）
：Ｇ＝√（Ｈ＾２＋Ｙ＾２）：Ｇ"ＡＬ＝"　▲Ｆ"ＣＬ＝"　▲

３辺既知（内角・面積）計算

ＦＩＬＥ　３Ｔ

Ａ "Ａ＝"：Ｂ "Ｂ＝"：Ｃ "Ｃ＝"　ＥＸＥ
Ｄ＝（Ｂ＾２＋Ｃ＾２−Ａ＾２）÷（２×Ｂ×Ｃ）
：Ｅ＝Ｃｏｓ−１　Ｄ
：Ｅ＝"ＡＫ＝"　▲Ｆ＝Ｂ×（Ｓｉｎ　Ｅ÷Ａ）
：Ｇ＝Ｓｉｎ−１　Ｆ
：Ｇ"ＢＫ＝"　▲Ｈ＝Ｃ×（Ｓｉｎ　Ｇ÷Ｂ）
：Ｉ＝Ｓｉｎ−１　Ｈ
：Ｉ"ＣＫ＝"　▲Ｊ＝（Ａ＋Ｂ＋Ｃ）÷２
：Ｋ＝√（Ｊ×（Ｊ−Ａ）×（Ｊ−Ｂ）×（Ｊ−Ｃ）
：Ｋ"Ｓ＝"　▲


開放トラバース計算

ＦＩＬＥ　ＫＡＩ　

Ｌ"ＨＯ＝" ： Ｘ"Ｘ＝" ： Ｙ"Ｙ＝" ＥＸＥ　　
Ｍ＝Ｉｎｔ　L：Ｎ＝Ｆｒａｃ　L×100：Ｏ＝Ｉｎｔ　Ｎ
：Ｐ＝Ｆｒａｃ　Ｎ×１００：Ａ＝Ｍ＋（Ｏ÷60＋Ｐ÷3600）
：Ｑ"ＫＡ＝"：Ｃ"Ｓ＝"ＥＸＥ
Ｒ＝Ｉｎｔ　Ｑ：Ｓ＝Ｆｒａｃ　Ｑ×100：Ｔ＝Ｉｎｔ　Ｓ
：Ｖ＝Ｆｒａｃ　Ｓ×１００：Ｂ＝Ｒ＋（Ｔ÷60＋Ｖ÷3600）
：Ｌ＝Ｂ＋Ａ＋１８０：Ｘ＝Ｘ＋Ｃ×ＣＯＳ　Ｌ
：Ｙ＝Ｙ＋Ｃ×ＳＩＮ　Ｌ
：Ｘ"ＰＸ＝"　▲Ｙ"ＰＹ＝"　▲
Ｌ≧３６０⇒Ｌ＝Ｌ−３６０：Ｇｏｔｏ　２：≠⇒Ｌ＝Ｌ
：Ｌｂｌ　２：Ｌ≧３６０⇒Ｌ＝Ｌ−３６０：Ｇｏｔｏ　３：≠⇒Ｌ＝Ｌ
：Ｌｂｌ　３
：Ｅ＝Ｉｎｔ　Ｌ：Ｆ＝Ｉｎｔ（（Ｌ−Ｅ）×６０）
：Ｇ＝Ｌ−Ｅ−（Ｆ÷６０）：Ｈ＝Ｉｎｔ（Ｇ×３６００）
：Ｌ＝Ｅ＋（Ｆ÷１００）＋（Ｈ÷１００００）



器械自由設置

ＦＩＬＥ　XY/SE　

Ａ "ＨＳ＝" ： Ｂ "ＭＳ＝" ： L "MA＝" ＥＸＥ　　
Ｍ＝Ｉｎｔ　L：Ｎ＝Ｆｒａｃ　L×100：Ｏ＝Ｉｎｔ　Ｎ
：Ｐ＝Ｆｒａｃ　Ｎ×１００：Ｑ＝Ｍ＋（Ｏ÷60＋Ｐ÷3600）
：Ｚ=Ａ^2＋Ｂ^2−２×Ａ×Ｂ×ＣＯＳ　Ｑ　
：Ｃ＝√Ｚ
：Ｗ＝（Ｂ＾２＋Ｃ＾２−Ａ＾２）÷２÷Ｂ÷Ｃ
：Ｄ＝ＣＯＳ-1　Ｗ
：Ｇ "ＭＸ＝" ： Ｈ"MＹ＝" ： Ｓ"ＨＸ＝"： Ｒ"ＨＹ＝" ＥＸＥ
Ｅ＝Ｇ−Ｓ：Ｆ＝Ｈ−Ｒ：
Ｐｏｌ（Ｅ，Ｆ）：Fixm：Ｊ：Fixm：Ｉ：Ｊ≧0⇒Ｋ＝Ｊ：Ｇｏｔｏ　1：≠⇒Ｋ＝Ｊ＋360
：Ｌｂｌ　1：Ｖ＝（３６０−Ｄ）＋Ｋ＋１８０
：X＝G＋B×（COS　Ｖ）
：Ｙ＝Ｈ＋B×（ＳＩＮ　Ｖ）
：Ｘ"ＰＸ＝"　▲Ｙ"ＰＹ＝"　▲Ｉ"Ｈ−ＭＳ＝"　▲


楕円計算

ＦＩＬＥ　DA　

Ａ"YOKO＝"：Ｂ"TATE＝"ＥＸＥ
Ｌｂｌ 1:{X}：D＝√(((B^2−((B^2×Ｘ^2)÷A^2)))
:Ｄ"Ｙ＝"▲Ｇｏｔｏ　1


二直線平行移動付四点交点計算


ＦＩＬＥ　４ＴＥＮ　
Ｌｂｌ　0：Ａ"Ｘ１＝"：Ｂ"Ｙ１＝"：Ｃ"Ｘ２＝"：Ｄ"Ｙ２＝"　
：Ｅ"Ｘ３＝"：Ｆ"Ｙ３＝"：Ｇ"Ｘ４＝"：Ｈ"Ｙ４＝"
Ｍ"１−２Ｗ＝"：Ｌ"３−４Ｗ＝"ＥＸＥ　
J＝tan-1((B−D)÷（Ａ−Ｃ））：Ｊ≧0⇒Ｋ＝Ｊ
：Ｇｏｔｏ　1：≠⇒Ｋ＝Ｊ＋360：Ｌｂｌ　1：
Ｋ"１−２ＨＯ＝"▲
Ｎ＝Ａ＋（Ｍ×（cos（Ｋ＋１８０＋９０＋１８０）：
Ｖ＝Ｂ＋（Ｍ×（sin（Ｋ＋１８０＋９０＋１８０）：
Ｗ＝Ｃ＋（Ｍ×（cos（Ｋ＋２７０＋１８０）：
Ｘ＝Ｄ＋（Ｍ×（sin（Ｋ＋２７０＋１８０）：
Ｉ＝tan-1((Ｆ−Ｈ)÷（Ｅ−Ｇ））：Ｉ≧0⇒Ｋ＝Ｉ
：Ｇｏｔｏ　２：≠⇒Ｋ＝Ｉ＋360：Ｌｂｌ　２：
Ｋ"３−４ＨＯ＝"▲
Ｙ＝Ｅ＋（Ｌ×（cos（Ｋ＋１８０＋９０＋１８０）：
Ｚ＝Ｆ＋（Ｌ×（sin（Ｋ＋１８０＋９０＋１８０）：
Ｏ＝Ｇ＋（Ｌ×（cos（Ｋ＋２７０＋１８０）：
Ｐ＝Ｈ＋（Ｌ×（sin（Ｋ＋２７０＋１８０）：
Ｓ＝（Ｘ−Ｖ）÷（Ｗ−Ｎ）：Ｑ＝（Ｐ−Ｚ）÷（Ｏ−Ｐ）：
Ｒ＝Ｑ×Ｙ−Ｓ×Ｎ＋Ｖ−Ｚ：Ｔ＝Ｒ÷（Ｑ−Ｓ）：
Ｕ＝Ｓ×（Ｔ−Ｎ）＋Ｖ：
Ｔ"ＰＹ＝"　▲Ｕ"ＰＹ＝"　▲Ｇｏｔｏ　0

交点座標　２点２方向計算

ＦＩＬＥ　２Ｔ２ＨＯ
Ｌｂｌ　0：Ａ　"Ｘ１＝"：Ｂ　"Ｙ１＝"：Ｃ　"ＫＡ１＝"：
Ｄ"Ｘ２＝"：Ｅ"Ｙ２＝"：Ｆ"ＫＡ２＝"ＥＸＥ
Ｘ＝Ｆｒａｃ　Ｃ×１００：
Ｙ＝Ｉｎｔ　Ｃ＋（Ｉｎｔ　Ｘ÷６０＋Ｆｒａｃ　Ｘ÷３６）：
Ｇ＝ｔａｎＹ：Ｖ＝Ｆｒａｃ　Ｆ×１００：
W＝Ｉｎｔ　Ｆ＋（Ｉｎｔ　Ｖ÷６０＋Ｆｒａｃ　Ｖ÷３６）：
H＝tan　Ｗ：Ｊ＝（（（Ｈ×Ｄ−（Ｇ×Ａ）＋（Ｂ−Ｅ）））÷（Ｈ−Ｇ）：
Ｋ＝Ｇ×（Ｊ−Ａ）＋Ｂ：Ｊ”ＰＸ＝”▲Ｋ”ＰＹ＝”▲ＧＯＴＯ　０

�@交点座標　３点１方向計算（方向角）
ＦＩＬＥ　３Ｔ１ＨＯ
Ｌｂｌ　0：Ａ"Ｘ１＝"：Ｂ"Ｙ１＝"：Ｄ"Ｘ２＝"：Ｅ"Ｙ２＝"：
Ｊ"Ｘ３＝"：Ｋ"Ｙ３＝"：Ｃ"ＫＡ＝"ＥＸＥ
Ｆ＝（Ｅ−Ｂ）÷（Ｄ−Ａ）：
Ｘ＝Ｆｒａｃ　Ｃ×１００：
Ｙ＝Ｉｎｔ　Ｃ＋（Ｉｎｔ　Ｘ÷６０＋Ｆｒａｃ　Ｘ÷３６）：
Ｇ＝ｔａｎＹ：Ｈ＝（（（Ｇ×Ｊ）−（Ｆ×Ａ）＋（Ｂ−Ｋ）））
÷（Ｇ−Ｆ）：Ｉ＝Ｆ×（Ｈ−Ａ）＋Ｂ：
Ｈ"ＰＸ＝"▲Ｉ"ＰＹ＝"▲ＧＯＴＯ　０

�A交点座標　３点１方向計算（測角）
ＦＩＬＥ　３Ｔ１ＨＯ(SO)
Ｌｂｌ　0：Ａ"ＫＸ＝"：Ｂ"ＫＹ＝"：Ｃ"ＢＸ＝"：Ｄ"ＢＹ＝"：
Ｅ"ＳＯ＝"：Ｆ"Ｘ１＝"：Ｇ"Ｙ１＝"：Ｈ"Ｘ２＝"：Ｎ"Ｙ２＝"ＥＸＥ
Ｐｏｌ（（Ａ−Ｃ），（Ｂ−Ｄ））：Ｊ≧0⇒Ｋ＝Ｊ：Ｇｏｔｏ　1：
≠⇒Ｋ＝Ｊ＋360：Ｌｂｌ　1：Ｉ　"Ｋ−ＢＳ＝" ▲
Ｋ"Ｂ−ＫＨＯ＝"▲
Ｏ＝Ｆｒａｃ　Ｅ×１００：
Ｓ＝Ｉｎｔ　Ｅ＋（Ｉｎｔ　Ｏ÷６０＋Ｆｒａｃ　Ｏ÷３６）：
Ｐ＝Ｋ＋Ｓ＋１８０：Ｐ≧３６０⇒Ｐ＝Ｐ−３６０：Ｇｏｔｏ　２
：≠⇒Ｐ＝Ｐ：Ｌｂｌ　２：Ｑ＝（Ｎ−Ｇ）÷（Ｈ−Ｆ）：
Ｒ＝ｔａｎＰ：Ｔ＝（（（Ｒ×Ａ）−（Ｑ×Ｆ）＋（Ｇ−Ｂ）））
÷（Ｒ−Ｑ）：Ｖ＝Ｑ×（Ｔ−Ｆ）＋Ｇ：
Ｔ"ＰＸ＝"▲Ｖ"ＰＹ＝"▲ＧＯＴＯ　０

単曲線中間点設置計算 ver2.0

FILE　ＴＡＮ−ＸＹ

Ｘ"ＢＣＸ＝":Ｙ"ＢＣＹ＝":Ｊ＝"ＨＯＵ0-1＝”:
Ｈ"Ｒ＝":Ｅ"ＢＣＴＵＩ＝":Ｏ"ＮＯ．ＴＵＩ＝"ＥＸＥ
Ｑ＝Ｏ−Ｅ:Ｋ＝ Int Ｊ：Ｌ＝Frac Ｊ×100：
Ｍ＝Int Ｌ：Ｎ＝Frac Ｌ×100：
Ｗ＝Ｋ＋（Ｍ÷60＋Ｎ÷3600）：Ｐ＝（180÷π）×（Ｑ÷（2×Ｈ）:
Ｒ＝2×Ｈ×Sin　Ｐ:Ｈ＜0　⇒Goto 2：≠⇒：Goto 3:
Lbl 2:Ａ＝Ｗ−Abs Ｐ：Ｄ＝Ａ−Abs Ｐ:Goto 4:
Lbl 3:Ａ＝Ｗ＋Ｐ:Ｄ＝Ａ＋Ｐ:Goto 4:Lbl 4:
Ｂ＝cos Ａ×Ｒ＋Ｘ:Ｃ＝sin Ａ×Ｒ＋Ｙ:
Ａ"ＰＨＯ＝"▲Ｄ"ＰＡＺ＝"▲Ｂ"ＰＸ＝"▲Ｃ"ＰＹ＝"▲


単曲線要素計算
ＦＩＬＥ　ＴＡＮ−ＹＯＵ
Ｌｂｌ　0：Ａ　"ＩＡ＝"：Ｂ　"Ｒ＝"　ＥＸＥ　Ｍ＝Ｉｎｔ　Ａ：Ｎ＝
Ｆｒａｃ　Ａ×100：Ｏ＝Ｉｎｔ　Ｎ：Ｐ＝Ｆｒａｃ　Ｎ×100：Ｃ＝
Ｍ＋（Ｏ÷60＋Ｐ÷3600）：Ｄ＝Ｃ÷2：Ｅ＝Ｂ×（Ｔａｎ　Ｄ）：Ｆ＝
（π÷180）×Ｂ×Ｃ：Ｇ＝Ｃｏｓ　Ｄ
：Ｈ＝（（1÷Ｇ）−1）×Ｂ：Ｅ　"ＴＬ＝"　▲　Ｆ　"ＣＬ＝"　▲　
Ｈ"ＳＬ＝"　▲Ｇｏｔｏ　0

2円の交点計算
ＦＩＬＥ　2ＥＮ−ＫＯＵＴＥＮ
Ｌｂｌ　0：Ａ　"1−Ｘ"：Ｂ　"1−Ｙ"：Ｃ　"2−Ｘ"：Ｄ　"2−Ｙ" ＥＸＥ　
Ｅ＝Ｃ−Ａ：Ｆ＝Ｄ−Ｂ：Ｉ＝√（Ｅ＾2＋Ｆ＾2）：Ｋ＝Ｔａｎ-1　
（Ｆ÷Ｅ）：Ｌ　"1−Ｒ"：Ｍ　"2−Ｒ" ＥＸＥ
Ｚ＝Ｌ＾2＋Ｉ＾2-Ｍ＾2：Ｔ＝Ｚ÷（2×Ｌ×Ｉ）：Ｎ＝Ｃｏｓ-1　Ｔ：Ｓ　
"Ｒ0−Ｌ1" ＥＸＥ
Ｓ＝0⇒Ｇｏｔｏ　5：≠⇒Ｇｏｔｏ　4：Ｌｂｌ　5：Ｏ＝Ｌ×Ｃｏｓ　
（Ｋ＋Ｎ）＋Ａ：
Ｐ＝Ｌ×Ｓｉｎ（Ｋ＋Ｎ）＋Ｂ：Ｏ　"ＲＰＸ＝" ▲Ｐ"ＲＰＹ＝" ▲
Ｇｏｔｏ　0：Ｌｂｌ　4
：Ｑ＝Ｌ×Ｃｏｓ（Ｋ−Ｎ）＋Ａ：Ｒ＝Ｌ×Ｓｉｎ（Ｋ−Ｎ）＋Ｂ：Ｑ　
"ＬＰＸ＝" ▲Ｒ　"ＬＰＹ＝" ▲Ｇｏｔｏ　0
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
線上点座標計算
ＦＩＬＥ　ＳＥＮＪＹＹＵＴＥＮ
Ｌｂｌ　0：Ａ"Ｘ−1＝"：Ｂ"Ｙ−1＝"：Ｃ"Ｘ−2＝"：Ｄ"Ｙ−2＝"：
Ｅ＝Ｃ−Ａ：Ｆ＝Ｄ−Ｂ：Ｐｏｌ　（Ｅ，Ｆ）：Ｊ≧0⇒Ｈ＝Ｊ：
Ｇｏｔｏ　1：≠⇒Ｈ＝Ｊ＋360
：Ｌｂｌ　1：Ｋ　"Ｍ＋Ｌ＝"　ＥＸＥ　Ｈ"ＨＯＵ"　▲Ｘ＝Ｋ×Ｃｏｓ　Ｈ
＋Ａ：Ｘ"ＰＸ＝"▲Ｙ＝Ｋ×Ｓｉｎ　Ｈ＋Ｂ：Ｙ"ＰＹ＝▲Ｇｏｔｏ　0


幅杭設置計算
ＦＩＬＥ　ＨＡＢＡ　Ｌ−Ｒ
Ｌｂｌ　0：Ａ"ＣＥ．Ｘ＝"：Ｂ"ＣＥ．Ｙ＝"：Ｃ"ＡＺ＝"：Ｄ"Ｒ0−Ｌ1"　
ＥＸＥ Ｍ＝Ｉｎｔ　Ｃ：Ｎ＝Ｆｒａｃ　Ｃ×100：Ｏ＝Ｉｎｔ　Ｎ：Ｐ＝
Ｆｒａｃ　Ｎ×100：Ｅ＝Ｍ＋（Ｏ÷60＋Ｐ÷3600）：Ｆ＝Ｅ−90：Ｇ＝
Ｅ＋90：Ｄ＝0⇒Ｇｏｔｏ　2：≠⇒Ｇｏｔｏ　1：Ｌｂｌ　2：Ｈ"Ｒ．Ｓ＝"　
ＥＸＥ　Ｉ＝Ａ＋（（Ｃｏｓ　Ｇ）×Ｈ）
：Ｉ"ＲＸ＝" ▲Ｊ＝Ｂ＋（（Ｓｉｎ　Ｇ）×Ｈ）：Ｊ　"ＲＹ＝" ▲
Ｇｏｔｏ　0　：Ｌｂｌ　1　：
Ｈ"Ｌ．Ｓ＝"　ＥＸＥ　Ｉ＝Ａ＋（（Ｃｏｓ　Ｆ×Ｈ）：I　"ＬＸ＝" ▲
Ｊ＝Ｂ＋（（ＳｉｎＦ）×Ｈ）：Ｊ　"ＬＹ＝" ▲Ｇｏｔｏ　0


杭打計算
ＦＩＬＥ　ＳＴ　ＫＥＩＳＡＮ
Ｌｂｌ　0：Ａ　"ＫＵＩ−Ｘ＝"：Ｂ　"ＫＵＩ−Ｙ＝"Ｃ：　
"ＫＩＫ−Ｘ＝"：Ｄ
"ＫＩＫ−Ｙ＝"　ＥＸＥ　Ｅ＝Ａ−Ｃ：Ｆ＝Ｂ−Ｄ：Ｐｏｌ　
（Ｅ，Ｆ）：Fixm：Ｊ：Fixm：Ｉ：Ｊ≧0⇒Ｋ＝Ｊ
：Ｇｏｔｏ　1：≠⇒Ｋ＝Ｊ＋360：Ｌｂｌ　1：Ｉ　"Ｓ＝" ▲
Ｋ"ＨＯ．ＫＡＫＵ＝"▲
Ｌ"ＮＹＵ．ＨＯ＝"　ＥＸＥ　Ｍ＝Ｉｎｔ　Ｌ：Ｎ＝Ｆｒａｃ　
Ｌ×100：Ｏ＝Ｉｎｔ　Ｎ：
Ｐ＝Ｆｒａｃ　Ｎ×100：Ｑ＝Ｍ＋（Ｏ÷60＋Ｐ÷3600）：Ｈ＝
（Ｋ＋180）−Ｑ：
Ｈ"ＫＹＯＵＫＡＫＵ＝" ▲Ｇｏｔｏ　0


縦断曲線計算
ＦＩＬＥ　ＪＹＵＫＹＯＫＵ
Ｌｂｌ　0：Ａ　"ＫＯＵＢＡＩ−1"：Ｂ　"ＫＯＵＢＡＩ−2"：Ｃ　"Ｓ＝"：
Ｄ　"ＶＣＬ＝"ＥＸＥ
Ｅ＝（（Ｃ＾2×（Ｂ−Ａ）：Ｆ＝Ｅ÷（200×Ｄ）：Ｆ　"Ｙ＝" ▲Ｇｏｔｏ　0


水準計算
ＦＩＬＥ　ＳＷＩＪＹＵＮ
Ａ　"Ｈ＝"：Ｂ　"ＢＳ＝"　ＥＸＥ　Ｃ＝Ａ＋Ｂ：Ｃ　"ＩＨ＝" ▲
Ｌｂｌ　0：｛Ｅ｝：Ｅ
"ＦＳ＝"　ＥＸＥ　Ｆ＝Ｃ−Ｅ：Ｆ　"Ｈ＝" ▲Ｇｏｔｏ　0


垂線計算
ＦＩＬＥ　ＳＵＩＳＥＮ
Ｌｂｌ　0：Ａ　"Ｓ＝"：Ｌ　"ＫＡＫＵ＝"　ＥＸＥ　Ｍ＝Ｉｎｔ　Ｌ
：Ｎ＝Ｆｒａｃ　Ｌ×100：Ｏ＝
Ｉｎｔ　Ｎ：Ｐ＝Ｆｒａｃ　Ｎ×100：Ｂ＝Ｍ＋（Ｏ÷60＋Ｐ÷3600）：
Ｒｅｃ　（Ａ，Ｂ）：Ｉ　"Ｓ＝" ▲
Ｊ　"ＳＵＩ＝" ▲Ｃ　"ＲＯＳＥＮ＋"：Ｄ　"ＳＵＩ"　ＥＸＥ
　Ｐｏｌ　（Ｃ，Ｄ）：Ｄ＜０⇒Ｋ＝Ｊ＋360：Ｇｏｔｏ　1：≠⇒Ｋ＝
Ｊ：Ｌｂｌ　1：Ｉ　"Ｓ＝" ▲Ｋ　"ＫＡＫＵ" ▲Ｇｏｔｏ　0

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
放射計算
ＦＩＬＥ　ＨＯＵＳＹＡ
Ｌｂｌ　0：Ａ　"Ｘ＝"：Ｂ　"Ｙ＝"：Ｃ　"ＨＯＵ＝"：Ｄ　
"ＫＹＵＫＡＫＵ＝"：Ｅ　"Ｓ＝"　ＥＸＥ
Ｍ＝Ｉｎｔ　Ｃ：Ｎ＝Ｆｒａｃ　Ｃ×100：Ｏ＝Ｉｎｔ　Ｎ：Ｐ＝Ｆｒａｃ　
Ｎ×１００：Ｆ＝Ｍ＋（Ｏ÷60＋Ｐ÷3600）：Ｍ＝Ｉｎｔ　Ｄ：
Ｎ＝Ｆｒａｃ　Ｄ×100：Ｏ＝Ｉｎｔ　Ｎ：Ｐ＝Ｆｒａｃ　Ｎ×100：
Ｇ＝Ｍ＋（Ｏ÷60＋Ｐ÷3600）
：Ｈ＝Ｆ＋Ｇ＋180：Ｈ≧360⇒Ｈ＝Ｈ−360：Ｇｏｔｏ　2：≠⇒Ｈ＝
Ｈ：Ｌｂｌ　2：Ｈ　"ＨＯＵＫＯＵＫＡＫＵ" ▲Ｘ＝Ａ＋Ｅ×Ｃｏｓ　Ｈ
：Ｘ　"ＰＸ＝" ▲Ｙ＝Ｂ＋Ｅ×Ｓｉｎ　Ｈ：Ｙ　"ＰＹ＝" ▲Ｇｏｔｏ　0


（勾配　ＳＬでＷ．Ｈ）　（勾配　ＨでＳＬ）算出計算
ＦＩＬＥ　ＳＬ−Ｗ．Ｈ　Ｈ−ＳＬ
Ｌｂｌ　0：Ｚ　"ＳＬ−ＷＨ．0Ｈ−ＳＬ1"　ＥＸＥ　Ｚ＝0⇒Ａ　"1：＝"
：Ｂ　"ＳＬ＝"　ＥＸＥ
Ｃ＝√（1＾2＋Ａ＾2）：Ｄ＝（1×Ｂ）÷Ｃ：Ｅ＝（Ａ×Ｂ）÷Ｃ：
Ｄ　"Ｈ＝" ▲Ｅ　"Ｗ＝" ▲Ｇｏｔｏ　0：≠⇒Ａ　"1：　＝"：Ｂ　"Ｈ＝"　
ＥＸＥ Ｃ＝√（1＾2＋Ａ＾2）：Ｄ＝Ｃ×Ｂ：Ｄ　"ＳＬ＝" ▲Ｇｏｔｏ　0

　　　　　　　　　　　　　　　　　　　　　　　　　　
ＦＸ-4800Ｐ使用説明書

単曲線中間点設置計算 ver2.0

BCX=? 115.444
BCY=? 144.048
HOU0-1=? 50.5752 　　注) °′″は押さなくて良いです。BCへの入射方向角
R=? 25　　　　　注)右カーブ＋左カーブ−でＲ入力
BCTUI=? 48.832
NO.TUI=? 55

PHO= 58.03245181 SHIFT°′″　58°01′56.83 ″BCより中間点への方向角
PAZ= 65.10045917 SHIFT°′″　65°06′01.65 ″中間点の接線角
PX= 118.7013027
PY= 149.2673498

最初に戻ります。
NO追加に戻したいのですが何かの関係で無条件ジャンプ出来ないので
出来る方はそのようにして使ってください。

BCX=? 100.354
BCY=? 190.164
HOU0-1=? 136.2807　　注) °′″は押さなくて良いです。BCへの入射方向角
R=? -10　　　　　注)右カーブ＋左カーブ−でＲ入力
BCTUI=? 103.919
NO.TUI=? 115

PHO= 104.7238845 SHIFT°′″　104°43′25.98 ″BCより中間点への方向角
PAZ= 72.97915783 SHIFT°′″　 72°58′44.97 ″中間点の接線角
PX= 97.67953523
PY= 200.3411671
最初に戻ります。


杭打ち計算

後視点Ｘ＝１００
後視点Ｙ＝１００

器械設置点Ｘ＝１１０．８４２
器械設置点Ｙ＝８９．４１４

打設点Ｘ＝６４．９３６
打設点Ｙ＝５．８３５

ＥＸＥ押すとＪ？−４４．３１５５２０７３何も入力せず
表示のままの状態でＥＸＥ

入斜方向角出力　３１５．６８４４７９３
お手数ですが　SHIFT °′″押します。３１５°４１′０４．１３″
ＥＸＥ押します。
Ｓ＝？９５．３５６２２７２６何も入力せず表示のままの状態でＥＸＥ
距離出力＝９５．３５６２２７２６

補足です・・Ｐｏｌ命令使っているのでＳ＝？　Ｓ＝と出るようです
他の方法が宜しいかも知れませんが今回はこれでしてみて下さい。
良い方法がありましたら直して下さいね。
角度も変換しなくても表示さす事が出来ますが・・プログラム長くなるので止めています。SHIFT °′″すれば済む事なので。

方向角出力２４１．２２２０８５１
お手数ですが　SHIFT °′″押します。２４１°１３′１９．５１″
ＥＸＥ押します。
夾角出力１０５．５３７６０５９
お手数ですが　SHIFT °′″押します。１０５°３２′１５．３８″
ＥＸＥ二回押すと最初に戻ります。

エラーが出るようでしたら実行命令の後などの：を見てくださいね。
私の書き込みミスがあるかも知れませんしね。



直角三角形計算

入力の決まり（図参照してください）

例題１　X＆YでZ&KA算出
X=13.078　EXE　入力
Y= 7.655 EXE　入力
Z= 0　EXE　　 入力
KA=0 EXE　　 入力
XY.ZK0×10? 10 　EXE

Z=15.15365002　　EXE 出力
KA=30.34189591　 出力SHIFT°′″30°20′30.83″EXE
ＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る
ＡＣ／ｏｎ　2回押しで終了。

例題2　X＆YでZ&KA算出
X=20.557　EXE　入力
Y= -8.352 EXE　入力
Z= 0　EXE　　 入力
KA=0 EXE　　 入力
XY.ZK0×10? 10 　EXE

Z=22.18887453　　EXE 出力
KA=337.8888322　 出力SHIFT°′″337°53′19.8″EXE
ＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る
ＡＣ／ｏｎ　2回押しで終了。
例題3　X＆ZでY算出
X=13.078　EXE 入力
Y= 0 EXE　 入力
Z= 15.153 EXE 入力
KA=0 EXE　　 入力
XY.ZK0×10? 10 　EXE

Y=7.653713151　　EXE 出力
YZA=0　 出力 EXE
XZA=30.33769663　 出力SHIFT°′″30°20′15.71″EXE
ＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る
ＡＣ／ｏｎ　2回押しで終了。

例題4　Y＆ZでX算出
X= 0　EXE 入力
Y= 7.655 EXE　入力
Z= 15.153 EXE 入力
KA=0 EXE　　 入力
XY.ZK0×10? 10 　EXE

X=13.07724681　　EXE 出力
YZA=30.34333458　 出力SHIFT°′″30°20′36″EXE
XZA=90
ＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る
ＡＣ／ｏｎ　2回押しで終了。

例題5　Z＆KAでX.Y算出
X= 0 EXE 入力
Y= 0 EXE 入力
Z= 15.153 EXE 入力
角度入力方法の決まり100°1′20″は100.0120と入力してください
KA=30.2030 EXE 入力
XY.ZK0×10? 0　EXE

YY=7.654619311　　EXE 出力
XX=13.07746964　　EXE 出力
ＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る
ＡＣ／ｏｎ　2回押しで終了。


１辺２角既知計算

入力方法の決まり36°56′25″は36.5625と入力してください。
入力方法の決まり100°1′20″は100.0120と入力してください

ＡＫ＝　？　　　　ＡＫ角度入力　　 例題　　 　　36.5625 EXE

CＫ＝　？　　　　ＡＫ角度入力　　 例題　　 　　69.2415 EXE

BL＝　？　　　　 BL辺長入力　 　 例題　　 　　 26.000 EXE

Ｈ　＝　15.24283822 　　出力　　ＥＸＥ

Ｘ1 ＝　20.27185885　　 出力　　ＥＸＥ

Ｘ2 ＝　5.728141155　　 出力　　ＥＸＥ

AL ＝　16.28360274　　 出力　　ＥＸＥ

CL ＝　25.36320915　　 出力　　ＥＸＥ


３辺既知（内角・面積）計算

Ａ＝？　　　　　Ａ辺長入力　　　　例題　 432.936 ＥＸＥ
Ｂ＝？　　　　　Ｂ辺長入力　 　 　例題　 284.353 ＥＸＥ
Ｃ＝？　　　　　Ｃ辺長入力　　　　例題　 329.846 ＥＸＥ

ＡＫ＝　　　　　ＡＫ角度出力　　　 例題　　 89.32147349
ＳＨＩＦＴ　°′″　　　 　　 89°19′17.3″　　　ＥＸＥ

ＢＫ＝　　　　　ＢＫ角度出力　　　 例題　　 41.05288892
ＳＨＩＦＴ　°′″　　　 　　 41°03′10.4″　　　ＥＸＥ

ＣＫ＝　　　　　ＣＫ角度出力　　　 例題　　 49.62563759
ＳＨＩＦＴ　°′″　　　 　　 49°37′32.3″　　 ＥＸＥ

Ｓ＝　　　46893.06136 　　面積出力　ＥＸＥ

角度の端数辺長の端数等等で座標面積計算とヘロンでの計算とでは
計算値が若干違います。
面積確定に使われるのであれば座標面積計算がベストだと思います。


開放トラバース計算
　ＨＯ＝？　　　　　　入射角　　後視から器械点への方向角　60.2030 ＥＸＥ
角度入力は、60°20′30″　60.2030と入力してください。
　　Ｘ＝？　　　　　器械設置点のＸ座標に入力　　　例題　　100.123 ＥＸＥ
　　Ｙ＝？　　　　　器械設置点のＹ座標に入力　　　例題　　200.456 ＥＸＥ
ＫＡ＝？　　 測角した角度夾角入力　例題　　50.1015　 ＥＸＥ
　Ｓ＝？　　 測定距離入力　　　 　 例題　　 40.125　 ＥＸＥ

ＰＸ＝114.1832704　　ＥＸＥ
ＰＹ＝162.875095　　 ＥＸＥ
L＝290.3045 　　そのままＥＸＥ (方向角290°30′45″)
ＨＯ＝?290.3045 そのままＥＸＥ 　
Ｘ＝？114.1832704　　そのままＥＸＥ
Ｙ＝？162.875095　　 そのままＥＸＥ
ＫＡ＝？　　 測角した角度夾角入力　例題　　190.2030　ＥＸＥ
　Ｓ＝？　　 測定距離入力　　　 　 例題　　 15.123　 ＥＸＥ
ＰＸ＝121.9391718　 ＥＸＥ
ＰＹ＝149.892371　　ＥＸＥ
L＝300.5114　　そのままＥＸＥ (方向角300°51′14″)
ＨＯ＝?300.5114 そのままＥＸＥ 　
Ｘ＝？121.9391718　　そのままＥＸＥ
Ｙ＝？149.892371　　 そのままＥＸＥ
ＫＡ＝？　　 測角した角度夾角入力　例題　　275.1025　ＥＸＥ
　Ｓ＝？　　 測定距離入力　　　 　 例題　　 20.356　 ＥＸＥ
ＰＸ＝138.4017771　 ＥＸＥ
ＰＹ＝161.8652304　 ＥＸＥ
L＝36.0139　　そのままＥＸＥ (方向角36°01′39″)
同じように繰り返す。
終わる場合はＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る
ＡＣ／ｏｎ　2回押しで終了。


器械自由設置計算
ＨＳ＝？　 器械点より左側既知点間距離入力　　例題　284.353　 ＥＸＥ
ＭＳ＝？　 器械点より右側既知点間距離入力　　例題　432.936　 ＥＸＥ
ＭＡ＝？　 左既知点基準に右既知点の角度入力　例題　49.3733　 ＥＸＥ
ＭＸ＝？　　　既知点右側Ｘ座標入力　　　例題　 -151536.496　 ＥＸＥ
ＭＹ＝？　　　既知点右側Ｙ座標入力　　　例題　　 42611.517　 ＥＸＥ
ＨＸ＝？　　　既知点左側Ｘ座標入力　　　例題　 -151808.487　 ＥＸＥ
ＨＹ＝？　　　既知点左側Ｙ座標入力　　　例題　　 42424.917　 ＥＸＥ


PX=-151966.5622 　ＥＸＥ　　器械設置点のＸ座標
PY= 42661.28294　 ＥＸＥ　　器械設置点のＹ座標
Ｈ−Ｍ，Ｓ＝？　329.846425 既知点間距離のチェック用に出力させています。
ＡＣ／ｏｎ　Ｂｒｅａｋ　ＥＸＥ　入力画面に戻る、ＡＣ／ｏｎ　2回押しで終了。


楕円計算
YOKO＝？　　　楕円の中心点からの横幅入力　　　　　例題　　180.000　ＥＸＥ
TATE＝？　　　楕円の中心点からの縦幅入力　 　 　　例題　　 90.000　ＥＸＥ
X？　　　 　　楕円中心点から横方向のポイント入力　例題　　 50.000　ＥＸＥ
Y=86.45808233 EXE 　楕円中心点から縦方向幅出力
X？　　　 　　楕円中心点から横方向のポイント入力　例題　　100.000　ＥＸＥ
Y=74.83314774 EXE　　楕円中心点から縦方向幅出力
X？　　　 　　楕円中心点から横方向のポイント入力　例題　　150.000　ＥＸＥ
Y=49.74937186 EXE　　楕円中心点から縦方向幅出力
X？　　　 　　楕円中心点から横方向のポイント入力　例題　　180.000　ＥＸＥ
Y=0 EXE　楕円中心点から縦方向幅出力




二直線平行移動付四点交点計算
Ｘ１＝？　　　　　Ｘ１座標入力　　　　例題　　1020.000　ＥＸＥ
Ｙ１＝？　　　　　Ｙ１座標入力　 　 　例題　　1010.000　ＥＸＥ
Ｘ２＝？　　　　　Ｘ２座標入力　　　　例題　　1030.000　ＥＸＥ
Ｙ２＝？　　　　　Ｙ２座標入力　　　　例題　　1020.000　ＥＸＥ
Ｘ３＝？　　　　　Ｘ３座標入力　　　　例題　　1010.000　ＥＸＥ
Ｙ３＝？　　　　　Ｙ３座標入力　 　 　例題　　1050.000　ＥＸＥ
Ｘ４＝？　　　　　Ｘ４座標入力　　　　例題　　1050.000　ＥＸＥ
Ｙ４＝？　　　　　Ｙ４座標入力　　　　例題　　1010.000　ＥＸＥ
1-2W＝？　　　　　1-2移動量入力　　　 例題　　 5.000　ＥＸＥ
3-4W＝？　　　　　3-4移動量入力　　　 例題　　10.000　ＥＸＥ
例題は基線に対して右方向移動で計算しました。

1-2HO= 45
角度変換必要　　　　　ＳＨＩＦＴ　°′″
3-4HO=315
角度変換必要　　　　　ＳＨＩＦＴ　°′″

この例題は、45°&315°ですが、45.123456と出た場合は、度分秒に変換
してください。
PX=1038.535534
PY=1035.606602


図が悪いけど解りますよね・・・

ＡＣ／ｏｎ　Ｂｒｅａｋ　ＥＸＥ　入力画面に戻る、ＡＣ／ｏｎ　2回押しで終了。

交点座標　２点２方向計算

Ｘ１＝？　　　　　Ｘ１座標入力　　　　例題　　513.824　 ＥＸＥ
Ｙ１＝？　　　　　Ｙ１座標入力　 　 　例題　　576.783 　ＥＸＥ
ＫＡ１＝　34.2148　ＥＸＥ
Ｘ２＝？　　　　　Ｘ２座標入力　　　　例題　　664.132 　ＥＸＥ
Ｙ２＝？　　　　　Ｙ２座標入力　　　　例題　　860.087 　ＥＸＥ
ＫＡ2＝ 260.4215　 ＥＸＥ

PX=630.8590678
PY=656.8086202

�@交点座標　３点１方向計算（方向角）

Ｘ１＝？　　　　　Ｘ１座標入力　　　　例題　　8584.078 ＥＸＥ
Ｙ１＝？　　　　　Ｙ１座標入力　 　 　例題　　 5089.706ＥＸＥ
Ｘ２＝？　　　　　Ｘ２座標入力　　　　例題　　8586.912 ＥＸＥ
Ｙ２＝？　　　　　Ｙ２座標入力　　　　例題　　 5112.691ＥＸＥ
Ｘ3＝？　　　　　 Ｘ3座標入力　　　　 例題　　8585.073 ＥＸＥ
Ｙ3＝？　　　　　 Ｙ3座標入力　　　　 例題　　 5089.584ＥＸＥ
ＫＡ＝？　　　　　方向角入力　　　　　例題　　 98.0131 ＥＸＥ
PX=8584.53417 EXE
PY=5093.405741EXE

ＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る、ＡＣ／ｏｎ　2回押しで終了。
�A交点座標　３点１方向計算（測角)

ＫＸ＝？　　　　　　　器械設置Ｘ座標入力　 　 例題　-151966.562　 ＥＸＥ
ＫＹ＝？　　　　　　　器械設置Ｙ座標入力　 　 例題　　 42661.283　ＥＸＥ
ＢＸ＝？　　　　　　　後視点Ｘ座標入力　　　　例題　-151536.496　 ＥＸＥ
ＢＸ＝？　　　　　　　後視点Ｙ座標入力　　　　例題　　 42611.517　ＥＸＥ
SO＝？　　　　　　 後視点基準に測角した角度　 例題　　 320.0000 　ＥＸＥ
Ｘ１＝？　　　　　Ｘ１座標入力　　　　例題　　-151807.156ＥＸＥ
Ｙ１＝？　　　　　Ｙ１座標入力　 　 　例題　　 42096.682 ＥＸＥ
Ｘ２＝？　　　　　Ｘ２座標入力　　　　例題　　-151808.487ＥＸＥ
Ｙ２＝？　　　　　Ｙ２座標入力　　　　例題　　 42424.917 ＥＸＥ
Ｊ？　　　　　　　　　　　　なにも入力しないで　　　　　173.3992551　ＥＸＥ
Ｋ-BS＝？　　　　　器械点後視点点間距離出力　　　　　　　 432.9358141ＥＸＥ
Ｂ−ＫＨＯ＝？　　　後視点から器械点への入射角出角　例題　　173.3992551 ＥＸＥ
角度変換必要　ＳＨＩＥＴ　°′″173°23′57.32″となります。
PX=-151808.7688 EXE
PY= 42494.41705 EXE

ＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る、ＡＣ／ｏｎ　2回押しで終了。


杭打計算
ＫＵＩ−Ｘ？　　　　　打設する杭のＸ座標入力　　　例題　　100.000　ＥＸＥ
ＫＵＩ−Ｙ？　　　　　打設する杭のＹ座標入力　 　 例題　　100.000　ＥＸＥ
ＫＩＫＡＩ−Ｘ？　　　器械設置のＸ座標入力　　　　例題　　200.000　ＥＸＥ
ＫＩＫＡＩ−Ｙ？　　　器械設置のＹ座標入力　　　　例題　　200.000　ＥＸＥ

Ｓ＝　　　　　　　　　　　141.4213562　　　　　　ＥＸＥ
ＨＯ．ＫＡＫＵ　　　　　　225　　　　　　　　　　ＥＸＥ
角度変換必要　　　　　ＳＨＩＦＴ　°′″
この例題は、225°ですが、225.123456と出た場合は、度分秒に変換
してください。
ＮＹＵ．ＨＯ＝？　　　　　入射角　　　　　　　　例題　　100.1125 ＥＸＥ
後視点より器械点への方向角　100°11′25″
ＫＹＯＵＫＡＫＵ＝　304.8097222　　　ＥＸＥ
角度変換必要　ＳＨＩＥＴ　°′″304°48′35″となります。
ＡＣ／ｏｎ　Ｂｒｅａｋ　ＥＸＥ　入力画面に戻る、ＡＣ／ｏｎ　2回押しで終了。


線上点座標計算
Ｘ−1＝？　　　　　　　　器械点　　　　　　　　　例題　　100.000　ＥＸＥ
Ｙ−1＝？　　　　　　　　器械点　　　　　　　　　例題　　100.000　ＥＸＥ
Ｘ−2＝？　　　　　　　　器械点　　　　　　　　　例題　　150.000　ＥＸＥ
Ｙ−2＝？　　　　　　　　器械点　　　　　　　　　例題　　150.000　ＥＸＥ
Ｊ？　　　　　　　　　　　　なにも入力しないで　　　　　　　45　　ＥＸＥ
Ｍ＋Ｌ＝？　　　　　 　　測点より中間点までの距離　　　 　5.000 　ＥＸＥ
ＨＯＵＫＯＵＫＡＫＵ＝45　　　　　　　　ＥＸＥ
角度変換必要　ＳＨＩＦＴ　°′″
この例題は　　　45°ですが、45.123456と出た場合は、最後に度分秒に変換
してください。
ＰＸ＝103.5355339　　　　　　　　　　 　ＥＸＥ
ＰＹ＝103.5355339　　　　　　　　　　 　ＥＸＥ
ＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る、ＡＣ／ｏｎ　2回押しで終了。


幅杭設置計算（方向杭−控杭）
ＣＥ．Ｘ＝？　　　　　　　中心線Ｘ座標入力　　　　例題　　100.000　ＥＸＥ
ＣＥ．Ｙ＝？　　　　　　　中心線Ｙ座標入力　　　　例題　　100.000　ＥＸＥ
ＡＺ　　＝？　　　　　　　接線方向角　入力　　　　例題　　60.1540　ＥＸＥ
角度入力は、60°15′40″60.1540と入力してください。
角度入力は、60° 3′ 5″60.0305と入力してください。
Ｒ−0．Ｌ−1？　進行方向に対して左なら1右なら0を入力する　1　　　 ＥＸＥ
Ｌ．Ｓ＝？　　　　　幅杭　方向杭までの距離入力　　　　　　10.000　ＥＸＥ
ＬＸ＝108.6829503　　　　　　　　　　　　ＥＸＥ
ＬＹ＝　95.0395187　　　　ＥＸＥ　ＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る
ＡＣ／ｏｎ　2回押しで終了。


2円の交点計算
1−Ｘ？　　　　　円の中心のＸ座標　　　　　　　例題　　10.125　　　ＥＸＥ
1−Ｙ？　　　　　円の中心のＹ座標　　　　　　　例題　　20.135　　　ＥＸＥ
2−Ｘ？　　　　　円の中心のＸ座標　　　　　　　例題　　12.356　　　ＥＸＥ
2−Ｙ？　　　　　円の中心のＹ座標　　　　　　　例題　　25.321　　　ＥＸＥ
1−Ｒ？　　　　　半径の入力　　　　　　　　　　　例題　 5.000　　　ＥＸＥ
2−Ｒ？　　　　　半径の入力　　　　　　　　　　　例題　 5.000　　　ＥＸＥ
Ｒ．0−Ｌ．1？　　　 　 右側の交点計算の場合　0入力　　ＥＸＥ
　　　　　　　　　　　　左側の交点計算の場合　1入力　　ＥＸＥ
この例題は、1　　　　　　　　　　　　　　 ＥＸＥ
ＬＰＸ＝15.03156393　　　　　　　　　　 　ＥＸＥ
ＬＰＹ＝21.09709687　　　　　　　　　　　 ＥＸＥ　　　
ＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る
ＡＣ／ｏｎ　2回押しで終了。


縦断曲線計算
ＫＯＵＢＡＩ−1？　　　　　勾配1　　　　　　　例題　　　1.200　　 ＥＸＥ
ＫＯＵＢＡＩ−2？　　　　　勾配2　　　　　　　　 例題　 -2.000 ＥＸＥ
Ｓ？　　　　　　　　バーチカル始点からの距離　 　例題　　5.000　　ＥＸＥ
ＶＣＬ？　　　　　 ＶＣＬ入力　　　 　 　　　 　 例題　　 20.000　ＥＸＥ
Ｙ＝　−0.020　　　　　　　　　　　　　　　　ＥＸＥ
ＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る
ＡＣ／ｏｎ　2回押しで終了。


水準計算
　Ｈ＝？　　　　　　　　後視する点の標高　　例題　　100.000　　　　ＥＸＥ
ＢＳ＝？　　　　　　　　後視の値　　　　　　例題　　 1.562　　　　ＥＸＥ
ＩＨ＝101.562　　　　　 器械高　　　　ＥＸＥ
ＦＳ＝？　　　　　　　　前視の値　　　 例題　　 1.562　　　　ＥＸＥ
Ｈ＝100.000　　　　　　 標高　　　　　ＥＸＥ
ＦＳ＝？　　　　　　　　前視の値　繰り返し計算できます。
ＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る
ＡＣ／ｏｎ　2回押しで終了。


放射計算
　　Ｘ＝？　　　　　器械設置点のＸ座標に入力　　　例題　　100.123 ＥＸＥ
　　Ｙ＝？　　　　　器械設置点のＹ座標に入力　　　例題　　200.123 ＥＸＥ
ＨＯＵ＝？　　　　　　入射角　　後視から器械点への方向角　20.1050 ＥＸＥ
角度入力は、20°10′50″20.1050と入力してください。
ＫＹＵＫＡＫＵ＝？　　　測角した角度夾角入力　例題　　200.1030　　ＥＸＥ
　　　　　　 Ｓ＝？　　 測定距離入力　　　 　 例題　　　20.345　 ＥＸＥ
ＨＯＵＫＯＵＫＡＫＵ＝40.35555556　角度変換必要　　　ＳＨＩＦＴ　°′″
ＰＸ＝115.6267206　　ＥＸＥ
ＰＹ＝213.2969771　　ＥＸＥ
ＡＣ／ｏｎ　Ｂｒｅａｋ　入力画面に戻る
ＡＣ／ｏｎ　2回押しで終了。