51 MCU rheolaeth stereo trosglwyddydd FM gwneud BH1415F
Disgrifiad: 1, rheoli gan ddefnyddio MCS51, gan ddefnyddio'r cynllun system ymgeisio lleiaf, y gylched allanol yn syml iawn! Dylunio botwm 16, gallwch reoli 80.0 ~ ystod amledd 109.9MHz;
2,4 digid anod cyffredin LED amlder arddangos;
Nodweddion: 1, gellir eu gosod yn annibynnol cant, deg, ychydig, pa mor aml y pwynt degol;
2, y presets amlder trosglwyddo;
3, rheolaethau mono / stereo, cyfarwyddiadau trosglwyddydd stereo band;
-------------------------------------------------- -------------------------------------
; ***************************;
; CNC rheolwr FM;
; ***************************;
;
; 26H-29H lle degol arddangos, ychydig, deg, cant rhif cod BCD, data 24H-25H rheoli amlder rhyddhau (hecsadegol)
;
CONBITL EQU 21H, beit rheoli amlder 8 isel
CONBITH EQU 22H; beit rheoli amledd uchel wyth
GAIR ALLWEDDOL EQU 23H; Wrth storio sganio porthladd P1 gwerth allweddol
;
;
ORG 0000H, cyfeiriad cychwyn rhaglen
LJMP START, trosglwyddo gweithredu DECHRAU
ORG 0003H;
RETI, peidiwch â thorri ar draws rhaglen
ORG 000BH;
RETI, peidiwch â thorri ar draws rhaglen
ORG 0013H;
RETI, peidiwch â thorri ar draws rhaglen
ORG 001BH;
RETI, peidiwch â thorri ar draws rhaglen
ORG 0023H;
RETI, peidiwch â thorri ar draws rhaglen
ORG 002BH;
RETI, peidiwch â thorri ar draws rhaglen
;
; Weithdrefn Ymgychwyn
CLEARMEN: MOV R0, # 20H; 20H-29H cylchrediad clirio
MOV R1, # 0AH;
CLEARLOOP: mov @ R0, # 00H;
INC R0;
DJNZ R1, CLEARLOOP;
MOV P0, # 0FFH; pedwar porthladdoedd a osodwyd
MOV P1, # 0FFH;
MOV P2, # 0FFH;
MOV P3, # 0FFH;
Camau gweithredu BH3.0 gwahardd; CLR P1415
CLR P3.1;
CLR P3.2;
LCALL KEYFUN15, modd trosglwyddo stereo cartref, dangosydd trosglwyddydd stereo agored
CLEAR1: PCON MOV, # 00H, cofrestr rheoli yn cael ei glirio
MOV 29H, # 00H, yn gosod y gwerth cychwynnol o 88MHZ (a ddangosir fel 088.0)
MOV 28H, # 08H;
MOV 27H, # 08H;
MOV 26H, # 00H;
LCALL DISPUPDAT; ysgrifennu BH1415 sglodion (addaswyd amleddau trosglwyddo)
Ffurflenni is-reolwaith; RET
;
; Prif
DECHRAU: LCALL CLEARMEN, pŵer ar initialization
PRIF: KEYWORK LCALL; ymchwilio i is-reolwaith allweddol
ARDDANGOS LCALL; LED arddangos amser
AJMP MAIN; drosglwyddo PRIF beicio
NOP, trin gwall PC
NOP;
AJMP START; ail-ymgychwyn
;
; 4 4 * gwiriad rheolaidd sganio allweddol matrics
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; prosesu debounce
MOV A, P1;
ANL A, # 0F0H;
CJNE A, # 0F0H, KEYCHE;
KEYOUT: RET, ymyrraeth, yr enillion is-reolwaith
KEYCHE: MOV A, P1;
GAIR ALLWEDDOL MOV, A;
CJLOOP: ARDDANGOS LCALL;
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, GAIR ALLWEDDOL;
JZ KEYOK; 0 (cyfartal) trowch KEYOK
INC R7, amrywiaeth, yn ogystal â nifer o dabl am-edrych
CJNE R7, # 10H, CHEKEYLOOP;
RET;
;
KEYOK: MOV A, R7;
Mov B, A; B i
RL A; chwith
ADD A, B, ychwanegu (allwedd i ddelio â JMP 3 3 yn ôl cyfarwyddyd-beit)
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, neidio i ymarferoldeb allweddol 15th y rhaglen
RET, yn dychwelyd gwall swmp-drosglwyddo
;
; Y rhif allwedd sy'n cyfateb i'r tabl gwerth porthladd P1 (tra'n pwyso dau allweddi gweithredu annilys)
KEYTAB: DB 0EEH, 0DEH, 0BEH, 7EH, 0EDH, 0DDH, 0BDH, 7DH
DB 0EBH, 0DBH, 0BBH, 7BH, 0E7H, 0D7H, 0B7H, 77H, 0FFH, 0FFH
;
, Swyddogaeth allweddol Nifer 0 y rhaglen
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; Ffurflenni
;
; Mae'r swyddogaeth allweddol 1st y rhaglen
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; Ffurflenni
;
; Mae'r rhaglen swyddogaeth allweddol 2nd
KEYFUN02: INC 27H; digidau sengl yn ogystal â 1
MOV A, 27H;
CLR C;
CJNE A, # 0AH, FUN02; benderfynu a llai na 10
FUN02: JC FUN02OUT, yn llai na 10 troi FUN02OUT
MOV 27H, # 00H; fwy na neu'n hafal i 10 yn cael ei glirio i 0
FUN02OUT: LCALL DISPUPDAT, ysgrifennu sglodion rheoli (amlder trosglwyddo wedi'u haddasu)
RET;
;
; Mae'r swyddogaeth allweddol 3rd y rhaglen
KEYFUN03: INC 26H; digidau sengl yn ogystal â 1
MOV A, 26H;
CLR C;
CJNE A, # 0AH, FUN03, nid barn yn llai na 10
FUN03: JC FUN03OUT, yn llai na 10 troi FUN03OUT
MOV 26H, # 00H; fwy na neu'n hafal i 10 yn cael ei glirio i 0
FUN03OUT: LCALL DISPUPDAT, ysgrifennu sglodion rheoli (amlder trosglwyddo wedi'u haddasu)
RET; Ffurflenni
;
; 04 rhaglenni swyddogaethol allweddol (pa mor aml allweddi preset)
KEYFUN04: MOV 29H, # 01H, amlder trosglwyddo 109.0MHZ rhagosodedig
28H MOV, # 00H
27H MOV, # 09H
26H MOV, # 00H
LCALL DISPUPDAT, sglodion rheoli ysgrifennu (amlder trosglwyddo wedi'u haddasu)
RET
;
; 05 rhaglenni swyddogaethol allweddol (pa mor aml allweddi preset)
KEYFUN05: MOV 29H, # 01H, amlder trosglwyddo 108.0MHZ rhagosodedig
28H MOV, # 00H
27H MOV, # 08H
26H MOV, # 00H
LCALL DISPUPDAT, sglodion rheoli ysgrifennu (amlder trosglwyddo wedi'u haddasu)
RET
;
; 06 rhaglenni swyddogaethol allweddol (pa mor aml allweddi preset)
KEYFUN06: MOV 29H, # 01H, amlder trosglwyddo 105.0MHZ rhagosodedig
28H MOV, # 00H
27H MOV, # 05H
26H MOV, # 00H
LCALL DISPUPDAT, sglodion rheoli ysgrifennu (amlder trosglwyddo wedi'u haddasu)
RET
;
; Mae'r swyddogaeth allweddol 7th y rhaglen (allweddi amledd preset)
KEYFUN07: MOV 29H, # 01H, amlder trosglwyddo 100.0MHZ rhagosodedig
28H MOV, # 00H
27H MOV, # 00H
26H MOV, # 00H
LCALL DISPUPDAT, sglodion rheoli ysgrifennu (amlder trosglwyddo wedi'u haddasu)
RET
;
; 08 rhaglenni swyddogaethol allweddol (pa mor aml allweddi preset)
KEYFUN08: MOV 29H, # 00H, 98.0MHZ amledd trosglwyddo rhagosodedig
28H MOV, # 09H
27H MOV, # 08H
26H MOV, # 00H
LCALL DISPUPDAT, sglodion rheoli ysgrifennu (amlder trosglwyddo wedi'u haddasu)
RET
;
; 09 rhaglenni swyddogaethol allweddol (pa mor aml allweddi preset)
KEYFUN09: MOV 29H, # 00H, 96.0MHZ amledd trosglwyddo rhagosodedig
28H MOV, # 09H
27H MOV, # 06H
26H MOV, # 00H
LCALL DISPUPDAT, sglodion rheoli ysgrifennu (amlder trosglwyddo wedi'u haddasu)
RET
;
; Mae'r swyddogaeth allweddol 10th y rhaglen (allweddi amledd preset)
KEYFUN10: MOV 29H, # 00H, 94.0MHZ amledd trosglwyddo rhagosodedig
28H MOV, # 09H
27H MOV, # 04H
26H MOV, # 00H
LCALL DISPUPDAT, sglodion rheoli ysgrifennu (amlder trosglwyddo wedi'u haddasu)
RET
;
; 11 rhaglenni swyddogaethol allweddol (pa mor aml allweddi preset)
KEYFUN11: MOV 29H, # 00H, 92.0MHZ amledd trosglwyddo rhagosodedig
28H MOV, # 09H
27H MOV, # 02H
26H MOV, # 00H
LCALL DISPUPDAT, sglodion rheoli ysgrifennu (amlder trosglwyddo wedi'u haddasu)
RET
;
; Mae'r swyddogaeth allweddol 12th y rhaglen (allweddi amledd preset)
KEYFUN12: MOV 29H, # 00H, 90.0MHZ amledd trosglwyddo rhagosodedig
28H MOV, # 09H
27H MOV, # 00H
26H MOV, # 00H
LCALL DISPUPDAT, sglodion rheoli ysgrifennu (amlder trosglwyddo wedi'u haddasu)
RET
;
; Mae'r swyddogaeth allweddol 13th y rhaglen (allweddi amledd preset)
KEYFUN13: MOV 29H, # 00H, 88.0MHZ amledd trosglwyddo rhagosodedig
28H MOV, # 08H
27H MOV, # 08H
26H MOV, # 00H
LCALL DISPUPDAT, sglodion rheoli ysgrifennu (amlder trosglwyddo wedi'u haddasu)
RET
;
; Mae'r swyddogaeth allweddol 14th y rhaglen (allweddi amledd preset); trosglwyddo preset 87.0MHZ amlder
KEYFUN14: 29H MOV, # 00H
28H MOV, # 08H
27H MOV, # 07H
26H MOV, # 08H
LCALL DISPUPDAT, sglodion rheoli ysgrifennu (amlder trosglwyddo wedi'u haddasu)
RET
;
; 15 rhaglenni swyddogaethol allweddol (allwedd gosod stereo / mono)
KEYFUN15: CPL 03H;
JNB 03H, MONO;
CLR P3.3;
LCALL PUTBIT;
RET; Ffurflenni
MON SETB P3.3;
LCALL PUTBIT;
RET; Ffurflenni
;
; Y BCD i hecsadegol, a phum rheolaeth cod opcode synthesis, ysgrifennwch sglodion rheoli
DISPUPDAT: BCDB LCALL;
LCALL CONCOMMAND;
LCALL PUTBIT; anfon geiriau rheoli i BH1415
RET; Ffurflenni
;
; Mae'r BCD rhaglen hecsadegol
BCDB: CONBITL MOV, # 00H, rheolaeth geiriau i 0
CONBITH MOV, # 00H, rheolaeth geiriau i 0
CONBITL MOV, 26H; lle degol rheoli gair i mewn i'r 8 isel
MOV A, 27H; digidau sengl gan weithrediadau 10
Mov B, # 10;
LCALL MULLOOP, is-reolwaith lluosi alaw
MOV A, 28H; 100 deg-digid gweithrediad lluosi
Mov B, # 100;
LCALL MULLOOP, is-reolwaith lluosi alaw
MOV A, 29H;
JNZ ADD3E8; cannoedd digid yn ei dro ADD3E8 (yn ogystal â gweithrediadau 1000)
RET; cannoedd digid yn 0 allanfa
ADD3E8: CLR C; baner deuaidd clir
Mov A, # 0E8H; wiber 8-ychydig yn isel
ADD A, CONBITL; cronni
CONBITL MOV, A; CONBITL yn ôl
Mov A, # 03H; wyth Ychwanegu uchel
ADDC A, CONBITH;
CONBITH MOV, A; CONBITH yn ôl
RET; Ffurflenni
;
; Lluosi a phroses cronni (i bedwar degol cod BCD arddangos i nifer deuaidd)
MULLOOP: Mul AB; lluosi
Baner cario glir; CLR C
ADD A, CONBITL, plot gyda CONBITL ychwanegu 8 isel
CONBITL MOV, A; CONBITL yn ôl
MOV A, CONBITH;
ADDC A, B; hintegreiddio i mewn i'r cronadur 8-bit uchel gyda CONBITH
CONBITH MOV, A; CONBITH yn ôl
RET; Ffurflenni
;
; Data rheoli Amlder a phum rheolaeth cod synthesis word rheoli BH1415
CONCOMMAND: ANL CONBITH, # 07H;
MOV A, 20H;
ORL A, CONBITH;
MOV CONBITH, A;
RET; Ffurflenni
;
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
;, Rhaglen Arddangos,;
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
; Anod Cyffredin arddangos LED, adran allbwn porthladd P0 o god, P2 allbwn porthladd geiriau sganio
ARDDANGOS: MOV R1, # 26H, yn dangos y cyfeiriad cyntaf
MOV R5, # 0FEH; Gadewch gair sganio
CHWARAE: MOV A, R5; i A
MOV P2, A; allbwn porthladd P2
MOV A, @ R1; nôl arddangos data
MOV DPTR, # TAB, cymryd y tabl cod cyfeiriad segment cyntaf
MOVC A, @ A + DPTR; Segment ymchwiliad
MOV P0, A; o allbwn P0
MOV A, R5; darllen y gair sganio
JB ACC.1, PLAY1; na deg (LED), nid y pwynt degol yn cael ei arddangos
CLR P0.7, yn ddeg, pwynt degol arddangos
PLAY1: LCALL DL1MS, cynnau millisecond
INC R1, pwyntio at y data arddangosfa nesaf
JNB ACC.3, ENDOUT, oedd y pedwerydd LED, allanfa
RL A; yn hytrach, gadael
MOV R5, A; yn ôl R5
SETB P0.7; Oddi ar y degol
CHWARAE AJMP; cylch CHWARAE trosglwyddo
ENDOUT: MOV P2, # 0FFH; Show yn dod i ben oddi ar allbwn arddangos
MOV P0, # 0FFH;
RET; Ffurflenni
;
; 0 9-o Shenyang Adran stopwats
TAB: DB 0C0H, 0F9H, 0A4H, 0B0H, 99H, 92H, 82H, 0F8H, 80H, 90H, 0FFH, 0FFH
;
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
;; Anfon rheoli is-reolwaith beit;;
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
;
PUTBIT: mov A, CONBITL; is gair rheoli 8-bit i mewn i A
SETB P3.2; BH1415 Galluogi (ysgrifennu)
LCALL RHOI; anfon wyth
MOV A, CONBITH, uchel wyth gair rheoli i A
LCALL RHOI; anfon wyth
CLR P3.2; BH1415 yn ysgrifennu anabl
CLR P3.0; ailosod
CLR P3.1; ailosod
RET; Ffurflenni
;
; Is-reolwaith yn trosglwyddo Byte
RHOI: MOV R3, # 8, anfon wyth rheolaeth
CLR C; Qing C
PUT1: RRC A; Cynnal hawl (gan ddechrau isel)
MOV P3.0, C; isel i'r porthladd P3.0
NOP, oedi 4 microseconds
NOP;
NOP;
NOP;
SETB P3.1; data clicied (ymyl codi data clicied)
NOP, oedi 4 microseconds
NOP;
NOP;
NOP;
CLR P3.1;
DJNZ R3, PUT1, nid darnau 8 yn cael eu gorffen ei dro PUT1 digwydd eto
Pen gorffenedig 8; RET
;
; 513 oedi microeiliad is-reolwaith
DL513: MOV R3, # 0FFH
DL513LOOP: DJNZ R3, DL513LOOP
RET
;
; 1 oedi millisecond is-reolwaith (goleuadau LED defnyddio)
DL1MS: MOV R4, # 02H
DL1MSLOOP: LCALL DL513
DJNZ R4, DL1MSLOOP
RET
;
; 10 is-reolwaith oediad ms (jitter dileu gan)
DL10MS: MOV R6, # 0AH
DL10MSLOOP: LCALL DL1MS
DJNZ R6, DL10MSLOOP
RET
;
;
DIWEDD
Mae ein cynnyrch eraill:
