//

<!--Laufschrift-->

          /*
           Copyright (C) 1996  Frequency Graphics  All Rights Reserved.
             Feel free to reuse this code snippet
             provided this header remains in tact
             Andy Augustine 3.17.96 [www.FreqGrafx.com/411/]
             send comments to <mohammed@freqgrafx.com>
          */
         
          function statusMessageObject(p,d) {
            this.msg = MESSAGE
            this.out = " "
            this.pos = POSITION
            this.delay = DELAY
            this.i     = 0
            this.reset = clearMessage
          }

          function clearMessage() {
            this.pos = POSITION
          }
          var POSITION = 100
          var DELAY    = 100
          var MESSAGE  = "+++ web-conzept-mn.de +++ Webadministration: Frank Hahn +++ e-mail: admin@web-conzept-mn.de +++"
          var scroll = new statusMessageObject()

          function scroller() {
            //
            // add spaces to beggining of message
            //
            for (scroll.i = 0; scroll.i < scroll.pos; scroll.i++) {
              scroll.out += " "
            }
            //
            // if you are still have leading spaces, just
            // add custom string to tail of message
            // OR else if the string is running off the
            // screen, only add the characters left
            //

            if (scroll.pos >= 0)
             scroll.out += scroll.msg
            else scroll.out = scroll.msg.substring(-scroll.pos,scroll.msg.length)
            window.status = scroll.out

            // set parameters for next run
            scroll.out = " "
            scroll.pos--
            // if you are at the end of the message,
            // reset parameters to start again
            if (scroll.pos < -(scroll.msg.length)) {
             scroll.reset()
            }

            setTimeout ('scroller()',scroll.delay)
          }