--- rat/client/parameter.html	2001/07/25 03:10:15	1.9
+++ rat/client/parameter.html	2001/08/08 13:31:43	1.11
@@ -3,7 +3,7 @@
 The LearningOnline Network with CAPA
 Parameter Input Window
 06/16/00,06/17,11/17,11/18,11/23,11/27,11/28,12/15,12/16,
-03/21/01,03/24 Gerd Kortemeyer
+03/21/01,03/24,06/26 Gerd Kortemeyer
 07/24/01 Scott Harrison
 -->
 <head>
@@ -248,6 +248,13 @@ function integereval() {
    if ((pscat=='pos') && (svalue==0)) {
       svalue='';
    }
+   if (pscat.indexOf('range')!=-1) {
+      var rangeparts=new Array;
+      rangeparts=split('_',pscat);
+      rangeparts=split('...',rangeparts[1]);
+      if (svalue<rangeparts[0]) { svalue=rangeparts[0]; }
+      if (svalue>rangeparts[1]) { svalue=rangeparts[1]; }
+   }
    draw();
 }
 
@@ -392,6 +399,11 @@ choicewrite('<tr bgcolor="#AAFFAA"><td c
         if (pscat=='zeropos') {
            tablestart('Positive integer or zero');
         }
+        if (pscat.indexOf('range')!=-1) {
+           var rangeparts=new Array;
+           rangeparts=split('_',pscat);
+           tablestart('Integer in the range ['+rangeparts[1]+']');
+        }
         if (pscat=='any') {
            tablestart('Integer');
         }
@@ -478,7 +490,9 @@ function init() {
      if (pair[0]=='type') { subs=pair[1].split('_');
                             ptype=subs[0];
                             pscat=subs[1];
-                            if (typeof(subs[2])!="undefined") { pscat+='_'+subs[2]; }
+                            if (typeof(subs[2])!="undefined") { 
+                               pscat+='_'+subs[2]; 
+                            }
                             if ((pscat=='') || (typeof(pscat)=="undefined")) { 
                                pscat='default';
                             }
@@ -492,7 +506,8 @@ function init() {
   svalue=pvalue;
   if (((ptype=='float') || (ptype=='string') || (ptype=='int')) &&
       (pscat=='default') && 
-      (typeof(svalue)!="undefined") && (svalue!=0) && (svalue!='')) { pscat='any'; }
+      (typeof(svalue)!="undefined") && 
+      (svalue!=0) && (svalue!='')) { pscat='any'; }
 
   this.window.selector.document.clear();
   selwrite('<html><body bgcolor="#FFFFFF">');
@@ -537,6 +552,7 @@ function init() {
      sopt('default','Default');
      sopt('pos','Positive Integer, Not Zero');
      sopt('zeropos','Positive Integer or Zero');
+     sopt('range','Integer Range');
      sopt('any','Integer');
   }
 
