milden exp curve

diff --git a/src/exper.c b/src/exper.c
index 649f1c6..5cefb65 100644 (file)
--- a/src/exper.c
+++ b/src/exper.c
@@ -12,8 +12,8 @@ newuexp(lev)
 int lev;
 {
        if (lev < 10) return (10L * (1L << lev));
 int lev;
 {
        if (lev < 10) return (10L * (1L << lev));

-       if (lev < 20) return (10000L * (1L << (lev - 10)));
-       return (10000000L * ((long)(lev - 19)));
+       if (lev < 15) return (10000L * (lev - 9));
+       return (50000L * ((long)(lev - 13)));

 }
 
 STATIC_OVL int
 }
 
 STATIC_OVL int