夕方、いつものように焼酎飲むと、勢い書き殴りたいことはいくつもあるのですが、ついついキーボード打つのが億劫になっちゃいまして。
　この前の日曜日の一番の関心事は大阪市長選でした。21時にならないとニュースはないなと思いつつ、20時20分ネットを見たら、橋本氏当確 ! えっ ? タイムスタンプ見たら20時1分とあります。他のニュースサイトでも当確。出口調査ってそこまでの精度なのと驚愕。
　それにしても現職を自民、民主、共産とおよそ相容れないような党がおして、大差で敗れると、今度は臆面もなくすり寄っていく。
　大阪ダブル選 海外メディアは
　11月28日 15時59分 NHK
大阪のダブル選挙の結果について、韓国の通信社、連合ニュースは、大阪市長選挙で当選した橋下徹氏を「新世代の政治の旗手」と紹介したうえで、今後、橋下氏が改革を求める世論を背景に、地域政党「減税日本」を率いる名古屋市の河村市長らとともに、既存の政治や政府に挑戦していくという見通しを示しています。また、橋下氏の政策については、ことし６月に公立学校の教職員に対し、入学式などで起立して君が代の斉唱を義務付ける条例を成立させたことに触れ、「行政では改革を推し進めているが、基本的には保守的だ」と伝えています。イギリスの新聞、フィナンシャル・タイムズは、インターネット版で、「橋下氏の勝利は、国政に対する有権者の不満を反映したもので、今後、行政改革が押し進められることになるだろう」と分析しています。その一方で、「橋下氏のあからさまなやり方に対し、対立候補らからは『独裁的だ』とする批判も出ていた」と伝えています。また、アメリカの新聞、ウォールストリート・ジャーナルもインターネット版で、「大阪の有権者が、地方レベルでも国レベルでも、政治の現状に嫌気がさしている結果だ」と伝えています。

　そう　もう嫌気が差してんだよ。野田総理なんて、菅総理の時、財務大臣やって官僚に骨抜きにされちゃってるし、最近ではあれよあれよという間にTPP参加とか意気込んじゃってる。何かというと国民的議論･･･って何だ ? どこで国民が議論するんだよ。
　私も少々酔っちゃてっるんで、話をすっ飛ばして、もういい加減、衆議院解散ってやってくれよ。でも入れる党がないな。

　2週刊前、書店で売れ筋の棚を見て、新刊本は高いしと眺めていたら、文庫本サイズでTPPについて書かれている本が目に止まりました。日本は再びアメリカの仕掛けた罠に嵌ると、帯に書かれています。
　こんなの半日で読めると思っていたら、2週間経ってまだ半分です。書かれていることがそら恐ろしいことばかりだし、経済の説明となるとおよそ、政治・経済に興味のなかった自分には疑問だらけです。
　昔得意だった斜め読みも、今も出来る左右の目で違う行を読むなんて芸当は出来ません。ただただ、一語一語硬くなった頭で咀嚼して･･･　分からん。
　最近は早朝タイムによく工場長に質問しています。何故、人民元はアメリカの切り上げ要求に対して頑なに拒むの ? そりゃ米国債をたたき売るぞ ! 日本だってたたき売るぞ　って･･･、これが出来ないのは私の頭でもすぐ分かりました。この国は自分で守れないんだった。
　何故、超円高なのに、隣の韓国だって、対米輸出国なのにウォンは円に対してかつての2/3以下のままなの ? とか。何故アメリカはウォンに対して通貨を切り上げろと言わないの ? とか。
　返ってくる答えに、国際経済のしたたかなカラクリ(?)に目を白黒させるばかりです。
　嗚呼、敗戦国日本は、所詮欧米には意のままに操られるし、最近では近隣諸国にまでなめられちゃってるし･･･　何か今夜のトップニュースは沖縄防衛局長の暴言が･･･　ハハ　合掌。

David Bowie in Christiane F Wir Kinder vom Bahnhof Zoo

　この前から書いている関数が、今日の確定データでは総パレット数がへんな数字をはじき出している。ふーん、じゃ OR関数でA1が0より小さい場合の処理を入れてみるか･･･
　=if(or(roundup(A1)=trunc(A1),A1<0),真の場合の処理、偽りの場合の処理)

　昨日は強い雨の中、脳外科に行き、血圧降下と血液を浄化する薬を処方して貰いに行った。予約なしなので2時間半本を読みながら待った。来週はまた別な病院、下手すると月に３つも病院巡りである。

　先日の関数の続き。1車16パレット積めるが1車目のはみ出し分が今回0.00パレット、1車と2車の合計はみ出し分が-0.5パレット。ん、今回はマイナスか･･･　で、実質パレット数は31パレットと出ている。
　-0.5はroundupで-1を足せとしていた。おかしい。頭の中で計算しても、32パレットとなる。
　それからは仕事中ということもあり、あせって頭の中は錯乱状態。昼休みJ32セルが 0<J32>1 としてみたり、果てはABS関数で絶対値を求めたりした。
　諦めてほったらかしにしておいて、一服しに戻り、画面を見たら、何やってるんだ ? 2車の合計に-0.5だから、31.5パレット、roundupで32パレットじゃないか。
　=ROUNDUP(32+J32,0) でいい。
　頭の中が煮詰まったときは暫くほったらかして置くに限る。
　この日は夜、焼酎に酔った頭で途中の処理も書き換えた。
　=if(roundup(A1)>trunc(A1),真の場合の処理、偽りの場合の処理) でもいいが、
　=if(roundup(A1)=trunc(A1),真の場合の処理、偽りの場合の処理) の方が後で見たとき分かり易い気がする。

　私がビートルズで最もよく聞くのは、故ジョージ・ハリスンの While My Guitar Gently Weeps 。ギターはエリック・クラプトンを招いて録音されました。
　この動画はジョージの追悼コンサートの模様です。ピアノは実際のアルバムと同じくポール・マッカートニー。ドラムはリンゴ・スター。
While My Guitar Gently Weeps

　あっ、昨日と今日は暇があれば机に戻って「１より大、１より小･･･」とぶつぶつ呟いていたと思います。鉢合わせした人はへんなヤツと思われたでしょう。ま、もともとへんなヤツと思われてるでしょうけど。

　昨日、関数を書いたファイルを今朝早速実践で使いました。ん、月曜納期は意外と少ないな･･･
　この製品を出荷するに際して10t車を2車使います。普段、それでも載り切らないはみ出し分は他の車を使います。1100×1100パレットで1車16パレット積載します。
　昨日私の書いた、ファイルだと今朝のデータでは、はみ出し分は-1.00パレットで31パレットと出ました。ん、D勤(日勤)分はROUNDUPで17パレット、N勤(夜勤)分は15パレット･･･　足して32パレット･･･　上手く積めばやはり、31パレットで収まります。
　注釈を入れました。実質パレット数は31パレット。さてまた問題が出ました。この製品はR(右側)とL(左側)があり、時々RとLで数量が違います。では、Rがはみ出し分-1.25パレットでLが-1.00バレットとしたら、1分ぐらい画面を睨んで、はみ出し分の大きい方を基準にすればいい。この場合-1.00の方が大きいから、32+(-1.00)は31パレット。ダミーの数値を入れて、はみ出し分がRは1.25パレット、Lは1.00パレットとすると、1.25の方が大きいからROUNDUPで+2パレット、34パレットとなります。

　面白くもない文を読んで下さった方は有り難うございます。ここには、苟も論理の考えを書いているつもりです。デジタルの最先端は今のところコンピューターでしょう。正か負です。カメラを暫く触らなくなった私には今これが面白い。ま、15、6年前からVBでプログラムは書いていましたが･･･
　スーパーコンピューター(スパコン)は今年は日本の「京」が世界No.1となりました。理研と富士通の共同開発だそうです。来年6月まで100台を超えるコンピューターを並列に繋ぎ完成させるそうですが、途中今年6月と先だっても世界NO.1となったそうです。
　1秒間に1京を超える演算。これこそ国の威信の発露。馬鹿な女大臣、蓮舫が「何故、世界1じゃなくちゃならないんですか ? 2位じゃいけないんですか ?」。
　震災後もこの女は襟を立てて記者会見していたのを見て、私が書き殴ったのは「ファッションショーじゃないだろ。お前はエプロン着て被災地に炊き出しに出ろ。」
　ただ、世界500位に日本は相当台数を落としているというのが気懸かり。

　で、何を書きたかったんだろう ? 新しい納入体系が始まって、最初の2週間はただ、成功させると　がむしゃらに頑張って、そのうち落ち着いてくると、それまで電卓を叩いて帳票にメモを書いていたのを、数値に置き換えてみる。
　おそらく明日からは電卓叩く必要もない。数多くの帳票をはじき出すけど、こんなものついでに出てくるよ。そうやって時間を作って12月から始まる新しい仕事に考えを巡らせていけばいい･･･と

　今回ぐらいでは大して時間短縮にはならないけど、ルーチン作業を日に15分縮めれば、0.25時間。1週間では1.25時間縮めます。

　この国の総理は何を言ってるんだろう ? 夕方帰宅してニュースを見てたら、「交渉に参加すると言った覚えはないし、参加しないと言った覚えもありません。」　えっ ? じゃアンタは何をしたいんだ ?

　ある製品がパレット換算で1.25パレットあるとします。さらに1.75パレット加算すると3バレット相当です。では1.75パレットと1.75パレットでは3.5パレットで、面積的には4パレット分になります。で、1.25と1.75では3パレットですから、この通りにする必要があります。でも、1.75と1.75ではどうしたって4パレット分になりますから、そのままでいいことになります。昨夜、ある表を作り、今朝は関数の参考書を1冊だけ持って行きました。
　夕方から画面を眺めていました。関数の本をパラパラめくりましたが、イメージがわきません。trunc関数に目が留まり、ん、こうかな…
　1.25をroundup関数で処理すると2になります。trunc関数だと1になります。では1.0をroundup関数で処理すると1になります。trunc関数で処理しても1になります。ん、これでできるかもしれない。
　=if(roundup(A1,0)>trunc(A1),真の場合の処理,偽りの場合の処理)、 処理の式を書くのに手間取りました。いくつかテストするとどうやら望む結果を得られるようです。毎日電卓で計算してプリントに鉛筆でメモ書きする…　今回時間はかかりましたが、これからは瞬時にそれもついでにプリントアウトされるはずです。

David Bowie - Heroes - Live Aid 1985
David Bowie - Modern Love - Live Aid 1985 - Wembley

The Beatles Hey Jude (2009 Stereo Remaster)

The Beatles - "Yesterday" live in Tokyo
The Beatles Let It Be (Digital Remaster 2009) [High Definition] HD

　さっき佐藤栄作の非核三原則を書きました。そして3月にも書きましたが原発から制御棒を抜いたら原爆だと書きました。しかし、決定的に違うのは原爆は瞬間爆発です。今度の原発事故はメルトダウンした ( これも東電は分かっていたはずなのに5月にようやく発表した この国でも最高級の頭脳集団の筈の東電や保安院、政府はずっと隠蔽した ) 核燃料は地底で今も燃焼していませんか ?

　昨日がある方の誕生日というのは意識していましたが、今更それについて書いてもどうしようもないし、読んで下さってるかも分からないし、お目出度う御座います。　っていうかお互い年取りましたね。私は今もパソコンにかじりついてるネクラです。やれやれ来年、Windows8は私が使っているスマホと同じメトロデザインになるぞとか、タッチパネルになるぞとか予測してみたり。もうひとつの趣味のカメラは半年間触っていないけど、そろそろまたシャッター切るかな･･･　次はまた新幹線に向かうのか、花、風景に向かうのか･･･　カメラは不調だし、20年来使っていた85mm1.4と100mm2.0が壊れました。85mm1.4なんて、今使ってるカメラと互換があるのは垂涎のカール・ツァイスになりますが、19万円になりますので手が出ません。被写体が新幹線の場合、震災で落ち込んだ ( こんなのいい年して撮ってる場合じゃないだろう。九州新幹線全通と原発事故が重なりました ) という精神的なものと、もうこの50km圏内は撮り尽くしたので出かける気がしなくなってしまいました。さて被写体が人物となると、これは子供が小っちゃい頃夢中になりましたが、私の性分には合いません。会話で表情を引き出すとか出来るわけないし、レフ板当てる助手もいないし、ストロボを数個使って影を消す多灯照明とかやってられません。おそらく次にシャッター切るとしたら、花か風景に向かうのかな･･･　私自身未だ分かりません。

　この国で今から原発を造るのは難しいでしょうが、原発は輸出するとか･･･　昼休みにふと、おい、佐藤栄作 ( 私の住む町の隣町の出身、昭和の妖怪、岸信介の弟 ) の非核三原則はどうなったんだ ? 造らず、持ち込ませず、外に出さず･･･
　ネットで調べると核兵器と謳ってるんですね。ふ〜ん　･･･　3月に書いたけど、原発からカドミウムの制御棒を抜けば原爆なんだけどね･･･

　この夏、カミサンのパソコンを入れ替えたときだったかな。google earthを入れて、自分の処の住所、隣のオフクロのウチというか自分の生まれた処の住所、あるいは川崎に居る三男の住所を打ち込んだら、ものの見事に衛星写真でピンポイントで示すんですね。ちょっと待てよ。無料で使えるのはいいけど、どうやってデータベースを作ったんだ ?

　水曜日の夜だったか22時に寝たのに1時半に目が覚め、泣きたい気分になりました。昨日と今朝は朝寝坊です。といっても5時には起きていますが。
　カミサンと自分のパソコンのウィルスチェックしたり、システムやアプリのアップデートがないかチェックしたり、ネットでニュースを読んだり。
　終わりの部分しか見てなくて、あっ、しまったなと思ったけど、NHKで現役の東大医学部の学生が教育の起業をしたとか･･･　東大卒の噺家とか･･･
　自分は落ちこぼれなんで、共感はしたけど、雲の上の話で。自分が若しも最高学府とかいわれる東大法学部なんて出ていたら、今頃、国民のお金を使い込んで、踏み倒して、国民は麦飯食ってなさい。なんてね。

　親会社にそろそろ、新部品を確定メールに登録してみて下さい。その際シート名が決まったら、教えて下さいと依頼。別シートににした方がいいですか ? そりゃ新部品なんだから、別シートにして頂かないと。それに今までの何処かのシートについでに入れられたら、3週間前、土日に家に籠もり15時間もかけて作ったファイルが動かないよ。 実際には動くけど余計なモノまで拾うことになる。
　何十個もマクロを作り、それらを部品として動かしているが、シート名が決まれば下のコードにその名前を書きかえればいいようにしてある。

Sub 確定メール読み込み()
'
' 確定メール読み込み Macro
' マクロ記録日 : 2011/10/15 ユーザー名 : T　○
'
'
Dim d As String
Dim n As String
d = Worksheets("確定ｺﾋﾟｰ").Cells(2, 11)
n = "トミ○○" & d & ".xls"


'ChDir "D:\確定一覧\確定メール"
'Workbooks.Open Filename:="D:\確定一覧\確定メール\" & n
'2010/4/29

Workbooks.Open Filename:=ThisWorkbook.Path & "\確定メール\" & n
Windows.Arrange ArrangeStyle:=xlVertical
'Sheets("ﾌﾟﾚﾏｼｰ").Select
Sheets("CX5").Select ' 実用の際にはシート名を書き換えること。

ActiveWindow.LargeScroll Down:=-3
Columns("A:H").Select
Selection.Copy
Windows("CX5配車z.xls").Activate
Columns("A:H").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Windows(n).Activate
ActiveWindow.Close
ActiveWindow.WindowState = xlMaximized
Range("I3").Select

End Sub
　

「横浜ＤｅＮＡ」で参入へ ＴＢＳと正式合意　というニュースがありますね。先日のニュースまで、商品名「モバゲー」は知っていても、ＤｅＮＡという会社は知らなかった。
　ＤｅＮＡは当初、自社が運営する携帯電話向けソーシャルゲームサイト「Ｍｏｂａｇｅ（モバゲー）」の名称を球団名に入れる意向だったが、広告宣伝目的になるとして巨人などが難色を示したことで撤回。引き続き本拠地となる横浜への密着を掲げ、長期保有を前提とした申請であることを強調している。
　このニュースこそがDeNAには狙いだったのでは ･･･ ? 私みたいにパソコンゲームに全く興味のない者でも、携帯の「モバゲー」は、TVであれだけCMをうってるから名前ぐらい知っている。そしてあのニュースで「モバゲー」を作っている会社がDeNAと知った。

　オレが独学でパソコンを始めた40代の頃、オレより一回り若いヤツが何か抜かしたよな。使えるなら使ってみろ みたいな。ふん、あのな 今の時代にオレにとってはハードなんてどうでもいいんだよ。要は何を作るかだ !　オレはあの時の屈辱を忘れちゃいない。

　私の勤める会社で、親会社から朝8:06と10:31に自動車関連の部品の3日後の数値がインターネット上で配信されます。
　時々ありますが、今日も10:31のデータがメーカーのライン上のデータが全くなかったので、すぐに連絡しました。おそらく一番に親会社に連絡するのは私でしょう。10:30には現場からネット環境に戻りますから。データがネット配信になったとき、どういうソフトを使われるんだろうと調べたことがあります。オラクルのデータベースソフトです。自分は触ったこともないし、よくこんなものに触れるなと驚きでした。どうも親会社でこれに触れるのはお一人のようです。
　おそらく日に2度 時間になれば、タイマーでプログラムを実行し自動配信されるものと思います。たまにユーザーの処理が遅れデータが親会社に入るのがいつもより遅れたとき、自動プログラムだとデータ不十分なまま、配信されてしまうものと思います。問題はチェック機能がないことです。出鱈目なデータでは親会社でも運営上困る筈なのに。
　作ればいいじゃん。絶対に量産のデータがある1種類だけを抽出し、量産にデータがなければ、量産の数値が空白です。処理を実行しますか ? と でも エラーメッセージが出るように。そしてネット上にはメーカーからの処理が遅れていますので、もう暫くお待ち下さい。と 出るように。そしたらいちいち電話しなくてもいいのに。
　今日は11/7のデータが出ましたが、私のちゃちなExcelのプログラムでも間違って11/8と打ち込んでボタンを押したら、「該当する日付のデータがありません。 処理を終了します。」と出るようにしています。11/7と打ち込んでボタンを押したら、部品ごとに集計され、数秒後にはプリントアウトされるように作っています。