クロソイド要素及び中間点設置計算 Ｐ．7　　
　　　　
ＬＢＬ　1　"ＫＵＲＯ．ＹＯＵＳＯ"ＰＡＵＳＥ　ＭＲ01　
"Ａ＝＃？"ＨＬＴ
Ｍｉｎ01　ＭＲ02　"Ｌ＝＃？"ＨＬＴ　Ｍｉｎ02　ＭＲ01　
χｙ2　÷ＭＲ02
＝Ｍｉｎ03　ＭＲ02÷ＭＲ03＝Ｍｉｎ04　ＭＲ04　χｙ2　
＝Ｍｉｎ05　ＭＲ04χｙ4　＝Ｍｉｎ06　ＭＲ04　χｙ6　＝Ｍｉｎ07　
MR04 xy8=Min15 MR04 xy10=Min16
ＭＲ02×（1−ＭＲ05÷40＋ＭＲ06÷3456−ＭＲ07÷599040+MR15÷175472640-MR16÷78033715200）＝
ＧＳＢ　Ｐ19　Ｍｉｎ08　"Ｘ＝＃"ＨＬＴ　ＭＲ02
χｙ2　＝Ｍｉｎ09　ＭＲ09÷6÷ＭＲ03×
（1−ＭＲ05÷56＋ＭＲ06÷7040−ＭＲ07÷1612800+MR15÷588349440-MR16÷313373491200）＝
ＧＳＢ　Ｐ19　Ｍｉｎ10"Ｙ＝＃"ＨＬＴ　ＭＲ10　χｙ2　
＝Ｍｉｎ11 ＭＲ08　χｙ2＝Ｍｉｎ12　（ＭＲ11＋ＭＲ12）
√＝Ｍｉｎ13　ＩＮＴ　（ＭＲ13×1000＋0.5）÷1000＝
ＧＳＢ　Ｐ19　"Ｓ0＝＃ｍ"ＨＬＴ　Ｍｉｎ1Ｆ　ＭＲ02
÷2÷ＭＲ03×180÷π＝Ｍｉｎ2Ｆ　°′″←"ｔｕ＝＃"
ＨＬＴ　（ＭＲ10÷ＭＲ08）
ＴＡＮ-1＝Ｍｉｎ3Ｆ　°′″←"ｓｉｇ＝＃"ＨＬＴ　
ＭＲ2Ｆ−ＭＲ3Ｆ＝Ｍｉｎ4Ｆ
°′″←"ｔ−ｓ＝＃"ＨＬＴ　ＭＲ49　"ＩＡ＝＃？"ＨＬＴ　
Ｍｉｎ49 ＧＳＢ　Ｐ18　Ｍｉｎ50　ＭＲ51　"Ｒ＝＃？"
ＨＬＴ　Ｍｉｎ51　ＭＲ50＋（ＭＲ2Ｆ×2）＝Ｍｉｎ52　
ＭＲ10＋ＭＲ51×（ＭＲ2Ｆ　ＣＯＳ）−ＭＲ51＝
ＧＳＢ　Ｐ19　"ｄｒ＝＃"ＨＬＴ　Ｍｉｎ53　ＭＲ08−
ＭＲ51×（ＭＲ2Ｆ　ＳＩＮ）
＝ＧＳＢ　Ｐ19　"ＸＭ＝＃"ＨＬＴ　Ｍｉｎ54　
ＭＲ51×π×（ＭＲ52÷180）
＝ＧＳＢ　Ｐ19　"ＬＣ＝＃"ＨＬＴ　Ｍｉｎ55（ＭＲ51＋
ＭＲ53）＝Ｍｉｎ60 ＭＲ50÷2＝Ｍｉｎ61　ＭＲ61　
ＣＯＳ＝Ｍｉｎ62　ＭＲ60×（1÷ＭＲ62）＝
ＧＳＢ　Ｐ19　"ＩＰ→ＯＵ．Ｓ＝＃"ＨＬＴ　Ｍｉｎ80　
180−（ＭＲ2Ｆ＋90）
＝Ｍｉｎ90　ＭＲ10÷（ＭＲ90　ＣＯＳ）＝ＧＳＢ　Ｐ19　
"ＴＫ＝＃"ＨＬＴ Ｍｉｎ91（ＭＲ91　χ＾2　−ＭＲ10　
χ＾2）√＝ＧＳＢ　Ｐ19　Ｍｉｎ92"Ｕ＝＃"
ＨＬＴ　ＭＲ08−ＭＲ92＝ＧＳＢ　Ｐ19　"ＴＬ＝＃"
ＨＬＴ　Ｍｉｎ93　（ＭＲ51＋ＭＲ53）×
（ＭＲ50÷2）ＴＡＮ＝ＧＳＢ　Ｐ19　
"Ｗ＝＃"ＨＬＴ　Ｍｉｎ95　ＭＲ95
＋ＭＲ54＝ＧＳＢ　Ｐ19　"ＴＣ1＝＃"ＨＬＴ　Ｍｉｎ96
ＭＲ02＋ＭＲ55＋ＭＲ02＝ＧＳＢ　Ｐ19　"ＣＬ＝＃"
ＨＬＴ Ｍｉｎ97　ＡＣ
ＭＲ20　"＋Ｒ0＊−Ｒ1？"ＨＬＴ　Ｍｉｎ20　ＭＲ21　
"ＫＡ．Ｘ＝＃？"ＨＬＴ
Ｍｉｎ21　ＭＲ22　"ＫＡ．Ｙ＝＃？"ＨＬＴ　Ｍｉｎ22　
ＭＲ23　"ＩＰ→ＫＡ．ＨＯ＝＃？"
ＨＬＴ　Ｍｉｎ23　ＧＳＢ　Ｐ18　Ｍｉｎ24　ＭＲ20　χ＝0
ＧＯＴＯ　2 ＧＯＴＯ　3　ＬＢＬ　2　ＭＲ24＋ＭＲ3Ｆ＝
Ｍｉｎ30　χ≧0　ＧＯＴＯ　4　＋360
＝ＬＢＬ　4　°′″←"ＨＯ＝＃"ＨＬＴ　ＭＲ30＋ＭＲ4Ｆ＝
Ｍｉｎ31　χ≧0
ＧＯＴＯ　5　＋360＝ＬＢＬ　5　°′″←"ＡＺ＝＃"
ＨＬＴ ＧＯＴＯ　8　ＬＢＬ　3
ＭＲ24−ＭＲ3Ｆ＝Ｍｉｎ30　χ≧0　ＧＯＴＯ　6　＋360＝
ＬＢＬ　6　°′″←
"ＨＯ＝＃"ＨＬＴ　ＭＲ30−ＭＲ4Ｆ＝Ｍｉｎ31　χ≧0　
ＧＯＴＯ　7　＋360＝ＬＢＬ　7
°′″←"ＡＺ＝＃"ＨＬＴ　ＬＢＬ　8　ＭＲ30　ＣＯＳ×
ＭＲ1Ｆ＋ＭＲ21＝
ＧＳＢ　Ｐ19　Ｍｉｎ42　"ＰＸ＝＃"　ＨＬＴ　ＭＲ30　
ＳＩＮ×ＭＲ1Ｆ＋ＭＲ22＝
ＧＳＢ　Ｐ19　Ｍｉｎ40　"ＰＹ＝＃"　ＨＬＴ　
ＧＯＴＯ　1

Ｐ．18
Ｍｉｎ09　ＩＮＴ　＋（ＭＲ09　ＦＲＡＣ×2　10ｘ）
Ｍｉｎ09　ＩＮＴ÷60＋ＭＲ09　ＦＲＡＣ　÷36＝

クロソイド対称型要素及び中間点計算
Ａ＝？　　　パラメーター入力　　　　　　　例題　　10.000　　ＥＸＥ
Ｌ＝？　　　ＫＡより中間点までの距離　　　例題　　 3.689　　ＥＸＥ
　　Ｘ＝3.6873　　　　　　　ＥＸＥ
　　Ｙ＝0.0836　　　　　　　ＥＸＥ
　 Ｓ0＝3.6887　　　　　　　ＥＸＥ
　ｔｕ＝3°53′55″　　　　 ＥＸＥ
ｓｉｇ＝1°17′55.72″　　　ＥＸＥ
ｔ−ｓ＝2°35′59.28″　　　ＥＸＥ
ＩＡ＝？　交角入力　　　　　　　　　　　　例題　　39.0208　　ＥＸＥ
注）角度入力39°2′8″は、39.0208と入力して下さい。
Ｒ＝？　　　曲線半径入力　　　　　　　　　例題　　15.000　　 ＥＸＥ　
　ｄｒ＝0.0489　　　　　　　ＥＸＥ
　ＸＭ＝2.6674　　　　　　　ＥＸＥ
　ＬＣ＝12.2608　　 　　　　ＥＸＥ
ＩＰ　0→Ｏ．Ｓ＝15.9664　　ＥＸＥ　　　ＩＰより円弧中心までの距離
ＴＫ＝1.2296　　　　　　　  ＥＸＥ　　　
　 Ｕ＝1.2268　　　　　　　 ＥＸＥ
ＴＬ＝2.4605　　　　　　　  ＥＸＥ
Ｗ＝5.3344　　　　　　　    ＥＸＥ
ＴＣ 1＝8.0018　　　　　　  ＥＸＥ
ＣＬ＝19.6388　　　　　     ＥＸＥ
＋Ｒ0＊−Ｒ1？　　　右カーブなら0入力左カーブなら1入力
この例題は、左カーブでしています。　　　　　1　　　　　　　  ＥＸＥ
ＫＡ．Ｘ＝？　　　ＫＡのＸ座標入力　　　　例題　　100.000　　ＥＸＥ
ＫＡ．Ｙ＝？　　　ＫＡのＹ座標入力　　　　例題　　116.311　　ＥＸＥ
Ｉ→Ｋｈ＝？　　　ＩＰよりＫＡへの入射角　例題　　90.000　　 ＥＸＥ　
ＨＯ＝88°42′4.28″　ＫＡより中間点への方向角　　　　ＥＸＥ
ＡＺ＝86°6′5″　　　中間点の接線方向角　　　　　　　ＥＸＥ
ＰＸ＝100.0836　　　　中間点Ｘ座標　　　　　　　　　　ＥＸＥ
ＰＹ＝119.9988　　　　中間点Ｙ座標　　　　　　　　　　ＥＸＥ
注）後視を方向角で合わせた場合、横断方向は、86°6′5″＋90°です。