shithub: sce

Download patch

ref: d5a0c6063ba8c1d70df439eaa582da09577d61a5
parent: d016bfc52aefd43ac708c1f2403b3136f0bcce83
author: qwx <qwx@sciops.net>
date: Fri Apr 23 06:28:04 EDT 2021

utils: typos

--- a/utils/scesha
+++ b/utils/scesha
@@ -14,10 +14,10 @@
 cat <<EOF | pico
 !r $fi f
 f = z == 3 ? f[x,y,0] == 0 && f[x,y,1] == Z && f[x,y,2] == Z ? 0 : Z/2+1 : 0
-m = y >= Y-($dΔy) ? 0 : f[x,y+($dΔy)]
-m = x >= X-($dΔx) ? 0 : m[x+($dΔx),y]
+m = y >= Y-($sΔy) ? 0 : f[x,y+($sΔy)]
+m = x >= X-($sΔx) ? 0 : m[x+($sΔx),y]
 r = z == 3 && m > 0 ? 0 : f
-!w $tmp r
+!w r $tmp
 EOF
 
 iconv -c a8r8g8b8 $tmp |\
--- a/utils/sceshb
+++ b/utils/sceshb
@@ -12,7 +12,7 @@
 cat <<EOF | pico
 !r $fi f
 r = z == 3 ? f[x,y,0] == 0 && f[x,y,1] == Z && f[x,y,2] == Z ? 0 : Z/2+1 : 0
-!w $tmp r
+!w r $tmp
 EOF
 
 iconv -c a8r8g8b8 $tmp |\
--- a/utils/scespr
+++ b/utils/scespr
@@ -31,7 +31,7 @@
 r = y >= 3*$dh && y < 4*$dh ? purple[x,y-3*$dh] : r
 r = y >= 4*$dh && y < 5*$dh ? orange[x,y-4*$dh] : r
 r = y >= 5*$dh && y < 6*$dh ? brown[x,y-5*$dh] : r
-r = y >= 6*$dh && y < 5*$dh ? white[x,y-6*$dh] : r
+r = y >= 6*$dh && y < 7*$dh ? white[x,y-6*$dh] : r
 r = y >= 7*$dh && y < 8*$dh ? yellow[x,y-7*$dh] : r
 !w r $tmp
 EOF