main.lis
来自「要用到开发工具SD-H08」· LIS 代码 · 共 1,026 行 · 第 1/3 页
LIS
1,026 行
01ED 95 tsx
01EE 91E0 blt L45
01F0 L42:
01F0 E603 lda 3,X
01F2 AB01 add #1
01F4 E703 sta 3,X
01F6 E602 lda 2,X
01F8 A900 adc #0
01FA E702 sta 2,X
01FC E603 lda 3,X
01FE B700 sta *__r1
0200 E602 lda 2,X
0202 B700 sta *__r0
0204 5500 ldhx *__r0
0206 650008 cphx #8
0209 95 tsx
020A 91A1 blt L41
020C ; Delay1000();
020C ; }
020C ; light_a=0xff;
020C A6FF lda #-1
020E B700 sta 0
0210 ; for(lk=0;lk<512;lk++)
0210 6F07 clr 7,X
0212 6F06 clr 6,X
0214 L49:
0214 CD05CF jsr _Delay1000
0217 95 tsx
0218 L50:
0218 E607 lda 7,X
021A AB01 add #1
021C E707 sta 7,X
021E E606 lda 6,X
0220 A900 adc #0
0222 E706 sta 6,X
0224 E607 lda 7,X
0226 B700 sta *__r1
0228 E606 lda 6,X
022A B700 sta *__r0
022C 5500 ldhx *__r0
022E 650200 cphx #512
0231 95 tsx
0232 91E0 blt L49
0234 ; Delay1000();
0234 ; for(i=0;i<8;i++)
0234 6F03 clr 3,X
0236 6F02 clr 2,X
0238 L53:
0238 ; {
0238 ; light_a=(0xff)^(0xc0>>i);
0238 6E0000 mov #0,*__r0
023B 6EC000 mov #-64,*__r1
023E E603 lda 3,X
0240 A40F and #15
0242 2706 beq X8
0244 X7:
0244 3700 asr *__r0
0246 3600 ror *__r1
0248 4BFA dbnza X7
024A X8:
024A B600 lda *__r1
024C A8FF eor #-1
024E B700 sta *__r1
0250 B600 lda *__r0
0252 A800 eor #0
0254 4E0000 mov *__r1,0
0257 ; for(lk=0;lk<512;lk++)
0257 6F07 clr 7,X
0259 6F06 clr 6,X
025B L57:
025B CD05CF jsr _Delay1000
025E 95 tsx
025F L58:
025F E607 lda 7,X
0261 AB01 add #1
0263 E707 sta 7,X
0265 E606 lda 6,X
0267 A900 adc #0
0269 E706 sta 6,X
026B E607 lda 7,X
026D B700 sta *__r1
026F E606 lda 6,X
0271 B700 sta *__r0
0273 5500 ldhx *__r0
0275 650200 cphx #512
0278 95 tsx
0279 91E0 blt L57
027B L54:
027B E603 lda 3,X
027D AB01 add #1
027F E703 sta 3,X
0281 E602 lda 2,X
0283 A900 adc #0
0285 E702 sta 2,X
0287 E603 lda 3,X
0289 B700 sta *__r1
028B E602 lda 2,X
028D B700 sta *__r0
028F 5500 ldhx *__r0
0291 650008 cphx #8
0294 95 tsx
0295 91A1 blt L53
0297 ; Delay1000();
0297 ; }
0297 ; light_a=0xff;
0297 A6FF lda #-1
0299 B700 sta 0
029B ;
029B ; }
029B CC05C9 jmp L35
029E L34:
029E ; //8个LED中只有一个灯亮，亮灯顺序是从左到右，再从右到左，一个周期时间长度约8秒。
029E ; else if(SerialBuff[0]=='3')
029E B600 lda *_SerialBuff
02A0 A133 cmp #51
02A2 2703 beq X21
02A4 CC03D2 jmp L61
02A7 X21:
02A7 ; { SCISendN(10,"LED效果3 ");
02A7 450015 ldhx #L63
02AA 89 pshx
02AB 8B pshh
02AC A60A lda #10
02AE 87 psha
02AF CD0000 jsr _SCISendN
02B2 A703 ais #3
02B4 95 tsx
02B5 ; light_a=0xff;
02B5 A6FF lda #-1
02B7 B700 sta 0
02B9 ; for(lk=0;lk<1024;lk++)
02B9 6F07 clr 7,X
02BB 6F06 clr 6,X
02BD L64:
02BD CD05CF jsr _Delay1000
02C0 95 tsx
02C1 L65:
02C1 E607 lda 7,X
02C3 AB01 add #1
02C5 E707 sta 7,X
02C7 E606 lda 6,X
02C9 A900 adc #0
02CB E706 sta 6,X
02CD E607 lda 7,X
02CF B700 sta *__r1
02D1 E606 lda 6,X
02D3 B700 sta *__r0
02D5 5500 ldhx *__r0
02D7 650400 cphx #1024
02DA 95 tsx
02DB 91E0 blt L64
02DD ; Delay1000();
02DD ; for(i=0;i<8;i++)
02DD 6F03 clr 3,X
02DF 6F02 clr 2,X
02E1 L68:
02E1 ; {
02E1 ; light_a=(0xff)^(1<<i);
02E1 6E0000 mov #0,*__r0
02E4 6E0100 mov #1,*__r1
02E7 E603 lda 3,X
02E9 A40F and #15
02EB 2706 beq X10
02ED X9:
02ED 3800 lsl *__r1
02EF 3900 rol *__r0
02F1 4BFA dbnza X9
02F3 X10:
02F3 B600 lda *__r1
02F5 A8FF eor #-1
02F7 B700 sta *__r1
02F9 B600 lda *__r0
02FB A800 eor #0
02FD 4E0000 mov *__r1,0
0300 ; for(lk=0;lk<1024;lk++)
0300 6F07 clr 7,X
0302 6F06 clr 6,X
0304 L72:
0304 CD05CF jsr _Delay1000
0307 95 tsx
0308 L73:
0308 E607 lda 7,X
030A AB01 add #1
030C E707 sta 7,X
030E E606 lda 6,X
0310 A900 adc #0
0312 E706 sta 6,X
0314 E607 lda 7,X
0316 B700 sta *__r1
0318 E606 lda 6,X
031A B700 sta *__r0
031C 5500 ldhx *__r0
031E 650400 cphx #1024
0321 95 tsx
0322 91E0 blt L72
0324 L69:
0324 E603 lda 3,X
0326 AB01 add #1
0328 E703 sta 3,X
032A E602 lda 2,X
032C A900 adc #0
032E E702 sta 2,X
0330 E603 lda 3,X
0332 B700 sta *__r1
0334 E602 lda 2,X
0336 B700 sta *__r0
0338 5500 ldhx *__r0
033A 650008 cphx #8
033D 95 tsx
033E 91A1 blt L68
0340 ; Delay1000();
0340 ; }
0340 ; light_a=0xff;
0340 A6FF lda #-1
0342 B700 sta 0
0344 ; for(lk=0;lk<1024;lk++)
0344 6F07 clr 7,X
0346 6F06 clr 6,X
0348 L76:
0348 CD05CF jsr _Delay1000
034B 95 tsx
034C L77:
034C E607 lda 7,X
034E AB01 add #1
0350 E707 sta 7,X
0352 E606 lda 6,X
0354 A900 adc #0
0356 E706 sta 6,X
0358 E607 lda 7,X
035A B700 sta *__r1
035C E606 lda 6,X
035E B700 sta *__r0
0360 5500 ldhx *__r0
0362 650400 cphx #1024
0365 95 tsx
0366 91E0 blt L76
0368 ; Delay1000();
0368 ; for(i=0;i<8;i++)
0368 6F03 clr 3,X
036A 6F02 clr 2,X
036C L80:
036C ; {
036C ; light_a=(0xff)^(0x80>>i);
036C 6E0000 mov #0,*__r0
036F 6E8000 mov #-128,*__r1
0372 E603 lda 3,X
0374 A40F and #15
0376 2706 beq X12
0378 X11:
0378 3700 asr *__r0
037A 3600 ror *__r1
037C 4BFA dbnza X11
037E X12:
037E B600 lda *__r1
0380 A8FF eor #-1
0382 B700 sta *__r1
0384 B600 lda *__r0
0386 A800 eor #0
0388 4E0000 mov *__r1,0
038B ; for(lk=0;lk<1024;lk++)
038B 6F07 clr 7,X
038D 6F06 clr 6,X
038F L84:
038F CD05CF jsr _Delay1000
0392 95 tsx
0393 L85:
0393 E607 lda 7,X
0395 AB01 add #1
0397 E707 sta 7,X
0399 E606 lda 6,X
039B A900 adc #0
039D E706 sta 6,X
039F E607 lda 7,X
03A1 B700 sta *__r1
03A3 E606 lda 6,X
03A5 B700 sta *__r0
03A7 5500 ldhx *__r0
03A9 650400 cphx #1024
03AC 95 tsx
03AD 91E0 blt L84
03AF L81:
03AF E603 lda 3,X
03B1 AB01 add #1
03B3 E703 sta 3,X
03B5 E602 lda 2,X
03B7 A900 adc #0
03B9 E702 sta 2,X
03BB E603 lda 3,X
03BD B700 sta *__r1
03BF E602 lda 2,X
03C1 B700 sta *__r0
03C3 5500 ldhx *__r0
03C5 650008 cphx #8
03C8 95 tsx
03C9 91A1 blt L80
03CB ; Delay1000();
03CB ; }
03CB ; light_a=0xff;
03CB A6FF lda #-1
03CD B700 sta 0
03CF ;
03CF ; }
03CF CC05C9 jmp L62
03D2 L61:
03D2 ;
03D2 ; //8个LED中只有2个灯亮，亮灯顺序是从左到右，再从右到左，一个周期时间长度约4秒。
03D2 ; else if(SerialBuff[0]=='4')
03D2 B600 lda *_SerialBuff
03D4 A134 cmp #52
03D6 2703 beq X22
03D8 CC0506 jmp L88
03DB X22:
03DB ; { SCISendN(10,"LED效果4 ");
03DB 45000B ldhx #L90
03DE 89 pshx
03DF 8B pshh
03E0 A60A lda #10
03E2 87 psha
03E3 CD0000 jsr _SCISendN
03E6 A703 ais #3
03E8 95 tsx
03E9 ; light_a=0xff;
03E9 A6FF lda #-1
03EB B700 sta 0
03ED ; for(lk=0;lk<1024;lk++)
03ED 6F07 clr 7,X
03EF 6F06 clr 6,X
03F1 L91:
03F1 CD05CF jsr _Delay1000
03F4 95 tsx
03F5 L92:
03F5 E607 lda 7,X
03F7 AB01 add #1
03F9 E707 sta 7,X
03FB E606 lda 6,X
03FD A900 adc #0
03FF E706 sta 6,X
0401 E607 lda 7,X
0403 B700 sta *__r1
0405 E606 lda 6,X
0407 B700 sta *__r0
0409 5500 ldhx *__r0
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?