ID : 642
Vis.GetCalData
機能
指定したCal番号の変換行列を返します。
解説
指定した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