[Gzz-commits] manuscripts/AniFont probe.mp

[Tuomas J. Lukka]

CVSROOT:        /cvsroot/gzz
Module name:    manuscripts
Branch:         
Changes by:     Tuomas J. Lukka <address@hidden>        03/09/30 07:12:47

Modified files:
        AniFont        : probe.mp 

Log message:
        Miplevel diag fixed

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gzz/manuscripts/AniFont/probe.mp.diff?tr1=1.2&tr2=1.3&r1=text&r2=text

Patches:
Index: manuscripts/AniFont/probe.mp
diff -u manuscripts/AniFont/probe.mp:1.2 manuscripts/AniFont/probe.mp:1.3
--- manuscripts/AniFont/probe.mp:1.2    Tue Sep 30 06:46:18 2003
+++ manuscripts/AniFont/probe.mp        Tue Sep 30 07:12:47 2003
@@ -81,7 +81,7 @@
 
 endfig;
 
-size = 100pt;
+size = 15pt;
 
 def drawgrid(expr x, y, side, light) =
 
@@ -106,17 +106,18 @@
 
 vardef drawmipmaps(expr x, y, lightlevel) =
 
+    label.top(Tlev(lightlevel), (x + 2*size,y + 2*size));
     drawgrid(x, y, 1, lightlevel=0);
-    drawgrid(x, y - 200, 2, lightlevel=1);
-    drawgrid(x, y - 500, 4, lightlevel=2);
+    drawgrid(x, y - 3*size, 2, lightlevel=1);
+    drawgrid(x, y - 8*size, 4, lightlevel=2);
     
 enddef;
 
 beginfig(2);
 
-    drawmipmaps(0,0,0);
-    drawmipmaps(500,0,1);
-    drawmipmaps(1000,0,2);
+    drawmipmaps(0,0,2);
+    drawmipmaps(5*size,0,1);
+    drawmipmaps(10*size,0,0);
 
 
 endfig;