From 74d106265b3e0e07c0db5e062741208575b0098f Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Wed, 8 Jun 2022 10:49:02 -0500
Subject: Add fucktrain

Now you can turn your brainfuck programs into trainfuck!!!
---
 fucktrain | 35 +++++++++++++++++++++++++++++++++++
 1 file changed, 35 insertions(+)
 create mode 100755 fucktrain

(limited to 'fucktrain')

diff --git a/fucktrain b/fucktrain
new file mode 100755
index 0000000..c93a708
--- /dev/null
+++ b/fucktrain
@@ -0,0 +1,35 @@
+#!/bin/awk -f
+# FUCKTRAIN: FUCKAMUTHA CHOO CHOO -*- awk -*-
+# Author: Case Duckworth <acdw@acdw.net>
+# License: WTFPL
+# Version: #9
+BEGIN {
+	print "ALL ABOARD"
+}
+
+{
+	gsub(/[^-+<>.,\[\]]/, "", $0)
+	gsub(/+/, "chug ", $0)
+	gsub(/-/, "chugga ", $0)
+	gsub(/>/, "choo\n", $0)
+	gsub(/</, "choo choo\n", $0)
+	gsub(/\./, clicketyClick(), $0)
+	gsub(/,/, "clack ", $0)
+	gsub(/\[/, "tickets please ", $0)
+	gsub(/\]/, "your ticket please ", $0)
+	print
+}
+
+END {
+	print "END OF THE LINE"
+}
+
+
+function clicketyClick()
+{
+	if (rand() <= 0.5) {
+		return "click"
+	} else {
+		return "clickety"
+	}
+}
-- 
cgit 1.4.1-21-gabe81