Subversion Repositories wimsdev

Rev

Rev 20 | Rev 6576 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
20 reyssat 1
 
2
<html><body>
3
<center>
4
<FORM NAME="Calc">
5
 
6
<!-- This script and many more are available free online at -->
7
<!-- The JavaScript Source!! http://javascript.internet.com -->
8
 
9
<TABLE BORDER=4>
10
<tr>
11
<td>
12
<INPUT TYPE="text"   NAME="Input" Size="16">
5787 bpr 13
<br/>
20 reyssat 14
</td>
15
</tr>
16
<tr>
17
<td>
18
<INPUT TYPE="button" NAME="one"   VALUE="  1  " OnClick="Calc.Input.value += '1'">
19
<INPUT TYPE="button" NAME="two"   VALUE="  2  " OnCLick="Calc.Input.value += '2'">
20
<INPUT TYPE="button" NAME="three" VALUE="  3  " OnClick="Calc.Input.value += '3'">
21
<INPUT TYPE="button" NAME="plus"  VALUE="  +  " OnClick="Calc.Input.value += ' + '">
5787 bpr 22
<br/>
20 reyssat 23
<INPUT TYPE="button" NAME="four"  VALUE="  4  " OnClick="Calc.Input.value += '4'">
24
<INPUT TYPE="button" NAME="five"  VALUE="  5  " OnCLick="Calc.Input.value += '5'">
25
<INPUT TYPE="button" NAME="six"   VALUE="  6  " OnClick="Calc.Input.value += '6'">
26
<INPUT TYPE="button" NAME="minus" VALUE="  -  " OnClick="Calc.Input.value += ' - '">
5787 bpr 27
<br/>
20 reyssat 28
<INPUT TYPE="button" NAME="seven" VALUE="  7  " OnClick="Calc.Input.value += '7'">
29
<INPUT TYPE="button" NAME="eight" VALUE="  8  " OnCLick="Calc.Input.value += '8'">
30
<INPUT TYPE="button" NAME="nine"  VALUE="  9  " OnClick="Calc.Input.value += '9'">
31
<INPUT TYPE="button" NAME="times" VALUE="  x  " OnClick="Calc.Input.value += ' * '">
5787 bpr 32
<br/>
20 reyssat 33
<INPUT TYPE="button" NAME="clear" VALUE="  c  " OnClick="Calc.Input.value = ''">
34
<INPUT TYPE="button" NAME="zero"  VALUE="  0  " OnClick="Calc.Input.value += '0'">
35
<INPUT TYPE="button" NAME="DoIt"  VALUE="  =  " OnClick="Calc.Input.value = eval(Math.round(eval(Calc.Input.value)*(Math.pow(10,12)))/(Math.pow(10,12)))">
36
<INPUT TYPE="button" NAME="div"   VALUE="  &#247;  " OnClick="Calc.Input.value += ' / '">
5787 bpr 37
<br/>
20 reyssat 38
</td>
39
</tr>
40
</TABLE>
41
</FORM>
42
</center>
43
 
44
<!-- <p><center>
5787 bpr 45
<font face="arial, helvetica" size="-2">Free JavaScripts provided<br/>
20 reyssat 46
by <a href="http://javascriptsource.com">The JavaScript Source</a></font>
47
</center><p> -->
48
 
49
</body></html>