<%@ Language=VBScript%>
<%
Response.Buffer=false
Response.Expires=0
%>
<!-- #include file="./dsnroot.asp" -->
<!-- #include file="./links.asp" -->
<%
set cn=Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")
set rs1=Server.CreateObject("ADODB.Recordset")
cn.Open mycnstr
sqltext="select id,flag,body from danwei where pid=18 order by pl"
rs.Open sqltext,cn,1,1
if not rs.EOF then
		if rs("flag")=0 then
				about_content=trim(rs("body"))
			else	
				sqltext="selec body from cdanwei where pid="&rs("pid")&" and enable=1 order by pl"
				rs1.Open sqltext,cn,1,1
				do while not rs1.eof
					about_content=about_content&trim(rs1("body"))
				rs1.MoveNext 
				loop
				rs1.Close 
		end if
		about_content=checkstr(cutstr(about_content,130,0),0)		
end if
rs.Close 
sqltext="select * from count where enable=1 order by pl"
rs.Open sqltext,cn,1,1
if not rs.EOF then
		toemail=rs("email")
		totel=rs("tel")
		tofax=rs("fax")
		toadd=rs("add")
end if
rs.Close 
%>

<!-- #include file="./func.inc" -->
<!-- #include file="./begin.asp" -->
      <table width="778" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td width="208" bgcolor="#FFFFEC" align="center" valign="top"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0" height="36">
              <tr> 
                <td width="20" background="images/nav2_bg.gif">&nbsp;</td>
                <td background="images/nav2_bg.gif"><img src="images/bt2_home.gif" width="42" height="18"></td>
              </tr>
            </table>
            <table width="96%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="30">&nbsp;</td>
              </tr>
            </table>
            <table width="96%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td><img src="images/title_news.gif" width="90" height="18"></td>
              </tr>
            </table>
            <table width="96%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td>&nbsp;</td>
              </tr>
            </table>
            <%sqltext="select top 6 id,title from danwei where enable=1 and ppid=10 order by creatdate desc"
              rs.Open sqltext,cn,1,1
              do while not rs.EOF
            %>
            <table width="96%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td colspan="2" height="6"></td>
              </tr>
              <tr> 
                <td width="16" valign="top"><img src="images/arrow_news2.gif" width="12" height="12"></td>
                <td><a href="news_display.asp?id=<%=rs("id")%>" class="a12"><%=trim(rs("title"))%></a></td>
              </tr>
            </table>
            <%rs.MoveNext 
              loop
              rs.Close 
            %>
            <table width="96%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td height="36">&nbsp;</td>
              </tr>
            </table>
            <table width="96%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td width="70" height="76"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"  codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="65" height="65" id=ShockwaveFlash3>
                    <param name=movie value="images/banner_service2.swf">
                    <param name=quality value=high>
                    <embed src="images/banner_service2.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="65" height="65">
                    </embed> 
                  </object></td>
                <td width="70"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"  codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="65" height="65" id=ShockwaveFlash4>
                    <param name=movie value="images/banner_business2.swf">
                    <param name=quality value=high>
                    <embed src="images/banner_business2.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="65" height="65">
                    </embed> 
                  </object></td>
                <td width="68"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"  codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="65" height="65" id=ShockwaveFlash6>
                    <param name=movie value="images/banner_careers2.swf">
                    <param name=quality value=high>
                    <embed src="images/banner_careers2.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="65" height="65">
                    </embed> 
                  </object></td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td height="36">&nbsp;</td>
              </tr>
            </table>
            <table width="186" border="0" cellspacing="0" cellpadding="0" height="125" style="border: 1px solid #CC9900 ; FILTER:filter : progid:DXImageTransform.Microsoft.DropShadow(color=#D9C88E,offX=2,offY=2,positives=true);">
              <tr>
                <td bgcolor="#FFFFFF">
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td width="20"><img src="images/title_maillogin.gif" width="20" height="125"></td>
                      <td align="center">
                        <table width="92%" border="0" cellspacing="0" cellpadding="0">
						<FORM name=loginform action=http://mail.sina.net/cgi-bin/login.cgi method=post target=_blank>
						<INPUT type=hidden name=user> <INPUT type=hidden name=pass>
                          <tr> 
                            <td width="50" height="30" class="font1">用户名:</td>
                            <td> 
                              <input type="text" name="username" size="14" class="input1">
                              <INPUT type=hidden value="ahwanbao.com" name=domainname>
                            </td>
                          </tr>
                          <tr> 
                            <td height="30" class="font1">密&nbsp;&nbsp;码:</td>
                            <td> 
                              <input type="password" name="psw" size="14" class="input1">
                            </td>
                          </tr>
                          <tr> 
                            <td height="30">&nbsp;</td>
                            <td> 
                              <input type="submit" onclick="return onSubmit()" name="Submit" value="登录" style="font-size: 12px; color: white; border: 1px; width: 43px; background-color: #996600">
                              <input type="button" name="Submit2" value="注册" style="font-size: 12px; color: white; border: 1px; width: 43px; background-color: #996600" onclick="window.open('http://mail.sina.net/register.html')">
                            </td>
                          </tr>
                        </table>
                      </td>
                    </tr>
                  </table>
                </td>
              </tr>
            </table>
            
          </td>
          <td width="263" bgcolor="#FFFFFF" valign="top" align="center"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0" height="36">
              <tr>
                <td width="263" background="images/nav2_bg2.gif" align="center"><img src="images/title_productshouw.gif" width="60" height="21"></td>
              </tr>
            </table>
             <table width="82%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="20">&nbsp;</td>
              </tr>
            </table>
            <table width="82%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"   codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="220" height="250" id=ShockwaveFlash5>
                    <param name=movie value="images/products_m.swf">
                    <param name=quality value=high>
                    <param name="wmode" value="transparent">
                    <embed src="images/products_m.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="220" height="250">
                    </embed> 
                  </object></td>
              </tr>
            </table>
            <table width="82%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="40">&nbsp;</td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td align="center"><img src="images/title_productslist.gif" width="248" height="19"></td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td>&nbsp;</td>
              </tr>
            </table>
            <%sqltext="select id,title from classes where pid=9 and enable=1 order by pl"
              rs.Open sqltext,cn,1,1
              zs=rs.RecordCount 
              ls=2
              if zs mod ls <>0 then
					hs=int(zs/ls)+1
				else
					hs=zs/ls
			  end if			
			  for i=1 to hs
            %>
            <table width="90%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <%for j=1 to ls 
                     if not rs.EOF then%>
                <td height="26" width="50%"> 
                  <table width="98%" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td width="12"><img src="images/arrow_news4.gif" width="12" height="12"></td>
                      <td><a href="products.asp?id=<%=rs("id")%>" class="a12"><font color="#996600"><%=trim(rs("title"))%></font></a></td>
                    </tr>
                  </table>
                </td>
                <%
                rs.MoveNext 
                else%>
                <td width="50%">&nbsp;</td>
                <%end if
                next%>
              </tr>
            </table>
            <%next
              rs.Close 
            %>
          </td>
          <td bgcolor="#FFF7D9" valign="top" align="center" background="images/shadow_right.jpg" style="background-repeat:no-repeat"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td> 
                  <div id="Layer3" style="position:absolute; width:10px; height:10; z-index:2"> 
                    <div id="Layer4" style="position:absolute; width:200px; height:115px; z-index:1; left: -15px; top: 70px"> 
                      <table width="100%" border="0" cellspacing="0" cellpadding="0">
                        <tr> 
                          <td><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"  codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="307" height="60" id=ShockwaveFlash2>
                              <param name=movie value="images/f_wanbao2.swf">
                              <param name=quality value=high>
                              <param name="wmode" value="transparent">
                              <embed src="images/f_wanbao2.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="307" height="60">
                              </embed> 
                            </object></td>
                        </tr>
                      </table>
                    </div>
                  </div>
                </td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td height="110">&nbsp;</td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td>&nbsp;</td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td>&nbsp;</td>
              </tr>
            </table>
            <table width="92%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td><img src="images/title_company.gif" width="90" height="18"></td>
              </tr>
            </table>
            <table width="92%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td>&nbsp;</td>
              </tr>
              <tr> 
                <td class="font1"><font color="#555555"><%=about_content%></font></td>
              </tr>
              <tr> 
                <td>&nbsp;</td>
              </tr>
              <tr> 
                <td align=right><a href="company.asp" class=a11><font color="#996600">详细介绍...</font></a>&nbsp;&nbsp;</td>
              </tr>
            </table>
            <table width="92%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="50">&nbsp;</td>
              </tr>
            </table>
            <table width="92%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td><img src="images/title_contact.gif" width="90" height="18"></td>
              </tr>
            </table>
            <table width="92%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td>&nbsp;</td>
              </tr>
              <tr> 
              <tr> 
                <td class="font1">
                <font color="#996600">
                  <%if toadd<>"" then%>
					地址:<%=toadd%><br>
				  <%end if%>	
				  <%if totel<>"" then%>
					电话:<%=totel%><br>
				  <%end if%>	
				  <%if tofax<>"" then%>
					传真:<%=tofax%><br>
				  <%end if%>	
				  <%if toemail<>"" then%>
					电子邮件:<a href="mailto:<%=toemail%>" class="a11"><font color="#996600"><%=toemail%></font></a>
				  <%end if%>	
				</font></td>
              </tr>
            </table>
            <table width="96%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="40">&nbsp;</td>
              </tr>
            </table>
            <table width="96%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="20"> 
                  &nbsp;<select name=page onChange="if(this.options[this.selectedIndex].value!='$') {window.open(this.options[this.selectedIndex].value,'_blank')}" style="width=140px" class="input2">
                    <option value="$">友情链接..........</option>
                    <%sqltext="select title,httpadd from danwei where enable=1 and pid=59 order by pl"
						  rs.Open sqltext,cn,1,1
						  do while not rs.EOF 
						%>
                    <option value="<%=trim(rs("httpadd"))%>"><%=trim(rs("title"))%></option>
                    <%rs.MoveNext 
						  loop
						  rs.Close 
						%>
                  </select>
                </td>
              </tr>
            </table>
          </td>
        </tr>
        <tr>
          <td width="208" bgcolor="#FFFFEC" height="36" valign="top">&nbsp;</td>
          <td width="263" bgcolor="#FFFFFF" valign="top" align="center">&nbsp;</td>
          <td bgcolor="#FFF7D9" valign="top" align="center">&nbsp;</td>
        </tr>
      </table>
<!-- #include file="./end.asp" -->
<script LANGUAGE="JavaScript">
var brOK=false;
var mie=false;
var aver=parseInt(navigator.appVersion.substring(0,1));
var aname=navigator.appName;
function checkbrOK()
{if(aname.indexOf("Internet Explorer")!=-1)
   {if(aver>=4) brOK=navigator.javaEnabled();
    mie=true;
   }
 if(aname.indexOf("Netscape")!=-1)
   {if(aver>=4) brOK=navigator.javaEnabled();}
}
var vmin=2;
var vmax=5;
var vr=0.02;
var timer1;
function Chip(chipname,width,height)
{this.named=chipname;
 this.vx=vmin+vmax*Math.random();
 this.vy=vmin+vmax*Math.random();
 this.w=width;
 this.h=height;
 this.xx=0;
 this.yy=0;
 this.timer1=null;
}
function movechip(chipname)
{
 if(brOK)
  {eval("chip="+chipname);
   if(!mie)
    {pageX=window.pageXOffset;
     pageW=window.innerWidth;
     pageY=window.pageYOffset;
     pageH=window.innerHeight;
    }
   else
    {pageX=window.document.body.scrollLeft;
     pageW=window.document.body.offsetWidth-22;
     pageY=window.document.body.scrollTop;
     pageH=window.document.body.offsetHeight-34;
    }

   chip.xx=chip.xx+chip.vx;
   chip.yy=chip.yy+chip.vy;

   chip.vx+=vr*(Math.random()-0.5);
   chip.vy+=vr*(Math.random()-0.5);
   if(chip.vx>(vmax+vmin))  chip.vx=(vmax+vmin)*2-chip.vx;
   if(chip.vx<(-vmax-vmin)) chip.vx=(-vmax-vmin)*2-chip.vx;
   if(chip.vy>(vmax+vmin))  chip.vy=(vmax+vmin)*2-chip.vy;
   if(chip.vy<(-vmax-vmin)) chip.vy=(-vmax-vmin)*2-chip.vy;


   if(chip.xx<=pageX)
     {chip.xx=pageX;
      chip.vx=vmin+vmax*Math.random();
     }
   if(chip.xx>=pageX+pageW-chip.w)
     {chip.xx=pageX+pageW-chip.w;
      chip.vx=-vmin-vmax*Math.random();
     }
   if(chip.yy<=pageY)
     {chip.yy=pageY;
      chip.vy=vmin+vmax*Math.random();
     }
   if(chip.yy>=pageY+pageH-chip.h)
     {chip.yy=pageY+pageH-chip.h;
      chip.vy=-vmin-vmax*Math.random();
     }

   if(!mie)
      {eval('document.'+chip.named+'.top ='+chip.yy);
       eval('document.'+chip.named+'.left='+chip.xx);
      }
   else
      {eval('document.all.'+chip.named+'.style.pixelLeft='+chip.xx);
       eval('document.all.'+chip.named+'.style.pixelTop ='+chip.yy);
      }
   chip.timer1=setTimeout("movechip('"+chip.named+"')",140);
  }
}

function hide(chipname){
        if(brOK){
                eval("chip="+chipname);
                if(!mie)
                        eval('document.'+chip.named+'.visibility ='+"'hide'");
                else
                        eval('document.all.'+chip.named+'.style.visibility ='+"'hidden'");
        }
}

function stopme(chipname)
{if(brOK)
  {//alert(chipname)
   eval("chip="+chipname);
   if(chip.timer1!=null)
    {clearTimeout(chip.timer1)}
  }
}
var chip1;
function pagestart()
{checkbrOK();
 chip1=new Chip("chip1",117,75);
  if(brOK)
   { movechip("chip1");
    }
}
//if(brOK) {stopme('chip1');}

//		window.open("ad_newyear.asp","","resizable=no,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,width=500,height=500,top=100,left=300")
</script>

<DIV id=chip1 style="height: 84px; position: absolute; visibility: visible; width: 111px; left: 67px; top: 71px;z-index:100"> 
<TABLE border=0 cellPadding=4 cellSpacing=0 class=bd width=60>
  <TBODY>
    <TR>
      <TD align=middle class=bg2>
		<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"     codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="200" height="100" id=ShockwaveFlash1>
         <param name=movie value="images/lucky.swf">
         <param name=quality value=high>
         <param name="wmode" value="transparent">
         <embed src="images/lucky.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="200" height="100"></embed> 
        </object>
      </TD>
    </TR>
  </TBODY>
</TABLE>
</DIV> 
<SCRIPT event=onload for=window language=JavaScript>
pagestart();
</SCRIPT>

<!--下面是邮箱登陆-->
<script>
function trim(str)
{
 while(str.charAt(0)==" ") 
 {
  str=str.substr(1);
 }
 while(str.charAt(str.length-1)==" ") 
 {
  str=str.substring(0,str.length-1);
 }
 return str; 
 
}

function onSubmit()
{
	var username = document.loginform.username.value;
	username = trim(username);

	var domainname = document.loginform.domainname.value;
	domainname = trim(domainname);

	if(domainname.indexOf(".") == -1)
		domainname += ".sina.net";
	
	var psw = document.loginform.psw.value;
	document.loginform.user.value = username + '@' + domainname;
	do_sha1();
	document.loginform.psw.value = "";
	//alert("sessid: "+ssid);
	//alert("psw hash: "+document.loginform.pass.value);
}

// convert a 32-bit value to a 8-char hex string
function cvt_hex( val )
{
   var str="";
   var i;
   var v;

   for( i=7; i>=0; i-- )
   {
      v = (val>>>(i*4))&0x0f;
      str += v.toString(16);
   }
   return str;
}

// rotate left circular
function rotate_left( n, s )
{
   var t4 = ( n<<s ) | (n>>>(32-s));
   return t4;
}

// calculate the hash
function do_sha1()
{
   var blockstart;			// which block of words from the dataare we using now?
   var i, j;
   var W = new Array(80);
   // initial constants
   var H0 = 0x67452301;
   var H1 = 0xEFCDAB89;
   var H2 = 0x98BADCFE;
   var H3 = 0x10325476;
   var H4 = 0xC3D2E1F0;
   // working variables
   var A, B, C, D, E;
   var temp;

   // get message to hash
   var msg = document.loginform.psw.value;

   // note current length
   var msg_len = msg.length;

   // convert to a 32-bit word array
   var word_array = new Array();
   for( i=0; i<msg_len-3; i+=4 )
   {
      // convert 4 bytes to a word
      j = msg.charCodeAt(i)<<24 | msg.charCodeAt(i+1)<<16 |
		msg.charCodeAt(i+2)<<8 | msg.charCodeAt(i+3);
      word_array.push( j );
   }

   // handle final bits, add beginning of padding: 1 bit, then 0 bits
   switch( msg_len % 4 )
   {
      case 0:
         // text length was a multiple of 4 bytes, start padding
         i = 0x080000000;				// 4 bytes padding
         break;

      case 1:
         // one byte of text left
         i = msg.charCodeAt(msg_len-1)<<24 | 0x0800000;	// 3 bytes padding
         break;

      case 2:
         // two bytes of text left
         i = msg.charCodeAt(msg_len-2)<<24 | msg.charCodeAt(msg_len-1)<<16
		| 0x08000;				// 2 bytes padding
         break;

      case 3:
         // three bytes of text left
         i = msg.charCodeAt(msg_len-3)<<24 | msg.charCodeAt(msg_len-2)<<16
		| msg.charCodeAt(msg_len-1)<<8	| 0x80;	// 1 byte padding
         break;

      default:
         window.alert("Something went weird in the switch!")
         return;
   }

   // handle the end of the text and beginning of the padding
   word_array.push( i );

   // pad to 448 bits (mod 512 bits) = 14 words (mod 16 words)
   while( (word_array.length % 16) != 14 )
      word_array.push( 0 );

   // add 64-bit message length (in bits)
   word_array.push( msg_len>>>29 );
   word_array.push( (msg_len<<3)&0x0ffffffff );

   // Process each 16-word block.
   for ( blockstart=0; blockstart<word_array.length; blockstart+=16 )
   {
      // create entries in W array
      for( i=0; i<16; i++ )
         W[i] = word_array[blockstart+i];
      for( i=16; i<=79; i++ )
         W[i] = rotate_left(W[i-3] ^ W[i-8] ^ W[i-14] ^ W[i-16], 1);

      // copy state
      A = H0;
      B = H1;
      C = H2;
      D = H3;
      E = H4;

      // update state variables
      for( i= 0; i<=19; i++ )
      {
         temp = (rotate_left(A,5) + ((B&C) | (~B&D)) + E + W[i] + 0x5A827999) & 0x0ffffffff;

         // update state
         E = D;
         D = C;
         C = rotate_left(B,30);
         B = A;
         A = temp;
      }

      for( i=20; i<=39; i++ )
      {
         temp = (rotate_left(A,5) + (B ^ C ^ D) + E + W[i] + 0x6ED9EBA1) & 0x0ffffffff;

         // update state
         E = D;
         D = C;
         C = rotate_left(B,30);
         B = A;
         A = temp;
      }

      for( i=40; i<=59; i++ )
      {
         temp = (rotate_left(A,5) + ((B&C) | (B&D) | (C&D)) + E + W[i] + 0x8F1BBCDC) & 0x0ffffffff;

         // update state
         E = D;
         D = C;
         C = rotate_left(B,30);
         B = A;
         A = temp;
      }

      for( i=60; i<=79; i++ )
      {
        temp = (rotate_left(A,5) + (B ^ C ^ D) + E + W[i] + 0x6CA62C1D6) & 0x0ffffffff;

         // update state
         E = D;
         D = C;
         C = rotate_left(B,30);
         B = A;
         A = temp;
      }

      H0 = (H0 + A) & 0x0ffffffff;
      H1 = (H1 + B) & 0x0ffffffff;
      H2 = (H2 + C) & 0x0ffffffff;
      H3 = (H3 + D) & 0x0ffffffff;
      H4 = (H4 + E) & 0x0ffffffff;

   } // of loop on i

   // process output
   document.loginform.pass.value = cvt_hex(H0) + cvt_hex(H1) + cvt_hex(H2)
		+ cvt_hex(H3) + cvt_hex(H4);
}
</script>