aboutsummaryrefslogblamecommitdiffstats
path: root/Game/Code/Screens/UScreenEditConvert.dcu
blob: 1839ad6bc6766936d780394982b06cae1366dea5 (plain) (tree)















































































































































                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         
�$5
�u6/�6A�<pScreens\UScreenEditConvert.pas#�D6dUThemes/�6AcdUMusic/�6AfTCzesci��Z�gMusic<߈�gTMusic.PlayBack;<]�gTMusic.PlayStart:<]�f.7����f.6����cdUSongs/�6AfTSongH�G�f.2����cdULog/�6AgLog�9�gTLog.LogStatus�R�cdMidiOut/�6AfTMidiOutput�z)g.TMidiOutput~tgTMidiOutput.Create�=�LgTMidiOutput.SetProductName�=�LcdMidiFile/�6Af	TMidiFile���f
TMidiTrack���wf
PMidiEvent{�)gTMidiFile.StopPlaying�gTMidiFile.SetOnMidiEvent�gTMidiFile.StartPlaying�g
.TMidiFile�I^�gTMidiFile.Create�gTMidiFile.setFilename�gTMidiFile.ReadFile�gTMidiFile.GetTrack�gTMidiTrack.getEventCount�~��gTMidiTrack.getEvent�~��gTMidiFile.GetCurrentTime"�gTMidiFile.GetTrackLength$�cdSDL/�6AgSDLK_qV���gSDLK_ESCAPE���gSDLK_RETURN���g
SDLK_SPACE���g
SDLK_RIGHTy��g	SDLK_LEFTz��g	SDLK_DOWNx��gSDLK_UPw��cdUMenu/�6AfTMenu"��yg.TMenu	<6\g
TMenu.Destroy q��gTMenu.Create!q��gTMenu.Create#q��gTMenu.DrawBGGq��gTMenu.DrawFGHq��gTMenu.ParseMouseKq��gTMenu.onShowFinishOq��gTMenu.SetAnimationProgressQq��gTMenu.InteractNextRq��gTMenu.InteractCustomSq��gTMenu.InteractPrevTq��gTMenu.InteractIncUq��gTMenu.InteractDecVq��gTMenu.FadeToFq��gTMenu.Create"q��gTMenu.AddButton5q��gTMenu.AddButtonText:q��gTMenu.SetInteraction%q��g
TMenu.DrawIq��cdSysInit�C��cdSystem�C��fInteger���
fRealS��<f
AnsiString���fString���fBooleanW~8fByte7c�fCardinal��"�g@AbstractErrorE�a�gTObject.SafeCallException�G��gTObject.AfterConstruction�G��gTObject.BeforeDestruction�G��gTObject.Dispatch�G��gTObject.DefaultHandler�G��gTObject.NewInstance�G��gTObject.FreeInstance�G��gTrue����gFalse����gIncgHighg
@DynArrayHighE�a�gDecg@LStrClrѨ}�g@HandleFinallyE�a�gCopyg	@LStrCopyE�a�gDeleteg@LStrDeleteE�a�g@LStrAddRef��jg@LStrCmpE�a�g@LStrAsg�4�g	@LStrCat3E�a�g
@LStrArrayClrzY��g	SetLengthgLengthg@DynArrayLengthE�a�gRoundg@InitializeRecord�9�g@DynArraySetLengthE�a�g@ROUNDE�a�g@CopyRecordE�a�g@FinalizeRecord�9�gRandomg@RandIntE�a�g@ClassCreate���g@AfterConstructionڿ%Ug@DynArrayAsgE�a�f	PAnsiCharrugfPCharrugg@LStrToPCharf���gTObject.Free�G��ceUSkins/�6AgSkin|�t�gTSkin.GetTextureFileNamegWI�ceOpenGL�C��g	glColor3fW�%�ceUIni/�6AgIniH��ceUMain/�6AgFileName�:�ceUPliki/�6AgSaveSongESD�gGamePath�:�ceTextGL/�6Ag
SetFontPos�4�4gSetFontSizeϨ%�gglPrint��vceUDrawTexture/�6AgDrawQuad��TgDrawLine��TceSysUtils�C��g
ChangeFileExt�;yGg
FileExists���gIntToStri5�ceUGraphic/�6Ag
ScreenEdit,��g
ScreenOpen�R��gScreenEditConvert�yE]c4UScreenEditConvert�iif@c4UMenu\c4SDLJc4MidiFile*c4MidiOut c4ULogc4USongsc4UMusicc4UThemesc*TNote�5%�b(*.1�����**TTrack���l�,*TNuta�
ҫ�.*TArrayTrack�ѓ��0*.3�����2&.TScreenEditConvert����?4*TScreenEditConvert��,]6 .4f84UGraphic=c4SysUtils-c4UDrawTexture!c4TextGLc4UPlikic4UMain�c4UIni�c4OpenGL�c4USkins�c(TScreenEditConvert.ParseInput����A!Self6!
PressedKey"!ScanCode !PressedDown& Result Tc(TScreenEditConvert.AddLyric����:!Self6!Startf�!Tekstf� Nc(TScreenEditConvert.Extract����:!Self6 Tf� Cf� N
 Nu NutaTempf.� Movec(!TScreenEditConvert.SelectedNumber����z!Self6 Result Tc(%TScreenEditConvert.MidiFile1MidiEvent����.:!Self6!eventc(TScreenEditConvert.Create�����:!Self6
!.<!Backf� Pc(TScreenEditConvert.onShow����:!Self6 Tf� Nf� C CN
c(TScreenEditConvert.Draw�����!Self6 Resultf Pet Pet2
 Bottomf Xf  Yf0 Hf@ YSkipfPc(TScreenEditConvert.onHide����6:!Self6c(Finalization�E�a�\! :c�(UScreenEditConvert�!:c��M6`q,Event,	EventType,Channel,Start ,Len0,Data1@,Data2H,StrPcEVu>MHy,Note*,Name,Hear,Status cM6(},Start,Len,Tone,Lyric,NewSentence cEh�@EV�BG6UFn��/�"�,ATrack0�,Channel0�,ColRD�,ColGFa,ColBH,Len�),Sel�),Selected�),MidiFile�),	MidiTrack�),	MidiEvent*,MidiOut*,Song!*,Czesc/,BPM�/,Ticks�/,Nuta2�/-AddLyric��-Extract��-MidiFile1MidiEvent�-SelectedNumber�	.Create�%�-onShow�9-
ParseInput��-Draw�
Q-onHide�ycD8����P@A<�L�J(L�L,L�N.L�PL�RL�TD8�PD8�PD8�PD8��D8��D8��lueTNote0(.10����UScreenEditConvertTTrackTNutaTArrayTrack����UScreenEditConvert.3����UScreenEditConvertL������
��TScreenEditConvertTScreenEditConvertLUScreenEditConvertU��jSV��3�Uh�d�0d� ��}����#����
tg��t9�����Qt$����<J�#J�%�l3��e��x
���������<�~u,��������������~u#Ɔt
Vh��x
���x
��~uƆt
jj��x
��~������������j�M������M�������
��y��p
�@����T�	B������T�	�U�Ƌ�R0�L�Ƌ�R8�C��p
����;�p
}*3���p
� ��p
��p
}������p
3�ZYYd�h��E��������^[Y]�����.txtU����SVW3ۉ]��]�M��U����E��3�UhMd�0d� ����������G3ۍ������;E����E�P���E���E��d�u�E�����E�P���E���E�p�u �E����������D�������D��|�u������D��U���"������T�������D��M��CO����3�ZYYd�hT�E������_^[��]�����\����/����-U����SVW�؍E܋�3�Uh�d�0d� ���
����
���`�ǃ�j��������݃��
�������������m@�E��E��u��4v����D�	�������6��������� @�E�3��E��@�������ҍR�|�	���E��@�������ҍR�|�$���������FP���������E��@�������ҍR�D�ܳ����������E��@�������ҍR�D�ܳ��������D��E��@�������ҍR�D� ��<������D�������D���G�M�������E��M��������������@�E��E��u��4v����D�	�����uu��������|c@�E�3��E��@���������4v�|�u:�E��@������D�ܳ���ЋE��@������L�(���G�M�u��E��M��d�����������@�E���H��|q@�E�3��<���������;D�~M�E܋�����
����������T��
�����D��U܋
�F�M�u��M��v�������0������|@�E�3������)4�G�M�u�j��������ǃ�3����3��E�3��E���@���3ɉL�$����D� ������������@�E�3�������|�������@P���������������E�3�j�E���@����D�,������E���@���3ɉL�$�E���@����D� �����E���@����D�,�@P�E���@����D�,������E���@����D�$�E���@����D� ��������U�ҍR����T�,�����D�������D��U�ҍR����T�,�����D�������D��U�ҍR����T�,�����D��E���@����D�,�����D�������T���E���@����D�,�����D�GF�M��4���3�ZYYd�h��E܋�����_^[��]��@����-SVW��3�������|!@3ҍR����L�	������uFBHu��_^[�S�JQ�J���
���S<[�U��jjjjjjSVW��t�����M��ڋ��E��3�Uhod�0d� �M�3ҋ��hD@jh4@jhY@jhD@j�M�������U����h.@jh@jjjjjjj�����hd@jh4@jhY@jhD@j�M�������U���h9@jh@jjjjjjj�����h�q@jh4@jhi@jhD@j�M������U����h9@jh@jjjjjjj�����h@@jh4@jhY@jhD@j�M������U���h4@jh@jjjjjjj�����������3ɲ����x
3��
��E��E��5ݜ����
��E��E��5ݜ���
��E��E��5ݜ�@�F��eu�3�ZYYd�hv�E������DŽ�t�d�����_^[��]�����ButtonF����Open����Play����
Play Selected����Save����file.mid AU����SVW3҉U��3�Uh�d�0d� 3ɲ�������
���x4u��������
�PP��������
��R0����������x
���x
�3���h
��l
3���p
��x
ۀ�ݛ����x
ۀ��5�ݛ��j��������3��E��U�E�@��U�E��@����D���E��}�uӋ�x
���H���6@�E��E��U���x
�����|
�^$�F ���H����@�E��E��U���|
������
�$%����v���������GP�v�������������
�@�v�������ҍR�\�����
�@�v�������ҍR�\���v�������ҍR���
�	�Ѝv�������ҍR���
�	���L��v�������ҍR���
�	������L��v�������ҍR���
�I�L� �v�������ҍR���
�I�L�$�v�������ҍR�D�(���
�R��v�������ҍR�D��v�������ҍR�D�ܛh
���v5�v�������ҍR�D��v�������ҍR�D�ݛh
��E��M������E��M�������������
�3ҋ��3�ZYYd�h��E������_^[��]�����Microsoft GS Wavetable SW Synth����MIDI�@SVWU�ĸ�����3��D$�D$Y@���������D$4�D$4�\$ ��D$ ����v3��D$ �D$$~@�D$�D$ �\$������D$4�D$4�|$ �\$(�h$@jۆp
�L$0�D$ ����$�h`�@j�t$D�t$Dh���?h����h���?h����h���?h������������|gE3ۍ[����|�tPh$@j�\$<�D$<�L$0�D$ ����$�hI@j�t$D�t$Dh���?h����h33�?h3333h33�?h3333�CMu�jjj����������E3ۍ<[����D�	������u?h9@j�\$<�D$<�L$0�D$ �����$��h@j�������D�	�����u?hD@j�\$<�D$<�L$0�D$ �����$��h@j���CM�L���h$@j�t$$�t$$h$@j�t$$�t$$jjjjjj�hN@j�t$$�t$$hN@j�t$$�t$$jjjjjj�h��@j�t$$�t$$h��@j�t$$�t$$jjjjjj��������|TE3�h$@j�\$<�D$<�L$0�D$ ����$�h��@j�\$P�D$P�L$@�D$0����$�jjjjjj�CMu��������|UE3�h&@j�\$<�D$<�L$0�D$ �������$��h@j��[����D���CMu����������E3ۍ[����������@�D$03��[�������ҍR�|�	���[�������ҍR�D�ܶh
�
� ����$��C�D$<�D$<�L$0�D$ �[�������ҍRkD� #�D$@�D$@�5$�����$�h@jh@j�����������������D���@��[�������ҍR�|����[�������ҍR�D�ܶh
�
� ����$��(�L$0�D$ �\$<�D$<�L$0������$��[�������ҍR�D�ܶh
�
� ����$��D$0�D$@�\$P�D$P�L$@������$������������������D���@�G�L$0�;���CM������x
��D$4�D$4�|$<���x
��D$8�D$8�l$<���
,� �\$��t$�t$�t$$�t$$�t$$�t$$�t$$�t$$h33�?h3333h33�?h3333h33�?h3333��$��H]_^[��C ANL@5DpB�B@?�6DS�؋��
��R4���
�[�U��3�Uh%d�0d� �3�ZYYd�h,����]Ã-�m�qq&�uuqq.yy(u�}}&���*yy.��}}.���(�`�������bd%fhjQ��9nyprtvxz���6��0�^6���2

A| 

IEE|&4684"	��
1(	��X�&���@�:��"�p��
�(�,��
�(�@�
�.�H�*���d� }
��"���:
��(�����.�
�P�bؒ�
�B�x���8�:�.�j}
�2}
�&}
�D�^
֒�Z�&
�f
ֈ�>
�-�n�}
��@	�^.%4��%$~H�%
��>%�H�%
��>%�H�%
��>%�H�%
��>%�

%
�8
:$�%$�%$�%6%���9(9$
&�9(9
 5<>v94�
�(90�n@$BDDH�:u
�Y�a�
��9���Q�2�:QVо%��%���Q
Q
dQ
Q
n)^)^)Ь)�LQ$�
�<��QQ�Q�%�QQQ�QQ�)<F0H(QQ�)fy*���������)�.�

$&"XH

:r
0^0*nJ$2.D� RXN6*<@8�:bdT.��"<60:t�
�.,0.<0��
*�
6
(2(LN(,|$$NPPZ>�4X
4
$�6
(
vtLtLtLtL.(<<<�|�<,4(&&426
�N@,6,&FBB>FPBBJrj�&�0.L�<:8�( ��02R*R�^^^(��(V.�0@<�<=�
���X`���(,(.6
6J:���qqqqqq
qqq y&y(y*y,y.}4}6}8}:}<}
>�D�H�L�P�R�T�
V�X�Z�\�`�b�d�f�h�j�l� n�"p�tr��$r�vt��&txv��(v	zxy�*x%|z��,z9~|U�.|��~��0~Q����2�y����4���������������������������	
}�!�)1�5�=A]EaIeMiUY�]�a�e�i�m�q�u�}������0�.�.�2��������������������` p2�^���Q��Q���Hp2�N�q
���������M	
��
����Q
��
��
�1�1��
���=��
���������	�p

2r�
r�r�`!!*�*�%�0p2)v
-v5�)5
�55
�-5
�9�(p=<I�M	
I�
�M�
�=��Q��U]�]!�]�]}�]]E�]�]�
�]=a�
a��]��U��y@}}2��  a