     else
       send event
 
-# #-----------------------------------------------------------------------------------------------------------
-# # before '@MKTX.REGION.$single_column', '@MKTX.REGION.$multi_column', \
-# @MKTX.BLOCK.$hr = ( S ) =>
-#   plain_rule  = [ 'tex', "\\mktsRulePlain{}", ]
-#   swell_rule  = [ 'tex', "\\mktsRuleSwell{}", ]
-#   #.........................................................................................................
-#   return $ ( event, send ) =>
-#     #.......................................................................................................
-#     if select event, '.', 'hr'
-#       [ type, name, text, meta, ] = event
-#       switch chr = text[ 0 ]
-#         when '.'
-#           send stamp copy event
-#           send plain_rule
-#         when '-'
-#           send stamp copy event
-#           send swell_rule
-#         when '°'
-#           send stamp hide copy event
-#           send [ '!', 'slash', [], ( copy meta ), ]
-#         when ':'
-#           send stamp hide copy event
-#           send [ '!', 'slash', [ plain_rule, ], ( copy meta ), ]
-#         when '='
-#           send stamp hide copy event
-#           send [ '!', 'slash', [ swell_rule, ], ( copy meta ), ]
-#         when '^'
-#           send stamp hide copy event
-#           send [ '(', 'slash', [], ( copy meta ), ]
-#         when 'v'
-#           send stamp hide copy event
-#           send [ ')', 'slash', [], ( copy meta ), ]
-#         else
-#           send stamp hide copy event
-#           send [ '.', 'warning', "horizontal rule with unknown markup #{rpr text}", ( copy meta ), ]
-#     #.......................................................................................................
-#     else
-#       send event
+#-----------------------------------------------------------------------------------------------------------
+# # before '$hr2', '@MKTX.REGION.$single_column', '@MKTX.REGION.$multi_column', \
+@MKTX.BLOCK.$hr = ( S ) => $ ( event, send ) =>
+  #.........................................................................................................
+  if select event, '.', 'hr'
+    [ type, name, text, meta, ] = event
+    parameters = { slash: false, above: 0, one: '-', two: null, three: null, below: 0, }
+    send [ '.', 'hr2', parameters, ( copy meta ), ]
+    send stamp event
+  #.........................................................................................................
+  else
+    send event
 
 #-----------------------------------------------------------------------------------------------------------
 # before '@MKTX.REGION.$single_column', '@MKTX.REGION.$multi_column', \

    .pipe @MKTX.COMMAND.$comment                            S
    .pipe @MKTX.MIXED.$table                                S
    .pipe @MKTX.COMMAND.$echo                               S
    # .pipe @MKTX.BLOCK.$hr                                   S
    .pipe @MKTX.BLOCK.$hr2                                  S
    .pipe @MKTX.BLOCK.$nl                                   S
    .pipe @MKTX.REGION.$code                                S

    return null

#-----------------------------------------------------------------------------------------------------------
@MKTX.INLINE.$tabulation = ( S ) =>
  within_settabs = false
  #.........................................................................................................
  return $ ( event, send ) =>
    if select event, '.', 'tab'
      [ type, name, Q, meta, ] = event
      send stamp event
      send [ 'tex', "\\tab{}", ]
    #.......................................................................................................
    else if select event, '(', 'set-tabs'
      within_settabs = true
      send stamp event
    #.......................................................................................................
    else if select event, ')', 'set-tabs'
      within_settabs = false
      send stamp event
    #.......................................................................................................
    else if within_settabs and ( select event, '.', 'text' )
      [ type, name, text, meta, ] = event
      send [ 'tex', "\\TabPositions{#{text}}", ]
    #.......................................................................................................
    else
      send event
    #.......................................................................................................
    return null

#-----------------------------------------------------------------------------------------------------------
@MKTX.INLINE.$tiny = ( S ) =>
  #.........................................................................................................
  return $ ( event, send ) =>
