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

📄 uvi_4245 nov 08 08.lst

📁 一个测试紫外钱的程序源码
💻 LST
📖 第 1 页 / 共 4 页
字号:
   322 0005D 1C00          		RETL		@0X00
   323 0005E 1C09          		RETL		@0X09		;7		;9
   324 0005F 1C00          		RETL		@0X00
   325 00060 1C1A          		RETL		@0X1A				;26
   326                     		
   327 00061 1C00          		RETL		@0X00
   328 00062 1C08          		RETL		@0X08		;8		;8
   329 00063 1C00          		RETL		@0X00
   330 00064 1C17          		RETL		@0X17				;23
   331                     		
   332 00065 1C00          		RETL		@0X00
   333 00066 1C07          		RETL		@0X07		;9		;7
   334 00067 1C00          		RETL		@0X00
   335 00068 1C14          		RETL		@0X14				;20
   336                     		
   337 00069 1C00          		RETL		@0X00
   338 0006A 1C06          		RETL		@0X06		;10		;6
   339 0006B 1C00          		RETL		@0X00
   340 0006C 1C12          		RETL		@0X12				;18
   341                     		
   342 0006D 1C00          		RETL		@0X00
   343 0006E 1C05          		RETL		@0X05		;11		;5
   344 0006F 1C00          		RETL		@0X00
   345 00070 1C10          		RETL		@0X10				;16
   346                     		
   347 00071 1C00          		RETL		@0X00
   348 00072 1C05          		RETL		@0X05		;12		;5
   349 00073 1C00          		RETL		@0X00
   350 00074 1C0F          		RETL		@0X0F				;15
   351                     		
   352 00075 1C00          		RETL		@0X00
   353 00076 1C05          		RETL		@0X05		;13		;5
   354 00077 1C00          		RETL		@0X00
   355 00078 1C0E          		RETL		@0X0E				;14
   356                     		
   357 00079 1C00          		RETL		@0X00
   358 0007A 1C04          		RETL		@0X04		;14		;4
   359 0007B 1C00          		RETL		@0X00
   360 0007C 1C0D          		RETL		@0X0D				;13
   361                     		
   362 0007D 1C00          		RETL		@0X00
   363 0007E 1C04          		RETL		@0X04		;15		;4
   364 0007F 1C00          		RETL		@0X00
   365 00080 1C0C          		RETL		@0X0C				;12
   366                     		
   367 00081 1C00          		RETL		@0X00
   368 00082 1C03          		RETL		@0X03		;16		;3
   369 00083 1C00          		RETL		@0X00
   370 00084 1C0B          		RETL		@0X0B				;11
   371                     		
   372 00085 1C00          		RETL		@0X00
   373 00086 1C03          		RETL		@0X03		;17		;3
   374 00087 1C00          		RETL		@0X00
   375 00088 1C0A          		RETL		@0X0A				;10
   376                     		
   377 00089 1C00          		RETL		@0X00
   378 0008A 1C03          		RETL		@0X03		;18		;3
   379 0008B 1C00          		RETL		@0X00
   380 0008C 1C09          		RETL		@0X09				;9
   381                     		
   382 0008D 1C00          		RETL		@0X00
   383 0008E 1C03          		RETL		@0X03		;19		;3
   384 0008F 1C00          		RETL		@0X00
   385 00090 1C08          		RETL		@0X08				;8
   386                     		
   387 00091 1C00          		RETL		@0X00
   388 00092 1C02          		RETL		@0X02		;20		;2
   389 00093 1C00          		RETL		@0X00
   390 00094 1C07          		RETL		@0X07				;7
   391                     		
   392 00095 1C00          		RETL		@0X00
   393 00096 1C02          		RETL		@0X02		;21		;2
   394 00097 1C00          		RETL		@0X00
   395 00098 1C06          		RETL		@0X06				;6
   396                     		
   397 00099 1C00          		RETL		@0X00
   398 0009A 1C02          		RETL		@0X02		;22
   399 0009B 1C00          		RETL		@0X00
   400 0009C 1C05          		RETL		@0X05
   401                     		
   402 0009D 1C00          		RETL		@0X00
   403 0009E 1C02          		RETL		@0X02		;23
   404 0009F 1C00          		RETL		@0X00
   405 000A0 1C04          		RETL		@0X04
   406                     		
   407 000A1 1C00          		RETL		@0X00
   408 000A2 1C02          		RETL		@0X02		;24
   409 000A3 1C00          		RETL		@0X00
   410 000A4 1C03          		RETL		@0X03
   411                     		
   412 000A5 1C00          		RETL		@0X00
   413 000A6 1C01          		RETL		@0X01		;25
   414 000A7 1C00          		RETL		@0X00
   415 000A8 1C02          		RETL		@0X02
   416                     		
   417                     		
   418 000A9 1C00          		RETL		@0X00
   419 000AA 1C01          		RETL		@0X01		;26
   420 000AB 1C00          		RETL		@0X00
   421 000AC 1C01          		RETL		@0X01
   422                     		
   423                     		
   424                     		
   425                     		
   426                      	 
   427                     ;============================================     
   428                     	
   429 000AD               DAY_LOOKUP:   
   430 000AD 03C2           	   	ADD      	PC,A    
   431 000AE 1C1F          		RETL     	@0X1F    ;0  31
   432 000AF 1C20              	RETL     	@0X20    ;1  32
   433 000B0 1C1D              	RETL     	@0X1D    ;2  29
   434 000B1 1C20              	RETL     	@0X20    ;3  32
   435 000B2 1C1F              	RETL     	@0X1F    ;4  31
   436 000B3 1C20              	RETL     	@0X20    ;5  32
   437 000B4 1C1F              	RETL     	@0X1F    ;6  31
   438 000B5 1C20              	RETL     	@0X20    ;7  32
   439 000B6 1C20              	RETL     	@0X20    ;8  32
   440 000B7 1C1F              	RETL     	@0X1F    ;9  31
   441 000B8 1C20              	RETL     	@0X20    ;10 32
   442 000B9 1C1F              	RETL     	@0X1F    ;11 31
   443 000BA 1C20          	    RETL     	@0X20    ;12 32
   444                       
   445                     ;============================================ 
   446                     ;OK COM: 00 XXXXX
   447                     ;============================================ 
   448                     
   449 000BB               COM_RAM:
   450 000BB 1E00               	BANK		0
   451 000BC 1808          	    MOV     	A,@0X08   ;8
   452 000BD 0060               	MOV      	LCDCOUNT,A
   453 000BE 1E01               	BANK		1
   454 000BF 1807               	MOV      	A,@0X07   ;SEG7-SEG0
   455 000C0 0046               	MOV      	LCDAR,A
   456                          
   457 000C1               COM_RAM1:
   458 000C1 1E00               	BANK		0
   459 000C2 00D0               	CLR      	TEMP1
   460 000C3 0661               	RRC      	COM0BUF  ;RLC
   461 000C4 06D0               	RLC      	TEMP1
   462 000C5 0662               	RRC      	COM1BUF  ;RLC
   463 000C6 06D0               	RLC      	TEMP1
   464 000C7 0663               	RRC      	COM2BUF  ;RLC
   465 000C8 06D0               	RLC      	TEMP1
   466 000C9 0664               	RRC      	COM3BUF  ;RLC
   467 000CA 06D0               	RLC      	TEMP1
   468 000CB 0410               	MOV      	A,TEMP1
   469                           
   470 000CC 1E01               	BANK		1
   471 000CD 0047               	MOV      	LCDBR,A
   472 000CE 01C6               	DEC      	LCDAR   ;DEC  LCDAR
   473 000CF 1E00               	BANK		0
   474 000D0 05E0               	DJZ      	LCDCOUNT
   475 000D1 1EB0               	LJMP      	COM_RAM1
   475 000D2 00C1               	LJMP      	COM_RAM1
   476                             
   477 000D3 1E01                  BANK		1
   478 000D4 0BC5                  BS			LCDCR,LCDEN 
   479 000D5 0012               	RET      
   480                     
   481                     ;============================================     
   482                     ;OK G E F D B C A 0
   483                     ;============================================  
   484                     
   485 000D6               SEG_COM:
   486 000D6 1E00               	BANK		0
   487 000D7 1801              	MOV      	A,@0X01	;小数点
   488 000D8 0050               	MOV      	TEMP1,A
   489 000D9 1840               	MOV			A,@0X40	;PM
   490 000DA 0051               	MOV			TEMP2,A
   491                          	
   492 000DB 0412               	MOV      	A,DIS1
   493 000DC 1EA0               	LCALL     	LOOKUP
   493 000DD 0113               	LCALL     	LOOKUP
   494 000DE 0C16              	JBC     	FLAG,FDOTDIS
   495 000DF 0210               	OR      	A,TEMP1
   496 000E0 0C56               	JBC			FLAG,FPMDIS
   497 000E1 0211               	OR			A,TEMP2
   498 000E2 1EA0               	LCALL     	SEG_COM1
   498 000E3 0100               	LCALL     	SEG_COM1
   499                          
   500 000E4 1801               	MOV      	A,@0X01
   501 000E5 0050               	MOV      	TEMP1,A
   502 000E6 0413               	MOV      	A,DIS2
   503 000E7 1EA0               	LCALL     	LOOKUP
   503 000E8 0113               	LCALL     	LOOKUP
   504 000E9 0D16               	JBC      	FLAG,FCOLDIS
   505 000EA 0210               	OR       	A,TEMP1
   506 000EB 1EA0               	LCALL     	SEG_COM1 
   506 000EC 0100               	LCALL     	SEG_COM1 
   507                          	
   508 000ED 1801               	MOV			A,@0X01
   509 000EE 0050               	MOV			TEMP1,A
   510 000EF 0414               	MOV      	A,DIS3
   511 000F0 1EA0               	LCALL     	LOOKUP
   511 000F1 0113               	LCALL     	LOOKUP
   512 000F2 0CD6               	JBC			FLAG,FDDIS
   513 000F3 0210               	OR			A,TEMP1
   514 000F4 1EA0               	LCALL     	SEG_COM1
   514 000F5 0100               	LCALL     	SEG_COM1
   515                        
   516 000F6 1801               	MOV      	A,@0X01
   517 000F7 0050               	MOV      	TEMP1,A  
   518 000F8 0415               	MOV      	A,DIS4
   519 000F9 1EA0               	LCALL     	LOOKUP
   519 000FA 0113               	LCALL     	LOOKUP
   520 000FB 0C96               	JBC      	FLAG,FBATDIS
   521 000FC 0210               	OR       	A,TEMP1
   522 000FD 1EA0               	LCALL     	SEG_COM1
   522 000FE 0100               	LCALL     	SEG_COM1
   523 000FF 0012               	RET
   524                           
   525 00100               SEG_COM1:    
   526 00100 1E00               	BANK		0
   527 00101 0050               	MOV      	TEMP1,A
   528 00102 06D0               	RLC      	TEMP1
   529 00103 06E4               	RLC      	COM3BUF
   530 00104 06D0               	RLC      	TEMP1
   531 00105 06E3               	RLC      	COM2BUF
   532 00106 06D0               	RLC      	TEMP1
   533 00107 06E2               	RLC      	COM1BUF
   534 00108 06D0               	RLC      	TEMP1
   535 00109 06E1               	RLC      	COM0BUF
   536 0010A 06D0               	RLC      	TEMP1
   537 0010B 06E4               	RLC     	COM3BUF
   538 0010C 06D0               	RLC      	TEMP1
   539 0010D 06E3               	RLC      	COM2BUF
   540 0010E 06D0               	RLC      	TEMP1
   541 0010F 06E2               	RLC      	COM1BUF
   542 00110 06D0               	RLC      	TEMP1
   543 00111 06E1               	RLC      	COM0BUF
   544 00112 0012               	RET
   545                          
   546 00113                LOOKUP:			;A,F,E,D,B,G,C,0
   547 00113 03C2               	ADD      	PC,A    
   548 00114 1CFA               	RETL     	@0XFA    ;0
   549 00115 1C0A               	RETL     	@0X0A    ;1
   550 00116 1CBC               	RETL     	@0XBC    ;2
   551 00117 1C9E               	RETL     	@0X9E    ;3
   552 00118 1C4E               	RETL     	@0X4E    ;4
   553 00119 1CD6               	RETL     	@0XD6    ;5
   554 0011A 1CF6               	RETL     	@0XF6    ;6
   555 0011B 1C8A               	RETL     	@0X8A    ;7
   556 0011C 1CFE               	RETL     	@0XFE    ;8
   557 0011D 1CDE               	RETL     	@0XDE    ;9
   558 0011E 1C00               	RETL     	@0X00    ;A NULL
   559                          
   560 0011F 1C6E               	RETL     	@0X6E    ;B H  0807
   561 00120 1C60               	RETL     	@0X60    ;C I  0807
   562 00121 1C6E               	RETL		@0X6E	 ;D	H
   563                          
   564                     
   565                     
   566                     
   567                     
   568                     ;=====================================================================INITIAL
   569                     
   570                     ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&I/O BANK4
   571 00122               RESET:
   572 00122 0011          		DISI
   573 00123 1E04          		BANK		4
   574 00124 1804          		MOV			A,@0X04
   575 00125 0047          		MOV			IOC7,A		;P72 UP
   576 00126 18A2          		MOV			A,@0XA2
   577 00127 0048          		MOV			IOC8,A		;P86 POWER
   578 00128 1809          		MOV			A,@0X09
   579 00129 0049          		MOV			IOC9,A		;P90,P93 2.5V,VS
   580 0012A 1800          		MOV			A,@0X00
   581 0012B 004A          		MOV			IOCA,A
   582 0012C 180C          		MOV			A,@0X0C
   583 0012D 004B          		MOV			IOCB,A
   584 0012E 180C          		MOV			A,@0X0C
   585 0012F 004C          		MOV			IOCC,A
   586                     		
   587                     		
   588 00130 1800          		MOV			A,@0X00
   589 00131 0045          		MOV			LEDDCR,A
   590 00132 1803          		MOV			A,@0X03
   591 00133 0046          		MOV			WBCR,A		;BUZ=0 4K		 WATCH TIME
   592 00134 18C0          		MOV			A,@0XC0
   593 00135 004F          		MOV			WKCR,A		;中断唤醒 int7,6
   594                     		
   595                     ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&BANK0
   596                     
   597 00136 1E00          		BANK		0
   598 00137 1838          		MOV			A,@0X38
   599 00138 0041          		MOV			TCC,A
   600 00139 1800          		MOV			A,@0X00
   601 0013A 0043          		MOV			STATUS,A
   602 0013B 18FF          		MOV			A,@0XFF
   603 0013C 0044          		MOV			R4,A		;BANK 控制位
   604                     		
   605 0013D 1804          		MOV			A,@0X04
   606 0013E 0047          		MOV			PORT7,A
   607 0013F 18E2          		MOV			A,@0XE2
   608 00140 0048          		MOV			PORT8,A		;关闭uvi检测
   609 00141 1809          		MOV			A,@0X09
   610 00142 0049          		MOV			PORT9,A
   611 00143 1800          		MOV			A,@0X00
   612 00144 004A          		MOV			PORTA,A
   613 00145 180C          		MOV			A,@0X0C
   614 00146 004B          		MOV			PORTB,A
   615                     		
   616                     		
   617 00147 1809          		MOV			A,@0X09
   618 00148 004C          		MOV			SCCR,A		;idle=1 主频3.997M PLL
   619 00149 180A          		MOV			A,@0X0A
   620 0014A 004D          		MOV			TWTCR,A		;看门狗,TCC 8分频 32.768k
   621 0014B 1881          		MOV			A,@0X81
   622 0014C 004E          		MOV			IMR,A		;中断屏蔽寄存器
   623 0014D 1800          		MOV			A,@0X00
   624 0014E 004F          		MOV			ISR,A		;中断标志
   625                     		
   626                     ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&BANK1
   627                     	
   628 0014F 1E01          		BANK		1
   629 00150 1898          		MOV			A,@0X98
   630 00151 0045          		MOV			LCDCR,A		;1/3BIAS 1/4 DUTY FCLK=64 LCD控制器
   631 00152 1819          		MOV			A,@0X19		;仿真时选0.3VDD-VDD
   632 00153 0048          		MOV			LCDVCR,A	;LCD电压及时钟	2M,0-VDD
   633 00154 180F          		MOV			A,@0X0F
   634 00155 0049          		MOV			LCDCCR,A	;COM0-3		COM选择
   635 00156 18FF          		MOV			A,@0XFF
   636 00157 004A          		MOV			LCDSCR0,A	;SEG0-7
   637 00158 1800          		MOV			A,@0X00
   638 00159 004B          		MOV			LCDSCR1,A
   639 0015A 004C          		MOV			LCDSCR2,A	;SEGMENT选择
   640 0015B 18C0          		MOV			A,@0XC0
   641 0015C 004E          		MOV			EIMR,A		;外部中断屏蔽寄存器 int7,6
   642 0015D 1800          		MOV			A,@0X00
   643 0015E 004F          		MOV			EISR,A

⌨️ 快捷键说明

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