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

📄 ca745.lst

📁 EM447开发的带发射的代码 CA745
💻 LST
📖 第 1 页 / 共 3 页
字号:
   243 0066 1800          	MOV     A,@0X00
   244 0067 000C          	IOW     IOCC
   245 0068 1800                  MOV	A,@0X00
   246 0069 000D          	IOW	IOCD
   247 006A 1800                  MOV	A,@0X00
   248 006B 000E          	IOW	IOCE	
   249 006C 1800          	MOV	A,@0X00
   250 006D 000F          	IOW	IOCF
   251                    
   252 006E 1811          	MOV	A,@0X11
   253 006F 0044          	MOV	FSR,A
   254 0070 181F                  MOV     A,@0X1F
   255 0071 0050                  MOV     COUNT,A
   256 0072               CLR_GENERAL_REG:			;CLEAR ALL OF THE USER'S RAM
   257 0072 00C0          	CLR	INDF
   258 0073 0544          	INC	FSR
   259 0074 05D0                  DJZ     COUNT
   260 0075 1472          	JMP	CLR_GENERAL_REG
   261 0076               CLR_GENERAL_REG_END:
   262                    
   263                    
   264 0076 00DD                  CLR     A4
   265 0077 1808                  MOV     A,@0X08
   266 0078 005C                  MOV     A3,A
   267 0079 1807                  MOV     A,@0X07
   268 007A 005B                  MOV     A2,A
   269 007B 1805                  MOV     A,@0X05
   270 007C 005A                  MOV     A1,A
   271                    
   272 007D 0010                  ENI
   273                    
   274 007E 0012                  RET
   275                    
   276                    ;********************************************************************************************
   277                    ;used: the rf data inc 1 
   278                    ;reg:
   279                    ;wrt:  ProBoy
   280                    ;date: 2001.07.03
   281                    ;*******************************************************************************************
   282 007F               lcd_dis_data:
   283 007F 00DD                  CLR             A4
   284 0080 1864                  MOV             A,@100
   285 0081 0051                  MOV             b_div,A
   286 0082 041E                  MOV             a,rf_frequ 
   287 0083 0050                  MOV             div_l,A
   288 0084 10B3                  CALL            div_8bit
   289 0085 0420                  MOV             A,l_byte
   290 0086 005C                  MOV             A3,A
   291                    
   292 0087 180A                  MOV             A,@10
   293 0088 0051                  MOV             b_div,A
   294 0089 041F                  MOV             A,yu 
   295 008A 0050                  MOV             div_l,A
   296 008B 10B3                  CALL            div_8bit
   297 008C 0420                  MOV             A,l_byte
   298 008D 005B                  MOV             A2,A   
   299 008E 041F                  MOV             A,yu
   300 008F 005A                  MOV             A1,A
   301                    
   302 0090 1805                  MOV             A,@0X05
   303 0091 039A                  ADD             A,A1
   304 0092 0001                  DAA             
   305 0093 0052                  MOV             temp,A
   306 0094 180F                  MOV             A,@0X0F
   307 0095 0292                  AND             A,temp
   308 0096 005A                  MOV             A1,A
   309 0097 18F0                  MOV             A,@0XF0
   310 0098 0292                  AND             A,temp
   311 0099 0E83                  JBS             STATUS,Z
   312 009A 055B                  INC             A2
   313                    
   314 009B 1807                  MOV             A,@0X07
   315 009C 039B                  ADD             A,A2
   316 009D 0001                  DAA             
   317 009E 0052                  MOV             temp,A
   318 009F 180F                  MOV             A,@0X0F
   319 00A0 0292                  AND             A,temp
   320 00A1 005B                  MOV             A2,A
   321 00A2 18F0                  MOV             A,@0XF0
   322 00A3 0292                  AND             A,temp
   323 00A4 0E83                  JBS             STATUS,Z
   324 00A5 055C                  INC             A3
   325                    
   326 00A6 1808                  MOV             A,@0X08
   327 00A7 039C                  ADD             A,A3
   328 00A8 0001                  DAA             
   329 00A9 0052                  MOV             temp,A
   330 00AA 180F                  MOV             A,@0X0F
   331 00AB 0292                  AND             A,temp
   332 00AC 005C                  MOV             A3,A
   333 00AD 18F0                  MOV             A,@0XF0
   334 00AE 0292                  AND             A,temp
   335 00AF 0E83                  JBS             STATUS,Z
   336 00B0 055D                  INC             A4
   337                    
   338 00B1 10C2                  CALL            LCD_Display
   339 00B2 0012                  RET
   340                    ;********************************************************************************************
   341                    ;used: the rf data inc 1 
   342                    ;reg:
   343                    ;wrt:  ProBoy
   344                    ;date: 2001.07.03
   345                    ;********************************************************************************************
   346 00B3               div_8bit:
   347 00B3 1808                  MOV             A,@0x08
   348 00B4 0052                  MOV             temp,A
   349 00B5 00E0                  CLR             l_byte  
   350 00B6 00DF                  CLR             yu  
   351 00B7 0803                  BC              STATUS,C
   352 00B8               MM:     
   353 00B8 06D0                  RLC             div_l
   354 00B9 06DF                  RLC             yu
   355 00BA 0411                  MOV             A,b_div
   356 00BB 011F                  SUB             A,yu
   357 00BC 0C03                  JBC             STATUS,C
   358 00BD 005F                  MOV             yu,A
   359 00BE 06E0                  RLC             l_byte
   360 00BF 05D2                  DJZ             temp
   361 00C0 14B8                  JMP             MM
   362 00C1 0012                  ret
   363                    ;***************************************************
   364                    ;INITIALIZE THE MCU 
   365                    ;WRITE BY MARK.PENG
   366                    ;2003-12-14
   367                    ;***************************************************
   368 00C2 0012          LCD_Display:  RET
   369 00C3 08C5                  BC              P5,SCE
   370                    
   371 00C4 0885          	BC    		P5,SCK
   372 00C5 11CE          	call		delay_2us
   373 00C6 0A45          	BS    		P5,sda
   374 00C7 11CE          	call		delay_2us
   375 00C8 0A85          	BS    		P5,SCK
   376 00C9 11CA                  call		delay_4us
   377 00CA 1840                  MOV             A,@0x40
   378 00CB 10DB                  call            _SPI_Write
   379                     
   380 00CC 1804          	MOV		A,@0x04
   381 00CD 0050          	MOV  		count,a
   382 00CE 181A          	MOV             A,@A1
   383 00CF 0040                  MOV  	        INDF,A
   384 00D0               lcd_loop:
   385 00D0 0400          	MOV		A,INDF
   386 00D1 11B1                  CALL            LCD_DATA
   387 00D2 10DB                  call            _SPI_Write
   388 00D3 0544                  INC		FSR
   389 00D4 05D0          	DJZ		count
   390 00D5 14D0          	JMP		lcd_loop
   391                          
   392 00D6 0AC5                  BS              P5,SCE
   393 00D7 11CE                  CALL            delay_2us
   394 00D8 0A85                  BS              P5,SCK
   395 00D9 0A45                  BS              P5,SDA
   396 00DA 0012                  RET
   397                    ;***************************************************
   398                    ;INITIALIZE THE MCU 
   399                    ;WRITE BY MARK.PENG
   400                    ;2003-12-14
   401                    ;***************************************************
   402 00DB               _SPI_Write:
   403 00DB 0052                  MOV  	        TEMP,A
   404 00DC 1808                  MOV		A,@0x08
   405 00DD 0050          	MOV  		count,a
   406 00DE               LOOP1:
   407 00DE 0885          	BC    		P5,SCK
   408 00DF 11CE          	call		delay_2us
   409 00E0 06D2          	RLC		TEMP
   410 00E1 0C03          	JBC   		STATUS,C
   411 00E2 0A45          	BS    		P5,sda
   412 00E3 0E03          	JBS   		STATUS,C
   413 00E4 0845          	BC    		P5,sda
   414 00E5 11CE          	call		delay_2us
   415 00E6 0A85          	BS    		P5,SCK
   416 00E7 11CA          	call		delay_4us
   417 00E8 05D0          	DJZ		count
   418 00E9 14DE          	JMP		LOOP1
   419 00EA 0012                  RET
   420                    ;**********************************************************************************
   421                    ;
   422                    ;
   423                    ;**********************************************************************************
   424 00EB               rf_frequ_data:    
   425 00EB 00E0                  CLR            AA1
   426 00EC 00DF                  CLR            AA0
   427 00ED 1820                  MOV            A,@0x20
   428 00EE 0052                  MOV            TEMP,A
   429 00EF 1808                  MOV            A,@8
   430 00F0 0050                  MOV            count,A
   431                    
   432 00F1               QQ:   
   433 00F1 0652                  RRC            TEMP
   434 00F2 0C03                  JBC            STATUS,C          
   435 00F3 1106                  CALL           ADDMULTIPLY
   436 00F4 0660                  RRC            AA1
   437 00F5 065F                  RRC            AA0
   438 00F6 05D0                  DJZ            count
   439 00F7 14F1                  JMP            QQ
   440                    
   441 00F8 186A                  MOV            A,@0X6A
   442 00F9 03DF                  ADD            AA0,A
   443 00FA 186D                  MOV            A,@0X6D
   444 00FB 0C03                  JBC            STATUS,C        
   445 00FC 1F01                  ADD            A,@1           
   446 00FD 03E0                  ADD            AA1,A
   447                          
   448 00FE 18D2                  MOV            A,@0XD2
   449 00FF 0056                  MOV            device_addr,A
   450 0100 041F                  MOV            A,AA0
   451 0101 0057                  MOV            word_addr,A
   452 0102 0420                  MOV            A,AA1
   453 0103 0058                  MOV            TXBUF,A        
   454 0104 1109                  CALL           _I2C_Write
   455 0105 0012                  RET
   456                    
   457 0106               ADDMULTIPLY:
   458 0106 041E                  MOV            A,rf_frequ
   459 0107 03E0                  ADD            AA1,A
   460 0108 0012                  RET       
   461                    ;*****************************************************************
   462                    ;
   463                    ;
   464                    ;*****************************************************************
   465 0109 0012          _I2C_Write:       ret
   466                  M 	SDA_O
       010A 0016     1     IOR  P6 ,
       010B 1A7F     1     AND A,@( 127 )
       010C 0006     1     IOW  P6 ,
   467 010D 0BC6          	BS    		P6,_sda
   468 010E 11C2          	call		delay_10us		
   469 010F 0B86          	BS    		P6,_scl
   470 0110 11C2          	call		delay_10us
   471 0111 09C6          	BC    		P6,_sda
   472 0112 11C2          	call		delay_10us
   473                    
   474 0113 1803          	MOV		A,@0x03
   475 0114 0051          	MOV  		count1,a
   476 0115               write_byte_cyc:
   477 0115 0986          	BC    		P6,_scl
   478                  M 	SDA_O
       0116 0016     1     IOR  P6 ,
       0117 1A7F     1     AND A,@( 127 )
       0118 0006     1     IOW  P6 ,

⌨️ 快捷键说明

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