%begin
  %ownshortintegerarray  p(0:255) = 42, 24, 99(252), 16_ab, 16_cd
  %ownshortintegerarray  q(-128:127) = 42, 24, 99(252), 16_ab, 16_cd
  %ownshortintegerarray  r(1000:1255) = 42, 24, 99(*)
  %integer i
  i = p(100)
  i = q(-28)
  i = r(1100)
%endofprogram