火星の「海岸」が見られる2009年火星カレンダー後半編

2009年の火星カレンダー後半編です。
南極の氷の階層や赤道地帯の層状堆積物、その近辺で見られる海岸などの衛星データによるRGB合成カラー画像です。

例によって、天然色や惑星地球人が肉眼で見たようには再現していません。
現地でそのように見えたとしても、錯覚です。思い込みです。
現実は、赤茶のめがねで見ないと目と心が病魔に冒されます。


拡大画像　2500ピクセル

2009年火星カレンダー・衛星の見た火星風景 前編

火星周回衛星から見た表情豊かな火星風景を2009年カレンダーとして企画しました。

画像選定中につき、今日は、1月から6月です。

スケールは、1月から4月の画像が、1センチメートルでほぼ10メートルの解像度です。
5月と6月は、たしか1センチメートルで100メートルにしたような気がしないでもないですが、もう忘れました。

まっ、画像の物差しに違いはあっても、地球の天候には影響しませんので、縮尺まで配慮しませんでした。

12ヶ月そろってから、ホームページにてダウンロード設定しますが、このブログに設定の拡大画像は、画質を劣化させていませんから各月をそのままトリミングして活用できます。

なお、これらのカラー画像は、衛星データのRGB合成ですが、天然色や私たちが肉眼で見たようには再現していません。カレンダーという用途上、観賞に耐えうる画質と色彩にしたつもりです。

実際はどうなっているかは、今後、各自で現地に飛んで確認されるようお勧めいたします。その際は、赤茶のめがねを必ず持参の上、見るのがNASAに対する礼節になります。決して、このような光景だと叫んではいけません。地球に帰還できなくなります。


拡大画像　2500ピクセル

火星の｢氷河、庭園、滝｣模様

氷河模様
2007年4月30日
北緯46.2度　東経183.9度
50センチメートル／ピクセル

今日の拡大画像　1200ピクセル



庭園模様
2007年4月28日
北緯86.8度　東経327.3度
50センチメートル／ピクセル

今日の拡大画像　1200ピクセル



滝模様
2007年4月26日
北緯70.6度　東経1.6度
50センチメートル／ピクセル

今日の拡大画像　1200ピクセル



これらのカラー画像は、火星周回衛星データによるRGB合成ですが、各色を増強しており天然色や人間の目で見たようには再現していません。

ということで、2009年版のカレンダーは、第一弾を火星周回衛星から見た地球で見られるような模様のカラー画像で制作する予定です。

＝NASAロケット破壊＝時事通信は何故、深く調べずに扇動タイトルで一報するのだ。

NASAがロケットを破壊した瞬間の映像


一言ものを申したい時事通信の記事

『打ち上げ失敗でロケット爆破＝有害物質、大西洋に落下－NASA
8月23日8時59分配信 時事通信
　【ワシントン22日時事】米航空宇宙局（NASA）は22日、バージニア州東部のワロップス島から打ち上げた無人ロケットが飛行コースから外れたため、上空で爆破したと発表した。破片の大半は大西洋に落下したとみられるが、有害物質が含まれている恐れがあるとして、地上の落下物に触れないよう注意を呼び掛けている。』


　NASA関連を取り扱ってはいるけれども、ストーカーするほど暇でないので、この打ち上げ計画も見落としていました。
　時事通信の一報で、何だと思いNASAに入ったら、トップで動画配信していました。

　打ち上げ施設は、NASAのだけれども打ち上げたロケットはNASAの責任で作ったものではありません。
　民間企業が作ったロケットで、そのロケットにNASAの実験器具を搭載していただけです。
　また、このミッションでは、軍事目的でないので、扇動的なタイトルを付けるほど有害な物質を搭載していないはずです。
　破片は、ビデオで見る限り、NASA当局が発表したようにほぼ海面に落下しています。
　NASAが、破片を地上でも発見したという矛盾する報告が有るので、念のために有害物質が含まれているかもしれないと注意喚起したのです。
　NASAの事故第一報では、至極当たり前の発表であり、破片回収に欠かせない定例文です。

　このようなことは、NASAをウオッチしている報道関係者ならば常識の常識であり、今回の時事通信のようにど素人のようなタイトル配信はしないはずです。
　また、NASAの打ち上げ計画を調べた限りにおいては、極超音速での薄い気流の分析装置で、いわゆるセンサーなので化学物質などで飛散する有害物質の危惧は無いとも言えます。

　今回ロケットを作ったAKT（アライアント・テクシステムズ）社は、スペースシャトルの次世代有人宇宙船の主ロケットにも関わっているので、その技術面では、かなり危惧しなければならないかもしれませんが、今回の打ち上げ即破壊においての有害物質飛散危惧とは無縁です。

　日本全国の各地に記事を配信する機関ならば、もっと姿勢を正してもらいたいものです。


　参考までにニューヨークタイムズは、以下のように配信していました。

『NASAが、彷徨ロケットを破壊
　2008年8月22日配信
　アメリカ航空宇宙局は、バージニア州ワロップス島から早朝に打ち上げた無人ロケットを、その上昇の27秒で破壊しました。
　アライアント・テクシステムズによって作られた実験ロケットは、コースから外れて、11,000～12,000フィートの高度で破壊されました。
　地上での負傷は、報告されませんでした。また、NASA当局者は、砕片が大西洋に落ちたと思うと言いました。
　宇宙機関は、極超音速の飛行研究を行なう意図で2つの衛星の約1100万ドルを含むプロジェクトに1700万ドルを費やしました。
　会社関係者のケント・V・ロミンジャーは、この事故が「非常に大きな期待外れで、後退しかしない。」とリポーターとの電子会議で言いました。
　また、NASA当局者は、その潜在的に危険な性質のために、地上へ落ちたかもしれないどんな砕片にも触れないように人々に警告しました。』


　いつもは、NASAに批判的な立場のようなNYTにしては、期待はずれの常識的な範囲の配信です。
　従って、東スポを超えThe SUNを追う立場としても、NYTの後陣を配するわけに行かないので、たまには、私も好意的な立場でNASAのロケット破壊を取り上げました。

　ちなみに、The SUNでどのように扱ってるか覗いたけれども、ネタにならないみたいで、破壊は破壊でも９１１でのWTC7の崩壊ミステリーを解いたというような記事が目につきました。
　内容は、WTC7は、欠陥建物、日本で有名になった耐震偽装建築だったというものです。それが政府資料の調査で明らかになったというのですから、陰謀説を吹き飛ばし日本以上に建物崩壊危惧騒動を巻き起こすかもしれません。
　こんな発表は止めとけばよかったものを、後悔先に立たずになりそうな雲行きですよ。
　ご丁寧にも、WTC7の破壊陰謀説を唱える人の多くが、UFO信者だという証拠のビデオも掲載してましてねぇ・・・反論するのも時間の浪費のような・・・お暇ならばネット検索でどうぞ。

ただ今、画像転送のアクセス制限が掛かっています。

本日、ヤフーのニューストピックス関連で当サイトの宇宙画像ページへリンクが設定されているために、時間あたりの転送容量オーバーで、一時的に画像転送制限になっています。

再表示を繰り返すか、後ほどもう一度ご足労いただければと存じます。


惑星テラ見聞録　管理者

8月6日のアクセス障害情報

8月6日午前1時から午前12時、昼頃まで高画質サイトのメンテナンスのため視聴できません。
中画面でご試聴ください。

現在、xhtml対応のページにするために改装中です。

　なんかネットの流れが、xhtml仕様に傾きつつあり、遠くない日にhtmlが淘汰されるらしいので、今のうちからサイトをxhtml形式に統一することにしました。

　ついでに、ばらばらなレイアウトも上と下を統一することにしました。

　従って、過去のページも順次新レイアウトにする予定です。一部でリンク切れの修正も考えています。

　なお、本年の後半は、宇宙画像とビデオは、ハッブルとスピッツァーを中心に更新を続けたいと思います。

　今日新しくしたホームは、もう少し手直しします。
　明日は、更新カレンダーの一部を公開します。

＝政府は宇宙人の存在を隠ぺい？ 元NASA飛行士が「証言」＝ニュースのほぼ詳細

　以前の宇宙飛行士エドガー・ミッチェルは、イギリスのラジオ番組のインタビューに答えて、UFO現象は現実であるけれども、長い間政府によって隠蔽されていたと言いました。
　ミッチェルは、月を歩いた6番目の惑星地球人です。
　「私は、私たちがこの惑星を訪問されているという事実に接するのに十分な特権を与えられています」とミッチェルは言いました。
　77歳の宇宙飛行士は、フラ・マウロの近くで1971年2月9日に月面を9時間歩きました。

　「UFOについて現実の知識よりも多い否定意識が世の中にあるけれども、それは現実の現象です」と、ミッチェルは付け加えています。
　さらに彼は、続けて、彼がロズウェルの近くで成長し、軍事の世界と情報世界の両方に関係していると言いました。
　そして、「私たちの惑星は、訪問されています」と断言しました。
　「私は、この仕事に多くを没頭し、現実の裏話を知っている非常に信用できる科学者と特定の委員会と特定の研究に深く関係していました。」

　彼は、続けて、ロズウェル事件が「現実に起こった」と言いました。
　なぜそれが隠蔽されてたかを尋ねられた時に、ミッチェルは、それが第二次世界大戦後に遡り起因すると言いました。

　アメリカ合衆国とそして世界中が、これを公表し始めていて、メキシコ、ブラジル、および他の国が、「それらのファイルを公開し始めた」と彼は付け加えました。

　インタビュアーは、これがUFOがあると認めている英国の原因となっていると思うかどうか、ミッチェルに尋ねました。

　ミッチェルは、「時間がどれくらいかかるか知らないけれども、私たちは、何らかの「重大な」ディスクロージャーに向かっています」と応じました。

　ミッチェルは、惑星地球人が、地球外生物がいることを知った時に、天地騒動の狼狽は無いと確信しています。
　「私たちは、宇宙船を設計して地球に帰還したけれども、それらは、訪問者が持っているものと同等なほどに洗練されているわけではありません。」と答えを続けました。

　エイリアンは、私たちを傷つけようとするでしょうか？

　ミッチェルは、「いいえ、そのような意思もなければ、敵対的でもありません。」
　「もし、彼らが敵対的であるならば、私たちは今ごろ壊滅しているだろうし、それが、現実の意思としてそうであったならば、私たちは防御できる技術も態勢をも全く持っていなかいことは、かなり明らかです。」と話しました。

　エイリアンは、どのように見えますか？
　ミッチェルは、私たちは既に全く映像を見たと言っており、そして、彼らは「私たちにとってかなり奇妙に見える小さい人」であると述べました。

　ミッチェルは、マサチューセッツ工科大学より航空学、宇宙航行学の理学博士学位を授与されています。
　彼は、アメリカ海軍の航空母艦のボン・ホーマー・リチャードとタイコンディロガから飛行機を離着陸した経験のある海軍パイロットです。
　さらに彼は、有資格の研究パイロットであり、海軍の研究パイロット学校で教えました。
　ミッチェルは、また意識と超常現象に興味をもっています。
　彼のアポロ14号の飛行の間に、彼は、地球の友人と私的なESP研究を実施し、1993年に、非営利的な研究所の認識論科学(IONS)を設立しました。
　研究所は、主流科学が非生産的と断言する分野についての研究を実施し、後援するために設立されました。

NASAの公式コメント
　「NASAは、UFOを追跡しません。NASAは、この惑星上や宇宙のどこでもエイリアンの生命について、どのような種類の隠蔽にも関係していません。ミッチェル博士は、偉大なアメリカ人であるけれども、私たちは、この問題について、彼との意見を共有しません。」


　以上が、時事通信が配信した数行の記事の詳細です。

　このような内容が含まれているにもかかわらず、また、ミッチェル元宇宙飛行士のインタビューが10分あまりにも及ぶにもかかわらず、時事通信は、たたった数行で、興味本位を先導するするようなニュースを配信しました。
　従って、一部のポータルサイトのニュースコメント欄では、気ままな書き込みで埋め尽くされており、まさに隠蔽集団の思うつぼの配信になったと言えるでしょう。

　元日刊新聞記者で週刊新聞の編集長の端くれであった身としては、ラジオ番組のインタビュー内容を都合のいいように超短く配信した記事であり、報道機関ならば、最低でもミッチェル博士に番組でのインタビュー内容について踏み込んだ取材をしてから配信すべきであったと苦言を呈したいと思います。

　このように瞬間に反応し思いつきで記事にしたりしたので、ジャーナリストを廃業する身になったのですが・・・志はブログとホームページで少し鬱憤を晴らしています。


　天の川の超新星爆発を鑑賞していたのに・・・時と場合を考えて記事にしてもらいたいと、愚痴の一つを表明させてもらいました。

Q＝何で宅配施設から持ち出せたか？A＝グリンピース窃盗団はISOの審査員として身分を詐称して「合法」的に進入

何で宅配施設からグリンピース窃盗団が荷物を無断で持出せたか･･･

グリンピース窃盗団はISOの審査員として身分を詐称して「合法」的に進入した。
身分詐称の査証目的の提示は、伝票通りの個数と重量かの調査と言明した。

注釈「合法」的は、あくまでもグリーンピース窃盗団の言い分。日本国内法では、違法行為であり刑事犯罪である。


西濃運輸の現場の立場
さすがに偽装のISO審査員の身分証明書までは現場の人間にはわからない。

荷物の開封はターミナルの現地ではなく、対応した西濃社員の目を盗んで持出し後に、全く別の場所（グリーンピース窃盗団の宿泊先）で行っている。
窃盗団自らその犯罪行為の証拠写真を公開している。


オンライン上の配達完了の明細
委託配達荷物4個中1個の紛失があったが、3個の「仮」配達完了としてデータ登録。
配達途中で1個の荷物が紛失もしくは未着が明らかになり、路線、中継等での移動内容の社内詳細調査を行っていた最中だった。
そして、5月15日にグリーンピース窃盗団の意気揚々とした「合法」的窃盗犯罪成功の記者会見で、偽計盗犯されたと初めて西濃運輸が自覚し荷物のありかが判明した。現在は、幸か不幸か東京地検の手中にある。

したがって、紛失の原因が判らない西濃運輸としては「社内原因」として紛失事故の原因を探っていた。
また、１個不足という確認を荷受人本人からも確認済みであると同時に同届けを提出してもらっていた。そして、宅配便約款規定の荷物紛失に伴う保障扱いの手続きをしている最中であった。

この紛失届けの時点と5月15日の記者会見までは、グリーンピース窃盗団に偽計されていたとは思っていなかった。従って、誤輸送か誤配達における行方不明と捜索中だった。


西濃運輸が、大々的に言い訳できない理由
本来は身分証明書の提示の上でないと、いわゆる荷扱い施設には、部外者の侵入を許可していないが、ISOの審査と同機関の審査員という言葉だけで、書類上の確認もせずに部外者のグリーンピース窃盗団を通してしまった。
ISOの審査員が荷物を偽計略奪するとは現場の社員は思っていなかった。


以上が経過報告である。


日本のグリーンピースの理事長で顧問弁護士（社民党福島瑞穂党首の夫）の言い分が通用するとなるならば、窃盗の犯罪構成要件が消滅することになると同時に、警察が違法に窃盗犯を検挙し、検察が不法に刑罰を求刑し、裁判官が盲目的に合法的な窃盗行為を「犯罪」として断罪していることになる。

つまり、日本では盗犯行為は犯罪ではないということになる。

これって、弁護士が犯罪を奨励していることになりはしないか？
社民党の公式見解を求めたいものだ。

西濃運輸の宅配便は途中で中身が掏りかえられる

例えば、食品類を西濃運輸の宅配便で頼んだとして、今回のグリーンピースのように『犯罪を摘発するためだ』といって委託者に無断で荷物を第三者に渡し、その荷物の中身が入れ替わっていたら、これを犯罪といわずして何というのか？

まして、その入れ替わった中身に毒が混入されていたならば、西濃運輸は毒殺の共犯だろう？

今回は毒が混入されなかったけれど、混入されても不思議ではない。

毒でなくても仕掛け爆弾だったらどうする？

もう、西濃運輸の宅配便は警察の目の前であけてもらうしかないだろう。

こういう事態にさせたのは、西濃運輸だ。

全く危機管理意識が無い。人為的被害が無いからといって見過ごせる事件ではないのだ。


このような行為をテロというのではないのか？

サミットが近いのにその現地で行われたテロ行為を警察は見過ごすのか？



グリンピースの犯罪を擁護することは、テロ行為を非難できないことになる。


鯨の肉云々じゃない。問題は、すでにそれを通り越している。


さらに、西濃運輸は自ら定めた宅配便約款の違約までした。
東京から函館まで2800キロメートル以上もある配達を記録してしまった。
第三者に宅配便を引き渡す規定も約款に完全に反している。

西濃運輸のテロ犯罪の共犯行為は、国土交通省が、免許取り消しの行政処分を行っても余りあるほどだ。


犯罪証拠品の押収は、現行犯で無い限り裁判官の押収令状が必要であり、警察であろうともその手続きなしには証拠に出来ない。違法に収集した証拠物件であり、冤罪にもつながる。
グリーンピースの弁護士は、刑法や刑事訴訟法をスルーパスしているのかな？
司法界では最低の常識であるはずだけれどな・・・世間でもね。

怒り心頭。核攻撃開始。東京から函館まで7日を要する西濃の宅配便。あなたは利用しますか？

怒り心頭。核攻撃開始。





この画像は、西濃運輸株式会社の宅配便の配達を示しています。

東京から2008年4月15日に函館に宅配便を送りました。
いつものように2日後、4月17日には届くはずでした。

けれども、実際に届いたのは、2008年4月22日でした。
一部の荷物に、冷凍の食品が入っていましたが、当然の結果になっていました。

送り人と受取人は本人です。

中継の青森までは、4月16日のうちに届きました。

その青森の配送所で赤の他人に荷物を持っていかれ、ホテルで無断開封され中身まで取り出されました。
いろいろとかき回して密封していた冷凍食品も開封して、何枚か写真を撮った後に元の箱に戻していました。

そして、どういうわけか4月22日になってようやく配達されました。
青森から函館まで、配送するのに6日掛かりました。
手漕ぎボートでも丸一日あれば届きます。

多分、配送する人が泳いで渡ったのでしょう。送った個数が4個ですから、津軽海峡を泳ぐ往復回数から逆算すると納得のいく配達日数になりました。



最近、西濃運輸の宅配便が届くのが遅いなぁと思っていたらこんなことが日常的に行われていたようです。



ところで、これがあなたの送った荷物だとして、このようなことが行われているかもしれませんよ。
宅配便の委託先は、よお～く吟味しましょう。
この事件では、ペリカンもくちばしを刺しているとのうわさもあります。


さすが皆様のＮＨＫです。盗人の犯罪口上を堂々とニュースで宣伝さえもするのですから。


盗人猛々しい実例に今日遭遇しました。


この盗人がテロリスト団体のグリーンピースだから、日本の警察も犯罪を見てみぬ振りをするしかないようです。
アメリカでもこのような犯罪が行われているはずだから、そちらで強力な捜査をするように、今夜にでもアメリカ連邦捜査局に告発メールを送ることにしました。世界の警察に出てもらわないとテロリストを相手にするにはね。

近況報告

　ホームページの更新もブログの更新も、休んでいたのは、まったく個人的な理由からです。

　信頼性を強く保てる株式ソフトの改変に没頭していました。原始に遡るならば遠く昭和の化石時代から小さな改変を加えるならばバージョンを重ねること何百回にもなるかもしれない自作のソフトです。
　これが、会計ソフトや他のデータベースソフトの基本にもなりました。

　数年前にそれなりに自信を持って改変したにもかかわらず、本心がかなり猜疑的なようだったのか、ご宣託のあった選択銘柄を完全に無視し「あでもないこうでもない」と画面とにらめっこしながら突入したマーケットで、刀折れ矢尽き果てる敗残の日々に勤しんでいました。

　しかし、崖っぷちの四面楚歌に陥った今日、起死回生の手を尽くさねばと、ホームページもブログもいつものように犠牲にし、一日1パーセントの利益確保を心がけることにしました。

　そして、手堅く動かせるソフトへと全面的に改変していました。ようやく、本日、全データを本格変換するソフトとして起動させましたので、一息ついたところです。

　ただ今、コンピ連合が楽しそうに2005年からの日々のデータを変換しています。ひょっとすると数日後にまた全部やり直しするかもしれないのに、この快調な動きに水を差さないようにブログの更新に来ました。


　プログラムの構成に関しては、作る人によって様々です。ここで記載したプログラムは、株式だけのみならず、会計や住所録などのデータ記録にも応用したものです。

　私の経験から言えることは、簡単な変数名、例えばA$とか安易につけないほうが良いようですね。プログラムを改変するにしたがって変数が多くなるので、見てすぐわかるような変数名、例えば、hajime(始値)とかにすることで、どこで何を使うかの時にもんぞり打たなくて済みます・・・たぶん。

　ここに例示したコードのKWZやUWZなどそのときの思いつきで付けているので、改変するたびにどういう意味だったのか何度探ったことでしょう。一発変換で、変数名を変えられるるけれど、後で更に困りそうなので変えるに変えれずです。

　仮に販売など配布する場合でも中身を見られないように実行ファイルにするのだから、作った本人がわかるようにしておかないと泣きを見ますね。解かりやすい変数名にしたとしても、プログラムの動作を左右はしません。


　このサブプログラムを作るまで、会社四季報から必要なデータを入力するのに1週間以上も要していました。それが、ヤフーの企業情報から収集してエクセルファイルを作ってくれるので、情報収集から個別銘柄への格納まで、10分ほどに。
　もっとも、このサブプログラムはデータ変換に欠かせないので最初から作って動作させていたのだけれど、僅か10行ほどの追加に数年も躊躇していたことになりました。

　順調に動いてくれるものだから、ひと月、ふた月分を変換させては、気に入らないと全てを初期化し全銘柄の格納庫を作り直させて楽しんでいます。手入力で味わえない高速の利点でもありますね。





ビジュアル・ベーシックでの銘柄データ保管庫作成部分コード例

Sub DataHenkan2008()

＊　変数は、全て任意。ビジュアル・ベーシックの動作コードにかからないものを設定。

Dim J As Integer

Dim DataCode$(6000), DataName$(6000)
Dim DataKabusu(6000) As Currency
Dim DataHaito(6000), DataRieki(6000), DataShisan(6000) As Double
Dim DataTuki(6000), DataGyosyu(6000), DataItiba(6000), DataTanni(6000) As Integer

Dim I, U, JKL, HLP(600), DF(600), BS2(600) As Integer
Dim C1$, DB$, DHH$, HH$, HH2$
Dim KE11, KE21, KE31, KE41, FK1 As Double
Dim KS1, HP1, LP1, KSH11, KSH21, DH2 As Long
Dim DBC As Long


＊　ここで収集した個別銘柄の基本データの変換準備。

JKL = 0

Open "C:\*○○○○\DBKanri\銘柄データ.CSV" For Input As #3

For I = 1 To 6000

If EOF(3) Then JKL = I: GoTo 5

Input #3, DataCode$(I), DataItiba(I), DataName$(I), DataKabusu(I), DataHaito(I), DataRieki(I), DataShisan(I), DataTuki(I), DataTanni(I), DataGyosyu(I)

Next I
5:
Close #3


＊　ここから、個別銘柄の格納庫を作成する。個別銘柄格納庫では、すでに銘柄リストファイルの読み込み済みが前提。

For J = 1 To Kasu

For U = J To JKL
If DataCode$(U) = HC$(J) Then BaiTan = BaiTanni(J): GoSub 7
Next U

Next J

GoTo 500

7:

HH2$ = Str$(J)

HH$ = " " + HH2$ + " 件目の　" + DataCode$(J) + " を変換中です。"

Form**.Caption = HH$

A$ = DataCode$(J)
B$ = DataName$(J)

If BaiTan = 1 Then If DataKabusu(J) < 10000000 Then KS = DataKabusu(J): GoTo 8
If BaiTan = 1 Then If DataKabusu(J) >= 10000000 Then KS = DataKabusu(J) / 1000: GoTo 8

If BaiTan = 1000 Then KS = DataKabusu(J) / 1000: GoTo 8
If BaiTan >= 100 Then If BaiTan <= 999 Then KS = DataKabusu(J) / 100: GoTo 8
If BaiTan >= 10 Then If BaiTan <= 99 Then KS = DataKabusu(J) / 10

8:

KS = DataKabusu(J)
FK = 15
KE1 = DataRieki(J)
KE2 = KE1
KE3 = KE1
KE4 = KE1
HP = 1000
LP = 1000
KSH = DataShisan(J)
KSH2 = KSH
Haito0 = DataHaito(J)
Haito1 = Haito0
Haito2 = Haito0
KesanTuki = DataTuki(J)
GSP = DataGyosyu(J)


15:

＊　ここから、個別銘柄のランダムファイル格納庫コード。

＊　銘柄コード別にフォルダを設定している。A$とは、個別銘柄の証券コード。

DBC = Val(A$)

If DBC < 2000 Then DB$ = "DB1000\" + C1$
If DBC > 1999 Then If DBC < 3000 Then DB$ = "DB2000\" + C1$
If DBC > 2999 Then If DBC < 4000 Then DB$ = "DB3000\" + C1$
If DBC > 3999 Then If DBC < 5000 Then DB$ = "DB4000\" + C1$
If DBC > 4999 Then If DBC < 6000 Then DB$ = "DB5000\" + C1$
If DBC > 5999 Then If DBC < 7000 Then DB$ = "DB6000\" + C1$
If DBC > 6999 Then If DBC < 8000 Then DB$ = "DB7000\" + C1$
If DBC > 7999 Then If DBC < 9000 Then DB$ = "DB8000\" + C1$
If DBC > 8999 Then DB$ = "DB9000\" + C1$

＊　基本的には、Cドライブに株式データ庫を設定する。\○○○○\は、私のソフトのフォルダー名のため、明記しない。
　　データ格納可能数。日足データは600件。週足データと月足データは、それぞれ300件。スタートポジションは、日足＝1、週足＝601、月足＝901。個別銘柄の基本データは、ポジション1201から1210に格納。


' 日変換

K = 0

Fnum = FreeFile
Pos = 0
If K > 0 Then DH = 1

For I = 0 To K

Pos = Pos + 1
DHH$ = YY(I) + MM(I) + DD(I)
DH2 = Val(DHH$)
If I > 1 Then If YY(I) = "" Then DH2 = 19991116
Rec.YMD = DH2
Rec.Hajime = D2(I)
Rec.Takane = D3(I)
Rec.Yasune = D4(I)
Rec.Owarine = D5(I)
Rec.Dekidaka = D6(I)
Rec.UpE = UE(I)
Rec.DnE = KE(I)
Rec.UK = UKC$(I)
Rec.KWZ = 0
Rec.UWZ = 0

Length = LenB(Rec)

Open "C:\○○○○\" + DB For Random As #Fnum Len = Length

Put #Fnum, Pos, Rec
Close #Fnum

Next I


DW = Pos
DC = K

週変換・月変換は省略

＊　ポジション1201から1204は、個別名画の基本情報。銘柄コード以外は可変。

　　 Pos = 1201

Rec.YMD = 0: 'DH
Rec.Hajime = 0: ' DW
Rec.Takane = 600: 'WH
Rec.Yasune = 600: 'WW
Rec.Owarine = 900: 'MH
Rec.Dekidaka = 900: 'MW
Rec.UpE = DC
Rec.DnE = WC
Rec.UK = GyoSyu$
Rec.KWZ = GSP
Rec.UWZ = 0

Length = LenB(Rec)
Fnum = FreeFile

Open "C:\○○○○\" + DB For Random As #Fnum Len = Length

Put #Fnum, Pos, Rec
Close #Fnum



＊　ポジション1204以降の0領域は、テクニカル算出数値、移動平均算出数値など日足データ変換で可変。

Fnum = FreeFile
Length = LenB(Rec)
Pos = 1204

Rec.YMD = 0
Rec.Hajime = 0
Rec.Takane = 0
Rec.Yasune = 0
Rec.Owarine = 0
Rec.Dekidaka = KesanTuki
Rec.UpE = 0
Rec.DnE = 0
Rec.UK = ""
Rec.KWZ = 0
Rec.UWZ = 0

Open "C:\○○○○\" + DB$ For Random As #Fnum Len = Length
Put #Fnum, Pos, Rec
Close #Fnum

＊　かなり途中を省略。

End Sub


　以上のようなコードで全銘柄の個別銘柄のデータ格納庫をおよそ3分くらいで作成。
　これが出来上がれば、全銘柄4000以上の日足変換と同時に週足、月足を2分も掛けずに変換する。サブに各週の区切り数値を設定すると、週に1日しか出来ないような銘柄でも、日足変換と同時に週足・月足も変換することで、変換漏れを防ぐことも可能。



　注　＊印の行や日本語文は、プログラムコード設定の説明であり、実際のプログラムでは必要ない。注祝設定 ' を前に付記しない限りバグで動かない。サブで変数宣言をしていない変数は、サブやプロシージャを超えてプログラム全体に引き継がれる変数なので、グローバル変数をすでに設定している。


　追加し忘れていた銘柄も公開当初からデータを蓄積でき、毎日苦になっていた日足データの格納が昔日になったしだいです。上昇に転じる銘柄選択も日足変換で信頼性の置けるものになりつつあるので、ゴールデンウィークには、醤油と山葵を持って船釣りに出向く計画も立てられそう。
　特に、真鰯を海水で洗いそのままあるいは気持ち醤油を付けて飲み込む旨さは、鯛以上の味ですね。そして、冷えたビールがあるならば、船酔いも飛んでしまう。

　釣果土産など重たいものは不要。その場その時に食する分だけ釣る。こんな贅沢な釣りはない。何年前のことだったろう・・・あの日よ、もう一度。そのために作った株式ソフトなのかなぁ？


　ちなみにこれからの目標は、1売買5パーセント。回転数、1日から3日。4日以降になる場合は、1日持つごとにプラス1パーセント。10日を限度に手仕舞う。誓うは易し守るは難しってなものですかねぇ？

短命。類似の出現はあるのか？

　火星ローバーのカラー画像と格闘している間に、高画質サイトが閉鎖されていましたね。

　お知らせメールが届いていたけれども、いつもの広告と同じと思って用件も見ないでゴミ箱に入れていたら、しっかりと閉鎖しますって書いてありました。

　対応が遅れたので、かなりの高画質番組が閲覧不可になっているようです。

　類似の画質で妥協できそうなところをいくつか探してメンバー登録したけれども、画質劣化の見本FLVばかりで当サイトの高画質として採用できませんでした。
　しかし、日本のサイトに裏技的にこれまでの高画質に引けをとらないファイル形式がありましたので、そちらのサイトにお世話になることにしました。
　高画質画面は、FLVに似たファイル再生仕様ですが、ファイル自体が高画質なものですからダウンロードの設定をしました。
　これから順次、高画質サイトへファイルを移動しますが、その前に字幕の誤字や配置を見直しているために、入れ替えに日数を要します。

　テスト的に、100メガバイト以下のファイルのオリジナルの画面サイズをHDタイプ仕様にすることも検討したいと思います。
　ハッブル映像は、やはり高画質でこそ、その素晴らしさを実感できるのではないでしょうか？


高画質動画倉庫の閉鎖に対応が遅れているコスモス・ビジョン
http://cosmos-vision.net/index.html


静止画の更新停滞がまだ続きそうな　惑星テラ見聞録です。
http://the-cosmos.org/index.html



今日の主題画像は、赤外線で見る月です。白いところが何かを意味していそうだからというので採用したのではありません。目立つ白い地域は、クレータです。

高画質ビデオの更新停止の知らせ

高画質のビデオサイトであるStage6が突然にサイトを閉鎖しました。
これまでの番組は視聴できますが、新しい番組を同様の高画質で視聴できる動画保存サイトを選択中です。

したがって、当サイトの制作する新番組は、求める高画質の確認ができるまで少しの間休憩します。

数日で、何らかの対処ができるように新番組の制作を進める予定です。

白昼堂々の「公用車」無断乗り逃げの見ず知らずの方へ

そりゃあ、すぐ傍にいてパソコンと格闘していた私が、当サイトの「公用車」を盗まれたのに気づかなかったのが一番悪いといえばそうかもしれない。それでもね、敷地に入ってまで乗り逃げ、刑法では窃盗という行為をすることはないでしょうよ。

どうせ盗むならば、近くのコンビニで店長と立ち話しているときとか、スーパーで燃料を仕入れているときにしてもらいたいよ。白黒自動車が赤いランプつけて駆けつけてくれるからさ。

所轄の警察署に電話しても20回以上も呼び出しても出てくれないし、恥ずかしかったけれど110番してしまったではないか。

警視庁「警視庁。110番です。」
私「あの～、そんなに急いでいないし重要な事件でもないのですが・・・所轄の警察署に電話しても出てくれないので・・・」
警視庁「どんな事件ですか？」
私「つまらない事件です。公用車を盗まれました。それでとりあえず盗難届けと思って○○○警察署に電話したのですけれど、出てくれませんので、忙しいところ申し訳ないが110番しました。」
警視庁「何番にかけましたか？」
私「3***-0110です。」
警視庁「その番号はあっていますね。出ないのですか？」
私「日曜日だからじゃないですか？こちらから出向くので、警察署よりも近い交番はどこになりますか？私の住所は、」
警視庁「わかっています。大きな道路を+++の方に向かっていくと+++交番がありますからそこで届けてください。申し訳ないですね。」

こんな電話の会話中に私の脳裏には、壁面いっぱいの東京都の地図と電話を受け付けている110番指令の目の前のパソコン画面が浮かんでいた。
緊急司令室の光景は、過ぎ去りし数年前、負傷者が10名以上も発生した重大事件のときにたまたま業務でその場に居合わせ蜂の巣をつつくような場面を見たので、生死と懐の肺炎にかかわらない限りは110番しないことにしている。ちなみにその時は、ここに居るべからず知らぬが仏と一目散に逃亡した。

それから10分ほど後に、近くという交番にママチャリでたどり着いた。「公用車」と違って乗り心地が悪くハンドル操作も切れが悪い。ママチャリとの2年のブランクを感じた。

疎遠なママチャリ運転の危険な思いをして交番についたけれども、だぁ～れもいないではないか。目の前の○○○警察署につながる電話を取ったら呼び鈴1回ですぐ応答。有料電話ではなかなか出てくれなくて、無料電話ですぐ出るシステムに感心。

私「公用車の盗難届けですが、誰もいません。」
警察署「今パトロールに出ているから、連絡を取ります。5分ほど待ってください。」

一服タイムになったので、交番から出て煙を吐き出したら、目の前に禁煙区域というでっかい文字が・・・付けてすぐ消すのは「もったいない精神」に反するので7分目ほどまで嗜好してから禁煙区域に同意した。

警察官「どこで盗難に会ったの？」
私「事務所の敷地内です。」
警察官「いつごろ？」
私「多分昼過ぎ・・・犬の巡回に出かけるときに気がつきました。」
警察官「鍵は？」
私「信用するのが主義ですので、敷地内では掛けていません。」
警察官「つまり、無施錠ということね。防犯登録は？」
私「これです。」

その他もろもろの雑談を経て
他の警察官「****ね。これ人気あるからなぁ。私、そこ（事務所）を4日に一度通っているよ。」
私「そう、その公用車が盗まれたのです。」
警察官「私も2つの輪の環境に良い乗り物を盗まれたことがあるのでね。」

私は、思わず被害届けだしましたって突っ込みたくなった。

で最後に、被害届に住所氏名等を自筆記入の段階に。
私「年齢は、どのくらいサバ読んでもいいのですか？」
警察官「・・・・できるだけ正確に・・・」
私「10はひどすぎるだろうけれど5つ3つは許容範囲ということで、こんくらいにしときます。」
警察官「・・・・・・・・それでは、左人差し指をちょっとここに押してください。」
私「110番で判子もっていくように言われたのですが・・・」
警察官「できれば本人確認ということで、指紋の方が間違いないので・・・」
私「悪用しないですよね。総監のところに指紋をごてごて付けてきているから・・・」
警察官「ソウカン？」
私「隼町の警視総監のところです。ついでに近くの最高裁判所裁判官室とか隣の県の本部司令室とか、一般やドロ専門職もほとんど立ち入らないところに・・・照合されたら身に覚えないことになりそうな・・・例えば冤罪とかで・・・」
警察官「・・・・・・・・・・、お疲れ様でした。」


交番を後にしてそれから1時間ほど、乗り逃げしているかもしれないと思って駅周辺をママチャリ巡回した。

ふっと気がついた。110番で教えられた交番よりもこの交番の方が近かったのではないか？同じ○○○警察署だし。管轄区域は境界線の上だから、ここでもいいはず。以前、カラスの襲撃で通行人の生死にかかわる事件で110番したときに白黒自動車の他にチャリンコで駆けつけてきた警察官は、ここの交番からだったと思うけれどと、少し釈然としない気持ちでその交番の前で立ち止まったら、「なんか用か」と立ち番が見つめてきた。
不審尋問にあったら文句なく「自転車」窃盗犯にされる気配。公用車を盗まれて、ママチャリの窃盗犯に思われたのでは、泣きっ面に蜂だ。触らぬ近くの交番に不審尋問はないということで、一目散に遠去かった。


***駅から+++駅を経由して*+*+駅までの途中、ママチャリの後輪の空気が抜け出した。目の前の自転車店で空気を注入。気を取り直して*+*+駅の不法駐輪地帯を目指す。一通り巡回して目的物を発見できず、帰りかけたら気の合う交番がまた目の前に。ここはひとつ挨拶しないといけないので、寄り道した。
私「今しがた○○○警察署の交番に公用車の盗難届けを出したけれど、ひょっとして***区で強制移動した2つの輪の乗り物はその区だけですか？」
警察官「そうです。」
私「寄り道したついでなので、この番号の2つの輪の乗り物を強制移動しているか調べてもらえますか？」
警察官「成城*******ですね。ちょっと待ってください。もしもし、成城警察の*****ですがいつもお世話になっています。成城*******を保管していますか？ありませんか？どうもありがとうございました。保管していないということです。」
私「あそこ（事務所）からだと不法乗り捨てする場合は、ここが中心ですよね。」
警察官「そうですね。ただ、住宅地なんかの場合は、強制移動しないし、駅によってはそのままのところも・・・強制移動したならばハガキで連絡しますので、それまでお待ちください。」
私「費用は、被害届を出していても私持ちになるのですかねぇ？」
警察官「そうなります。」

意気消沈で帰途に着いたら間違いなく後輪がパンクしていた。途中2件の自転車店を通過しながら空気を入れた自転車店に戻った。1000円の修理代だったが、「チューブが老いぼれているのでパンク修理の効き目がないかもしれないから後で新品のチューブに入れ替えてください。そのときに、新品のチューブ代金からパンク修理代を差し引きます。」と恐縮しながら店長が話した。
そして、さらに1000円の修理代を800円に値下げしてくれた。
200円の値引きにではなく、その真摯な対応に感動し、散歩コースのお気に入り自転車店として即登録した。
懐と相談しだいだが、次に導入する公用車はこの店に頼むことにしようかとも思った。ただ、特別仕様なので取り寄せになるかもしれない。即金解決できる6段変則の折り畳みを公用車にするのも悪くないかと思った。


ということで、当サイトの「公用車」を無断で乗っていった方へ。
強制撤去費用を前払いするならば、被害届を取り下げますので、お早めに送金してください。
被害金額は、警察査定に対し意義を申し立て強制的に重要な証拠物件として100円追加しています。所有者でないとわからない証拠物件です。良心的にこっそり返還して置くならば、当サイトの被害届は即時撤廃します。
また、今後の累犯では、取り締まり当局に口利きも検討します。お早めにお届けください。新品の公用車を導入した場合には、この「公告」はなかったものになります。



見るほどのものでもないけれど今日の拡大画像
http://cosmos-vision.net/Blog/2008/03/03-02-01.jpg


いろいろと更新停滞のネタ探しに忙しい　惑星テラ見聞録です。
http://the-cosmos.org/index.html



撮影地は、現在も逃亡を続けている一家虐殺事件があった祖師谷公園です。

ROSWELL UFO 墜落現場

ROSWELL UFO 墜落現場拡大画像
「ROSWELL UFO 墜落現場拡大画像」


UFO墜落現場とロズウェル市の位置関係俯瞰
「UFO墜落現場とロズウェル市の位置関係俯瞰」


UFO墜落現場とロズウェル市の位置関係地図
「UFO墜落現場とロズウェル市の位置関係地図」


UFO墜落現場とロズウェル市とエリア51の位置関係地図
「UFO墜落現場とロズウェル市とエリア51の位置関係地図」

一部ファイルの移動削除について

予備サイトのファイル容量が制限を1割近くオーバーしていたのが判明したために、2003年5月から2003年8月までのページを本サイトに順次移行することにしました。
したがって、該当年月日のページは、予備サイトにアクセスしても404エラーになります。
なお、場合によっては、レイアウトと記事の手直しをして、2008年の更新ページとして援用する場合もあります。


当サイトで開設しているブログへの書き込みをお受けいたしますが、匿名や当サイトの方針に反するような場合には、開示しないこともあります。
また、既に開示している場合でも、管理者の気分次第、風見鶏次第で、簡単に削除することもあります。


しっかりした反対の意見を持っているとしても、匿名やでたらめなハンドルネームでは意見の向上を切磋琢磨できないと思います。

新年の改装中です。

新年おめでとうございます。

ただ今、当サイトでは、見やすく移動しやすいページを目的にサイトの改装を行っています。

慣れ親しんだ移動に迷子になるつくりを惜しむ方も居られるかもしれませんが、管理者がページからページにどう移動するのか迷っていますので、簡素なレイアウトにしてみました。

コスモス・ビジョンも多くのご支援を得ておりますので、トップページからの誘導も無くし、最新製作ビデオを高画質大画面で視聴するつくりにしました。

ただ、コスモス・ビジョンのトップでのご案内は、地球と宇宙、真相の企画制作に限るつもりで、編集配信する他の番組は、最近制作のビデオ一覧からご視聴ください。

2008年最初の画像ページの更新は、今日の宇宙画像でビデオの宇宙の小さな旅シリーズとの連携になります。更新予定は、1月2日です。


2008年は、ほぼ毎日あるいは、ほぼ2日に1ページを更新する計画です。


本年も場合によっては恒例の更新定休があるかもしれませんが、時間がありましたならばお寄りくださいませ。


本年もどうぞよろしくお願いいたします。



惑星テラ見聞録　管理者　t.sasaki