📄 fm_transmitter.lst
字号:
605 00559 01B3 5800 lds data0,00h
606 00560 01B4 5801 lds data1,00h
607 00561 01B5 5802 lds data2,00h
608 00562 01B6 5803 lds data3,00h
0563
610 00564 01B7 5A14 lds global_buf0,04h
611 00565 01B8 5895 lds global_buf1,01h
612 00566 01B9 C1C0 call count_radio_data1
00567 ;tx2205_tx9213 module
614 00568 01BA 5C14 lds global_buf0,08h
615 00569 01BB 5F95 lds global_buf1,0fh
616 00570 01BC 5996 lds global_buf2,03h
617 00571 01BD 5A17 lds global_buf3,04h
618 00572 01BE C1DB call radio_data_add1
619 00573 01BF F400 rts
00574 ;******************************************
00575 count_radio_data1:
622 00576 01C0 6C15 lda global_buf1
623 00577 01C1 B1CC jz count_radio_d1
00578 count_radio_d0:
625 00579 01C2 C1D2 call radio_data_add
626 00580 01C3 4115 dec* global_buf1
627 00581 01C4 A1C2 jnz count_radio_d0
628 00582 01C5 6C02 lda data2
629 00583 01C6 6803 sta data3
630 00584 01C7 6C01 lda data1
631 00585 01C8 6802 sta data2
632 00586 01C9 6C00 lda data0
633 00587 01CA 6801 sta data1
634 00588 01CB 5800 lds data0,00h
00589 count_radio_d1:
636 00590 01CC 6C14 lda global_buf0
637 00591 01CD B1D1 jz count_radio_d3
00592 count_radio_d2:
639 00593 01CE C1D2 call radio_data_add
640 00594 01CF 4114 dec* global_buf0
641 00595 01D0 A1CE jnz count_radio_d2
00596 count_radio_d3:
643 00597 01D1 F400 rts
00598 ;*****************************************
00599 radio_data_add:
646 00600 01D2 6C05 lda radio_num0
647 00601 01D3 2500 add* data0
648 00602 01D4 6C06 lda radio_num1
649 00603 01D5 2101 adc* data1
650 00604 01D6 6C0C lda force_zero
651 00605 01D7 2102 adc* data2
652 00606 01D8 6C0C lda force_zero
653 00607 01D9 2103 adc* data3
654 00608 01DA F400 rts
00609 ;*****************************************
00610 radio_data_add1:
657 00611 01DB 6C14 lda global_buf0
658 00612 01DC 2500 add* data0
659 00613 01DD 6C15 lda global_buf1
660 00614 01DE 2101 adc* data1
661 00615 01DF 6C16 lda global_buf2
662 00616 01E0 2102 adc* data2
663 00617 01E1 6C17 lda global_buf3
664 00618 01E2 2103 adc* data3
665 00619 01E3 F400 rts
00620 ;*****************************************
00621 count_radio_disp:
668 00622 01E4 5808 lds disp0,00h
669 00623 01E5 5809 lds disp1,00h
670 00624 01E6 580A lds disp2,00h
671 00625 01E7 580B lds disp3,00h
672 00626 01E8 C1F0 call radio_disp_add
673 00627 01E9 C205 call hex_to_dec
674 00628 01EA 5814 lds global_buf0,00h
675 00629 01EB 5B95 lds global_buf1,07h
676 00630 01EC 5C16 lds global_buf2,08h
677 00631 01ED 5817 lds global_buf3,00h
678 00632 01EE C1F9 call radio_disp_add1
679 00633 01EF F400 rts
00634 ;*****************************************
00635 radio_disp_add:
682 00636 01F0 6C05 lda radio_num0
683 00637 01F1 2508 add* disp0
684 00638 01F2 6C06 lda radio_num1
685 00639 01F3 2109 adc* disp1
686 00640 01F4 6C0C lda force_zero
687 00641 01F5 210A adc* disp2
688 00642 01F6 6C0C lda force_zero
689 00643 01F7 210B adc* disp3
690 00644 01F8 F400 rts
00645 ;*****************************************
00646 radio_disp_add1:
693 00647 01F9 6C14 lda global_buf0
694 00648 01FA 2508 add* disp0
695 00649 01FB 5508 daa* disp0
696 00650 01FC 6C15 lda global_buf1
697 00651 01FD 2109 adc* disp1
698 00652 01FE 5509 daa* disp1
699 00653 01FF 6C16 lda global_buf2
700 00654 0200 210A adc* disp2
701 00655 0201 550A daa* disp2
702 00656 0202 6C17 lda global_buf3
703 00657 0203 210B adc* disp3
704 00658 0204 F400 rts
00659 ;*****************************************
00660 hex_to_dec:
707 00661 0205 6C08 lda disp0
708 00662 0206 6818 sta global_buf4
709 00663 0207 6C09 lda disp1
710 00664 0208 6819 sta global_buf5
711 00665 0209 6C0A lda disp2
712 00666 020A 681A sta global_buf6
713 00667 020B 6C0B lda disp3
714 00668 020C 681B sta global_buf7
715 00669 020D 5808 lds disp0,00h
716 00670 020E 5809 lds disp1,00h
717 00671 020F 580A lds disp2,00h
718 00672 0210 580B lds disp3,00h
0673
720 00674 0211 6C1B lda global_buf7
721 00675 0212 6870 sta 70h
722 00676 0213 5A17 lds global_buf3,04h
723 00677 0214 5816 lds global_buf2,00h
724 00678 0215 5C95 lds global_buf1,09h
725 00679 0216 5B14 lds global_buf0,06h
726 00680 0217 C229 call hex_2_dec
0681
728 00682 0218 6C1A lda global_buf6
729 00683 0219 6870 sta 70h
730 00684 021A 5817 lds global_buf3,00h
731 00685 021B 5916 lds global_buf2,02h
732 00686 021C 5A95 lds global_buf1,05h
733 00687 021D C229 call hex_2_dec
0688
735 00689 021E 6C19 lda global_buf5
736 00690 021F 6870 sta 70h
737 00691 0220 5816 lds global_buf2,00h
738 00692 0221 5895 lds global_buf1,01h
739 00693 0222 C229 call hex_2_dec
0694
741 00695 0223 6C18 lda global_buf4
742 00696 0224 6870 sta 70h
743 00697 0225 5815 lds global_buf1,00h
744 00698 0226 5894 lds global_buf0,01h
745 00699 0227 C229 call hex_2_dec
746 00700 0228 F400 rts
00701 ;***************************************
00702 hex_2_dec:
749 00703 0229 6C70 lda 70h
750 00704 022A B22E jz hex_2_dec1
00705 hex_2_dec0:
752 00706 022B C1F9 call radio_disp_add1
753 00707 022C 4170 dec* 70h
754 00708 022D A22B jnz hex_2_dec0
00709 hex_2_dec1:
756 00710 022E F400 rts
00711 ;*******************************************
00712 read_i2c_radio_num:
759 00713 022F C270 call i2c_read_mode
760 00714 0230 6C26 lda i2c_data3
761 00715 0231 6806 sta radio_num1
762 00716 0232 2624 sub i2c_data1
763 00717 0233 A23E jnz read_i2c_rn_end
764 00718 0234 6C25 lda i2c_data2
765 00719 0235 6805 sta radio_num0
766 00720 0236 2623 sub i2c_data0
767 00721 0237 A23E jnz read_i2c_rn_end
0722
769 00723 0238 5970 lds 70h,02h
770 00724 0239 2625 sub i2c_data2
771 00725 023A 5EF0 lds 70h,0dh
772 00726 023B 2226 sbc i2c_data3
773 00727 023C BA3E jc read_i2c_rn_end
774 00728 023D F400 rts
00729 read_i2c_rn_end:
776 00730 023E 5805 lds radio_num0,00h
777 00731 023F 5806 lds radio_num1,00h
778 00732 0240 F400 rts
00733 ;********************************************
00734 predivider_int:
781 00735 0241 680F sta reg_acc
782 00736 0242 4A0E maf reg_cf
0737
0738
785 00739 0243 6C2E lda led_flag
786 00740 0244 B24E jz predivider_int1
787 00741 0245 4772 ipc 72h
788 00742 0246 824D jb0 predivider_int0
789 00743 0247 8A4D jb1 predivider_int0
790 00744 0248 412E dec* led_flag
791 00745 0249 A24E jnz predivider_int1
792 00746 024A 58F2 lds 72h,01h
793 00747 024B 07F2 lcp 1fh,02h
794 00748 024C D24E jmp predivider_int1
00749 predivider_int0:
796 00750 024D 5D2E lds led_flag,0ah
00751 predivider_int1:
0752
799 00753 024E 582A lds bat_flag,00h
800 00754 024F 4472 ipb 72h
801 00755 0250 9A52 jb3 predivider_int2
802 00756 0251 58AA lds bat_flag,01h
00757 predivider_int2:
804 00758 0252 6C2D lda halt_release
805 00759 0253 A255 jnz predivider_end
806 00760 0254 C307 call radio_display
0761
00762 predivider_end:
809 00763 0255 6D0E mra reg_cf
810 00764 0256 6C0F lda reg_acc
811 00765 0257 F400 rts
00766 ;*******************************************
00767 store_radio_i2c:
814 00768 0258 5994 lds global_buf0,03h
00769 store_radio_i2c0:
816 00770 0259 5821 lds i2c_addr0,00h
817 00771 025A 5822 lds i2c_addr1,00h
818 00772 025B 6C06 lda radio_num1
819 00773 025C 6826 sta i2c_data3
820 00774 025D 6824 sta i2c_data1
821 00775 025E 6C05 lda radio_num0
822 00776 025F 6825 sta i2c_data2
823 00777 0260 6823 sta i2c_data0
824 00778 0261 C278 call i2c_write_mode
825 00779 0262 5826 lds i2c_data3,00h
826 00780 0263 5825 lds i2c_data2,00h
827 00781 0264 5824 lds i2c_data1,00h
828 00782 0265 5823 lds i2c_data0,00h
829 00783 0266 C270 call i2c_read_mode
830 00784 0267 4114 dec* global_buf0
831 00785 0268 B26F jz store_radio_i2c1
0786
833 00787 0269 6C06 lda radio_num1
834 00788 026A 2626 sub i2c_data3
835 00789 026B A259 jnz store_radio_i2c0
836 00790 026C 6C05 lda radio_num0
837 00791 026D 2625 sub i2c_data2
838 00792 026E A259 jnz store_radio_i2c0
00793 store_radio_i2c1:
840 00794 026F F400 rts
0795
00796 ;*******************************************
00797 ; i2c_memory 93lc46a subroutine
00798 ;*******************************************
00799 i2c_read_mode:
846 00800 0270 5870 lds 70h,00h
847 00801 0271 0C70 opb 70h
848 00802 0272 F5B7 spb 10111b
849 00803 0273 5B27 lds i2c_sbopcode,06h
850 00804 0274 C28C call send_sbopcode
851 00805 0275 C29D call send_i2c_address
852 00806 0276 C2CB call read_i2c_data
853 00807 0277 F400 rts
00808 ;*******************************************
00809 i2c_write_mode:
856 00810 0278 5870 lds 70h,00h
857 00811 0279 0C70 opb 70h
858 00812 027A F5B7 spb 10111b
859 00813 027B 5AA7 lds i2c_sbopcode,05h
860 00814 027C C28C call send_sbopcode
861 00815 027D C29D call send_i2c_address
862 00816 027E C2A8 call send_i2c_data
863 00817 027F 5D29 lds i2c_buff1,0ah
864 00818 0280 C2EA call detect_ready
865 00819 0281 F400 rts
00820 ;*******************************************
00821 i2c_write_enable:
868 00822 0282 5870 lds 70h,00h
869 00823 0283 0C70 opb 70h
870 00824 0284 F5B7 spb 10111b
871 00825 0285 5821 lds i2c_addr0,00h
872 00826 0286 59A2 lds i2c_addr1,03h
873 00827 0287 5A27 lds i2c_sbopcode,04h
874 00828 0288 C28C call send_sbopcode
875 00829 0289 C29D call send_i2c_address
876 00830 028A 0C0C opb force_zero
877 00831 028B F400 rts
0832
00833 ;*******************************************
00834 send_sbopcode:
881 00835 028C 5970 lds 70h,02h
882 00836 028D 0C70 opb 70h
883 00837 028E 5870 lds 70h,00h
884 00838 028F 0C70 opb 70h
885 00839 0290 5AF0 lds 70h,05h
886 00840 0291 0C70 opb 70h
887 00841 0292 5928 lds i2c_buff0,02h
00842 send_sb0:
889 00843 0293 6C27 lda i2c_sbopcode
890 00844 0294 9297 jb2 send_sb1
891 00845 0295 C2F4 call send_zero
892 00846 0296 D299 jmp send_sb2
00847 send_sb1:
894 00848 0297 C2FA call send_one
895 00849 0298 0000 nop
00850 send_sb2:
897 00851 0299 5227 sl0 i2c_sbopcode
898 00852 029A 5228 sl0 i2c_buff0
899 00853 029B A293 jnz send_sb0
900 00854 029C F400 rts
00855 ;******************************************
0856
00857 send_i2c_address:
904 00858 029D 5A28 lds i2c_buff0,04h
905 00859 029E 6C22 lda i2c_addr1
906 00860 029F 6829 sta i2c_buff1
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -