sum := for i := 0:9 sum data_reg(i)$	% Sum R000 through R009
on rounded$				% Use real arithmetic
x_reg := sum / 10;			% Store average in X register