A while back, I posted about creating a Forth-inspired programming language that uses emoji as words (functions) and said that I would post the source code. I keep my word—this weekend I cleaned up the code and published it.

I've built a tool that transpiles emoji source code into either Crystal or Python, and then builds and runs the transpiled source.

Here's the solution to Project Euler Problem 1, with comments so that you can more easily follow the flow:

💭 Project Euler Problem 1:
💭 Find the sum of all the multiples of 3 or 5 below 1000 => 233168

💭 Define a word to check if a number is divisible by 3 or 5
📖❓                    💭 Stack: ( n -- bool )
  📚                    💭 Duplicate n for two tests
  🔢3 🔀 🔢0 🟰          💭 (n%3==0)
  🔄
  🔢5 🔀 🔢0 🟰          💭 (n%5==0)
  ⚡                    💭 (n%3==0 OR n%5==0)
📕

💭 Declare variables
📦 💯                   💭 sum variable
📦 🧮                   💭 counter variable

💭 Initialize variables
🔢0 💾 💯               💭 sum = 0
🔢1 💾 🧮               💭 counter = 1

💭 Loop from 1 to 999 (inclusive)
🔁
  💭 Get counter and check if divisible by 3 or 5
  📤 🧮                 💭 counter
  📚 ❓                 💭 counter bool

  👍
    💭 If divisible, add counter to sum
    📤 💯 ➕ 💾 💯       💭 sum = sum + counter
  🔚

  💭 Increment counter
  📤 🧮 🔢1 ➕ 💾 🧮     💭 counter = counter + 1

  💭 Test exit condition: counter > 999
  📤 🧮 🔢999 ⬆️
🔚

💭 Print the result
📤 💯 😀

Forth is fun because it is so easy to create a simple implementation of the language. It's also very very terse, which makes the emoji-nature of a project like this shine through. Here's the program above with emoji digits, fewer alphanumerics, and less whitespace:

💭 Project Euler Problem 1

📖❓ 📚 3️⃣🔀0️⃣🟰🔄5️⃣🔀0️⃣🟰⚡ 📕

📦💯
📦🧮

0️⃣ 💾💯
1️⃣ 💾🧮
🔁
  📤🧮📚
  ❓👍📤💯➕💾💯🔚
  📤🧮1️⃣➕💾🧮
  📤🧮🔢999⬆️
🔚

📤💯 😀

The project README has more detail on the language features if you're interested.

#emoji #forth #esolang