But need more for neg #.
my way
----------------
output = "tst.lst";
float fclose;
integer rclose;
fclose:= close(0)- 10;
rclose:= fclose;
if fclose > 0 then
if fclose - rclose > .5 then
rclose:= rclose +1;
endif;
else
if fclose - rclose < -.5 then
rclose:= rclose -1;
endif;
endif;
println symbol,",",fclose:7:3,",",rclose;
------------------
your shorter way
-------------------
output = "tst.lst";
float fclose;
integer rclose;
fclose:= close(0)- 10;
if fclose > 0 then
rclose:= fclose +.5;
else
rclose:= fclose -.5;
endif;
println symbol,",",fclose:7:3,",",rclose;
|
