From 7e677fd5ebe60c3dd9df8954e1ed28c4afdf8660 Mon Sep 17 00:00:00 2001 From: davidus01 Date: Sat, 22 May 2010 22:58:14 +0000 Subject: Volume control slide: audio,midi,click golden notes in editor with effect resize screen modification change in UMenuSelectSlide arrow click space git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@2400 b956fd51-792f-4845-bead-9b4dfca2ff2c --- us_maker_edition/src/base/UDraw.pas | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 'us_maker_edition/src/base/UDraw.pas') diff --git a/us_maker_edition/src/base/UDraw.pas b/us_maker_edition/src/base/UDraw.pas index 308526b8..bb9f28ca 100644 --- a/us_maker_edition/src/base/UDraw.pas +++ b/us_maker_edition/src/base/UDraw.pas @@ -1044,6 +1044,7 @@ var Rec: TRecR; Count: integer; TempR: real; + GoldenStarPos: real; begin glColor3f(1, 1, 1); glEnable(GL_TEXTURE_2D); @@ -1076,7 +1077,7 @@ begin glTexCoord2f(1, 1); glVertex2f(Rec.Right, Rec.Bottom); glTexCoord2f(1, 0); glVertex2f(Rec.Right, Rec.Top); glEnd; - + GoldenStarPos := Rec.Left; // middle part Rec.Left := Rec.Right; Rec.Right := (Start+Length-Lines[NrLines].Line[Lines[NrLines].Current].Note[0].Start) * TempR + Left - NotesW - 0.5 + 10*ScreenX; @@ -1100,6 +1101,10 @@ begin glTexCoord2f(1, 1); glVertex2f(Rec.Right, Rec.Bottom); glTexCoord2f(1, 0); glVertex2f(Rec.Right, Rec.Top); glEnd; + if (NoteType = ntGolden) and (Ini.EffectSing=1) then + begin + GoldenRec.SaveGoldenStarsRec(GoldenStarPos, Rec.Top, Rec.Right, Rec.Bottom); + end; end; // with end; // for -- cgit v1.2.3