■□ ＣＡＤＭＥＩＳＴＥＲ　ＬＯＵＮＧＥ　〜ＶＯＬ．４〜
────────────────────────────　2007/12/25配信
　みなさん、こんにちは！

　2007年も残すところわずかとなりました。
　ホントに月日が経つのは早いものですね。

  この時期は、忘年会にクリスマスに年賀状におおわらわ。

　神様が走り回るぐらい忙しいことから「師走」となった
　そうですが、それももうすぐです。

　走りすぎて、インフルエンザにならないよう、
　くれぐれもお体にはお気をつけ下さい。

　▼第4号のラインアップはこちらです！！

　…＜ＣＯＮＴＥＮＴＳ＞………………………………………………………………

  【１】ソフトボール大会/UEL Forum 2007 in NAGOYAを開催しました！
　【２】ＳＥ片山のズバリ解決します！（ＣＡＤＭＥＩＳＴＥＲ編）
　【３】りえこらむ　〜事務職のひとり言〜
　【４】作ってみよう！ＣＡＤＭＥＩＳＴＥＲコマンド

　……………………………………………………………………………………………

　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
　【１】ソフトボール大会/UEL Forum 2007 in NAGOYAを開催しました！
　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

　�@ソフトボール大会
    11月17日（土）、熱田神宮公園球技場でソフトボール大会を行いました。
　　当日は、爽やかな快晴に恵まれ、4チーム（株式会社エス・エヌ・ビー様、
　　株式会社ナガラ様、松岡特殊鋼株式会社様、UEL)73名が参加しました。

　　参加者は気合が入っていたのか、もしくは朝から冷え込んでいたせいなのか、
　　準備もほどほどに、キャッチボールやノックで早速、体を温めていました。

　　当日はリーグ戦で試合が行われ、優勝はナガラ様（何と全勝！）２〜４位は１
　　勝２敗で並びましたが、得失点差の僅差（？）で、松岡特殊鋼様、
　　エス・エヌ・ビー様、UELの順でした。

　　我々UELは、たった1時間の練習でしのいだ《急造チーム》が災いしたのか、
　　珍プレーに、三球三振連発というありさま…。

　　鉄人金本に倣い、フルイニング出場を宣言した幣営業部長伊藤は、
　　翌週、足がスティック（＝ルー語）いや棒になっていたとか…。

　　表彰式では、優勝チームの他、試合で活躍した各チームのMVPに、東京ディズ
　　ニーランド・ペアチケットが贈られました。

　　何より、皆さんケガも無く無事で楽しんでもらえて、大変良かったです。
　　なお、意外と好評だった（？）この企画、来年以降も継続する…かもしれません。
　　「我こそは！」というお客様のエントリーをお待ちしております。


　�AUEL Forum 2007 in NAGOYA
　　12月20日(火)、名古屋栄東急インで、『UEL Forum 2007 in 名古屋』を開催
　　しました。

　　弊社社長山本の挨拶に続き、基調講演としてエイキット株式会社様から、
　　また株式会社ナガラ様、株式会社モールデックの事例紹介を中心としたプログ
　　ラムで、あっという間に予定の3時間が経ってしまいました。

　　また、会場内には新製品紹介コーナーを用意し、休憩中ドリンクを片手に、
　　デモの模様をご覧になる方、見るだけでは物足りず、機能について質問される
　　方で多数いらっしゃいました。

　　セミナー後は、ユーザー様との懇親を図り、日頃のご愛顧に感謝するという
　　ことで、全員参加の抽選会が行われ、37インチAQUOS、中国大連2泊3日ツアー、
　　ディズニーランド・ペアチケット、i-Podを初めとする商品をお持ち帰りいた
　　だきました。

　　今後、セミナー等のイベントを順次企画していますので、奮ってご参加下さい！

　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
　【２】ＳＥ片山のズバリ解決します！（ＣＡＤＭＥＩＳＴＥＲ編）
　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

　みなさん、こんにちは！
　ＵＥＬテクニカルコールセンターの片山です。

　今回も、CADmeisterに多く寄せられる質問をまとめました。
　今後のご参考にしてください。


  Q.3D注記の文字サイズを変更することはできますか？

　A.立体/3D注記/3D注記_プロパティ変更コマンドを起動します。
　　変更したい3D注記をピックし、中クリックで決定します。
　 「サイズ」のボタンをクリックし、任意の値を入力してEnterキーを押します。
　 「OK」ボタンを押してサイズの変更をご確認ください。

　Q.CADmeisterで特定の色の線のみレイヤ分けすることはできますか？

  A.レイヤ分けする要素を選択する際に要素検出フィルタツールバー内で、その
    線色を選択してください。
　  その後、要素をRGNで範囲指示して頂くと指定した線色の線のみ選択されます
    ので、容易にレイヤ分けすることができます。

　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
　【３】りえこらむ
　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
　事務職のりえこです。

  寒い日が続いてますが、皆さん風邪ひいてませんか？？
  年末年始はいろいろな行事があるので、寝込んでしまわないように、
  気を付けて下さいね。

  今日は、ついにクリスマスですね。
 『クリスマス』っといえば皆さんは何を思い浮かべますか？？

  デート？
  ケーキ？
  プレゼント？
  イルミネーション？

  子供のころは、クリスマスの楽しみといえば、プレゼントだったんですが・・・。
  サンタが我が家にこなくなってから、『イルミネーションを見ること』が唯一の
  楽しみになっちゃいました。

  毎年１１月中ごろからいろいろなところでクリスマスのイルミネーションが
  キラキラしていて、寒い中歩いていてもなんだか楽しい気分になりますよね。

  今年こそ！神戸のルミナリエに行きたかったんですけど、、、
  ルミナリエってクリスマスまでじゃないんですね。
  今年は１２月１７日で終了してました・・・。

  行く前に調べてて良かったです。。。

  イルミネーション＝クリスマスって言う構造が勝手に出来てしまってるんです
　けど、ルミナリエは震災からの復興と希望の為に、震災の有った１２月に開催
　されるそうです。
  そんなルミナリエも協賛の会社が減ってしまって、２年連続で赤字だそうで
　すね。。。
  来年ルミナリエは開催されるのか・・・今から心配です。

  今日が終わると、あっという間にお正月飾りに模様替えしてしまうんですよねー。
  クリスマスイルミネーションも今日から見られなくなると思うと少し寂しくなり
　ますね。

  皆さんは、今年イルミネーション見に行かれましたか？
  今日イルミネーションを見に行かれる方は、暖かくして出かけてくださいね。


　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
　【４】作ってみよう！ＣＡＤＭＥＩＳＴＥＲコマンド
　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
　お待たせいたしました【CADmeister版カスタマイズコマンドプログラム編】の
　第３回目です。

　前回のプログラム『WF_TRM.sc』を準備して下さい。

　では、スタートします。

　下の手順をよく読んで皆さんチャレンジしてくださいm(_ _)m

　《貼り付け手順》

　�@【スタート】−【すべてのプログラム】−【アクセサリ】−【メモ帳】を起動
　　します。

　�A【ファイル】−【開く】にて、前回の『WF_TRM.sc』を選択します。

　�B下部【ここからコピーしてください。】〜【今回はここまでコピーしてください。】
　　までをコピーして下さい。

　�C前回の最後の行から貼り付けます。

　�D『WF_TRM.sc』という名前で上書き保存します。


　　----↓↓↓↓↓ここの下からコピーしてください。↓↓↓↓↓----------------
　/* 線面交点
　#PNT_SRF_INT << TFACE, TRMENT >> N_CRSID, CRSID
　IF ( $SCRERR != $SUCCESS ) THEN
  　  /* メッセージ削除
    　DSPERRMSG("", $EMSGINF)
    　/* 交点作成フラグ(線と面は離れている)
    　CRSFLG = 0
　ENDIF

　/*
　/* 変更線の端点取得
　/*
　/* 始点
　EPNT[1] = ENDPNT( TRMENT.ID, 1 )
　IF ( $SYSERR != $SUCCESS ) THEN
  　  ABORT("変更線の端点取得でエラーが発生しました")
　ENDIF
　/* 終点
　EPNT[2] = ENDPNT( TRMENT.ID, 2 )
　IF ( $SYSERR != $SUCCESS ) THEN
  　  ABORT("変更線の端点取得でエラーが発生しました")
　ENDIF


　/*
　/* 変更線トリム
　/*
　/* 交点がある
　IF ( CRSFLG == 1 ) THEN
  　  /* 交点の座標値取得
    　GET_GEO( CRSID, CRSPNT )
    　IF ( $DBERR != $SUCCESS ) THEN
      　  ABORT("交点座標値取得でエラーが発生しました")
   　 ENDIF
   　 DEL_GEO( CRSID )

　    /* トリム
  　  #MCV_TRM_PNT << $UPDATE, CRSPNT, TRMENT >> N_TRMID, TRMID
    　IF ( $SCRERR != $SUCCESS ) THEN
     　   /* メッセージ消去
       　 DSPERRMSG("", $EMSGINF)

　        /* 線面交点と、線の始点、終点どちらかが同じ座標だった場合は
  　      /* 線と面の交点は無い事とする
    　    /* 始点側、終点側どちらも面まで伸ばしたいとき、円弧用
      　  /*
     　   /* 座標値比較
      　  /*
       　 IF ( ABS(EPNT[1].XYZ.PNT.X - CRSPNT.X) < 0.0001 &;
        　     ABS(EPNT[1].XYZ.PNT.Y - CRSPNT.Y) < 0.0001 &;
          　   ABS(EPNT[1].XYZ.PNT.Z - CRSPNT.Z) < 0.0001 ) THEN

　            CRSFLG = 0

　        ELSEIF ( ABS(EPNT[2].XYZ.PNT.X - CRSPNT.X) < 0.0001 &;
  　               ABS(EPNT[2].XYZ.PNT.Y - CRSPNT.Y) < 0.0001 &;
  　               ABS(EPNT[2].XYZ.PNT.Z - CRSPNT.Z) < 0.0001 ) THEN

  　          CRSFLG = 0

　        ELSE

　            ABORT("変更線のトリムでエラーが発生しました")

　        ENDIF
  　  ENDIF
　ENDIF
----↑↑↑↑↑今回はここの上までコピーしてください。↑↑↑↑↑---------
----↓↓↓↓↓次回は最後までのプログラムをお送りいたします。↓↓↓↓↓---------


　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
　配信停止、及び配信先メールアドレスの変更を希望される方は、
　下記からお手続きください。

　Daiki.Tago＠excel.co.jp

　■ 編　集　日本ユニシス・エクセリューションズ株式会社　中部営業部
　■ 発　行　日本ユニシス・エクセリューションズ株式会社
　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━