12864five.lst
来自「就是想下载一些东西啊」· LST 代码 · 共 824 行 · 第 1/3 页
LST
824 行
522 3 if(key2==0)
523 3 {
524 4 ri++;
525 4 if(ri==32)
526 4 ri=0;
527 4 }
528 3 while(!key2);
529 3 wadda(1,5,ri);
530 3
531 3 }
532 2 }
533 1 if(shu==6)
534 1 {
535 2 if(key2==0)
536 2 {
537 3 delay(10);
538 3 if(key2==0)
539 3 {
540 4 yue++;
541 4 if(yue==13)
542 4 yue=0;
543 4 }
544 3 while(!key2);
545 3 wadda(1,3,yue);
546 3 }
547 2 }
C51 COMPILER V7.06 12864FIVE 04/20/2009 14:14:32 PAGE 10
548 1 if(shu==7)
549 1 {
550 2 if(key2==0)
551 2 {
552 3 delay(10);
553 3 if(key2==0)
554 3 {
555 4 nsg++;
556 4 if(nsg==100)
557 4 nsg=0;
558 4 }
559 3 while(!key2);
560 3 nian=nsg+nqb*100;
561 3 wadnian(1,0,nian);
562 3 pos(1,1);
563 3 }
564 2 }
565 1 if(shu==8)
566 1 {
567 2 if(key2==0)
568 2 {
569 3 delay(10);
570 3 if(key2==0)
571 3 {
572 4 nqb++;
573 4 if(nqb==100)
574 4 nqb=0;
575 4 }
576 3 while(!key2);
577 3 nian=nsg+nqb*100;
578 3 wadnian(1,0,nian);
579 3 pos(1,0);
580 3 }
581 2 }
582 1 if(shu==1)
583 1 {
584 2 if(key3==0)
585 2 {
586 3 delay(10);
587 3 if(key3==0)
588 3 {
589 4 miao--;
590 4 if(miao==-1)
591 4 miao=59;
592 4 }
593 3 while(!key3);
594 3 wadda(3,5,miao);
595 3 }
596 2 }
597 1 if(shu==2)
598 1 {
599 2 if(key3==0)
600 2 {
601 3 delay(10);
602 3 if(key3==0)
603 3 {
604 4 fen--;
605 4 if(fen==-1)
606 4 fen=59;
607 4 }
608 3 while(!key3);
609 3 wsfm(3,2,shi,fen,miao);
C51 COMPILER V7.06 12864FIVE 04/20/2009 14:14:32 PAGE 11
610 3 pos(3,4);
611 3 }
612 2 }
613 1 if(shu==3)
614 1 {
615 2 if(key3==0)
616 2 {
617 3 delay(10);
618 3 if(key3==0)
619 3 {
620 4 shi--;
621 4 if(shi==-1)
622 4 shi=23;
623 4 }
624 3 while(!key3);
625 3 wadda(3,2,shi);
626 3 }
627 2 }
628 1 if(shu==4)
629 1 {
630 2 if(key3==0)
631 2 {
632 3 delay(10);
633 3 if(key3==0)
634 3 {
635 4 day--;
636 4 if(day==-1)
637 4 day=6;
638 4 }
639 3 while(!key3);
640 3 pos(1,6);
641 3 wdata(0x20);
642 3 for(i=0;i<3;i++)
643 3 {
644 4 wdata(table3[i+3*day]);
645 4 }
646 3 pos(1,7);
647 3 }
648 2
649 2 }
650 1 if(shu==5)
651 1 {
652 2 if(key3==0)
653 2 {
654 3 delay(10);
655 3 if(key3==0)
656 3 {
657 4 ri--;
658 4 if(ri==-1)
659 4 ri=31;
660 4 }
661 3 while(!key3);
662 3 wadda(1,5,ri);
663 3 }
664 2 }
665 1 if(shu==6)
666 1 {
667 2 if(key3==0)
668 2 {
669 3 delay(10);
670 3 if(key3==0)
671 3 {
C51 COMPILER V7.06 12864FIVE 04/20/2009 14:14:32 PAGE 12
672 4 yue--;
673 4 if(yue==-1)
674 4 yue=12;
675 4 }
676 3 while(!key3);
677 3 wadda(1,3,yue);
678 3 }
679 2 }
680 1 if(shu==7)
681 1 {
682 2 if(key3==0)
683 2 {
684 3 delay(10);
685 3 if(key3==0)
686 3 {
687 4 nsg--;
688 4 if(nsg==-1)
689 4 nsg=99;
690 4 }
691 3 while(!key3);
692 3 nian=nsg+nqb*100;
693 3 wadnian(1,0,nian);
694 3 pos(1,1);
695 3 }
696 2 }
697 1 if(shu==8)
698 1 {
699 2 if(key3==0)
700 2 {
701 3 delay(10);
702 3 if(key3==0)
703 3 {
704 4 nqb--;
705 4 if(nqb==-1)
706 4 nqb=99;
707 4 }
708 3 while(!key3);
709 3 nian=nsg+nqb*100;
710 3 wadnian(1,0,nian);
711 3 pos(1,0);
712 3 }
713 2 }
714 1
715 1 }
716 void didi()
717 {
718 1 feng=0;
719 1 delay(50);
720 1 feng=1;
721 1 delay(50);
722 1 feng=0;
723 1 delay(50);
724 1 feng=1;
725 1 delay(50);
726 1
727 1 }
728 void main()
729 {
730 1 init();
731 1 kaiguan=0;
732 1 num=0;
733 1 pos(1,0);
C51 COMPILER V7.06 12864FIVE 04/20/2009 14:14:32 PAGE 13
734 1 while(table1[num]!='\0')
735 1 {
736 2 wdata(table1[num]);
737 2 num++;
738 2 }
739 1 pos(4,0);
740 1 for(num=0;num<4;num++)
741 1 {
742 2 wdata(table4[num]);
743 2 }
744 1 ///initds();
745 1 while(1)
746 1 {
747 2 keyscan();
748 2 if(flag==0)
749 2 {
750 3 gettime();
751 3 if(shi==nshi)
752 3 {
753 4 if(fen==nfen)
754 4 {
755 5 if(miao==nmiao)
756 5 flag1=1;
757 5 }
758 4 }
759 3 if(flag1==1)
760 3 {
761 4 didi();
762 4 wsfm(4,2,nshi,nfen,nmiao);
763 4 }
764 3 wsfm(3,2,shi,fen,miao);//写时分秒
765 3 wnyr(nian,yue,ri);//写年月日
766 3 }
767 2
768 2
769 2 }
770 1
771 1
772 1 }
MODULE INFORMATION: STATIC OVERLAYABLE
CODE SIZE = 2445 ----
CONSTANT SIZE = 69 ----
XDATA SIZE = ---- ----
PDATA SIZE = ---- ----
DATA SIZE = 35 17
IDATA SIZE = ---- ----
BIT SIZE = ---- ----
END OF MODULE INFORMATION.
C51 COMPILATION COMPLETE. 0 WARNING(S), 0 ERROR(S)
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?