試験終了

試験終了
勉強しないで試験を受けた
一番簡単な級だったが、なんとかなったもよう。

本年の試験はこれで終了。
来年は、受からなきゃいけない奴やら、とっとかないとまずい奴やら、目白押し。

勉強の時間とれるだろうか。
勉強の方法から考えるか。

今日のうちねこ

外を警戒中

今日のウチネコ

一心不乱

じゃあ、北大の・・

読んでみた
私のような政治音痴にもわかりやすく書かれている。
左派右派の基本的なところなど、理解しやすい。
もっともこれですべてを語り尽くせたわけではなくて、ほんの入り口というところだろう。

そしてこの本を読んで思うのは、今の政治状況を造り上げた一因はやはり私達の側にあるのだろうと感じた。

例えて言うなら、バブルまでの間は、何かわからない種を、勝手な時期に蒔いて、勝手な肥料をやり、放置しておいても環境の力で思う以上の収穫が得られた。

だが、気候が変わり、日も照らず、雨多く、風が強く吹き荒ぶようになって、今までのようなやり方では収穫ができなくなった。

そこでようやく、種を調べ、土を調べ、気候を調べ、そうして最適な収穫が得られるように学習しなければならないということを感じはじめた。

だが今までたいしたことはしてこなかったがために何を行えばいいのかわからないでいる。
これからはすべてが手探りだ。やること全てが成功するわけではない。
だが、失敗を通じて何かを学んでいけるはずだと思う。

さて、そう考えるのは楽天的だろうか。

今日の晩御飯

カレイの煮付けを作る
あと買ってきてあった５５１の豚饅が今夜のご飯

H８マイコン-その１

H８マイコンで点滅回路の作成
十何年ぶりかにマイコンをいじる
アセンブラも忘れてしまっていたが、書籍を見ながらなんとか書いて見る。
単純なローテーションロジック。

ソース##
;8個のLEDを点滅させる

;H8/300 NOMAL MODE,16BIT ADDR
.CPU 300HN

;ハードリセット時にH'0からスタート
.SECTION VECTOR,DATA,LOCATE=H'0

;メインプログラムをRESETからスタート
.DATA.L RESET

;SECTION命令でPROG,CODE領域を初期化。
;3664の使用可能ROMアドレスはH'0034からH'7FFFまで。
;今回はH'0034に指定
.SECTION PROG,CODE,LOCATE=H'34


;==================================
;===================================
;アドレスの初期化
;アドレスH'FF80をSTACKとして宣言
STACK: .EQU H'FF80
;アドレスH'FFEBをPCR8（ポート8のI/O状態指定）として宣言
PCR8: .EQU H'FFEB
;アドレスH'FFDBをPDR8（ポート8のI/Oデータ）として宣言
PDR8: .EQU H'FFDB
;===================================


RESET:
;リセット直後にMOV.L命令でSPを初期化
MOV.L #STACK,SP

;MOV.B命令で#255（10進の255:2進で11111111）をレジスタR0Lに
MOV.B #255,R0L

;MOV.B命令でR0Lの値をPCR8(ポート8の入出力レジスタ)に移動
MOV.B R0L,@PCR8

ONRIGHT:
MOV.B #254,R0L
MOV.B R0L,@PDR8

STARTSET:
MOV.L #H'40000,ER1
;レジスタR1の値から#1（10進の1）だけ減算し、ER1へ転送
ONLOOP:
SUB.L #1,ER1

;ER1の値によりCCRのZフラグが「0｣であれば、ラベルONLOOPへジャンプ
BNE ONLOOP

;R0Lのビットを右へシフトローテート
ROTR.B R0L
;R0Lの値をポート8に移動
MOV.B R0L,@PDR8
;無条件に「STARTSET」ラベルへ移動
BRA STARTSET

.END
##

なんとか成功。
さて、これから思い描いているものをどうやって作ろうか。

たっぽり

おなかがタポタポしていますが、普通の猫です。