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

📄 a_08_07.lst

📁 用义隆IC编写的一个玩具
💻 LST
📖 第 1 页 / 共 3 页
字号:
   219 00055 0E27          		JBS		KEY_STATE,UP_STATE
   220 00056 146F          		JMP		INT_EXIT
   221 00057 0827          		BC		KEY_STATE,UP_STATE
   222 00058 146F          		JMP		INT_EXIT
   223                     		
   224 00059               UP_ON:
   225 00059 0C26          		JBC		KEY_FLAG,UP_FLAG
   226 0005A 145D          		JMP		UP_ON1
   227 0005B 0A26          		BS		KEY_FLAG,UP_FLAG
   228 0005C 146F          		JMP		INT_EXIT
   229                     		
   230 0005D               UP_ON1:
   231 0005D 0C27          		JBC		KEY_STATE,UP_STATE
   232 0005E 1469          		JMP		UP_KEY_LONG
   233 0005F 0A27          		BS		KEY_STATE,UP_STATE
   234                     		
   235 00060               UP_DO:	
   236 00060 185A          		MOV		A,@0X5A
   237 00061 0065          		MOV		KEY_TIME,A
   238 00062 055E          		INC		MODE
   239 00063 1807          		MOV		A,@0X07
   240 00064 011E          		SUB		A,MODE
   241 00065 0E03          		JBS		STATUS,C
   242 00066 146F          		JMP		INT_EXIT
   243 00067 00DE          		CLR		MODE
   244 00068 146F          		JMP		INT_EXIT
   245                     		
   246 00069               UP_KEY_LONG:
   247 00069 01E5          		DEC		KEY_TIME
   248 0006A 0465          		MOV		KEY_TIME,KEY_TIME
   249 0006B 0E83          		JBS		STATUS,Z
   250 0006C 146F          		JMP		INT_EXIT
   251 0006D 00DE          		CLR		MODE
   252 0006E 146F          		JMP		INT_EXIT
   253                     		
   254                     		
   255                     /*		
   256                              JBS 	 PORT6,0
   257                              JMP 	 DOWN_ON
   258                     DOWN_OFF:	
   259                     		 JBS 	 FLAG01,DOWN_FLAG		
   260                     		 JMP 	 DOWN_OFF1
   261                     		 BC  	 FLAG01,DOWN_FLAG
   262                     	     JMP     EXIT_INT
   263                     
   264                     DOWN_OFF1:
   265                     		 JBS 	 FLAG01,DOWN_STATE
   266                     		 JMP      EXIT_INT	
   267                     		 BC  	 FLAG01,DOWN_STATE
   268                     		 JMP      EXIT_INT
   269                     
   270                     DOWN_ON: 
   271                            
   272                     	     JBC 	 FLAG01,DOWN_FLAG
   273                     	 	 JMP 	 DOWN_ON1	
   274                     		 BS  	 FLAG01,DOWN_FLAG
   275                     		 JMP      EXIT_INT
   276                     DOWN_ON1:
   277                     		 JBC 	 FLAG01,DOWN_STATE	
   278                     		 JMP      LONGPRESS	
   279                     		 BS  	 FLAG01,DOWN_STATE
   280                     	 	 JBS      PORT6,DOWN_KEY		;DOWN LOOP
   281                     		 JMP      $+7	
   282                              DEC      MODE			
   283                              
   284                              JBS      MODE,7	              
   285                              JMP      EXIT_INT
   286                              MOV      A,@0X06
   287                              MOV      MODE,A
   288                              JMP      EXIT_INT
   289                              
   290                              
   291                              INC      MODE			;UP LOOP
   292                              MOV      A,@0X07
   293                              SUB      A,MODE
   294                              JBC      STATUS,C	             
   295                              CLR      MODE
   296                              JMP      EXIT_INT
   297                     LONGPRESS:
   298                     
   299                              INC      TIMEON              
   300                              MOV      A,@0X80                      
   301                              SUB      A,TIMEON
   302                              JBS      STATUS,Z
   303                              JMP      EXIT_INT
   304                              CLR      TIMEON
   305                              CLR      MODE	
   306                              */	
   307                     ;*************************************************************************************
   308 0006F               INT_EXIT:
   309 0006F 1800                   MOV		A,@0X00
   310 00070 004F                   MOV		0X0F,A
   311 00071 00CF                   CLR		0X0F
   312                             ; BC		  ISR,TCIF
   313                              ;BC       ISR,1          
   314                     
   315 00072 0413          	 	 MOV      A,R4_BUF
   316 00073 0044                   MOV      RSR,A
   317                     
   318 00074 0712                   SWAPA		R3_BUF
   319 00075 0043          		 MOV		STATUS,A
   320 00076 0711          		 SWAPA		ACC_BUF  
   321                     		 
   322 00077 0013            	     RETI 
   323                     ;*************************************************************************************
   324 00078               POWERON:
   325 00078 0011                     DISI
   326                     
   327 00079 1809                     MOV       A,@0X09  
   328 0007A 0006                     IOW       P6CR
   329                                
   330 0007B 1809                     MOV       A,@0X09
   331 0007C 0046                     MOV       PORT6,A
   332                                
   333 0007D 180F                     MOV       A,@0X0F
   334 0007E 0045                     MOV       PORT5,A
   335 0007F 0005                     IOW       P5CR
   336                                
   337 00080 18FF                     MOV		A,@0XFF
   338 00081 000B                     IOW		0X0B
   339 00082 000D                     IOW		0X0D
   340                                
   341 00083 1800                     MOV		A,@0X00
   342 00084 000C                     IOW		0X0C
   343 00085 004F                     MOV		0X0F,A
   344 00086 000F                     IOW		0X0F
   345                     
   346                     ;            MOV       A,@0Xff
   347                     ;            IOW       PHCR
   348                      
   349                     
   350                                 
   351 00087 1855                      MOV      A,@0X55
   352 00088 0315                      XOR      A,POWERDOWN1
   353 00089 0E83                      JBS      STATUS,Z
   354 0008A 1494                      JMP      CLR_RAM
   355                                 
   356 0008B 18AA                      MOV      A,@0XAA
   357 0008C 0316                      XOR      A,POWERDOWN2
   358 0008D 0E83                      JBS      STATUS,Z
   359 0008E 1494                      JMP      CLR_RAM
   360                                 
   361 0008F 1818                      MOV      A,@0X18
   362 00090 0283                      AND      A,STATUS
   363 00091 1B18                      XOR      A,@0X18
   364 00092 0E83                      JBS      STATUS,Z
   365 00093 149F                      JMP      MAIN 
   366                                 
   367                      ;*************************CLR RAM **************************
   368 00094               CLR_RAM:
   369 00094 181F          		   MOV	     A,@0X1F
   370 00095 0050          		   MOV	     TEMP,A
   371 00096 1811          		   MOV 	     A,@0X11
   372 00097 0044          		   MOV	     RSR,A
   373 00098               CLR_RAM0:
   374 00098 0080          		   CLRA
   375 00099 0040          	 	   MOV	     IAR,A
   376 0009A 0544          		   INC	     RSR
   377 0009B 05D0          		   DJZ	     TEMP
   378 0009C 1498          		   JMP	     CLR_RAM0
   379 0009D 00D0          		   CLR	     TEMP
   380 0009E 00EF          		   CLR	     0X2F
   381                     ;*************************************************************
   382                     
   383 0009F               MAIN:      
   384 0009F 1855                     MOV       A,@0X55
   385 000A0 0055                     MOV       POWERDOWN1,A
   386 000A1 18AA                     MOV       A,@0XAA         
   387 000A2 0056                     MOV       POWERDOWN2,A
   388 000A3 1810                     MOV       A,@0X10
   389 000A4 0054                     MOV       SLEEPTIME,a
   390                                
   391 000A5 1801                     MOV      A,@0X01
   392 000A6 000F                     IOW      IMR
   393                               
   394 000A7 1800                     MOV      A,@0X00
   395 000A8 004F                     MOV      ISR,A
   396                                
   397 000A9 1880                     MOV      A,@0X80
   398 000AA 000E                     IOW      IOCE
   399                              
   400 000AB 1806                     MOV      A,@0X06    ;PRESCALER 256×128×2/4000=16ms
   401 000AC 0002                     CONTW
   402                              
   403 000AD 0010                     ENI
   404 000AE               LOOP:
   405 000AE 0004                     WDTC      
   406 000AF 041E                     MOV       A,MODE          
   407 000B0 03C2                     ADD       PC,A
   408 000B1 14B8          		   JMP       MODE0
   409 000B2 14E2          		   JMP       MODE1
   410 000B3 14ED          		   JMP       MODE2
   411 000B4 14F8          		   JMP       MODE3
   412 000B5 1504          		   JMP       MODE4
   413 000B6 151A          		   JMP       MODE5
   414 000B7 1553          		   JMP       MODE6
   415 000B8               MODE0:  
   416 000B8 1809                     MOV       A,@0X09
   417 000B9 0046                     MOV       PORT6,A
   418 000BA 0454                     mov       SLEEPTIME,sleeptime
   419 000BB 0E83                     jbs       status,z
   420 000BC 14AE                     jmp       loop
   421                                
   422 000BD 0011                     DISI
   423 000BE 1810                     mov       a,@0x10
   424 000BF 0054                     mov       sleeptime,a
   425                     
   426 000C0               sleepmode: 
   427 000C0 0004          		   WDTC 
   428 000C1 00C1          		   CLR		0X01         
   429 000C2 180E                     MOV       a, @0x0E
   430 000C3 0002                     CONTW 
   431                                
   432 000C4 1800                     MOV       A,@0x00         ;WDT DISABLE
   433 000C5 000E                     IOW       IOCE
   434 000C6 0446                     MOV       PORT6,PORT6      ;READ P6
   435                               
   436                     

⌨️ 快捷键说明

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