From f39518be9212c16c73644c8f4793df5fbe4b6a4b Mon Sep 17 00:00:00 2001
From: ThatGeekyWeeb <ssfgames13@gmail.com>
Date: Mon, 23 Aug 2021 14:32:45 -0400
Subject: [PATCH] init

---
 morsh | 35 +++++++++++++++++++++++++++++++++++
 1 file changed, 35 insertions(+)
 create mode 100755 morsh

diff --git a/morsh b/morsh
new file mode 100755
index 0000000..8d1bc0d
--- /dev/null
+++ b/morsh
@@ -0,0 +1,35 @@
+#!/bin/sh
+# fuck you meeper
+IFS=""; LANG=C
+# index's
+index="A B C D E F G H I J K L M N O P Q R S T U V W X Y Z 1 2 3 4 5 6 7 8 9 0"
+exb=".- -... -.-. -.. . ..-. --. .... .. .--- -.- .-.. -- -. --- .--. --.- .-. ... - ..- ...- .-- -..- -.-- --.. .---- ..--- ...-- ....- ..... -.... --... ---.. ----. -----"
+
+# I live in pain
+fresolve() {
+  lre ${index} "$2"
+}
+lre() {
+  eval letter=\${$#}
+  n=1; while [ $n -le 36 ]; do
+    case "$letter" in
+      "$n") eval cur=\${$n}; printf '%s' "$cur"
+    esac
+  : $((n+=1))
+  done
+}
+
+
+while read -r p || [ -n "$p" ]; do
+  p=${p# }; p=${p% }
+  n1="0"; IFS=" "; for i in ${p}; do
+    for ii in $exb; do 
+      : $((n1+=1));
+      case "$ii" in 
+        "$i") fresolve "$ii" "$n1"
+      esac
+    done
+    n1=0
+  done
+done # stdin read; fuck you
+echo