diff options
author | brunzelchen <brunzelchen@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2010-02-24 21:26:02 +0000 |
---|---|---|
committer | brunzelchen <brunzelchen@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2010-02-24 21:26:02 +0000 |
commit | 262e2fd159ad63b7682992864987bb41a7814975 (patch) | |
tree | c65ab307e049a67d27bd0407f80ab4ae8ba695a0 /Game/Code/Classes/ULog.pas | |
parent | 8d673db586aa57d95823730458e4973029fdfea7 (diff) | |
download | usdx-262e2fd159ad63b7682992864987bb41a7814975.tar.gz usdx-262e2fd159ad63b7682992864987bb41a7814975.tar.xz usdx-262e2fd159ad63b7682992864987bb41a7814975.zip |
added experimental voice playback after singing
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1 Challenge MOD@2154 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Game/Code/Classes/ULog.pas')
-rw-r--r-- | Game/Code/Classes/ULog.pas | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/Game/Code/Classes/ULog.pas b/Game/Code/Classes/ULog.pas index c870a279..ce6d5f07 100644 --- a/Game/Code/Classes/ULog.pas +++ b/Game/Code/Classes/ULog.pas @@ -34,7 +34,7 @@ type procedure CriticalError(Text: string);
// voice
- procedure LogVoice(SoundNr: Integer; Player, Artist, Title, Points: string);
+ function LogVoice(SoundNr: Integer; Player, Artist, Title, Points: string): string;
// compability
procedure LogStatus(Log1, Log2: string);
@@ -172,7 +172,7 @@ begin end;
end;
-procedure TLog.LogVoice(SoundNr: Integer; Player, Artist, Title, Points: string);
+function TLog.LogVoice(SoundNr: Integer; Player, Artist, Title, Points: string): string;
type
TRiffHeader = record
riff: Array[0..3] OF Char;
@@ -275,6 +275,7 @@ begin end;
FS.Free;
+ LogVoice := FileName;
end;
procedure TLog.LogStatus(Log1, Log2: string);
|