aboutsummaryrefslogblamecommitdiffstats
path: root/Game/Code/Classes/UMain.dcu
blob: 3a2edf099e63c911020cb54564c03ded98040cb3 (plain) (tree)
















































































































                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                      
��,
�u6/�6A�<pClasses\UMain.pas�a6dUThemes/�6AfTRGB�>��cdULight/�6AgLight�x�_gTLight.Refresh��b�gTLight.LightOne��b�cdULCD/�6AgLCDGYgTLCD.MoveCursorBR:��3gTLCD.ShowCursor7��3cdzlportio/�6AcdOpenGL12/�6AgUnloadOpenGLE�a�cdUScreenSing/�6AfTScreenSing�h�|gTScreenSing.UpdateLCD�+��gTScreenSing.onSentenceEnd�+��cdULyrics/�6AgTLyric.SetSelecteduC9}gTLyric.SetDonevC9}gTLyric.AddCzesc�C9}gTLyric.Clear�C9}gTLyric.SelectedLetter�C9}cdULog/�6AcdUIni/�6AgIniH��cdUDisplay/�6AgDisplay����g
TDisplay.Draw�	��cdSysUtils�C��gBeepE�a�cdUTime/�6AgCountMidTimeE�a�gTimeMida�<g
CountSkipTimeE�a�gTimeSkipa�<cdURecord/�6AgSound��WgTSound.AnalizujBufor�Z'cdUMusic/�6AgCzas���RgCzescizNgMusic<߈�gTMusic.PlayClick?<]�cdUGraphic/�6AgSwapBuffersE�a�gReinitialize3DE�a�cdSDL/�6Af
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����gAssignedgTrue����gHighg
@DynArrayHighE�a�gLengthg@DynArrayLengthE�a�gIncgFracg@FRACE�a�g	SetLengthg@DynArraySetLengthE�a�gParamStr��g@LStrCmpE�a�g
@LStrArrayClrzY��g@HandleFinallyE�a�gBreakgAbsgLowg@DynArrayClearxB)�g@LStrClrѨ}�ceMath�C��gFloore��ce	UJoystick/�6AgJoy�;)-gTJoy.Update���PceUSongs/�6AgAktSongVZa�c4UMain�iif@c4SDLbc4UGraphic\c4UMusicRc4URecordLc4UTimeBc4SysUtils>c4UDisplay8c4UIni4c4ULog2c4ULyrics&c4UScreenSingc4OpenGL12c4zlportioc4ULCDc4ULightc4UThemesc*.1�����*.2�����*TPlayer�D6	 OGL�ev�8 Done�ev�8 Event�_��
! FileName�:�% Restart�ev�8) Player���V5*.3����� PlayersPlay���
9 .4f4USongs�c4	UJoystick�c4math�c(MainLoop�E�a�� Delayc(CheckEvents�E�a��c(GetTimeForBeatsH
!BPM&
 !Beats&
 Resultf
�c(GetBeatsH
!BPM&
 !msTime&
 Resultf
�c(
GetMidBeatSuba!BPMNum"Time
"CurBeat
 NewTimef
c(
GetMidBeat���:�a
!Timef
 Resultf
� CurBeatf
� CurBPMc(GetTimeFromBeat��'�
!Beat Resultf
 CurBPMc(Sing����!!Senderf Pet PetGrf CP Donef
 Nc(NewSentence�����!Senderf Gc(NewBeat����)!Sender
 Petc(NewBeatC����!Sender Petc(NewBeatD����!Senderc(NewNote�����&!Senderf CPf S SMin SMaxf SDetf Pet
 Moznaf  Nowaf" Range NoteHitf$c(ClearScores����m!	PlayerNumc(Finalization�E�a��! c�(UMain�!c��M@�,Start,Dlugosc,Detekt
,Ton
 ,Perfect0,Hit2cE<� MZ�,Name,Score
,	ScoreLine
 ,ScoreGolden
0,ScoreI@,
ScoreLineIH,ScoreGoldenIP,ScoreTotalIX,	ScoreLast
`,ScorePercentp,ScorePercentTargetx,LineBonus_PosX,LineBonus_PosY,LineBonus_Alpha!,LineBonus_Visible1,LineBonus_TextA,LineBonus_ColorQ,LineBonus_TargetX�,LineBonus_TargetY�,LineBonus_StartX�,LineBonus_StartY�,HighNut�,IlNut�,Nuta�cE<�"D����P@L�$L�&D�PD�Pl)Y.2 ����UMainTPlayer�Px.3�����UMainS�j}j}���������u�����������������-�����<$����|P�Y��;t���=�s����[�zD AS���xu[�K�,t,t9,u:��1j���@��
���S��u���h�YHt�[�U����� �u�M�]���E�YY]�pBU�����E�M�5 �]���E�YY]�pBSVWU������ء���;�u?�������t��4��v�6�����D��]�3���F��������t��4�����D�����d�����$���$���$$����v#����T��U�T��U��$$���6����t��4��v�6�����D��]�3���FYZ]_^[�U����S3��E��E�����Hu�E�����5��]������H~43��E��E�3���M��U���C�E�����w�E��E��E�E��E�[��]�pBSVW�����=3��$�D$���Hu%k�<�D$�D$���0݇�5`���$����H��݇�5`�$�3�����;�}K�t$�D$������\����r0�d������4‹��D����d����$�$����;�t�t$�D$������\����s.�d������4‰t$�D$���d����$�$�C���;��t$�D$������\���������$��_^[�zDpBSVWU���$�5��@H����XH���@���݀�5���hH����$����X���@����<$����B��@,��B(�݀�5���hH����$����X0���@0����<$����B,��@��B�݀�����5���hH����$�����X���@����<$����B��@���X �3��D$�L$����+������S@��T���|/B3�����+���\����lm��-;]���@Juԋ���+�����;B@t�$��D$�|$u���@��|��;t�$���@(�;B,t�$���@��|��;Bt�$�3��D$�D$�?����@��R�T� ����B3ɋ���@�>��D�,�����D���X���������@�>��D�,�����D��>�?��<�.�m�|�,D��D$�D$��X���r@����@�>��D�,�����D���h����@�>��D�,�D����\$�AJ�F�������@��R�L� �����uf�D$����uW����@��[�D�,�����D���ۍ[�6�v�\�,D��D$�D$��X���s�$��������D$����v3��D$�D$�?�t$�t$�D$������]_^[�zD�B�A��?SVWUQ�$��E�����|<G3ۋ����E3҉T�t�E�D�p����j�E�D�x�����COuǡ���$���������;B}���B�$������$�����$�Z]_^[�SVWU���-�E���@�U�R�t� ��|aF3ۋE���@�U�R�D�,�����D��;Bu2�����������С�����CNu�]_^[�U��jjSVW�=3�Uh^d�0d� ���xpu'��@,��J��B�����u�����@,��J��B�����uIhi@j�����U����E��t�uhi@j��3������@��R�\� ��|wC3�����@��R�D�,�����D��;B,uJ���xlu����U����E��t�th�b@j��3��FKu�3�ZYYd�he�E�������_^[YY]�����
-doublelights��SVWU���$�H����@�D$�D$���T$��������H��}3��
�T$�D$���D$+���@�D$����@���R�T� ����B3���ɍI���[�L�,�����L��;K����ɍI���[�L�,�����L���ۍ[�-�m�m�\�,L�I�;K|E��ɍI���[�L�,�|�u(��ɍI���[�L�,�|�~�t$�D$�GJ�?���F�L$�����t$���T$���� �[�|$�P����@���R�D� ����@�D$3���ɍI���[�L�,�����L���RB;����
��ɍI���[�L�,�����L���ۍ[�-�m�m�\�,L�;��M�
���( ���T$����( ��ɍI���[�L�,����+T�����
���( ���T$����( ��ɍI���[�L�,����+T����|��D$���+H ����@���R�D�,�����\��Ë��l$��+�( �3�+�;��h����T$����( �D$���x`������@���R�D�,�����D�HtHt^����@�=�	����@���R�D�,�����D��ɋD$����D��D$����\���-���@�=�	����@���R�D�,�����D��ɋD$����D��D$����\��������@���R�D�,�����D�HtHt[����@�=�	����@���R�D�,�����D��ɋD$����D��D$����\���T���@�=�	����@���R�D�,�����D��ɋD$����D��D$����\���\$����D��5�	����<$�������D� ��D��5�	����<$�������D�(��D� �T$���
D�(�D�$��D�,G�L$�/���;t$�P�D$�T$����|�t�����L$��ۀ( ��D�p���
�L�x�\����uR��D�p���
�T�x�‹T$���
�T�p���L$����L�xD��;Bu�D$����@���R�D� ��|=@�D$3�����@���R�D�,�����D��;Bu�D$G�L$uʀ|$���\$����D�t��D�p��D�tP��D�x�������D�p����T�x�
�I�¡�D�p����T�x�D����T$��ۀ( ��D�p����T�x�\����D�p����T�x�
�y�|��y�|���D�p����T�x�L$�L��)�D$����D�p���T$���
�T�x�D�����@���R�D� ���@�D$3��L$����D�p����L�x����ɍI���[�L�,����;D����D$���
�D�p���L$����L�x�D���ɍI���[�L�,;D�ur����@�
�	�I�D�,�D��D$����D�p���T$���
�T�x�\����u*�D$����D�p���T$���
�T�x�D�G�L$������D$�L$�D����|$�����@�;D$���D$��@���R�D� ���T$ҍR�
�	�I�T�,�D��T$ҍR�
�	�I�T� ���L$ɍI���[�L�,D�H�;Bu�T$�$���]_^[�@F�F ASV������3��t��t��3��t� �3��t��t��3��t�$�3��t��t��3��t�(�3��t�,�3��t�0�t�4��D�82��D�<2��D�L�3��t�H�i����F�t�`��D�d^[�U��3�UhAd�0d� �u�����3�ZYYd�hH����]Ã-�m9��<��*���������f6 ��
�
:<
^


D�
F��hH`��:�$�:���@
�
j8,!���.
�F�$��,!�F�.
�H5 ���5��8!5TI�(�DI"�&I,�JIj�JIh�vYV
TJTTT�Y
T5
TT�TTT�Y
T5
TT�TTT�YYY
T5Y
TT�TT�
T@T\T@Tu TTT�
TT�
TTT��T�TPT~6*Y�T2(YT*Du��l�
�V$,
VVV", ."�V|T$(0
�V�6T6XZ
TD
��
�
tT6XZ��
�
"���J��
��6NP
V&VRVBV0T,V>V*T$V:VnN\VJV0T$TV>V<NN8V>NN8VB6.V4NBV
N262VDV�VB�"�V�VB�"�.VDV�VB�"�V�VB�"�"���������"���T� N(��$��(�(�T.VBV0TP�����
���T��"N(����T&��6�(�*VH��(VJ�(�*V8V4�(�4�(�dV�2V6V8V6V(T"$2��a�����
�
�
��������" 


>



�>

"F�
:&&
(f� 2^*Z&�

$f$ T`T\�$b" 0 \:"\:"�:,*�R
>� 8&::���
$�":.
<"8�.,26P
2�

<P608*2L8*�(J>
&6&
&B
�
��LJ��t�p

�2
"T��T�
�bT\�r
]
BT�
 LD<^T@
RJIT���IH�*"
���
�rfy����������
� �"�$�.�0�2�:�<�>�@� B�"D�$J�&L�(N�*P�,`�.b�0d�f�h�j�l�
n�x�������������������!Y�iu����!��u��A��i5�AI����
����	�
�����!�%�)�-�1�9A=EAIEMM�Q�U�]iaqeuiym}q�y�}��!�)���}�A�i�q�u�y�}�������������
��
���@�����     !�%)-%��-��%�-�%5�-5�%]-]%�-�)5�5@ E�E��I`pMU�U]�M]�Y�(�i�a=a��ii�q�	q��q
q��u@�}<}���`��
�N�����@p�=����@��
��A8���������5
�9��e��u��
�
������
����1
�M#��M#��@0��a��  a