Ainm :: RF tarchuradóra BH1415F
Am: 06 07-06-
Feidhmeanna: rialú BH1415F FM raon minicíocht tarchuradóra (88 ~ 108Hz) MCU: ATMEGA8
Scríobh: LCJ
************************************************** ************ /
/ * ___________________________________________________
CE ___ |
| __________
________________
CK _____ | | __ | | __ | | __ | | __ | | _ ---- _ | | __ | | __ |
| __________
__________
DA____ | D0 | __ | D1 | __ | D2 | __ | D3 | __ | D4 | __
______
----- _ | PD | __ | T1 | __ | T2 | __________
* /
/ **********************************
Digiteach clár tarchuradóra FM
*********************************** /
Comhad / / Ceanntásc
# Cuir san áireamh / / Roghanna Múnla SCM
# Cuir san áireamh sainmhínithe / / giotán
# Cuir san áireamh / / Cuimhne EEPROM
/ Minicíocht / Crystal
# Sainmhínigh FOSC 6000000 / / criostail 6MHZ
# Sainmhínigh baud ráta 9600 / / baud
# Sainmhínigh open_radio (PINB & 0B00000100) / / tosaithe
# Sainmhínigh function_open (PORTB | = (1 << 4)) / / tosaithe rialaithe
# Sainmhínigh function_close (PORTB & = ~ (1 << 4)) / / múchadh rialaithe
# Sainmhínigh open_save (PINB & 0B00000100) / / stáisiún stórála oscailte
Cinneann # Sainmhínigh save_ensure (PINB & 0B00000100) / / stáisiún stórála
# Sainmhínigh adjustment_station (PINB & 0B00000100) / / rialáil a choinnigh raidió maith
# Sainmhínigh F_ADD (PINB & 0B00001000) / / minicíocht móide
# Sainmhínigh F_REDUCE (PINB & 0B00010000) / / minicíocht lúide laghdú
/ / Síniú Char F_DATA_H, ;/ F_DATA_L / minicíocht beagán ard agus íseal
;/ / tosaithe bratach open_radio_flag gan síniú Char
/ / F_flag_H ;/ / minicíocht stóráil Síniú Char de ard
/ / Síniú stórála minicíocht F_flag_L ruabhric ;/ / íseal
gan síniú Char LCD_display_H ;/ / LCD ard
gan síniú Char LCD_display_L ;/ / LCD íseal
gan síniú ;/ / shábháil function_flag ruabhreac Taiwan bratach
gan síniú ruabhric save_dais_flag ;/ / taisce lógó chinneadh
# Sainmhínigh save1_H (PORTC | = (1 << 4)) / / tásc stádais chun Taiwan a chosaint
# Sainmhínigh save2_H (PORTC | = (1 << 5)) / / stáisiún Paul ag léiriú rath
# Sainmhínigh save1_L (PORTC & = ~ (1 << 4))
# Sainmhínigh save2_L (PORTC & = ~ (1 << 5))
# Sainmhínigh LED_H (PORTD | = (1 << 7))
# Sainmhínigh CE_H (PORTB | = (1 << 0)) / / 15 CE
# Sainmhínigh CE_L (PORTB & = ~ (1 << 0))
# Sainmhínigh CK_H (PORTB | = (1 << 1)) / / 16 CLOC
# Sainmhínigh CK_L (PORTB & = ~ (1 << 1))
# Sainmhínigh DA_H (PORTB | = (1 << 5)) / / 17 SONRAÍ
# Sainmhínigh DA_L (PORTB & = ~ (1 << 5))
/ / # Sainmhínigh LCD_display_OUT PORTB
/ / # Sainmhínigh LCD_display_control PORTC
/ / Síniú ruabhric LCD_display_data [8] [4];
char_ gan síniú display_character [10] = {0x3f, 0X06, 0X5B, 0X4F,
0X66, 0X6D, 0X7D, 0X07, 0X7F, 0X6F}; / / maitrís 1, 2, 3, 4, 5, 6, 7, 8, 9
gan síniú Char EEPROM_READ_DATA ;/ / léamh na sonraí a shábháil
gan síniú ruabhric EEPROM_READ_NUMBER ;/ / léigh an seoladh shábháil
/ ************************************************* ******* /
;/ / taispeáint giotán display_one gan síniú Char
gan síniú ruabhric display_ten ;/ / taispeáint deich
gan síniú ruabhric display_hundred ;/ / taispeáint céad
gan síniú Char display_thousand ;/ / taispeáint míle
/ ************************************************* *******
Taispeáin Maolán sonraí
************************************************** ****** /
temp_display_one char gan síniú;
temp_display_ten char gan síniú;
char gan síniú temp_display_hundred;
temp_display_thousand char gan síniú;
/ ************************************************* ******
Chun rialú sonraí BH1415 Maolán
************************************************** * /
temp_BH1415_one char gan síniú;
temp_BH1415_ten char gan síniú;
char gan síniú temp_BH1415_hundred;
temp_BH1415_thousand char gan síniú;
/ ************************************************* * /
BH1415_one ;/ / BH1415 giotán rialú gan síniú Char
gan síniú Char BH1415_ten ;/ / BH1415 rialú deich
gan síniú ruabhric BH1415_hundred ;/ / BH1415 rialú céad
/ ************************************************* * /
;/ / aschur uimhir gan síniú adjust_PS8889_OUT Char rialú
gan síniú ruabhric adjust_PS8889_control [9] ;/ / eagar rialú
/ / Síniú ;/ adjust_station_number ruabhric / sheiceáil ar líon na píosaí de na eagar
gan síniú ;/ adjust_save_address ruabhric / seoladh a shábháil
gan síniú ;/ adjust_save_function ruabhric / feidhm shábháil
/ ************************************************* ******* /
gan síniú ruabhric temp_BH1415_L ;/ / rialú BH1415 8 íseal
gan síniú Char temp_BH1415_H ;/ / rialú BH1415 8
/ **************************************** /
delay_ms neamhní (neamhní);
delay_xs neamhní (gan síniú ruabhric x);
neamhní adjust_station_OUT (neamhní);
neamhní station_save_IN (neamhní);
neamhní EEPROM_rite (gan síniú o uAddr, gan síniú ruabhric uData);
neamhní EEPROM_read (gan síniú slánuimhir uAddr);
neamhní F_ADD_function (neamhní);
neamhní F_REDUCE_function (neamhní);
control_BH1415_and_display neamhní (neamhní);
LCD_display neamhní (gan síniú Char display_data, gan síniú Char
function_number);
neamhní control_BH1415 (neamhní);
neamhní BH1415_OUT (gan síniú Char control_F_DATA, Char gan síniú
control_number);
/ ************************************************* ****** /
Subroutine / / Moill
delay_xs neamhní (gan síniú Char x)
{
gan síniú Char a;
le haghaidh (a = 0; a
{
delay_ms ();
}
}
delay_ms neamhní (neamhní)
{
gan síniú Char aa, bb;
le haghaidh (aa = 0; aa <50; aa + +)
{
le haghaidh (bb = 0; bb <100; bb + +);
}
}
/ *********************************
Is Tar éis feidhm deisce léamh
********************************** /
adjust_station_OUT neamhní (neamhní)
{/ / Stóráil rialachán raidió dea-
EEPROM_read (EEPROM_READ_NUMBER);
temp_display_one = EEPROM_READ_DATA;
EEPROM_READ_NUMBER + +;
EEPROM_read (EEPROM_READ_NUMBER);
temp_display_ten = EEPROM_READ_DATA;
EEPROM_READ_NUMBER + +;
EEPROM_read (EEPROM_READ_NUMBER);
temp_display_hundred = EEPROM_READ_DATA;
EEPROM_READ_NUMBER + +;
EEPROM_read (EEPROM_READ_NUMBER);
temp_display_thousand = EEPROM_READ_DATA;
EEPROM_READ_NUMBER + +;
}
neamhní station_save_IN (neamhní)
{/ / Store fheidhm raidió
EEPROMwrite (adjust_save_address, temp_display_one);
adjust_save_address + +;
EEPROMwrite (adjust_save_address, temp_display_ten);
adjust_save_address + +;
EEPROMwrite (adjust_save_address, temp_display_hundred);
adjust_save_address + +;
EEPROMwrite (adjust_save_address, temp_display_thousand);
adjust_save_address + +;
}
/ *********************************
EEPROM feidhm léamh
********************************** /
neamhní EEPROM_read (gan síniú int uAddr)
{/ / Léigh feidhm EEPROM
le linn (EECR & (1 << EEWE));
EEAR = uAddr;
CEE | = (1 << EERE);
EEPROM_READ_DATA = EEDR;
}
/ ************************************
Seo é an minicíocht cuir réir a chéile fheidhm
************************************* /
F_ADD_function neamhní (neamhní)
{/ / Minicíocht mhéadaithe de réir a chéile fheidhm, / / minicíocht laghdú fheidhm initialization F_DATA_H = 0X03, F_DATA_L = 0X66
más rud é (temp_display_thousand> = 0x01)
{
más rud é (temp_display_ten> = 0x08)
{/ / Teorainn an 108.0MHZ uasmhinicíocht
temp_display_one = 0x00;
temp_display_ten = 0x08;
temp_display_hundred = 0x00;
temp_display_thousand = 0x01;
}
eile
Goto ADD;
}
eile
{
ADD: temp_display_one + +;
más rud é (temp_display_one> = 0x0a)
{
temp_display_one = 0x00;
temp_display_ten + +;
más rud é (temp_display_ten> = 0x0a)
{
temp_display_ten = 0x00;
temp_display_hundred + +;
más rud é (temp_display_hundred> = 0x0a)
{
temp_display_hundred = 0x00;
temp_display_thousand + +;
más rud é (temp_display_thousand> = 0x01)
{
más rud é (temp_display_ten> = 0x08)
{
temp_display_one = 0x00;
temp_display_ten = 0x08;
temp_display_hundred = 0x00;
temp_display_thousand = 0x01;
}
}
}
}
}
}
control_BH1415_and_display () ;/ / aschur a rialú BH1415 seoladh
}
/ ****************************************
Seo é an fheidhm laghdú minicíocht
**************************************** /
F_REDUCE_function neamhní (neamhní)
{/ / Minicíocht mhéadaithe de réir a chéile fheidhm, / / minicíocht laghdú fheidhm initialization F_DATA_H = 0X03, F_DATA_L = 0X66
más rud é (temp_display_thousand <= 0x00)
{/ / Teorainn íosta minicíocht 87.0MHZ
más rud é (temp_display_hundred <= 0x08)
{
más rud é (temp_display_ten <= 0x07)
{
más rud é (temp_display_one <= 0x00)
{
temp_display_one = 0x00;
temp_display_ten = 0x07;
temp_display_hundred = 0x08;
}
eile
Goto LAGHDÚ;
}
eile
Goto LAGHDÚ;
}
eile
Goto LAGHDÚ;
}
eile
{
LÍONADH: más rud é (temp_display_one <= 0x00)
{/ / Start Laghdú
temp_display_one = 0x0a;
más rud é (temp_display_ten <= 0x00)
{
temp_display_ten = 0x0a;
más rud é (temp_display_hundred <= 0x00)
{
temp_display_hundred = 0x0a;
temp_display_thousand = 0x00;
}
temp_display_hundred -;
}
temp_display_ten -;
}
temp_display_one -;
}
control_BH1415_and_display ();
}
control_BH1415_and_display neamhní (neamhní)
{/ / Rialú BH1415 agus aschur taispeáint
gan síniú Char temp_one, temp_ten, temp_hundred, temp_one_L;
temp_BH1415_data1 slánuimhir gan síniú,
temp_BH1415_data2, temp_BH1415_data3;
/ ************************************************ /
/ / Tiontaigh rialú BH1415 ríomhaireachta.
temp_BH1415_data1 = temp_display_thousand * 1000
+ Temp_display_hundred * 100 10 + temp_display_ten * + temp_display_one;
temp_BH1415_data2 = temp_BH1415_data1;
temp_BH1415_data3 = temp_BH1415_data2 >> 8;
temp_ten = temp_BH1415_data3;
temp_BH1415_L = temp_BH1415_data1;
temp_BH1415_one = temp_BH1415_L & 0x0f;
temp_BH1415_ten = temp_BH1415_L >> 4 & 0x0f;
temp_BH1415_hundred = temp_ten & 0x0f;
temp_BH1415_H = temp_ten | 0x48
/ * Temp_ten = temp_BH1415_ten << 4;
temp_ten = temp_ten & 0xf0;
temp_BH1415_L = temp_ten + temp_BH1415_one;
temp_BH1415_H = temp_BH1415_hundred | 0x48 * /
/ / Temp_BH1415_L = temp_ten + temp_BH1415_one
/ **************************************** /
/ / Aschuir rialú 16-giotán sraitheach BH1415 sonraí
CE_L;
CK_L;
DA_L;
NOP ();
NOP ();
NOP ();
CE_H;
BH1415_OUT (temp_BH1415_L, 0x08);
CK_L;
BH1415_OUT (temp_BH1415_H, 0x08);
CE_L;
CK_L;
DA_L;
}
/ *******************************************
Seo é an fheidhm aschur
******************************************* /
LCD_display neamhní (gan síniú Char display_data, gan síniú Char
function_number)
{/ / LCD aschur
delay_ms ();
PORTC = function_number;
PORTD = display_character [display_data];
}
/ ********************************************
Seo é an rialú BH1415 ~ ~ ~ 8-giotán fheidhm sonraí sraitheach tharchur
********************************************* /
neamhní BH1415_OUT (gan síniú Char control_F_DATA, Char gan síniú
control_number)
{/ / Rialú BH1415
gan síniú Char i;
le haghaidh (i = 0; i <8; i + +)
{
más rud é (control_F_DATA & 0x01 == 0x01)
DA_H;
eile
DA_L;
NOP ();
NOP ();
CK_H;
delay_ms ();
NOP ();
NOP ();
CK_L;
NOP ();
NOP ();
control_F_DATA >> = 1;
delay_ms ();
}
}
/ ***************************************
Thíos a choimeádtar feidhm Deasc
**************************************** /
check_save_dais neamhní (neamhní)
{/ / Sábháil fheidhm tábla
display_one = 0x01;
display_ten = 0x00;
display_hundred = 0x00;
display_thousand = 0x00;
adjust_save_address = 0x00 ;/ / initialized seoladh tábla chuimhne
fad (save_dais_flag <= 5)
{
más rud é (== open_radio 0)
{/ / Sábháil gcinnfidh an stáisiún
delay_xs (20);
más rud é (== open_radio 0)
{
station_save_IN () ;/ / EEPRAM shábháil Taiwan agus feidhm
save_dais_flag = 6;
delay_xs (20);
}
}
eile más rud é (== F_ADD 0X00)
{/ / Sábháil an stáisiún móide
delay_xs (20);
más rud é (== F_ADD 0X00)
{
display_one + +;
adjust_save_address + = 4; / / shábháil seoladh móide ceithre
más rud é (display_one> = 9)
{/ / Teorainn cuimhne stáisiún uimhir 9
adjust_save_address = 36;
display_one = 9;
}
}
}
eile más rud é (== F_REDUCE 0)
{/ / Deasc Sábháil Lúide
delay_xs (20);
más rud é (== F_REDUCE 0)
{
display_one -;
adjust_save_address - =
4 ;/ / temp_adjust_save_address-4 ;/ / cuimhne seoladh lúide ceithre
más rud é (display_one <= 0x01)
{
adjust_save_address = 0x00;
display_one = 0x01;
}
}
}
/ *********************************
Taispeánann Aschur an suíomh stáisiún taisce
********************************* /
LCD_display (display_one, 0xFE);
LCD_display (display_ten, 0xFD);
LED_H;
LCD_display (display_hundred, 0xFB);
LCD_display (display_thousand, 0xF7);
}
Tá save_dais_flag = 0x00 ;/ tábla / cuimhne chun a chinneadh an bhratach glanta
Tá function_flag = 0x00 ;/ / shábháil Taiwan bratach glanta
}
neamhní is mó (neamhní)
{
Initialization / / Port
gan síniú char mé, AAW, y, x, TEMP;
DDRB = 0X00;
PORTB = 0XFF;
DDRC = 0XFF;
PORTC = 0X0F;
DDRD = 0XFF;
PORTD = 0XFF;
x = 0x00;
y = 0x9d;
PORTC = y;
CE_L;
CK_L;
DA_L;
/ / Tosaigh minicíocht 87.0MHZ
temp_display_one = 0x00;
temp_display_ten = 0x07;
temp_display_hundred = 0x08;
temp_display_thousand = 0x00;
/ * Rialú na sonraí maolán BH1415 * /
temp_BH1415_one = 0x06;
temp_BH1415_ten = 0x06;
temp_BH1415_hundred = 0x03;
temp_BH1415_thousand = 0x00;
/ / Initialization Athróg
/ / F_DATA_H = 0x00;
/ / F_DATA_L = 0x00; / / minicíocht beagán ard agus íseal
/ / F_flag_H = 0x00 ;/ / stórála minicíocht ard
/ F_flag_L = 0x00 minicíocht / ;/ / siopa íseal
/ / LCD_display_H = 0x00 ;/ / LCD ard
/ / LCD_display_L = 0x00 ;/ / LCD íseal
EEPROM_READ_DATA = 0x00 ;/ / léamh na sonraí a shábháil
EEPROM_READ_NUMBER = 0x00 ;/ / léigh an seoladh shábháil
/ / Adjust_PS8889_OUT = 0x00 Uimhir rialú ;/ / aschur
/ / Adjust_station_number = 0x00 ;/ / sheiceáil ar líon na píosaí de na eagar
Tá adjust_save_address = 0x00 seoladh ;/ / chuimhne glanta
adjust_save_function = 0x00 ;/ / feidhm shábháil
/ ************************************************* ******* /
temp_BH1415_L = 0x00 ;/ / rialú íseal BH1415 8
temp_BH1415_H = 0x00 ;/ / rialú BH1415 8
open_radio_flag = 0x00 ;/ / tosaithe marcáilte glanta
function_flag = 0x00 ;/ / shábháil Taiwan bratach
Tá save_dais_flag = 0 ;/ tábla / cuimhne chun a chinneadh an bhratach glanta
cé go (1)
{
más rud é (== open_radio 0)
{/ / Eochair tosaithe cheist
delay_xs (10);
más rud é (== open_radio 0)
{
open_radio_flag = 1;
}
cé go (open_radio_flag == 1)
{/ / Cheist Eochair, an stáisiún aistrithe
más rud é (== open_radio 0)
{
delay_xs (10);
más rud é (== open_radio 0)
{
do
{/ / Long brúigh a shábháil Taiwan agus feidhm
delay_xs (10);
function_flag + +;
más rud é (function_flag> = 50)
{
save1_L;
delay_xs (250);
save1_H;
}
}
fad (open_radio <= 0);
más rud é (function_flag> = 50)
{
check_save_dais (); / / léim a choinneáil ar fheidhmeanna Taiwan
Tá function_flag = 0x00 ;/ / shábháil Taiwan bratach glanta
}
eile
{
más rud é (EEPROM_READ_NUMBER> = 36)
{/ / Léigh tune an stáisiún teorainn le líon na dtimthriallta aschuir: 0 9 le haonaid
EEPROM_READ_NUMBER = 0;
}
adjust_station_OUT () ;/ / léigh an t-aschur an stáisiúin aistrithe
Tá function_flag = 0x00 ;/ / shábháil Taiwan bratach glanta
}
}
}
eile más rud é (== F_ADD 0)
{/ / Minicíocht móide
delay_xs (10);
más rud é (== F_ADD 0X00)
Méaduithe F_ADD_function () ;/ / minicíocht
}
eile más rud é (== F_REDUCE 0)
{Laghdú / / Minicíocht
delay_xs (10);
más rud é (== F_REDUCE 0X00)
F_REDUCE_function () ;/ / minicíocht laghdú
}
Taispeáint / / Aschuir
LCD_display (temp_display_one, 0xFE);
LCD_display (temp_display_ten, 0xFD);
LED_H;
LCD_display (temp_display_hundred, 0xFB);
LCD_display (temp_display_thousand, 0xF7);
Ár táirge eile:
