blob: 3a2edf099e63c911020cb54564c03ded98040cb3 (
plain) (
tree)
|
|
� �,
�u6/�6A � <pClasses\UMain.pas�a6 dUThemes/�6A fTRGB�>��cdULight/�6A gLight�x�_gTLight.Refresh��b�gTLight.LightOne��b�cdULCD/�6A gLCDGYgTLCD.MoveCursorBR:��3gTLCD.ShowCursor7��3cdzlportio/�6A cdOpenGL12/�6A gUnloadOpenGLE�a�cdUScreenSing/�6A fTScreenSing�h�|gTScreenSing.UpdateLCD�+��gTScreenSing.onSentenceEnd�+��cdULyrics/�6A gTLyric.SetSelecteduC9}gTLyric.SetDonevC9}gTLyric.AddCzesc�C9}gTLyric.Clear�C9}gTLyric.SelectedLetter�C9}cdULog/�6A cdUIni/�6A gIniH�� cdUDisplay/�6A gDisplay����g
TDisplay.Draw� ��cdSysUtils�C�� gBeepE�a�cdUTime/�6A gCountMidTimeE�a�gTimeMida�<g
CountSkipTimeE�a�gTimeSkipa�<cdURecord/�6A gSound��WgTSound.AnalizujBufor�Z'cdUMusic/�6A gCzas���RgCzescizNgMusic<߈�gTMusic.PlayClick?<]�cdUGraphic/�6A gSwapBuffersE�a�gReinitialize3DE�a�cdSDL/�6A f
TSDL_EventQG�
gSDL_EnableKeyRepeat>ه�g SDL_Delay%�ydg
SDL_PollEvent :�Ag
SDL_QUITEV���gSDL_KEYDOWN���gSDL_JOYBUTTONDOWN���cdSysInit�C�� cdSystem�C�� f
AnsiString���fRealS��<fInteger���
fSingle��9DfBooleanW~8fString���gFalse����gAssigned gTrue����gHigh g
@DynArrayHighE�a�gLength g@DynArrayLengthE�a�gInc gFrac g@FRACE�a�g SetLength g@DynArraySetLengthE�a�gParamStr��g@LStrCmpE�a�g
@LStrArrayClrzY��g@HandleFinallyE�a�gBreak gAbs gLow g@DynArrayClearxB)�g@LStrClrѨ}�ceMath�C�� gFloore��ce UJoystick/�6A gJoy�;)-gTJoy.Update���PceUSongs/�6A gAktSongVZa�c4UMain�iif@c4SDL bc4UGraphic \c4UMusic Rc4URecord Lc4UTime Bc4SysUtils >c4UDisplay 8c4UIni 4c4ULog 2c4ULyrics &c4UScreenSing c4OpenGL12 c4zlportio c4ULCD c4ULight c4UThemes c*.1�����*.2�����*TPlayer�D6 OGL�ev�8 Done�ev�8 Event�_��
! FileName�:�% Restart�ev�8) Player���V5*.3����� PlayersPlay���
9 .4f 4USongs �c4 UJoystick �c4math �c(MainLoop�E�a� � Delay c(CheckEvents�E�a� � c(GetTimeForBeats H
!BPM&
!Beats&
Resultf
�c(GetBeats H
!BPM&
!msTime&
Resultf
�c(
GetMidBeatSub a !BPMNum"Time
"CurBeat
NewTimef
c(
GetMidBeat���:� a
!Timef
Resultf
� CurBeatf
� CurBPMc(GetTimeFromBeat��' �
!Beat Resultf
CurBPMc(Sing���� ! !Senderf Pet PetGrf CP Donef
Nc(NewSentence���� � !Senderf Gc(NewBeat���� ) !Sender
Petc(NewBeatC���� !Sender Petc(NewBeatD���� !Sender c(NewNote���� �&
|