var Messages = new Array('［東証午前終値は４３円高］東京株式市場の日経平均株価午前終値は、前日終値比４３円５２銭高の１万０７０８円４７銭だった。','［第２昭南丸が晴海埠頭に接岸］反捕鯨団体「シー・シェパード」のメンバーを乗せた監視船第２昭南丸が東京・晴海埠頭に接岸した。','［前原国交相、高速上限制の先送り否定］前原国交相は、高速道路料金の上限制について「６月からやれるように準備を進めている」と述べた。','［東証、続伸して始まる］東京株式市場の日経平均株価（２２５種）は続伸して始まった。','［別府市で女性の遺体］大分県別府市の民家で女性が上半身数カ所を刺され、死亡しているのが見つかった。県警が捜査。');
var MsgID=0;
var ScrlPoint=0;
var ScrlInc=4;
var ScrlInterval=1000;
var MsgInterval=5000;
var TID;
function dispatch(Msg) {
var nextMsg;
var interval=ScrlInterval;
if ( TID ) clearTimeout( TID );
if ( Msg == 'SetMsgID' ) {
MsgID = MsgID % Messages.length;
interval=0;
nextMsg = 'SetMsg';
}
else if ( Msg == 'IncMsgID' ) {
MsgID++;
interval=0;
nextMsg = 'SetMsgID';
}
else if ( Msg == 'SetMsg' ) {
setMessage(Messages[MsgID]);
interval = MsgInterval;
nextMsg = 'Scroll';
}
else if ( Msg = 'Scroll' ) {
setMessage(Messages[MsgID].substring(ScrlPoint,Messages[MsgID].length));
if ( ScrlPoint < Messages[MsgID].length ) {
ScrlPoint+=ScrlInc;
nextMsg = 'Scroll';
}
else {
ScrlPoint = 0;
nextMsg = 'IncMsgID';
}
}
TID = setTimeout("dispatch('"+nextMsg+"')",interval);
}
function Init() {ScrlInc=1;ScrlInterval=300;MsgInterval=2000;dispatch('SetMsgID');}
function setMessage(msg) {document.bar_form.flash_letter.value = msg;}