extenso_pt 0.5.7 → 0.5.8

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 9801fcabf1093be0b72526b73018bc35a4ba41dcd7ed605a56a47096cf8b30a6
-  data.tar.gz: e8e1a1103571ebc158c1c915d0146d9727e29f46d77418300dbcf42e01e9fe8e
+  metadata.gz: 957540b2bccdc61b30b6c221465b11573c9570720729dafd3df982ab73216da1
+  data.tar.gz: 4f2159763f75b938535d61c293834f0f039395d577521d7d8d56cbe19592fe42
 SHA512:
-  metadata.gz: b69172bc248e90890a9c5ac2283e30b3d63208d0553ec6f95535f844aacd98f0d82fba7e2fbf779d3d7ed386e5170b085dc2f91cd518b58e3a40ca664ce991b0
-  data.tar.gz: afda6adfd8b283323fd801344659fdf2238bf273d080d1d710b2b2169e3cd9ebc0bdc358b1baf0e53e5a5657090e77abe29e3aefb5d78e19065cb39aeeae0ae9
+  metadata.gz: ec98f28a4969f2ed153086b55b781b89c617276d4d16bbb3de600dfa765b083a7ee6abd832a0f7d44eb13f7801deb189e1f7dc2890210934dbf5b27f09a79175
+  data.tar.gz: af1f863cad4cbce9c8aeaceb0353ccc2518ca7155428fa5fb4554fc095eecacae9222e1337cb7261462900b0f383dfd2cc1fa9c4ea913daf9bc9ad77a85022ed

data/Gemfile.lock

@@ -1,7 +1,8 @@
 PATH
   remote: .
   specs:
-    extenso_pt (0.5.7)
+    extenso_pt (0.5.8)
+      bigdecimal (~> 1.4.4)
 
 GEM
   remote: https://rubygems.org/
@@ -14,7 +15,6 @@ PLATFORMS
   ruby
 
 DEPENDENCIES
-  bigdecimal (~> 1.4.4)
   bundler (~> 1.17)
   extenso_pt!
   minitest (~> 5.0)

data/README.md

@@ -1,6 +1,6 @@
 # ExtensoPt [![Build Status](https://travis-ci.org/hernanilr/extenso_pt.svg?branch=master)](https://travis-ci.org/hernanilr/extenso_pt)
 
-Produz valores monetários por extenso em portugês de portugal ou brasil. Os valores podem ser um numerico, uma string de digitos ou um conjunto destes (array, range, hash). O extenso pode ser produzido na escala longa (utilizada em todos os países lusófonos) ou na escala curta (utilizada no Brasil) [wiki](https://pt.wikipedia.org/wiki/Escalas_curta_e_longa). Pode ainda escolher a moeda e a fração da moeda.
+Converte valores monetários em extenso de portugês de portugal, brasil ou numeracao romana. Os valores podem ser um numerico, uma string de digitos ou um conjunto destes (array, range, hash). O extenso pode ser produzido na escala longa (utilizada em todos os países lusófonos) ou na escala curta (utilizada no Brasil) [wiki](https://pt.wikipedia.org/wiki/Escalas_curta_e_longa). Pode ainda converter os valores em numeracao romana e vice versa.
 
 ## Installation
 
@@ -21,7 +21,9 @@ Or install it yourself as:
 ## Usage
 
 ```ruby
-"1234".extenso                                     => "MIL DUZENTOS E TRINTA E QUATRO EUROS"
+1234.extenso                                       => "MIL DUZENTOS E TRINTA E QUATRO EUROS"
+1234.romana                                        => "MCCXXXIV" 
+"MCCXXXIV".romana                                  => 1234
 12000000.12.extenso                                => "DOZE MILHÕES DE EUROS E DOZE CÊNTIMOS"
 1.01.extenso(msingular:"DÓLAR")                    => "UM DÓLAR E UM CÊNTIMO"         
 10.1.extenso(mplural:"DÓLARES")                    => "DEZ DÓLARES E DEZ CÊNTIMOS"      # plural inferido <silgular> mais "S"

data/extenso_pt.gemspec

@@ -12,14 +12,14 @@ Gem::Specification.new do |spec|
   spec.homepage      = 'https://github.com/hernanilr/extenso_pt'
   spec.license       = 'MIT'
 
-  spec.summary = 'Produz valores monetários por extenso '\
-  'em portugês de portugal ou brasil.'
-
-  spec.description = spec.summary + ' Os valores podem ser um numerico, uma '\
-  'string de digitos ou um conjunto destes (array, range, hash). O extenso '\
-  'pode ser produzido na escala longa (utilizada em todos os países '\
-  'lusófonos) ou na escala curta (utilizada no Brasil). Pode ainda escolher '\
-  'a moeda e a fração da moeda.'
+  spec.summary = 'Converte valores monetários em extenso de portugês de ' \
+    'portugal, brasil ou numeracao romana.'
+  spec.description = spec.summary
+  spec.description += ' Os valores podem ser um numerico, uma string ' \
+    'de digitos ou um conjunto destes (array, range, hash). O extenso ' \
+    'pode ser produzido na escala longa (utilizada em todos os países ' \
+    'lusófonos) ou na escala curta (utilizada no Brasil). Pode ainda ' \
+    'converter os valores em numeracao romana e vice versa.'
 
   spec.metadata['yard.run'] = 'yard' # use "yard" to build full HTML docs.
   spec.metadata['homepage_uri'] = spec.homepage
@@ -34,8 +34,9 @@ Gem::Specification.new do |spec|
   spec.executables   = spec.files.grep(%r{^exe/}) { |f| File.basename(f) }
   spec.require_paths = ['lib']
 
-  spec.add_development_dependency 'bigdecimal', '~> 1.4.4'
   spec.add_development_dependency 'bundler', '~> 1.17'
   spec.add_development_dependency 'minitest', '~> 5.0'
   spec.add_development_dependency 'rake', '~> 10.0'
+
+  spec.add_dependency 'bigdecimal', '~> 1.4.4'
 end

data/lib/extenso_pt/constantes.rb

@@ -0,0 +1,56 @@
+# frozen_string_literal: true
+
+# @author Hernani Rodrigues Vaz
+module ExtensoPt
+  # constantes para producao de extenso em portugues de portugal ou brasil
+  EXTLC = %i[pt br].freeze
+  A0020 = {
+    pt: ['', 'UM', 'DOIS', 'TRÊS', 'QUATRO', 'CINCO', 'SEIS', 'SETE',
+         'OITO', 'NOVE', 'DEZ', 'ONZE', 'DOZE', 'TREZE', 'CATORZE',
+         'QUINZE', 'DEZASSEIS', 'DEZASSETE', 'DEZOITO', 'DEZANOVE'],
+    br: ['', 'UM', 'DOIS', 'TRES', 'QUATRO', 'CINCO', 'SEIS', 'SETE',
+         'OITO', 'NOVE', 'DEZ', 'ONZE', 'DOZE', 'TREZE', 'QUATORZE',
+         'QUINZE', 'DEZESSEIS', 'DEZESSETE', 'DEZOITO', 'DEZENOVE']
+  }.freeze
+  A0100 = {
+    pt: ['', '', 'VINTE', 'TRINTA', 'QUARENTA', 'CINQUENTA', 'SESSENTA',
+         'SETENTA', 'OITENTA', 'NOVENTA'],
+    br: ['', '', 'VINTE', 'TRINTA', 'QUARENTA', 'CINQUENTA', 'SESSENTA',
+         'SETENTA', 'OITENTA', 'NOVENTA']
+  }.freeze
+  A1000 = {
+    pt: ['', 'CEM', 'CENTO', 'DUZENTOS', 'TREZENTOS', 'QUATROCENTOS',
+         'QUINHENTOS', 'SEISCENTOS', 'SETECENTOS', 'OITOCENTOS', 'NOVECENTOS'],
+    br: ['', 'CEM', 'CENTO', 'DUZENTOS', 'TREZENTOS', 'QUATROCENTOS',
+         'QUINHENTOS', 'SEISCENTOS', 'SETECENTOS', 'OITOCENTOS', 'NOVECENTOS']
+  }.freeze
+
+  # escala longa portugal segundo convencao entre varios paises,
+  #  na 9a Conferencia Geral de Pesos e Medidas (12-21 de Outubro de 1948),
+  #  organizada pelo Bureau International des Poids et Mesures
+  # 1 000 000 = milhao
+  # 1 000 000 000 000 = biliao
+  # 1 000 000 000 000 000 000 = triliao
+  # 1 000 000 000 000 000 000 000 000 = quadriliao
+  # 1 000 000 000 000 000 000 000 000 000 000 = quintiliao
+  # 1 000 000 000 000 000 000 000 000 000 000 000 000 = sextiliao
+  S1E24 = { pt: ['', 'MIL', ' MILHÃO', ' MIL MILHÃO', ' BILIÃO',
+                 ' MIL BILIÃO', ' TRILIÃO', ' MIL TRILIÃO'],
+            br: ['', 'MIL', ' MILHÃO', ' BILHÃO', ' TRILHÃO',
+                 ' QUADRILHÃO', ' QUINTILHÃO', ' SEXTILHÃO'] }.freeze
+  P1E24 = { pt: ['', ' MIL', ' MILHÕES', ' MIL MILHÕES', ' BILIÕES',
+                 ' MIL BILIÕES', ' TRILIÕES', ' MIL TRILIÕES'],
+            br: ['', ' MIL', ' MILHÕES', ' BILHÕES', ' TRILHÕES',
+                 ' QUADRILHÕES', ' QUINTILHÕES', ' SEXTILHÕES'] }.freeze
+
+  # contantes para numeracao romana
+  ROMAN = { M: 1000, CM: 900,
+            D: 500,  CD: 400,
+            C: 100,  XC: 90,
+            L: 50,   XL: 40,
+            X: 10,   IX: 9,
+            V: 5,    IV: 4,
+            I: 1 }.freeze
+  # numeral romano
+  RO_RE = /^M*(D?C{0,3}|C[DM])(L?X{0,3}|X[LC])(V?I{0,3}|I[VX])$/i.freeze
+end

data/lib/extenso_pt/module.rb

@@ -0,0 +1,219 @@
+# frozen_string_literal: true
+
+# @author Hernani Rodrigues Vaz
+module ExtensoPt
+  # Produz o extenso das centenas em portugues de portugal ou brasil
+  #
+  # @param [Integer] mil o valor dum grupo 3 digitos a converter
+  # @return [String] o extenso das centenas
+  def self.e900(mil)
+    A1000[@lc][(mil > 100 ? 1 : 0) + mil / 100] +
+      (mil > 100 && (mil % 100).positive? ? ' E ' : '') # proposicao
+  end
+
+  # Produz o extenso das dezenas em portugues de portugal ou brasil
+  #
+  # @param [Integer] cem o valor dum grupo 3 digitos a converter
+  # @return [String] o extenso das dezenas
+  def self.e90(cem)
+    A0100[@lc][cem / 10] +
+      (cem > 20 && (cem % 10).positive? ? ' E ' : '') # proposicao
+  end
+
+  # Produz o extenso das unidades em portugues de portugal ou brasil
+  #
+  # @param [Integer] cem o valor dum grupo 3 digitos a converter
+  # @return [String] o extenso das unidades
+  def self.e9(cem)
+    A0020[@lc][cem < 20 ? cem : cem % 10]
+  end
+
+  # Produz extenso parte fracionaria em portugues de portugal ou brasil
+  #
+  # @return [String] o extenso da parte fracionaria dum valor monetario
+  def self.ef99
+    # parametrizacao por defeito
+    @cs ||= 'CÊNTIMO'
+    @cp ||= @ms + 'S'
+
+    if @nf.positive?
+      e90(@nf) + e9(@nf) + (@nf > 1 ? ' ' + @cp : ' ' + @cs)
+    else
+      ''
+    end
+  end
+
+  # Produz final da moeda em portugues de portugal ou brasil
+  #
+  # @return [String] o final da moeda
+  def self.efim
+    # parametrizacao por defeito
+    @ms ||= 'EURO'
+    @mp ||= @ms + 'S'
+
+    # proposicao DE entre parte inteira e moeda
+    emo = @de ? ' DE' : ''
+    # moeda singular/plural
+    emo += @tt > 1 ? ' ' + @mp : ' ' + @ms if @tt.positive?
+    # proposicao E entre moeda e parte fracionaria
+    # extenso da parte fracionaria
+    emo + (@tt.positive? && @nf.positive? ? ' E ' : '') + ef99
+  end
+
+  # Produz separador entre grupos 3 digitos
+  #
+  # @param [Integer] pos posicao actual nos grupos 3 digitos do valor monetario
+  # @return [String] separador entre grupos 3 digitos
+  def self.esep(pos)
+    if pos.positive? && @ai[pos - 1].positive?
+      @ai[pos - 1] > 100 ? ' ' : ' E '
+    else
+      ''
+    end
+  end
+
+  # Produz qualificador grupo de 3 digitos em portugues de portugal ou brasil
+  #
+  # @param [Integer] pos posicao actual nos grupos 3 digitos do valor monetario
+  # @return [String] qualificador grupo de 3 digitos
+  def self.e1e24(pos)
+    if @ai[pos].positive?
+      @ai[pos] > 1 ? P1E24[@lc][pos] : S1E24[@lc][pos]
+    else
+      ''
+    end
+  end
+
+  # Produz extenso grupo 3 digitos em portugues de portugal ou brasil
+  #
+  # @param [Integer] pos posicao actual nos grupos 3 digitos do valor monetario
+  # @return [String] extenso grupo 3 digitos
+  def self.edg3(pos)
+    # parametrizacao por defeito
+    # the first mention of an @<variable> creates the
+    # instance variable in the current object ie: self = ExtensoPt
+    @lc ||= :pt
+
+    dg3 = if pos == 1 && @ai[pos] == 1
+            # caso especial MIL EUROS
+            ''
+          else
+            e900(@ai[pos]) + e90(@ai[pos] % 100) + e9(@ai[pos] % 100)
+          end
+    # qualificador grupo de 3 digitos
+    dg3 + e1e24(pos)
+  end
+
+  # Parametrizar controle singular/plural & proposicoes
+  #
+  # @return [void]
+  def self.pcontrolo
+    # soma grupos 1,2 (primeiros 6 digitos)
+    @s6 = @ai[0].to_i + @ai[1].to_i * 2
+    # soma grupos 3.. (digitos acima de 6)
+    @m6 = @ai[2..-1].to_a.inject(:+).to_i * 2
+    @tt = @s6 + @m6                  # proposicao E & singular/plural
+    @de = @s6.zero? && @m6.positive? # proposicao DE
+  end
+
+  # Produz o extenso dum valor monetario em portugues de portugal ou brasil
+  #
+  # @param [Integer] pos posicao actual nos grupos 3 digitos do valor monetario
+  # @param [String] ext extenso em construcao
+  # @return [String] o extenso dum valor monetario
+  def self.emonetario(pos, ext)
+    # testa fim do valor monetario
+    if pos >= @ai.count
+      # parametrizar controle singular/plural & proposicoes
+      pcontrolo
+
+      # caso especial zero
+      (@tt + @nf).zero? ? 'ZERO ' + @mp : ext + efim
+    else
+      # tratamento do proximo grupo 3 digitos
+      emonetario(pos + 1, edg3(pos) + esep(pos) + ext)
+    end
+  end
+
+  # Parametrizar parte inteira/fracionaria do valor monetario
+  #
+  # @param [String] digitos do valor monetario
+  # @return [void]
+  def self.pintfra(dig)
+    # parte inteira do valor monetario => array grupos 3 digitos
+    #  ex: 123022.12 => [22, 123]
+    @ai = dig[/^\d+/].to_s.reverse.scan(/\d{1,3}/).map { |i| i.reverse.to_i }
+
+    # parte fracionaria do valor monetario
+    #  ex: 123022.12 => 12
+    # arredondada a 2 casas decimais (centimos/centavos)
+    @nf = (dig[/\.\d*/].to_f * 100).round
+  end
+
+  # Converte objeto criando extenso(s) em portugues de portugal ou brasil
+  #
+  # @param [Object] obj objeto a converter
+  #  (String, Float, Integer, Array, Range, Hash)
+  # @return [String, Array, Hash] string extenso
+  #  se objecto for (String, Float, Integer),
+  #  array<extensos> se objecto for (Array, Range),
+  #  hash<extensos> se objecto for (Hash)
+  def self.o2e(obj)
+    if obj.is_a?(Hash)
+      # converte os valores do Hash nos seus extensos - devolve um Hash
+      obj.map { |k, v| [k, o2e(v)] }.to_h
+    elsif obj.respond_to?(:to_a)
+      # converte o objecto num Array com os extensos dos valores
+      obj.to_a.map { |a| o2e(a) }
+    else
+      # converte objeto em string digitos utilizando bigdecimal para
+      #  evitar problemas com aritmetica virgula flutuante em valores >1e12
+      digitos = obj.to_d.to_s('F')
+
+      # parametrizar parte inteira/fracionaria (@ai, @nf) do valor monetario
+      pintfra(digitos)
+
+      # processar extenso - valores superiores a 1e24 nao sao tratados
+      digitos[/^\d+/].length <= 24 ? emonetario(0, '') : ''
+    end
+  end
+
+  # Parametrizar moeda inferindo singular a partir do plural
+  #
+  # @param [Hash] moeda as opcoes para parametrizar a moeda/fracao
+  # @option moeda [Symbol] :lc locale do extenso -
+  #  portugues de portugal (:pt) ou brasil (:br)
+  # @option moeda [String] :msingular moeda no singular -
+  #  inferido do plural menos"S"
+  # @option moeda [String] :fsingular fracao no singular -
+  #  inferido do plural menos "S"
+  # @option moeda [String] :mplural moeda no plural
+  # @option moeda [String] :fplural fracao no plural
+  # @return [void]
+  def self.psingular(moeda)
+    @ms = moeda[:msingular] ||
+          (moeda[:mplural].to_s[-1] == 'S' ? moeda[:mplural][0..-2] : 'EURO')
+    @cs = moeda[:fsingular] ||
+          (moeda[:fplural].to_s[-1] == 'S' ? moeda[:fplural][0..-2] : 'CÊNTIMO')
+  end
+
+  # Parametrizar moeda inferindo plural a partir do singular
+  #
+  # @param [Hash] moeda as opcoes para parametrizar a moeda/fracao
+  # @option moeda [Symbol] :lc locale do extenso -
+  #  portugues de portugal (:pt) ou brasil (:br)
+  # @option moeda [String] :msingular moeda no singular
+  # @option moeda [String] :fsingular fracao no singular
+  # @option moeda [String] :mplural moeda no plural -
+  #  inferido do singular mais "S"
+  # @option moeda [String] :fplural fracao no plural -
+  #  inferido do singular mais "S"
+  # @return [void]
+  def self.pplural(moeda)
+    # somente [:pt, :br]
+    @lc = EXTLC.include?(moeda[:lc]) ? moeda[:lc] : :pt
+
+    @mp = moeda[:mplural] || @ms + 'S'
+    @cp = moeda[:fplural] || @cs + 'S'
+  end
+end

data/lib/extenso_pt/version.rb

@@ -1,5 +1,5 @@
 # frozen_string_literal: true
 
 module ExtensoPt
-  VERSION = '0.5.7'
+  VERSION = '0.5.8'
 end

data/lib/extenso_pt.rb

@@ -1,247 +1,15 @@
 # frozen_string_literal: true
 
-require 'extenso_pt/version'
 require 'bigdecimal/util'
-
-LC = %i[pt br].freeze
-A0020 = {
-  pt: ['', 'UM', 'DOIS', 'TRÊS', 'QUATRO', 'CINCO', 'SEIS', 'SETE',
-       'OITO', 'NOVE', 'DEZ', 'ONZE', 'DOZE', 'TREZE', 'CATORZE',
-       'QUINZE', 'DEZASSEIS', 'DEZASSETE', 'DEZOITO', 'DEZANOVE'],
-  br: ['', 'UM', 'DOIS', 'TRES', 'QUATRO', 'CINCO', 'SEIS', 'SETE',
-       'OITO', 'NOVE', 'DEZ', 'ONZE', 'DOZE', 'TREZE', 'QUATORZE',
-       'QUINZE', 'DEZESSEIS', 'DEZESSETE', 'DEZOITO', 'DEZENOVE']
-}.freeze
-A0100 = {
-  pt: ['', '', 'VINTE', 'TRINTA', 'QUARENTA', 'CINQUENTA', 'SESSENTA',
-       'SETENTA', 'OITENTA', 'NOVENTA'],
-  br: ['', '', 'VINTE', 'TRINTA', 'QUARENTA', 'CINQUENTA', 'SESSENTA',
-       'SETENTA', 'OITENTA', 'NOVENTA']
-}.freeze
-A1000 = {
-  pt: ['', 'CEM', 'CENTO', 'DUZENTOS', 'TREZENTOS', 'QUATROCENTOS',
-       'QUINHENTOS', 'SEISCENTOS', 'SETECENTOS', 'OITOCENTOS', 'NOVECENTOS'],
-  br: ['', 'CEM', 'CENTO', 'DUZENTOS', 'TREZENTOS', 'QUATROCENTOS',
-       'QUINHENTOS', 'SEISCENTOS', 'SETECENTOS', 'OITOCENTOS', 'NOVECENTOS']
-}.freeze
-S1E24 = { pt: ['', 'MIL', ' MILHÃO', ' MIL MILHÃO', ' BILIÃO',
-               ' MIL BILIÃO', ' TRILIÃO', ' MIL TRILIÃO'],
-          br: ['', 'MIL', ' MILHÃO', ' BILHÃO', ' TRILHÃO',
-               ' QUADRILHÃO', ' QUINTILHÃO', ' SEXTILHÃO'] }.freeze
-P1E24 = { pt: ['', ' MIL', ' MILHÕES', ' MIL MILHÕES', ' BILIÕES',
-               ' MIL BILIÕES', ' TRILIÕES', ' MIL TRILIÕES'],
-          br: ['', ' MIL', ' MILHÕES', ' BILHÕES', ' TRILHÕES',
-               ' QUADRILHÕES', ' QUINTILHÕES', ' SEXTILHÕES'] }.freeze
+require 'extenso_pt/version'
+require 'extenso_pt/constantes'
+require 'extenso_pt/module'
 
 # @author Hernani Rodrigues Vaz
 module ExtensoPt
   class Error < StandardError; end
 
-  # Produz o extenso das centenas em portugues de portugal ou brasil.
-  #
-  # @param [Integer] mil o valor dum grupo 3 digitos a converter
-  # @return [String] o extenso das centenas
-  def self.e900(mil)
-    A1000[@lc][(mil > 100 ? 1 : 0) + mil / 100] +
-      (mil > 100 && (mil % 100).positive? ? ' E ' : '') # proposicao
-  end
-
-  # Produz o extenso das dezenas em portugues de portugal ou brasil.
-  #
-  # @param [Integer] mil o valor dum grupo 3 digitos a converter
-  # @return [String] o extenso das dezenas
-  def self.e90(mil)
-    A0100[@lc][mil % 100 / 10] +
-      (mil > 20 && (mil % 10).positive? ? ' E ' : '') # proposicao
-  end
-
-  # Produz o extenso das unidades em portugues de portugal ou brasil.
-  #
-  # @param [Integer] cem o valor dum grupo 3 digitos a converter
-  # @return [String] o extenso das unidades
-  def self.e9(cem)
-    A0020[@lc][(cem < 20 ? cem : cem % 10)]
-  end
-
-  # Produz extenso parte fracionaria em portugues de portugal ou brasil.
-  #
-  # @return [String] o extenso da parte fracionaria dum valor monetario
-  def self.ef99
-    if @nf.positive?
-      e90(@nf) + e9(@nf) + (@nf > 1 ? ' ' + @cp : ' ' + @cs)
-    else
-      ''
-    end
-  end
-
-  # Produz final da moeda em portugues de portugal ou brasil.
-  #
-  # @return [String] o final da moeda
-  def self.efim
-    # proposicao DE entre parte inteira e moeda
-    emo = @de ? ' DE' : ''
-    # moeda singular/plural
-    emo += @tt > 1 ? ' ' + @mp : ' ' + @ms if @tt.positive?
-    # proposicao E entre moeda e parte fracionaria
-    # extenso da parte fracionaria
-    emo + (@tt.positive? && @nf.positive? ? ' E ' : '') + ef99
-  end
-
-  # Produz separador entre grupos 3 digitos
-  #
-  # @param [Integer] pos posicao actual nos grupos 3 digitos do valor monetario
-  # @return [String] separador entre grupos 3 digitos
-  def self.esep(pos)
-    if pos.positive? && @ai[pos - 1].positive?
-      @ai[pos - 1] > 100 ? ' ' : ' E '
-    else
-      ''
-    end
-  end
-
-  # Produz qualificador grupo de 3 digitos em portugues de portugal ou brasil.
-  #
-  # @param [Integer] pos posicao actual nos grupos 3 digitos do valor monetario
-  # @return [String] qualificador grupo de 3 digitos
-  def self.e1e24(pos)
-    if @ai[pos].positive?
-      @ai[pos] > 1 ? P1E24[@lc][pos] : S1E24[@lc][pos]
-    else
-      ''
-    end
-  end
-
-  # Produz extenso grupo 3 digitos em portugues de portugal ou brasil.
-  #
-  # @param [Integer] pos posicao actual nos grupos 3 digitos do valor monetario
-  # @return [String] extenso grupo 3 digitos
-  def self.edg3(pos)
-    dg3 = if pos == 1 && @ai[pos] == 1
-            # caso especial MIL EUROS
-            ''
-          else
-            e900(@ai[pos]) + e90(@ai[pos]) + e9(@ai[pos] % 100)
-          end
-    # qualificador grupo de 3 digitos
-    dg3 + e1e24(pos)
-  end
-
-  # Parametrizar controle singular/plural & proposicoes
-  #
-  # @return [void]
-  def self.pcontrolo
-    # soma grupos 1,2 (primeiros 6 digitos)
-    @s6 = @ai[0].to_i + @ai[1].to_i * 2
-    # soma grupos 3.. (digitos acima de 6)
-    @m6 = @ai[2..-1].to_a.inject(:+).to_i * 2
-    @tt = @s6 + @m6                  # proposicao E & singular/plural
-    @de = @s6.zero? && @m6.positive? # proposicao DE
-  end
-
-  # Produz o extenso dum valor monetario em portugues de portugal ou brasil.
-  #
-  # @param [Integer] pos posicao actual nos grupos 3 digitos do valor monetario
-  # @param [String] ext extenso  em construcao
-  # @return [String] o extenso dum valor monetario
-  def self.enumerico(pos = 0, ext = '')
-    # testa fim do valor monetario
-    if pos >= @ai.count
-      # parametrizar controle singular/plural & proposicoes
-      pcontrolo
-
-      # caso especial zero
-      (@tt + @nf).zero? ? 'ZERO ' + @mp : ext + efim
-    else
-      # tratamento do proximo grupo 3 digitos
-      enumerico(pos + 1, edg3(pos) + esep(pos) + ext)
-    end
-  end
-
-  # Parametrizar parte inteira/fracionaria do valor monetario
-  #
-  # @param [String] dig string de digitos rdo valor monetario
-  # @return [void]
-  def self.pintfra(dig)
-    # parte inteira do valor monetario => array grupos 3 digitos
-    #  ex: 123022.12 => [22, 123]
-    @ai = dig[/^\d+/].to_s.reverse.scan(/\d{1,3}/).map { |i| i.reverse.to_i }
-
-    # parte fracionaria do valor monetario
-    #  ex: 123022.12 => 12
-    # arredondada a 2 casas decimais (centimos/centavos)
-    @nf = (dig[/\.\d*/].to_f * 100).round
-  end
-
-  # Converte um objeto criando extenso(s) em portugues de portugal ou brasil.
-  #
-  # @param [Object] objeto objeto a converter
-  #  (String, Float, Integer, Array, Range, Hash)
-  # @return [String, Array<extensos>, Hash<extensos>] string extenso
-  #  se objecto for (String, Float, Integer),
-  #  array se objecto for (Array, Range),
-  #  hash se objecto for (Hash)
-  def self.eobjeto(obj)
-    if obj.is_a?(Hash)
-      # converte os valores do Hash nos seus extensos - devolve um Hash
-      obj.map { |k, v| [k, eobjeto(v)] }.to_h
-    elsif obj.respond_to?(:to_a)
-      # converte o objecto num Array com os extensos dos valores
-      obj.to_a.map { |v| eobjeto(v) }
-    else
-      # converte objeto numa string de digitos
-      # usa bigdecimal/util para evitar aritmetica binaria
-      #  (tem problemas com valores >1e12)
-      # qualquer valor nao convertivel (ex: texto) resulta em "0.0"
-      sdigitos = obj.to_d.to_s('F')
-
-      # parametrizar parte inteira/fracionaria (@ai, @nf) do valor monetario
-      pintfra(sdigitos)
-
-      # processar extenso - valores superiores a 1e24 nao sao tratados
-      sdigitos[/^\d+/].length <= 24 ? enumerico : ''
-    end
-  end
-
-  # Parametrizar moeda inferindo singular a partir do plural
-  #
-  # @param [Hash] moeda as opcoes para parametrizar a moeda/fracao
-  # @option moeda [Symbol] :lc locale do extenso -
-  #  portugues de portugal (:pt) ou brasil (:br)
-  # @option moeda [String] :msingular moeda no singular -
-  #  inferido do plural menos "S"
-  # @option moeda [String] :fsingular fracao no singular -
-  #  inferido do plural menos "S"
-  # @option moeda [String] :mplural moeda no plural
-  # @option moeda [String] :fplural fracao no plural
-  # @return [void]
-  def self.psingular(moeda)
-    @ms = moeda[:msingular] ||
-          (moeda[:mplural].to_s[-1] == 'S' ? moeda[:mplural][0..-2] : 'EURO')
-    @cs = moeda[:fsingular] ||
-          (moeda[:fplural].to_s[-1] == 'S' ? moeda[:fplural][0..-2] : 'CÊNTIMO')
-  end
-
-  # Parametrizar moeda inferindo plural a partir do singular
-  #
-  # @param [Hash] moeda as opcoes para parametrizar a moeda/fracao
-  # @option moeda [Symbol] :lc locale do extenso -
-  #  portugues de portugal (:pt) ou brasil (:br)
-  # @option moeda [String] :msingular moeda no singular
-  # @option moeda [String] :fsingular fracao no singular
-  # @option moeda [String] :mplural moeda no plural -
-  #  inferido do singular mais "S"
-  # @option moeda [String] :fplural fracao no plural -
-  #  inferido do singular mais "S"
-  # @return [void]
-  def self.pplural(moeda)
-    # somente [:pt, :br]
-    @lc = LC.include?(moeda[:lc]) ? moeda[:lc] : :pt
-
-    @mp = moeda[:mplural] || @ms + 'S'
-    @cp = moeda[:fplural] || @cs + 'S'
-  end
-
-  # Produz extenso(s) de objeto(s) em portugues de portugal ou brasil.
+  # Produz extenso(s)) em portugues de portugal ou brasil
   #
   # @param [Hash] moeda as opcoes para parametrizar a moeda/fracao
   # @option moeda [Symbol] :lc locale do extenso -
@@ -250,10 +18,10 @@ module ExtensoPt
   # @option moeda [String] :fsingular fracao no singular
   # @option moeda [String] :mplural moeda no plural
   # @option moeda [String] :fplural fracao no plural
-  # @return [String, Array<extensos>, Hash<extensos>] string extenso
+  # @return [String, Array, Hash] string extenso
   #  se objecto for (String, Float, Integer),
-  #  array se objecto for (Array, Range),
-  #  hash se objecto for (Hash)
+  #  array<extensos> se objecto for (Array, Range),
+  #  hash<extensos> se objecto for (Hash)
   def extenso(moeda = { lc: :pt, msingular: 'EURO', fsingular: 'CÊNTIMO' })
     # parametrizacao por defeito para :br
     if moeda[:lc] == :br && !moeda[:msingular] && !moeda[:mplural]
@@ -264,8 +32,8 @@ module ExtensoPt
     ExtensoPt.psingular(moeda)
     ExtensoPt.pplural(moeda)
 
-    # extenso do objeto
-    ExtensoPt.eobjeto(self)
+    # cria extenso(s) em portugues de portugal ou brasil
+    ExtensoPt.o2e(self)
   end
 end
 
@@ -284,17 +52,68 @@ class Range
   include ExtensoPt
 end
 
-# permite obter o extenso dum Float
+# permite obter o extenso de Float
 class Float
   include ExtensoPt
 end
 
-# permite obter o extenso dum Integer
+# permite obter o extenso ou numeral romano de Integer
 class Integer
   include ExtensoPt
+
+  # Produz numeracao romana a partir do inteiro
+  #
+  # @return [String] numeracao romana
+  def romana
+    return "-#{i2r(-self)}" if negative?
+
+    i2r(self)
+  end
+
+  # Recursivamente produz numeral romano
+  #
+  # @param [Integer] numero a converter em numeral romano
+  # @return [String] numeral romano
+  def i2r(numero)
+    return '' if numero.zero?
+
+    ROMAN.each { |r, v| return r.to_s + i2r(numero - v) if v <= numero }
+  end
 end
 
-# permite obter o extenso duma String de digitos
+# permite obter o extenso duma string de digitos ou
+#  inteiro duma string numeral romano
 class String
   include ExtensoPt
+
+  # Testa se string contem numeracao romana
+  #
+  # @return [true, false] sim ou nao numeracao romana
+  def romana?
+    RO_RE.match?(upcase)
+  end
+
+  # Produz inteiro a partir da numeracao romana
+  #  ou numeracao romana a partir de string digitos
+  #
+  # @return [Integer, String] inteiro ou numeracao romana
+  def romana
+    return -self[/[^-]+/].romana if /-+/.match?(self)
+    return self[/^\d+/].to_i.romana if /^\d+/.match?(self)
+    return 0 unless romana?
+
+    r2i(upcase, 0)
+  end
+
+  # Recursivamente produz inteiro
+  #
+  # @param [String] numeral romano em convercao
+  # @param [Integer] ultimo numeral convertido
+  # @return [Integer] inteiro do numeral romano
+  def r2i(numeral, ultimo)
+    return 0 if numeral.empty?
+
+    v = ROMAN[numeral[-1].to_sym]
+    v < ultimo ? (r2i(numeral.chop, v) - v) : (r2i(numeral.chop, v) + v)
+  end
 end

metadata

@@ -1,76 +1,76 @@
 --- !ruby/object:Gem::Specification
 name: extenso_pt
 version: !ruby/object:Gem::Version
-  version: 0.5.7
+  version: 0.5.8
 platform: ruby
 authors:
 - Hernâni Rodrigues Vaz
 autorequire: 
 bindir: exe
 cert_chain: []
-date: 2019-09-30 00:00:00.000000000 Z
+date: 2019-11-07 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
-  name: bigdecimal
+  name: bundler
   requirement: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: 1.4.4
+        version: '1.17'
   type: :development
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: 1.4.4
+        version: '1.17'
 - !ruby/object:Gem::Dependency
-  name: bundler
+  name: minitest
   requirement: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: '1.17'
+        version: '5.0'
   type: :development
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: '1.17'
+        version: '5.0'
 - !ruby/object:Gem::Dependency
-  name: minitest
+  name: rake
   requirement: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: '5.0'
+        version: '10.0'
   type: :development
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: '5.0'
+        version: '10.0'
 - !ruby/object:Gem::Dependency
-  name: rake
+  name: bigdecimal
   requirement: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: '10.0'
-  type: :development
+        version: 1.4.4
+  type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: '10.0'
-description: Produz valores monetários por extenso em portugês de portugal ou brasil.
-  Os valores podem ser um numerico, uma string de digitos ou um conjunto destes (array,
-  range, hash). O extenso pode ser produzido na escala longa (utilizada em todos os
-  países lusófonos) ou na escala curta (utilizada no Brasil). Pode ainda escolher
-  a moeda e a fração da moeda.
+        version: 1.4.4
+description: Converte valores monetários em extenso de portugês de portugal, brasil
+  ou numeracao romana. Os valores podem ser um numerico, uma string de digitos ou
+  um conjunto destes (array, range, hash). O extenso pode ser produzido na escala
+  longa (utilizada em todos os países lusófonos) ou na escala curta (utilizada no
+  Brasil). Pode ainda converter os valores em numeracao romana e vice versa.
 email:
 - hernanirvaz@gmail.com
 executables: []
@@ -89,6 +89,8 @@ files:
 - bin/setup
 - extenso_pt.gemspec
 - lib/extenso_pt.rb
+- lib/extenso_pt/constantes.rb
+- lib/extenso_pt/module.rb
 - lib/extenso_pt/version.rb
 homepage: https://github.com/hernanilr/extenso_pt
 licenses:
@@ -114,5 +116,6 @@ requirements: []
 rubygems_version: 3.0.3
 signing_key: 
 specification_version: 4
-summary: Produz valores monetários por extenso em portugês de portugal ou brasil.
+summary: Converte valores monetários em extenso de portugês de portugal, brasil ou
+  numeracao romana.
 test_files: []