📄 start_v2.a66
字号:
$IF (CONFIG_CS3)
; Set TCONCS3 register
_TCS3 SET (_PHD3<<5) OR (_PHC3<<3) OR (_PHB3<<2) OR (_PHA3)
_TCS3 SET _TCS3 OR (_WRPHF3<<13) OR (_RDPHF3<<11) OR (_PHE3<<6)
MOV R0,#_TCS3
MOV TCONCS3,R0
; Set ADDRSEL3 register
CALC_ADDRSEL _ADDRSEL3, _ADDR3, _SIZE3
MOV R0,#_ADDRSEL3
MOV ADDRSEL3,R0
; Set FCONCS3 register
_FCS3 SET (_BTYP3<<4) OR (_RDYMOD3<<2) OR (_RDYEN3<<1) OR (_ENCS3)
MOV R0,#_FCS3
MOV FCONCS3,R0
$ENDIF
$IF (CONFIG_CS4)
; Set TCONCS4 register
_TCS4 SET (_PHD4<<5) OR (_PHC4<<3) OR (_PHB4<<2) OR (_PHA4)
_TCS4 SET _TCS4 OR (_WRPHF4<<13) OR (_RDPHF4<<11) OR (_PHE4<<6)
MOV R0,#_TCS4
MOV TCONCS4,R0
; Set ADDRSEL4 register
CALC_ADDRSEL _ADDRSEL4, _ADDR4, _SIZE4
MOV R0,#_ADDRSEL4
MOV ADDRSEL4,R0
; Set FCONCS4 register
_FCS4 SET (_BTYP4<<4) OR (_RDYMOD4<<2) OR (_RDYEN4<<1) OR (_ENCS4)
MOV R0,#_FCS4
MOV FCONCS4,R0
$ENDIF
$IF (CONFIG_CS5)
; Set TCONCS5 register
_TCS5 SET (_PHD5<<5) OR (_PHC5<<3) OR (_PHB5<<2) OR (_PHA5)
_TCS5 SET _TCS5 OR (_WRPHF5<<13) OR (_RDPHF5<<11) OR (_PHE5<<6)
MOV R0,#_TCS5
MOV TCONCS5,R0
; Set ADDRSEL5 register
CALC_ADDRSEL _ADDRSEL5, _ADDR5, _SIZE5
MOV R0,#_ADDRSEL5
MOV ADDRSEL5,R0
; Set FCONCS5 register
_FCS5 SET (_BTYP5<<4) OR (_RDYMOD5<<2) OR (_RDYEN5<<1) OR (_ENCS5)
MOV R0,#_FCS5
MOV FCONCS5,R0
$ENDIF
$IF (CONFIG_CS6)
; Set TCONCS6 register
_TCS6 SET (_PHD6<<5) OR (_PHC6<<3) OR (_PHB6<<2) OR (_PHA6)
_TCS6 SET _TCS6 OR (_WRPHF6<<13) OR (_RDPHF6<<11) OR (_PHE6<<6)
MOV R0,#_TCS6
MOV TCONCS6,R0
; Set ADDRSEL6 register
CALC_ADDRSEL _ADDRSEL6, _ADDR6, _SIZE6
MOV R0,#_ADDRSEL6
MOV ADDRSEL6,R0
; Set FCONCS6 register
_FCS6 SET (_BTYP6<<4) OR (_RDYMOD6<<2) OR (_RDYEN6<<1) OR (_ENCS6)
MOV R0,#_FCS6
MOV FCONCS6,R0
$ENDIF
$IF (CONFIG_CS7)
; Set TCONCS7 register
_TCS7 SET (_PHD7<<5) OR (_PHC7<<3) OR (_PHB7<<2) OR (_PHA7)
_TCS7 SET _TCS7 OR (_WRPHF7<<13) OR (_RDPHF7<<11) OR (_PHE7<<6)
MOV R0,#_TCS7
MOV TCONCS7,R0
; Set ADDRSEL7 register
CALC_ADDRSEL _ADDRSEL7, _ADDR7, _SIZE7
MOV R0,#_ADDRSEL7
MOV ADDRSEL7,R0
; Set FCONCS7 register
_FCS7 SET (_BTYP7<<4) OR (_RDYMOD7<<2) OR (_RDYEN7<<1) OR (_ENCS7)
MOV R0,#_FCS7
MOV FCONCS7,R0
$ENDIF
$IF (INIT_RSTCON = 1) ; Set RSTCON register
_RSTCON SET (_ROCOFF<<5) OR (_RORMV<<4) OR (_RSTLEN)
_RSTCON SET _RSTCON OR (_RODIS<<7) OR (_ROCON<<6)
MOV R0,#_RSTCON
MOV RSTCON,R0
$ENDIF
$IF (INIT_PLLCON = 1) ; Set PLLCON register
_PLLCON SET (_PLLVB<<6) OR (_PLLIDIV<<4) OR (_PLLODIV)
_PLLCON SET _PLLCON OR (_PLLWRI<<15) OR (_PLLCTRL<<13) OR (_PLLMUL<<8)
EXTR #01H ; Extended SFR access
MOV PLLCON,#_PLLCON
$ENDIF
$IF (INIT_FOCON = 1) ; Set FOCON register
_FOCON SET (_CLKEN<<7) OR (_FORV<<8) OR (_FOSS<<14) OR (_FOEN<<15)
MOV FOCON,#_FOCON
$ENDIF
;
MOV STKUN,#SOF (_TOS) ; INITIALIZE STACK UNFL REGISTER
MOV STKOV,#SOF (_BOS+6*2) ; INITIALIZE STACK OVFL REGISTER
MOV SP,#SOF (_TOS) ; INITIALIZE STACK POINTER
MOV SPSEG,#SEG (_TOS) ; INITIALIZE STACK POINTER SEGMENT
$IF NOT TINY
EXTRN ?C_PAGEDPP0 : DATA16
EXTRN ?C_PAGEDPP1 : DATA16
EXTRN ?C_PAGEDPP2 : DATA16
$IF (DPPUSE = 1)
MOV DPP0,#?C_PAGEDPP0 ; INIT DPP0 VALUE
$ENDIF
MOV DPP1,#?C_PAGEDPP1 ; DEFAULT NEAR CONST PAGE
MOV DPP2,#?C_PAGEDPP2 ; DEFAULT NEAR DATA PAGE
$ENDIF
MOV CP,#?C_MAINREGISTERS
EINIT
MOV R0,#?C_USERSTKTOP
;------------------------------------------------------------------------------
;
; The following code is necessary to set RAM variables to 0 at start-up
; (RESET) of the C application program.
;
$IF (CLR_MEMORY = 1)
EXTRN ?C_CLRMEMSECSTART : WORD
Clr_Memory:
$IF TINY
MOV R8,#?C_CLRMEMSECSTART
JMPR cc_Z,EndClear
RepeatClear:
$IF (WATCHDOG = 1)
SRVWDT ; SERVICE WATCHDOG
$ENDIF
MOV R5,#0
MOV R2,[R8+] ; Count
JMPR cc_Z,EndClear
MOV R3,R2
MOV R4,[R8+]
JBC R2.14,ClearNear
ClearBit: MOV R3,R4
SHR R3,#3
BCLR R3.0
ADD R3,#0FD00H ; START OF BIT SPACE
MOV R5,#1
SHL R5,R4
CPL R5
AND R5,[R3]
MOV [R3],R5
ADD R4,#1
SUB R2,#1
JMPR cc_NZ,ClearBit
JMPR cc_UC,RepeatClear
ClearNear:
$IF (WATCHDOG = 1)
SRVWDT ; SERVICE WATCHDOG
$ENDIF
MOVB [R4],RL5
ADD R4,#1
SUB R2,#1
JMPR cc_NN,ClearNear
JMPR cc_UC,RepeatClear
$ELSE
MOV R9,#SEG (?C_CLRMEMSECSTART)
MOV R8,#SOF (?C_CLRMEMSECSTART)
MOV R1,R8
OR R1,R9
JMPR cc_Z,EndClear
RepeatClear:
$IF (WATCHDOG = 1)
SRVWDT ; SERVICE WATCHDOG
$ENDIF
MOV R5,#0
EXTS R9,#1
MOV R2,[R8+] ; Count
JMPR cc_Z,EndClear
MOV R3,R2
EXTS R9,#1
MOV R4,[R8+]
JBC R2.14,ClearNear
JBC R2.15,ClearFar
ClearBit: MOV R3,R4
SHR R3,#3
BCLR R3.0
ADD R3,#0FD00H ; START OF BIT SPACE
MOV R5,#1
SHL R5,R4
CPL R5
AND R5,[R3]
MOV [R3],R5
ADD R4,#1
SUB R2,#1
JMPR cc_NZ,ClearBit
JMPR cc_UC,RepeatClear
ClearFar: EXTS R9,#1
MOV R3,[R8+]
RepClearFar:
$IF (WATCHDOG = 1)
SRVWDT ; SERVICE WATCHDOG
$ENDIF
EXTP R4,#1
MOVB [R3],RL5
ADD R3,#1
ADDC R4,#0
OR R3,#0C000H
SUB R2,#1
JMPR cc_NN,RepClearFar
JMPR cc_UC,RepeatClear
ClearNear:
$IF (WATCHDOG = 1)
SRVWDT ; SERVICE WATCHDOG
$ENDIF
MOVB [R4],RL5
ADD R4,#1
SUB R2,#1
JMPR cc_NN,ClearNear
JMPR cc_UC,RepeatClear
$ENDIF
EndClear:
$ENDIF
;------------------------------------------------------------------------------
;
; The following code is necessary, if the application program contains
; initialized variables at file level.
;
$IF (INIT_VARS = 1) ; *********************************************************
EXTRN ?C_INITSECSTART : WORD
Init_Vars:
$IF TINY ; ********************************************************************
MOV R8,#?C_INITSECSTART
RepeatInit:
$IF (WATCHDOG = 1)
SRVWDT ; SERVICE WATCHDOG
$ENDIF
MOV R2,[R8+]
JMPR cc_Z,EndInit
JBC R2.15,InitBit
MOV R4,R2
AND R2,#3FFFH
JMPR cc_NZ,LenLoad
MOV R4,#0
MOV R2,[R8+]
LenLoad: MOV R3,[R8+]
CopyInitVal: MOVB [R3],[R8+]
$IF (WATCHDOG = 1)
SRVWDT ; SERVICE WATCHDOG
$ENDIF
ADD R3,#1
SUB R2,#1
JMPR cc_NZ,CopyInitVal
JNB R8.0,RepeatInit
ADD R8,#1
JMPR cc_UC,RepeatInit
InitBit: MOVBZ R3,RL2
SHL R3,#1
OR R3,#0FD00H ; START OF BIT SPACE
MOV R4,#1
MOVB RL5,RH2
SHL R4,R5 ; CALCULATE BIT MASK
JB R2.7,SetBit
CPL R4 ; CLEAR BIT
AND R4,[R3]
JMPR cc_UC,StoreBit
SetBit: OR R4,[R3] ; SET BIT
StoreBit: MOV [R3],R4
JMPR cc_UC,RepeatInit
EndInit:
$ELSE ; $IF TINY **************************************************************
MOV R9,#SEG (?C_INITSECSTART)
MOV R8,#SOF (?C_INITSECSTART)
$IF (DPP3USE = 1) ; ***********************************************************
RepeatInit:
$IF (WATCHDOG = 1)
SRVWDT ; SERVICE WATCHDOG
$ENDIF
MOV DPP3,#3
EXTS R9,#1
MOV R2,[R8]
JMPR cc_Z,EndInit
ADD R8,#2
ADDC R9,#0
JBC R2.15,InitBit
MOV R4,R2
AND R2,#3FFFH
JMPR cc_NZ,LenLoad
MOV R4,#0
EXTS R9,#1
MOV R2,[R8]
ADD R8,#2
ADDC R9,#0
LenLoad: EXTS R9,#1
MOV R3,[R8]
ADD R8,#2
ADDC R9,#0
JB R4.14,CopyInitVal
MOV DPP3,R3
EXTS R9,#1
MOV R3,[R8]
ADD R8,#2
ADDC R9,#0
CopyInitVal: EXTS ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -