%BEGIN
%OWNBYTEINTEGER CHAR=NL
%OWNBYTEINTEGERARRAY XCHAR(1:10)=NL(*)
      %if Char=10 %and xchar(5)=10 %then printstring("Test OK") %else%c
         printstring("FAIL")
      NEWLINE
%ENDOFPROGRAM