📄 rdobss.src
字号:
;
;*******************************************************************
;* Telefield LTD. *
;* *
;* Project : 2.4G /40 Channels CID Cordless + radio(tea5757) *
;* Company : telefield *
;* Model : GH3060 *
;* Writed By : JIANGJUN *
;* *
;* release NO : 2 *
;* function : test mode (radio + bs) *
;*******************************************************************
;
PLLRF EQU :0011
PLLVOL EQU :0100
PLLOPT EQU :1000
;-------------- B16 -------------
REFCNT EQU 160
RXCODE EQU :0001 ;2B
TXCODE EQU :0010 ;2B
OPTCODE EQU :0000 ;2B
VOLCODE EQU :0010 ;3B
BATVAL EQU :0010 ;3.15V
;--------------------------------
;K_OGM EQU 0 ;
;K_STP EQU 1 ;
;K_VOLD EQU 3 ;
;K_REV EQU 4 ; TAD + CORDLESS KEY BOARD
;K_PLY EQU 5 ;
;K_SKIP EQU 6 ;
;K_VOLU EQU 7 ;
;K_MEMO EQU 8 ;
;K_ERASE EQU 9 ;
;K_ANS EQU $A ;
;K_MENU EQU $E ;
;--------------------------------
;
K_PAGE EQU $c ;[1033240402]
K_SPK EQU $3 ;
K_ALM2 EQU $2 ;
K_FUN EQU $1 ;
K_RDO EQU $0 ; RADIO + CORDLESS KEY BOARD
;
K_UP EQU $4 ;
K_ENTER EQU $5 ;
K_SZOONE EQU $6 ;
;
K_DOWN EQU $8 ;
K_ALM1 EQU $9 ;
K_SET EQU $a ;
;
;--------------------------------
;
GREETKY EQU $c ; K_PAGE
STOPKY EQU $a ; K_SET
VDNKY EQU $2 ; K_ALM2
REPTK EQU $8 ; K_DN
PLAYKY EQU $F ;
SKIPK EQU $4 ; K_UP
VUPKY EQU $9 ; K_ALM1
MEMOKY EQU $5 ; K_ENTER
ERASKY EQU $0 ; K_RDO
ANSWKY EQU $1 ; K_FUN
PAGEKY EQU $C ;
SPKPKY EQU $3 ;D ;
MENUKY EQU $E ;
;
;
;------------------------------------------
;
; PORT Definition
;------------------------------------------
;P_INCHG EQU P9.1 ;(OE/CHG LED, ''ON
P_SWITCH EQU P9.1
P_TEL EQU P9.0 ;(Oze control, =seize
P_PWRD EQU P8.3 ;(down '' active
P_SIGO EQU P8.2 ;(OUT, '' active
;P_BATDT EQU P8.1 ;(I1'=BAT.LOW
P_CHGIN EQU P8.0 ;(detection, =charge on
P_BATST EQU P7.3 ;(OEST LOADER, '' ON
P_CHREN EQU P7.2 ;(O enable ''active
P_LCD EQU P7.1
P_LCD1 EQU P7.0 ;not used
P_RDOON EQU P6.3
P_RDOWT EQU P6.2
P_RDODAT EQU P6.1
P_RDOCLK EQU P6.0
P_TXDAT EQU P5.3 ;( data to handset
P_LMCLK EQU P5.2 ;(602 Clock at rise edge
P_LMDAT EQU P5.1 ;(O02 data
P_LMSTB EQU P5.0 ;(O at rise edge
;used as com08~15
;
;P_DTMFE EQU P4.3 ;(OLINE enable ''active
;P_CHREN EQU P4.2 ;(O enable ''active
;P_BATST EQU P4.1 ;(OEST LOADER, '' ON
;P_7SEG EQU P4.0 ;(Ower enable ''active
P_PWBAT EQU P3.3 ;(ILOW LED '' ON
KIN3 EQU P2.3 ;(Iscan 3
KIN2 EQU P2.2 ;(Iscan 2
KIN1 EQU P2.1 ;(Iscan 1
KIN0 EQU P2.0 ;(Iscan 0
P_TXPWR EQU P1.3 ;(Oer control, :ON
P_SPK EQU P1.2 ;(IOON key ''active
P_RXDAT EQU P1.1 ;(ITA (INT1)
P_RXDAB EQU P1.0 ;(IDATA (-) (INT0)
P_BUZZ EQU P0.3
P_VOL1 EQU P0.2 ;VOLUME CONTROL
P_VOL2 EQU P0.1 ;VOLUME CONTROL
P_VOL3 EQU P0.0 ;VOLUME CONTROL
;P_BATDT EQU P3.1 ;(I1'=BAT.LOW
;P_RSTN EQU P1.2
;P_PDN EQU P0.3
;P_HRDN EQU P0.0
;P_HWRN EQU P0.1
;P_HLN EQU P0.2
;P_BPR EQU P3.0
;
;-------------------------------------------------
INCLUDE B_TBL.SRC
;
;********************************
; RESEAT *
;********************************
RESET NOP
NOP
RMD IE ; disabR INT.
RMD RSP ;REOINTER TO 23FH
ITMD 0H,SBPA
ITMD 8H,SBPB
RMD WDRST ; resD
RMD BANK ; RAM-FFF
CALL DISINT ; disat./control reg.
;
;---------------------------
; init120102]
;---------------------------
CALL CHKSWR ; COMBN0-5 ? (chk power down mode)
BR INIP01 ; YErdown WD reset)
;---
; 1st. pabnormal WD reset
;---
CALL NIODPU ; iniR./ pull-up
CALL INI_OP ; in-port
CALL INI_REG
CALL INIT_RAM
BR INIP02
INIP01
CALL INI_IO ; iniPower down)
;TTOD CALL TADPPWD ; TADANGUSSN = 0 ) [1102190702]
INIP02
CALL CLRLCD
CALL EN_RTC ; ENRTC
NOP
CALL EN_TM3 ; ENMER3
SMD IE
;TTOD CALL TADRST ; aESET [01040202]
DTSPD EQU 2-1 ; del180ms.
ITA DTSPD ; inmer
ITMD 0,PDDEB ; re-bounce count
DTS03 ATMD TMPSC0
DTS01
CALL TDLY3M ; dems.
CALL CNT30MS
CALL PDDET ; pow detector
TMD T30ACT_F ; 30now?
BR DTS04 ; ye
BR DTS01
;------------
; delay aft [18120102]
;------------
DTS04 RMD T30ACT_F
TMD T90ACT_F ; 90ow?
BR DTS02 ; yes
BR DTS01
DTS02 RMD T90ACT_F ; DONE
MTAD TMPSC0
AAI $F ; -1
BR DTS03 ; pr not Z
RMD T12ACT_F
RMD T30ACT_F
RMD TXTMUP_F
RMD TMOUT_F
CALL NIODPU ; ini DIR./ pull-up
CALL INI_OP ; in-port
CALL INI_REG
CALL CKSCLST ; CHeset SC/LSTCH
CALL WRCTL ; inL3, CKS
ITMD PDPTN3,COMBUF ; (scwn WD pattern)
; CALL INIT_RAM
;----
;TTOD CALL TADRST ; acET [01040202]
;----
; powemore [18120102]
;----
CALL UDCTL ; se option [28120001]
CALL EN_RX
CALL EN_CAS
SMD RT_MIRR ; 'nng' [12050100]
CALL CHK_RTC ; ANGUSDSA IS RIGHT
;=====================================
HANDLER1
CALL TIMEMAN
CALL CHKTXD
TMD DORXD ; DO heck ?[25060200]
CALL CHKRXD ; yes
TMD T3ACT_F ; 3m now?
LBR T3JOBS ; yes
;谀哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪目
;?LOOP WHILE DOING 3/ 1200 ms. JOB ?
;滥哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪馁
HANDLER2
TMD T12ACT_F ; 12 now?
LBR T12JOBS ; yes
HANDLER4
TMD T30ACT_F ; 30now?
LBR T30JOBS ; yes
HANDLER3
TMD T90ACT_F ; 90now?
LBR T90JOBS ; yes
HANDLER9
TMD T500MS_F ; 50 now?
LBR T500JOBS ; yes
HANDLER5
TMD T1000M_F ; 1s now?
LBR T1KJOBS ; yes
JMP HANDLER1
;
;谀哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪目
;? MAIN LOOP ?
;滥哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪馁
HANDLEL
CALL TIMEMAN
CALL CHKTXD
TMD DORXD ; DO Reck ?[25060200]
CALL CHKRXD ; YES
; ;
;--------- DETERMINE which JOB ---------
;
TMD DO3J_F ;
LBR T3JOBL ; 3ms.
;
;-----[16110000] ;
TMD DO12J_F ;
LBR T12JOBL ; 12ms.
;----- ;
TMD DO30J_F ;
LBR T30JOBL ; 30ms.
TMD DO90J_F ;
LBR T90JOBL ; 90ms.[15070104]
TMD DO500J_F ;
LBR T500JSL ; 500ms.
;
;-----[06020101] ;
;
TMD DO1KJ_F ;
LBR T1KJOBS ; 10ms.
;----- ;
JMP HANDLER1 ; go back to MAIN
;
;
T3JOBS ;
RMD T3ACT_F ; DONE
SMD DO3J_F ; 3m START
T3JOBL ;
CALL DONE3J ;
TMD DO3J_F ;
LBR HANDLEL ;
LBR HANDLER2 ; chimer in main
;谀哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
;? 500ms TASK HANDLER ?
;滥哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
T12JOBS
RMD T12ACT_F ; DONE
SMD DO12J_F ; 12START
T12JOBL
CALL DONE12J
TMD DO12J_F
LBR HANDLEL
LBR HANDLER4 ; chmer in main
;谀哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
;? 90ms TASK HANDLER ? [15070104]
;滥哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
T30JOBS
RMD T30ACT_F ; DONE
SMD DO30J_F ; 30TART
T30JOBL
CALL DONE30J
TMD DO30J_F
LBR HANDLEL
LBR HANDLER3 ; chtimer in main
;谀哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
;? 30ms TASK HANDLER ?
;滥哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
T90JOBS
RMD T90ACT_F ; DONE
SMD DO90J_F ; 90 START
T90JOBL
CALL DONE90J
TMD DO90J_F
LBR HANDLEL
LBR HANDLER9 ; chmer in main
;谀哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
;? 12ms TASK HANDLER ?[16110000]
;滥哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
T500JOBS
RMD T500MS_F ; DONE
SMD DO500J_F ; 50START
T500JSL
CALL DONE500J
TMD DO500J_F
LBR HANDLEL
LBR HANDLER5 ; chmer in main
T1KJOBS
RMD T1000M_F ; DONE
SMD DO1KJ_F ; 1000ms.LOOP START
CALL DONE1KJ
TMD DO1KJ_F
LBR HANDLEL
LBR HANDLER1 ; go back to main
DONE3J
INEMD $0,J3MOD ; =0?
LBR T3JOBS1 ; NO
;谀哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
;? 1000ms. TASK HANDLER ?
;滥哪哪哪哪哪哪哪哪哪哪哪哪哪哪哪?
T3JOBS0
TMD PLL_TX ; SET PL ? [25060201]
BR TSJSK01 ; YES
CALL CHKPLL ; NO, set1)[01040206]
TSJSK01 CALL PDDET ; power dector
CALL TMCDB ; ti rec.)
CALL MURDTM ; tiTE ready)
CALL TMPDL ; tiDIAL)
LBR INCJ3MOD
T3JOBS1
INEMD $1,J3MOD ; =1?
BR T3JOBS2 ; NO
TMD PLL_CT ; Svider ? [25060201]
CALL REFPLL ; yivider) [01040206]
;TOTTI TMD RDYDET_F ; TAD6230502]
; CALL MEASBPR ; TAD26230502]
CALL CHKTONE
BR INCJ3MOD
T3JOBS2
INEMD $2,J3MOD ; =2?
BR T3JOBS3 ; NO
TMD PLL_TX ; SETider ? [25060201]
CALL RXTXPLL2 ; yesvider) [01040206]
CALL CD_DET ; CD/detect
CALL CAS_DET ; CAStect
BR INCJ3MOD
T3JOBS3
INEMD $3,J3MOD ; =3?
BR T3JOBS4 ; NO
CALL PUSDIAL ; PUL[05120001][04030201]
CALL LINCTL ; linntrol
CALL UDPND ; updtatus[02070201]
TMD PLL_DV ; SETider ?
CALL RXTXPLL ; yesder) [01040206]
BR INCJ3MOD
T3JOBS4
INEMD $4,J3MOD ; =4?
BR END3JOB ; NO (end job)
TMD TONEDL ; TONMODE? [25060202][15070201]
BR T3JOB01 ; yes
TMD DIALING ; dia ?
BR T3JOB02 ; YES
T3JOB01
;--------
;TTOD CALL TADMAN ; TADUS
;--------
T3JOB02 TMD PLL_CT ; Sn control ?
CALL VOLPLL ; y2) [01040206]
CALL SPLLCTL ; ution control [01040206]
; CALL SPKKEY ; Seader [12070201]
BR INCJ3MOD
END3JOB
ITMD $0,J3MOD
RMD DO3J_F
RET
INCJ3MOD
MTAD J3MOD ; inOB
AAI $1
ATMD J3MOD
RET
;
;=======================================
DONE12J
INEMD $0,J12MOD ; =0?
BR T12JOBS1 ; NO
T12JOBS0
CALL TXPOTM ; timePW_ON)[04030201]
CALL MUTECTL ; mutMUTE)control [04030201]
CALL TMSCN ; timHLSCN)
CALL TMTND ; timNDIAL)
CALL TMFLS ; timNFLSH)
CALL TXPW_ON ; TX ON control [04030201]
;TTOD CALL DETRING ; TADAUS
BR IJ12MOD
T12JOBS1
INEMD $1,J12MOD ; =1?
BR T12JOBS2 ; NO
CALL SETNSC ; Sndset
CALL CHLSCN ; chcanner [14110000]
TMD DTHD_E ; DDLER enable ? [06060201]
CALL TNDIAL ; yaling [04120001]
BR IJ12MOD
T12JOBS2
INEMD $2,J12MOD ; =2?
BR END12J ; NO (END JOB)
CALL LD1OUT ; PED handler
CALL SARATAD ; s tad code [10100100]
CALL PATHON ; upAK status
;--------[27030200]
INEMD 0,TSTMODE ; =0 ?
BR IJ12MOD ; NOode active)
;--------
CALL RNGTOF ; ri [12070100][10080101]
BR IJ12MOD
END12J
ITMD $0,J12MOD
RMD DO12J_F
RET
IJ12MOD
MTAD J12MOD
AAI $1
ATMD J12MOD
RET
;===================================
DONE30J
INEMD $0,J30MOD ; =0?
BR T30JOBS1 ; NO
T30JOBS0
CALL TMMCD ; timID)
CALL TMLD1 ; timLED)
CALL TMAMU ; tim MUTE)
CALL CHGDEB ; timCHGACT)
CALL TMPAU ; timDIAL)
CALL PBATTM ; timBATLD)[16020201]
LBR IJ30MOD
T30JOBS1
INEMD $1,J30MOD ; =1?
BR T30JOBS2 ; NO
CALL KEYSCAN ; YEcanner [23010200]
;TTOD CALL SWITCH
CALL CHKLCD
CALL TSTCHK ; tetrance check [29120103]
;
CALL FUNCSET
TMD CIDRDY ; cia ready ?[10120102]
CALL CIDSEND ; YESng CID if any
;
CALL RD_DET ; rietect
LBR IJ30MOD
T30JOBS2
INEMD $2,J30MOD ; =2?
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -