📄 rke_tianqiu_630.lst
字号:
00077
007E 01BC 00078 clrf Frame_Buff9
007F 01BB 00079 clrf Frame_Buff8
0080 01BA 00080 clrf Frame_Buff7
0081 01B9 00081 clrf Frame_Buff6
0082 01B8 00082 clrf Frame_Buff5
0083 01B7 00083 clrf Frame_Buff4
0084 01B6 00084 clrf Frame_Buff3
0085 01B5 00085 clrf Frame_Buff2
0086 01B4 00086 clrf Frame_Buff1
00087
0087 00088 Preamble_Counter_Clr:
0087 01C0 00089 clrf Preamble_Counter
0088 00090 Preamble_Clr:
0088 01BF 00091 clrf Preamble_High_Counter
0089 01BE 00092 clrf Preamble_Low_Counter
008A 00093 Recieve_High_Jump:
008A 0ABF 00094 incf Preamble_High_Counter,F
008B 28C3 00095 goto Interrupt_Over
MPASM 03.70 Released RKE_TIANQIU_630.ASM 12-7-2006 8:36:22 PAGE 10
LOC OBJECT CODE LINE SOURCE TEXT
VALUE
00096
00097 ;==========================================================
00098
008C 00099 Get_Frame_Begin:
008C 1805 00100 btfsc RECIEVE_PORT
008D 2891 00101 goto Get_Frame_Port_High
00102
008E 00103 Get_Frame_Port_Low:
008E 0ABE 00104 incf Preamble_Low_Counter,F
008F 16BD 00105 bsf PASS_LOW
0090 28B2 00106 goto Get_Frame_Over
00107
0091 00108 Get_Frame_Port_High:
0091 1EBD 00109 btfss PASS_LOW
0092 28B0 00110 goto Get_Frame_High_Jump
00111
0093 083F 00112 movf Preamble_High_Counter,W
0094 07BE 00113 addwf Preamble_Low_Counter,F
00114
0095 300C 00115 movlw d'12'
0096 023E 00116 subwf Preamble_Low_Counter,W
0097 1C03 00117 skpc
0098 28B2 00118 goto Get_Frame_Over
00119
0099 3016 00120 movlw d'22'
009A 023E 00121 subwf Preamble_Low_Counter,W
009B 1803 00122 skpnc
009C 28B2 00123 goto Get_Frame_Over
00124
009D 12BD 00125 bcf PASS_LOW
00126
009E 13BC 00127 bcf Frame_Buff9,7
009F 3008 00128 movlw d'8'
00A0 023F 00129 subwf Preamble_High_Counter,W
00A1 1C03 00130 skpc
00A2 17BC 00131 bsf Frame_Buff9,7
00132
00A3 20C4 00133 call Recieve_Buff_RRF
00134
00A4 01BF 00135 clrf Preamble_High_Counter
00A5 01BE 00136 clrf Preamble_Low_Counter
00137
00A6 0BC1 00138 decfsz Frame_Bit_Counter,F
00A7 28B0 00139 goto Get_Frame_High_Jump
00140
00A8 20C4 00141 call Recieve_Buff_RRF
00A9 20C4 00142 call Recieve_Buff_RRF
00AA 20C4 00143 call Recieve_Buff_RRF
00AB 20C4 00144 call Recieve_Buff_RRF
00AC 20C4 00145 call Recieve_Buff_RRF
00AD 20C4 00146 call Recieve_Buff_RRF
00147
00AE 13BD 00148 bcf RF_FRAME_RECIEVE
MPASM 03.70 Released RKE_TIANQIU_630.ASM 12-7-2006 8:36:22 PAGE 11
LOC OBJECT CODE LINE SOURCE TEXT
VALUE
00149
00AF 173D 00150 bsf RF_FRAME_GET
00151
00B0 00152 Get_Frame_High_Jump:
00B0 0ABF 00153 incf Preamble_High_Counter,F
00B1 28B2 00154 goto Get_Frame_Over
00155
00B2 00156 Get_Frame_Over:
00B2 28C3 00157 goto Interrupt_Over
00158
00159
00B3 00160 TMR0_Interrupt_Over:
00161
00162 ;^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
00163
00B3 1C0C 00164 btfss PIR1,TMR1IF
00B4 28BC 00165 goto TMR1_Interrupt_Over
00B5 100C 00166 bcf PIR1,TMR1IF
00167
00B6 309E 00168 movlw d'158'
00B7 078F 00169 addwf TMR1H,F
00B8 3058 00170 movlw d'88'
00B9 078E 00171 addwf TMR1L,F
00172
00BA 14BD 00173 bsf MAIN_CHECK
00174
00BB 28C3 00175 goto Interrupt_Over
00BC 00176 TMR1_Interrupt_Over:
00177
00178 ;==========================================================
00179
00BC 30E0 00180 movlw b'11100000'
00BD 058B 00181 andwf INTCON,F
00BE 018C 00182 clrf PIR1
00183
00BF 1683 00184 bsf STATUS,RP0
00C0 3003 00185 movlw b'00000011'
00C1 008C 00186 movwf PIE1
00C2 1283 00187 bcf STATUS,RP0
00188
00189 ;**********************************************************
00190 ;Interrupt over
00191 ;**********************************************************
00192
00C3 00193 Interrupt_Over:
00C3 0008 00194 return
00195
00196
00197 ;**********************************************************
00198 ;**********************************************************
00C4 00199 Recieve_Buff_RRF:
00C4 0CBC 00200 rrf Frame_Buff9,F
00C5 0CBB 00201 rrf Frame_Buff8,F
MPASM 03.70 Released RKE_TIANQIU_630.ASM 12-7-2006 8:36:22 PAGE 12
LOC OBJECT CODE LINE SOURCE TEXT
VALUE
00C6 0CBA 00202 rrf Frame_Buff7,F
00C7 0CB9 00203 rrf Frame_Buff6,F
00C8 0CB8 00204 rrf Frame_Buff5,F
00C9 0CB7 00205 rrf Frame_Buff4,F
00CA 0CB6 00206 rrf Frame_Buff3,F
00CB 0CB5 00207 rrf Frame_Buff2,F
00CC 0CB4 00208 rrf Frame_Buff1,F
00CD 0008 00209 return
00046
00CE 00047 main
00048 ;**********************************************************
00049 ;Alex codes are from here.
00050 ;**********************************************************
00CE 20D2 00051 call Register_Initiate
00052
00CF 00053 Main_Loop:
00CF 20F6 00054 call Register_Sure
00055
00D0 2145 00056 call Key_Deal
00057
00D1 28CF 00058 goto Main_Loop
00059
00060 ;**********************************************************
00061 ;Sub-Function are here
00062 ;**********************************************************
00063 #include "Ini_Sure.inc"
00001 ;#####################################
00002 ;Sub-Function-1: Intitate
00003 ;#####################################
00D2 00004 Register_Initiate:
00005 ;--------------------------------------------------
00006 ;SFR initiate
00007 ;--------------------------------------------------
00D2 1283 1303 00008 banksel PORTA
00D4 0185 00009 clrf PORTA
00010
00011 ;------------------------------
00012
00D5 1683 00013 bsf STATUS,RP0
00D6 308F 00014 movlw b'10001111'
00D7 0081 00015 movwf OPTION_REG
00016
00017 ; movlw b'00001011'
00018 ; movwf TRISA
00D8 300B 00019 movlw b'00001011'
00D9 0085 00020 movwf TRISA
00DA 3003 00021 movlw b'00000011'
00DB 0087 00022 movwf TRISC
00023
00DC 3001 00024 movlw b'00000001'
00DD 008C 00025 movwf PIE1
00026
00DE 23FF 00027 call 0x3FF
MPASM 03.70 Released RKE_TIANQIU_630.ASM 12-7-2006 8:36:22 PAGE 13
LOC OBJECT CODE LINE SOURCE TEXT
VALUE
00DF 0090 00028 movwf OSCCAL
00029
00E0 3000 00030 movlw b'00000000'
00E1 0095 00031 movwf WPU
00E2 0196 00032 clrf IOC
00E3 0199 00033 clrf VRCON
00034
00035 ; clrf ANSEL
00036
00037 ;--------------------------------------
00038
00E4 1283 00039 bcf STATUS,RP0
00E5 3007 00040 movlw b'00000111'
00E6 0099 00041 movwf CMCON
00042
00E7 3005 00043 movlw b'00000101'
00E8 0090 00044 movwf T1CON
00045
00E9 0185 00046 clrf PORTA
00EA 0187 00047 clrf PORTC
00048
00049 ; clrf ADCON0
00050
00051 ;--------------------------------------------------
00052 ;GPR initiate
00053 ;--------------------------------------------------
00054
00EB 3020 00055 movlw w_temp
00EC 0084 00056 movwf FSR
00ED 00057 Initaite_Clr_Loop:
00ED 0180 00058 clrf INDF
00EE 0A84 00059 incf FSR,F
00EF 0304 00060 decf FSR,W
00F0 3C5D 00061 sublw End_Register
00F1 1D03 00062 skpz
00F2 28ED 00063 goto Initaite_Clr_Loop
00064
00F3 30E0 00065 movlw b'11100000'
00F4 008B 00066 movwf INTCON
00067
00F5 0008 00068 return
00069
00070 ;#####################################
00071 ;Sub-Function-2: Sure
00072 ;#####################################
00073
00F6 00074 Register_Sure:
00F6 0064 00075 clrwdt
00076
00F7 1683 1303 00077 banksel OPTION_REG
00F9 308F 00078 movlw b'10001111'
00FA 0081 00079 movwf OPTION_REG
00080
MPASM 03.70 Released RKE_TIANQIU_630.ASM 12-7-2006 8:36:22 PAGE 14
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -