Sub Main
	' プロバイダのコントロールの取得
	Set oCtrl = cao.AddController("RC1","CaoProv.Dummy", "", "")

	' ロボットコントロールの取得
	Set oRob = oCtrl.AddRobot("arm")

	' ロボットのスピード設定
	oRob.Speed -1, 100

	' ロボットの移動
	oRob.Move 1, "(487.08,41.75,-54.00,36.00,1)"
	oRob.Move 1, "@P P11"
	oRob.Move 1, "@E P12"
End Sub