Subversion Repositories wimsdev

Rev

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

  1.  
  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.   }
  16. </script>
  17. !set wims_html_onload=clock();
  18.