Subversion Repositories wimsdev

Rev

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

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