From e86946428223bbcaae089bb92066988c3af129a0 Mon Sep 17 00:00:00 2001 From: s-ol Date: Fri, 23 Nov 2018 13:56:23 +1100 Subject: clean-ish header --- build/render_fileder.moon | 67 +++++++++++++++++++++++++++++++++++++++++++---- 1 file changed, 62 insertions(+), 5 deletions(-) (limited to 'build') diff --git a/build/render_fileder.moon b/build/render_fileder.moon index d76d162..f8958aa 100644 --- a/build/render_fileder.moon +++ b/build/render_fileder.moon @@ -1,20 +1,47 @@ require 'mmm' -import render from require 'mmm.mmmfs' import get_path from require 'build.util' +import tohtml from require 'mmm.component' +import Browser from require 'mmm.mmmfs.browser' + +export BROWSER -- usage: -- moon render.moon { path_to_root } = arg +seed = (str) -> + len = #str + rnd = -> math.ceil math.random! * len + + math.randomseed len + + return if len == 0 + + upper, lower = 0, 0 + for i=1,4 + upper += str\byte rnd! + upper *= 0x100 + + lower += str\byte rnd! + lower *= 0x100 + + math.randomseed upper, lower + +pick = (...) -> + num = select '#', ... + i = math.ceil math.random! * num + select i, ... + assert path_to_root, "please specify the relative root path" path = get_path path_to_root +seed path + root = dofile '$bundle.lua' assert root, "couldn't load $bundle.lua" root\mount path, true -content, rehydrate = render root, path -assert content, "no content" +BROWSER = Browser root, path with io.open 'index.html', 'w' \write " @@ -30,9 +57,29 @@ with io.open 'index.html', 'w' --> + + - #{content} +

+ ☉ + + mmm + .s-ol.nu +

+ + fun stuff with code and wires + + +

+ + #{assert (tohtml BROWSER), "couldn't render BROWSER"} @@ -41,7 +88,17 @@ with io.open 'index.html', 'w' - #{rehydrate} + " \close! -- cgit v1.2.3