1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
|
!if $wims_read_parm!=slib_header
!goto proc
!endif
slib_author=Georges, Khaznadar
slib_license=GPL
slib_example= Angle :, Valeur trigonomtrique :
!exit
:proc
!reset slib_aname, slib_vname, slib_code
slib_parm=!item 1 to 2 of $wims_read_parm
!distribute item $slib_parm into slib_aname, slib_vname
slib_code=<script type="text/javascript">\
/*<![CDATA[*/\
var a; /* angle en radian */\
var v; /* valeur du sinus, cosinus ou tangente, sans unit */\
function get_a(){\
angle=document.getElementById("angle").value;\
unite=document.getElementById("unite").value;\
a=angle*unite;\
}\
function set_a(){\
if (a=="undef"){\
document.getElementById("angle").value="undef";\
} else{\
unite=document.getElementById("unite").value;\
angle=a/unite;\
document.getElementById("angle").value=angle;\
}\
}\
function get_v(){\
v=document.getElementById("trig-value").value;\
}\
function set_v(){\
document.getElementById("trig-value").value=v;\
}\
function asin(){\
get_v();\
if (v<-1 || v >1){\
a="undef";\
set_a();\
} else {\
a=Math.asin(v);\
set_a();\
}\
}\
function sin(){\
get_a();\
v=Math.sin(a);\
set_v();\
}\
function acos(){\
get_v();\
if (v<-1 || v >1){\
a="undef";\
set_a();\
} else {\
a=Math.acos(v);\
set_a();\
}\
}\
function cos(){\
get_a();\
v=Math.cos(a);\
set_v();\
}\
function atan(){\
get_v();\
a=Math.atan(v);\
set_a();\
}\
function tan(){\
get_a();\
v=Math.tan(a);\
set_v();\
}\
/*]]>*/\
</script>\
<div id="calc-trigo" >\
<table style="padding:0.5em; border:3px ridge navy; background:lightcyan; -moz-border-radius: 1em;" >\
<tr>\
<td colspan="6" style="text-align:center;" >\
<b>Angle:</b>\
<input id="angle" value="0" style="text-align:right; border:3px ridge navy; -moz-border-radius: 0.5em;"> \
<select id="unite" style="text-align:right; border:3px ridge navy; -moz-border-radius: 0.5em;">\
<option value="0.017453292519943295769"> </option>\
<option value="1">rad </option>\
</select >\
</td>\
<tr>\
<td><button onclick="sin(); return false;" style="border:2px outset navy; -moz-border-radius: 0.5em;" >↓sin</button></td>\
<td><button onclick="asin(); return false;" style="border:2px outset navy; -moz-border-radius: 0.5em;" >↑asin</button></td>\
<td><button onclick="cos(); return false;" style="border:2px outset navy; -moz-border-radius: 0.5em;" >↓cos</button></td>\
<td><button onclick="acos(); return false;" style="border:2px outset navy; -moz-border-radius: 0.5em;" >↑acos</button></td>\
<td><button onclick="tan(); return false;" style="border:2px outset navy; -moz-border-radius: 0.5em;" >↓tan</button></td>\
<td><button onclick="atan(); return false;" style="border:2px outset navy; -moz-border-radius: 0.5em;" >↑atan</button></td>\
</tr>\
<tr>\
<td colspan="6" style="text-align:center;" >\
<b>Value:</b> \
<input id="trig-value" value="0" style="text-align:right; border:3px ridge navy; -moz-border-radius: 0.5em;">\
</td>\
</tr>\
</table>\
</div>
slib_code=!replace Angle: by $slib_aname in $slib_code
slib_code=!replace Value: by $slib_vname in $slib_code
slib_out=$slib_code
|
