Подключение к аппаратуре путем встраивания пользовательского кода

Рассмотрим данный блок подробнее.

Данный блок создан на основе типового блока "Язык программирования". Рассмотрим его, начиная со списка свойств. Открыв окно свойств блока можно увидеть, что список его свойств отличается от списка свойств блока "Язык программирования", рассмотренного выше. Однако, если выделить блок и выполнить команду главного меню Правка → Изменить блок, то на вкладке "Свойства" (Рисунок 4) можно увидеть не только видимые свойства (Рисунок 3), но и те, которые описаны вначале.

Значения пользовательских свойств блока используются в скрипте для локального динамического формирования пользовательского Си-кода. Чтобы увидеть внутренний скрипт блока, необходимо разблокировать его. Для этого необходимо щелкнуть по нему правой кнопкой мыши и выбрать Действия → Разблокировать. После этого, двойным щелчком левой кнопки по блоку можно попасть в редактор скрипта блока и ознакомиться с ним. Текст скрипта начинается с объявления выходов блока:

output ready:boolean=1;

Ниже начинается секция initialization, которая выполняется только один раз - при запуске расчета. В ней происходит декларация необходимых переменных и констант для локального расчета, а также присвоение локальным переменным значений свойств блока:

var a: intarray;
var number:integer;

// Значения пинов или соответсвие их значения индексу массива
const pins_mean = [1, 2, 4, 8, 16, 32, 64, 128, 256, 512, 1024, 2048, 4096, 8192, 16384, 32768];
const base:intarray = [0x400A8000, 0x400B0000, 0x400B8000, 0x400C0000, 0x400C8000, 0x400E8000];

//Вычисляем 32 битное число с битами
var bits  :integer = 0, setter: integer = 0;
var mode  :intarray;
var func  :intarray;
var in_out:intarray;
var speed :intarray;
var port_ :intarray;

//Количество пинов
a = Pins;

//Для дальнейшего вычленеия параметров
mode = PORT_MODE;
func = PORT_FUNC;
in_out  = PORT_OE;
speed = PORT_SPEED;
port_ = PORT;

//Инициализируемые биты
bits = 0;

Ниже формируется битовая маска:

for(i=1,cols(a))  bits = bits or pins_mean[a[i] + 1];

После чего происходит непосредственно формирование пользовательского Си-кода в виде текстовых переменных и присвоение его соответсвующим типовым свойствам блока "Язык программирования" (которые скрыты в нашем случае).

header = "";
code = "";
data =
"
/*Инициализация порта*/
Init_port("+inttostr(bits) + "," +inttostr(mode[1]) + "," + inttostr(func[1]) + "," + inttostr(in_out[1]) + "," + inttostr(speed[1]) + ",(MDR_PORT_TypeDef*)" + base[port_[1] + 1] + ");
%out:0% = 0x01;
";

Таким образом, при инициализации локального скрипта происходит формирование пользовательского Си-кода в зависимости от значений пользовательских же свойств.

Используя данный блок в качестве шаблона, создадим свой. Для начала изменим список свойств блока: удалим пользовательские свойства, специфичные для шаблонного блока и создадим новое свойство. Эти операции выполняются с помощью окна "Редактирование блока", которое открывается после выделения блока мышью и выполнения команды главного меню Правка → Изменить блок. Отредактируем список свойств так, чтобы он был похож на представленный ниже (Рисунок 7). Таким образом было создано пользовательское свойство с именем mydata1, имеющее формат целого числа. После корректировки списка свойств, произведем корректировку локального скрипта блока. Перед секцией инициализации определим выход блока, затем внутри секции инициализации произведем декларацию локальных переменных, их предварительные преобразования и, наконец, присвоение собственным свойствам блока "Язык программирования" текстовых значений пользовательского кода. Итоговый тестовый скрипт блока с комментариями:

output adc_result: integer; //декларация выхода блока (для целей сортировки)

initialization //начало секции инициализации 
 var temp: integer; //декларация и операции с локальными переменными
 temp = mydata1*2;

 //в заголовке декларируем функции, нужные переменные...
 header = "
 static int %unikname%_aaabbb;
 const int %unikname%_bbbaaa = " + inttostr(temp) + ";
 int %unikname%_MyProc()
 {
  return %unikname%_aaabbb;
 };
 ";

 //присваивание выходов на каждом шаге 
 code = "
 %out:0% = %unikname%_MyProc();
 ";

 //инициализация начальных состояний 
 data = "
 %out:0% = 0x01;
 %unikname%_aaabbb = %unikname%_bbbaaa;
 ";

 adc_result=0;  //задание значения выходу блока (для целей сортировки)
end; //окончание секции инициализации

В результате данных действий был сделан блок, который при кодогенерации формирует пользовательский Си-код для взаимодействия со специфическим оборудованием.

После этого для созданного блока можно задать уникальный "Тип элемента" (ClassName), а также изменить "Графическое изображение" (Graphics), с помощью соответствующих свойств а вкладке "Общие". Таким образом, можно создать набор пользовательских блоков для решения задач взаимодействия с конкретным оборудованием и оформить их в виде соответствующей библиотеки. Работа с библиотекой блоков описана в соответсвующем материале.