if x>0
   fortegn='+'
elseif x==0
   fortegn='0'
else
   fortegn='-'
end %if