home *** CD-ROM | disk | FTP | other *** search
/ CD Actual Thematic 25: Programming / pc_actual_25.iso / HTML / AceHTML / AceHTML4Free.exe / %MAINDIR% / EScripts / jscript / ban3.scr < prev    next >
Encoding:
Text File  |  2001-09-06  |  859 b   |  28 lines
  1. <SCRIPT LANGUAGE="JavaScript">
  2. <!-- begin script
  3. var msgBan3, msgBan3b, string3 = "", stringPart3, delayBan3, ban3;
  4. function banner3(delay) {
  5.   delayBan3 = delay;
  6.   if (string3.length == 0) {
  7.     string3 = " ";
  8.     msgBan3b = msgBan3;
  9.     stringPart3 = "";
  10.   }
  11.   else if (string3.length == 1) {
  12.     while (msgBan3b.substring(0, 1) == " ") {
  13.       stringPart3 = stringPart3 + string3;
  14.       string3 = msgBan3b.substring(0, 1);
  15.       msgBan3b = msgBan3b.substring(1, msgBan3b.length);
  16.     }
  17.     stringPart3 = stringPart3 + string3;
  18.     string3 = msgBan3b.substring(0, 1);
  19.     msgBan3b = msgBan3b.substring(1, msgBan3b.length);
  20.   }
  21.   else string3 = string3.substring(10, string3.length);
  22.  
  23.   document.formBan3.Fbanner3.value = stringPart3 + string3;
  24.   ban3 = window.setTimeout('banner3(delayBan3)',delay);
  25. }
  26. // end script -->
  27. </SCRIPT>
  28.