月: 2020年6月

この記事では、アセンブラ言語で「基数変換」について簡単な例題で学べます。
10進数の13を２進数に変換する例を掲載しております。
また、アセンブラの本の紹介もしています。

＜＜関連記事＞＞

基本情報技術者試験トップへ
アセンブラ自作サンプルへ
アセンブラ過去問プログラムへ
令和2年度（令和3年1月）合格報告

2020年からの基本情報技術者試験は、言語とアルゴリズムの配点が高くなりました。
なので、プログラミング未経験の事務員の私は、非常に焦っていましたが、無事合格できました。
学習中のアウトプットを少し編集してお届けしております。

今日は、13を「0000000000001101」を表示するプログラムを作りました。
出力結果です。

左に1ビットシフトして、1だったらオーバーフローするので、
JOVで1を表示する処理、0だったらJOV以外の処理に分岐します。
GR1に13を設定します。

出力用の配列の先頭アドレスをGR2に設定します。
ループカウンタをGR3にします。

そのイメージです。

プログラミングのコードはコチラです。

TEST START
RPUSH

LAD GR1,13 ;2進数に変換したい数字
LAD GR2,DASU ;ビット列出力用の配列の先頭アドレス
LAD GR3,16 ;ループカウンタ

LOOP CPA GR3,=0 ;ループ終了条件
JZE FIN
SLL GR1,1 ;13などの数字を1ビット左へ
JOV KISUU ;「１」つまり、オーバーフローしていたらKISUU（奇数）へ
LD GR4,=’0′ ;先頭ビットが0、オーバーフローしていない、偶数の処理
ST GR4,0,GR2 ;「0」を出力用配列へ格納
JUMP TSUGIHE ;次のビット処理の準備

KISUU LD GR4,=’1′ ;先頭ビットが1、オーバーフローした、基数の処理
ST GR4,0,GR2 ;「1」を出力用配列に格納

TSUGIHE LAD GR2,1,GR2 ;配列の添え字を1つ先へ進める
LAD GR3,-1,GR3 ;ループカウンタ減算
JUMP LOOP

FIN

OUT DASU,LEN
RPOP
RET

DASU DS 16
LEN DC 16
END

今日も、読んで下さってありがとうございます(=^・^=)
またなんか面白い事思いついたら記事にします。

CASL2のおススメ本です。

基本情報技術者試験トップへ
アセンブラ自作サンプルへ
アセンブラ過去問プログラムへ
これからプログラミングを始める方へ

この記事では、アセンブラ言語で二重ループと数値を数字列に変換を使った例を学べます。
インクリメントも利用して、階段を作ってみました。

＜＜関連記事＞＞

基本情報技術者試験トップへ
アセンブラ自作サンプルへ
アセンブラ過去問プログラムへ
令和2年度（令和3年1月）合格報告

2020年からの基本情報技術者試験は、言語とアルゴリズムの配点が高くなりました。
なので、プログラミング未経験の事務員の私は、非常に焦っていましたが、無事合格できました。
学習中のアウトプットを少し編集してお届けしております。

最近単純なイラストみたいなものを作るのにハマってしまいました。

ドット絵っぽいものでしょうか。
ドット絵を使って、如何にもアセンブラらしいプログラムを作ってみました。
アセンブラ向いているのかな。
ハードウェアも頑張ろう！！

まず、実行結果です。

空の配列に、1を1つ…9を9つ入れます。
その数値をGR1で扱います。
その配列にDANという名前を付けて、
配列の先頭をGR2で指し示しました。
そのイメージです。

格納する数値を数字にするのに文字コード’0’を
加えています。その文字変換にGR3を使いました。
1を1回、2を2回…と数字の分だけ繰り返す
内ループのカウンタをGR4にしました。

外ループでは、GR1で、1～9までインクリメントしています。

では、プログラミングです。

TEST START
RPUSH

LAD GR1,1

LOOP1
LD GR3,GR1
LD GR4,GR1
ADDA GR3,=’0′
LAD GR2,DAN

LOOP2
ST GR3,0,GR2
LAD GR4,-1,GR4
CPA GR4,0
JZE DASU
LAD GR2,1,GR2
JUMP LOOP2

DASU ST GR1,LEN
OUT DAN,LEN
LAD GR1,1,GR1
CPA GR1,=9
JPL FIN
JUMP LOOP1

FIN
RPOP
RET
DAN DS 10
LEN DS 1
END

読んで下さって、ありがとうございました(=^・^=)

CASL2のおススメ本です。

基本情報技術者試験トップへ
アセンブラ自作サンプルへ
アセンブラ過去問プログラムへ
これからプログラミングを始める方へ

この記事では、アセンブラ言語で「多重ループ」を使った簡単なドット絵（市松模様）が学べます。
また、アセンブラの本の紹介もしています。

＜＜関連記事＞＞

基本情報技術者試験トップへ
アセンブラ自作サンプルへ
アセンブラ過去問プログラムへ
令和2年度（令和3年1月）合格報告

2020年からの基本情報技術者試験は、言語とアルゴリズムの配点が高くなりました。
なので、プログラミング未経験の事務員の私は、非常に焦っていましたが、無事合格できました。
学習中のアウトプットを少し編集してお届けしております。

COMET2のアセンブラのCASL2で、
簡単なドット絵を作ってみたくて、
市松模様を作りました。
もう少し私の勉強が進んだら、凝ったイラストが
書けるかもですが、今は市松模様だけでも
1時間以上かかってしまいました。
まだまだ勉強不足だな。

それで、「MOYOU」という配列に、
「８」を使って、こんな感じに出力しました。

一番外側のループで、GR1の値が偶数の時は、
「８　８　８」と模様を描き、
GR1が奇数の時は
「　８　８　」
と模様を描いていきます。

GR1の値で振り分けて、市松模様を描く
イメージ的は、こんな感じです。

GR1の値をラベルGUSUU（偶数）とKISUU（奇数）に
処理を振り分けています。
偶数か奇数かの判定は、GR1をGR4にコピーして、
右に1ビットシフトして、オーバーフローすれば
奇数、しなければ偶数にしています。

模様の「８」を格納する配列の添え字をGR2、
「８」という模様をGR3に格納、
GR5は、模様をお掃除するために、「　」（スペース）を
読み込むのに使い、掃除用の添え字をGR6にしています。

プログラムはこんな感じです。

TEST START
RPUSH

LAD GR1,0
LD GR3,=’8′
LAD GR4,0
LD GR5,=’ ‘

LOOP LAD GR2,1
LD GR4,GR1
SRL GR4,1
JOV KISUU
LAD GR2,0

GUSUU
CPA GR2,=4
JPL DASU
ST GR3,MOYOU,GR2
ADDA GR2,=2
JUMP GUSUU

KISUU
CPA GR2,=4
JPL DASU
ST GR3,MOYOU,GR2
ADDA GR2,=2
JUMP KISUU

DASU OUT MOYOU,LEN
ADDA GR1,=1
LAD GR6,0
CPA GR1,=5
JZE FIN

SOUJI
ST GR5,MOYOU,GR6
ADDA GR6,=1
CPA GR6,=5
JPL LOOP
JUMP SOUJI

FIN
RPOP
RET

LEN DC 5
MOYOU DC ‘ ‘;半角スペース5こ
END

とても、とても、
多重ループの勉強になりました。
もっと頑張って、とにかく頑張る！！
だって、何の才能もない発達障害（ASD＋ADHD）だもん( ；∀；)

ご精読ありがとうございました。
この記事を書くのに勉強になった本を紹介します。
多分この記事を読んで面白かったと思われた方は、
きっとハマると思います。

◆アルゴリズム問題がちゃんと解ける本
アルゴリズム学習の定番。
アルゴリズムが苦手で何とかしたい方におススメ

◆アルゴリズムはじめの一歩完全攻略
実際に作って学べます。
Javaを使っています。
私はJava初めてでしたが、
それでも、ハッシュ関数の所までは、
どうにかついていけました。
もっと頑張ります。

◆速習言語CASL2
CASL2、何それ、テーマパークの絶叫マシーン
みたいな名前だね、ぐらいだった私でも、入門書として楽しく読めた本です。

◆プログラミング入門CASL2
入門が卒業出来たら、ガシガシ例題解いて、
演習問題を解いて、力を付けたいという時に
読む本です。

基本情報技術者試験トップへ
アセンブラ自作サンプルへ
アセンブラ過去問プログラムへ
これからプログラミングを始める方へ

この記事では、アセンブラ言語で簡単なループとインクリメントをして、番長皿屋敷のお皿の枚数を数える例題を掲載しております。

怪談話で有名な、「１ま〜い」、「２ま〜い」・・・と数えていくのは、プログラミングの基礎トレーニングになると思います。

世間では「地球沸騰化」、なんて言っていますね。
多分2023年のトレンドになるのではないでしょうか。

毎日暑いので、アセンブラの勉強では涼しくなりたいです。
そこで、怪談話を題材に、プログラミングをしてみようと思いつきました。
個人的には「番町皿屋敷」は、プログラミングの中でもループの勉強になると思います。

１ま～～～い、
２ま～～～い、

そう、ループとインクリメントです！
アセンブラCASL2を使って基本情報技術者試験対策も兼ねて
下記の結果になるプログラミングをしてみました。

LADとLDの違いについては、こちらの外部記事が分かりやすいです。

TEST START
 RPUSH

 LAD GR1,1;GR1に1を設定

;＜＜ ここからループ ＞＞
LOOP LD GR2,GR1;GR2にGR1の数を読み込む
 ADDL GR2,='0';GR2の値に文字コード「'0'」を加算
 ST GR2,SARA;GR2の値をSARAに格納
 OUT SARA,LEN;皿の枚数を出力
 LAD GR1,1,GR1;GR1をインクリメント
 CPL GR1,=10;GR1が10まで達したのか比較（ループを続けるか否かの判断）
 JMI LOOP;GR1が10未満であれば、ループは続行

 OUT MOJI,LEN2;「サラ割れた」のメッセージ出力

 RPOP
 RET

SARA DS 1;皿に文字数1枠を確保する
TANI DC 'MA-I';皿の単位の数え方は「枚（まーい）」
LEN DC 5;1枚は「1MA-I」と５文字で表示
MOJI DC 'SARA WARETA!';「皿割れた」の文字列
LEN2 DC 12;上記の皿の文字列の字数

 END

それでは、このサブルーチンを実行していきます。
まず、GR1に1を設定します。

GR1はループカウンタ用に使って、GR2は皿の枚数の出力用に使うので、GR1の値をGR2に写します。
GR2にGR1の値を読み込みます。

GR2の値を使って、「1まーい」と出力したいのですが、そのためには文字コードの理解が必要になります。

紛らわしいのですが、「’1’」の文字コードは「0001」ではなく、「0031」です。
つまり、OUT命令で「1」と出力したいのであれば、文字コードを踏まえて「+30」してから出力します。

そこで、ADDL命令でGR2に「’0’」を足しておりますが、CASL2での「’0’」の文字コードは「0030」です。

この辺りの説明が分かりにくい際には、CASL2の文字コードについてこちらの外部記事が分かりやすいです。

ST命令で文字列SARAにGR2の「+30」をした値を格納してOUT命令で右側のコンソールに出力しています。

STの文字数は1文字、単位の「MA-I」は4文字なので、LENには合わせて5文字分出力出来るように5と設定しています。

現在GR1は1枚なので、LADを使ってインクリメントして、GR1の値を「2」にします。

その、インクリメントの仕組みなのですが、

LAD GR1,1,GR1

で、GR1に「GR1の値+1番地」の値アドレス値を送ることによって、GR1自身に、1加算のインクリメントをしています。

この仕組みについては、先ほどのLDとLADの違いの外部記事が参考になり、ロードアドレス命令を用いた加算については、こちらの外部記事に掲載されています。

ちょっと面倒だな〜〜と思われた方は、ループでのインクリメントのテクニックなんだな、程度に軽く流してもらっても大丈夫です。

インクリメントによって、GR1の値は1から2に１つ増えました。
CPLで「10」と比較して、10よりも小さかったらJMIでLOOPに戻ります。

現在GR1の値は「2」であり、2は10より小さいので、フラグのSFがマイナスとなり、LOOPに戻ります。

このSFがマイナスになった仕組みですが、アセンブラでは比較の時に減算が行われます。

CPL GR1,=10;GR1が10まで達したのか比較（ループを続けるか否かの判断）

ここで、GR1が2なので、10と比較するために「2-10=マイナスの値」と計算されて、SFフラグがマイナスなので「1」になったという仕組みです。

それで、JMIでマイナスになったのでLOOPまで戻って、このループをGR1の値が10未満の間は繰り返されます。

・
・
・

あとは繰り返しなので、「9まーい」が出力される所まで進めます。
現在、「8まーい」まで出力されていて、コンソールの表示はこのようになっています。

レジスタの値は、このようになっています。
GR1が「9」なので、10未満の為SFフラグが1であり、LOOPまで戻ってきました。

GR2にGR1の値が読み込まれます。

GR2に「’0’」を加算することによって、文字コードが30足されます。
「0009」から「0039」になって、文字「9」が出力出来るようになりました。

ST命令で、文字「9」をSARAに格納します。

OUT命令でコンソールに「9まーい」が出力されました。

LAD命令でGR1がインクリメントされて、「9」から「A」になりました。
16進数では、Aは10です。

16進数が苦手な方は、こちらの外部記事が分かりやすいです。

CPLで10になったGR1と10が比較され、ここでも減算が用いられ、GR1-10=0なので、ゼロフラグが立って1になりました。

なので、JMIによる分岐は行われずにループを抜けました。

ループを抜けた所で、「皿割れた」のメッセージが出力されます。

最後の「SARA WARETA!」ですが、
これは、そのお皿が ”さらわれた”と、皿が割れたのダジャレです。

ちょっと怖かったですか（笑）

これで少しでも体感温度下がりましたら夏を乗り切れそうです。

お疲れ様でした。
ここで一旦、写真で休憩を挟みます。

千葉県の房総半島の外房、御宿の海です。

ここから、復習&アウトプットタイムです!!
下記のコードをシミュレーターにコピペして、コメントを頼りに先ほどのコードを覚えているか入力して見て下さい。

上手く動いたら、値などを好きなように変えて動かして見て下さい。

この復習は学習直後は勿論、明日など少し日を開けて行うと、更に効果的です!!

TEST START
 RPUSH

;GR1に1を設定

;＜＜ ここからループ ＞＞
;GR2にGR1の数を読み込む
;GR2の値に文字コード「'0'」を加算
;GR2の値をSARAに格納
;皿の枚数を出力
;GR1をインクリメント
;GR1が10まで達したのか比較（ループを続けるか否かの判断）
;GR1が10未満であれば、ループは続行

;「サラ割れた」のメッセージ出力

 RPOP
 RET

SARA DS 1;皿に文字数1枠を確保する
TANI DC 'MA-I';皿の単位の数え方は「枚（まーい）」
LEN DC 5;1枚は「1MA-I」と５文字で表示
MOJI DC 'SARA WARETA!';「皿割れた」の文字列
LEN2 DC 12;上記の皿の文字列の字数

 END

皆さま、大変お疲れ様でした。
この記事最後のブレイクタイムPhotoは・・・

江ノ島の岩場です。
片瀬江ノ島駅から徒歩数分のところで船に乗れましたので、岩場まで行って来ました。

仕事や勉強のリフレッシュに、趣味で写真を撮っておりますので、宜しかったら フォトストック写真ACさん の投稿もご覧頂けますと、大変嬉しい限りでございます！！

こちら、無料の「ダウンロードユーザー」に登録して頂けると、無料で写真のダウンロードが可能になります。

※ 先にGoogleアカウントを作成して頂くと、登録が ラク です♪

最後までご精読、誠にありがとうございました！！

自己紹介


アセンブラ自作サンプルへ

アセンブラ過去問プログラムへ

プログラミング未経験者はアセンブラと表計算どっち!?



基本情報技術者試験トップへ

午前免除試験

午後試験のオススメ本

スコアレポート