웹마스터 팁

계산기

2008.11.29 20:25

*이종민*

계산기 소스입니다.

<html>
<head>
<title>계산기</title>
<script>
bBool=false
var copiedtext=""
var tempstore=""
function initiatecopy() {
bBool=true;
}
function copyit() {
if (bBool) {
tempstore=copiedtext
document.execCommand("Copy")
if (tempstore!=copiedtext) {
alert(copiedtext);
}
bBool=false;
}
}
document.onselectionchange = initiatecopy
document.onmouseup = copyit
</script>
</head>
<script language="JavaScript">
function cal(p){
p.value=eval(p.value)
}
function e_expr(p,str){
p.value=p.value+str
}
function clear_expr(p){
p.value=""
}
</script>
<body>
<center>
    <form name="calform">
        <div align="left">
            <table border=30 bordercolor="silver" bordercolordark="silver">
<td colspan=4>
                    <p align="center"><input type="text" name="expr" size="20"></p>
<tr>
<tr>
                <td>
                    <p align="center"><input type="button" value=" 7 " onclick="e_expr(document.calform.expr,'7')">
</p>
<td>
                    <p align="center"><input type="button" value=" 8 " onclick="e_expr(document.calform.expr,'8')">
</p>
<td>
                    <p align="center"><input type="button" value=" 9 " onclick="e_expr(document.calform.expr,'9')">
</p>
<td>
                    <p align="center"><input type="button" value=" ÷ " onclick="e_expr(document.calform.expr,'/')">
</p>
<tr>
                <td>
                    <p align="center"><input type="button" value=" 4 " onclick="e_expr(document.calform.expr,'4')">
</p>
<td>
                    <p align="center"><input type="button" value=" 5 " onclick="e_expr(document.calform.expr,'5')">
</p>
<td>
                    <p align="center"><input type="button" value=" 6 " onclick="e_expr(document.calform.expr,'6')">
</p>
<td>
                    <p align="center"><input type="button" value=" × " onclick="e_expr(document.calform.expr,'*')">
</p>
<tr>
                <td>
                    <p align="center"><input type="button" value=" 1 " onclick="e_expr(document.calform.expr,'1')">
</p>
<td>
                    <p align="center"><input type="button" value=" 2 " onclick="e_expr(document.calform.expr,'2')">
</p>
<td>
                    <p align="center"><input type="button" value=" 3 " onclick="e_expr(document.calform.expr,'3')">
</p>
<td>
                    <p align="center"><input type="button" value=" - " onclick="e_expr(document.calform.expr,'-')">
</p>
<tr>
                <td>
                    <p align="center"><input type="button" value=" 0 " onclick="e_expr(document.calform.expr,'0')">
</p>
<td>
                        <p align="center"><input type="button" value=" 00 " onclick="e_expr(document.calform.expr,'00')">
</p>
<td>
                        <p align="center"><input type="button" value=" . " onclick="e_expr(document.calform.expr,'.')">
</p>
<td>
                        <p align="center"><input type="button" value=" + " onclick="e_expr(document.calform.expr,'+')">
</p>
<tr>
                    <td colspan=2>
                        <p align="center"><input type="button" value=" = " onclick="cal(document.calform.expr)">
</p>
<td colspan=2>
                    <p align="center"><input type="button" value="초기화" onclick="clear_expr(document.calform.expr)">
</p>
<tr>
</tr>
        </table>
    </div>
</form>
</center>
</body>
</html>
<body oncontextmenu="return false">
제목 글쓴이 날짜
qmail-1.03설치④ (vpopmail 인증모듈) 비츠로 2003.02.28
qmail-1.03설치③ (qmail설치) 비츠로 2003.02.28
qmail-1.03설치② (checkpassword 인증모듈) 비츠로 2003.02.28
qmail-1.03설치① (ucspi-tcp모듈) 비츠로 2003.02.28
phpMyAdmin 보안설정하기 [5] 겨울늑대 2003.02.27
아파치에서 펄 CGI를 쓰려면... [3] okw1003 2003.02.23
php-accelerator <- zend보다 빠른 phpcache [6] 푸른하늘 2003.02.20
잘못풀린 Tar 파일이나 기타 패키지파일 지우기 Dopesoul 2003.02.19
리눅스에서 표준출력으로 출력되는 모든 메시지를 파일로 만들기 [1] Dopesoul 2003.02.19
램디스크 활용 [6] Dopesoul 2003.02.14
레드햇 8.0 에 젠드옵티마이져(Zend optimizer) 2.1.0 설치-왕초보용 [7] 정인배 2003.02.13
MySQL 3.23.53a 이하 패치하세요!! [7] 바른생활 NGEO 2003.02.11
새로운 방식의 APM 컴파일법 [13] Dopesoul 2003.02.07
[JSP설치2탄]mod_jk를 이용한 Apache와 Tomcat의 연동[for Windows98/NT/2000] [1] 한희진 2003.02.06
[JSP설치1탄]Windows에서 APM+Tomcat4.1.x버전 연동하기 (for Windows2000,XP) 한희진 2003.02.06
[성공했음]Apache에서 ASP돌리기 (Apache::ASP이용) for Windows 초고속강좌 [9] 한희진 2003.02.05
[간단한팁]아파치에서 ASP사용하기 [5] 한희진 2003.02.04
[mysql]정말 간단한 사용자 계정 주기 [1] 화니 2003.02.04
ls 명령어 팁... [3] -zenple_nux 2003.01.26
htaccss를 활용하자! 4탄 ForceType 사용하기. [1] 앳플군 2003.01.24