📄 progcontrol.asm
字号:
SETB P01
CLR P02
SETB P03
NOP
EXIT: RET
TAB4: DB 30H,31H,32H,33H,34H
DB 35H,36H,37H,38H,39H
TO_MU_3: ;LCALL LOOPDO2345_3
JNB KEY,$
JB KEY,$
MOV DATA_OUT,#00010101B ;有键按下，发送读键盘指令
LCALL SEND
LCALL RECEIVE
MOV A,DATA_IN
;MOV A,#0
MOV DPTR,#TAB4
MOVC A,@A+DPTR
MOV 32H,A ;/////
;MOV 32H,#0
LCALL SETUPMENU_3
D3: ;LCALL LOOPDO2345_3
JNB KEY,$
JB KEY,$
MOV DATA_OUT,#00010101B ;有键按下，发送读键盘指令
LCALL SEND
LCALL RECEIVE
MOV A,DATA_IN
MOV DPTR,#TAB4
MOVC A,@A+DPTR
MOV 33H,A
LCALL SETUPMENU_3
C3: JNB KEY,$
JB KEY,$
;MOV DATA_OUT,#00010101B ;有键按下，发送读键盘指令
;LCALL SEND
;LCALL RECEIVE
;MOV A,DATA_IN
LCALL FC
RET
TAB6: DB 30H,31H,32H,33H,34H
DB 35H,36H,37H,38H,39H
TO_MU_4: ;LCALL LOOPDO2345_4
JNB KEY,$
JB KEY,$
MOV DATA_OUT,#00010101B ;有键按下，发送读键盘指令
LCALL SEND
LCALL RECEIVE
MOV A,DATA_IN
MOV DPTR,#TAB6
MOVC A,@A+DPTR
MOV 34H,A
LCALL SETUPMENU_4
D4: ;LCALL LOOPDO2345_4
JNB KEY,$
JB KEY,$
MOV DATA_OUT,#00010101B ;有键按下，发送读键盘指令
LCALL SEND
LCALL RECEIVE
MOV A,DATA_IN
MOV DPTR,#TAB6
MOVC A,@A+DPTR
MOV 35H,A
LCALL SETUPMENU_4
JNB KEY,$
C4: JB KEY,$
MOV DATA_OUT,#00010101B ;有键按下，发送读键盘指令
LCALL SEND
LCALL RECEIVE
MOV A,DATA_IN
LCALL FC1
RET
TAB8: DB 30H,31H,32H,33H,34H
DB 35H,36H,37H,38H,39H
TO_MU_5: ;LCALL LOOPDO2345_5
JNB KEY,$
JB KEY,$
MOV DATA_OUT,#00010101B ;有键按下，发送读键盘指令
LCALL SEND
LCALL RECEIVE
MOV A,DATA_IN
MOV DPTR,#TAB8
MOVC A,@A+DPTR
MOV 36H,A
LCALL SETUPMENU_5
D5: ;LCALL LOOPDO2345_5
JNB KEY,$
JB KEY,$
MOV DATA_OUT,#00010101B ;有键按下，发送读键盘指令
LCALL SEND
LCALL RECEIVE
MOV A,DATA_IN
MOV DPTR,#TAB8
MOVC A,@A+DPTR
MOV 37H,A
LCALL SETUPMENU_5
JNB KEY,$
C5: JB KEY,$
MOV DATA_OUT,#00010101B ;有键按下，发送读键盘指令
LCALL SEND
LCALL RECEIVE
MOV A,DATA_IN
LCALL FC2
RET
TO_MU_6: JNB KEY,$
C6: JB KEY,$
;MOV DATA_OUT,#00010101B ;有键按下，发送读键盘指令
;LCALL SEND
;LCALL RECEIVE
;MOV A,DATA_IN
RET
;**********************低通设置****************************
FC: CLR M ;低通滤波器
;MOV P0,#0FFH ;P0做输出
;MOV 32H,#32H
;MOV 33H,#33H
CLR BZ1
MOV A,32H
CLR C
SUBB A,#30H
BIAO1: CJNE A,#0,BIAO2
AJMP X1
BIAO2: CJNE A,#1,BIAO3
LJMP X2
BIAO3: CJNE A,#2,EXIT1
MOV A,#0
SETB BZ1
LJMP X2
EXIT1: RET
X1:
;时钟100K
;MOV 33H,#35H
MOV A,33H
CLR C
SUBB A,#30H
CJNE A,#4,PDC
PDC: JC C0SETUP
SETB P04 ;512K
CLR P05
CLR P06
SJMP BIAO14
C0SETUP: CLR P04 ;64K
CLR P05
CLR P06
X1COMP: CJNE A,#1,BIAO12 ;1K
ANL P3,#0E0H
ORL P3,#06H
RET
BIAO12: CJNE A,#2,BIAO13 ;2K
ANL P3,#0E0H
ORL P3,#10H
RET
BIAO13: CJNE A,#3,BIAO14 ;3K
ANL P3,#0E0H
ORL P3,#00H
RET
BIAO14: ;时钟300K
CJNE A,#4,BIAO15 ;4K
ANL P3,#0E0H
ORL P3,#1FH
RET
BIAO15: CJNE A,#5,BIAO16 ;5K
ANL P3,#0E0H
ORL P3,#0FH
RET
BIAO16: CJNE A,#6,BIAO17 ;6K
ANL P3,#0E0H
ORL P3,#0DH
RET
BIAO17: CJNE A,#7,BIAO18 ;7K
ANL P3,#0E0H
ORL P3,#11H
RET
BIAO18: CJNE A,#8,BIAO19 ;8K
ANL P3,#0E0H
ORL P3,#16H
RET
BIAO19: CJNE A,#9,EXIT1 ;9K
ANL P3,#0E0H
ORL P3,#0AH
RET
X2: ;时钟900K
JB BZ1,BIAO30
;MOV 33H,#37H
MOV A,33H
CLR C
SUBB A,#30H
CJNE A,#7,PDC1
PDC1: JC C1SETUP
CLR P04 ;1024K
CLR P05
SETB P06
SJMP BIAO27
C1SETUP: SETB P04
CLR P05
CLR P06
X2COMP:
CJNE A,#0,BIAO21 ;10K
ANL P3,#0E0H
ORL P3,#02H
RET
BIAO21: CJNE A,#1,BIAO22 ;11K
ANL P3,#0E0H
ORL P3,#0CH
RET
BIAO22: CJNE A,#2,BIAO23 ;12K
ANL P3,#0E0H
ORL P3,#04H
RET
BIAO23: CJNE A,#3,BIAO24 ;13K
ANL P3,#0E0H
ORL P3,#18H
RET
BIAO24: CJNE A,#4,BIAO25 ;14K
ANL P3,#0E0H
ORL P3,#08H
RET
BIAO25: CJNE A,#5,BIAO26 ;15K
ANL P3,#0E0H
ORL P3,#10H
RET
BIAO26: CJNE A,#6,BIAO27 ;16K
ANL P3,#0E0H
ORL P3,#00H
RET
BIAO27: CJNE A,#7,BIAO28 ;17K
ANL P3,#0E0H
ORL P3,#1AH
RET
BIAO28: CJNE A,#8,BIAO29 ;18K
ANL P3,#0E0H
ORL P3,#0AH
RET
BIAO29: CJNE A,#9,EXIT2 ;19K
ANL P3,#0E0H
ORL P3,#12H
RET
BIAO30: CJNE A,#0,EXIT2 ;20K
CLR P04
CLR P05
SETB P06
ANL P3,#0E0H
ORL P3,#02H
EXIT2: RET
;**********************高通设置****************************
FC1: ;MOV P0,#00H ;P0做输出
SETB M ;高通滤波器
CLR BZ2
;MOV 34H,#32H
MOV A,34H
CLR C
SUBB A,#30H
BIAO11: CJNE A,#0,BIAO212
AJMP X11
BIAO212: CJNE A,#1,BIAO31
AJMP X21
BIAO31: CJNE A,#2,EXIT11
MOV A,#0
SETB BZ2
AJMP X21
EXIT11: RET
X11: ;时钟100K
;MOV 35H,#37H
MOV A,35H
CLR C
SUBB A,#30H
CJNE A,#2,PDC2
PDC2: JC C2SETUP
SETB P04
CLR P05
CLR P06
SJMP BIAO121
C2SETUP: CLR P04
CLR P05
CLR P06
X11COMP: CJNE A,#1,BIAO121 ;1K
ANL P3,#0E0H
ORL P3,#18H
RET
BIAO121: ;时钟300K
CJNE A,#2,BIAO131 ;2K
ANL P3,#0E0H
ORL P3,#1FH
RET
BIAO131: CJNE A,#3,BIAO141 ;3K
ANL P3,#0E0H
ORL P3,#0FH
RET
BIAO141: CJNE A,#4,BIAO151 ;4K
ANL P3,#0E0H
ORL P3,#19H
RET
BIAO151: CJNE A,#5,BIAO161 ;5K
ANL P3,#0E0H
ORL P3,#16H
RET
BIAO161: ;时钟900K
CJNE A,#6,BIAO171 ;6K
ANL P3,#0E0H
ORL P3,#02H
RET
BIAO171: CJNE A,#7,BIAO181 ;7K
ANL P3,#0E0H
ORL P3,#14H
RET
BIAO181: CJNE A,#8,BIAO191 ;8K
ANL P3,#0E0H
ORL P3,#18H
RET
BIAO191: CJNE A,#9,EXIT11 ;9K
ANL P3,#0E0H
ORL P3,#10H
RET
BIAO302: CJNE A,#0,TOEXIT22 ;20K
CLR P04
SETB P05
SETB P06
ANL P3,#0E0H
ORL P3,#16H
RET
TOEXIT22: AJMP EXIT
X21: ;时钟900K
JB BZ2,BIAO302
MOV A,35H
CLR C
SUBB A,#30H
CJNE A,#1,PDC3
PDC3: JC C3SETUP
CJNE A,#9,PDC4
PDC4: JC C4SETUP
CLR P04 ;2048K
SETB P05
SETB P06
AJMP BIAO292
C4SETUP: CLR P04
CLR P05
SETB P06
SJMP BIAO2122
C3SETUP: SETB P04
CLR P05
CLR P06
X21COMP: CJNE A,#0,BIAO2122 ;10K
ANL P3,#0E0H
ORL P3,#00H
RET
BIAO2122: CJNE A,#1,BIAO222 ;11K
ANL P3,#0E0H
ORL P3,#0AH
RET
BIAO222: CJNE A,#2,BIAO232 ;12K
ANL P3,#0E0H
ORL P3,#02H
RET
BIAO232: CJNE A,#3,BIAO242 ;13K
ANL P3,#0E0H
ORL P3,#1CH
RET
BIAO242: CJNE A,#4,BIAO252 ;14K
ANL P3,#0E0H
ORL P3,#14H
RET
BIAO252: CJNE A,#5,BIAO262 ;15K
ANL P3,#0E0H
ORL P3,#04H
RET
BIAO262: CJNE A,#6,BIAO272 ;16K
ANL P3,#0E0H
ORL P3,#18H
RET
BIAO272: CJNE A,#7,BIAO282 ;17K
ANL P3,#0E0H
ORL P3,#08H
RET
BIAO282: ;1.7925MHz
CJNE A,#8,BIAO292 ;18K
ANL P3,#0E0H
ORL P3,#10H
RET
BIAO292: CJNE A,#9,EXIT22 ;19K
ANL P3,#0E0H
ORL P3,#0EH
RET
EXIT22: RET
;**********************四阶椭圆低通滤波设置*********************
FC2: ;1.7925MHz
SETB M ;低通滤波器
CLR P04
SETB P05
SETB P06
ANL P3,#0E0H
ORL P3,#00H
RET
;*******************************************
; 波形产生
;*******************************************
INTTIME0:
CPL SIGNAL
RETI
END
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -