📄 function.src
字号:
;
;==================================
; FUNCTION MENU SETTING
;==================================
;
MDSPINIT EQU $0
MDSPCLK EQU $1
MDSPALMT EQU $2
MDSPALMD EQU $3
MSETLCD EQU $5
MSETCLK EQU $9
MDSPAM12 EQU $A
MSETALM EQU $B
MFUNALM EQU $C
MFALMM EQU $D
;==================================
FUNCSET
INEMD :0000,TSTMODE
BR FUNASETR
INEMD :0001,FLAG65 ;xx.ER.KEYVF not valid?
BR FUNASETR
TMD F_RDOON
LBR RDOCSET
CALL CHKILDE
BR FUNASETR
INEMD MDSPINIT,FUNCMOD
BR FUNCDCLK
FUNCTION
CALL FUNCKEY
BR FUNCTON1
FUNDCLK
CALL ALARMING
BR FUNASETR
ITMD MDSPCLK,FUNCMOD
CALL ICONDSP
CALL CLRLINE2
CALL DCLOCK
FUNASETR
RET
FUNCTON1
CALL RDOKEY
BR FUNCTONN
CALL ON_RDO
BR FUNASETR
FUNCTONN
CALL SETKEY
BR FUNASET1
CALL ON_RDO
FUNCTONM
ITMD $D,RDOMOD
ITMD $0,V_PSET
ITMD $F,SLEEPTM1
ITMD $0,SLEEPTM2
SMD F_SLEEP
CALL DSP15
BR FUNASETR
FUNASET1
CALL ENTERKEY
BR FUNASETR
ITMD MSETLCD,FUNCMOD
CALL SLCDVAR4
CALL DCONTRST
BR FUNASETR
;=========================================
FUNCDCLK
INEMD MDSPCLK,FUNCMOD
BR FUNCALMT
CALL UPKEY
BR FUNDCLK1
FUNDALMT
ITMD MDSPALMT,FUNCMOD
CALL DALMTM
BR FUNASETR
FUNDCLK1
CALL DNKEY
BR FUNDCLK3
BR FUNDMOD
FUNDCLK3
CALL ENTERKEY
BR FUNDCLK2
ITMD $0,INAMENU
ITMD $0,INBMENU
ITMD MSETCLK,FUNCMOD
BR FUNASETR
FUNDCLK2
CALL FUNCKEY
BR FUNASETR
FUNDCLKL
ITMD MDSPINIT,FUNCMOD
CALL CLRLINE2
CALL CLRNAME
CALL DSPCHAR
CALL ICONDSP
BR FUNASETR
FUNCALMT
INEMD MDSPALMT,FUNCMOD
BR FUNCALMD
CALL UPKEY
BR FUNALMT1
FUNDMOD
ITMD MDSPALMD,FUNCMOD
CALL ICONDSP
CALL DALMMOD
BR FUNASETR
FUNALMT1
CALL DNKEY
BR FUNALMT2
BR FUNDCLK
FUNALMT2
CALL ENTERKEY
BR FUNDCLK2
ITMD MDSPAM12,FUNCMOD
ITMD $0,INAMENU
ITMD $0,INBMENU
CALL DSPRTCD
CALL DALARM1
BR FUNASETR
FUNCALMD
INEMD MDSPALMD,FUNCMOD
BR SETDCLK
CALL UPKEY
BR FUNALMD1
BR FUNDCLK
FUNALMD1
CALL DNKEY
BR FUNALMD2
BR FUNDALMT
FUNALMD2
CALL ENTERKEY
BR FUNDCLK2
FUNALMD3
ITMD $0,INAMENU
ITMD $0,INBMENU
ITMD MFUNALM,FUNCMOD
CALL ICONDSP
CALL DALARM1
CALL DSPRTCD2
BR FUNASETR
;==========================================
SETDCLK
INEMD MSETCLK,FUNCMOD
BR SETALMT
CALL UPKEY
BR SETDCLK1
INEMD $0,INBMENU
BR SETCLK11
CALL INCRTCH
BR FUNASETR
SETCLK11
INEMD $1,INBMENU
BR SETCLK12
CALL INCRTCMH
BR FUNASETR
SETCLK12
CALL INCRTCML
BR FUNASETR
SETDCLK1
CALL DNKEY
BR SETDCLK2
INEMD $0,INBMENU
BR SETCLK21
CALL DECRTCH
BR FUNASETR
SETCLK21
INEMD $1,INBMENU
BR SETCLK22
CALL DECRTCMH
BR FUNASETR
SETCLK22
CALL DECRTCML
BR FUNASETR
SETDCLK2
CALL ENTERKEY
BR SETDCLK4
MTAD INBMENU
AAI $1
ALEI $2
ATMD INBMENU
BR FUNASETR
BR FUNDCLK
SETDCLK4
CALL FUNCKEY
BR FUNASETR
BR FUNDCLK
SETALMT
INEMD MDSPAM12,FUNCMOD
LBR FSETALM
CALL UPKEY
BR SETALMT1
BR SETALMT2
SETALMT1
CALL DNKEY
BR SETALMT4
SETALMT2
INEMD $0,INAMENU
BR SETALMT3
ITMD $1,INAMENU
CALL DSPRTCD
CALL DALARM2
BR FUNASETR
SETALMT3
ITMD $0,INAMENU
CALL DSPRTCD
CALL DALARM1
BR FUNASETR
SETALMT4
CALL ENTERKEY
BR SETALMT5
ITMD MSETALM,FUNCMOD
ITMD $0,INBMENU
BR FUNASETR
SETALMT5
CALL FUNCKEY
BR FUNASETR
CALL DSPRTCD
LBR FUNDALMT
FSETALM
INEMD MSETALM,FUNCMOD
LBR FSETMOD
CALL UPKEY
LBR FSETALM1
INEMD $0,INBMENU
LBR FSETAM00
INEMD $0,INAMENU
BR FSETAM01
CALL INCALM1H
BR FUNCSETR
FSETAM01
CALL INCALM2H
FUNCSETR
RET
FSETAM00
INEMD $1,INBMENU
BR FSETAM04
INEMD $0,INAMENU
BR FSETAM03
CALL INCAM1MH
BR FUNCSETR
FSETAM03
CALL INCAM2MH
BR FUNCSETR
FSETAM04
INEMD $0,INAMENU
BR FSETAM05
CALL INCAM1ML
BR FUNCSETR
FSETAM05
CALL INCAM2ML
BR FUNCSETR
FSETALM1
CALL DNKEY
BR FSETALM2
INEMD $0,INBMENU
BR FSETAM10
INEMD $0,INAMENU
BR FSETAM11
CALL DECALM1H
BR FUNCSETR
FSETAM11
CALL DECALM2H
BR FUNCSETR
FSETAM10
INEMD $1,INBMENU
BR FSETAM14
INEMD $0,INAMENU
BR FSETAM13
CALL DECAM1MH
BR FUNCSETR
FSETAM13
CALL DECAM2MH
BR FUNCSETR
FSETAM14
INEMD $0,INAMENU
BR FSETAM15
CALL DECAM1ML
BR FUNCSETR
FSETAM15
CALL DECAM2ML
BR FUNCSETR
FSETALM2
CALL ENTERKEY
BR FSETALM3
MTAD INBMENU
AAI $1
ATMD INBMENU
ALEI $2
BR FUNCSETR
BR FSETALM5
FSETALM3
CALL FUNCKEY
BR FUNCSETR
FSETALM5
ITMD MDSPAM12,FUNCMOD
CALL DSPRTCD
BR FUNCSETR
FSETMOD
INEMD MFUNALM,FUNCMOD
BR FSETBUZ
CALL UPKEY
BR FSETMOD1
MTAD INAMENU
AAI $1
ALEI $3
BR FSETMD01
ITA $0
BR FSETMD01
FSETMOD1
CALL DNKEY
BR FSETMOD2
MTAD INAMENU
AAI $F
BR FSETMD01
ITA $3
FSETMD01
ATMD INAMENU
FSETYUT
INEMD $0,INAMENU
BR FSETMD11
LBR FUNALMD3
FSETMD11
INEMD $1,INAMENU
BR FSETMD12
CALL ICONDSP
CALL DALARM2
CALL DSPRTCD2
BR FUNCSETR
FSETMD12
INEMD $2,INAMENU
BR FSETMD13
CALL ICONDSP
CALL DALARM12
CALL DSPRTCD2
BR FUNCSETR
FSETMD13
CALL ICONDSP
CALL DALMOFF
CALL DSPRTCD2
BR FUNCSETR
FSETMOD2
CALL ENTERKEY
BR FSETMOD4
FSETBAZ
INEMD $0,INAMENU
BR FSETMD21
RMD F_1BUZ
SMD F_ALARM1
TMD F_ALM1
BR FSETMM21
RMD F_ALM2
SMD F_ALM1
BR FSETMM21
FSETMD21
INEMD $1,INAMENU
BR FSETMD22
RMD F_2BUZ
SMD F_ALARM2
TMD F_ALM2
BR FSETMM21
SMD F_ALM2
RMD F_ALM1
FSETMM21
ITMD MFALMM,FUNCMOD
ITMD $0,INBMENU
RMD F_BUZRDO
CALL ICONDSP
CALL DBUZZER
BR FUNCSETR
FSETMD22
INEMD $2,INAMENU
BR FSETMD23
TMD F_ALARM1
BR FSETMD24
BR FSETMD26
FSETMD24
TMD F_ALARM2
BR FSETMD25
FSETMD26
CALL ONERTONE
BR FUNCSETR
FSETMD25
ITMD $F,ALM_FLAG
CALL ICONDSP
BR FUNCSETR
FSETMD23
RMD F_ALM1
RMD F_ALM2
CALL ICONDSP
BR FUNCSETR
FSETMOD4
CALL FUNCKEY
BR FUNCSETR
CALL FUNDMOD
CALL DSPRTCD
BR FUNCSETR
FSETBUZ
INEMD MFALMM,FUNCMOD
LBR SLCDVAR
CALL UPKEY
BR FSETBUZ1
BR FSETBUZ2
FSETBUZ1
CALL DNKEY
LBR FSETBZZ3
FSETBUZ2
TMD F_BUZRDO
LBR FSETBUZ3
INEMD $0,INBMENU
BR FSETBAZ
INEMD $0,INAMENU
LBR FSETBZZ1
SMD F_1BUZ
LBR FSETBZZ2
FSETBZZ1
SMD F_2BUZ
FSETBZZ2
ITMD $1,INBMENU
CALL ICONDSP
CALL DRADIO
FUNSETRR
RET
FSETBUZ3
INEMD $0,INCMENU
LBR FSETBUZ4
ITMD $1,INCMENU
INEMD $0,INAMENU
LBR FSSS1
RMD F_16DB
LBR FSSS2
FSSS1
RMD F_26DB
FSSS2
CALL DS6DB
RET
FSETBUZ4
SMD F_BUZRDO
ITMD $0,INCMENU
INEMD $0,INAMENU
BR FSSSS1
SMD F_16DB
BR FSSSS2
FSSSS1
SMD F_26DB
FSSSS2
CALL DT6DB
RET
FSETBZZ3
CALL ENTERKEY
BR FSETBUZ5
INEMD $0,INBMENU
BR FSETBU31
BR FSETBUZ6
FSETBU31
TMD F_BUZRDO
BR FSETBUZ6
BR FSETBUZ4
FSETBUZ5
CALL FUNCKEY
BR SLCDVARR
FSETBUZ6
RMD F_BUZRDO
ITMD MFUNALM,FUNCMOD
LBR FSETYUT
;===================================================
; SET LCD LEVER
;===================================================
SLCDVAR
INEMD MSETLCD,FUNCMOD
BR SLCDVARR
CALL UPKEY
BR SLCDVAR1
MTAD LCDLEVER
AAI $1
ALEI $8
BR SLCDVAR3
ITA $8
BR SLCDVAR3
SLCDVAR1
CALL DNKEY
BR SLCDVAR2
MTAD LCDLEVER
AAI $F
ALEI $0
BR SLCDVAR5
BR SLCDVAR3
SLCDVAR5
ITA $1
SLCDVAR3
ATMD LCDLEVER
SLCDVAR4
CALL CLRDBUF
MTAD LCDLEVER
ATMD LCD_VLU4
ITB LCDTAB/10H&0FH
T LCDTAB/100H
ATMD CVAR
CALL DSPDBUF
SLCDVARR
RET
SLCDVAR2
CALL ENTERKEY
BR SLCDVARR
LBR FUNDCLKL
;===================================================
;
;===================================================
RDOCSET
CALL RDOKEY
BR RDOCSETT
CALL RALMOFF
CALL RDO_OFF
BR SLCDVARR
RDOCSETT
CALL CHKILDE
BR SLCDVARR
INEMD $8,RDOMOD
BR RDOFMAM
CALL UPKEY
BR RDOCSET1
MTAD VOL_CNT
AAI $1
ALEI $8
BR RDOCSET2
ITA $8
BR RDOCSET2
RDOCSET1
CALL DNKEY
BR RDOCSET4
MTAD VOL_CNT
AAI $F
ALEI $0
BR RDOCSET3
BR RDOCSET2
RDOCSET3
ITA $1
RDOCSET2
ATMD VOL_CNT
CALL CTRL_VOL
CALL DSPVOL
SMD F_PROG
BR SLCDVARR
RDOCSET4
CALL ENTERKEY
BR RDOCSET5
RDOCSET6
RMD F_PROG
CALL CLRNAME
CALL DSPCHAR
BR SLCDVARR
RDOCSET5
CALL FUNCKEY
BR RDOTUNET
RDOTUNE
ITMD $9,RDOMOD
RMD F_PROG
CALL ICONDSP
TMD F_AMFM
BR ROOSET51
CALL DSPFM
BR SLCDVARR
ROOSET51
CALL DSPAM
BR SLCDVARR
RDOTUNET
CALL SETKEY
BR SLCDVARR
LBR FUNCTONM
RDOFMAM
INEMD $9,RDOMOD
BR RDOTUN
CALL UPKEY
BR RDOFMAM1
BR RDOFAM11
RDOFMAM1
CALL DNKEY
BR RDOFMAM2
RDOFAM11
TMD F_AMFM
BR RDOFAM13
SMD F_AMFM
CALL DSPAM
CALL AM_BAND
CALL WR_RDO
CALL ICONDSP
BR SLCDVARR
RDOFAM13
RMD F_AMFM
CALL DSPFM
CALL FM_BAND
CALL WR_RDO
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -