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

📄 main.lis

📁 要用到开发工具SD-H08
💻 LIS
📖 第 1 页 / 共 3 页
字号:
 01F9 E603              lda 3,X
 01FB AB01              add #1
 01FD E703              sta 3,X
 01FF E602              lda 2,X
 0201 A900              adc #0
 0203 E702              sta 2,X
 0205 E603              lda 3,X
 0207 B700              sta *__r1
 0209 E602              lda 2,X
 020B B700              sta *__r0
 020D 5500              ldhx *__r0
 020F 650008            cphx #8
 0212 95                tsx
 0213 919E              blt L45
 0215           ;                       }
 0215           ;                       light_a=0xff;
 0215 A6FF              lda #-1
 0217 B700              sta 0
 0219           ;                          for(lk=0;lk<512;lk++)
 0219 6F07              clr 7,X
 021B 6F06              clr 6,X
 021D           L55:
 021D CD05EF            jsr _Delay1000
 0220 95                tsx
 0221           L56:
 0221 E607              lda 7,X
 0223 AB01              add #1
 0225 E707              sta 7,X
 0227 E606              lda 6,X
 0229 A900              adc #0
 022B E706              sta 6,X
 022D E607              lda 7,X
 022F B700              sta *__r1
 0231 E606              lda 6,X
 0233 B700              sta *__r0
 0235 5500              ldhx *__r0
 0237 650200            cphx #512
 023A 95                tsx
 023B 91E0              blt L55
 023D           ;                       Delay1000();
 023D           ;                       for(i=0;i<8;i++)
 023D 6F03              clr 3,X
 023F 6F02              clr 2,X
 0241           L59:
 0241           ;             		{if((ReSendStatusR & (1<<ReTestBit))==0)
 0241 0A1643            brset #5,0x16,L63
 0244           ;                               {
 0244           ;                               light_a=(0xff)^(0xc0>>i);
 0244 6E0000            mov #0,*__r0
 0247 6EC000            mov #-64,*__r1
 024A E603              lda 3,X
 024C A40F              and #15
 024E 2706              beq X8
 0250           X7:
 0250 3700              asr *__r0
 0252 3600              ror *__r1
 0254 4BFA              dbnza X7
 0256           X8:
 0256 B600              lda *__r1
 0258 A8FF              eor #-1
 025A B700              sta *__r1
 025C B600              lda *__r0
 025E A800              eor #0
 0260 4E0000            mov *__r1,0
 0263           ;                               for(lk=0;lk<512;lk++)
 0263 6F07              clr 7,X
 0265 6F06              clr 6,X
 0267           L65:
 0267 CD05EF            jsr _Delay1000
 026A 95                tsx
 026B           L66:
 026B E607              lda 7,X
 026D AB01              add #1
 026F E707              sta 7,X
 0271 E606              lda 6,X
 0273 A900              adc #0
 0275 E706              sta 6,X
 0277 E607              lda 7,X
 0279 B700              sta *__r1
 027B E606              lda 6,X
 027D B700              sta *__r0
 027F 5500              ldhx *__r0
 0281 650200            cphx #512
 0284 95                tsx
 0285 91E0              blt L65
 0287           ;                               Delay1000();
 0287           ;                               }
 0287           L63:
 0287           L60:
 0287 E603              lda 3,X
 0289 AB01              add #1
 028B E703              sta 3,X
 028D E602              lda 2,X
 028F A900              adc #0
 0291 E702              sta 2,X
 0293 E603              lda 3,X
 0295 B700              sta *__r1
 0297 E602              lda 2,X
 0299 B700              sta *__r0
 029B 5500              ldhx *__r0
 029D 650008            cphx #8
 02A0 95                tsx
 02A1 919E              blt L59
 02A3           ;                       }
 02A3           ;                       light_a=0xff;   
 02A3 A6FF              lda #-1
 02A5 B700              sta 0
 02A7           ; 
 02A7           ;                       }
 02A7 CC05E9            jmp L39
 02AA           L38:
 02AA           ;  //8个LED中只有一个灯亮,亮灯顺序是从左到右,再从右到左,一个周期时间长度约8秒。
 02AA           ;      		else if(SerialBuff[0]=='3')
 02AA B600              lda *_SerialBuff
 02AC A133              cmp #51
 02AE 2703              beq X21
 02B0 CC03E4            jmp L69
 02B3           X21:
 02B3           ;      			{   SCISendN(10,"LED效果3 ");
 02B3 450015            ldhx #L71
 02B6 89                pshx
 02B7 8B                pshh
 02B8 A60A              lda #10
 02BA 87                psha
 02BB CD0000            jsr _SCISendN
 02BE A703              ais #3
 02C0 95                tsx
 02C1           ;                           light_a=0xff;
 02C1 A6FF              lda #-1
 02C3 B700              sta 0
 02C5           ;                           for(lk=0;lk<1024;lk++)
 02C5 6F07              clr 7,X
 02C7 6F06              clr 6,X
 02C9           L72:
 02C9 CD05EF            jsr _Delay1000
 02CC 95                tsx
 02CD           L73:
 02CD E607              lda 7,X
 02CF AB01              add #1
 02D1 E707              sta 7,X
 02D3 E606              lda 6,X
 02D5 A900              adc #0
 02D7 E706              sta 6,X
 02D9 E607              lda 7,X
 02DB B700              sta *__r1
 02DD E606              lda 6,X
 02DF B700              sta *__r0
 02E1 5500              ldhx *__r0
 02E3 650400            cphx #1024
 02E6 95                tsx
 02E7 91E0              blt L72
 02E9           ;                       Delay1000();
 02E9           ;                       for(i=0;i<8;i++)
 02E9 6F03              clr 3,X
 02EB 6F02              clr 2,X
 02ED           L76:
 02ED           ;             			{if((ReSendStatusR & (1<<ReTestBit))==0)
 02ED 0A1643            brset #5,0x16,L80
 02F0           ;                               {
 02F0           ;                               light_a=(0xff)^(1<<i);
 02F0 6E0000            mov #0,*__r0
 02F3 6E0100            mov #1,*__r1
 02F6 E603              lda 3,X
 02F8 A40F              and #15
 02FA 2706              beq X10
 02FC           X9:
 02FC 3800              lsl *__r1
 02FE 3900              rol *__r0
 0300 4BFA              dbnza X9
 0302           X10:
 0302 B600              lda *__r1
 0304 A8FF              eor #-1
 0306 B700              sta *__r1
 0308 B600              lda *__r0
 030A A800              eor #0
 030C 4E0000            mov *__r1,0
 030F           ;                               for(lk=0;lk<1024;lk++)
 030F 6F07              clr 7,X
 0311 6F06              clr 6,X
 0313           L82:
 0313 CD05EF            jsr _Delay1000
 0316 95                tsx
 0317           L83:
 0317 E607              lda 7,X
 0319 AB01              add #1
 031B E707              sta 7,X
 031D E606              lda 6,X
 031F A900              adc #0
 0321 E706              sta 6,X
 0323 E607              lda 7,X
 0325 B700              sta *__r1
 0327 E606              lda 6,X
 0329 B700              sta *__r0
 032B 5500              ldhx *__r0
 032D 650400            cphx #1024
 0330 95                tsx
 0331 91E0              blt L82
 0333           ;                               Delay1000();
 0333           ;                               }
 0333           L80:
 0333           L77:
 0333 E603              lda 3,X
 0335 AB01              add #1
 0337 E703              sta 3,X
 0339 E602              lda 2,X
 033B A900              adc #0
 033D E702              sta 2,X
 033F E603              lda 3,X
 0341 B700              sta *__r1
 0343 E602              lda 2,X
 0345 B700              sta *__r0
 0347 5500              ldhx *__r0
 0349 650008            cphx #8
 034C 95                tsx
 034D 919E              blt L76
 034F           ;                               }
 034F           ;                       light_a=0xff;
 034F A6FF              lda #-1
 0351 B700              sta 0
 0353           ;                               for(lk=0;lk<1024;lk++)
 0353 6F07              clr 7,X
 0355 6F06              clr 6,X
 0357           L86:
 0357 CD05EF            jsr _Delay1000
 035A 95                tsx
 035B           L87:
 035B E607              lda 7,X
 035D AB01              add #1
 035F E707              sta 7,X
 0361 E606              lda 6,X
 0363 A900              adc #0
 0365 E706              sta 6,X
 0367 E607              lda 7,X
 0369 B700              sta *__r1
 036B E606              lda 6,X
 036D B700              sta *__r0
 036F 5500              ldhx *__r0
 0371 650400            cphx #1024
 0374 95                tsx
 0375 91E0              blt L86
 0377           ;                       Delay1000();
 0377           ;                       for(i=0;i<8;i++)
 0377 6F03              clr 3,X
 0379 6F02              clr 2,X
 037B           L90:
 037B           ;             			{if((ReSendStatusR & (1<<ReTestBit))==0)
 037B 0A1643            brset #5,0x16,L94
 037E           ;                               {
 037E           ;                               light_a=(0xff)^(0x80>>i);
 037E 6E0000            mov #0,*__r0
 0381 6E8000            mov #-128,*__r1
 0384 E603              lda 3,X
 0386 A40F              and #15
 0388 2706              beq X12
 038A           X11:
 038A 3700              asr *__r0
 038C 3600              ror *__r1
 038E 4BFA              dbnza X11
 0390           X12:
 0390 B600              lda *__r1
 0392 A8FF              eor #-1
 0394 B700              sta *__r1
 0396 B600              lda *__r0
 0398 A800              eor #0
 039A 4E0000            mov *__r1,0
 039D           ;                               for(lk=0;lk<1024;lk++)
 039D 6F07              clr 7,X
 039F 6F06              clr 6,X
 03A1           L96:
 03A1 CD05EF            jsr _Delay1000
 03A4 95                tsx
 03A5           L97:
 03A5 E607              lda 7,X
 03A7 AB01              add #1
 03A9 E707              sta 7,X
 03AB E606              lda 6,X
 03AD A900              adc #0
 03AF E706              sta 6,X
 03B1 E607              lda 7,X
 03B3 B700              sta *__r1
 03B5 E606              lda 6,X
 03B7 B700              sta *__r0
 03B9 5500              ldhx *__r0
 03BB 650400            cphx #1024
 03BE 95                tsx
 03BF 91E0              blt L96
 03C1           ;                               Delay1000();
 03C1           ;                               }
 03C1           L94:
 03C1           L91:
 03C1 E603              lda 3,X
 03C3 AB01              add #1
 03C5 E703              sta 3,X
 03C7 E602              lda 2,X
 03C9 A900              adc #0
 03CB E702              sta 2,X
 03CD E603              lda 3,X
 03CF B700              sta *__r1
 03D1 E602              lda 2,X
 03D3 B700              sta *__r0
 03D5 5500              ldhx *__r0
 03D7 650008            cphx #8
 03DA 95                tsx
 03DB 919E              blt L90
 03DD           ;                               }
 03DD           ;                       light_a=0xff;   
 03DD A6FF              lda #-1
 03DF B700              sta 0
 03E1           ; 
 03E1           ;                       } 
 03E1 CC05E9            jmp L70
 03E4           L69:
 03E4           ;      			
 03E4           ;  //8个LED中只有2个灯亮,亮灯顺序是从左到右,再从右到左,一个周期时间长度约4秒。
 03E4           ;      		else if(SerialBuff[0]=='4')
 03E4 B600              lda *_SerialBuff
 03E6 A134              cmp #52
 03E8 2703              beq X22
 03EA CC051E            jmp L100
 03ED           X22:
 03ED           ;      			{   SCISendN(10,"LED效果4 ");
 03ED 45000B            ldhx #L102
 03F0 89                pshx
 03F1 8B                pshh
 03F2 A60A              lda #10
 03F4 87                psha
 03F5 CD0000            jsr _SCISendN
 03F8 A703              ais #3
 03FA 95                tsx
 03FB           ;                               light_a=0xff;
 03FB A6FF              lda #-1
 03FD B700              sta 0
 03FF           ;                           for(lk=0;lk<1024;lk++)
 03FF 6F07              clr 7,X
 0401 6F06              clr 6,X
 0403           L103:
 0403 CD05EF            jsr _Delay1000
 0406 95                tsx
 0407           L104:
 0407 E607              lda 7,X
 0409 AB01              add #1
 040B E707              sta 7,X
 040D E606              lda 6,X
 040F A900              adc #0
 0411 E706              sta 6,X
 0413 E607              lda 7,X
 0415 B700              sta *__r1
 0417 E606              lda 6,X
 0419 B700              sta *__r0
 041B 5500              ldhx *__r0
 041D 650400            cphx #1024
 0420 95                tsx
 0421 91E0              blt L103
 0423           ;                       Delay1000();
 0423           ;                       for(i=0;i<8;i++)
 0423 6F03              clr 3,X

⌨️ 快捷键说明

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