fx-4850P版はこちらです→fx-4850P 単曲線
マニュアル、操作手順書のサンプルはこちらです→単曲線
［偏角、弦長計算］、［諸元計算］を選択してからそれぞれの処理を実行します。
偏角、弦長計算：
半径(Ｒ)，弧長(ｌ)から、偏角(θ)と弦長(Ｌ)を計算します。
諸元計算：
半径(Ｒ)，中心角(IA)から、単曲線の各数値(TL,CL,SL,L)を計算します。
単曲線（偏角・弦長計算、諸元計算） 【プログラム番号：P11】
AC 999 MinF 180 / PI = Min50 1 Min55LBL0 MR55 "(Henkaku[RTA]1 [SGM][RTA]2)" HLT
Min55 - 1 = X=0 GOTO1
MR55 - 2 = X=0 GOTO3
GOTO0
LBL1 MR51 "R ?" HLT
Min51 +/- X>=0 GOTO1
LBL2 MR52 "l ? (R=[AR51])" HLT
Min52 +/- X>=0 GOTO2
MR52 / MR51 * MR50 / 2 = Min53 "kakudo=" SDMS HLT
SIN * 2 * MR51 = Min54 "gentyo=" HLT
GOTO2
LBL3 MR51 "([SGM]) R ?" HLT
Min51 +/- X>=0 GOTO3
LBL4 0 Min9F MR56 SDMS "IA ?" HLT
Min56 +/- X>=0 GSBP18
MR9F X=F GOTO4
LBL5 MR56 - 180 = X>=0 GSBP18
MR9F X=F GOTO4
MR56 / 2 = TAN * MR51 = Min57 MR51 * MR56 / MR50 = Min58
MR56 / 2 = COS 1/X - 1 = * MR51 = Min59 MR56 / 2 =
SIN * MR51 * 2 = Min60
LBL6 MR56 SDMS "(R=[AR51]) IA=" HLT
MR57 "TL=" HLT
MR58 "CL=" HLT
MR59 "SL=" HLT
MR60 "L= again[RTA]0" HLT
- MR60 = X=0 GOTO6
GOTO3
エラー表示サブルーチン 【プログラム番号：P18】
999 Min9F 0 " DATA ERROR" PAUSEご注意下さい
- 上記プログラムソースは見やすいようにインデント・改行されていますが、FX-603Pに入力する際には、インデント・改行を無視してください。
- サブルーチンは他のプログラムと共用しますのでプログラム番号を変更しないでください。
- 当プラグラムソースはASCIIコードで書かれていますので、実際の表現とは違う部分があります。表現の違いは下表の通りです。
