diff --git a/bin/scripts/lib/fonts.json b/bin/scripts/lib/fonts.json
index 15b21088e1..cbf6a07247 100644
--- a/bin/scripts/lib/fonts.json
+++ b/bin/scripts/lib/fonts.json
@@ -484,6 +484,17 @@
       "repoRelease": true,
       "description": "Slashed zeros, customized version of Apple's Menlo"
     },
+    {
+      "unpatchedName": "Monaspace",
+      "RFN": true,
+      "patchedName": "Monaspice",
+      "folderName": "Monaspace",
+      "imagePreviewFont": "MonaspiceNe Nerd Font",
+      "linkPreviewFont": false,
+      "caskName": "monaspace",
+      "repoRelease": false,
+      "description": "Five matching fonts all having 'texture healing' to improve legibility"
+    },
     {
       "unpatchedName": "Monofur",
       "RFN": false,
diff --git a/bin/scripts/name_parser/FontnameTools.py b/bin/scripts/name_parser/FontnameTools.py
index 8b85287add..63f807c934 100644
--- a/bin/scripts/name_parser/FontnameTools.py
+++ b/bin/scripts/name_parser/FontnameTools.py
@@ -195,6 +195,7 @@ def postscript_char_filter(name):
         ( 'IBM[- ]?plex',               r'Blex' ), # We do not keep the case here
         ( '(i)ntel( ?)(o)ne',           r'\1ntone' ),
         ( '(l)iberation',               r'\1iteration' ),
+        ( '(m)onaspace',                r'\1onaspice' ),
         ( '(m)( ?)plus',                r'\1+'), # Added this, because they use a plus symbol :->
         ( '(s)hare',                    r'\1hure' ),
         ( '(s)ource',                   r'\1auce' ),
@@ -211,6 +212,11 @@ def postscript_char_filter(name):
         ( '(overpass ?m)ono',           r'\1'), # Overpass Mono -> Overpass M
         ( '(proggyclean) ?tt',          r'\1'), # Remove TT from ProggyClean
         ( '(terminess) ?\(ttf\)',       r'\1'), # Remove TTF from Terminus (after renamed to Terminess)
+        ( '(.*ne)on',                   r'\1'), # Monaspace shorten face name
+        ( '(.*ar)gon',                  r'\1'), # Monaspace shorten face name
+        ( '(.*kr)ypton',                r'\1'), # Monaspace shorten face name
+        ( '(.*xe)non',                  r'\1'), # Monaspace shorten face name
+        ( '(.*r)adon',                  r'\1d'), # Monaspace shorten face name
         ( '(im ?writing ?q)uattro',     r'\1uat'), # Rename iM Writing Quattro to Quat
         ( '(im ?writing ?(mono|duo|quat)) ?s', r'\1'), # Remove S from all iM Writing styles
     ]