2007.11.15 Thu
R座標敷地を登録しました
敷地の座標測量資料から
・敷地図(点,座標点文字含む)
・座標面積計算表(JWWと同書式)
・座標ファイル(元のJWWファイル名を取得)
を一括で生成する外部変形です

HinoADO Tools
前回のR螺旋階段に続く座標ファイルジェネレータです。

今回は、座標ファイルを議事録代わりに出力する際、外部変形を呼び出した元のJWWファイルのパスとファイル名を取得して、「.jww」を「_R座標.txt」に差し替えて、座標ファイルを保存する機能が個人的に興味深く感じてます。

図面が有って座標求積が必要なときはJWWの標準添付外部変形、座標ファイルがあるときはR座標敷地で一括処理、という位置付けを想定してます。
posted by Hino at 22:34 - comments(22) trackbacks(0)
この記事に対するコメント
Hinoさん こんち(*- -)(*_ _)ペコリ
[Link]
 こんな 感じです。
posted by うにょすけ at 11:27 2007.11.16 Fri
[Link]
 すいません上記リンクうまくいきませんでした。(o*。_。)oペコッ
 
 上記でも だめな場合。
[Link]
 おいらんちの掲示板の左上の【freeride】の小文字のeをクリックすると飛びます。
posted by うにょすけ at 11:30 2007.11.16 Fri
れっどさんありがとうございます。
リンクがうまくいかないのは私に原因がありますすみません

ちょっとエラーメッセージを元に検証してみますね。
いつもお世話になります助かります。
posted by Hino at 13:15 2007.11.16 Fri
>リンクがうまくいかないのは私に原因がありますすみません
 (; ̄ー ̄A アセアセ・・・ とんでもないです。おいのら掲示板のアドレスもなんかわかりにくいので・・

>ちょっとエラーメッセージを元に検証してみますね。

 すいません 助かります。
僕のExcel2003がだめなのかな・・

>いつもお世話になります助かります。
 とんでもないです。検討して頂けて幸いです。(o*。_。)oペコッ
 
posted by うにょすけ at 14:58 2007.11.16 Fri
素のエクセル2003では動きました
週明けにSP3当てたので試してみます。

それにしても
「プロシージャの呼び出し、または引数が不正です。」
というエラーの質からして色々な環境で再現しそうなんですけど

もし可能なら、エラーメッセージの後に「デバッグ」ボタンを押して、黄色反転された行を教えてもらえれば何かヒントが見つかるかもしれません。

それにしてもエクセルってバージョン毎の方言がきついですね
posted by Hino at 20:41 2007.11.16 Fri
画像貼り付けました。
 URLボタンにアドレス入れました。
 これならOKかな?

 一応
[Link]
posted by うにょすけ at 13:37 2007.11.18 Sun
ありがとうございます。
貼っていただいた画像の座標を入れてみましたら
面積が負になるのを確認しました

スクリプトのエラーもありがとうございます。
原因が特定しやすくなりました。
がんばります。
posted by Hino at 21:23 2007.11.18 Sun
座標値による多角形の面積は絶対値で算定するんですね。
リンクがうまくいくかわかりませんがwikipediaより
[Link]

座標が右回りの場合に負の値を取るようです。
[Link]

これは簡単に解決できますね。

問題はエラー。
エクセル2003SP3で再現しませんでした

引き続き掘り下げてみます。
posted by Hino at 15:00 2007.11.19 Mon
R座標敷地のエラーはまだですがこのサイトのリンクエラーは修正完了しました
posted by Hino at 16:45 2007.11.19 Mon
 僕のExcelは2003のSP2です。
 僕のExcelがわるいのかな?
 (; ̄ー ̄A アセアセ・・・
posted by うにょすけ at 16:58 2007.11.19 Mon
特定出来たと思います。
SPは無関係でした。たぶん

サーバー上から削除してしまってアップしたバージョンのモノが無いので推測ですが、R座標敷地.bat内に
REM #hf 		フルパス書き出し

の一行が入っていないんじゃないでしょうか。
十中八九これだと思うのですがいかがでしょうか。

あと外部変形として起動しないで、R座標敷地.xlsをダブルクリックで起動させてGenerateさせた時にも同じエラーが出ました。

それからもうひとつ、何かしらの理由でjwc_temp.txtのパスが取得できないときにも同様のエラーが起きる可能性があることがわかりました。

エクセルの日頃の行いから疑ってしまって、原因を自分の外に探してしまったのが反省材料です

今夜中には修正版をアップできそうです
posted by Hino at 18:38 2007.11.19 Mon
>REM #hf フルパス書き出し
 の記述はありました・・
 板に画像のっけておきました。

 自宅のXPでも 同じエラーが出ました。
 なぜかなぁ・・おいらのjww内の置き方に問題があるのかなぁ・・
 jww内に直に置いても 同じエラーでした。

 悩みの原因を作ってしまって 申し訳ない気分です・・
 (; ̄ー ̄A アセアセ・・・
posted by うにょすけ at 12:55 2007.11.20 Tue
なるほど
「#hf」ありましたか。むぅ。

ところで私は、外変を公開して皆さんに突っ込んでもらうのを半ばエンターテイメントと感じてますので突っ込みはご遠慮なく
以前、というか今も継続してはまっている「キャストパズル」というマニアな知恵の輪があるんですが、これが解けたときとスクリプトの問題箇所が特定できたときは同じように脳味噌が喜びます。
キャストパズル→[Link]
アインシュタイン曰く「聖なる好奇心」とか

とりあえずエラー回避を仕込んだヤツをこっそり貼ってみます。
[Link]
お手すきの時にでもお試しください。
なるべくお手間を取らせないようにエラーが出た座標も仕込んでありますので
posted by Hino at 23:06 2007.11.20 Tue
 (^-^)ゝ ラジャ! テストランしてみました。
 デバッカエラーはでません。
[Link]
 このような結果がでました。

 描画、面積は問題ないです。
posted by うにょすけ at 10:22 2007.11.21 Wed
ありがとうございます。
おかげさまでだいーぶ絞れてきました。

サブプロシージャの「get_path」に問題アリですね。

ところで一つ知人に教えてもらったので確認してみたいことが一つ

JWWを直接立ち上げて、一度も保存しない状態でR座標敷地を実行するとれっどさんと同様のエラーが再現できるんです。
この時JWWが吐き出すパスが空になってるのも確認できました。
これどうですか
posted by Hino at 18:15 2007.11.22 Thu
知人曰くDさんのところで見つけた情報だそうです。
DAISY DAISY →[Link]
posted by Hino at 18:24 2007.11.22 Thu
>JWWを直接立ち上げて、一度も保存しない状態でR座標敷地を実行するとれっどさんと同様のエラーが再現できるんです。
この時JWWが吐き出すパスが空になってるのも確認できました。

 どうやら そのようです。一度保存した上で実行させると なにも問題はおきませんでした。

 エラー回避版で抜群にいけます。
 o(*^▽^*)o~♪

 ありがとうございました。(o*。_。)oペコッ
posted by うにょすけ at 09:50 2007.11.23 Fri
こちらこそありがとうございます
私も勉強になりました。
おかげさまでかなりマシになりました

新規ファイルでの座標ファイルはデスクトップに保存するようにしたv0.96をHinoADO Toolsに置いておきました。
XY座標出力にも不具合がありましたのでお手すきの時にでも差し替えておいてください。
posted by Hino at 12:33 2007.11.23 Fri
( ̄ー ̄?).....??アレ??
 DLできないよ・・(; ̄ー ̄川 アセアセ
posted by うにょすけ at 12:48 2007.11.23 Fri
うぁ
DLできるようにしました
posted by Hino at 13:23 2007.11.23 Fri
 Downloadしました。o(*^▽^*)o~♪
 ありがとう ございます(*- -)(*_ _)ペコリ

 螺旋に続き、現在外構工事をしてまして・・・ちょうど、敷地分筆したところの地積測量図の座標があったもので、とっても助かります。

 何か今の現場は Hinoさんの公開してくれたものに助けられました。
 o(*^▽^*)o~♪

 来週月曜日に その螺旋階段を設置します。
posted by うにょすけ at 14:55 2007.11.23 Fri
おぉ。拙作がお役に
配布ツールで時間が削れてるかもと思うと楽しげです
posted by Hino at 21:47 2007.11.23 Fri
お名前

メール

URL

コメント