Показаны различия между двумя версиями страницы.
Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия Следующая версия Следующая версия справа и слева | ||
ob:o7:example:get [2021/12/01 04:30] amalgama |
ob:o7:example:get [2022/03/11 14:03] iadenisov |
||
---|---|---|---|
Строка 9: | Строка 9: | ||
Машинное слово может быть переменной или константой типа целое ('' | Машинное слово может быть переменной или константой типа целое ('' | ||
- | (ПРИМЕР ДЛЯ STM32 - ) | + | Рассмотрим |
- | + | ||
- | Рассмотрим | + | |
{{ : | {{ : | ||
Строка 23: | Строка 21: | ||
MODULE ExamplesGet; | MODULE ExamplesGet; | ||
- | IMPORT SYSTEM, MCU := MicroSTM32F10xxD; | + | IMPORT SYSTEM, MCU := MicroSTM32F10xxD, PinCfg := MicroSTM32F0Pins; |
- | PROCEDURE | + | CONST pin = 7; |
+ | |||
+ | PROCEDURE | ||
+ | BEGIN | ||
+ | PinCfg.ConfigureInput(PinCfg.A, | ||
+ | END InitButton; | ||
+ | |||
+ | PROCEDURE CheckButton*(): BOOLEAN; | ||
VAR x: SET; | VAR x: SET; | ||
BEGIN | BEGIN | ||
SYSTEM.GET(MCU.GPIOAIDR, | SYSTEM.GET(MCU.GPIOAIDR, | ||
- | RETURN pin IN x | + | RETURN pin IN x (из 32 битного |
END CheckButton; | END CheckButton; | ||
Строка 39: | Строка 44: | ||
Подробнее про [[https:// | Подробнее про [[https:// | ||
+ | |||
+ | |||
+ | Второй пример реализует чтение данных в целое число из регистра чтения данных АЦП: | ||
+ | < | ||
+ | VAR value: INTEGER; | ||
+ | BEGIN | ||
+ | SYSTEM.GET(MCU.ADC1DR, | ||
+ | </ | ||
+ |