This shows you the differences between two versions of the page.
| Both sides previous revisionPrevious revisionNext revision | Previous revision | ||
| et:examples:sensor:ir_distance [2014/09/17 15:46] – raivo.sell | et:examples:sensor:ir_distance [2020/07/20 12:00] (current) – external edit 127.0.0.1 | ||
|---|---|---|---|
| Line 1: | Line 1: | ||
| + | < | ||
| + | ====== Infrapuna kaugusandur ====== | ||
| + | //Vajalikud teadmised: | ||
| + | [HW] [[et: | ||
| + | [AVR] [[et: | ||
| + | [LIB] [[et: | ||
| + | |||
| + | ===== Teooria ===== | ||
| + | |||
| + | [{{ : | ||
| + | |||
| + | Objekti kauguse mõõtmiseks on olemas triangulatsioonimeetodil töötavad optilised andurid. Levinuimad neist on firma Sharp poolt toodetavad infrapuna (inglise keeles // | ||
| + | |||
| + | [{{ : | ||
| + | |||
| + | Sharp-i kaugusandurite väljund on pöördvõrdeline - kauguse kasvades see väheneb ja järjest aeglasemalt. Täpne kauguse ja väljundi vaheline graafik on toodud andurite andmelehel. Anduritel on vastavalt tüübile ka mõõtepiirkond, | ||
| + | |||
| + | ===== Praktika | ||
| + | |||
| + | [{{ : | ||
| + | |||
| + | Kodulabori andurite komplektis on Sharp-i infrapuna kaugusmõõdik GP2Y0A21YK mõõtepiirkonnaga 10-80 cm. Anduri väljundpinge on kuni 3 V sõltuvalt mõõdetavast kaugusest. Anduri saab ühendada Kodulabori mooduli külge valitud analoogkanalisse. Eelnevate andurite harjutuste baasil saab lihtsalt teha programmi, mis mõõdab kaugusmõõdiku väljundpinget, | ||
| + | |||
| + | GP2Y0A21YK andmelehel on toodud väljundpinge ja mõõdetud kauguse vahelise sõltuvuse graafik. See pole lineaarne, kuid väljundpinge ja kauguse pöördväärtuse graafik peaaegu juba on, ning sellest on suhteliselt lihtne leida valem pinge kauguseks teisendamiseks. Valemi leidmiseks tuleb sama graafiku punktid sisestada mõnda tabelarvutuse programmi ja nendest uuesti graafik luua. Tabelarvutusprogrammides on graafiku punktide põhjal võimalik arvutada automaatselt välja trendijoon. Järgnevalt on toodud GP2Y0A21YK väljundpinge ja kauguse korrigeeritud pöördväärtuse vahelise seose graafik koos lineaarse trendijoonega. Väljundpinge on valemi lihtsustamise nimel juba teisendatud 10-bitiseks +5 V võrdluspingega analoog-digitaalmuunduri väärtuseks. | ||
| + | |||
| + | [{{ : | ||
| + | |||
| + | Nagu graafikult näha, kattub trendijoon (sinine) üsna täpselt graafiku punktidega (punane joon). Selline kattuvus on saavutatud kauguse korrigeerimiskonstandi abil. Korrigeerimiskonstant on leitud katse-eksitusmeetodil - läbi on proovitud erinevaid arve, kuni on leitud selline, mille korral graafik kattub trendijoonega kõige rohkem. Antud graafiku puhul on see +2, ehk kõigile reaalsetele kaugustele on graafikus 2 otsa liidetud. Kuna nii on graafik väga sarnane lineaarsele trendijoonele, | ||
| + | |||
| + | 1 / (d + k) = a ⋅ ADC + b | ||
| + | |||
| + | kus | ||
| + | |||
| + | * d on kaugus sentimeetrites | ||
| + | * k on korrigeerimiskonstant (leitud katse-eksitusmeetodil) | ||
| + | * ADC on pinge digitaliseeritud väärtus | ||
| + | * a on lineaarliige (väärtus tuleb trendijoone võrrandist) | ||
| + | * b on vabaliige (väärtus tuleb trendijoone võrrandist) | ||
| + | |||
| + | Valemist saab avaldada kauguse d: | ||
| + | |||
| + | d = (1 / (a ⋅ ADC + B)) - k | ||
| + | |||
| + | Põhimõtteliselt saakski selle valemiga kauguse välja arvutada, kuid see eeldaks ujukoma-arvutusi, | ||
| + | |||
| + | d = (1 / a) / (ADC + B / a) - k | ||
| + | |||
| + | Viies valemisse korrigeerimiskonstandi väärtuse ja trendijoone võrrandist saadud lineaar- ja vabaliikme (saadud jooniselt), tuleb kauguse arvutamise valemiks: | ||
| + | |||
| + | d = 5461 / (ADC - 17) - 2 | ||
| + | |||
| + | See valem on arvutatav 16-bitiste täisarvudega ja täiesti jõukohane AVR-ile. Enne arvutamist tuleb aga veenduda, et ADC väärtus oleks üle 17, sest muidu tekib nulliga jagamine või negatiivne kaugus, mis on ebaloogiline. | ||
| + | |||
| + | Järgnevalt on toodud Kodulabori teegis kirja pandud funktsioon ADC väärtuse sentimeetriteks teisendamise kohta. Lineaar- ja vabaliige ning korrigeerimiskonstant pole funktsiooni jäigalt sisse kirjutatud, vaid need antakse ette IR kaugusanduri parameetrite struktuuri objektiga. Hoides parameetreid eraldi konstandis, saab hiljem programmi lihtsalt lisada uusi IR kaugusandurite mudeleid. | ||
| + | |||
| + | <code c> | ||
| + | // IR kaugusanduri parameetrite struktuur | ||
| + | typedef const struct | ||
| + | { | ||
| + | const signed short a; | ||
| + | const signed short b; | ||
| + | const signed short k; | ||
| + | } | ||
| + | ir_distance_sensor; | ||
| + | |||
| + | // GP2Y0A21YK anduri parameetrite objekt | ||
| + | const ir_distance_sensor GP2Y0A21YK = { 5461, -17, 2 }; | ||
| + | |||
| + | // IR kaugusanduri ADC väärtuse sentimeetriteks teisendamine | ||
| + | // Tagastatakse -1, kui teisendus ei õnnestunud | ||
| + | signed short ir_distance_calculate_cm(ir_distance_sensor sensor, | ||
| + | unsigned short adc_value) | ||
| + | { | ||
| + | if (adc_value + sensor.b <= 0) | ||
| + | { | ||
| + | return -1; | ||
| + | } | ||
| + | |||
| + | return sensor.a / (adc_value + sensor.b) - sensor.k; | ||
| + | } | ||
| + | </ | ||
| + | |||
| + | Teisenduse tegemiseks tuleb välja kutsuda // | ||
| + | < | ||
| + | <code c> | ||
| + | // Kodulabori IR kaugusmõõdiku näidisprogramm | ||
| + | // LCD ekraanil kuvatakse mõõdetud kaugus sentimeetrites | ||
| + | #include < | ||
| + | #include < | ||
| + | #include < | ||
| + | #include < | ||
| + | #include < | ||
| + | |||
| + | #define ADC_CHANNEL 0 | ||
| + | |||
| + | // Põhiprogramm | ||
| + | int main(void) | ||
| + | { | ||
| + | signed short value, distance; | ||
| + | char text[16]; | ||
| + | |||
| + | // Robootika Kodulabor II Andurite moodul väliste andurite viik | ||
| + | //pin ex_sensors = PIN(G, 0); | ||
| + | // | ||
| + | // | ||
| + | |||
| + | // LCD ekraani seadistamine | ||
| + | lcd_gfx_init(); | ||
| + | lcd_gfx_clear(); | ||
| + | lcd_gfx_goto_char_xy(1, | ||
| + | lcd_gfx_write_string(" | ||
| + | |||
| + | // ADC muunduri seadistamine | ||
| + | adc_init(ADC_REF_AVCC, | ||
| + | |||
| + | // Lõputu tsükkel | ||
| + | while (1) | ||
| + | { | ||
| + | // Anduri väljundpinge 4-kordselt ümardatud väärtuse lugemine | ||
| + | value = adc_get_average_value(ADC_CHANNEL, | ||
| + | |||
| + | // ADC väärtuse kauguseks ümberarvutamine | ||
| + | distance = ir_distance_calculate_cm(GP2Y0A21YK, | ||
| + | |||
| + | lcd_gfx_goto_char_xy(1, | ||
| + | |||
| + | // Kauguse või veateate kuvamine | ||
| + | if (distance >= 0) | ||
| + | { | ||
| + | sprintf(text, | ||
| + | } | ||
| + | else | ||
| + | { | ||
| + | sprintf(text, | ||
| + | } | ||
| + | |||
| + | lcd_gfx_goto_char_xy(1, | ||
| + | lcd_gfx_write_string(text); | ||
| + | sw_delay_ms(500); | ||
| + | } | ||
| + | } | ||
| + | |||
| + | </ | ||
| + | /* | ||
| + | [[et: | ||
| + | ===== Lisamaterjalid ===== | ||
| + | |||
| + | * {{: | ||
| + | * [[http:// | ||
| + | |||
| + | */ | ||