th = false;

function gourl(url)
 { document.location = url;
 }

function stop_timer()
 {
 clearTimeout(th);
 }

function run_timer(code, interval)
 {
 eval(code);
 clearTimeout(th);
 th = setTimeout('run_timer("'+code+'", '+interval+')', interval);
 }

function scroll_cap(direction)
 {
 cap = document.getElementById('sp_caption');
 if (!cap) return;
 if (direction==1) cap.style.left = parseInt(cap.style.left)+1;
 if (direction==2) cap.style.left = parseInt(cap.style.left)-1;
 }

function cap_right(state)
 {
 stop_timer();
 if (state==1) run_timer('scroll_cap(1)', 15);
 }

function cap_left(state)
 {
 stop_timer();
 if (state==1) run_timer('scroll_cap(2)', 15);
 }

function communicate_icq()
 { n = (405*2)+1;
 alert('ICQ: 472-'+n+'\r\nДля ускорения авторизации, в запросе напишите "Pascal HomePage"');
 }

function noref(url)
 {
 html = "<html>\r\n<head>\r\n<title>Pascal HP - Загрузка файла</title>\r\n<meta http-equiv='Refresh' content='0; url=" + url + "'>\r\n</head>\r\n<body>\r\nЕсли загрузка файла не началась автоматически, перейдите по этому адресу: <a href='" + url + "'>" + url + "</a>\r\n</body>\r\n</html>";
 win = window.open();
 win.document.write(html);
 win.document.close();
 }
