Sub Main
	Set RC7 = Cao.AddController("RC7", "CaoProv.DENSO.NetwoRC", "", "Conn=eth:192.168.0.1")
	Set Robo = RC7.AddRobot("VM")

	Set Ctrl = Cao.AddController("Joy", "CaoProv.DENSO.Joystick", "", "ID=1, @EventDisable=True")
	set X = Ctrl.AddVariable("@X")
	set Y = Ctrl.AddVariable("@Y")
	
	Robo.Speed -1, 100
	Do
		v = "V(" & (X.Value * 5) & "," & (Y.Value * 5) & ",0)"
		Dbg.Output v
		Robo.Draw 1, v, "next"
	Loop
End Sub