launch beescroll

1 files changed, 8 insertions, 1 deletions

diff --git a/beescroll.lua b/beescroll.lua
index 6fed401..240e4e4 100644
--- a/beescroll.lua
+++ b/beescroll.lua
@@ -62,11 +62,18 @@ local function choice(list)
 	return list[math.random(#list)]
 end
 
+local function slow_write(m,s)
+	for i = 1,#s do
+		m.write(s:sub(i,i))
+		os.sleep(0.1)
+	end
+end
+
 while true do
 	local x = math.random(0,99999)
 	m.scroll(1)
 	m.setCursorPos(1,H)
-	m.write(("%5d bees have been %s in %s."):format(
+	slow_write(m, (("%5d bees have been %s in %s."):format(
 		x, choice(verbs), choice(cities)
 	))
 	os.sleep(1)