🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.www
Article #616

Scroll w lini statusu raz jeszcze.

#616
From: Jakub Michalski QubaCube
Date: Thu, 22 Feb 1996 00:00
84 lines
3451 bytes
Zapodaje ten fajny skrypcik.
Nalezy go umiescic w tagu <head></head>
a nastepnie zrobic takie <body></body> jakie jest podane w przykladzie.
Pozniej mozna zdefiniowac wlasne <body> i bedzie OK, natomiast nie dam
glowy, czy daloby rade wrzucic wlasny dokument do tej przygotowaniej
linii.


----------------KOD SCROLL'A W LINII STATUSU...-----------------------
<head>
        <SCRIPT LANGUAGE="JavaScript">

<!-- Beginning of JavaScript Applet -------------------

/* Copyright (C)1996 Web Integration Systems, Inc. DBA Websys, Inc.
   All Rights Reserved.   This applet can be re-used or modified, if
credit is given in
   the source code. We will not be held responsible for any unwanted
effects due to the
   usage of this applet or any derivative.  No warrantees for usability
for any specific
   application are given or implied. Chris Skinner, January 30th, 1996.
   Hacked for CNNfn by RD, Jan. 31, 1996   
   Hacked for InfiNet's WebPaper, Feb. 2th, 1996
   Minor Mods. by Silicon Toad  Feb. 12th, 1996
*/
function scrollit_r2l(seed)
{
        var m1  = "Textu czesc pierwsza ";
        var m2  = "Textu czesc druga ";
        var m3 = "Trzecia... ";
        var m4 = "I czfarta...   ";
        var msg=m1+m2+m3+m4; 
        var out = " ";
        var c   = 1;
        if (seed > 100) {
                seed--;
                var cmd="scrollit_r2l(" + seed + ")";
                timerTwo=window.setTimeout(cmd,100);
        }
        else if (seed <= 100 && seed > 0) {
                for (c=0 ; c < seed ; c++) {
                        out+=" ";
                }
                out+=msg;
                seed--;
                var cmd="scrollit_r2l(" + seed + ")";
                    window.status=out;
                timerTwo=window.setTimeout(cmd,100);
        }
        else if (seed <= 0) {
                if (-seed < msg.length) {
                        out+=msg.substring(-seed,msg.length);
                        seed--;
                        var cmd="scrollit_r2l(" + seed + ")";
                        window.status=out;
                        timerTwo=window.setTimeout(cmd,100);
                }
                else {
                        window.status=" ";
                        timerTwo=window.setTimeout("scrollit_r2l(100)",75);
                }
        }
}
// -- End of JavaScript code -------------- -->

        </SCRIPT>
</HEAD>


<BODY onLoad="timerONE=window.setTimeout('scrollit_r2l(50)',500);">
</BODY>




-- 
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
::  \ Q /                   Main Account:     ma...@bilkent.edu.tr  ::
::   \ /                    Sent from:        ma...@bilkent.edu.tr  ::
::  H X C                   URL:  http://www.bilkent.edu.tr/~marek  ::
::   / \                                                            ::
::  / C \  >>> QubaCube                       <Errare humanum est>  ::
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
Technical Details
Message-ID: <312C7B33.167EB0E7@ug.bcc.bilkent.edu.tr>
Path: mbox-mo1.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
From: "Jakub Michalski [QubaCube]" <ja...@ug.bcc.bilkent.edu.tr>
Subject: Scroll w lini statusu raz jeszcze.
Date: 1996/02/22
Message-ID: <312C7B33.167EB0E7@ug.bcc.bilkent.edu.tr>
X-Deja-AN: 140678670
organization: Non Senz TV
mime-version: 1.0
newsgroups: pl.comp.www
x-mailer: Mozilla 2.0 (X11; I; SunOS 4.1.3 sun4m)
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit