功能很全的精品JS计算器

2007-02-15 00:00:00 作者：

功能很全的精品JS计算器

<HTML><HEAD><TITLE>网页特效|XFBBS.Com|---功能很全的精品计算器</TITLE> 
<META http-equiv=Content-Type content="text/html; charset=gb2312"> 
<META http-equiv=Content-Language content=zh-cn> 
<META http-equiv=Page-Enter content=blendTrans(Duration=0.5)> 
<META http-equiv=Page-Exit content=blendTrans(Duration=0.5)> 
<STYLE type=text/css>P { 
 FONT-SIZE: 9pt; FONT-FAMILY: "Verdana" 
} 
TD { 
 FONT-SIZE: 9pt; LINE-HEIGHT: normal 
} 
A { 
 FONT-SIZE: 9pt; TEXT-TRANSFORM: none; COLOR: #326969; TEXT-DECORATION: none 
} 
A:hover { 
 FONT-SIZE: 9pt; LEFT: 1px; COLOR: #0000ff; POSITION: relative; TOP: 1px; TEXT-DECORATION: none 
} 
BODY { 
 FONT-SIZE: 9pt; CURSOR: url('body.cur'); SCROLLBAR-ARROW-COLOR: #ffffff; SCROLLBAR-BASE-COLOR: #cde0c2 
} 
.diary_tb { 
 WIDTH: 100%; WORD-BREAK: break-all; FONT-FAMILY: "Verdana","宋体"; POSITION: relative; TEXT-ALIGN: center; WORD-WRAP: break-word 
} 
.diary_main { 
 TABLE-LAYOUT: fixed; BACKGROUND-POSITION: left top; FONT-SIZE: 12px; COLOR: #005782; WORD-BREAK: break-all; LINE-HEIGHT: 24px; FONT-FAMILY: "宋体"; LINE-BREAK: strict; HEIGHT: 2px; TEXT-ALIGN: left 
} 
</STYLE>

<META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD> 
<CENTER> 
<TABLE id=AutoNumber2 style="BORDER-COLLAPSE: collapse" borderColor=#808080  
cellSpacing=0 cellPadding=0 width=760 border=0> 
</TABLE> 
<SCRIPT language=javascript> 
<!-- 
var endNumber=true 
var mem=0 
var carry=10 
var hexnum="0123456789abcdef" 
var angle="d" 
var stack="" 
var level="0" 
var layer=0

//数字键

function inputkey(key) 
{ 
var index=key.charCodeAt(0); 
if ((carry==2 && (index==48 || index==49)) 
|| (carry==8 && index>=48 && index<=55) 
|| (carry==10 && (index>=48 && index<=57 || index==46)) 
|| (carry==16 && ((index>=48 && index<=57) || (index>=97 && index<=102)))) 
if(endNumber) 
{ 
endNumber=false 
document.calc.display.value = key 
} 
else if(document.calc.display.value == null || document.calc.display.value == "0") 
document.calc.display.value = key 
else 
document.calc.display.value += key 
}

function changeSign() 
{ 
if (document.calc.display.value!="0") 
if(document.calc.display.value.substr(0,1) == "-") 
document.calc.display.value = document.calc.display.value.substr(1) 
else 
document.calc.display.value = "-" + document.calc.display.value 
}

//函数键

function inputfunction(fun,shiftfun) 
{ 
endNumber=true 
if (document.calc.shiftf.checked) 
document.calc.display.value=decto(funcalc(shiftfun,(todec(document.calc.display.value,carry))),carry) 
else 
document.calc.display.value=decto(funcalc(fun,(todec(document.calc.display.value,carry))),carry) 
document.calc.shiftf.checked=false 
document.calc.hypf.checked=false 
inputshift() 
}

function inputtrig(trig,arctrig,hyp,archyp) 
{ 
if (document.calc.hypf.checked) 
inputfunction(hyp,archyp) 
else 
inputfunction(trig,arctrig) 
}

//运算符

function operation(join,newlevel) 
{ 
endNumber=true 
var temp=stack.substr(stack.lastIndexOf("(")+1)+document.calc.display.value 
while (newlevel!=0 && (newlevel<=(level.charAt(level.length-1)))) 
{ 
temp=parse(temp) 
level=level.slice(0,-1) 
} 
if (temp.match(/^(.*\d[\+\-\*\/\%\^\&\|x])?([+-]?[0-9a-f\.]+)$/)) 
document.calc.display.value=RegExp.$2 
stack=stack.substr(0,stack.lastIndexOf("(")+1)+temp+join 
document.calc.operator.value=" "+join+" " 
level=level+newlevel

}

//括号

function addbracket() 
{ 
endNumber=true 
document.calc.display.value=0 
stack=stack+"(" 
document.calc.operator.value="   " 
level=level+0

layer+=1 
document.calc.bracket.value="(="+layer 
}

function disbracket() 
{ 
endNumber=true 
var temp=stack.substr(stack.lastIndexOf("(")+1)+document.calc.display.value 
while ((level.charAt(level.length-1))>0) 
{ 
temp=parse(temp) 
level=level.slice(0,-1) 
}

document.calc.display.value=temp 
stack=stack.substr(0,stack.lastIndexOf("(")) 
document.calc.operator.value="   " 
level=level.slice(0,-1)

layer-=1 
if (layer>0) 
document.calc.bracket.value="(="+layer 
else 
document.calc.bracket.value="" 
}

//等号

function result() 
{ 
endNumber=true 
while (layer>0) 
disbracket() 
var temp=stack+document.calc.display.value 
while ((level.charAt(level.length-1))>0) 
{ 
temp=parse(temp) 
level=level.slice(0,-1) 
}

document.calc.display.value=temp 
document.calc.bracket.value="" 
document.calc.operator.value="" 
stack="" 
level="0" 
}

//修改键

function backspace() 
{ 
if (!endNumber) 
{ 
if(document.calc.display.value.length>1) 
document.calc.display.value=document.calc.display.value.substring(0,document.calc.display.value.length - 1) 
else 
document.calc.display.value=0 
} 
}

function clearall() 
{ 
document.calc.display.value=0 
endNumber=true 
stack="" 
level="0" 
layer="" 
document.calc.operator.value="" 
document.calc.bracket.value="" 
}

//转换键

function inputChangCarry(newcarry) 
{ 
endNumber=true 
document.calc.display.value=(decto(todec(document.calc.display.value,carry),newcarry)) 
carry=newcarry

document.calc.sin.disabled=(carry!=10) 
document.calc.cos.disabled=(carry!=10) 
document.calc.tan.disabled=(carry!=10) 
document.calc.bt.disabled=(carry!=10) 
document.calc.pi.disabled=(carry!=10) 
document.calc.e.disabled=(carry!=10) 
document.calc.kp.disabled=(carry!=10)

document.calc.k2.disabled=(carry<=2) 
document.calc.k3.disabled=(carry<=2) 
document.calc.k4.disabled=(carry<=2) 
document.calc.k5.disabled=(carry<=2) 
document.calc.k6.disabled=(carry<=2) 
document.calc.k7.disabled=(carry<=2) 
document.calc.k8.disabled=(carry<=8) 
document.calc.k9.disabled=(carry<=8) 
document.calc.ka.disabled=(carry<=10) 
document.calc.kb.disabled=(carry<=10) 
document.calc.kc.disabled=(carry<=10) 
document.calc.kd.disabled=(carry<=10) 
document.calc.ke.disabled=(carry<=10) 
document.calc.kf.disabled=(carry<=10)

}

function inputChangAngle(angletype) 
{ 
endNumber=true 
angle=angletype 
if (angle=="d") 
document.calc.display.value=radiansToDegress(document.calc.display.value) 
else 
document.calc.display.value=degressToRadians(document.calc.display.value) 
endNumber=true 
}

function inputshift() 
{ 
if (document.calc.shiftf.checked) 
{ 
document.calc.bt.value="deg " 
document.calc.ln.value="exp " 
document.calc.log.value="expd"

if (document.calc.hypf.checked) 
{ 
document.calc.sin.value="ahs " 
document.calc.cos.value="ahc " 
document.calc.tan.value="aht " 
} 
else 
{ 
document.calc.sin.value="asin" 
document.calc.cos.value="acos" 
document.calc.tan.value="atan" 
}

document.calc.sqr.value="x^.5" 
document.calc.cube.value="x^.3"

document.calc.floor.value="小数" 
} 
else 
{ 
document.calc.bt.value="d.ms" 
document.calc.ln.value=" ln " 
document.calc.log.value="log "

if (document.calc.hypf.checked) 
{ 
document.calc.sin.value="hsin" 
document.calc.cos.value="hcos" 
document.calc.tan.value="htan" 
} 
else 
{ 
document.calc.sin.value="sin " 
document.calc.cos.value="cos " 
document.calc.tan.value="tan " 
}

document.calc.sqr.value="x^2 " 
document.calc.cube.value="x^3 "

document.calc.floor.value="取整" 
}

} 
//存储器部分

function clearmemory() 
{ 
mem=0 
document.calc.memory.value="   " 
}

function getmemory() 
{ 
endNumber=true 
document.calc.display.value=decto(mem,carry) 
}

function putmemory() 
{ 
endNumber=true 
if (document.calc.display.value!=0) 
{ 
mem=todec(document.calc.display.value,carry) 
document.calc.memory.value=" M " 
} 
else 
document.calc.memory.value="   " 
}

function addmemory() 
{ 
endNumber=true 
mem=parseFloat(mem)+parseFloat(todec(document.calc.display.value,carry)) 
if (mem==0) 
document.calc.memory.value="   " 
else 
document.calc.memory.value=" M " 
}

function multimemory() 
{ 
endNumber=true 
mem=parseFloat(mem)*parseFloat(todec(document.calc.display.value,carry)) 
if (mem==0) 
document.calc.memory.value="   " 
else 
document.calc.memory.value=" M " 
}

//十进制转换

function todec(num,oldcarry) 
{ 
if (oldcarry==10 || num==0) return(num) 
var neg=(num.charAt(0)=="-") 
if (neg) num=num.substr(1) 
var newnum=0 
for (var index=1;index<=num.length;index++) 
newnum=newnum*oldcarry+hexnum.indexOf(num.charAt(index-1)) 
if (neg) 
newnum=-newnum 
return(newnum) 
}

function decto(num,newcarry) 
{ 
var neg=(num<0) 
if (newcarry==10 || num==0) return(num) 
num=""+Math.abs(num) 
var newnum="" 
while (num!=0) 
{ 
newnum=hexnum.charAt(num%newcarry)+newnum 
num=Math.floor(num/newcarry) 
} 
if (neg) 
newnum="-"+newnum 
return(newnum) 
}

//表达式解析

function parse(string) 
{ 
if (string.match(/^(.*\d[\+\-\*\/\%\^\&\|x\<])?([+-]?[0-9a-f\.]+)([\+\-\*\/\%\^\&\|x\<])([+-]?[0-9a-f\.]+)$/)) 
return(RegExp.$1+cypher(RegExp.$2,RegExp.$3,RegExp.$4)) 
else 
return(string) 
}

//数学运算和位运算

function cypher(left,join,right) 
{ 
left=todec(left,carry) 
right=todec(right,carry) 
if (join=="+") 
return(decto(parseFloat(left)+parseFloat(right),carry)) 
if (join=="-") 
return(decto(left-right,carry)) 
if (join=="*") 
return(decto(left*right,carry)) 
if (join=="/" && right!=0) 
return(decto(left/right,carry)) 
if (join=="%") 
return(decto(left%right,carry)) 
if (join=="&") 
return(decto(left&right,carry)) 
if (join=="|") 
return(decto(left|right,carry)) 
if (join=="^") 
return(decto(Math.pow(left,right),carry)) 
if (join=="x") 
return(decto(left^right,carry)) 
if (join=="<") 
return(decto(left<<right,carry)) 
alert("除数不能为零") 
return(left) 
}

//函数计算

function funcalc(fun,num) 
{ 
with(Math) 
{ 
if (fun=="pi") 
return(PI) 
if (fun=="e") 
return(E)

if (fun=="abs") 
return(abs(num)) 
if (fun=="ceil") 
return(ceil(num)) 
if (fun=="round") 
return(round(num))

if (fun=="floor") 
return(floor(num)) 
if (fun=="deci") 
return(num-floor(num))

if (fun=="ln" && num>0) 
return(log(num)) 
if (fun=="exp") 
return(exp(num)) 
if (fun=="log" && num>0) 
return(log(num)*LOG10E) 
if (fun=="expdec") 
return(pow(10,num))

if (fun=="cube") 
return(num*num*num) 
if (fun=="cubt") 
return(pow(num,1/3)) 
if (fun=="sqr") 
return(num*num) 
if (fun=="sqrt" && num>=0) 
return(sqrt(num))

if (fun=="!") 
return(factorial(num))

if (fun=="recip" && num!=0) 
return(1/num)

if (fun=="dms") 
return(dms(num)) 
if (fun=="deg") 
return(deg(num))

if (fun=="~") 
return(~num)

if (angle=="d") 
{ 
if (fun=="sin") 
return(sin(degressToRadians(num))) 
if (fun=="cos") 
return(cos(degressToRadians(num))) 
if (fun=="tan") 
return(tan(degressToRadians(num)))

if (fun=="arcsin" && abs(num)<=1) 
return(radiansToDegress(asin(num))) 
if (fun=="arccos" && abs(num)<=1) 
return(radiansToDegress(acos(num))) 
if (fun=="arctan") 
return(radiansToDegress(atan(num))) 
} 
else 
{ 
if (fun=="sin") 
return(sin(num)) 
if (fun=="cos") 
return(cos(num)) 
if (fun=="tan") 
return(tan(num))

if (fun=="arcsin" && abs(num)<=1) 
return(asin(num)) 
if (fun=="arccos" && abs(num)<=1) 
return(acos(num)) 
if (fun=="arctan") 
return(atan(num)) 
}

if (fun=="hypsin") 
return((exp(num)-exp(0-num))*0.5) 
if (fun=="hypcos") 
return((exp(num)+exp(-num))*0.5) 
if (fun=="hyptan") 
return((exp(num)-exp(-num))/(exp(num)+exp(-num)))

if (fun=="ahypsin" | fun=="hypcos" | fun=="hyptan") 
{ 
alert("对不起,公式还没有查到!") 
return(num) 
}

alert("超出函数定义范围") 
return(num) 
} 
}

function factorial(n) 
{ 
n=Math.abs(parseInt(n)) 
var fac=1 
for (;n>0;n-=1) 
fac*=n 
return(fac) 
}

function dms(n) 
{ 
var neg=(n<0) 
with(Math) 
{ 
n=abs(n) 
var d=floor(n) 
var m=floor(60*(n-d)) 
var s=(n-d)*60-m 
} 
var dms=d+m/100+s*0.006 
if (neg) 
dms=-dms 
return(dms) 
}

function deg(n) 
{ 
var neg=(n<0) 
with(Math) 
{ 
n=abs(n) 
var d=floor(n) 
var m=floor((n-d)*100) 
var s=(n-d)*100-m 
} 
var deg=d+m/60+s/36 
if (neg) 
deg=-deg 
return(deg) 
}

function degressToRadians(degress) 
{ 
return(degress*Math.PI/180) 
}

function radiansToDegress(radians) 
{ 
return(radians*180/Math.PI) 
}

//界面

//--> 
  </SCRIPT>

[Ctrl+A 全选注:如需引入外部Js需刷新才能执行]

功能很全的精品JS计算器

您可能感兴趣的文章: