Subversion Repositories wimsdev

Rev

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

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