From 0a7571115ee19d4a36281a6e9540f8ed6e79134e Mon Sep 17 00:00:00 2001
From: mehbark <terezi@pyrope.net>
Date: Thu, 20 Jul 2023 13:33:55 -0400
Subject: [PATCH] yet another likely impossible idea

---
 html/common.tsx                     | 49 +++++++++++++++-
 html/draw.tsx                       |  0
 html/lc.tsx                         | 91 +++++++++++++++++++++++++++++
 html/you-are-the-turing-machine.tsx |  1 +
 4 files changed, 140 insertions(+), 1 deletion(-)
 create mode 100644 html/draw.tsx
 create mode 100644 html/lc.tsx
 create mode 100644 html/you-are-the-turing-machine.tsx

diff --git a/html/common.tsx b/html/common.tsx
index 865dea4..d381b3e 100644
--- a/html/common.tsx
+++ b/html/common.tsx
@@ -1,4 +1,11 @@
-import { Attributes, ComponentChildren, VNode, toChildArray } from "preact";
+import {
+    Attributes,
+    ComponentChild,
+    ComponentChildren,
+    JSX,
+    VNode,
+    toChildArray,
+} from "preact";
 import { render } from "preact-render-to-string";
 import { writeText } from "copy-paste";
 
@@ -55,3 +62,43 @@ export const mk_class_wrapper =
     (klass: string) =>
     ({ children }: { children: ComponentChildren }) =>
         <div class={klass}>{...toChildArray(children)}</div>;
+
+export const slidify = (
+    Slide: (_: {
+        slide: JSX.Element;
+        next?: JSX.Element;
+        n: number;
+        max: number;
+    }) => JSX.Element,
+    slides: JSX.Element[],
+    n = 1,
+    max = slides.length
+): JSX.Element =>
+    slides[0] ? (
+        <Slide
+            slide={slides[0]}
+            next={slidify(Slide, slides.slice(1), n + 1, max)}
+            n={n}
+            max={max}
+        />
+    ) : (
+        <></>
+    );
+
+// https://cohost.org/lexyeevee/post/2107474-css-for-css-baby-3 (wayyy down at the bottom)
+export const DisappearOnClick = ({
+    children,
+    className,
+}: {
+    className?: string;
+    children: ComponentChildren;
+}) => (
+    <details
+        open
+        class={`disappearing ${className}`}
+        style="position: relative; cursor: pointer;"
+    >
+        <summary style="list-style: none; position: absolute; inset: 0;"></summary>
+        {children}
+    </details>
+);
diff --git a/html/draw.tsx b/html/draw.tsx
new file mode 100644
index 0000000..e69de29
diff --git a/html/lc.tsx b/html/lc.tsx
new file mode 100644
index 0000000..2406e60
--- /dev/null
+++ b/html/lc.tsx
@@ -0,0 +1,91 @@
+import { JSX } from "preact";
+import { DisappearOnClick, Main, render_and_copy, slidify } from "./common.tsx";
+
+const Slide = ({
+    slide,
+    next,
+    n,
+    max,
+}: {
+    slide: JSX.Element;
+    next?: JSX.Element;
+    n: number;
+    max: number;
+}) =>
+    next ? (
+        <div class="slide">
+            <details>
+                <summary>
+                    <div class="slide-content">{slide}</div>
+                    <div class="slide-status">
+                        {/* prob going to change this back to just n/max */}
+                        {n == max ? (
+                            <span class="done">
+                                thank you so much for reading!
+                            </span>
+                        ) : (
+                            <span class="position">
+                                {n}/{max}
+                            </span>
+                        )}
+                    </div>
+                </summary>
+                <div class="next">{next}</div>
+            </details>
+        </div>
+    ) : (
+        <div class="slide-content">{slide}</div>
+    );
+
+// let 'em click to get rid of stuff
+// show that the names don't matter, their just symbols etc
+// (use homestuck pictures)
+
+render_and_copy(
+    <Main>
+        {slidify(Slide, [
+            <>homestuck</>,
+            <>is cool</>,
+            <>
+                bla bla <DisappearOnClick>this WILL disappear</DisappearOnClick>{" "}
+                bla
+            </>,
+            <>
+                bla bla <DisappearOnClick>this WILL disappear</DisappearOnClick>{" "}
+                bla
+            </>,
+            <>
+                bla bla <DisappearOnClick>this WILL disappear</DisappearOnClick>{" "}
+                bla
+            </>,
+            <>
+                bla bla <DisappearOnClick>this WILL disappear</DisappearOnClick>{" "}
+                bla
+            </>,
+            <>
+                bla bla <DisappearOnClick>this WILL disappear</DisappearOnClick>{" "}
+                bla
+            </>,
+            <>
+                bla bla <DisappearOnClick>this WILL disappear</DisappearOnClick>{" "}
+                bla
+            </>,
+            <>
+                bla bla <DisappearOnClick>this WILL disappear</DisappearOnClick>{" "}
+                bla
+            </>,
+            <>
+                bla bla <DisappearOnClick>this WILL disappear</DisappearOnClick>{" "}
+                bla
+            </>,
+            <>
+                bla bla <DisappearOnClick>this WILL disappear</DisappearOnClick>{" "}
+                bla
+            </>,
+            <>
+                bla bla <DisappearOnClick>this WILL disappear</DisappearOnClick>{" "}
+                bla
+            </>,
+        ])}
+    </Main>
+);
diff --git a/html/you-are-the-turing-machine.tsx b/html/you-are-the-turing-machine.tsx
new file mode 100644
index 0000000..00d4178
--- /dev/null
+++ b/html/you-are-the-turing-machine.tsx
@@ -0,0 +1 @@
+// binary