📄 main.lis
字号:
0425 6F02 clr 2,X
0427 L107:
0427 ; {if((ReSendStatusR & (1<<ReTestBit))==0)
0427 0A1643 brset #5,0x16,L111
042A ; {
042A ; light_a=(0xff)^(3<<i);
042A 6E0000 mov #0,*__r0
042D 6E0300 mov #3,*__r1
0430 E603 lda 3,X
0432 A40F and #15
0434 2706 beq X14
0436 X13:
0436 3800 lsl *__r1
0438 3900 rol *__r0
043A 4BFA dbnza X13
043C X14:
043C B600 lda *__r1
043E A8FF eor #-1
0440 B700 sta *__r1
0442 B600 lda *__r0
0444 A800 eor #0
0446 4E0000 mov *__r1,0
0449 ; for(lk=0;lk<1024;lk++)
0449 6F07 clr 7,X
044B 6F06 clr 6,X
044D L113:
044D CD05EF jsr _Delay1000
0450 95 tsx
0451 L114:
0451 E607 lda 7,X
0453 AB01 add #1
0455 E707 sta 7,X
0457 E606 lda 6,X
0459 A900 adc #0
045B E706 sta 6,X
045D E607 lda 7,X
045F B700 sta *__r1
0461 E606 lda 6,X
0463 B700 sta *__r0
0465 5500 ldhx *__r0
0467 650400 cphx #1024
046A 95 tsx
046B 91E0 blt L113
046D ; Delay1000();
046D ; }
046D L111:
046D L108:
046D E603 lda 3,X
046F AB01 add #1
0471 E703 sta 3,X
0473 E602 lda 2,X
0475 A900 adc #0
0477 E702 sta 2,X
0479 E603 lda 3,X
047B B700 sta *__r1
047D E602 lda 2,X
047F B700 sta *__r0
0481 5500 ldhx *__r0
0483 650008 cphx #8
0486 95 tsx
0487 919E blt L107
0489 ; }
0489 ; light_a=0xff;
0489 A6FF lda #-1
048B B700 sta 0
048D ; for(lk=0;lk<1024;lk++)
048D 6F07 clr 7,X
048F 6F06 clr 6,X
0491 L117:
0491 CD05EF jsr _Delay1000
0494 95 tsx
0495 L118:
0495 E607 lda 7,X
0497 AB01 add #1
0499 E707 sta 7,X
049B E606 lda 6,X
049D A900 adc #0
049F E706 sta 6,X
04A1 E607 lda 7,X
04A3 B700 sta *__r1
04A5 E606 lda 6,X
04A7 B700 sta *__r0
04A9 5500 ldhx *__r0
04AB 650400 cphx #1024
04AE 95 tsx
04AF 91E0 blt L117
04B1 ; Delay1000();
04B1 ; for(i=0;i<8;i++)
04B1 6F03 clr 3,X
04B3 6F02 clr 2,X
04B5 L121:
04B5 ; {if((ReSendStatusR & (1<<ReTestBit))==0)
04B5 0A1643 brset #5,0x16,L125
04B8 ; {
04B8 ; light_a=(0xff)^(0xc0>>i);
04B8 6E0000 mov #0,*__r0
04BB 6EC000 mov #-64,*__r1
04BE E603 lda 3,X
04C0 A40F and #15
04C2 2706 beq X16
04C4 X15:
04C4 3700 asr *__r0
04C6 3600 ror *__r1
04C8 4BFA dbnza X15
04CA X16:
04CA B600 lda *__r1
04CC A8FF eor #-1
04CE B700 sta *__r1
04D0 B600 lda *__r0
04D2 A800 eor #0
04D4 4E0000 mov *__r1,0
04D7 ; for(lk=0;lk<1024;lk++)
04D7 6F07 clr 7,X
04D9 6F06 clr 6,X
04DB L127:
04DB CD05EF jsr _Delay1000
04DE 95 tsx
04DF L128:
04DF E607 lda 7,X
04E1 AB01 add #1
04E3 E707 sta 7,X
04E5 E606 lda 6,X
04E7 A900 adc #0
04E9 E706 sta 6,X
04EB E607 lda 7,X
04ED B700 sta *__r1
04EF E606 lda 6,X
04F1 B700 sta *__r0
04F3 5500 ldhx *__r0
04F5 650400 cphx #1024
04F8 95 tsx
04F9 91E0 blt L127
04FB ; Delay1000();
04FB ; }
04FB L125:
04FB L122:
04FB E603 lda 3,X
04FD AB01 add #1
04FF E703 sta 3,X
0501 E602 lda 2,X
0503 A900 adc #0
0505 E702 sta 2,X
0507 E603 lda 3,X
0509 B700 sta *__r1
050B E602 lda 2,X
050D B700 sta *__r0
050F 5500 ldhx *__r0
0511 650008 cphx #8
0514 95 tsx
0515 919E blt L121
0517 ; }
0517 ; light_a=0xff;
0517 A6FF lda #-1
0519 B700 sta 0
051B ; }
051B CC05E9 jmp L101
051E L100:
051E ; //收到其他字符：LED灯全部一起闪烁（同时亮同时熄，周期1秒）,并向串行口发送字符串"输入错误！"
051E ; else
051E ; { SCISendN(10,"输入错误！");
051E 450000 ldhx #L131
0521 89 pshx
0522 8B pshh
0523 A60A lda #10
0525 87 psha
0526 CD0000 jsr _SCISendN
0529 A703 ais #3
052B 95 tsx
052C ; for(i=0;i<4;i++)
052C 6F03 clr 3,X
052E 6F02 clr 2,X
0530 L132:
0530 ; {if((ReSendStatusR & (1<<ReTestBit))==0)
0530 0A1602 brset #5,0x16,X23
0533 2003 bra X24
0535 CC05C6 X23: jmp L136
0538 X24:
0538
0538 ; {
0538 ; light_a=0x00;
0538 3F00 clr 0
053A ; for(lk=0;lk<512;lk++)
053A 6F07 clr 7,X
053C 6F06 clr 6,X
053E L138:
053E ; {
053E ; for(p=0;p<2;p++)
053E 6F05 clr 5,X
0540 6F04 clr 4,X
0542 L142:
0542 CD05EF jsr _Delay1000
0545 95 tsx
0546 L143:
0546 E605 lda 5,X
0548 AB01 add #1
054A E705 sta 5,X
054C E604 lda 4,X
054E A900 adc #0
0550 E704 sta 4,X
0552 E605 lda 5,X
0554 B700 sta *__r1
0556 E604 lda 4,X
0558 B700 sta *__r0
055A 5500 ldhx *__r0
055C 650002 cphx #2
055F 95 tsx
0560 91E0 blt L142
0562 L139:
0562 E607 lda 7,X
0564 AB01 add #1
0566 E707 sta 7,X
0568 E606 lda 6,X
056A A900 adc #0
056C E706 sta 6,X
056E E607 lda 7,X
0570 B700 sta *__r1
0572 E606 lda 6,X
0574 B700 sta *__r0
0576 5500 ldhx *__r0
0578 650200 cphx #512
057B 95 tsx
057C 91C0 blt L138
057E ; Delay1000();//延长时间0.5秒
057E ; }
057E ; light_a=0xff;
057E A6FF lda #-1
0580 B700 sta 0
0582 ; for(lk=0;lk<512;lk++)
0582 6F07 clr 7,X
0584 6F06 clr 6,X
0586 L146:
0586 ; {
0586 ; for(p=0;p<2;p++)
0586 6F05 clr 5,X
0588 6F04 clr 4,X
058A L150:
058A CD05EF jsr _Delay1000
058D 95 tsx
058E L151:
058E E605 lda 5,X
0590 AB01 add #1
0592 E705 sta 5,X
0594 E604 lda 4,X
0596 A900 adc #0
0598 E704 sta 4,X
059A E605 lda 5,X
059C B700 sta *__r1
059E E604 lda 4,X
05A0 B700 sta *__r0
05A2 5500 ldhx *__r0
05A4 650002 cphx #2
05A7 95 tsx
05A8 91E0 blt L150
05AA L147:
05AA E607 lda 7,X
05AC AB01 add #1
05AE E707 sta 7,X
05B0 E606 lda 6,X
05B2 A900 adc #0
05B4 E706 sta 6,X
05B6 E607 lda 7,X
05B8 B700 sta *__r1
05BA E606 lda 6,X
05BC B700 sta *__r0
05BE 5500 ldhx *__r0
05C0 650200 cphx #512
05C3 95 tsx
05C4 91C0 blt L146
05C6 ; Delay1000();}
05C6 ; } //延长时间0.5秒
05C6 L136:
05C6 A6FF lda #-1
05C8 B700 sta 0
05CA L133:
05CA E603 lda 3,X
05CC AB01 add #1
05CE E703 sta 3,X
05D0 E602 lda 2,X
05D2 A900 adc #0
05D4 E702 sta 2,X
05D6 E603 lda 3,X
05D8 B700 sta *__r1
05DA E602 lda 2,X
05DC B700 sta *__r0
05DE 5500 ldhx *__r0
05E0 650004 cphx #4
05E3 95 tsx
05E4 9003 bge X25
05E6 CC0530 jmp L132
05E9 X25:
05E9 ; light_a=0xff;
05E9 ; }
05E9 ; }
05E9 L101:
05E9 L70:
05E9 L39:
05E9 L8:
05E9 ; }//接收效果演示结束；
05E9 L5:
05E9 L3:
05E9 CC0010 jmp L2
05EC X0:
05EC L1:
05EC A708 ais #8
05EE .dbline 0 ; func end
05EE 81 rts
05EF ; u -> 0,X
05EF _Delay1000::
05EF A7FF ais #-1
05F1 95 tsx
05F2 ;
05F2 ;
05F2 ; }//while(1)尾部
05F2 ;
05F2 ; }//主函数结束
05F2 ;
05F2 ;
05F2 ; //延时程序，延长时间1000个周期
05F2 ; void Delay1000(void)
05F2 ; { unsigned char u;
05F2 7F clr ,X
05F3 2001 bra L158
05F5 L155:
05F5 L156:
05F5 7C inc ,X
05F6 L158:
05F6 ; for(u=0;u<=110;u++);
05F6 F6 lda ,X
05F7 A16E cmp #110
05F9 23FA bls L155
05FB L154:
05FB A701 ais #1
05FD .dbline 0 ; func end
05FD 81 rts
.area bss
0000 _SerialBuff::
0000 .blkb 1
0001 _z::
0001 .blkb 2
0003 _k::
0003 .blkb 2
0005 _i::
0005 .blkb 1
.area lit
0000 L131:
0000 CAE4C8EBB4EDCEF3A3A100 .byte 202,228,200,235,180,237,206,243,163,161,0
000B L102:
000B 4C4544D0A7B9FB342000 .byte 'L,'E,'D,208,167,185,251,52,32,0
0015 L71:
0015 4C4544D0A7B9FB332000 .byte 'L,'E,'D,208,167,185,251,51,32,0
001F L40:
001F 4C4544D0A7B9FB322000 .byte 'L,'E,'D,208,167,185,251,50,32,0
0029 L9:
0029 4C4544D0A7B9FB3100 .byte 'L,'E,'D,208,167,185,251,49,0
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -