just some cleanup

- replaced many German and Polish comments
- replaced many cryptic var-names
- IlNut replaced with LengthNote
- renamed the global var "Filename" to "ConversionFilename" to prevent unintended use of it
- more readable code (hopefully), especially NewNote and OnSentenceEnd
- added some comments on elementary classes/records and their fields

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1137 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 4 insertions, 4 deletions

diff --git a/Game/Code/Screens/UScreenEditConvert.pas b/Game/Code/Screens/UScreenEditConvert.pas
index 7527dc68..a57e89fb 100644
--- a/Game/Code/Screens/UScreenEditConvert.pas
+++ b/Game/Code/Screens/UScreenEditConvert.pas
@@ -165,7 +165,7 @@ begin
           if Interaction = 3 then begin
             if SelectedNumber > 0 then begin
               Extract;
-              SaveSong(Song, Lines, ChangeFileExt(FileName, '.txt'), false);
+              SaveSong(Song, Lines, ChangeFileExt(ConversionFileName, '.txt'), false);
             end;
           end;
 
@@ -396,7 +396,7 @@ begin
   MidiOut.Open;
 //  MidiOut.SetVolume(100, 100); // temporary}
 
-  FileName := GamePath + 'file.mid';
+  ConversionFileName := GamePath + 'file.mid';
   {$IFDEF UseMIDIPort}
   MidiFile := TMidiFile.Create(nil);
   {$ENDIF}
@@ -426,9 +426,9 @@ begin
   MidiOut.Open;
 
 
-  if FileExists(FileName) then
+  if FileExists(ConversionFileName) then
   begin
-    MidiFile.Filename := FileName;
+    MidiFile.Filename := ConversionFileName;
     MidiFile.ReadFile;