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