// Copyright(c)2003-2004 Mira Software, Inc. Version: 1.00B6
var Domains=new String("aero|arpa|biz|com|coop|edu|info|int|museum|name|net|org|pro|ac|ad|ae|af|ag|ai|al|am|an|ao|aq|ar|as|at|au|aw|az|ba|bb|bd|be|bf|bg|bh|bi|bj|bm|bn|bo|br|bs|bt|bv|bw|by|bz|ca|cc|cd|cf|cg|ch|ci|ck|cl|cm|cn|co|cr|cu|cv|cx|cy|cz|de|dj|dk|dm|do|dz|ec|ee|eg|er|es|et|fi|fj|fk|fm|fo|fr|ga|gd|ge|gf|gg|gh|gi|gl|gm|gn|gp|gq|gr|gs|gt|gu|gw|gy|hk|hm|hn|hr|ht|hu|id|ie|il|im|in|iq|ir|is|it|je|jm|jo|jp|ke|kg|kh|ki|km|kn|kr|kw|ky|kz|la|lb|lc|li|lk|lr|ls|lt|lu|lv|ly|ma|mc|md|mg|mh|mk|ml|mm|mn|mo|mp|mq|mr|ms|mt|mu|mv|mw|mx|my|mz|na|nc|ne|nf|ng|ni|nl|no|np|nr|nu|nz|om|pa|pe|pf|pg|ph|pk|pl|pm|pn|pr|pt|pw|py|qa|re|ro|ru|rw|sa|sb|sc|sd|se|sg|sh|si|sj|sk|sl|sm|sn|so|sr|st|sy|sz|tc|td|tf|tg|th|tj|tk|tm|tn|to|tp|tr|tt|tv|tw|tz|ua|ug|uk|um|us|uy|uz|va|vc|ve|vg|vi|vn|vu|ws|ye|yu|za|zm|zr|zw");
function Value(x){var I;if(x)I=new String(x);else I=new String("");I.asString=asString;I.charAt=charAt;I.inRange=inRange;I.isAlpha=isAlpha;I.isCombining=isCombining;I.isEmail=isEmail;I.isEmpty=isEmpty;I.isEqual=isEqual;I.isFloat=isFloat;I.isInteger=isInteger;I.isNumeric=isNumeric;I.isPhoneNumber=isPhoneNumber;I.isURL=isURL;I.remove=remove;I.toLowerCase=toLowerCase;I.toUpperCase=toUpperCase;I.split=split;I.subvalue=subvalue;return I;}
function asString(){return String(this);}
function charAt(i){return Value(this.asString().charAt(i));}
function inRange(A,B){if(!A)A=0;else A=parseInt(A);if(!B)B=0;else B=parseInt(B);if(A<B)return!(this.length<A||this.length>B);else!(this.length<B||this.length>A);}
function isAlpha(){return RegExp("^\\w+$").test(this);}
function isCombining(c){if(!c)return RegExp("^[\\x21-\\x7E]+$").test(this);c=new String(c);if(!this.length)return false;for(i=0;i<this.length;i++)if(c.indexOf(this.charAt(i))==-1)return false;return true;}
function isEmail(){return RegExp("^[-\\w]+(\\.[-\\w]+)*@[-\\w]+(\\.[-\\w]+)*\\.(\\w{2,6})$").test(this.toLowerCase());}
function isEmpty(){return RegExp("^$").test(this);}
function isEqual(E){if(!E)return false;return E.test(this);}
function isFloat(){return RegExp("^[+-]?(0|([1-9]\\d*))(\\.\\d+)?$").test(this);}
function isInteger(){return RegExp("^[+-]?[1-9]\\d*$").test(this);}
function isNumeric(){return RegExp("^\\d+$").test(this);}
function isPhoneNumber(){for(i=0,d=0;i<this.length;i++)if(this.charAt(i)>='0'&&this.charAt(i)<='9')d++;if(d < 8)return RegExp("^(\\d-?){4,6}\\d$").test(this);else if(d==11)return RegExp("^\\+\\d{1,3} ?(\\(\\d{1,5}\\)|\\d{1,5}) ?(\\d-?){3,6}\\d$").test(this);else return false;}
function isURL(type){if(!type)type="http";else type=type.toLowerCase();var xdomain=Domains;var xalpha="[-\\w]+";var xres="[-%\\+@\\*\\w]";var spec="[-\\w\\+\\.\\$\\*\\\\(\\)\\?,'!;&=]";var xchar="[^/\\\\:\\*?\"<>\\|\\.]+";var xattr="(subject|cc|bcc)=(&[^&]*|[^&]+)";var ippart="(\\d|[1-9]\\d|1\\d\\d|2[0-4]\\d|25[0-5])";var domain="\\.("+xdomain+")";var upas ="("+spec+"+(:"+spec+"+)?@)?";var port="(:[1-9]\\d{4})?";var ip=ippart+"(\\."+ippart+"){3}";var qpart=xres+"+="+ xres+ "*";var frag=xalpha+"(\\."+xalpha+")*";var file=xchar+"(\\."+ xchar+")*";var path=file+"(/"+file+")*";var query="\\?("+qpart+"(&"+qpart+")*)?";var attrib="\\?("+xattr+"(&"+xattr+")*)?";var anchor="#("+xres+"+)?";var host="("+frag+domain+"|"+ip+")";var http="^https?://"+upas+host+port+"(/("+path+"("+query+")?("+anchor+")?)?)?$";var ftp="^ftp://"+upas+host+port+"(/("+path+")?)?$";var mailto="^mailto: *"+frag+"@"+host+"("+attrib+")?$";switch(type){case "http":return RegExp(http).test(this.toLowerCase());case "ftp":return RegExp(ftp).test(this.toLowerCase());case "mailto":return RegExp(mailto).test(this.toLowerCase());default:return false;}}
function remove(v){var I=this;while((i=I.indexOf(v))!=-1){I=I.substring(0,i)+I.substring(i+v.length,I.length);}return Value(I);}
function toLowerCase(){return Value(this.asString().toLowerCase());}
function toUpperCase(){return Value(this.asString().toUpperCase());}
function split(s){var y=this.asString().split(s); for(i=0;i<y.length;i++)y[i]=new Value(y[i]);return y;}
function subvalue(A,B){return Value(this.asString().substring(A,B));}