⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 main.lst

📁 153控制收音5800的源码
💻 LST
📖 第 1 页 / 共 4 页
字号:
     2            C        
     3       000C C        Rssi_MidPoint		equ		0x0c
     4            C        ;-----------------------------------------------
     5            C        ;register 02h
     6            C        ;-----------------------------------------------
     7            C        
     8       0080 C        DHIZ			equ		1<<7
     9            C        
    10       0006 C        DMUTE			equ		6
    11       0020 C        MONO			equ		1<<5
    12       0010 C        BASS			equ		1<<4
    13       0002 C        SEEKUP			equ		1<<1
    14            C        
    15       0100 C        SEEK_ENA		equ		1<<8
    16       0080 C        XTALEN			equ		1<<7
    17       0000 C        POWERUP_ENABLE		equ		0
    18            C        
    19            C        
    20            C        ;-----------------------------------------------
    21            C        ;register 03h channel
    22            C        ;-----------------------------------------------
    23       0080 C        CHANNEL_BIT7		equ		1<<7
    24       0040 C        CHANNEL_BIT6		equ		1<<6
    25       0020 C        CHANNEL_BIT5		equ		1<<5
    26       0010 C        CHANNEL_BIT4		equ		1<<4
    27       0008 C        CHANNEL_BIT3		equ		1<<3
    28       0004 C        CHANNEL_BIT2		equ		1<<2
    29       0002 C        CHANNEL_BIT1		equ		1<<1
    30       0001 C        CHANNEL_BIT0		equ		1<<0
    31            C        
    32       0004 C        SPACE_50K		equ		1<<2
    33            C        ;band=0 87.5--108mhz  1==76--91mhz
    34       0002 C        BAND			equ		1<<1
    35            C        ;step 0==100k 1==200k
    36       0001 C        STEP			equ		1<<0
    37            C        
    38            C        ;-----------------------------------------------
    39            C        ;register 05h
    40            C        ;-----------------------------------------------
    41       0080 C        INT_NORMAL_MODE		equ		1<<7
    42       0040 C        DC_OFFSET_CAL_ONETIME	equ		1<<6
    43            C        ;RSSI min=000000 max=111111
    44       0020 C        SEEKUP_TH_BIT5		equ		1<<5
    45       0010 C        SEEKUP_TH_BIT4		equ		1<<4
    46       0008 C        SEEKUP_TH_BIT3		equ		1<<3
    47       0004 C        SEEKUP_TH_BIT2		equ		1<<2
    48       0002 C        SEEKUP_TH_BIT1		equ		1<<1
    49       0001 C        SEEKUP_TH_BIT0		equ		1<<0
    50            C        ;dsp volume contron
    51       0080 C        VOLUME_DSP_BIT3		equ		1<<7
    52       0040 C        VOLUME_DSP_BIT2		equ		1<<6
    53       0020 C        VOLUME_DSP_BIT1		equ		1<<5
    54       0010 C        VOLUME_DSP_BIT0		equ		1<<4
    55            C        ;dac control min=0000 max=1111
    56       0008 C        DAC_GAIN_BIT3		equ		1<<3
    57       0004 C        DAC_GAIN_BIT2		equ		1<<2
    58       0002 C        DAC_GAIN_BIT1		equ		1<<1
    59       0001 C        DAC_GAIN_BIT0		equ		1<<0
    60            C        
    61            C        
    62            C        ;register	10h write 4c08h
    63            C        
    64            C        ;register 1bh	dsp control register and seek register
    65            C        
    66            C        
    67            C        ;-----------------------------------------------
    68            C        ;register 0ah read only
    69            C        ;-----------------------------------------------
    70       0000 C        STC			equ		1<<14
    70 00000 4000 C        STC			equ		1<<14
    71            C        ;0=success 1=fail
    72       0000 C        SEEK_FAIL		equ		1<<13
    72 00000 2000 C        SEEK_FAIL		equ		1<<13
    73       0400 C        READ_CHANNEL_BIT9	equ		1<<10
    74       0200 C        READ_CHANNEL_BIT8	equ		1<<9
    75       0100 C        STEREO			equ		1<<8
    76       0080 C        READ_CHANNEL_BIT7	equ		1<<7
    77       0040 C        READ_CHANNEL_BIT6	equ		1<<6
    78       0020 C        READ_CHANNEL_BIT5	equ		1<<5
    79       0010 C        READ_CHANNEL_BIT4	equ		1<<4
    80       0008 C        READ_CHANNEL_BIT3	equ		1<<3
    81       0004 C        READ_CHANNEL_BIT2	equ		1<<2
    82       0002 C        READ_CHANNEL_BIT1	equ		1<<1
    83       0001 C        READ_CHANNEL_BIT0	equ		1<<0
    84            C        
    85            C        ;-----------------------------------------------
    86            C        ;register 0bh rssi read only
    87            C        ;-----------------------------------------------
    88       0000 C        RSSI_5			equ		1<<13
    88 00000 2000 C        RSSI_5			equ		1<<13
    89       1000 C        RSSI_4			equ		1<<12
    90       0800 C        RSSI_3			equ		1<<11
    91       0400 C        RSSI_2			equ		1<<10
    92       0200 C        RSSI_1			equ		1<<9
    93       0100 C        RSSI_0			equ		1<<8
    94            C        
    95       0004 C        GPIO3			equ		1<<2
    96       0002 C        GPIO2			equ		1<<1
    97       0001 C        GPIO1			equ		1<<0
    98            C        
    99            C        
   100            C        
   101            C        
   102            C        
   103            C        
   104            C        
   105            C        ;-------------------------------------------------------
   106            C        ;默认值
   107            C        ;-------------------------------------------------------
   108       0000 C        FM_Default_00L		equ		0x00
   109       0000 C        FM_Default_00H		equ		0x00
   110       0000 C        FM_Default_01L		equ		0x00
   111       0000 C        FM_Default_01H		equ		0x00
   112       0081 C        FM_Default_02L		equ		0x81
   113       00D8 C        FM_Default_02H		equ		0xD8
   114       0000 C        FM_Default_03L		equ		0x00
   115       0063 C        FM_Default_03H		equ		0x63
   116       0000 C        FM_Default_04L		equ		0x00
   117       0044 C        FM_Default_04H		equ		0x44
   118       00FF C        FM_Default_05L		equ		0xFF
   119       0010 C        FM_Default_05H		equ		0x10
   120       0000 C        FM_Default_06L		equ		0x00
   121       0000 C        FM_Default_06H		equ		0x00
   122       00CD C        FM_Default_07L		equ		0xCD
   123       0000 C        FM_Default_07H		equ		0x00
   124       0096 C        FM_Default_08L		equ		0x96
   125       0000 C        FM_Default_08H		equ		0x00
   126       0020 C        FM_Default_09L		equ		0x20
   127       0000 C        FM_Default_09H		equ		0x00
   128       0063 C        FM_Default_10L		equ		0x63
   129       0041 C        FM_Default_10H		equ		0x41
   130            C        
   131            C        
   132            C        
   133            C        
   134            C        
   135       0006 C        FM_Default_11L		equ		0x06
   136       0008 C        FM_Default_11H		equ		0x08
   137       0000 C        FM_Default_12L		equ		0x00
   138       0058 C        FM_Default_12H		equ		0x58
   139       0000 C        FM_Default_13L		equ		0x00
   140       0058 C        FM_Default_13H		equ		0x58
   141       0000 C        FM_Default_14L		equ		0x00
   142       0058 C        FM_Default_14H		equ		0x58
   143       0000 C        FM_Default_15L		equ		0x00
   144       0058 C        FM_Default_15H		equ		0x58
   145       0017 C        FM_Default_16L		equ		0x17
   146       004C C        FM_Default_16H		equ		0x4C
   147       00A2 C        FM_Default_17L		equ		0xA2
   148       0020 C        FM_Default_17H		equ		0x20
   149       0000 C        FM_Default_18L		equ		0x00
   150       0000 C        FM_Default_18H		equ		0x00
   151       000F C        FM_Default_19L		equ		0x0F
   152       0000 C        FM_Default_19H		equ		0x00
   153            C        
   154            C        
   155            C        
   156            C        
   157            C        
   158       00DE C        FM_Default_20L		equ		0xDE
   159       0006 C        FM_Default_20H		equ		0x06
   160       00C0 C        FM_Default_21L		equ		0xC0
   161       00EC C        FM_Default_21H		equ		0xEC
   162       0000 C        FM_Default_22L		equ		0x00
   163       0002 C        FM_Default_22H		equ		0x02
   164       0083 C        FM_Default_23L		equ		0x83
   165       0053 C        FM_Default_23H		equ		0x53
   166       00A4 C        FM_Default_24L		equ		0xA4
   167       0095 C        FM_Default_24H		equ		0x95
   168       0048 C        FM_Default_25L		equ		0x48
   169       00E8 C        FM_Default_25H		equ		0xE8
   170       0000 C        FM_Default_26L		equ		0x00
   171       0005 C        FM_Default_26H		equ		0x05
   172       00A4 C        FM_Default_27L		equ		0xA4
   173       0000 C        FM_Default_27H		equ		0x00
   174       009B C        FM_Default_28L		equ		0x9B
   175       0088 C        FM_Default_28H		equ		0x88
   176       0084 C        FM_Default_29L		equ		0x84
   177       000D C        FM_Default_29H		equ		0x0D
   178            C        
   179            C        
   180            C        
   181            C        
   182            C        
   183       0004 C        FM_Default_30L		equ		0x04
   184       004F C        FM_Default_30H		equ		0x4F
   185       0032 C        FM_Default_31L		equ		0x32
   186       0088 C        FM_Default_31H		equ		0x88
   187       0071 C        FM_Default_32L		equ		0x71
   188       007F C        FM_Default_32H		equ		0x7F
   189       0060 C        FM_Default_33L		equ		0x60
   190       0006 C        FM_Default_33H		equ		0x06
   191       0010 C        FM_Default_34L		equ		0x10
   192       0040 C        FM_Default_34H		equ		0x40
   193       0002 C        FM_Default_35L		equ		0x02
   194       0060 C        FM_Default_35H		equ		0x60
   195       0008 C        FM_Default_36L		equ		0x08
   196       0018 C        FM_Default_36H		equ		0x18
   197       0058 C        FM_Default_37L		equ		0x58
   198       0064 C        FM_Default_37H		equ		0x64
   199       007F C        FM_Default_38L		equ		0x7F
   200       0078 C        FM_Default_38H		equ		0x78
   201       0000 C        FM_Default_39L		equ		0x00
   202       0001 C        FM_Default_39H		equ		0x01
   203            C        
   204            C        
   205            C        
   206       0040 C        FM_Default_40L		equ		0x40
   207       00C0 C        FM_Default_40H		equ		0xC0
   208       0020 C        FM_Default_41L		equ		0x20
   209       00C0 C        FM_Default_41H		equ		0xC0
   210            C        
   211       0024 C        FM_Default_42L		equ		0x24
   212       0000 C        FM_Default_42H		equ		0x00
   213       0000 C        FM_Default_43L		equ		0x00
   214       0004 C        FM_Default_43H		equ		0x04
   215       0020 C        FM_Default_44L		equ		0x20
   216       0000 C        FM_Default_44H		equ		0x00
   217            C        
   218            C        
   219            C        
   220            C        
   221            C        
   222            C        
   223            C        
   224            C        
   225            C        
   226            C        
   227            C        
   228            C        
     2            C        ;===============================================
     3            C        ;	Function:FmTune check fm Frequency 
     4            C        ;===============================================
     5 00288      C        FmTune:
     6 00288 11F0 C        	 	call		I2cStart
     7            C        
     8            C        		; Device Id : (A = I2cDevId)
     9 00289 1820 C        		mov		A,@0x20
    10 0028A 1231 C        		call 		I2cSendByte
    11 0028B 1205 C        		call		I2cGetAck
    12 0028C 0E10 C        		jbs		A_buff,ACK
    13 0028D 16A2 C        		jmp		FmTuneDone1
    14            C        
    15            C        
    16 0028E 0416 C        		mov		a,Rd5800_Reg_02H
    17 0028F 1231 C        		call 		I2cSendByte
    18 00290 1205 C        		call		I2cGetAck
    19 00291 0E10 C        		jbs		A_buff,ACK
    20 00292 16A2 C        		jmp		FmTuneDone1
    21            C        
    22 00293 0417 C        		mov		a,Rd5800_Reg_02L
    23 00294 1231 C        		call 		I2cSendByte
    24 00295 1205 C        		call		I2cGetAck
    25 00296 0E10 C        		jbs		A_buff,ACK
    26 00297 16A2 C        		jmp		FmTuneDone1
    27            C        
    28 00298 0418 C        		mov		a,Rd5800_Channel
    29 00299 1231 C        		call 		I2cSendByte
    30 0029A 1205 C        		call		I2cGetAck
    31 0029B 0E10 C        		jbs		A_buff,ACK
    32 0029C 16A2 C        		jmp		FmTuneDone1
    33            C        
    34 0029D 0419 C        		mov		a,Rd5800_Reg_03L
    35 0029E 1231 C        		call 		I2cSendByte
    36 0029F 1205 C        		call		I2cGetAck
    37 002A0 0E10 C        		jbs		A_buff,ACK
    38 002A1 16A2 C        		jmp		FmTuneDone1
    39 002A2      C        FmTuneDone1:
    40 002A2 11FA C        		call		I2cStop
    41 002A3 0410 C        		mov		A,A_buff
    42            C        	
    43 002A4 0012 C        		ret
    44            C        
    45            C        
    46            C        
    47            C        ;===============================================
    48            C        ;	Function:5800_init_I2c(I2cAddr,I2cData)
    49            C        ;===============================================
    50 002A5      C        R5800_Init_I2c:
    51 002A5 11F0 C        	 	call		I2cStart
    52            C        
    53            C        		; Device Id : (A = I2cDevId)
    54 002A6 1820 C        		mov		A,@0x20
    55 002A7 1231 C        		call 		I2cSendByte
    56 002A8 1205 C        		call		I2cGetAck
    57 002A9 0E10 C        		jbs		A_buff,ACK
    58 002AA 16BA C        		jmp		I2cWriteDone1
    59            C        
    60 002AB 1800 C        		mov		a,@0x00
    61 002AC 0053 C        		mov		I2cAddr,a
    62 002AD      C        con_init_i2c:
    63 002AD 0413 C        		mov		a,I2cAddr
    64 002AE 100B C        		call		TblFmDefault_bal
    65 002AF 1231 C        		call 		I2cSendByte
    66 002B0 1205 C        		call		I2cGetAck
    67 002B1 0E10 C        		jbs		A_buff,ACK
    68 002B2 16BA C        		jmp		I2cWriteDone1
    69            C        
    70 002B3 0553 C        		inc		I2cAddr
    71 002B4 0413 C        		mov		a,I2cAddr
    72 002B5 1D56 C        		sub		a,@0x56
    73 002B6 0E83 C        		jbs		FLAG,@Z
    74 002B7 16AD C        		jmp		con_init_i2c
    75            C        		; return true!
    76 002B8 1801 C        		mov		A,@1
    77 002B9 0000 C        		NOP
    78 002BA      C        I2cWriteDone1:
    79 002BA 11FA C        		call		I2cStop
    80 002BB 0410 C        		mov		A,A_buff
    81            C        
    82 002BC 0012 C        	ret
    83            C        
    84            C        ;===============================================
    85            C        ;	Function:SetFmMode(A=FM_MODE)
    86            C        ;===============================================	
    87            C        
    88            C        
   324                     		END
   325                     ;===============================================
   326                     ;	End of file.
   327                     ;===============================================
   328                     
  0 Error(s), 0 Warning(s), 0 User Message(s)

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -