Skip to content
GitLab
Menu
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
Institute of Technical Acoustics (ITA)
toolbox
Commits
3deb7428
Commit
3deb7428
authored
Jul 06, 2017
by
Jan-Gerrit Richter
Browse files
added guiless export to new bassyst (documentation needed)
parent
677a3ccc
Changes
1
Hide whitespace changes
Inline
Side-by-side
kernel/DataAudio_IO/ita_export_newBassyst_fast.m
0 → 100755
View file @
3deb7428
function
ita_export_newBassyst_fast
(
varargin
)
sArgs
.
freqData
=
itaAudio
;
sArgs
.
impData
=
itaAudio
;
sArgs
.
fileName
=
'export.xml'
;
sArgs
.
name
=
'export'
;
sArgs
=
ita_parse_arguments
(
sArgs
,
varargin
);
sArgs
.
fileName
=
getOutFileWithExtension
(
sArgs
.
name
,
sArgs
.
fileName
);
exportBSFile
(
sArgs
.
freqData
,
sArgs
.
impData
,
sArgs
.
name
,
sArgs
.
fileName
)
end
function
exportBSFile
(
transFunc
,
inputImp
,
bsName
,
outFile
)
docNode
=
getDocNode
(
transFunc
,
inputImp
,
bsName
);
xmlwrite
(
outFile
,
docNode
);
end
function
outFile
=
getOutFileWithExtension
(
outFile
,
bsName
)
if
(
isempty
(
outFile
)
)
outFile
=
[
bsName
getBSFileExtension
()];
return
;
end
idxFileExt
=
strfind
(
outFile
,
getBSFileExtension
());
if
(
~
isempty
(
idxFileExt
))
%File Extension is at the end of the filename?
boolAddExt
=
~
(
(
idxFileExt
+
length
(
getBSFileExtension
())
-
1
)
==
length
(
outFile
)
);
else
boolAddExt
=
1
;
end
if
(
boolAddExt
)
outFile
=
[
outFile
getBSFileExtension
()];
end
end
\ No newline at end of file
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment