/**
 * Get Element Object by id value.
 * 
 * @param Object document object
 * @param String element id
 * @return Object element object
 */
function geid(doc,eid) {
var obj;
if(doc.all) { obj=doc.all(eid); } else if(doc.getElementById) { obj=doc.getElementById(eid); }
return obj;
}
/**
 * Write inner HTML into div tag.
 *
 * @param Object div object
 * @param String contents to write
 */
function writeInnerHTML(obj,html){
if(obj) {
if(document.layers){ obj.document.open(); obj.document.write(html); obj.document.close(); }
else if(typeof obj.innerHTML!="undefined"){ obj.innerHTML=html; }
}
}
// -----
var maxProf = 23;
var maxKoma = 87;
var year = (new Date()).getYear();
if(year < 1970) year += 1900;
var tInt = Math.floor((new Date(year, (new Date()).getMonth(), (new Date()).getDate(),0,0,0)).getTime() / (24 * 60 * 60 * 1000));
var prof = tInt % maxProf + 1;
var koma = tInt % maxKoma + 1;
var data = new Array();
data[0] = new Array();
data[1] = new Array("さるた さる吉","さるりーまんの主人公にして、 1男1女の父。 当年とって45才。 もちろん申年生まれ。<br />株式会社バナナ商事営業二課・ 課長代理。 真面目で実直が唯一の取り柄。<br />世知辛いさるりーまん社会を、 悲しくもけなげに生きる男。");
data[2] = new Array("さるた さるえ","さる吉の妻。仕事に励むさる吉を影で支える……はずが、様々な習い事、旅行などの高付加価値主婦業をエンジョイしている。<br />元バナナ商事社員で、さる吉とは同期入社で社内結婚。もちろん彼女も申年生まれ。しかもシリーズ唯一「顔」のでない謎のキャラクター。");
data[3] = new Array("さるた もん吉","9才になる、さるた家の長男。 例外になく彼も申年生まれ。 学校の成績も程々、運動神経も程々の至って平均点の小学生。 父親譲りの真面目実直がなぜか受けて、学校では女の子にモテている。");
data[4] = new Array("さるわたり社長","株式会社バナナ商事代表取締役社長。いつもニコニコ顔の穏やかな人物。しかし、そのニコニコ顔で「海外単身出張による新規開拓」を平然と命じる恐るべき一面も。前社長であり創業者のさるまた相談役が紡績業としてスタートしたバナナ商事を、現在の総合商社へと拡大成長させた立役者。巨乳好き。");
data[5] = new Array("さるまた相談役","株式会社バナナ商事の創業者にして相談役。寡黙で何を考えているのか判らないが、時折発する一言には経済界も注目する？程の重鎮である。彼の一言を集めた著書は「モン・キーワード」と呼ばれる人気ビジネス書になっている。彼が考案し、製造販売した下着「さるまた」の大ヒットによりバナナ商事の基礎を築く。");
data[6] = new Array("さるしばい部長","バナナ商事営業部統括部長で、さる吉の直属の上司。ダンディーでナイスミドルであることをことさらに強調したキャラクター。一昔前の刑事ドラマを連想させる渋いイメージだが、その立ち居振舞いはかなり芝居じみている。芝居じみているがゆえ？にいつも整った髪型も「ヅラ」である。");
data[7] = new Array("さるまね課長","バナナ商事営業一課・課長。自分のことが一番カワイイ、とにかく嫌な奴。人望が薄いにも関わらず、その類まれなる処世術のうまさでさる吉より年下にも関わらず正課長に。大の噂話好きで、“社内リポーター”の異名を持つ。ある意味で、さる吉のライバル。");
data[8] = new Array("ちからざる係長","バナナ商事営業二課・課長。頭より先に筋肉が反応するパワフル体育会系営業マンで、さる吉の部下。単純だが、とても素直な性格。新人には熱血指導を行うが、女性社員には極めて頭が上がらない。");
data[9] = new Array("すぎざる君","バナナ商事営業一課の営業マン。いつも意味なく汗をダラダラとかいている。あわて者の顔面男。上司であるさるまね課長が起こすトラブルに日々心休まることがない。<br />意外ではあるが、バナナ商事柔道部期待のエースという一面もあり、帯を締めると人格が変わる。");
data[10] = new Array("さるふれど君","バナナ商事営業一課の営業マン。社内ナンバー1のモテモテ男。顔良し、頭良しに加えて父が外交官という、まさにサラブレッド。営業一課に着任する前はバナナ商事の北米現地法人勤務。しかも、元フット・さるの人気選手という経歴まで持っており、当然「夜の街」でも人気者。通称「キング・さる」。");
data[11] = new Array("新人君","バナナ商事営業二課の新人営業マン。素直で明るい素朴な性格。上司であるさる吉を何故か尊敬してくれている。プライベートでは、あらゆる競技に貪欲に挑戦しているスポーツマン。誰も知らないが、さるわたり社長のひとり息子である。");
data[12] = new Array("こてざる君","バナナ商事関西支社勤務の営業マン。よく本社へ「商談」と称して出張してくるが、商談をまとめて帰った姿を見た者はいない。コテコテの関西弁と、出張時の必需品と本人が言い放って持ち歩く「お好み焼き用コテ」と「たこ焼き用千枚通し」が特徴の強力キャラクター。");
data[13] = new Array("みざるさん","バナナ商事営業部庶務課勤務のOL。かなりミーハーで、今時・・・とも思える程、大のカラオケ好き。明るく陽気な性格で、みんなから好かれている。さるまね課長が天敵で、ことあるごとに衝突している。");
data[14] = new Array("きかざるさん","バナナ商事秘書課勤務のさるわたり社長付秘書。男性社員憧れの美女。しかし、何故か会社には当然内緒で、アフター5にキャバクラでバイトしている。「きかざる」の名に恥じぬように、上から下までブランドづくしの派手な外見とは裏腹に、性格は至って地味。密かにさる吉のことを想っている。");
data[15] = new Array("いわざるさん","バナナ商事営業部庶務課勤務のOL。ちょっと古風なイメージの女の子。しかし、大の競馬狂だったり、パチンコがプロ級の腕前だったり、意外な面が多い。社内でしてみたいことが「コピー機で自分の顔を複写してみたい」という奇想天外な願望の持ち主。");
data[16] = new Array("ぬがざるさん姉妹","バナナ商事総務部付受付嬢の双子姉妹。二人ともキャンペーンギャル荒らしで元バド・ザール。勤務中は二人とも上品さが売りで、訪問者にファン多し。しかし、姉は以前キャバクラに勤務していた時にきかざると店内人気No.1を争っていたことがあり、そのライバル意識は現在に引き継がれている。妹はさるしばい部長と怪しい仲？");
data[17] = new Array("いかざるさん","バナナ商事経理部の重鎮ベテランOL。バナナ商事のことをすべて知り尽くしている。普段は冷静沈着、温厚な性格だが、社内で「寿」という言葉がでると不機嫌になる。");
data[18] = new Array("よばざるさん","バナナ商事営業部庶務課勤務のOL。容姿のインパクトはいうに及ばず。制服にいつも花を一輪さしている等、ロマンチストな一面も。温泉大好き、日本酒大好きの典型的「オヤジ・ざる」。");
data[19] = new Array("さるとびちゃん","バナナ商事営業二課の営業ウーマン。紅一点で困難にもくじけず立ち向かうガンバリ屋。スポーツ万能で腕相撲ではちからざる係長を負かす程の怪力の持ち主。");
data[20] = new Array("さるすべり次長","バナナ商事の関連会社、株式会社バナナ食品の営業部次長。バナナ商事本社で女性トラブルを起こし、出向させられた窓際さるりーまん。心の師は高倉健。口癖は「不器用ですから……」という、本当に不器用な男。趣味は釣りとワイン。");
data[21] = new Array("くわざる課長","バナナ食品営業部課長。バナナ商事時代はさる吉と同期入社であり、さる吉の数少ない友人の一人。出向させられたのにめげず、頑張る真面目な男。その外見からは想像できないほどのアダルトビデオ・マニア。出張先のホテルでアダルトビデオの衛星放送がみられないと、非常にショックをうけたりする。まったく知られていないが、蓄財に非常に長けており、ヘリやイタリアンレストラン等を所有している。");
data[22] = new Array("いそがざる課長","バナナ商事の関連会社、株式会社バナナ急便（通称バナ急）の営業課長。役職は営業課長だが、セールスドライザールとしてデリバリーまでこなし、前線で頑張っている。その名に反して「せっかち」で、少々ミス多し。愛唱歌は「エイトマンの歌」。");
data[23] = new Array("さるかに部長","バナナ商事のライバル企業であり、昨今注目の外資系商社ウス・コーポレーションの極東エリア営業本部長。とにかくダイナミックで、デカい顔を武器に強引な営業を行う。当然「声」もでかい。客先訪問時の挨拶代わりの「ウッス！」が客先からは少々嫌がられている。");

function vdaily (doc) {
// profs
var prof_image = geid(doc, "prof_image");
var prof_name = geid(doc, "prof_name");
var prof_body = geid(doc, "prof_body");
if(prof_image) prof_image.src="images/prof/ch"+(prof<10?"0":"")+prof+".gif";
if(prof_name) writeInnerHTML(prof_name, data[prof][0]);
if(prof_body) writeInnerHTML(prof_body, data[prof][1]);
// 3koma manga
var koma1 = geid(doc, "koma1");
var koma2 = geid(doc, "koma2");
var koma3 = geid(doc, "koma3");
if(koma1) koma1.src = "images/koma"+(koma<10?"0":"")+koma+"/4coma_01.gif";
if(koma2) koma2.src = "images/koma"+(koma<10?"0":"")+koma+"/4coma_02.gif";
if(koma3) koma3.src = "images/koma"+(koma<10?"0":"")+koma+"/4coma_03.gif";
}