Subversion Repositories wimsdev

Rev

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

Rev Author Line No. Line
20 reyssat 1
 
6099 bpr 2
<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
}
20 reyssat 10
function clock() {
10454 obado 11
 document.chrono.clock.value=rtick;
1316 reyssat 12
rtick=fixrtick-tempo();
20 reyssat 13
 if(rtick<0) rtick=0;
10454 obado 14
 Timer= setTimeout("clock()",1000);
15
}
20 reyssat 16
</script>
17
!set wims_html_onload=clock();