AA20
　　　MOV R2, OA
　　　MOV R0, 30
(OA24) CALL 009B ； 输出1个字符
　　　INC R0
　　　DEC R2
　　　JR NZ, A24
　　　RET

　AA40
　　　MOV R2, 30
　　　MOV R3, 39
(A44) CALL 005A ； 输入1个字符
　　　CMP R0, R2
　　　JP C, OA4F
　　　CMP R3, R0
　　　JP C, OA4F
　　　CALL 009B ； 把输入的字符显示在屏幕上
　　　JP OA44
(A4F) RET