Implement textures on walls, windows don't look great yet

This commit is contained in:
jgk
2021-03-21 22:21:29 +01:00
parent e6c76da6b3
commit abd7cd7ea9
5 changed files with 29 additions and 11 deletions
+3 -3
View File
@@ -40,10 +40,10 @@ mkAutoDoor pl pr xs = addSound $ zipWith3 (autoDoorPane [pl,pr])
, [pru,prd]
, [prd,prrd,pr,pr]
]
where norm = 15.1 *.* errorNormalizeV 49 ( vNormal (pr -.- pl))
-- .1 hack, there was flickering
where norm = 10 *.* errorNormalizeV 49 ( vNormal (pr -.- pl))
hw = 0.5 *.* (pl +.+ pr)
parallel = 20 *.* normalizeV (pl -.- pr)
--parallel = 15 *.* normalizeV (pl -.- pr)
parallel = 0.51 *.* (pl -.- pr)
plu = pl +.+ norm
pld = pl -.- norm
pru = pr +.+ norm