aggiornati pacchetti universal_robot e universal_robots_ros_driver

devel/share/roseus/ros/ur_msgs/msg/Analog.l

@@ -12,23 +12,34 @@
 ;;//! \htmlinclude Analog.msg.html
 
 
+(intern "*VOLTAGE*" (find-package "UR_MSGS::ANALOG"))
+(shadow '*VOLTAGE* (find-package "UR_MSGS::ANALOG"))
+(defconstant ur_msgs::Analog::*VOLTAGE* 0)
+(intern "*CURRENT*" (find-package "UR_MSGS::ANALOG"))
+(shadow '*CURRENT* (find-package "UR_MSGS::ANALOG"))
+(defconstant ur_msgs::Analog::*CURRENT* 1)
 (defclass ur_msgs::Analog
   :super ros::object
-  :slots (_pin _state ))
+  :slots (_pin _domain _state ))
 
 (defmethod ur_msgs::Analog
   (:init
    (&key
     ((:pin __pin) 0)
+    ((:domain __domain) 0)
     ((:state __state) 0.0)
     )
    (send-super :init)
    (setq _pin (round __pin))
+   (setq _domain (round __domain))
    (setq _state (float __state))
    self)
   (:pin
    (&optional __pin)
    (if __pin (setq _pin __pin)) _pin)
+  (:domain
+   (&optional __domain)
+   (if __domain (setq _domain __domain)) _domain)
   (:state
    (&optional __state)
    (if __state (setq _state __state)) _state)
@@ -37,6 +48,8 @@
    (+
     ;; uint8 _pin
     1
+    ;; uint8 _domain
+    1
     ;; float32 _state
     4
     ))
@@ -46,6 +59,8 @@
               (make-string-output-stream (send self :serialization-length)))))
      ;; uint8 _pin
        (write-byte _pin s)
+     ;; uint8 _domain
+       (write-byte _domain s)
      ;; float32 _state
        (sys::poke _state (send s :buffer) (send s :count) :float) (incf (stream-count s) 4)
      ;;
@@ -54,22 +69,28 @@
    (buf &optional (ptr- 0))
    ;; uint8 _pin
      (setq _pin (sys::peek buf ptr- :char)) (incf ptr- 1)
+   ;; uint8 _domain
+     (setq _domain (sys::peek buf ptr- :char)) (incf ptr- 1)
    ;; float32 _state
      (setq _state (sys::peek buf ptr- :float)) (incf ptr- 4)
    ;;
    self)
   )
 
-(setf (get ur_msgs::Analog :md5sum-) "341541c8828d055b6dcc443d40207a7d")
+(setf (get ur_msgs::Analog :md5sum-) "f41c08a810adf63713aec88712cd553d")
 (setf (get ur_msgs::Analog :datatype-) "ur_msgs/Analog")
 (setf (get ur_msgs::Analog :definition-)
-      "uint8 pin
+      "uint8 VOLTAGE=0
+uint8 CURRENT=1
+
+uint8 pin
+uint8 domain # can be VOLTAGE or CURRENT
 float32 state
 
 ")
 
 
 
-(provide :ur_msgs/Analog "341541c8828d055b6dcc443d40207a7d")
+(provide :ur_msgs/Analog "f41c08a810adf63713aec88712cd553d")
 
 

devel/share/roseus/ros/ur_msgs/msg/IOStates.l

@@ -153,7 +153,7 @@
    self)
   )
 
-(setf (get ur_msgs::IOStates :md5sum-) "0a5c7b73e3189e9a2caf8583d1bae2e2")
+(setf (get ur_msgs::IOStates :md5sum-) "3033784e7041da89491b97cc4c1105b5")
 (setf (get ur_msgs::IOStates :datatype-) "ur_msgs/IOStates")
 (setf (get ur_msgs::IOStates :definition-)
       "Digital[] digital_in_states
@@ -169,13 +169,17 @@ bool state
 
 ================================================================================
 MSG: ur_msgs/Analog
+uint8 VOLTAGE=0
+uint8 CURRENT=1
+
 uint8 pin
+uint8 domain # can be VOLTAGE or CURRENT
 float32 state
 
 ")
 
 
 
-(provide :ur_msgs/IOStates "0a5c7b73e3189e9a2caf8583d1bae2e2")
+(provide :ur_msgs/IOStates "3033784e7041da89491b97cc4c1105b5")
 
 

devel/share/roseus/ros/ur_msgs/srv/SetSpeedSliderFraction.l

@@ -0,0 +1,139 @@
+;; Auto-generated. Do not edit!
+
+
+(when (boundp 'ur_msgs::SetSpeedSliderFraction)
+  (if (not (find-package "UR_MSGS"))
+    (make-package "UR_MSGS"))
+  (shadow 'SetSpeedSliderFraction (find-package "UR_MSGS")))
+(unless (find-package "UR_MSGS::SETSPEEDSLIDERFRACTION")
+  (make-package "UR_MSGS::SETSPEEDSLIDERFRACTION"))
+(unless (find-package "UR_MSGS::SETSPEEDSLIDERFRACTIONREQUEST")
+  (make-package "UR_MSGS::SETSPEEDSLIDERFRACTIONREQUEST"))
+(unless (find-package "UR_MSGS::SETSPEEDSLIDERFRACTIONRESPONSE")
+  (make-package "UR_MSGS::SETSPEEDSLIDERFRACTIONRESPONSE"))
+
+(in-package "ROS")
+
+
+
+
+
+(defclass ur_msgs::SetSpeedSliderFractionRequest
+  :super ros::object
+  :slots (_speed_slider_fraction ))
+
+(defmethod ur_msgs::SetSpeedSliderFractionRequest
+  (:init
+   (&key
+    ((:speed_slider_fraction __speed_slider_fraction) 0.0)
+    )
+   (send-super :init)
+   (setq _speed_slider_fraction (float __speed_slider_fraction))
+   self)
+  (:speed_slider_fraction
+   (&optional __speed_slider_fraction)
+   (if __speed_slider_fraction (setq _speed_slider_fraction __speed_slider_fraction)) _speed_slider_fraction)
+  (:serialization-length
+   ()
+   (+
+    ;; float64 _speed_slider_fraction
+    8
+    ))
+  (:serialize
+   (&optional strm)
+   (let ((s (if strm strm
+              (make-string-output-stream (send self :serialization-length)))))
+     ;; float64 _speed_slider_fraction
+       (sys::poke _speed_slider_fraction (send s :buffer) (send s :count) :double) (incf (stream-count s) 8)
+     ;;
+     (if (null strm) (get-output-stream-string s))))
+  (:deserialize
+   (buf &optional (ptr- 0))
+   ;; float64 _speed_slider_fraction
+     (setq _speed_slider_fraction (sys::peek buf ptr- :double)) (incf ptr- 8)
+   ;;
+   self)
+  )
+
+(defclass ur_msgs::SetSpeedSliderFractionResponse
+  :super ros::object
+  :slots (_success ))
+
+(defmethod ur_msgs::SetSpeedSliderFractionResponse
+  (:init
+   (&key
+    ((:success __success) nil)
+    )
+   (send-super :init)
+   (setq _success __success)
+   self)
+  (:success
+   (&optional __success)
+   (if __success (setq _success __success)) _success)
+  (:serialization-length
+   ()
+   (+
+    ;; bool _success
+    1
+    ))
+  (:serialize
+   (&optional strm)
+   (let ((s (if strm strm
+              (make-string-output-stream (send self :serialization-length)))))
+     ;; bool _success
+       (if _success (write-byte -1 s) (write-byte 0 s))
+     ;;
+     (if (null strm) (get-output-stream-string s))))
+  (:deserialize
+   (buf &optional (ptr- 0))
+   ;; bool _success
+     (setq _success (not (= 0 (sys::peek buf ptr- :char)))) (incf ptr- 1)
+   ;;
+   self)
+  )
+
+(defclass ur_msgs::SetSpeedSliderFraction
+  :super ros::object
+  :slots ())
+
+(setf (get ur_msgs::SetSpeedSliderFraction :md5sum-) "172aeb6c49379a44cf68480fa5bfad3c")
+(setf (get ur_msgs::SetSpeedSliderFraction :datatype-) "ur_msgs/SetSpeedSliderFraction")
+(setf (get ur_msgs::SetSpeedSliderFraction :request) ur_msgs::SetSpeedSliderFractionRequest)
+(setf (get ur_msgs::SetSpeedSliderFraction :response) ur_msgs::SetSpeedSliderFractionResponse)
+
+(defmethod ur_msgs::SetSpeedSliderFractionRequest
+  (:response () (instance ur_msgs::SetSpeedSliderFractionResponse :init)))
+
+(setf (get ur_msgs::SetSpeedSliderFractionRequest :md5sum-) "172aeb6c49379a44cf68480fa5bfad3c")
+(setf (get ur_msgs::SetSpeedSliderFractionRequest :datatype-) "ur_msgs/SetSpeedSliderFractionRequest")
+(setf (get ur_msgs::SetSpeedSliderFractionRequest :definition-)
+      "
+
+
+
+
+float64 speed_slider_fraction
+---
+bool success
+
+")
+
+(setf (get ur_msgs::SetSpeedSliderFractionResponse :md5sum-) "172aeb6c49379a44cf68480fa5bfad3c")
+(setf (get ur_msgs::SetSpeedSliderFractionResponse :datatype-) "ur_msgs/SetSpeedSliderFractionResponse")
+(setf (get ur_msgs::SetSpeedSliderFractionResponse :definition-)
+      "
+
+
+
+
+float64 speed_slider_fraction
+---
+bool success
+
+")
+
+
+
+(provide :ur_msgs/SetSpeedSliderFraction "172aeb6c49379a44cf68480fa5bfad3c")
+
+