４章入出力操作プログラム

@SCREEN
D=A
@R1
M=D
@8192
D=A
@R1
M=M+D


(press)
@KBD
D=M
@white
D;JEQ

@SCREEN
D=A
@R0 //カウンタ
M=D

(bloop)
@R0
D=M
@R1
D=D-M
@press
D;JGE

//スクリーンに書き込み
@R0
A=M
M=-1

//加算処理
@R0
M=M+1
@bloop
0;JMP



(white)
//初期化
//@R0
//M=0
@SCREEN
D=A
@R0 //カウンタ
M=D

(wloop)
@R0
D=M
@R1
D=D-M
@press
D;JGE

//スクリーンに書き込み
//@SCREEN
//D=A
@R0
A=M
M=0

//加算処理
@R0
M=M+1
@wloop
0;JMP

4章のプロジェクトで書いた入出力操作プログラムです。