мерси за помощта и вниманието разбрах как става
всичко е като в доброто старо вереме 
самоче 3 пъти по интересно
| Микроконтролери и електроника http://mcu-bg.com/mcu_site/ |
|
| mikropascal led_blinking с pic16f84 http://mcu-bg.com/mcu_site/viewtopic.php?f=7&t=2938 |
Страница 1 от 1 |
| Автор: | c82 [ Пет Сеп 22, 2006 1:14 am ] |
| Заглавие: | mikropascal led_blinking с pic16f84 |
program Led_blinking; begin TRISB := 0; // configure pins of portb as output repeat // beginning of a repeat loop begin PORTB := $FF; // turn ON diodes on portb delay_ms(1000); // wait for 1 second PORTB := 0; // turn OFF diodes on portb delay_ms(1000); // wait for 1 second end; until 0 = 1; // endless loop (as this condition is never satisfied) end. така би трябвало на всичките RB0 - RB7 да дават on i off а как трябва да стане само за определен пин например RB2 ? |
|
| Автор: | ToHu [ Пет Сеп 22, 2006 1:19 am ] |
| Заглавие: | |
Трябва да имаш битови операции, на С може и да стане с AND и OR, примерно &FE за 0 и ||01 за единица, погледни си хелпа за битовите, не помня на паскала как беше синтаксиса за тия операции по горе. |
|
| Автор: | evc [ Пет Сеп 22, 2006 8:06 am ] |
| Заглавие: | |
Има два начина (до колкото съм запознат с продуктите на MikroE - разглеждал съм по-подробно MikroC): 1. PORTB.FX:=1; PORTB.FX:=0; //X е от 0 до 7 - номера на бита 2. Предварително дефинираш интересуващия те бит с някакъв етикет #define my_bit PORTB.FX my_bit:=0; my_bit:=1; (3. Винаги е възможно да използваш и маска, както те съветва @ТоНи.) Разбира се и двата начина са добре описани в страхотно подробния хелп на компилатора. Не е лошо човек да попрочитва от време на време малко, понякога помага! |
|
| Автор: | c82 [ Нед Сеп 24, 2006 1:26 pm ] |
| Заглавие: | |
мерси за помощта и вниманието разбрах как става всичко е като в доброто старо вереме самоче 3 пъти по интересно
|
|
| Автор: | techboy [ Сря Окт 25, 2006 12:52 pm ] |
| Заглавие: | |
c82 При PicBasicPro за управление на определен порт би трябвало да е така: program Led blinking TRISB=0 'портовете B са ти изходи PORTB=0 'зануляваме порт B Begin: PORTB=1 'светни всички диоди на PORTB pause 1000 'изчакай 1 секунда PORTB=0 'изгаси всички диоди на порт B pause 1000 'изчакай отново 1 секунда HIGH PORTB.0 'направи PORTB.0 с високо ниво или  'PORTB.0=1
GOTO Begin END мисля че така ще стане 
|
|
| Автор: | c82 [ Пон Окт 30, 2006 11:28 pm ] |
| Заглавие: | |
techboy мерси за вниманието и помощта прочетох доста за микропаскала сега имам други въпроси които се опитвам да разреша по един или друг начин 
|
|
| Страница 1 от 1 | Часовете са според зоната UTC + 2 часа [ DST ] |
| Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group http://www.phpbb.com/ |
|