PC-8801mkII SR以降 Part21

876 ：ナイコンさん：2016/08/04(木) 04:11:00.24 ID:apSoDapB.net

>>873が21バイト、

WPA02:　LD　　　A,(WORK)
　　　　INC　　A
　　　　CP　　　3
　　　　JR　　　NZ,WP2P6
　　　　XOR　　A
WP2P6:　LD　　　(WORK),A
　　　　LD　　　A,1
　　　　JR　　　Z,WP257
　　　　LD　　　A,6
WP257:　OUT　　(57H),A

WORK: DB 0
自己書き換えなしでもワーク込みで同じ21バイト、

WPA02:　LD　　　HL,WORK
　　　　DEC　　(HL)
　　　　JR　　　NZ,WP2P6
　　　　LD　　　(HL),3
WP2P6:　LD　　　A,1
　　　　JR　　　Z,WP257
　　　　LD　　　A,6
WP257:　OUT　　(57H),A

WORK: DB 3
ちょっと直して17バイト。