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();