Geeklog Site

エバテック再始動

Thu, 26 Nov 2009 23:24:14 +0900

SystemMetrix社と共同で IntelliJapan社を設立した後、Ebatechとしての活動は、しばらく停止しておりましたが... この度、活動を再開することにいたしました。

国内における AutoCAD互換CADの第一人者（？）として、DWG / DXF ファイルに関連したトピックを幅広く紹介したい... と思っており、Ebatechとしての活動は、IntelliCAD（ITC）に留まらず、その上位組織ともいえる Open Design Alliance （ODA）へと活動範囲を広げたい考えでおります。

本サイト（icadweb.com）は、 http://www.ebatech.jp へ統合したいと思っております。

IJCAD7

Fri, 29 May 2009 14:04:46 +0900

インテリジャパンが、新製品「IJCAD7」をリリースしました。

プレス発表...
http://www.intelli.jp/CMS/article.php/IJCAD7_Press

残念ながら... これは、長く噂されている「IntelliCAD7」ではありません。

IntelliCADは、日本で紹介されてから10年経過しました。その間、辛口に言えば「大きな機能拡張がされることはなく」... ゆっくりと地道な成長をしています。

この従来ソースコードを使った製品は、リリース案内を見ても「特に見るべきものがない」と言えますが... 長年、不具合修正を繰り返した結果... という点では「安定バージョン」と言えるのかもしれません。

IJCADシリーズは、システムメトリックス社（http://www.systemmetrix.jp/）によって企画された製品であることは有名ですが... 他の海外IntelliCAD製品と同様に、独自ブランドによる独自バージョン番号を採用することによって、「IJCAD」 - ブランドを根付かせたい考えです。「IntelliCADは、ITC会員によって提供されるCAD製品のベーステクノロジーの総称... 」としています。さらに、今後は、Saas & ASP へビジネスエリアを広げたい考えで、CADをサービスとして提供する試みをしています。

IJCADブランドは、IntelliCADテクノロジーをベースに、他のIntelliCAD製品とは異なった特色を出しながら、独自の発展を遂げることを期待しています。

LT-Extender 終焉宣言

Fri, 13 Mar 2009 14:22:43 +0900

AutoCAD LT にカスタマイズ機能を提供するツール...

記事をこちらに移動しました＞ http://www.ebatech.jp/archives/199

なぜ、DRXなの？

Thu, 12 Mar 2009 11:00:55 +0900

こちらに記事を移動しました＞ http://www.ebatech.jp/archives/203

DoubleCAD XT

Tue, 10 Feb 2009 15:13:15 +0900

TurboCADの開発元として知られている IMSIが新しくリリースしたCAD。

記事を、こちらに移動しました> http://www.ebatech.jp/archives/193

OpenDWG DWGdirect 2.7 リリース

Tue, 27 Jan 2009 11:42:58 +0900

ODA が、DWGdirect の新バージョン (2.7) をリリースしました。

記事をこちらに移動しました＞ http://www.ebatech.jp/archives/326

ご挨拶...

Mon, 29 Dec 2008 15:47:13 +0900

今年は、ここを復活させるぞ！と思っておりましたが...　気が付いてみれば？年の瀬を迎えております。(汗)

これからCADのカスタマイズ！を語ろうとした場合、私のポジション的には、DRX-API を無視できないわけで、ネタは、いろいろと暖めているのですが... 材料が揃わない。

にも関わらず、多数のご訪問ありがとうございます。来年は、何か面白いものを提供したいと考えております。

どうぞ、よろしくお願いいたします。

LISP入門第37回: 条件式

Tue, 23 Sep 2008 16:04:54 +0900

(if) 関数の第１引数... （条件式）について、

=	等号(等しい)
/=	不等号(等しくない)
< , <= , > , >=	比較 (大きい,小さい)
and	論理積
or	論理和

LISP では、真（True） = T , 偽（False） = nil

例：

(setq a 5.0) (setq b 10.0)
(= a 5.0)	結果：T
(= a b)	結果：nil
(/= a b)	結果：T
(< a 5.0)	結果：nil
(<= a 5.0)	結果：T
(< a 8.0)	結果：T
(< a b)	結果：T
(and (> a 2.0) (< a 8.0))	結果：T
(or (= a 0.0)(= b 0.0))	結果：nil

入れ子にすることでもっと複雑な条件式を作成することができます。

(or (and (< a 10.0)(< b 10.0)) (= c 0.0))

このような複雑な式は、複数行にして字下げして書くと分かりやすいと思います。

(or
　(and
　　(< a 10.0)
　　(< b 10.0)
　)
　(= c 0.0)
)

LISP入門第36回: 条件によって分岐する

Sun, 21 Sep 2008 09:53:36 +0900

決められた処理を順番に処理するだけであれば、スクリプトで十分。スクリプトとプログラムの決定的な違いは、途中で処理を条件によって分岐できるかどうか？ということになるかと思います。

(if) 関数は、その名の通り「もし～だったら...」という処理に使用します。

例：
　もし、Aの値が、10より大きかったら...
　もし、選択した図形が円だったら...

(setq a 15)
(if (< a 10)
　(princ "10より小さい!")
　(princ "10以上!")
)

結果：10以上

(cond) 関数は、Basic / Pascal / C言語の switch 文に相当します。(if) が、Yes / No 分岐に対して、(cond) は、「Aの値が、1だったら... 2だったら... 3だったら...」という複数の分岐に使えます。

(cond
　((= color 1) (princ "赤です!"))
　((= color 2) (princ "黄です!"))
　((= color 3) (princ "緑です!"))
　(T (princ "それ以外!"))
)

(if) を入れ子にすることで、(cond) と同じような動作をするプログラムを作ることができますが、(cond)を使ったほうが、プログラムがすっきりしますし処理も高速です。

(if (= color 1)
　(princ "赤です!")
　(if (color = 2)
　　(princ "黄です!")
　　(if (color = 3)
　　　(princ "緑です!")
　　　(princ "それ以外!")
　　)
　)
)

AutoCAD LTの座標取得(getpoint)

Sun, 21 Sep 2008 09:34:07 +0900

AutoCAD LTを始めて触った時、AutoLISPが使えない事を知り、「こんな物使えるか!」と思いました。

(getpoint)が使えない事には、ちょっとした作図コマンドすら出来ないので、使いにくいと定評(?)のあるAutoCADの標準コマンドだけで作図をしなければならない。

ある時、「ID;\」と「@」，「$M=$(getvar."LASTPOINT")」を組み合わせたマクロを教えて頂きました。これは、正直、驚きました... その後、パワーユーザーの皆様の創意工夫によって、さまざまなマクロが作成されるようになったのですが、どう頑張ってもLT(DIESEL)では出来ない事が沢山あって... 先にAutoLISPによるAutoCADの拡張性の高さを知ってしまった私としては、どうしてもDIESELに没頭する気にはなれなかったのでした。