51 MCU kawalan stereo pemancar FM membuat BH1415F
Description: 1, mengawal menggunakan MCS51, dengan menggunakan reka bentuk yang paling kecil sistem aplikasi, litar luar adalah sangat mudah! 16 butang reka bentuk, anda boleh mengawal 80.0 ~ julat frekuensi 109.9MHz;
2,4 digit anod biasa LED kekerapan paparan;
Ciri-ciri: 1, boleh ditetapkan secara bebas seratus, sepuluh, sedikit, kekerapan titik perpuluhan;
2, pratetap kekerapan penghantaran;
3, kawalan mono / stereo; arahan pemancar jalur stereo;
-------------------------------------------------- -------------------------------------
; ***************************;
; CNC pengawal FM;
; ***************************;
;
; 26H-29H tempat perpuluhan paparan, sedikit, sepuluh, seratus nombor kod BCD, data 24H-25H kawalan frekuensi pelepasan (hexadecimal)
;
CONBITL EQU 21H; kawalan frekuensi bait 8 rendah
CONBITH EQU 22H; kekerapan kawalan bait tinggi lapan
KEYWORD EQU 23H; Apabila menyimpan nilai utama imbasan pelabuhan P1
;
;
ORG 0000H; program alamat permulaan
LJMP START; pemindahan pelaksanaan START
ORG 0003H;
Reti, jangan mengganggu program
ORG 000BH;
Reti, jangan mengganggu program
ORG 0013H;
Reti, jangan mengganggu program
ORG 001BH;
Reti, jangan mengganggu program
ORG 0023H;
Reti, jangan mengganggu program
ORG 002BH;
Reti, jangan mengganggu program
;
; Memulakan prosedur
CLEARMEN: MOV R0, # 20H; peredaran 20H-29H dibersihkan
MOV R1, # 0AH;
CLEARLOOP: MOV @ R0, # 00H;
INC R0;
DJNZ R1, CLEARLOOP;
MOV P0, # 0FFH; empat pelabuhan ditetapkan
MOV P1, # 0FFH;
MOV P2, # 0FFH;
MOV P3, # 0FFH;
Tindakan BH3.0 dilarang; CLR P1415
CLR P3.1;
CLR P3.2;
LCALL KEYFUN15; mod penghantaran stereo rumah, stereo terbuka penunjuk pemancar
CLEAR1: PCON MOV, # 00H; kawalan daftar dikosongkan
MOV 29H, # 00H letakkan nilai awal 88MHZ (ditunjukkan sebagai 088.0)
MOV 28H, # 08H;
MOV 27H, # 08H;
MOV 26H, # 00H;
LCALL DISPUPDAT; menulis cip BH1415 (modified frekuensi penghantaran)
Pulangan subrutin; RET
;
; Utama
MULA: LCALL CLEARMEN; kuasa pada pengawalan
UTAMA: LCALL KEYWORK; menyiasat subrutin utama
LCALL DISPLAY; LED paparan masa
AJMP UTAMA; memindahkan kitaran UTAMA
NOP; pengendalian ralat PC
NOP;
AJMP START; memulakan semula
;
; 4 4 * utama matriks pengimbasan pemeriksaan rutin
KEYWORK: MOV P1, # 0FFH;
CLR P1.0;
MOV A, P1;
ANL A, # 0F0H;
CJNE A, # 0F0H, KEYCON;
SETB P1.0;
CLR P1.1;
MOV A, P1;
ANL A, # 0F0H;
CJNE A, # 0F0H, KEYCON;
SETB P1.1;
CLR P1.2;
MOV A, P1;
ANL A, # 0F0H;
CJNE A, # 0F0H, KEYCON;
SETB P1.2;
CLR P1.3;
MOV A, P1;
ANL A, # 0F0H;
CJNE A, # 0F0H, KEYCON;
SETB P1.3;
RET;
KEYCON: DL10MS LCALL; pemprosesan debounce
MOV A, P1;
ANL A, # 0F0H;
CJNE A, # 0F0H, KEYCHE;
KEYOUT: RET; gangguan, pulangan subrutin
KEYCHE: MOV A, P1;
KEYWORD MOV, A;
CJLOOP: LCALL DISPLAY;
MOV A, P1;
ANL A, # 0F0H;
CJNE A, # 0F0H, CJLOOP;
MOV R7, # 00H;
MOV DPTR, # KEYTAB;
CHEKEYLOOP: MOV A, R7;
MOVC A, @ A + DPTR;
XRL A, KEYWORD;
JZ KEYOK; 0 (yang sama) bertukar KEYOK
INC R7; pelbagai, ditambah dengan beberapa jadual carian
CJNE R7, # 10H, CHEKEYLOOP;
RET;
;
KEYOK: MOV A, R7;
MOV B, A; B ke dalam
RL A; meninggalkan
MASUKKAN A, B; menambah (utama untuk menangani JMP 3 3 oleh arahan-bait)
MOV DPTR, # KEYFUNTAB;
JMP @ A + DPTR;
KEYFUNTAB: LJMP KEYFUN00;
LJMP KEYFUN01;
LJMP KEYFUN02;
LJMP KEYFUN03
LJMP KEYFUN04
LJMP KEYFUN05
LJMP KEYFUN06
LJMP KEYFUN07
LJMP KEYFUN08
LJMP KEYFUN09
LJMP KEYFUN10
LJMP KEYFUN11
LJMP KEYFUN12
LJMP KEYFUN13
LJMP KEYFUN14
LJMP KEYFUN15; melompat kepada fungsi utama 15th program ini
RET; pulangan ralat pemindahan pukal
;
; Bilangan utama yang sepadan dengan P1 jadual nilai port (semasa menekan dua kunci adalah operasi yang tidak sah)
KEYTAB: DB 0EEH, 0DEH, 0BEH, 7EH, 0EDH, 0DDH, 0BDH, 7DH
DB 0EBH, 0DBH, 0BBH, 7BH, 0E7H, 0D7H, 0B7H, 77H, 0FFH, 0FFH
;
; No 0 fungsi utama program itu
KEYFUN00: INC 29H;
MOV A, 29H;
CLR C;
CJNE A, # 02H, FUN00;
FUN00: JC FUN00OUT;
MOV 29H, # 00H;
FUN00OUT: MOV A, 29H;
XRL A, # 01H;
JNZ F00OUT1;
MOV 28H, # 00H;
AJMP F00OUT;
F00OUT1: MOV 28H, # 08H;
F00OUT: LCALL DISPUPDAT;
RET; Pulangan
;
; Ini 1st fungsi utama program itu
KEYFUN01: INC 28H;
MOV A, 28H;
CLR C;
CJNE A, # 0AH, FUN01;
FUN01: JC FUN01OUT;
MOV 28H, # 00H;
FUN01OUT: MOV A, 29H;
XRL A, # 01H;
JNZ F01OUT;
MOV 28H, # 00H;
AJMP F001OUT;
F01OUT: MOV A, 28H;
XRL A, # 08H;
JZ F001OUT;
MOV A, 28H;
XRL A, # 09H;
JZ F001OUT;
MOV 28H, # 08H;
F001OUT: LCALL DISPUPDAT;
RET; Pulangan
;
; Ini 2nd program fungsi utama
KEYFUN02: INC 27H; digit tunggal ditambah 1
MOV A, 27H;
CLR C;
CJNE A, # 0AH, FUN02; menentukan sama ada kurang daripada 10
FUN02: JC FUN02OUT; kurang daripada 10 bertukar FUN02OUT
MOV 27H, # 00H; lebih besar daripada atau sama dengan 10 dikosongkan untuk 0
FUN02OUT: LCALL DISPUPDAT; menulis cip kawalan (frekuensi penghantaran diubahsuai)
RET;
;
; Ini 3rd fungsi utama program itu
KEYFUN03: INC 26H; digit tunggal ditambah 1
MOV A, 26H;
CLR C;
CJNE A, # 0AH, FUN03; penghakiman tidak kurang daripada 10
FUN03: JC FUN03OUT; kurang daripada 10 bertukar FUN03OUT
MOV 26H, # 00H; lebih besar daripada atau sama dengan 10 dikosongkan untuk 0
FUN03OUT: LCALL DISPUPDAT; menulis cip kawalan (frekuensi penghantaran diubahsuai)
RET; Pulangan
;
; 04 program utama berfungsi (frekuensi dipratetap kunci)
KEYFUN04: MOV 29H, # 01H; pratetap kekerapan 109.0MHZ pemancaran
MOV 28H, # 00H
MOV 27H, # 09H
MOV 26H, # 00H
LCALL DISPUPDAT; cip kawalan bertulis (frekuensi penghantaran diubahsuai)
RET
;
; 05 program utama berfungsi (frekuensi dipratetap kunci)
KEYFUN05: MOV 29H, # 01H; pratetap kekerapan 108.0MHZ pemancaran
MOV 28H, # 00H
MOV 27H, # 08H
MOV 26H, # 00H
LCALL DISPUPDAT; cip kawalan bertulis (frekuensi penghantaran diubahsuai)
RET
;
; 06 program utama berfungsi (frekuensi dipratetap kunci)
KEYFUN06: MOV 29H, # 01H; pratetap kekerapan 105.0MHZ pemancaran
MOV 28H, # 00H
MOV 27H, # 05H
MOV 26H, # 00H
LCALL DISPUPDAT; cip kawalan bertulis (frekuensi penghantaran diubahsuai)
RET
;
; Ini 7th fungsi utama program itu (kunci kekerapan dipratetap)
KEYFUN07: MOV 29H, # 01H; pratetap kekerapan 100.0MHZ pemancaran
MOV 28H, # 00H
MOV 27H, # 00H
MOV 26H, # 00H
LCALL DISPUPDAT; cip kawalan bertulis (frekuensi penghantaran diubahsuai)
RET
;
; 08 program utama berfungsi (frekuensi dipratetap kunci)
KEYFUN08: MOV 29H, # 00H; kekerapan penghantaran pratetap 98.0MHZ
MOV 28H, # 09H
MOV 27H, # 08H
MOV 26H, # 00H
LCALL DISPUPDAT; cip kawalan bertulis (frekuensi penghantaran diubahsuai)
RET
;
; 09 program utama berfungsi (frekuensi dipratetap kunci)
KEYFUN09: MOV 29H, # 00H; kekerapan penghantaran pratetap 96.0MHZ
MOV 28H, # 09H
MOV 27H, # 06H
MOV 26H, # 00H
LCALL DISPUPDAT; cip kawalan bertulis (frekuensi penghantaran diubahsuai)
RET
;
; Ini 10th fungsi utama program itu (kunci kekerapan dipratetap)
KEYFUN10: MOV 29H, # 00H; kekerapan penghantaran pratetap 94.0MHZ
MOV 28H, # 09H
MOV 27H, # 04H
MOV 26H, # 00H
LCALL DISPUPDAT; cip kawalan bertulis (frekuensi penghantaran diubahsuai)
RET
;
; 11 program utama berfungsi (frekuensi dipratetap kunci)
KEYFUN11: MOV 29H, # 00H; kekerapan penghantaran pratetap 92.0MHZ
MOV 28H, # 09H
MOV 27H, # 02H
MOV 26H, # 00H
LCALL DISPUPDAT; cip kawalan bertulis (frekuensi penghantaran diubahsuai)
RET
;
; Ini 12th fungsi utama program itu (kunci kekerapan dipratetap)
KEYFUN12: MOV 29H, # 00H; kekerapan penghantaran pratetap 90.0MHZ
MOV 28H, # 09H
MOV 27H, # 00H
MOV 26H, # 00H
LCALL DISPUPDAT; cip kawalan bertulis (frekuensi penghantaran diubahsuai)
RET
;
; Ini 13th fungsi utama program itu (kunci kekerapan dipratetap)
KEYFUN13: MOV 29H, # 00H; kekerapan penghantaran pratetap 88.0MHZ
MOV 28H, # 08H
MOV 27H, # 08H
MOV 26H, # 00H
LCALL DISPUPDAT; cip kawalan bertulis (frekuensi penghantaran diubahsuai)
RET
;
; Ini 14th fungsi utama program itu (kunci kekerapan dipratetap); pratetap penghantaran frekuensi 87.0MHZ
KEYFUN14: MOV 29H, # 00H
MOV 28H, # 08H
MOV 27H, # 07H
MOV 26H, # 08H
LCALL DISPUPDAT; cip kawalan bertulis (frekuensi penghantaran diubahsuai)
RET
;
; 15 program utama berfungsi (stereo / mono utama tetapan)
KEYFUN15: CPL 03H;
JNB 03H, MONO;
CLR P3.3;
LCALL PUTBIT;
RET; Pulangan
MON SETB P3.3;
LCALL PUTBIT;
RET; Pulangan
;
; Ini BCD kepada perenambelasan, dan lima kawalan kod sintesis OPCODE, menulis cip kawalan
DISPUPDAT: LCALL BCDB;
LCALL CONCOMMAND;
LCALL PUTBIT; menghantar kata-kata kawalan untuk BH1415
RET; Pulangan
;
; Ini BCD untuk program perenambelasan
BCDB: MOV CONBITL, # 00H; kawalan perkataan untuk 0
CONBITH MOV, # 00H; kawalan perkataan untuk 0
MOV CONBITL, 26H; tempat perpuluhan mengawal perkataan ke 8 yang rendah
MOV A, 27H; digit tunggal oleh operasi 10
MOV B, # 10;
LCALL MULLOOP; lagu pendaraban subrutin
MOV A, 28H; 100 sepuluh digit operasi pendaraban
MOV B, # 100;
LCALL MULLOOP; lagu pendaraban subrutin
MOV A, 29H;
JNZ ADD3E8; ratusan digit adalah ADD3E8 pula (tambah operasi 1000)
RET; ratusan angka adalah 0 keluar
ADD3E8: CLR C; bendera binari jelas
MOV 0E8H; rendah penambah 8-bit
MASUKKAN A, CONBITL; mengumpul
MOV CONBITL, A; kembali CONBITL
MOV 03H; tinggi lapan Penambahan
ADDC A, CONBITH;
MOV CONBITH, A; kembali CONBITH
RET; Pulangan
;
; Pendaraban dan proses pengumpulan (untuk empat perpuluhan paparan kod BCD ke nombor perduaan)
MULLOOP: MUL AB; pendaraban
Bawa bendera yang jelas; CLR C
MASUKKAN A, CONBITL; plot dengan CONBITL menambah 8 rendah
MOV CONBITL, A; kembali CONBITL
MOV A, CONBITH;
ADDC A, B, disepadukan ke dalam tinggi penumpuk 8-bit dengan CONBITH
MOV CONBITH, A; kembali CONBITH
RET; Pulangan
;
; Data kawalan Kekerapan dan lima kawalan sintesis kod kawalan BH1415 perkataan
CONCOMMAND: ANL CONBITH, # 07H;
MOV A, 20H;
ORL A, CONBITH;
MOV CONBITH, A;
RET; Pulangan
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Program Display;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Anod biasa paparan LED, P0 seksyen output pelabuhan kod, P2 output pelabuhan imbasan perkataan
DISPLAY: MOV R1, # 26H; memaparkan alamat pertama
MOV R5, # 0FEH; Mari perkataan pengimbasan
PLAY: MOV A, R5; ke A
MOV P2, A; P2 output pelabuhan
MOV A, @ R1; mengambil data paparan
MOV DPTR, # TAB; mengambil segmen alamat jadual kod yang pertama
MOVC A, @ A + DPTR; siasatan segmen
MOV P0, A; dari output P0
MOV A, R5; membaca perkataan diimbas
JB ACC.1, PLAY1; daripada sepuluh (LED), titik perpuluhan tidak dipaparkan
CLR P0.7; adalah sepuluh, ketika paparan perpuluhan
PLAY1: LCALL DL1MS; dinyalakan milisaat
INC R1; menunjuk ke paparan data seterusnya
JNB ACC.3, ENDOUT; yang keempat LED, keluar
RL A, sebaliknya, meninggalkan
MOV R5, A; kembali R5
SETB P0.7; Off perpuluhan
PLAY AJMP; pemindahan kitaran PLAY
ENDOUT: MOV P2, # 0FFH; Show berakhir off output paparan
MOV P0, # 0FFH;
RET; Pulangan
;
; 0 9-Shenyang Seksyen jam randik
TAB: DB 0C0H, 0F9H, 0A4H, 0B0H, 99H, 92H, 82H, 0F8H, 80H, 90H, 0FFH, 0FFH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Hantar kawalan bait subrutin;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
PUTBIT: MOV A, CONBITL; lebih rendah 8-bit kawalan perkataan ke dalam A
SETB P3.2; BH1415 Membolehkan (masuk)
LCALL PUT; menghantar lapan
MOV A, CONBITH; tinggi lapan kawalan perkataan ke dalam A
LCALL PUT; menghantar lapan
CLR P3.2; BH1415 menulis orang kurang upaya
CLR P3.0; menetapkan semula
CLR P3.1; menetapkan semula
RET; Pulangan
;
; Byte menghantar subrutin
LETAKKAN: MOV R3, # 8; menghantar lapan kawalan
CLR C; Qing C
PUT1: RRC A; Menjalankan hak (bermula rendah)
MOV P3.0, C; rendah ke pelabuhan P3.0 yang
NOP; melambatkan 4 mikrosaat
NOP;
NOP;
NOP;
SETB P3.1; data selak (kelebihan meningkat data selak)
NOP; melambatkan 4 mikrosaat
NOP;
NOP;
NOP;
CLR P3.1;
DJNZ R3, PUT1; bit 8 tidak selesai pula PUT1 berulang beliau
Akhir siap 8; RET
;
; 513 kelewatan mikrosekon subrutin
DL513: MOV R3, # 0FFH
DL513LOOP: DJNZ R3, DL513LOOP
RET
;
; 1 kelewatan milisaat subrutin (lampu LED digunakan)
DL1MS: MOV R4, # 02H
DL1MSLOOP: LCALL DL513
DJNZ R4, DL1MSLOOP
RET
;
; 10 subrutin kelewatan ms (penghapusan ketar oleh)
DL10MS: MOV R6, # 0AH
DL10MSLOOP: LCALL DL1MS
DJNZ R6, DL10MSLOOP
RET
;
;
AKHIR
produk kami yang lain:
