Ｗ６５Ｃ０２マイコンボードの製作

２０２６．８．２４
前へ
次へ
ホームページトップへ戻る

［新連載開始］Ｗ６５Ｃ０２マイコンボードの製作
～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～
私としてはＷ６５Ｃ０２をさわるのは全く初めてです。何から何まで未経験です。さてどうなりますでしょうか。
～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～

［第５３回］

●ＢＩＴ

ＢＩＴはビットテスト命令です。
アキュムレータとメモリまたは即値との間のＡＮＤを計算してその結果によってＺフラグをＯＮ／ＯＦＦします。
アキュムレータおよびメモリの値は変わりません。
ＢＩＴはアキュムレータのみの命令です。
Ｘレジスタ、Ｙレジスタに対する命令はありません。
ＢＩＴは一般に特定の１ビットが０か１かをチェックするのに使われます。
Ｗ６５Ｃ０２のＢＩＴにはそのほかに少し変わった機能があります。
ターゲット（オペランド）が即値以外の場合ターゲットのビット７の１、０がそのままＮフラグの１、０になり、ビット６の１、０がＶフラグの１、０になります。
ＢＩＴには以下の命令があります。

　ニーモニック　マシン語コード　アセンブラ書式バイト数クロック数

　ＢＩＴ　ａ　２Ｃ　ＢＩＴ　＄１２３４　３　４

　ＢＩＴ　ａ，ｘ　３Ｃ　ＢＩＴ　＄１２３４，ｘ　　３　４

　ＢＩＴ　＃　８９　ＢＩＴ　＃＄１２　２　２

　ＢＩＴ　ｚｐ　２４　ＢＩＴ　＄１２　２　３

　ＢＩＴ　ｚｐ，ｘ　３４　ＢＩＴ　＄１２，ｘ　２　４

ａ　ａ，ｘ　＃　ｚｐ　ｚｐ，ｘ　はアドレッシングモードです。
ａは絶対アドレスでｚｐはゼロページです。
，ｘはｘの値で修飾することを示します。
＃は８ビットの即値です。
１６ビットの即値はありません。
Ｗ６５Ｃ０２のアドレッシングモードは［第４回］で説明していますので適宜参照してください。
下はテストプログラム（ソースプログラム）です。

;w65c02test26 26/8/11 ; ;BIT ; org $8000 ; ; $30 stack on start ; $31 stack on stop ; $32 x on end of check(if not ff x is error adrs) ; $33 y stack on end of check ; $34 data ; $35 stack data ; ldx #$fd;stack pointer txs ;set data ldx #$10 lda #$12 sta $1000;1000<12,,,a lda #$34 sta $1000,x;1010<34,,,a,x lda #$56 sta $10;10<56,,,zp lda #$78 sta $21;$11,x,,,<78 zp,x ; ;start tsx;stack pointer to x stx $30 ; php;??? pha;dummy lda #$00 ldx #$10 bit #$c0 php;0?xxxx1x pha inc;01 bit #$c0 php;0?xxxx1x pha ; asl;02 bit $1000;12 php;00xxxx0x pha asl;04 bit $1000,x;34 php;00xxxx0x pha asl;08 bit #$bc php;00xxxx0x pha asl;10 bit $10;56 php;01xxxx0x pha asl;20 bit $11,x;,,,21<78,,,zp,x php;01xxxx0x pha asl;40 bit #$40 php;01xxxx0x pha asl;80 bit #$80 php;11xxxx0x pha ldy #$80 sty $20 bit $20 php;10xxxx0x pha tsx;stack pointer to x stx $31 ; ;check data set lda #$80;stack f7 sta $40 lda #$c0 sta $41 lda #$40 sta $42 lda #$40 sta $43 lda #$40 sta $44 lda #$00 sta $45 lda #$00 sta $46 lda #$00 sta $47 ; ;check start ldx #$07 ldy #$f7 loop: lda $0100,y and #$c2;flag cmp $40,x bne err dey dey dex bpl loop;end if x=ff ;check end err: stx $32 sty $33 sta $35 lda $40,x sta $34 stp ;end

Ｗ６５Ｃ０２アセンブラでアセンブルしました。

下はアセンブルした結果作成されたアセンブルリストです。

0000        ;w65c02test26 26/8/11
0000        ;
0000        ;BIT
0000        ;
8000            org $8000
8000        ;
8000        ;   $30 stack on start
8000        ;   $31 stack on stop
8000        ;   $32 x on end of check(if not ff x is error adrs)
8000        ;   $33 y stack on end of check
8000        ;   $34 data
8000        ;   $35 stack data
8000        ;
8000 A2FD       ldx #$fd;stack pointer
8002 9A         txs
8003        ;set data
8003 A210       ldx #$10
8005 A912       lda #$12
8007 8D0010     sta $1000;1000<12,,,a
800A A934       lda #$34
800C 9D0010     sta $1000,x;1010<34,,,a,x
800F A956       lda #$56
8011 8510       sta $10;10<56,,,zp
8013 A978       lda #$78
8015 8521       sta $21;$11,x,,,<78 zp,x
8017        ;
8017        ;start
8017 BA         tsx;stack pointer to x
8018 8630       stx $30
801A        ;
801A 08         php;???
801B 48         pha;dummy
801C A900       lda #$00
801E A210       ldx #$10
8020 89C0       bit #$c0
8022 08         php;0?xxxx1x
8023 48         pha
8024 1A         inc;01
8025 89C0       bit #$c0
8027 08         php;0?xxxx1x
8028 48         pha
8029        ;
8029 0A         asl;02
802A 2C0010     bit $1000;12
802D 08         php;00xxxx0x
802E 48         pha
802F 0A         asl;04
8030 3C0010     bit $1000,x;34
8033 08         php;00xxxx0x
8034 48         pha
8035 0A         asl;08
8036 89BC       bit #$bc
8038 08         php;00xxxx0x
8039 48         pha
803A 0A         asl;10
803B 2410       bit $10;56
803D 08         php;01xxxx0x
803E 48         pha
803F 0A         asl;20
8040 3411       bit $11,x;,,,21<78,,,zp,x
8042 08         php;01xxxx0x
8043 48         pha
8044 0A         asl;40
8045 8940       bit #$40
8047 08         php;01xxxx0x
8048 48         pha
8049 0A         asl;80
804A 8980       bit #$80
804C 08         php;11xxxx0x
804D 48         pha
804E A080       ldy #$80
8050 8420       sty $20
8052 2420       bit $20
8054 08         php;10xxxx0x
8055 48         pha
8056 BA         tsx;stack pointer to x
8057 8631       stx $31
8059        ;
8059        ;check data set
8059 A980       lda #$80;stack f7
805B 8540       sta $40
805D A9C0       lda #$c0
805F 8541       sta $41
8061 A940       lda #$40
8063 8542       sta $42
8065 A940       lda #$40
8067 8543       sta $43
8069 A940       lda #$40
806B 8544       sta $44
806D A900       lda #$00
806F 8545       sta $45
8071 A900       lda #$00
8073 8546       sta $46
8075 A900       lda #$00
8077 8547       sta $47
8079        ;
8079        ;check start
8079 A207       ldx #$07
807B A0F7       ldy #$f7
807D        loop:
807D B90001     lda $0100,y
8080 29C2       and #$c2;flag
8082 D540       cmp $40,x
8084 D005       bne err
8086 88         dey
8087 88         dey
8088 CA         dex
8089 10F2       bpl loop;end if x=ff
808B        ;check end
808B        err:
808B 8632       stx $32
808D 8433       sty $33
808F 8535       sta $35
8091 B540       lda $40,x
8093 8534       sta $34
8095 DB         stp
8096        ;end

やっぱり余りよいテストプログラムではありませんね。
何をやっているのかよくわからないプログラムになってしまいました。
フラグを確認するのが目的なのでフラグをスタックにプッシュしておいて後でそれを確認します。
フラグといっても確認する中心はＺフラグです。
ターゲットが＃＄のときはＮフラグ、Ｖフラグはそれ以前の値のままになります。
それ以外の場合にはＮフラグ、Ｖフラグはターゲットのビット７、ビット６と同じになります。
Ｖフラグは何を知るためだかちょっとよくわかりませんがＮフラグはターゲットが負数であることを確認するのに役立ちます。
ＡＮＤとかＯＲＡでも確認できますがその場合にはアキュムレータが変化してしまいます。
そのあたりが使い道かと思います。
このプログラムも試行しながら結果のフラグを確認しました。
プログラムの終わりにスタックにプッシュしたフラグ値を確認するためのチェックプログラムを置きました。
＄３０にはプログラム開始時のスタックポインタの値（ＦＤ）が入ります。
＄３１にはプログラム終了時のスタックポインタの値が入ります。
チェックの結果が全て正しければ＄３２にＦＦが入ります。
＄３３には終了時のスタックポインタの値が入ります。
チェックでエラーがあればそのときの比較データが＄３４に入り、フラグの値が＄３５に入ります。

６５ｃ０２ｔｅｓｔ２６．ｂｉｎをロードして実行しました。

実行後に＄３０～の値を確認しました。
＄３０がＦＤ、＄３１はＥ７になっています。
＄３２はＦＦなので比較が正しく終了したことがわかります。

念のため／ＤＭ　０１でスタックエリアを表示しました。

Ｗ６５Ｃ０２マイコンボードの製作［第５３回］
２０２６．８．２４　ｕｐｌｏａｄ

前へ
 次へ
 ホームページトップへ戻る

ニーモニック	マシン語コード	アセンブラ書式	バイト数	クロック数
ＢＩＴ　ａ	２Ｃ	ＢＩＴ　＄１２３４	３	４
ＢＩＴ　ａ，ｘ	３Ｃ	ＢＩＴ　＄１２３４，ｘ	３	４
ＢＩＴ　＃	８９	ＢＩＴ　＃＄１２	２	２
ＢＩＴ　ｚｐ	２４	ＢＩＴ　＄１２	２	３
ＢＩＴ　ｚｐ，ｘ	３４	ＢＩＴ　＄１２，ｘ	２	４