Subversion Repositories wimsdev

Rev

Rev 1060 | Rev 6099 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1060 Rev 1316
Line 1... Line 1...
1
 
1
 
2
!set wims_html_header=!append line <script language=javascript type="text/javascript">\
2
!set wims_html_header=!append line <script language=javascript type="text/javascript">\
-
 
3
var fixrtick=$wims_read_parm;\
3
var rtick;\
4
var rtick=fixrtick;\
-
 
5
var enter=new Date();\
4
rtick=$wims_read_parm;\
6
function tempo() {\
-
 
7
        exit=new Date();\
-
 
8
        return Math.ceil((exit.getTime()-enter.getTime())/1000);\
-
 
9
}\
5
function clock() {\
10
function clock() {\
6
 document.chrono.clock.value=rtick; rtick--;\
11
 document.chrono.clock.value=rtick; \
-
 
12
rtick=fixrtick-tempo();\
7
 if(rtick<0) rtick=0;\
13
 if(rtick<0) rtick=0;\
8
 Timer= setTimeout("clock()",1000);\
14
 Timer= setTimeout("clock()",1000);\
9
}\
15
}\
10
</script> to $wims_html_header
16
</script> to $wims_html_header
11
 
17