; Auto-generated. Do not edit! (cl:in-package Quadrotor_manipulador-msg) ;//! \htmlinclude Lectura_datos.msg.html (cl:defclass (roslisp-msg-protocol:ros-message) ((tiempo :reader tiempo :initarg :tiempo :type cl:float :initform 0.0) (dt :reader dt :initarg :dt :type cl:float :initform 0.0) (position :reader position :initarg :position :type cl:float :initform 0.0) (desired_position :reader desired_position :initarg :desired_position :type cl:float :initform 0.0) (velocity :reader velocity :initarg :velocity :type cl:float :initform 0.0) (commanded_effort :reader commanded_effort :initarg :commanded_effort :type cl:float :initform 0.0) (measured_effort :reader measured_effort :initarg :measured_effort :type cl:float :initform 0.0)) ) (cl:defclass Lectura_datos () ()) (cl:defmethod cl:initialize-instance :after ((m ) cl:&rest args) (cl:declare (cl:ignorable args)) (cl:unless (cl:typep m 'Lectura_datos) (roslisp-msg-protocol:msg-deprecation-warning "using old message class name Quadrotor_manipulador-msg: is deprecated: use Quadrotor_manipulador-msg:Lectura_datos instead."))) (cl:ensure-generic-function 'tiempo-val :lambda-list '(m)) (cl:defmethod tiempo-val ((m )) (roslisp-msg-protocol:msg-deprecation-warning "Using old-style slot reader Quadrotor_manipulador-msg:tiempo-val is deprecated. Use Quadrotor_manipulador-msg:tiempo instead.") (tiempo m)) (cl:ensure-generic-function 'dt-val :lambda-list '(m)) (cl:defmethod dt-val ((m )) (roslisp-msg-protocol:msg-deprecation-warning "Using old-style slot reader Quadrotor_manipulador-msg:dt-val is deprecated. Use Quadrotor_manipulador-msg:dt instead.") (dt m)) (cl:ensure-generic-function 'position-val :lambda-list '(m)) (cl:defmethod position-val ((m )) (roslisp-msg-protocol:msg-deprecation-warning "Using old-style slot reader Quadrotor_manipulador-msg:position-val is deprecated. Use Quadrotor_manipulador-msg:position instead.") (position m)) (cl:ensure-generic-function 'desired_position-val :lambda-list '(m)) (cl:defmethod desired_position-val ((m )) (roslisp-msg-protocol:msg-deprecation-warning "Using old-style slot reader Quadrotor_manipulador-msg:desired_position-val is deprecated. Use Quadrotor_manipulador-msg:desired_position instead.") (desired_position m)) (cl:ensure-generic-function 'velocity-val :lambda-list '(m)) (cl:defmethod velocity-val ((m )) (roslisp-msg-protocol:msg-deprecation-warning "Using old-style slot reader Quadrotor_manipulador-msg:velocity-val is deprecated. Use Quadrotor_manipulador-msg:velocity instead.") (velocity m)) (cl:ensure-generic-function 'commanded_effort-val :lambda-list '(m)) (cl:defmethod commanded_effort-val ((m )) (roslisp-msg-protocol:msg-deprecation-warning "Using old-style slot reader Quadrotor_manipulador-msg:commanded_effort-val is deprecated. Use Quadrotor_manipulador-msg:commanded_effort instead.") (commanded_effort m)) (cl:ensure-generic-function 'measured_effort-val :lambda-list '(m)) (cl:defmethod measured_effort-val ((m )) (roslisp-msg-protocol:msg-deprecation-warning "Using old-style slot reader Quadrotor_manipulador-msg:measured_effort-val is deprecated. Use Quadrotor_manipulador-msg:measured_effort instead.") (measured_effort m)) (cl:defmethod roslisp-msg-protocol:serialize ((msg ) ostream) "Serializes a message object of type '" (cl:let ((bits (roslisp-utils:encode-double-float-bits (cl:slot-value msg 'tiempo)))) (cl:write-byte (cl:ldb (cl:byte 8 0) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 8) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 16) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 24) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 32) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 40) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 48) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 56) bits) ostream)) (cl:let ((bits (roslisp-utils:encode-double-float-bits (cl:slot-value msg 'dt)))) (cl:write-byte (cl:ldb (cl:byte 8 0) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 8) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 16) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 24) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 32) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 40) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 48) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 56) bits) ostream)) (cl:let ((bits (roslisp-utils:encode-double-float-bits (cl:slot-value msg 'position)))) (cl:write-byte (cl:ldb (cl:byte 8 0) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 8) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 16) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 24) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 32) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 40) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 48) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 56) bits) ostream)) (cl:let ((bits (roslisp-utils:encode-double-float-bits (cl:slot-value msg 'desired_position)))) (cl:write-byte (cl:ldb (cl:byte 8 0) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 8) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 16) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 24) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 32) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 40) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 48) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 56) bits) ostream)) (cl:let ((bits (roslisp-utils:encode-double-float-bits (cl:slot-value msg 'velocity)))) (cl:write-byte (cl:ldb (cl:byte 8 0) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 8) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 16) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 24) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 32) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 40) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 48) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 56) bits) ostream)) (cl:let ((bits (roslisp-utils:encode-double-float-bits (cl:slot-value msg 'commanded_effort)))) (cl:write-byte (cl:ldb (cl:byte 8 0) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 8) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 16) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 24) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 32) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 40) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 48) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 56) bits) ostream)) (cl:let ((bits (roslisp-utils:encode-double-float-bits (cl:slot-value msg 'measured_effort)))) (cl:write-byte (cl:ldb (cl:byte 8 0) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 8) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 16) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 24) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 32) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 40) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 48) bits) ostream) (cl:write-byte (cl:ldb (cl:byte 8 56) bits) ostream)) ) (cl:defmethod roslisp-msg-protocol:deserialize ((msg ) istream) "Deserializes a message object of type '" (cl:let ((bits 0)) (cl:setf (cl:ldb (cl:byte 8 0) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 8) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 16) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 24) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 32) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 40) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 48) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 56) bits) (cl:read-byte istream)) (cl:setf (cl:slot-value msg 'tiempo) (roslisp-utils:decode-double-float-bits bits))) (cl:let ((bits 0)) (cl:setf (cl:ldb (cl:byte 8 0) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 8) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 16) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 24) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 32) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 40) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 48) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 56) bits) (cl:read-byte istream)) (cl:setf (cl:slot-value msg 'dt) (roslisp-utils:decode-double-float-bits bits))) (cl:let ((bits 0)) (cl:setf (cl:ldb (cl:byte 8 0) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 8) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 16) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 24) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 32) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 40) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 48) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 56) bits) (cl:read-byte istream)) (cl:setf (cl:slot-value msg 'position) (roslisp-utils:decode-double-float-bits bits))) (cl:let ((bits 0)) (cl:setf (cl:ldb (cl:byte 8 0) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 8) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 16) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 24) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 32) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 40) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 48) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 56) bits) (cl:read-byte istream)) (cl:setf (cl:slot-value msg 'desired_position) (roslisp-utils:decode-double-float-bits bits))) (cl:let ((bits 0)) (cl:setf (cl:ldb (cl:byte 8 0) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 8) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 16) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 24) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 32) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 40) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 48) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 56) bits) (cl:read-byte istream)) (cl:setf (cl:slot-value msg 'velocity) (roslisp-utils:decode-double-float-bits bits))) (cl:let ((bits 0)) (cl:setf (cl:ldb (cl:byte 8 0) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 8) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 16) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 24) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 32) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 40) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 48) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 56) bits) (cl:read-byte istream)) (cl:setf (cl:slot-value msg 'commanded_effort) (roslisp-utils:decode-double-float-bits bits))) (cl:let ((bits 0)) (cl:setf (cl:ldb (cl:byte 8 0) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 8) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 16) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 24) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 32) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 40) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 48) bits) (cl:read-byte istream)) (cl:setf (cl:ldb (cl:byte 8 56) bits) (cl:read-byte istream)) (cl:setf (cl:slot-value msg 'measured_effort) (roslisp-utils:decode-double-float-bits bits))) msg ) (cl:defmethod roslisp-msg-protocol:ros-datatype ((msg (cl:eql '))) "Returns string type for a message object of type '" "Quadrotor_manipulador/Lectura_datos") (cl:defmethod roslisp-msg-protocol:ros-datatype ((msg (cl:eql 'Lectura_datos))) "Returns string type for a message object of type 'Lectura_datos" "Quadrotor_manipulador/Lectura_datos") (cl:defmethod roslisp-msg-protocol:md5sum ((type (cl:eql '))) "Returns md5sum for a message object of type '" "cc3f9c97283a87b72e41dda3fdfe942f") (cl:defmethod roslisp-msg-protocol:md5sum ((type (cl:eql 'Lectura_datos))) "Returns md5sum for a message object of type 'Lectura_datos" "cc3f9c97283a87b72e41dda3fdfe942f") (cl:defmethod roslisp-msg-protocol:message-definition ((type (cl:eql '))) "Returns full string definition for message of type '" (cl:format cl:nil "float64 tiempo #tiempo de aplicacion del control~%float64 dt #Incremento de tiempo~%float64 position #Posicion ~%float64 desired_position #Posicion deseada~%float64 velocity #Velocidad~%float64 commanded_effort #Esfuerzo comandado~%float64 measured_effort #Esfuerzo medido~%~%~%")) (cl:defmethod roslisp-msg-protocol:message-definition ((type (cl:eql 'Lectura_datos))) "Returns full string definition for message of type 'Lectura_datos" (cl:format cl:nil "float64 tiempo #tiempo de aplicacion del control~%float64 dt #Incremento de tiempo~%float64 position #Posicion ~%float64 desired_position #Posicion deseada~%float64 velocity #Velocidad~%float64 commanded_effort #Esfuerzo comandado~%float64 measured_effort #Esfuerzo medido~%~%~%")) (cl:defmethod roslisp-msg-protocol:serialization-length ((msg )) (cl:+ 0 8 8 8 8 8 8 8 )) (cl:defmethod roslisp-msg-protocol:ros-message-to-list ((msg )) "Converts a ROS message object to a list" (cl:list 'Lectura_datos (cl:cons ':tiempo (tiempo msg)) (cl:cons ':dt (dt msg)) (cl:cons ':position (position msg)) (cl:cons ':desired_position (desired_position msg)) (cl:cons ':velocity (velocity msg)) (cl:cons ':commanded_effort (commanded_effort msg)) (cl:cons ':measured_effort (measured_effort msg)) )) e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.


MODELADO, CONTROL Y SIMULACIÓN DE UN QUADROTOR EQUIPADO CON UN BRAZO MANIPULADOR ROBÓTICO

: Ragel De La Torre, Ricardo
: Ingeniería Industrial
Contenido del proyecto: