for f in *dcm; do dcmodify -i "(0018,0021)=SP" -i "(0018,0020)=GR" -i "(0018,0023)=2D" -i "(0018,0081)=9.4" -i "(0018,0022)=SAT1" $f; done;