Показаны различия между двумя версиями страницы.
Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия Следующая версия Следующая версия справа и слева | ||
ob:o7:example:get [2022/02/11 18:16] iadenisov |
ob:o7:example:get [2022/03/11 14:07] iadenisov |
||
---|---|---|---|
Строка 13: | Строка 13: | ||
{{ : | {{ : | ||
- | Адреса регистров хранятся в модулях подсистемы '' | + | Адреса регистров хранятся в модулях подсистемы '' |
- | + | ||
- | Для микроконтроллеров **STM32F10xxD** адреса хранятся в модуле '' | + | |
Строка 21: | Строка 19: | ||
MODULE ExamplesGet; | MODULE ExamplesGet; | ||
- | IMPORT SYSTEM, MCU := MicroSTM32F10xxD; | + | IMPORT SYSTEM, MCU := MicroSTM32F10xxD, PinCfg := MicroSTM32F10xPinCfg; |
- | PROCEDURE CheckButton* (pin: INTEGER): BOOLEAN; | + | CONST pin = 7; |
+ | |||
+ | PROCEDURE InitButton*; | ||
+ | BEGIN | ||
+ | PinCfg.Configure(PinCfg.C, | ||
+ | END InitButton; | ||
+ | |||
+ | PROCEDURE CheckButton*(): | ||
VAR x: SET; | VAR x: SET; | ||
BEGIN | BEGIN | ||
Строка 29: | Строка 34: | ||
RETURN pin IN x (из 32 битного | RETURN pin IN x (из 32 битного | ||
END CheckButton; | END CheckButton; | ||
- | |||
END ExamplesGet. | END ExamplesGet. | ||
</ | </ | ||
- | Этот пример реализует процедуру, | + | Этот пример реализует процедуру, |
Подробнее про [[https:// | Подробнее про [[https:// |