class Module
  def attr_bool(*ids)
    for id in ids
      module_eval <<-"end_eval"
        attr_reader #{id.inspect}
        def #{id.to_s}=(value)
          @#{id.to_s} = (value == 0 ? false : true) if value.is_a? Integer
          @#{id.to_s} = value if value == true || value == false
        end
      end_eval
    end
  end  
end