From 044f98467ad7bd4ee86506c0880601e3ff3a1722 Mon Sep 17 00:00:00 2001
From: nsfisis <nsfisis@gmail.com>
Date: Sat, 20 Apr 2024 19:22:54 +0900
Subject: update slide.saty

---
 assets/me.jpeg | Bin 10890 -> 149271 bytes
 slide.saty     |  35 +++++++++++++++++++++++++++--------
 2 files changed, 27 insertions(+), 8 deletions(-)

diff --git a/assets/me.jpeg b/assets/me.jpeg
index 4e01020..2bb53ab 100644
Binary files a/assets/me.jpeg and b/assets/me.jpeg differ
diff --git a/slide.saty b/slide.saty
index dbed3ff..528e69b 100644
--- a/slide.saty
+++ b/slide.saty
@@ -5,6 +5,22 @@
 @require: code-printer/code-theme
 @require: figbox/figbox
 
+let ex-big-textbox ?:size-opt it =
+  let size = Option.from 48pt size-opt in
+    FigBox.textbox?:(set-font-size size) it
+
+let big-textbox ?:size-opt it =
+  let size = Option.from 32pt size-opt in
+    FigBox.textbox?:(set-font-size size) it
+
+let mid-textbox ?:size-opt it =
+  let size = Option.from 24pt size-opt in
+    FigBox.textbox?:(set-font-size size) it
+
+let with-frame figbox = figbox
+  |> FigBox.hvmargin 16pt
+  |> FigBox.frame 2pt Color.black
+
 let-block +code-block-php source =
   '<
     +code-printer?:(
@@ -34,14 +50,17 @@ document '<
 
   +frame{自己紹介}<
     +fig-center(vconcat [
-      gap 75pt;
-      hconcat [
-        textbox{nsfisis (いまむら)};
-        gap 20pt;
-        include-image 50pt `assets/me.jpeg`;
-      ];
-      gap 20pt;
-      textbox{\@ デジタルサーカス株式会社};
+      gap 30pt;
+      big-textbox{いまむら};
+    ]);
+    +fig-center(vconcat [
+      ex-big-textbox{nsfisis};
+    ]);
+    +fig-center(vconcat [
+      include-image 128pt `assets/me.jpeg`;
+    ]);
+    +fig-center(vconcat [
+      big-textbox{\@ デジタルサーカス株式会社};
     ]);
   >
 
-- 
cgit v1.2.3-70-g09d2