📄 dfg-a.l
字号:
642 0434 8D 04 B2 jp clrgate
643 0437 con_heat:
644 0437 A6 25 02 cp tzero,#2
645 043A 7D 04 AE jp ult,setgate
646 043D A6 25 13 cp tzero,#t_h ;25
647 0440 7D 04 B2 jp ult,clrgate ;setgate
648 0443 A6 25 1E cp tzero,#30
649 0446 BD 04 B2 jp ugt,clrgate
650 0449 8D 04 AE jp setgate ;clrgate
651 044C con_hold:
652 044C A4 31 19 cp wenduset,prwendu
653 044F BB 04 jr ugt,con_holda
654 0451 08 31 ld r0,prwendu
655 0453 8B 02 jr con_holdb
656 0455 con_holda
657 0455 08 19 ld r0,wenduset
658 0457 con_holdb
659
660 0457 A4 18 C0 cp r0,wendu
661 045A FD 04 B2 jp uge,clrgate
662
663 ;==========2007-12-2============
664 ;cp wenduset,#175 ;设定80度以下，用一个功率加热
665 ;jr ugt,con_wa
666 045D E6 29 05 ld t_w,#5 ;工作周期
667 0460 E6 2A 2C ld t_all,#44 ;总周期
668 0463 8D 04 A0 jp con_we
669 0466 con_wa:
670 0466 A6 28 0A cp t10min,#10 ;10分钟控制一次
671 0469 7B 35 jr ult,con_we
672 046B B0 28 clr t10min
673 046D A6 18 B9 cp wendu,#185 ;85du以上
674 0470 7B 09 jr ult,con_wb
675 0472 E6 29 05 ld t_w,#5 ;工作周期
676 0475 E6 2A 2C ld t_all,#44 ;总周期
677 0478 8D 04 A0 jp con_we
678 047B con_wb:
679 047B A6 18 B4 cp wendu,#180 ;82.5du-85度
680 047E 7B 09 jr ult,con_wc
681 0480 E6 29 05 ld t_w,#5 ;工作周期
682 0483 E6 2A 24 ld t_all,#36 ;总周期
683 0486 8D 04 A0 jp con_we
684 0489 con_wc:
685 0489 A6 18 AF cp wendu,#175 ;80du-82.5度
686 048C 7B 09 jr ult,con_wd
687 048E E6 29 05 ld t_w,#5 ;工作周期
688 0491 E6 2A 1E ld t_all,#30 ;总周期
689 0494 8D 04 A0 jp con_we
690 0497 con_wd: ;80度以下
691 0497 E6 29 05 ld t_w,#5 ;工作周期
692 049A E6 2A 1A ld t_all,#26 ;总周期
693 049D 8D 04 A0 jp con_we
694 04A0 con_we:
695 04A0 A4 29 27 cp t1s,t_w ;
696 04A3 7B 92 jr ult,con_heat
697 04A5 A4 2A 27 cp t1s,t_all ;
698 04A8 7D 04 B2 jp ult,clrgate
699 04AB B0 27 clr t1s
700 04AD AF ret
701
702 ;==========2007-12-2============
703
704 04AE setgate:
705 04AE 46 E0 04 or p0,#b_gate
706 04B1 AF ret
707 04B2 clrgate:
708 04B2 56 E0 FB and p0,#bn_gate
709 04B5 AF ret
710
711 ;************************************************
712
713 ;************************************************
714
715 ;************************************************
716 ;显示处理
717 04B6 discon:
718 ; jr diskey
719 04B6 76 03 10 tm status,#f_run
720 04B9 6D 05 74 jp z,disnot
721 04BC 76 01 10 tm flag,#f_wendu_f
722 04BF EB 28 jr nz,dis_f
723 04C1 76 03 01 tm status,#f_stop
724 04C4 EB 3C jr nz,dis00s
725 04C6 76 02 01 tm flag2,#f_setw ;2007-10-31
726 04C9 ED 05 6A jp nz,diswendu
727 04CC 76 02 02 tm flag2,#f_setd
728 04CF EB 52 jr nz,disdelay
729 04D1 76 02 04 tm flag2,#f_seth
730 04D4 EB 6D jr nz,dishold
731
732 04D6 76 03 08 tm status,#f_holds
733 04D9 ED 05 61 jp nz,dishold2
734
735 ; tm flag2,#f_setw
736 ; jp nz,diswendu
737 ; tm flag2,#f_setd
738 ; jr nz,disdelay
739 ; tm flag2,#f_seth
740 ; jr nz,dishold
741 04DC 76 01 08 tm flag,#f_start
742 04DF EB 2B jr nz,dis00
743 04E1 76 03 02 tm status,#f_delay
744 04E4 EB 43 jr nz,disdelay2
745 04E6 8D 05 6A jp diswendu
746 ; jr disad ;test
747
748 04E9 dis_f:
749 04E9 76 01 01 tm flag,#f_flash
750 04EC EB 0A jr nz,dis_f1
751 04EE E6 11 D9 ld dis1,#0d9h ;E
752 04F1 E6 12 F5 ld dis2,#0f5h ;0
753 04F4 E6 13 6D ld dis3,#6dh ;3
754 ; or p0,#b_led2
755 ; ld dis4,#10h ;close green led
756 04F7 AF ret
757 04F8 dis_f1:
758 04F8 E6 11 00 ld dis1,#00h
759 04FB E6 12 00 ld dis2,#00h
760 04FE E6 13 00 ld dis3,#00h
761 ; or p0,#b_led2
762 ; ld dis4,#10h ;close green led
763 0501 AF ret
764
765 0502 dis00s:
766 0502 E6 11 F5 ld dis1,#0f5h ;00h
767 0505 E6 12 F5 ld dis2,#0f5h
768 0508 E6 13 F5 ld dis3,#0f5h
769 ; or p0,#b_led2
770 ; ld dis4,#10h ;close green led
771 050B AF ret
772 050C dis00:
773 050C E6 11 F5 ld dis1,#0f5h ;00h
774 050F E6 12 F5 ld dis2,#0f5h
775 0512 E6 13 F5 ld dis3,#0f5h
776 0515 ledflash2:
777 0515 AF ret
778 0516 76 01 01 tm flag,#f_flash
779 0519 EB 04 jr nz,dis00a
780 ; ld dis4,#18h
781 ; and p0,#bn_led2
782 051B E6 14 18 ld dis4,#18h ;open green led
783 051E AF ret
784 051F dis00a:
785 051F E6 14 10 ld dis4,#10h ;close green led
786 ; or p0,#b_led2
787 0522 AF ret
788 ;----------------------
789 0523 disdelay:
790 0523 78 1A ld r7,delayset
791 0525 F6 05 EE call numbcon
792 ; or p0,#b_led2
793 ; ld dis4,#10h ;close green led
794 0528 AF ret
795 ;----------------------
796 0529 disdelay2:
797 0529 78 1A ld r7,delayset
798 052B 24 0A C7 sub r7,hour
799 052E F6 05 EE call numbcon
800 ; or p0,#b_led2
801 ; ld dis4,#10h ;close green led
802 0531 AF ret
803 ;----------------------
804 0532 disad:
805 0532 78 18 ld r7,wendu
806 0534 F6 05 EE call numbcon
807 0537 8B DC jr ledflash2
808 0539 AF ret
809 053A diskey:
810 053A 78 21 ld r7,keynum
811 053C 56 C7 06 and r7,#00000110b
812 053F F6 05 EE call numbcon
813 ; and p0,#bn_led2
814 ; ld dis4,#18h ;open en led
815 0542 AF ret
816 ;----------------------
817 0543 dishold:
818 0543 76 04 01 tm keyflag,#f_key
819 0546 EB 11 jr nz,disholda
820 0548 76 2C 08 tm ledflag,#f_ledf
821 054B 6B 0C jr z,disholda
822 054D 76 01 01 tm flag,#f_flash
823 0550 EB 07 jr nz,disholda
824 0552 B0 11 clr dis1
825 0554 B0 12 clr dis2
826 0556 B0 13 clr dis3
827 0558 AF ret
828 0559 disholda
829 0559 78 1B ld r7,holdset
830 055B F6 05 EE call numbcon
831 055E 8B B5 jr ledflash2
832 0560 AF ret
833 ;----------------------
834 0561 dishold2:
835 0561 78 1B ld r7,holdset
836 0563 24 09 C7 sub r7,min ;hour
837 0566 F6 05 EE call numbcon
838 ; and p0,#bn_led2
839 ; ld dis4,#18h ;open green led
840 0569 AF ret
841 ;----------------------
842 ;155- - - - 》 158
843 ;165- - - - 》 167
844 ;175- - - - 》 176
845 ;185- - - - 》 185
846 ;195- - - - 》 194
847 ;205- - - - 》 203
848 056A diswendu:
849 056A 76 2C 08 tm ledflag,#f_ledf
850 056D 6B 0C jr z,diswendua
851 056F 76 01 01 tm flag,#f_flash
852 0572 EB 07 jr nz,diswendua
853 0574 disnot
854 0574 B0 11 clr dis1
855 0576 B0 12 clr dis2
856 0578 B0 13 clr dis3
857 057A AF ret
858 057B diswendua
859 057B A6 19 A0 cp wenduset,#w150
860 057E 6D 05 A8 jp eq,disw150
861 0581 A6 19 8C cp wenduset,#w175
862 0584 6D 05 B2 jp eq,disw175
863 0587 A6 19 78 cp wenduset,#w200
864 058A 6D 05 BC jp eq,disw200
865 058D A6 19 64 cp wenduset,#w250
866 0590 6D 05 C6 jp eq,disw250
867 0593 A6 19 50 cp wenduset,#w300
868 0596 6D 05 D0 jp eq,disw300
869 0599 A6 19 46 cp wenduset,#w350
870 059C 6D 05 DA jp eq,disw350
871 059F A6 19 3C cp wenduset,#w400
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -