帰休

職場の一部で一時帰休が始まります。
３ヶ月の予定で金曜日が休みだそうです。
私の部門は辛うじて対象から外れていますが
明日のことはわかりません。
前を向いて生きていくしかありません。

昔々にも一時帰休の経験があります。
この時は会社中が対象で１年間金曜日が
休みになりました。
当時は若かったのですね、ぜんぜん将来は
どうなるかなんて考えもしないで休みに
なってうれしいと遊びほうけていました。
その時は１年で元の状態に戻れました。
今回はめちゃめちゃ不安です。
昔のようにのんきな気分でいられたらいいのに。

新聞より

すべて昨日(6/29)の朝日新聞夕刊の抜粋です。

自信を見失ったり、職場で不本意な目にあったり
仕事の壁や悩みをどう乗り越えましたか？

・はとバス 遠藤はな子さん
「日頃から小さなことにも興味を持つ。嫌なことや
壁から逃げず、壁ができた理由をじっくり考えて
みること」

・全日空 吉野勝美さん
「会社の枠内で悩まず、外に出たら実力もわかるし
吸収するものが山のようにある。社外にも視野を広げて
人脈を築くのが不可欠」

・JTB 原田圭子さん
「壁にぶつかっても、仕事に深い愛情と思い入れを持って
行動を起こすこと」

・サントリー 三枝直樹さん
「つらい日々は修行。仕事があることに感謝して
与えられた仕事を精いっぱいこなす。後で必ず生きる」

・スターバックスコーヒージャパン 江嵜譲二さん
「フリーター時代はむだではなかった。自分しだいで
すべての経験は今につながる」

・ベネッセコーポレイション五十嵐洋一さん
「まずやってみることが大事。自分がまだ知らない
だけでもっとすてきな夢や希望の卵があるかもしれない。
そう思えたら少しわくわくしませんか？」

・寅屋 染谷武徳さん
「食べることは生きがいであり、私の人生そのもの。
喜びは働くこと自体に満足し、信頼され任されること」

・ホテルオークラ 藤山秀雄さん
「仕事は自分の目標に近づくためのものだ
何かを得ようと思ったら人の何倍もやる。決まった
時間内に決まったことだけやっていてはダメ。
一生懸命やらなくてはというのが今も自分の原点」

・静山社 編集者 古屋信吾さん
「まず自分が仕事を楽しめて面白がることが大事。
仕事の喜びは自己実現の喜び。他人の評価より
自分がいかに現場の人間として主体的にかかわれたか
が重要」

共通するのは自分の仕事が好きなこと。
夢をあきらめず努力し続けていること。

雨でした

今日の天気予報はよく当たりました。
朝はとてもいい天気でした。
テレビの天気予報で夕方には雨が降りますと
言っていました。
こんなに天気がいいのに本当に降るの、と
思いつつも傘を持っていきました。
夕方はざあざあ降りでした。
いまも激しく降っています。


定額給付金の書類が来たのが５月の中ごろです。
すぐに記入して返信してから何の音沙汰も
なかったので忘れていました。
今日通帳に記帳したら６月２３日に振り込まれて
いました。
岐阜は処理が早いみたいでずいぶん前に振り
込まれたと母が言っていました。
振り込んだ、という連絡のはがきが来たと
言ってましたが名古屋は省略されたのか、
来ていません。
定額給付金、なんか自分の足をかじっている
ような感じがします。

追伸：
7月2日に振り込んだという連絡が届きました。

MZ-80B

最初に買ったパソコンはシャープのMZ-80Bです。
今ではこの機種名もうろ覚えになってしまいました。
インターネットで検索したら懐かしの写真が
出てきました。
1981年の発売だそうです。
周りの男性陣が個人でコンピュータが買える
時代が来たのだと興奮しました。
そして皆が買いました。
私はそれにつられてそんなにすばらしいことなら
買ってみようかという安易な気持ちで買いました。
つられて買うにしてはかなりな値段でした。
25万円以上したような気がします。
今思えばみんなの興奮が理解できます。
大型コンピュータの時代で個人が持てるものでは
なかったのですから。

さてこのコンピュータで何をしたか？
BASIC でプログラムが組めました。今のVisual Basic
ではないです。ほんとに Basic なものです。
あとゲームのカセットテープが数本おまけに
付いてきました。
Basic でプログラムを作るといっても作るような
ものがありません。
ケームも最初に数回やっただけです。
結局何に使ったかといえばインテリアとして
使った？というものです。

今朝テレビを見ていたら数年後には宇宙旅行が
出来る時代が来ると言っていました。
宇宙に居られるのはたったの４分、それでお値段は
２千万円だそうです。
どんどんお金持ちは初期にお金を使うべきだ、
それにつれて値段は下がってくるのだからと
言っていました。

私のコンピュータへの投資は多少なりとも
それ以後のコンピュータの発展に寄与したのかなと
テレビを見ながら思ったしだいです。

いい天気でした

好きな所へ行きたいんだ

自分の所のものではないものがプロット出力
するから調べて欲しいとの連絡がありました。
その出力の内容を見てどこのものか検討を
付けてそこへ状況を聞きに行きました。
「確かに出力した。時々出力したにも関わらず
出てこないことがある。もう一度出力をすると
正常に出る。」といいます。
この出ないという時に自分の所のプロッタでは
なく他所のプロッタに行ってしまうらしいのです。

いうならマンションでほかごとを考えていて
自分の家のドアを行き過ぎて隣の家のドアを
開けてしまった、というようなことです。
人間ならそういうことが起こりうるでしょう。
けれどもコンピュータに関していえば
今回はあっちへ行きたい、なんて気まぐれを
起こして別の出口の方へ行ってしまうなんて
ことが起きるわけがありません。

何か理由があるはずなのですがどう調べても
別のルートへ行ってしまう理由がみつかりません。
こんな時に感じるのがコンピュータは生きていて
いたずらをしているのではないかということです。
何度やっても正常に動かないのに、同じことを
して、ある時ふっと正常に動き出すという経験が
何度かあります。
きっとそれなりの理由はあるのでしょう。
でもその理由がわからないまま正常になって
しまうため不思議な気持ちだけが残ります。

最近の状況

世の中は不景気の底を抜け出したようなことを
言っています。
でも私の周りは明るい雰囲気はありません。
ある会社の人は何ヶ月も給料が銀行に振り込まれて
いなかったことに気がつかなかったといいます。
気がつかないっていうのもどうかな、と思います。
私の会社にも波は押し寄せています。
身近にも派遣切りや一月のうち５日休んでくれと
いわれたりしています。

どこに行っても、どんな状況になっても自分に
自信がもてるといいのですが。
生きていくのに必要なのは自信です。
盲目的な自信でもいいのです。
全然知らないのに知っているふりして仕事を
取って、それから情報を集めてやり遂げて
しまうという人をいろいろ見てきました。
なんて無茶なと思って見ているとどんどん
自分のものにしてしまっています。
そんな風に自分にはやれる、という確実な
自信を持ちたいものです。
できるかもしれないのにしり込みして
手を出さない方です。

昔の仕事仲間とのつどい

昨日雨が降ってもだいじょうぶ、なんて書いたら
今朝はザアザア降りの雨でした。
今日は忘れず傘を持ち帰りました。

今日の夕方は昔の仕事仲間との集まりが
ありました。
社会人になった最初の３年間在籍した課の
人たちです。
20数名集まりました。約２年ぶりです。
私がその課を離れて、少しして課は解散した
ので私はこのグループでは年下です。
みんなもう高齢者です。

会えば気分はあのころに返ってしまいます。
みんな元気で仕事に趣味に忙しそうです。
それでも体のあそこが悪い、ここが悪いという
話が飛び交っています。

前回の集まりから亡くなった人が数人います。
会える機会をだいじにしてそしてまた次に
会える時までお互い元気で過ごしましょうと
別れました。

今日は何かあったかな

ずっとブログを始めたばかりのころと変らぬ
アクセス数なのに楡周平さんの本の話を
書いた時だけびっくりするほどアクセス数が
跳ね上がります。
なぜかと考えてみて、コカインなんていう
単語が検索に引っかかって訪れてくれたのか
と思いいたりました。
ダークな世界を思わせる単語の方が人を
引きつけるのかと悲しいです。

今日はむしむししてます。
それは帰宅時に外に出て気がついたことで
室内では肌寒いなぁと思っていました。
エアコンはまだ入っていません。
壁に取り付けられた扇風機が廻っています。
扇風機の風って部屋を冷やすわけでも
ないのにこんなに涼しく感じさせるもの
なんですね。

傘を２本も置き忘れてきてしまいました。
１本は実家に、１本は会社に。どこにあるか
わかっているからまあいいです。
明日雨が降ってもかろうじてあと1本傘が
ありますから、仕事には行けそうです。

今日はとりとめもなくだらだらと書いて
みました。

朝倉恭介の本

この前読んだ楡周平著"ターゲット"がおもしろ
かったのでそのシリーズ本２冊を読んでみました。
"猛禽の宴 続・Ｃの福音"と""朝倉恭介 Ｃの福音・
完結篇"です。
ターゲットを挟んだ前後の本となります。
ターゲットは世界情勢をあらわしたおもしろい
本でしたが今回の２冊はギャング小説あるいは
犯罪小説といったらいいでしょうか。
読んでいて気分のいいものではありません。
コカインの売買や、いとも簡単に人を殺しまくると
いった内容でこの手の本はもう充分です。
それでも投げ出さず最後まで読みました。
おもしろいわけではないけど読み続けられる
力を持った本ではあります。

朝倉恭介は本の最後で死んだらしいという
ことになっています。
完結なのですが、海へ飛び込んで行方不明
ですからいずれまた生きていたとなって
続編が書かれる可能性を残しています。

田園風景

朝のうちはどんよりとした曇り空でした。
実家へ行きました。
電車から見える風景は牧歌的です。
水が張られた田が広がっています。
田植えが済んだばかりらしく稲はまだ
ひょろりとしています。
すぐに稲が育って水の見える範囲が少なく
なってしまいますが今は水の方が勝っています。

空は黒っぽい雲に覆われています。
いつもは遠くに見える山の連なりが今日は
やけに手前に見えます。
山の天辺は雲が漂って隠しています。
本当は300メートルぐらいの山々なのに
なんだかうんと高い山のように感じさせます。
天気がそんな錯覚を起こさせます。

夕方には青空がのぞいていました。

池の魚を釣った

昨日の夕刊に旧蒲郡ホテルの記事が
載っています。
今の蒲郡プリンスホテルです。
1930年代に建てられたものだそうです。
りっぱなホテルです。

このホテルにたぶん泊まったことがあります。
たぶんというのは数十年昔のことで記憶が
あいまいです。
小学校の3，4年ぐらいの時に父の職場の
慰安旅行に上の弟と私と、父にくっついて
蒲郡ホテル?に行きました。
昼からの宴会で大人たちは楽しんでいます。
飽きてしまった私と弟は庭へ出ました。
広くてりっぱな庭で池があり鯉が泳いで
いました。
そばに釣竿が落ちていました。ちゃんとした
ものではなく遊びのためにこしらえたという
ようなものでした。
私と弟はこれで池の魚を釣って遊べという
ことだと理解しました。
部屋へ戻って餌になる食べ物を持ち出して
竿に取り付けて池に放り込みました。
そしたら釣れたのです。

ちょうどそこへ父の同僚がやってきて
「池の魚は釣っちゃ駄目だよ。」とたしなめ
られました。
子供のことで釣っては駄目だということは
まったく頭に浮かびませんでした。
そうなんだ、とずいぶん恥ずかしく感じ
ました。
なぜ釣竿があったのかは不思議ですけどね。

記憶がぼやけているのに池の魚を釣ったと
いうことだけは覚えています。
もっと小さかった弟も池で釣りをしたことを
覚えていてこの前そんなことがあったなぁと
話していました。

旧蒲郡ホテルだったと思うのだけど、
さてどうでしょう。
父と旅行したというのはこれが最初で最後
ではないかと思います。
当時は旅行はめったにするものではありません
でしたからそれが普通でした。

回転する犬

会社を出た時は雨は降っていませんでした。
空模様があやしいけど家に帰り着くまでは
だいじょうぶだろうと思いました。
すぐに小雨がぱらぱらしてきました。
半分ぐらいすぎたらだんだん大粒の雨に
なってきました。
家に着いた時には土砂降りで服はびしゃびしゃです。
ザアザアと降っていましたが５分後には
ぴたっと雨は上がりました。
ほんとに意地の悪い雨です。

朝の出来事です。
いつもとはちょっと違う道を自転車で
走っていました。
いつもは会わない犬に出会いました。
白い中型犬です。
後ろからトラックが走ってきました。
すごい顔してその場でぐるぐる回転しながら
トラックにワンワン吠えかかりました。
１台目が通り過ぎて２台目がきました。
またしてもぐるぐるとワンワンが
始まりました。
「見てる人が笑っているよ。やめなさい。」
と飼い主さんがまるで人間の子にいうように
さとしていました。
見ている人って私のことか、そういえば
にやにやして見てたかもしれません。

VB 配列の初期化

Visual Basic で配列に初期値を設定するには
どうするのだったかなぁと考えました。
調べてみるとどうもVB6には設定する方法が
ないみたいなのです。
たとえば次のようにstring を3個用意します。
Dim aray(3) as String
ここに文字を設定しようとすると
aray(0)="ABC"
aray(1)="EFG"
aray(2)="HIJ"
こんなふうに一つずつ入れなければいけません。
なんかスマートな方法はないかとさがしたら
次の方法がみつかりました。

Dim aray() As String
aray = Split("a,b,c,$,$,A,B,C,$,$", ",")

split関数を利用して分解したものを配列に
挿入します。
では２次元配列に入れる場合はどうしたらいいの
でしょう。
見つかりませんでした。
次のように一旦１次元配列に取り込んだものを
置き換えるという方法しか思い浮かびません。
何か方法があったら教えてください。
なおVB.NET になると次のように初期化できます。
Dim iaray() As Integer = {1, 1, 2, 3, 4, 5}

Private Sub abc()

  Dim i As Integer, j As Integer, n As Integer
  Dim aray0() As String, aray(2, 5) As String

  aray0 = Split("a,b,c,$,$,A,B,C,$,$", ",")

  n = 0
  For i = 0 To 1
    For j = 0 To 4
      aray(i, j) = aray0(n)
      Debug.Print aray0(n) & " " & aray(i, j)
      n = n + 1
    Next j
  Next i

End Sub

今気がついたのですがsplitは文字列を分解する
ものです。数字の時は文字→数字への変換が必要に
なっていまいちですね。6/18

カメラの修理代

５年ほど使ったデジカメが壊れて数ヶ月が
経ちました。
修理に出そうか、いっそ新しく買おうか
迷って、そのうち日が過ぎてしまいました。
買ってその機種に慣れるのにまた何日も
かかるし、気に入らないかもしれません。
パンフレットの性能の羅列を読んでも
自分に都合がいいのかどうかさっぱり
わかりません。
それで７、８千円までぐらいで修理できる
ものなら修理しようと決めて買ったお店へ
行きました。
修理代はいくらかかるか聞きました。
どんな故障であれ修理に出したということで
まず１万円、それに修理に応じて費用が
かかるということです。
１万５千円ぐらいはかかるのではといいます。
２万円ほどで買ったカメラに１万５千円の
修理代？ちょっとひどいです。
修理して使うということは考えていない
ようです。
この修理代を聞いて修理に出すのは止めました。

故障はメモリカードを入れるところの蓋が
閉まっているかどうかを検出するところです。
閉まっているのに"蓋が開いています"と
メッセージが表示されてそれから先へ進みません。
家へ帰ってこれ以上どんなに壊れてしまっても
かまわないとがちゃがちゃやって、最後に
力任せに蓋をばんと閉めたら、あらら
直ってしまいました。
蓋というカメラの心臓部でないところの
問題なのに一律の修理代というのはどうも
腑に落ちません。
またすぐおかしくなるとは思います。
使えるところまで使ってみます。