FX-603P 測量プログラム垂線計算

FX-603P は、既に 製造が終了 しており、FX-603Pに関連した サービスも終了 しております。
また、FX-603Pに関する掲載情報も今後更新する予定はありません。

プログラムの概要

 垂線計算プログラムの概要は次の通りです。

垂線計算

 任意の点(C点)と直交する直線上の交点(P点)座標と、垂線長を計算します。

fx-5800Pのご案内

CASIO fx-5800P 測量計算ソフト

FX-603P は 2005年に 製造終了 となっております。

現場でお使いになるのであれば、fx-5800P をお勧めします。

fx-5800P は、 FX-603P の後継機種に当たります。処理能力が高いだけでなく、電池が切れてもプログラムが消えない優れた機能を持ち、現場での使い勝手も良い、手帳型のプログラム電卓です。

fx-5800P:垂線計算(直線)
fx-5800P:垂線計算(曲線)

Excel 測量計算 のご案内

Excel_v2

Excel 測量計算(Ver.2)は、様々な測量計算(30種)ができるように作られたソフトウェアです。

1,000点 の座標登録ができ、測点名で検索できます。また、CSV や SIMAデータの作成、簡易図形表示も備えています。

Excel 測量計算
Excel 測量計算:垂線(直線)
Excel 測量計算:垂線(単曲線)

Web 測量計算2 のご案内

web測量計算2

Web 測量計算2は、座標登録ができ、CSV・SIMAデータの読み込み・書き出しなど、Excel測量計算(Ver.2)と同等の機能を追加した Web 測量計算 の進化版です。

ただいま Excel測量計算半額 で入手できる 特典 が付いています。

Web 測量計算2

プログラムのソース表示

 プログラムご利用の前に、
 下記 「ご利用の前に」 の各項目をお読みください。

ご利用の前に

  • 本プログラムは著作権法によって保護されている著作物です。本内容の全部、または一部を複製し、転売(オークションに出品)するような行為はお止め下さい。
  • プログラムの入力を始める前に FX-603P 取扱説明書を熟読されることをお勧めします。
  • 本プログラムをご使用になる前に、「実行マニュアル」「操作手順書」「例題集」を良くお読みになり、操作方法を練習してください。

    マニュアル類ダウンロード(PDF)

  • 本プログラムはお客様の責任でお使いください。本プログラムに起因するトラブルにより損害を受けても、弊社は一切の責任を負いません。
  • プログラムを手動で間違いなく入力するのは至難の業です。また、入力ミスは、必ずと言っていいほど発生します。どうか根気よく入力し、チェックを入念に行ってください。
  • プログラムの入力方法がわからない、エラーが出る、答えが合わない、といった内容のお問い合わせはご容赦願います。

プログラム ソース

垂線計算 【プログラム番号:P4】

   AC 999 MinF
LBL0 0 Min9F MR51 "Ax ?" HLT
   Min51 Min91 MR52 "Ay ?" HLT
   Min52 Min92 0 "(Zahyo[RTA]0 Hoko[RTA]1)" HLT
   Min50 X=0 GOTO1
   MR56 SDMS "Hoko ?" HLT
   Min56 GOTO2
LBL1 MR53 "Bx ?" HLT
   Min53 Min93 MR54 "By ?" HLT
   Min54 Min94 GSBP19
   MR9F X=F GOTO0
   MR96 Min56 MR95 "Kyori=" HLT
   MR56 SDMS "Hoko=" HLT
LBL2 MR57 "Cx ?" HLT
   Min57 MR58 "Cy ?" HLT
   Min58 MR56 - 90 = Min59 X>=0 GOTO3
   360 M+59
LBL3 MR56 - 90 = X=0 GOTO4
   MR56 - 270 = X=0 GOTO4
   MR59 - 90 = X=0 GOTO5
   MR59 - 270 = X=0 GOTO5
   MR56 TAN Min60 MR59 TAN Min61 * MR57 - MR60
   * MR51 + MR52 - MR58 = / ( MR61 - MR60 ) = Min62
   MR60 * ( MR62 - MR51 ) + MR52 = Min63
   MR62 - MR57 = R>P ( MR63 - MR58 ) = Min64
   MR62 - MR51 = R>P ( MR63 - MR52 ) = Min65 GOTO6
LBL4 MR51 Min62 - MR57 = ABS Min64
   MR58 Min63 - MR52 = ABS Min65 GOTO6
LBL5 MR57 Min62 - MR51 = ABS Min65
   MR52 Min63 - MR58 = ABS Min64
LBL6 MR62 "Px=" HLT
   MR63 "Py=" HLT
   MR65 "Lp=" HLT
   MR64 "Lc=" HLT
   GOTO2

エラー表示サブルーチン 【プログラム番号:P18】

   999 Min9F 0 " DATA ERROR" PAUSE

座標変換サブルーチン 【プログラム番号:P19】

   0 Min9F MR91 - MR93 = X=0 GOTO1
   GOTO3
LBL1 MR92 - MR94 = X=0 GOTO2
   GOTO3
LBL2 GSBP18
   GOTO5
LBL3 MR93 - MR91 = R>P ( MR94 - MR92 ) = Min95 X<>Y X>=0 GOTO4
   + 360 =
LBL4 Min96
LBL5

ご注意下さい

  • 上記プログラムソースは見やすいようにインデント・改行されていますが、FX-603Pに入力する際には、インデント・改行を無視してください。
  • サブルーチンは他のプログラムと共用しますのでプログラム番号を変更しないでください。
  • 当プログラムソースはASCIIコードで書かれていますので、実際の表現とは違う部分があります。表現の違いは下表の通りです。

FX-603P コード対応表