Play[ norm*Sin[f*2*Pi*t], {t, 0, time}, PlayRange -> {-1, 1} ]; str = "Sine Wave " <> ToString[f] <> "Hz " <> ToString[time] <> "s" <> ".wav";(*Constructs...