@SCREEN
D=A
@R15
M=D

@R0
D=A
@R14
M=D

(LOOP)
@R14
D=M
@END
D;JEQ

@R15
M=M+1
@R14
M=M-1
@LOOP

(END)
@END
0;JMP