mirrors/cosmopolitan
1
0
Fork 0
mirror of https://github.com/jart/cosmopolitan.git synced 2025-01-31 11:37:35 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Add gensvg demo to redbean (#524)

Browse source 
gensvg demo and mk for it
This commit is contained in:
Theta Nil 2022-08-03 08:21:41 -04:00 committed by GitHub
parent 42bd79a461
commit ab301401c7
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
2 changed files with 79 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

77
tool/net/demo/gensvg.lua Normal file
View file

@ -0,0 +1,77 @@
local top = [[
<!DOCTYPE html>
<html lang=en>
<head>
<link rel="icon" href="data:;base64,iVBORw0KGgo=">
<meta charset="utf-8">
<meta name="viewport" content="width=device-width, initial-scale=1, shrink-to-fit=no">
<meta name="description" content="description">
<style>
* {margin: 0;padding: 0;box-sizing: border-box;}
body {margin: 0 auto;font-family: Roboto, Helvetica, Arial, sans-serif;color: #444444;line-height: 1;max-width: 960px;padding: 30px;}
h1, h2, h3, h4 {color: #111111;font-weight: 400;}
h1, h2, h3, h4, h5, p {margin-bottom: 24px;padding: 0;}
h1 {font-size: 48px;}
h2 {font-size: 36px;margin: 24px 0 6px;}
.button {min-height:1rem;border: none;border-radius: 0.25rem;background: #1E88E5;color: white;font-family: sans-serif;font-size: 1rem;line-height: 1.2;white-space: nowrap;text-decoration: none;padding: 0.25rem 0.5rem;margin: 0.25rem;cursor: pointer;}
body {height: 100vh;display: grid;place-items: center;background: hsl(0, 0%, 93%);}
.canvas {width: 75vmin;height: 75vmin;background: hsl(350, 70%, 80%);}
.shadow {filter: drop-shadow(1px 1px 0.5px rgba(0, 0, 0, .25));}
</style>
</head>
<body>
]]
local bottom = [[
<a href="https://github.com/jart/cosmopolitan/tree/master/tool/net/demo/gensvg/index.lua">Show The Code</a>
</body>
</html>
]]
local nrows = 10
local ncols = 10
local sqsize = 20
local seed = math.random()
local sat = 80
local light = 70
local function rect(x, y, w, h, rx)
local style = string.format('class="shadow" fill="hsla(%s, %s%%, %s%%, %s)"',
seed * 360 - 180, sat, light,
math.random(100) / 100.0)
return string.format(
'<rect x="%s" y="%s" width="%s" height="%s" rx="%s" %s>', x, y,
w, h, math.random(5, 12), style)
end
local function writeBlock(i, j)
if math.random() < 0.45 then return end
local cellsize = (math.random() > 0.25) and sqsize or math.random(1,4) * sqsize
Write('<g class="draw-block">')
Write(rect(i * sqsize - sqsize, j * sqsize - sqsize, cellsize, cellsize))
Write('</g>')
end
local function render()
nrows = nrows * 3
ncols = ncols * 3
local xsize = nrows * sqsize
local ysize = ncols * sqsize
local style = string.format('style="background-color: hsl(%s,%s%%,%s%%);"',
seed * 360, sat, light)
Write('<svg class="canvas" ' .. style .. ' viewBox="0 0 ' .. xsize .. ' ' ..
ysize .. '">')
for i = 1, nrows, 1 do for j = 1, ncols, 1 do writeBlock(i, j) end end
Write('</svg>')
end
Write(top)
Write("<h2>Let's Generate Some SVG</h2>")
Write("<p>If you don't like it, maybe refresh?</p>")
render()
Write('<div>')
Write('<a class="button" href="/gensvg/1">Walk Through</a>')
Write('</div>')
Write(bottom)

2
tool/net/net.mk
View file

@ -191,6 +191,7 @@ o/$(MODE)/tool/net/demo/binarytrees.lua.zip.o \
o/$(MODE)/tool/net/demo/crashreport.lua.zip.o \
o/$(MODE)/tool/net/demo/closedsource.lua.zip.o \
o/$(MODE)/tool/net/demo/printpayload.lua.zip.o \
o/$(MODE)/tool/net/demo/gensvg.lua.zip.o \
o/$(MODE)/tool/net/demo/redbean-form.lua.zip.o \
o/$(MODE)/tool/net/demo/redbean-xhr.lua.zip.o \
o/$(MODE)/tool/net/redbean.png.zip.o \
@ -245,6 +246,7 @@ o/$(MODE)/tool/net/redbean-demo.com.dbg: \
o/$(MODE)/tool/net/demo/crashreport.lua.zip.o \
o/$(MODE)/tool/net/demo/closedsource.lua.zip.o \
o/$(MODE)/tool/net/demo/printpayload.lua.zip.o \
o/$(MODE)/tool/net/demo/gensvg.lua.zip.o \
o/$(MODE)/tool/net/demo/redbean-form.lua.zip.o \
o/$(MODE)/tool/net/demo/redbean-xhr.lua.zip.o \
o/$(MODE)/tool/.zip.o \