home *** CD-ROM | disk | FTP | other *** search
/ Chip Hitware 6 A / CHIP_HITWARE6_A.iso / internet / LorenzHTMLTool / _SETUP.1 / Animated Status Line.scp < prev    next >
Encoding:
Text File  |  1998-06-15  |  1.3 KB  |  53 lines

  1. <HTMLtool>This script displays some text in the status bar</HTMLtool>
  2.  
  3. <HTML><HEAD><script language="JavaScript">
  4.   <!-- Funny text script by Bart Jellema
  5.     var hellotext="Put your text here ..."
  6.     var thetext=""
  7.     var started=false
  8.     var step=0
  9.     var times=1
  10.  
  11.     function welcometext()
  12.     {
  13.       times--
  14.       if (times==0)
  15.       {
  16.         if (started==false)
  17.         {
  18.           started = true;
  19.           window.status = hellotext;
  20.           setTimeout("anim()",1);
  21.         }
  22.         thetext = hellotext;
  23.       }
  24.     }
  25.  
  26.     function showstatustext(txt)
  27.     {
  28.       thetext = txt;
  29.       setTimeout("welcometext()",4000)
  30.       times++
  31.     }
  32.  
  33.     function anim()
  34.     {
  35.       step++
  36.       if (step==7) {step=1}
  37.       if (step==1) {window.status='>==='+thetext+'===<'}
  38.       if (step==2) {window.status='=>=='+thetext+'==<='}
  39.       if (step==3) {window.status='>=>='+thetext+'=<=<'}
  40.       if (step==4) {window.status='=>=>'+thetext+'<=<='}
  41.       if (step==5) {window.status='==>='+thetext+'=<=='}
  42.       if (step==6) {window.status='===>'+thetext+'<==='}
  43.       setTimeout("anim()",200);
  44.     }
  45.   // Funny text script by Bart Jellema -->
  46. </script>
  47. </HEAD><BODY>This script operates on the browser status line. Please take a look down.
  48. <SCRIPT LANGUAGE="JavaScript">
  49. <!--
  50. welcometext();
  51. //-->
  52. </SCRIPT>
  53. </BODY></HTML>