<< 前へ        次へ >>

ID : 642

Vis.GetCalData

機能

指定したCal番号の変換行列を返します。

構文

Vis.GetCalData(Cal番号)

指定項目

Cal番号
Calデータテーブルの番号(0~31)を整数型データで指定します。

戻り値

登録されている変換行列をバリアント型の配列で返します。各要素は単精度実数型データです。

解説

指定したCal番号の変換行列を返します。

注意事項

-

用例

'!TITLE "指定したCal番号の変換行列の取得"
' Cal番号1の変換行列を取得
Sub Sample_VisGetCalData

  Dim aaa( 1 ) As Single
  Dim bbb( 1 ) As Single
  Dim ccc( 1 ) As Single
  Dim ddd As Vector
  Dim eee As Vector
  Dim fff As Vector
  Dim ggg As Integer
  Dim hhh As Variant
  Dim iii As Integer

  ggg = 1

  aaa( 0 ) = 50
  aaa( 1 ) = 50
  bbb( 0 ) = 50
  bbb( 1 ) = 300
  ccc( 0 ) = 500
  ccc( 1 ) = 300

  ddd = V( 325, 112.5, 279 )
  eee = V( 200, 112.5, 279 )
  fff = V( 200, -112.5, 279 )

  ' 視覚座標とロボット座標のキャリブレーション
  Vis.CalTrans ggg, aaa( 0 ), aaa( 1 ), ddd, bbb( 0 ), bbb( 1 ),
               eee, ccc( 0 ), ccc( 1 ), fff

  ' Cal番号1の変換行列をhhhに代入
  hhh = Vis.GetCalData( 1 )

  For iii = 0 To 11

    ' メッセージ出力ウィンドウにCal番号1の変換行列を表示
    PrintDbg hhh( iii )

  Next

End Sub

ID : 642

<< 前へ        次へ >>