From e4fc1ba3d1b0c146ea806319514d2603f0d4f112 Mon Sep 17 00:00:00 2001 From: f1fth_freed0m Date: Fri, 11 Apr 2008 19:32:27 +0000 Subject: translated some polish code AddCzesc -> AddLine NrCzesc -> NrLine NrCzesci -> NrLines Pet -> Count SingDrawCzesc -> SingDrawLine SingDrawPlayerCzesc -> SingDrawPlayerLine SingDrawPlayerBGCzesc -> SingDrawPlayerBGLine EditDrawCzesc -> EditDrawLine Tekst -> Text git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1020 b956fd51-792f-4845-bead-9b4dfca2ff2c --- Game/Code/Screens/UScreenEditSub.pas | 13 ++++++------- 1 file changed, 6 insertions(+), 7 deletions(-) (limited to 'Game/Code/Screens') diff --git a/Game/Code/Screens/UScreenEditSub.pas b/Game/Code/Screens/UScreenEditSub.pas index c3071640..8ca1c3f3 100644 --- a/Game/Code/Screens/UScreenEditSub.pas +++ b/Game/Code/Screens/UScreenEditSub.pas @@ -522,8 +522,7 @@ begin begin // skip to next sentence - if SDL_ModState = 0 then begin - {$IFDEF UseMIDIPort} + if SDL_ModState = 0 then begin {$IFDEF UseMIDIPort} MidiOut.PutShort($81, Lines[0].Line[Lines[0].Current].Note[MidiLastNote].Tone + 60, 127); PlaySentenceMidi := false; {$endif} @@ -534,7 +533,7 @@ begin if Lines[0].Current > Lines[0].High then Lines[0].Current := 0; Lines[0].Line[Lines[0].Current].Note[CurrentNote].Color := 1; - Lyric.AddCzesc(Lines[0].Current); + Lyric.AddLine(Lines[0].Current); Lyric.Selected := 0; AudioPlayback.Stop; PlaySentence := false; @@ -563,7 +562,7 @@ begin if Lines[0].Current = -1 then Lines[0].Current := Lines[0].High; Lines[0].Line[Lines[0].Current].Note[CurrentNote].Color := 1; - Lyric.AddCzesc(Lines[0].Current); + Lyric.AddLine(Lines[0].Current); Lyric.Selected := 0; AudioPlayback.Stop; PlaySentence := false; @@ -827,7 +826,7 @@ begin Lines[0].Current := Lines[0].Current + 1; CurrentNote := 0; Lines[0].Line[Lines[0].Current].Note[CurrentNote].Color := 1; - Lyric.AddCzesc(Lines[0].Current); + Lyric.AddLine(Lines[0].Current); end; procedure TScreenEditSub.JoinSentence; @@ -1191,7 +1190,7 @@ begin Lyric.ColSG := Skin_FontHighlightG; Lyric.ColSB := Skin_FontHighlightB; Lyric.Style := 0; - Lyric.AddCzesc(0); + Lyric.AddLine(0); Lyric.Selected := 0; NotesH := 7; @@ -1304,7 +1303,7 @@ begin if not Error then begin SingDrawBeatDelimeters(40, 300, 760, 0); - EditDrawCzesc(40, 405, 760, 0, 15); + EditDrawLine(40, 405, 760, 0, 15); end; // draw text -- cgit v1.2.3