Упаковка переменных BOOL, INT, REAL в Modbus String

[ПРОЕКТ-П]

+ "проект/очистить все" перед каждой загрузкой. Если не поможет - ищите ошибку в 22й строке
С указателями всегда и везде - нормуль. Только руки портят. И вообще - какой-то сложный способ упаковки.

Чистить не пробовал.
Паковать сразу INT - не получиться из-за возможного смещения адреса (уже описана проблема), поэтому упаковка по байтно.

[Валенок]

Сами себе сложности создаете. Стринг в umd расположен как нужно (адрес кратен 4).
На кой вам еще где-то стринги ? А сами данные в стринге выровнять сложно ? И причем тут стринг вообще. Забудьте. Нет стринга, есть буфер с нужного адреса

fb my
var_input
  k : real;
  i : int;
  b : byte;
  x : byte;  //неявная
  .......
end;  
----
;
----


var
  p : pointer to my;
   k : real;
  i : int;
  b : byte;
  m : my;
----
p := adr(строка_прям_в_umd);
p^(i:=i,k:=k,b:=b);    //упаковали&положили

m := p^;  //куда-то переложили все
j := p^.j; //взяли часть
..


Общий случай (где могут гулять адреса)

var
   k : real;
  i : int;
  b : byte;
  m : my;
----
m(i:=i,k:=k,b:=b);  //упаковали
sysmemcpy(..., adr(m),sizeof(m)); //переложили хоть куда


sysmemcpy(adr(m),adr(...),sizeof(m)); //переложили хоть откуда
j := m.j; //взяли часть

Заставьте машину думать по максимуму. А вам - только структуру/фб грамотно описать - и все

[Валенок]

т.е. как фишка ляжет -50 на 50 .

Фишки всегда кладутся как нужно если понимать как их класть ))

[Дмитрий Артюховский]

Фишки всегда кладутся как нужно если понимать как их класть ))

Я для себя - объявил массив из DWORDов ( чтобы он "правильно" в память лег ) и лазаю в него уже любыми указателями, правильно разместив переменные ))) это если "разогнать" код нужно, а для понимания лучше через обычные переменные, сильно время на отладке экономится!

[amn]

(*читаем из строки переменные разных типов*)
ptr2 := ADR(str1); (*ставим указатель на нашу стоку*)
j:=ptr2^; (*читаем переменную типа INT*)
ptr3 := ptr2 + 2; (*смещаем указатель на 2 байта*)

j := ptr2^;
вот здесь "собака" - если str1 начинается с четного адреса - будет работать, если с нечетного - ватчдог! т.е. как фишка ляжет -50 на 50 ))) поработал код, добавили переменную и абзац! Егор правду глаголет! проверил сам.

С Егором согласен, у меня были проблемы когда структуру через указатели юзал, в симуляторе работало, а вот в реальном железе были проблемы. После выравнивания проблемы закончились.

[capzap]

ни кто разве не замечал в оскат бибке, что присвоив последний раз указатель, он смещается еще раз, может в этом "собака порылась"