blob: d14b42964b98dd18b82923a27f00bca1c4875c42 (
plain) (
tree)
|
|
� g
�u6/�6A � <pScreens\UScreenName.pas@�55 dUThemes/�6A gTheme��)>cdSysUtils�C�� cdUPliki/�6A cdUMusic/�6A gMusic<߈�gTMusic.PlayBack;<]�gTMusic.PlayStart:<]�cdUDisplay/�6A cdSDL/�6A gSDLK_0���gSDLK_9���gSDLK_aF���gSDLK_z_���g
SDLK_SPACE���g
SDLK_MINUS���gSDLK_EXCLAIM���g
SDLK_COMMA���g
SDLK_SLASH���g
SDLK_ASTERISK���g
SDLK_QUESTION$���g
SDLK_QUOTE���g
SDLK_QUOTEDBL���gSDLK_BACKSPACE���gSDLK_ESCAPE ���gSDLK_RETURN���g SDLK_DOWNx��gSDLK_UPw��g
SDLK_RIGHTy��g SDLK_LEFTz��cdUMenu/�6A fTMenu"��yg.TMenu <6\g
TMenu.Destroy q��gTMenu.Create"q��gTMenu.Create#q��gTMenu.DrawBGGq��gTMenu.DrawFGHq��g
TMenu.DrawIq��gTMenu.ParseMouseKq��gTMenu.onShowFinishOq��gTMenu.onHidePq��gTMenu.InteractNextRq��gTMenu.InteractCustomSq��gTMenu.InteractPrevTq��gTMenu.InteractIncUq��gTMenu.InteractDecVq��gTMenu.FadeToFq��gTMenu.Create!q��gTMenu.AddBackground'q��gTMenu.AddButton4q��gTMenu.AddStatic(q��g
TMenu.AddText0q��gTMenu.SetInteraction%q��cdSysInit�C�� cdSystem�C�� fCardinal��"�fByte7c�fBooleanW~8fRealS��<g@AbstractErrorE�a�gTObject.SafeCallException�G��gTObject.AfterConstruction�G��gTObject.BeforeDestruction�G��gTObject.Dispatch�G��gTObject.DefaultHandler�G��gTObject.NewInstance�G��gTObject.FreeInstance�G��fInteger���
gTrue����gChr fChar��ifString���f
AnsiString���gDelete gLength g@LStrLen��g@LStrDeleteE�a�g
@LStrFromChar9%\g@LStrCatE�a�g@LStrAsg�4�g@LStrClrѨ}�g@HandleFinallyE�a�gHigh g
@DynArrayHighE�a�g@ClassCreate���g@AfterConstructionڿ%UgFalse����ceUTexture/�6A ceUIni/�6A gIniH�� gTIni.SaveNamesP��$ceUMain/�6A gPlayersPlay��
ceUGraphic/�6A g
ScreenMain�PgScreenLevel�Ʈ�c4UScreenName�iif@c4UMenu @c4SDL c4UDisplay c4UMusic c4UPliki
c4SysUtils c4UThemes c&.TScreenName�+� *TScreenName�Da% .2f 4UGraphic �c4UMain �c4UIni �c4UTexture �c(TScreenName.ParseInput�5$ I E!Self
!
PressedKey!ScanCodef�!PressedDown& Result Ic(TScreenName.Create�4$ I ��!Self
!.f� Ic(TScreenName.onShow�6$ I
!Self Ic( TScreenName.SetAnimationProgress�7$ I N!Self !Progress&
Ic(Finalization�E�a� \! c�(UScreenName� !c��G qFR� ��"� .Create� ��-
ParseInput��-onShow��-SetAnimationProgress�cD ����P@ A �l�L � � TScreenName TScreenNameL UScreenName U����SVW3ۉ]��M���3�Uh� d�0d� ��} �| ��/}D�� } ���� ���� ���� �R �����r^��tY��tT�����rL�3 �� � ��у�r1��t,��ރ�r$� �� �� J�� J�� �� �E��U�� �U��G�O���@�0�F � �� �G�W���@�0�F � �ЍF � � � � � � � � � � ��� �r� � � ���W�T���R��R � F��uܡ � � � � � � ��� �"�Nj�R0��Nj�R8��Nj�R0��Nj�R83�ZYYd�h� �E�� �� ����_^[YY]� U��QSVW��t���� �U���3ҋ�� � � �@�P��� � k�� ��R�T ��� C��u� � �@�@� ����|'F3ۋ����@� ��R�R��� CNuܡ � �@�@� ����|&F3ۋ���+Ë ��R�R��� CNu�3ҋ�� �ǀ}� t� d� ����_^[Y]�SV�� �F�D���@� �� � ���� C��uۡ � ��~� �V�T��Ƃd Ƃf CHu� �C���F�D��ƀd ƀf C��u�^[�U��S� �H�L���]�Y@�]�YDB��u�[]� U��3�Uh% d�0d� � 3�ZYYd�h, �� ��]Ã- �m� � �@�D~������F�HJLNP�|�TVXZ\^` � �"�B(�.��2�6����
�b�2���
�bb���"��d
f h�.$j�,$ln�,�4���T�TN����p0BA
RT
�>
L
0(
�4
6�B6�@D
�@
�
�
�(
f �� �
�0@ � � �� � *� � �� �� � � *� *� *� ,� .� � �� � � �
� �P�p�B
�B�F���������!��!�� p�0
�t������a����Y������ 0 ���\��|���������`
D�D� a
|