51 MCU kontroll stereo FM transmitter tegemise BH1415F
Kirjeldus: 1, juhtimine, kasutades MCS51, kasutades väikseimat rakendada süsteemi disain, välise ringluse on väga lihtne! 16 nupp disain, saate 80.0 ~ 109.9MHz sagedusalas;
2,4 kohaline ühise anoodi LED ekraan sagedus;
Omadused: 1, saab määrata iseseisvalt sada kümme, natuke sagedus koma;
2, saatesagedus presets;
3, mono / stereo kontrolli; bänd stereo saatja juhised;
-------------------------------------------------- -------------------------------------
; ***************************;
; CNC FM regulaator;
; ***************************;
;
; 26H-29H kümnendkohani ekraan, natuke, kümme, sada BCD kood, 24H-25H heakskiidu sagedusjuhtimine andmed (kuueteistkümnendsüsteemi)
;
CONBITL EQU 21H; sagedusjuhtimine bait madal 8
CONBITH EQU 22H; sagedusjuhtimine bait suur kaheksa
Märksõna EQU 23H; kui jätad põhiväärtus P1 pordiskannimist
;
;
ORG 0000H; programmi algus aadress
LJMP START, transfeer START täitmine
ORG 0003H;
RETI; programmi ei katkestata
ORG 000BH;
RETI; programmi ei katkestata
ORG 0013H;
RETI; programmi ei katkestata
ORG 001BH;
RETI; programmi ei katkestata
ORG 0023H;
RETI; programmi ei katkestata
ORG 002BH;
RETI; programmi ei katkestata
;
; Lähtestamisprotseduur
CLEARMEN: MOV R0, # 20H; 20H-29H ringlusse kustutatud
MOV R1, # 0AH;
CLEARLOOP: MOV @ R0, # 00H;
INC R0;
DJNZ R1, CLEARLOOP;
MOV P0, # 0FFH; neli porti loodud
MOV P1, # 0FFH;
MOV P2, # 0FFH;
MOV P3, # 0FFH;
CLR P3.0; BH1415 keelatud tegevused
CLR P3.1;
CLR P3.2;
LCALL KEYFUN15; kodus stereo ülekande režiimis avatud stereo saatja indikaator
CLEAR1: MOV PCON, # 00H; kontrolli register on kustutatud
MOV 29H, # 00H; määrata esialgne väärtus 88MHZ (näidatakse 088.0)
MOV 28H, # 08H;
MOV 27H, # 08H;
MOV 26H, # 00H;
LCALL DISPUPDAT; kirjutab BH1415 chip (Muudetud saatesageduste)
RET; Funktsioon tagastab
;
; Main
START: LCALL CLEARMEN; võim vormindamise
Peamine: LCALL KEYWORK; uurima võti alamprogrammi
LCALL DISPLAY; LED ekraan aeg
AJMP MAIN; üle MAIN tsükkel
NOP; PC veatöötluse
NOP;
AJMP START; taasinitsialiseerima
;
; 4 * 4 maatriks võti skaneerimine rutiinne kontroll
KEYWORK: MOV P1, # 0FFH;
CLR P1.0;
MOV, P1;
ANL, # 0F0H;
CJNE, # 0F0H, KEYCON;
SetB P1.0;
CLR P1.1;
MOV, P1;
ANL, # 0F0H;
CJNE, # 0F0H, KEYCON;
SetB P1.1;
CLR P1.2;
MOV, P1;
ANL, # 0F0H;
CJNE, # 0F0H, KEYCON;
SetB P1.2;
CLR P1.3;
MOV, P1;
ANL, # 0F0H;
CJNE, # 0F0H, KEYCON;
SetB P1.3;
RET;
KEYCON: LCALL DL10MS; debounce töötlemine
MOV, P1;
ANL, # 0F0H;
CJNE, # 0F0H, KEYCHE;
KEYOUT: RET; interferentsi Funktsioon tagastab
KEYCHE: MOV, P1;
MOV märksõna;
CJLOOP: LCALL DISPLAY;
MOV, P1;
ANL, # 0F0H;
CJNE, # 0F0H, CJLOOP;
MOV R7, # 00H;
MOV DPTR, # klaviatuurifailide;
CHEKEYLOOP: MOV, R7;
MOVC @ + DPTR;
XRL Märksõna;
JZ KEYOK; 0 (võrdne) pöörduda KEYOK
INC R7; valik, lisaks mitmed teatmetabelit
CJNE R7, # 10H, CHEKEYLOOP;
RET;
;
KEYOK: MOV, R7;
MOV B; B sisse
RL; vasak
ADD A, B, lisades, (võti tegelema JMP 3 poolt 3 baidi juhendamine)
MOV DPTR, # KEYFUNTAB;
JMP @ + 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; Hüppa 15th võti funktsionaalsust programmi
RET; massteisaldamiseks viga tagasipöördumist
;
; Võti number vastab P1 port väärtus tabelis (samas vajutades kaks võtmed on kehtetu operatsiooni)
Klaviatuurifailide: DB 0EEH, 0DEH, 0BEH, 7EH, 0EDH, 0DDH, 0BDH, 7DH
DB 0EBH, 0DBH, 0BBH, 7BH, 0E7H, 0D7H, 0B7H, 77H, 0FFH, 0FFH
;
; Ei 0 võti funktsionaalsust programmi
KEYFUN00: INC 29H;
MOV, 29H;
CLR C;
CJNE, # 02H, FUN00;
FUN00: JC FUN00OUT;
MOV 29H, # 00H;
FUN00OUT: MOV, 29H;
XRL, # 01H;
JNZ F00OUT1;
MOV 28H, # 00H;
AJMP F00OUT;
F00OUT1: MOV 28H, # 08H;
F00OUT: LCALL DISPUPDAT;
RET; Returns
;
; 1st võti funktsionaalsust programmi
KEYFUN01: INC 28H;
MOV, 28H;
CLR C;
CJNE, # 0AH, FUN01;
FUN01: JC FUN01OUT;
MOV 28H, # 00H;
FUN01OUT: MOV, 29H;
XRL, # 01H;
JNZ F01OUT;
MOV 28H, # 00H;
AJMP F001OUT;
F01OUT: MOV, 28H;
XRL, # 08H;
JZ F001OUT;
MOV, 28H;
XRL, # 09H;
JZ F001OUT;
MOV 28H, # 08H;
F001OUT: LCALL DISPUPDAT;
RET; Returns
;
; 2nd oluline funktsioon Programmi
KEYFUN02: INC 27H; ühe numbrit pluss 1
MOV, 27H;
CLR C;
CJNE, # 0AH, FUN02; teha kindlaks, kas vähemalt 10
FUN02: JC FUN02OUT; alla 10 pöördub FUN02OUT
MOV 27H, # 00H; suurem või võrdne 10 on puhastatud 0
FUN02OUT: LCALL DISPUPDAT; kirjalikult kontrolli kiip (Muudetud edastamise sagedus)
RET;
;
; 3rd võti funktsionaalsust programmi
KEYFUN03: INC 26H; ühe numbrit pluss 1
MOV, 26H;
CLR C;
CJNE, # 0AH, FUN03; kohtuotsus on vähemalt 10
FUN03: JC FUN03OUT; alla 10 pöördub FUN03OUT
MOV 26H, # 00H; suurem või võrdne 10 on puhastatud 0
FUN03OUT: LCALL DISPUPDAT; kirjalikult kontrolli kiip (Muudetud edastamise sagedus)
RET; Returns
;
; 04 peamised tegevusalad programmid (sagedus eelseadistusklahvile)
KEYFUN04: MOV 29H, # 01H; eelseadistatud 109.0MHZ saatesagedus
MOV 28H, # 00H
MOV 27H, # 09H
MOV 26H, # 00H
LCALL DISPUPDAT; kirjalikult kontrolli kiip (Muudetud edastamise sagedus)
RET
;
; 05 peamised tegevusalad programmid (sagedus eelseadistusklahvile)
KEYFUN05: MOV 29H, # 01H; eelseadistatud 108.0MHZ saatesagedus
MOV 28H, # 00H
MOV 27H, # 08H
MOV 26H, # 00H
LCALL DISPUPDAT; kirjalikult kontrolli kiip (Muudetud edastamise sagedus)
RET
;
; 06 peamised tegevusalad programmid (sagedus eelseadistusklahvile)
KEYFUN06: MOV 29H, # 01H; eelseadistatud 105.0MHZ saatesagedus
MOV 28H, # 00H
MOV 27H, # 05H
MOV 26H, # 00H
LCALL DISPUPDAT; kirjalikult kontrolli kiip (Muudetud edastamise sagedus)
RET
;
; 7th võti funktsionaalsust programmi (sagedus eelseadistusklahvile)
KEYFUN07: MOV 29H, # 01H; eelseadistatud 100.0MHZ saatesagedus
MOV 28H, # 00H
MOV 27H, # 00H
MOV 26H, # 00H
LCALL DISPUPDAT; kirjalikult kontrolli kiip (Muudetud edastamise sagedus)
RET
;
; 08 peamised tegevusalad programmid (sagedus eelseadistusklahvile)
KEYFUN08: MOV 29H, # 00H; eelseadistatud edastussagedusest 98.0MHZ
MOV 28H, # 09H
MOV 27H, # 08H
MOV 26H, # 00H
LCALL DISPUPDAT; kirjalikult kontrolli kiip (Muudetud edastamise sagedus)
RET
;
; 09 peamised tegevusalad programmid (sagedus eelseadistusklahvile)
KEYFUN09: MOV 29H, # 00H; eelseadistatud edastussagedusest 96.0MHZ
MOV 28H, # 09H
MOV 27H, # 06H
MOV 26H, # 00H
LCALL DISPUPDAT; kirjalikult kontrolli kiip (Muudetud edastamise sagedus)
RET
;
; 10th võti funktsionaalsust programmi (sagedus eelseadistusklahvile)
KEYFUN10: MOV 29H, # 00H; eelseadistatud edastussagedusest 94.0MHZ
MOV 28H, # 09H
MOV 27H, # 04H
MOV 26H, # 00H
LCALL DISPUPDAT; kirjalikult kontrolli kiip (Muudetud edastamise sagedus)
RET
;
; 11 peamised tegevusalad programmid (sagedus eelseadistusklahvile)
KEYFUN11: MOV 29H, # 00H; eelseadistatud edastussagedusest 92.0MHZ
MOV 28H, # 09H
MOV 27H, # 02H
MOV 26H, # 00H
LCALL DISPUPDAT; kirjalikult kontrolli kiip (Muudetud edastamise sagedus)
RET
;
; 12th võti funktsionaalsust programmi (sagedus eelseadistusklahvile)
KEYFUN12: MOV 29H, # 00H; eelseadistatud edastussagedusest 90.0MHZ
MOV 28H, # 09H
MOV 27H, # 00H
MOV 26H, # 00H
LCALL DISPUPDAT; kirjalikult kontrolli kiip (Muudetud edastamise sagedus)
RET
;
; 13th võti funktsionaalsust programmi (sagedus eelseadistusklahvile)
KEYFUN13: MOV 29H, # 00H; eelseadistatud edastussagedusest 88.0MHZ
MOV 28H, # 08H
MOV 27H, # 08H
MOV 26H, # 00H
LCALL DISPUPDAT; kirjalikult kontrolli kiip (Muudetud edastamise sagedus)
RET
;
; 14th võti funktsionaalsust programmi (sagedus eelseadistusklahvile) eelhäälestatud edastussagedusest 87.0MHZ
KEYFUN14: MOV 29H, # 00H
MOV 28H, # 08H
MOV 27H, # 07H
MOV 26H, # 08H
LCALL DISPUPDAT; kirjalikult kontrolli kiip (Muudetud edastamise sagedus)
RET
;
; 15 peamised tegevusalad programmid (stereo / mono seadistusvõtmele)
KEYFUN15: CPL 03H;
JNB 03H, MONO;
CLR P3.3;
LCALL PUTBIT;
RET; Returns
MON setB P3.3;
LCALL PUTBIT;
RET; Returns
;
; BCD et kuueteistkümnendsüsteemis ja viis kontrollkood sünteesi opcode kirjutage juhtkiip
DISPUPDAT: LCALL BCDB;
LCALL CONCOMMAND;
LCALL PUTBIT; Kirjuta kontrolli sõnu BH1415
RET; Returns
;
; BCD kuueteistkümnendarvuks programm
BCDB: MOV CONBITL, # 00H; kontrolli sõna 0
MOV CONBITH, # 00H; kontrolli sõna 0
MOV CONBITL, 26H; koma juhtsõna alumisse 8
MOV, 27H; üksiku numbri järgi 10 toimingud
MOV B # 10;
LCALL MULLOOP; tune korrutamine alamprogrammi
MOV, 28H; 100 kümnekohaline korrutustehe
MOV B # 100;
LCALL MULLOOP; tune korrutamine alamprogrammi
MOV, 29H;
JNZ ADD3E8; sadu number on omakorda ADD3E8 (pluss 1000 operatsioone)
RET; sadu number on 0 exit
ADD3E8: CLR C; selge binaarne lipp
MOV, # 0E8H; madal 8-bit rästik
Lisage, CONBITL; kogunema
MOV CONBITL,; tagasi CONBITL
MOV, # 03H; kõrge kaheksa lisamine
ADDC, CONBITH;
MOV CONBITH,; tagasi CONBITH
RET; Returns
;
; Paljunemine ja koondamise protsessi (neli kohta peale koma ekraan BCD kood binaarne number)
MULLOOP: MUL AB, korrutamine
Selge carry flag; CLR C
Lisage, CONBITL; krundi CONBITL lisades väikese 8
MOV CONBITL,; tagasi CONBITL
MOV, CONBITH;
ADDC A, B, integreeritud kõrge 8-bit aku koos CONBITH
MOV CONBITH,; tagasi CONBITH
RET; Returns
;
; Sagedusjuhtimine andmed ja viis kontrollkood sünteesi BH1415 juhtsõna
CONCOMMAND: ANL CONBITH, # 07H;
MOV, 20H;
ORL, CONBITH;
MOV CONBITH,;
RET; Returns
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Display programmi;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Ühine anood LED-ekraan, P0 port väljund osa kood, P2 port väljund skaneerimise sõna
EKRAAN: MOV R1, # 26H; kuvab esimese aadress
MOV R5, # 0FEH; Las skaneerimise sõna
PLAY: MOV, R5; sisse
MOV P2,; P2 port väljund
MOV @ R1; lainetuse andmete kuvamiseks
MOV DPTR, # TAB; võtta esimene aadress segment kooditabel
MOVC @ + DPTR; uurimine Segment
MOV P0,; alates P0 väljund
MOV, R5; loeb skaneeritud sõna
JB ACC.1, PLAY1; kui kümme (LED), koma ei kuvata
CLR P0.7; oli kümme, ekraan koma
PLAY1: LCALL DL1MS; valgustatud millisekundi
INC R1; osutades järgmisele andmete kuvamiseks
JNB ACC.3, ENDOUT; oli neljas LED, exit
RL asemel, vasak
MOV R5,; tagasi R5
SetB P0.7; Off kohaga
AJMP PLAY, transfeer PLAY tsükkel
ENDOUT: MOV P2, # 0FFH; Seansi lõpp ära kuvariväljund
MOV P0, # 0FFH;
RET; Returns
;
; 0-9 Shenyang jagu stopper
TAB: DB 0C0H, 0F9H, 0A4H, 0B0H, 99H, 92H, 82H, 0F8H, 80H, 90H, 0FFH, 0FFH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Saada kontrolli bait alamprogrammi;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
PUTBIT: MOV, CONBITL; madalam 8-bit kontroll sõna võtta
SetB P3.2; BH1415 lubamine (kirjuta)
LCALL öeldes; saata kaheksa
MOV, CONBITH; kõrge kaheksa juhtsõna sisse
LCALL öeldes; saata kaheksa
CLR P3.2; BH1415 kirjutada puudega
CLR P3.0; reset
CLR P3.1; reset
RET; Returns
;
; Byte edastab alamprogrammi
Pane: MOV R3, # 8; saata kaheksa kontroll
CLR C; Qing C
PUT1: RRC; Carry parem (alustades madal)
MOV P3.0, C, madal kuni P3.0 port
NOP; lükata 4 mikrosekundi
NOP;
NOP;
NOP;
SetB P3.1; riivi andmed (tõusev serv lukustatakse andmed)
NOP; lükata 4 mikrosekundi
NOP;
NOP;
NOP;
CLR P3.1;
DJNZ R3, PUT1; 8 bitti ei lõppenud tema omakorda PUT1 kordumise
8 valmis end Rets
;
; 513 mikrosekundi viivitus alamprogrammi
DL513: MOV R3, # 0FFH
DL513LOOP: DJNZ R3, DL513LOOP
RET
;
; 1 millisekundi viivitus alamprogramm (LED tuled kasutatakse)
DL1MS: MOV R4, # 02H
DL1MSLOOP: LCALL DL513
DJNZ R4, DL1MSLOOP
RET
;
; 10 ms viivitus alamprogramm (pabistama kaotamine)
DL10MS: MOV R6, # 0AH
DL10MSLOOP: LCALL DL1MS
DJNZ R6, DL10MSLOOP
RET
;
;
END
Meie teise tootega:
