51 MCU kontroll stereo FM-sändare som gör BH1415F
Beskrivning: 1, kontrollera med hjälp MCS51, med den minsta ansökan systemdesign, är den yttre kretsen mycket enkel! 16 knapp design kan du styra 80.0 ~ 109.9MHz frekvensområdet;
2,4 siffra gemensam anod LED-display frekvens;
Funktioner: 1, kan ställas in oberoende av varandra hundra, tio, lite, hur ofta decimalkommat;
2, de sändande frekvens förinställningar;
3, mono / stereo kontroller, band stereo sändare instruktioner;
-------------------------------------------------- -------------------------------------
; ***************************;
, CNC FM controller;
; ***************************;
;
; 26H-29H decimal display, lite, tio, hundra BCD kodnummer, uppgifter 24H-25H frekvensurladdningskontroll (hexadecimal)
;
CONBITL EQU 21H, frekvenskontroll byte låg 8
CONBITH EQU 22H, frekvenskontroll byte high åtta
NYCKELORD EQU 23H; Vid lagring nyckelvärde P1 portskanning
;
;
ORG 0000H, programstart adress
LJMP START, START utförande överföring
ORG 0003H;
RETI, inte avbryta program
ORG 000BH;
RETI, inte avbryta program
ORG 0013H;
RETI, inte avbryta program
ORG 001BH;
RETI, inte avbryta program
ORG 0023H;
RETI, inte avbryta program
ORG 002BH;
RETI, inte avbryta program
;
; Initiering förfarande
CLEARMEN: MOV R0, # 20H, 20H-29H cirkulation rensas
MOV R1, # 0AH;
CLEARLOOP: MOV @ R0, # 00H;
INC R0;
DJNZ R1, CLEARLOOP;
MOV P0, # 0FFH, fyra portar som
MOV P1, # 0FFH;
MOV P2, # 0FFH;
MOV P3, # 0FFH;
CLR P3.0; BH1415 förbjudna åtgärder
CLR P3.1;
CLR P3.2;
LCALL KEYFUN15, stereo sändningsteknik, indikator sändare öppen stereo
CLEAR1: MOV PCON, # 00H, registerkontroll rensas
MOV 29H, # 00H; ställa in initialvärdet för 88MHZ (visad som 088.0)
MOV 28H, # 08H;
MOV 27H, # 08H;
MOV 26H, # 00H;
LCALL DISPUPDAT, skriver BH1415 chip (modifierad sändningsfrekvenser)
RET; subrutinen återgår
;
Viktigaste
START: LCALL CLEARMEN; strömmen initiering
MAIN: LCALL Keywork; undersöka nyckel subrutin
LCALL DISPLAY, LED-display tid
AJMP MAIN, överföra HUVUD cykel
NOP, PC felhantering
NOP;
AJMP START; åter initiera
;
; 4 * 4 matris nyckel scanning rutinkontroll
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: LCALL DL10MS; debounce bearbetning
MOV A, P1;
ANL A, # 0F0H;
CJNE A, # 0F0H, KEYCHE;
KEYOUT: RET, interferens, subrutinen återgår
KEYCHE: MOV A, P1;
MOV NYCKELORD, A;
CJLOOP: LCALL DISPLAY;
MOV A, P1;
ANL A, # 0F0H;
CJNE A, # 0F0H, CJLOOP;
MOV R7, # 00H;
MOV DPTR, # nyckeltabellfil;
CHEKEYLOOP: MOV A, R7;
MOVC A, @ A + DPTR;
XRL A, sökord;
JZ KEYOK; 0 (lika) vända KEYOK
INC R7, sortiment, plus ett antal uppslagstabell
CJNE R7, # 10H, CHEKEYLOOP;
RET;
;
KEYOK: MOV A, R7;
MOV B, A, B, till
RL A, vänster
ADD A, B, lägga (nyckel för att ta itu med JMP 3 av 3-byte instruktion)
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; hopp till 15th nyckel funktionalitet av programmet
RET, massöverföring fel retur
;
; Nyckelnumret motsvarar P1 portvärdet bord (samtidigt som du trycker på två tangenter är ogiltig operation)
Keytab: DB 0EEH, 0DEH, 0BEH, 7EH, 0EDH, 0DDH, 0BDH, 7DH
DB 0EBH, 0DBH, 0BBH, 7BH, 0E7H, 0D7H, 0B7H, 77H, 0FFH, 0FFH
;
, Nej 0 viktiga funktioner i programmet
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; Returer
;
, The 1st viktiga funktioner i programmet
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; Returer
;
, The 2nd nyckelfunktion program
KEYFUN02: INC 27H; enstaka siffror plus 1
MOV A, 27H;
CLR C;
CJNE A, # 0AH, FUN02; avgöra om mindre än 10
FUN02 JC FUN02OUT; mindre än 10 vänder FUN02OUT
MOV 27H, # 00H, större än eller lika med 10 rensas till 0
FUN02OUT: LCALL DISPUPDAT, skriver styrchip (modifierad sändningsfrekvens)
RET;
;
, The 3rd viktiga funktioner i programmet
KEYFUN03: INC 26H; enstaka siffror plus 1
MOV A, 26H;
CLR C;
CJNE A, # 0AH, FUN03, dom är inte mindre än 10
FUN03 JC FUN03OUT; mindre än 10 vänder FUN03OUT
MOV 26H, # 00H, större än eller lika med 10 rensas till 0
FUN03OUT: LCALL DISPUPDAT, skriver styrchip (modifierad sändningsfrekvens)
RET; Returer
;
; 04 viktiga funktionella program (frekvens förinställda tangenter)
KEYFUN04: MOV 29H, # 01H; förinställd 109.0MHZ sändningsfrekvens
MOV 28H, # 00H
MOV 27H, # 09H
MOV 26H, # 00H
LCALL DISPUPDAT, skrivstyrchip (modifierad sändningsfrekvens)
RET
;
; 05 viktiga funktionella program (frekvens förinställda tangenter)
KEYFUN05: MOV 29H, # 01H; förinställd 108.0MHZ sändningsfrekvens
MOV 28H, # 00H
MOV 27H, # 08H
MOV 26H, # 00H
LCALL DISPUPDAT, skrivstyrchip (modifierad sändningsfrekvens)
RET
;
; 06 viktiga funktionella program (frekvens förinställda tangenter)
KEYFUN06: MOV 29H, # 01H; förinställd 105.0MHZ sändningsfrekvens
MOV 28H, # 00H
MOV 27H, # 05H
MOV 26H, # 00H
LCALL DISPUPDAT, skrivstyrchip (modifierad sändningsfrekvens)
RET
;
, The 7th viktiga funktioner i programmet (frekvens förinställda tangenter)
KEYFUN07: MOV 29H, # 01H; förinställd 100.0MHZ sändningsfrekvens
MOV 28H, # 00H
MOV 27H, # 00H
MOV 26H, # 00H
LCALL DISPUPDAT, skrivstyrchip (modifierad sändningsfrekvens)
RET
;
; 08 viktiga funktionella program (frekvens förinställda tangenter)
KEYFUN08: MOV 29H, # 00H; förinställd överföringsfrekvens 98.0MHZ
MOV 28H, # 09H
MOV 27H, # 08H
MOV 26H, # 00H
LCALL DISPUPDAT, skrivstyrchip (modifierad sändningsfrekvens)
RET
;
; 09 viktiga funktionella program (frekvens förinställda tangenter)
KEYFUN09: MOV 29H, # 00H; förinställd överföringsfrekvens 96.0MHZ
MOV 28H, # 09H
MOV 27H, # 06H
MOV 26H, # 00H
LCALL DISPUPDAT, skrivstyrchip (modifierad sändningsfrekvens)
RET
;
, The 10th viktiga funktioner i programmet (frekvens förinställda tangenter)
KEYFUN10: MOV 29H, # 00H; förinställd överföringsfrekvens 94.0MHZ
MOV 28H, # 09H
MOV 27H, # 04H
MOV 26H, # 00H
LCALL DISPUPDAT, skrivstyrchip (modifierad sändningsfrekvens)
RET
;
; 11 viktiga funktionella program (frekvens förinställda tangenter)
KEYFUN11: MOV 29H, # 00H; förinställd överföringsfrekvens 92.0MHZ
MOV 28H, # 09H
MOV 27H, # 02H
MOV 26H, # 00H
LCALL DISPUPDAT, skrivstyrchip (modifierad sändningsfrekvens)
RET
;
, The 12th viktiga funktioner i programmet (frekvens förinställda tangenter)
KEYFUN12: MOV 29H, # 00H; förinställd överföringsfrekvens 90.0MHZ
MOV 28H, # 09H
MOV 27H, # 00H
MOV 26H, # 00H
LCALL DISPUPDAT, skrivstyrchip (modifierad sändningsfrekvens)
RET
;
, The 13th viktiga funktioner i programmet (frekvens förinställda tangenter)
KEYFUN13: MOV 29H, # 00H; förinställd överföringsfrekvens 88.0MHZ
MOV 28H, # 08H
MOV 27H, # 08H
MOV 26H, # 00H
LCALL DISPUPDAT, skrivstyrchip (modifierad sändningsfrekvens)
RET
;
, The 14th viktiga funktioner i programmet (frekvens förinställda tangenter), förinställd sändningsfrekvens 87.0MHZ
KEYFUN14: MOV 29H, # 00H
MOV 28H, # 08H
MOV 27H, # 07H
MOV 26H, # 08H
LCALL DISPUPDAT, skrivstyrchip (modifierad sändningsfrekvens)
RET
;
; 15 viktiga funktionella program (stereo / mono inställningsknappen)
KEYFUN15: CPL 03H;
JNB 03H, MONO;
CLR P3.3;
LCALL PUTBIT;
RET; Returer
Mån SETB P3.3;
LCALL PUTBIT;
RET; Returer
;
, Den BCD till hexadecimal och fem kontrollkod syntes opcode, skriver styrchip
DISPUPDAT: LCALL BCDB;
LCALL CONCOMMAND;
LCALL PUTBIT, skicka styrord till BH1415
RET; Returer
;
; Den BCD till hexadecimal program
BCDB: MOV CONBITL, # 00H, styrord till 0
MOV CONBITH, # 00H, styrord till 0
MOV CONBITL, 26H; decimaler styr ordet i låga 8
MOV A, 27H, ensiffriga av 10 verksamhet
MOV B, # 10;
LCALL MULLOOP; tune multiplikation subrutin
MOV A, 28H, 100 tiosiffriga multiplikation operation
MOV B, # 100;
LCALL MULLOOP; tune multiplikation subrutin
MOV A, 29H;
JNZ ADD3E8, hundratals siffra är en sväng ADD3E8 (plus 1000 verksamhet)
RET, hundratals siffra är 0 exit
ADD3E8: CLR C; tydlig binär flagga
MOV A, # 0E8H; låg 8-bitars adderare
ADD A, CONBITL; ackumuleras
MOV CONBITL, A; back CONBITL
MOV A, # 03H; hög åtta Tillsats
ADDC A, CONBITH;
MOV CONBITH, A; back CONBITH
RET; Returer
;
, Multiplikation och ackumulation process (till fyra decimaler display BCD kod i ett binärt tal)
MULLOOP: MUL AB; multiplikation
Rensa bär flagga; CLR C
ADD A, CONBITL, tomt med CONBITL lägga låg 8
MOV CONBITL, A; back CONBITL
MOV A, CONBITH;
ADDC A, B, integrerad i hög 8-bitars ackumulator med CONBITH
MOV CONBITH, A; back CONBITH
RET; Returer
;
, Frekvensstyrdata och fem kontrollkod syntes BH1415 styrord
CONCOMMAND: ANL CONBITH, # 07H;
MOV A, 20H;
ORL A, CONBITH;
MOV CONBITH, A;
RET; Returer
;
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
,, Display program;;
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
, Gemensam anod LED-display, P0 portutgång kodavsnitt, P2 portutgång scanning ord
DISPLAY: MOV R1, # 26H, visar den första adressen
MOV R5, # 0FEH; Låt scanning ord
PLAY: MOV A, R5; till A
MOV P2, A; P2 portoutput
MOV A, @ R1; hämta visa data
MOV DPTR, # TAB, ta den första adressen segmentet kodtabell
MOVC A, @ A + DPTR; utredning Segment
MOV P0, A; från P0 utgång
MOV A, R5, läser den scannade ordet
JB ACC.1, PLAY1, än tio (LED), är decimalpunkten inte visas
CLR P0.7, var tio, display decimal
PLAY1: LCALL DL1MS, tände en millisekund
INC R1, pekar på nästa visningsuppgifter
JNB ACC.3, ENDOUT, var den fjärde LED, avfart
RL A, utan lämnade en
MOV R5, A; back R5
SETB P0.7; Off decimal
AJMP PLAY, överföring PLAY cykel
ENDOUT: MOV P2, # 0FFH, Visa slutar utanför visningsskärm
MOV P0, # 0FFH;
RET; Returer
;
; 0-9 Shenyang Avsnitt stoppur
TAB: DB 0C0H, 0F9H, 0A4H, 0B0H, 99H, 92H, 82H, 0F8H, 80H, 90H, 0FFH, 0FFH
;
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
,, Skicka styrbyte subrutin;;
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
;
PUTBIT: MOV A, CONBITL, lägre 8-bitars kontrollord i A
SETB P3.2; BH1415 Aktivera (skriv)
LCALL PUT; skicka åtta
MOV A, CONBITH, hög åtta styrord till A
LCALL PUT; skicka åtta
CLR P3.2; BH1415 skriva inaktiverad
CLR P3.0; återställ
CLR P3.1; återställ
RET; Returer
;
; Byte sändnings subrutin
PUT: MOV R3, # 8, skicka åtta kontroll
CLR C; Qing C
PUT1: RRC A; Carry höger (börjar lågt)
MOV P3.0, C, låg på P3.0 porten
NOP; försena 4 mikrosekunder
NOP;
NOP;
NOP;
SETB P3.1, spärrdata (stigande flank spärren data)
NOP; försena 4 mikrosekunder
NOP;
NOP;
NOP;
CLR P3.1;
DJNZ R3, PUT1; 8 bits inte avslutat sin tur PUT1 återfall
8 färdiga ände; RET
;
; 513 mikrosekunders fördröjning subrutin
DL513: MOV R3, # 0FFH
DL513LOOP: DJNZ R3, DL513LOOP
RET
;
; 1 millisekund fördröjning subrutin (LED-lampor som används)
DL1MS: MOV R4, # 02H
DL1MSLOOP: LCALL DL513
DJNZ R4, DL1MSLOOP
RET
;
; 10 ms fördröjning subrutin (jitter eliminering av)
DL10MS: MOV R6, # 0AH
DL10MSLOOP: LCALL DL1MS
DJNZ R6, DL10MSLOOP
RET
;
;
SLUT
Vår andra produkt:
