📄 testlsp.asm
字号:
;TEMP,LSPFLAG,LSP[10]
;AR0
;==============================
TESTLSP
LACL #0
SACL LSPFLAG
;===============================
; if(freq[0]<=0 || freq[5]>=0.5) *lspflag=1;
;===============================
LAR AR0,#LSP
MAR *,AR0
LACC *
ADRK #9
XC 2,LEQ
LACL #1
SACL LSPFLAG
LACC *
SUB #4000H
NOP
XC 2,GEQ
LACL #1
SACL LSPFLAG
;=========================================
; for (i = 1; i < m; i++)
; { if (freq[i] < freq[i-1])
; { tempfreq = freq[i];
; freq[i] = freq[i-1];
; freq[i-1] = tempfreq;
; } }
;=========================================
setc INTM
LAR AR0,#LSP
LACL #8
SAMM BRCR
LACC *+
SACB ;ACCB=freq[i-1]
RPTB TLSP_TLSP-1
LACC *+
CRGT ;C==0 IF freq[i]<freq[i-1]
NOP
XC 2,NC
LACL #1
SACL LSPFLAG
nop
TLSP_TLSP
LACC LSPFLAG
BCND $,NEQ
;=========================================
CLRC INTM
RET
;-----------------
; if (freq[0] == 0.0 || freq[9] == 0.5) *lspflag = TRUE;
; for (i = 1; i < m; i++)
; { if (freq[i] < freq[i-1])
; { tempfreq = freq[i];
; freq[i] = freq[i-1];
; freq[i-1] = tempfreq;
; } }
; ;---------
; for (i = 1; i < m; i++)
; { if (freq[i] < freq[i-1])
; { for (j = 0; j < m; j++) freq[j] = lastfreq[j];
; return; } }
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -