/*
 * -------
 * :ATTRIBUTION NOTICE BEGINS
 *
 * The following JSMsg functions are:
 * 
 *    (C) Copyright 2002 - 2003, Creativyst, Inc.
 *               ALL RIGHTS RESERVED
 * 
 * For more information go to:
 *           http://www.Creativyst.com
 * or email:
 *           Support@Creativyst.com
 * 
 * Licensed under the Open Software License version 1.1
 *
 * END ATTRIBUTION NOTICE:
 * -------
 * These functions are free software; you can redistribute 
 * them and/or modify them under the terms of the Open 
 * Software License (OSL) version 1.1 as published by
 * the Open Source Initiative;
 * 
 * This program is distributed in the hope that it will 
 * be useful, but WITHOUT ANY WARRANTY; without even the 
 * implied warranty of MERCHANTABILITY or FITNESS FOR A 
 * PARTICULAR PURPOSE. See the Open Software License
 * version 1.1 for more details.
 * 
 * For the complete details of the Open Software License
 * please visit the Open Source Initiative website.
 *
 * 
 *
 * -------
 * These functions are part of a shared convention.
 * called JSMsg.  Please see the JSMsg document
 * for more details.
 *
 * www.creativyst.com/Doc/Std/JSMsg/JSMsg.htm
 *
 *
 * -------------------------------------------
 * Parts of this code were automatically
 * generated and may contain copyrighted
 * content from other sources as well.
 * Such content may not be used without
 * first obtaining explicit permissions
 * from its source.
 *
 *
*/

function wa_JSMsg() {

this.Title = Array([this.ShortListSize]);
this.Desc = Array([this.ShortListSize]);
this.Link = Array([this.ShortListSize]);





 this.ShortListSize = 20;
 this.BeenLoaded = 0;
 this.dispNumb;

 this.Msg = function(msgPart, msgOffset)
 {
    document.write( this.Get(msgPart, msgOffset) );
 }

 this.MsgDay = function(msgPart)
 {
    document.write( this.GetDay(msgPart) );
 }

 this.MsgN = function(msgPart, msgNumber)
 {
    document.write( this.GetN(msgPart, msgNumber) );
 }


 this.Get = function(msgPart, msgOffset)
 {
    if(!msgOffset) {
        msgOffset = 0;
    }
    if(!this.BeenLoaded) {
        this.BeenLoaded = 1;
        dispNumb = 
           this.getRandInt(this.ShortListSize);
    }
    return( this.GetN(msgPart, (dispNumb + msgOffset)) );
 }

 this.GetDay = function(msgPart)
 {
    var d = new Date();
    var x = d.getDate();
    return( this.GetN(msgPart, x) );
 }


 this.GetN = function(msgPart, msgNumber)
 {
    var myTmp;

    if(!msgPart) {
        msgPart = "Body";
    }
    if(!msgNumber) {
        msgNumber = 0;
    }

    if(msgNumber >= this.ShortListSize) {
        msgNumber = msgNumber % this.ShortListSize;
    }

    if(  this.ok(msgPart,"Type") ) {
        return(this.Type[msgNumber]);
    }
    if(  this.ok(msgPart,"Title") ) {
        return(this.Title[msgNumber]);
    }
    if(  this.ok(msgPart, "Desc Description Content") ) {
        return(this.Desc[msgNumber]);
    }
    if(  this.ok(msgPart,"Body") ) {
        return(this.Body[msgNumber]);
    }
    if(  this.ok(msgPart, "Attrib Attribute Source") ) {
        return(this.Attrib[msgNumber]);
    }
    if(  this.ok(msgPart, "Author") ) {
        if(!this.Author[msgNumber]) {
            return(this.Attrib[msgNumber]);
        }
        return(this.Author[msgNumber]);
    }

    if(  this.ok(msgPart,"DayN Day2N Day") ) {
        myTmp = this.DateN[msgNumber];
        if(myTmp.length) { 
          myTmp = myTmp.substr(6,2);
          if(  this.ok(msgPart,"Day2N") ) {
            return(myTmp);
          }
          if(myTmp.charAt(0) == "0") {
            return(myTmp.substr(1,1))
          }
          return(myTmp);
        }
    }
    if(  this.ok(msgPart, "MonthN Month2N") ) {
        myTmp = this.DateN[msgNumber];
        if(myTmp.length) {
          myTmp = myTmp.substr(4,2)
          if(  this.ok(msgPart,"Month2N") ) {
            return(myTmp);
          }
          if(myTmp.charAt(0) == "0") {
            return(myTmp.substr(1,1))
          }
          return(myTmp);
        }
    }
    if(  this.ok(msgPart, "Year2N Year4N YearN Year") ) {
        if(this.DateN[msgNumber].length) {
          if(  this.ok(msgPart,"Year4N") ) {
            return(this.DateN[msgNumber].substr(0,4));
          }
          return(this.DateN[msgNumber].substr(0,4));
        }
    }

    if(  this.ok(msgPart,"Link") ) {
        return(this.Link[msgNumber]);
    }
    if( this.ok(msgPart,"LinkTitle") ) {
        if(this.MetaMsg(msgPart,"Link") && this.MetaMsg(msgPart,"Title") ) {
          if( !this.Link[msgNumber] ) {
              return(this.Title[msgNumber]);
          }

          if( !this.Title[msgNumber] ) {
            this.Title[msgNumber] =  this.Link[msgNumber];              
          }
          myTmp = '<A TARGET="_blank" \n'; 
          myTmp = myTmp + 'HREF="' + this.Link[msgNumber] + '">\n';
          myTmp = myTmp + this.Title[msgNumber] + '</A>\n';

          return(myTmp);

        }
        if( this.MetaMsg(msgPart,"Title") ) {
          return(this.Title[msgNumber]);
        }
        if( this.MetaMsg(msgPart,"Link") ) {
          if( this.Link[msgNumber] ) {
            myTmp = "<A TARGET=\"_blank\" \n"; 
            myTmp = myTmp + "HREF=\"" + this.Link[msgNumber] + "\">\n";
            myTmp = myTmp + this.Link[msgNumber] + "</A>\n";
            return(myTmp);
          }
        }
        return("");
    }
    if( this.ok(msgPart,"Cat Category Subject") ) {
        return(this.Cat[msgNumber]);
    }
    if( this.ok(msgPart,"Thumb") ) {
        return(this.Thumb[msgNumber]);
    }
    if( this.ok(msgPart,"Alt") ) {
        return(this.Alt[msgNumber]);
    }

    return("");
 }




 this.getRandInt = function(RandSz)
 {
    var t, t2, t3;

    t = 0;
    while(t < .000001) {
        t = Math.random();
        t = Math.abs(t);
    }
    t2 = t * 1000000;
    t2 = Math.round(t2);
    t3 = t2 % RandSz;
    return(t3);
 }



 this.ok = function(a, b)
 {
    var t, t2;

    if(!this.is(a,b)) {
        return(0);
    }
    return(this.MetaMsg(a));
 }

 this.is = function(a, b)
 {
    var t, t2;

    t = a + " ";
    t2 = b + " ";
    t2 = t2.toUpperCase();
    t = t.toUpperCase();

    if(t2.indexOf(t) == -1) {
        return(0);
    }
    return(1);
 }


 this.MetaMsg = function(msgCmd)
 {
    if( this.is(msgCmd, "Title LinkTitle Desc Description Link LinkTitle ") ) {
         return(1);

    }
    else if( this.is(msgCmd, "MetaCount") ) {
        return(20);
    }
    else {
        return(0);
    }
 }


     

}

wa = new wa_JSMsg();

/* how slow is the with statement */

with( wa ) {
Title[0] = "Special Weather Statement - Keweenaw (Michigan)";
Desc[0] = "\nSpecial Weather Statement\nIssued At:  2009-11-21T08:44:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/mqt/\n";
Link[0] = "http://www.weather.gov/alerts/MI.html#MIZ001.MQTSPSMQT.084400";

Title[1] = "Special Weather Statement - Ontonagon (Michigan)";
Desc[1] = "\nSpecial Weather Statement\nIssued At:  2009-11-21T08:44:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/mqt/\n";
Link[1] = "http://www.weather.gov/alerts/MI.html#MIZ002.MQTSPSMQT.084400";

Title[2] = "Special Weather Statement - Northern Houghton (Michigan)";
Desc[2] = "\nSpecial Weather Statement\nIssued At:  2009-11-21T08:44:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/mqt/\n";
Link[2] = "http://www.weather.gov/alerts/MI.html#MIZ003.MQTSPSMQT.084400";

Title[3] = "Special Weather Statement - Baraga (Michigan)";
Desc[3] = "\nSpecial Weather Statement\nIssued At:  2009-11-21T08:44:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/mqt/\n";
Link[3] = "http://www.weather.gov/alerts/MI.html#MIZ004.MQTSPSMQT.084400";

Title[4] = "Special Weather Statement - Marquette (Michigan)";
Desc[4] = "\nSpecial Weather Statement\nIssued At:  2009-11-21T08:44:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/mqt/\n";
Link[4] = "http://www.weather.gov/alerts/MI.html#MIZ005.MQTSPSMQT.084400";

Title[5] = "Special Weather Statement - Alger (Michigan)";
Desc[5] = "\nSpecial Weather Statement\nIssued At:  2009-11-21T08:44:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/mqt/\n";
Link[5] = "http://www.weather.gov/alerts/MI.html#MIZ006.MQTSPSMQT.084400";

Title[6] = "Special Weather Statement - Luce (Michigan)";
Desc[6] = "\nSpecial Weather Statement\nIssued At:  2009-11-21T08:44:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/mqt/\n";
Link[6] = "http://www.weather.gov/alerts/MI.html#MIZ007.MQTSPSMQT.084400";

Title[7] = "Short Term Forecast - Chippewa (Michigan)";
Desc[7] = "\nShort Term Forecast\nIssued At:  2009-11-21T12:00:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/apx/\n";
Link[7] = "http://www.weather.gov/alerts/MI.html#MIZ008.APXNOWAPX.120000";

Title[8] = "Special Weather Statement - Gogebic (Michigan)";
Desc[8] = "\nSpecial Weather Statement\nIssued At:  2009-11-21T08:44:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/mqt/\n";
Link[8] = "http://www.weather.gov/alerts/MI.html#MIZ009.MQTSPSMQT.084400";

Title[9] = "Special Weather Statement - Iron (Michigan)";
Desc[9] = "\nSpecial Weather Statement\nIssued At:  2009-11-21T08:44:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/mqt/\n";
Link[9] = "http://www.weather.gov/alerts/MI.html#MIZ010.MQTSPSMQT.084400";

Title[10] = "Special Weather Statement - Dickinson (Michigan)";
Desc[10] = "\nSpecial Weather Statement\nIssued At:  2009-11-21T08:44:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/mqt/\n";
Link[10] = "http://www.weather.gov/alerts/MI.html#MIZ011.MQTSPSMQT.084400";

Title[11] = "Special Weather Statement - Menominee (Michigan)";
Desc[11] = "\nSpecial Weather Statement\nIssued At:  2009-11-21T08:44:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/mqt/\n";
Link[11] = "http://www.weather.gov/alerts/MI.html#MIZ012.MQTSPSMQT.084400";

Title[12] = "Special Weather Statement - Delta (Michigan)";
Desc[12] = "\nSpecial Weather Statement\nIssued At:  2009-11-21T08:44:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/mqt/\n";
Link[12] = "http://www.weather.gov/alerts/MI.html#MIZ013.MQTSPSMQT.084400";

Title[13] = "Special Weather Statement - Southern Schoolcraft (Michigan)";
Desc[13] = "\nSpecial Weather Statement\nIssued At:  2009-11-21T08:44:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/mqt/\n";
Link[13] = "http://www.weather.gov/alerts/MI.html#MIZ014.MQTSPSMQT.084400";

Title[14] = "Short Term Forecast - Mackinac (Michigan)";
Desc[14] = "\nShort Term Forecast\nIssued At:  2009-11-21T12:00:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/apx/\n";
Link[14] = "http://www.weather.gov/alerts/MI.html#MIZ015.APXNOWAPX.120000";

Title[15] = "Short Term Forecast - Emmet County (Michigan)";
Desc[15] = "\nShort Term Forecast\nIssued At:  2009-11-21T12:00:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/apx/\n";
Link[15] = "http://www.weather.gov/alerts/MI.html#MIZ016.APXNOWAPX.120000";

Title[16] = "Short Term Forecast - Cheboygan County (Michigan)";
Desc[16] = "\nShort Term Forecast\nIssued At:  2009-11-21T12:00:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/apx/\n";
Link[16] = "http://www.weather.gov/alerts/MI.html#MIZ017.APXNOWAPX.120000";

Title[17] = "Short Term Forecast - Presque Isle County (Michigan)";
Desc[17] = "\nShort Term Forecast\nIssued At:  2009-11-21T12:00:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/apx/\n";
Link[17] = "http://www.weather.gov/alerts/MI.html#MIZ018.APXNOWAPX.120000";

Title[18] = "Short Term Forecast - Charlevoix County (Michigan)";
Desc[18] = "\nShort Term Forecast\nIssued At:  2009-11-21T12:00:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/apx/\n";
Link[18] = "http://www.weather.gov/alerts/MI.html#MIZ019.APXNOWAPX.120000";

Title[19] = "Short Term Forecast - Leelanau County Including the North Portion of the Sleeping Bear Dunes NL (Michigan)";
Desc[19] = "\nShort Term Forecast\nIssued At:  2009-11-21T12:00:00\nExpired At:  2009-11-21T14:00:00\nIssuing Weather Forecast Office Homepage:  http://www.crh.noaa.gov/apx/\n";
Link[19] = "http://www.weather.gov/alerts/MI.html#MIZ020.APXNOWAPX.120000";

} // end with block