def add shape_name, tkar_id, flags, layer, x, y, r, *params
      del(tkar_id)
      
      tkaroid = Tkaroid.new do |t|
        t.shape   = get_shape(shape_name)
        t.id      = tkar_id
        t.flags   = flags
        t.layer   = layer
        t.x       = x
        t.y       = y
        t.r       = r
        t.params  = params
        t.newly_added = true
      end

      @objects[tkar_id] = tkaroid
      @changed[tkar_id] = tkaroid
    end
def add shape_name, tkar_id, flags, layer, x, y, r, *params
      del(tkar_id)
      
      tkaroid = Tkaroid.new do |t|
        t.shape   = get_shape(shape_name)
        t.id      = tkar_id
        t.flags   = flags
        t.layer   = layer
        t.x       = x
        t.y       = y
        t.r       = r
        t.params  = params
        t.newly_added = true
      end

      @objects[tkar_id] = tkaroid
      @changed[tkar_id] = tkaroid
    end
------------------------
 :section: Commands

 Methods which handle incoming commands.
 ------------------------