📄 resave.asm
字号:
;反向进位程序
.def resave
.ref input,indatr
.text
N .set 128
resave:
;c接口部分
SST #0,7Ch
SST #1,7Dh
MAR *,AR1
POPD *+
SAR AR0,*+
SAR AR2,*+
SAR AR3,*+
SAR AR4,*+
SAR AR1,*
LAR AR0,*+,AR3
;反向排序部分
LAR AR2,#input
LAR AR0,#input+256
MAR *,AR2
CLEARLOOP:
SPLK #0000H,*+
CMPR 00
BCND CLEARLOOP,NTC
MAR *,AR3
LAR AR2,#input
LAR AR3,#indatr
LAR AR0,#N
LAR AR4,#N-1
RESAV1:
LACC *+,0,AR2
SACL *BR0+,AR4
BANZ RESAV1,*-,AR3
;与C语言兼容的程序代码部分
MAR *,AR1
SBRK #2
LAR AR4,*-
LAR AR3,*-
LAR AR2,*-
LAR AR0,*-
PSHD *
LDP #0
LST #1,7Dh
LST #0,7Ch
RET
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -