aggiornati pacchetti universal_robot e universal_robots_ros_driver
This commit is contained in:
@@ -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")
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user