code:
;-------------------------------------------------
;�y���̓�������ԍ����擾
;SCORE_NO �y���ԍ�
;
;RETURNFS �y����������ԍ�
;-------------------------------------------------
@GET_SCORE_INFO_NO(SCORE_NO)
#FUNCTION
#DIM SCORE_NO		; �y���ԍ�

#DIM SCORE_INFO_NO	; �y����������ԍ�

SCORE_INFO_NO = -1

SELECTCASE SCORE_NO
;�����ˈٓ`�@�` Highly Responsive to Prayers
CASE 10100 ; A Sacred Lot,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10101 ; ���̐_��,���g�p��
	SCORE_INFO_NO = 1000
CASE 10102 ; �i���̛ޏ�,�P�`�S�ʁA�n���P�U�`�P�X�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10103 ; Highly Responsive to Prayers,���E�U�`�X�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10104 ; ��������k,�n���U�`�X�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10105 ; Oriental Magician,���E�P�P�`�P�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10106 ; �j�ׂ̏�����,�n���P�P�`�P�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10107 ; The Legend of KAGE,���E�P�U�`�P�X�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10108 ; The Positive and Negative,�T�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10109 ; �V�g�`��,�P�O�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10110 ; ����,�P�T�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10111 ; �����A�|��������̎��܂�,���E�ŏI�ʃe�[�}�P
	SCORE_INFO_NO = 1000
CASE 10112 ; ���Ȃ΂���Ƃ�,���E�ŏI�ʃe�[�}�Q
	SCORE_INFO_NO = 1000
CASE 10113 ; ���H���m,�n���ŏI�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10114 ; �A�C���X,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004

;���������^�@�` the Story of Eastern Wonderland
CASE 10150 ; ���������^�@�`��y��䶗�,�^�C�g�����
	SCORE_INFO_NO = 1001
CASE 10151 ; ����@�`Eastern Wind,�P�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10152 ; She's in a temper!!,�P�ʃ{�X�E�����̃e�[�}�P
	SCORE_INFO_NO = 47
CASE 10153 ; End of Daylight,�Q�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10154 ; ��݂̂�����,�Q�ʃ{�X�E�����̃e�[�}
	SCORE_INFO_NO = 46
CASE 10155 ; �����E,�R�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10156 ; ����q����,�R�ʃ{�X
	SCORE_INFO_NO = 1010
CASE 10157 ; �Ђ��났�A�ނ炳���ɂ���,�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10158 ; ���F�}�W�b�N,�S�ʃ{�X�E�������̃e�[�}
	SCORE_INFO_NO = 2
CASE 10159 ; ���������^�@�`�H������,�ŏI�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10160 ; Complete Darkness,�ŏI�ʃ{�X�E�����̃e�[�}
	SCORE_INFO_NO = 4
CASE 10161 ; �G�L�X�g�����u,�G�L�X�g���X�e�[�W�e�[�}
	SCORE_INFO_NO = 1002
CASE 10162 ; ��Ԃނ��߂݂̂���,�G�L�X�g���{�X�E�����̃e�[�}�Q
	SCORE_INFO_NO = 47
CASE 10163 ; ����̐X,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 10164 ; �̘b��񂾁[����,�X�^�b�t���[���e�[�}
	SCORE_INFO_NO = 1005

;����������@�` Phantasmagoria of Dim.Dream
CASE 10200 ; ���͎�����z����,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10201 ; Selection,�g�p�L�����I���e�[�}
	SCORE_INFO_NO = 1000
CASE 10202 ; �����d���k,���� �˖��̃e�[�}
	SCORE_INFO_NO = 1
CASE 10203 ; Reincarnation,�����̃e�[�}
	SCORE_INFO_NO = 4
CASE 10204 ; Dim. Dream,���J �������̃e�[�}
	SCORE_INFO_NO = 2
CASE 10205 ; Tabula rasa�@�` �󔒏���,�G�����̃e�[�}
	SCORE_INFO_NO = 44
CASE 10206 ; Maniacal Princess,���e�P�̃e�[�}
	SCORE_INFO_NO = 1010
CASE 10207 ; �������@�` Lost Dream,�J�i�E�A�i�x�����̃e�[�}
	SCORE_INFO_NO = 3
CASE 10208 ; �����V�Y�@�` Dream War,���q �����q�̃e�[�}
	SCORE_INFO_NO = 45
CASE 10209 ; ���@����I�@�` Fight it out!,�b�o�t�V�l�ڂ̃e�[�}
	SCORE_INFO_NO = 1010
CASE 10210 ; Sailor of Time,�k���� �����̃e�[�}
	SCORE_INFO_NO = 8
CASE 10211 ; Strawberry Crisis!!,���� �����̃e�[�}
	SCORE_INFO_NO = 9
CASE 10212 ; �񓝈ꖂ�@���E�_,���{�X�f���e�[�}
	SCORE_INFO_NO = 1010
CASE 10213 ; ���@����,�����f���e�[�}
	SCORE_INFO_NO = 9
CASE 10214 ; �v���̖�,���ʃG���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 10215 ; �����̐���,���̃G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 10216 ; �i���̖���,��̃G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 10217 ; Maple Dream...,�X�^�b�t���[���e�[�}
	SCORE_INFO_NO = 1005
CASE 10218 ; ��l�̋x��,�l�[�����W�X�g�e�[�}
	SCORE_INFO_NO = 1010
CASE 10219 ; ���������� �����f��,�����f���e�[�}
	SCORE_INFO_NO = 1003
CASE 10220 ; ���������� �Q�[���I�[�o�[,�Q�[���I�[�o�[�e�[�}
	SCORE_INFO_NO = 1003

;�������z���@�` Lotus Land Story
CASE 10250 ; ���z���@�` Lotus Land Story,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10251 ; Witching Dream,�˖��P�ʂ̃e�[�}
	SCORE_INFO_NO = 1
CASE 10252 ; Selene's light,�������P�ʂ̃e�[�}
	SCORE_INFO_NO = 2
CASE 10253 ; ������@�` Decoration Battle,�P�ʃ{�X�E�I�����W�̃e�[�}
	SCORE_INFO_NO = 1010
CASE 10254 ; Break the Sabbath,�Q�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10255 ; �g���ȁ@�` Scarlet Phoneme,�Q�ʃ{�X�E����݂̃e�[�}
	SCORE_INFO_NO = 114
CASE 10256 ; Bad Apple!!,�R�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10257 ; ���@�` Perdition crisis,�R�ʃ{�X�E�G���[�̃e�[�}
	SCORE_INFO_NO = 115
CASE 10258 ; �A���X�}�G�X�e��,�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10259 ; �����Y�z�ȁ@�` Capriccio,�S�ʃ{�X�E�˖��̃e�[�}
	SCORE_INFO_NO = 1
CASE 10260 ; ���̊�@�` Casket of Star,�S�ʃ{�X�E�������̃e�[�}
	SCORE_INFO_NO = 2
CASE 10261 ; Lotus Love,�T�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10262 ; ����鋰�|�@�` Sleeping Terror,�T�ʃ{�X�E�H���̃e�[�}�P
	SCORE_INFO_NO = 68
CASE 10263 ; Dream Land,�ŏI�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10264 ; �H���@�` Inanimate Dream,�ŏI�ʃ{�X�E�H���̃e�[�}�Q
	SCORE_INFO_NO = 68
CASE 10265 ; �ւ���������Ȃ��V�Y,�G�L�X�g���X�e�[�W�e�[�}
	SCORE_INFO_NO = 1002
CASE 10266 ; ���C�h���z�@�` Icemilk Magic,�G�L�X�g���{�X�E�����̃e�[�}
	SCORE_INFO_NO = 116
CASE 10267 ; ���킢�������@�` Innocence,�G�L�X�g���{�X�E�����̃e�[�}
	SCORE_INFO_NO = 117
CASE 10268 ; Days,�o�b�h�G���h�̃e�[�}
	SCORE_INFO_NO = 1004
CASE 10269 ; Peaceful,�O�b�h�G���h�̃e�[�}
	SCORE_INFO_NO = 1004
CASE 10270 ; Arcadian Dream,�X�^�b�t���[���̃e�[�}
	SCORE_INFO_NO = 1005
CASE 10271 ; ���z�̏Z�l,�l�[�����W�X�g�̃e�[�}
	SCORE_INFO_NO = 1010

;�������Y�k�@�` Mystic Square
CASE 10300 ; ���Y�k�@�` Mystic Square,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10301 ; Dream Express,�P�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10302 ; ���@�w�@�` Magic Square,�P�ʃ{�X�E�T���̃e�[�}
	SCORE_INFO_NO = 1010
CASE 10303 ; ���z����,�Q�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10304 ; ��V�@�` Spiritual Heaven,�Q�ʃ{�X�E���C�Y�̃e�[�}
	SCORE_INFO_NO = 48
CASE 10305 ; Romantic Children,�R�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10306 ; �v���X�`�b�N�}�C���h,�R�ʃ{�X�E�A���X�̃e�[�}�P
	SCORE_INFO_NO = 17
CASE 10307 ; ���C�v�����C�Y,�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10308 ; �֒f�̖��@�@�` Forbidden Magic,�S�ʃ{�X�E���L���}�C�̃e�[�}
	SCORE_INFO_NO = 104|105
CASE 10309 ; �^�g�̏����@�` Crimson Dead!!,�S�ʃ{�X�E���L�̃e�[�}
	SCORE_INFO_NO = 104
CASE 10310 ; ���؂�̏����@�` Judas Kiss,�S�ʃ{�X�E�}�C�̃e�[�}
	SCORE_INFO_NO = 105
CASE 10311 ; the Last Judgement,�T�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10312 ; �߂����l�`�@�` Doll of Misery,�T�ʃ{�X�E���q�̃e�[�}
	SCORE_INFO_NO = 103
CASE 10313 ; ���E�̉ʂā@�` World's End,�U�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10314 ; �_�b���z�@�` Infinite Being,�U�ʃ{�X�E�_�Y�̃e�[�}
	SCORE_INFO_NO = 102
CASE 10315 ; �s�v�c�̍��̃A���X,�G�L�X�g���X�e�[�W�e�[�}
	SCORE_INFO_NO = 1002
CASE 10316 ; the Grimoire of Alice,�G�L�X�g���{�X�E�A���X�̃e�[�}�Q
	SCORE_INFO_NO = 17
CASE 10317 ; �_��,�o�b�h�G���h�e�[�}
	SCORE_INFO_NO = 1004
CASE 10318 ; Endless,�O�b�h�G���h�e�[�}�P
	SCORE_INFO_NO = 1004
CASE 10319 ; �v���̊y��,�O�b�h�G���h�e�[�}�Q
	SCORE_INFO_NO = 1004
CASE 10320 ; Mystic Dream,�X�^�b�t���[���e�[�}
	SCORE_INFO_NO = 1005
CASE 10321 ; Peaceful Romancer,�G�L�X�g���G���f�B���O�̃e�[�}
	SCORE_INFO_NO = 1004
CASE 10322 ; ���̋x��ޏ�,�l�[�����W�X�g�e�[�}
	SCORE_INFO_NO = 1010

;�����g�����@�` the Embodiment of Scarlet Devil.
CASE 10350 ; �Ԃ��g����,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10351 ; �ق������݂����ɍg����,�P�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10352 ; �d����s,�P�ʃ{�X�E���[�~�A�̃e�[�}
	SCORE_INFO_NO = 12
CASE 10353 ; ���[�l�C�g�G���t,�Q�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10354 ; ���Ă�Η���,�Q�ʃ{�X�E�`���m(�H)�̃e�[�}
	SCORE_INFO_NO = 14
CASE 10355 ; ��C�g���ف@�` Chinese Tea,�R�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10356 ; �����\���N�̏�C�A���X,�R�ʃ{�X�E�g ����̃e�[�}
	SCORE_INFO_NO = 58
CASE 10357 ; ���������@�}����,�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10358 ; ���N�g�K�[���@�` ��������,�S�ʃ{�X�E�p�`�����[�E�m�[���b�W�̃e�[�}
	SCORE_INFO_NO = 54
CASE 10359 ; ���C�h�ƌ��̉������v,�T�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10360 ; �����v�@�` ���i�E�_�C�A��,�T�ʃ{�X�E�\�Z�� ���̃e�[�}
	SCORE_INFO_NO = 15
CASE 10361 ; �c�F�y�V���̗c������,�U�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10362 ; �S�������ׂ̈̃Z�v�e�b�g,�U�ʃ{�X�E���~���A�E�X�J�[���b�g�̃e�[�}
	SCORE_INFO_NO = 16
CASE 10363 ; ���@�����B�̕S�N��,EXTRA�e�[�}
	SCORE_INFO_NO = 1002
CASE 10364 ; U.N.�I�[�G���͔ޏ��Ȃ̂��H,EXTRA�{�X�E�t�����h�[���E�X�J�[���b�g�̃e�[�}
	SCORE_INFO_NO = 50
CASE 10365 ; �g���R���i��,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 10366 ; �g�O�@�` Eastern Dream...,�X�^�b�t���[���e�[�}
	SCORE_INFO_NO = 1005

;�����d�X���@�` Perfect Cherry Blossom.
CASE 10400 ; �d�X���@�` Snow or Cherry Petal,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10401 ; �����L�̋��@�` Deep Mountain,�P�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10402 ; �N���X�^���C�Y�V���o�[,�P�ʃ{�X�E���e�B�E�z���C�g���b�N�̃e�[�}
	SCORE_INFO_NO = 74
CASE 10403 ; ���쌶�z����,�Q�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10404 ; �e�B�A�I�C�G�c�H��(withered leaf),�Q�ʃ{�X�E��̃e�[�}
	SCORE_INFO_NO = 24
CASE 10405 ; �u�N���V���e�B�̐l�`�t,�R�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10406 ; �l�`�ٔ��@�` �l�̌`�M�т�����,�R�ʃ{�X�E�A���X�E�}�[�K�g���C�h�̃e�[�}
	SCORE_INFO_NO = 17
CASE 10407 ; �V��̉Ԃ̓s,�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10408 ; �H��y�c�@�` Phantom Ensemble,�S�ʃ{�X�E�v���Y�����o�[�O�o���̃e�[�}
	SCORE_INFO_NO = 20|21|22
CASE 10409 ; �����d�X���@�` Ancient Temple,�T�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10410 ; �L�L�ˉ������@�` Till When?,�T�ʃ{�X�E��� �d���̃e�[�}
	SCORE_INFO_NO = 23
CASE 10411 ; �A���e�B���b�g�g�D���[�X,�U�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10412 ; �H��ɍ炩���A�n���̍��@�` Border of Life,�U�ʃ{�X�E���s�� �H�X�q�̃e�[�}
	SCORE_INFO_NO = 66
CASE 10413 ; �{�[�_�[�I�u���C�t,�U�ʃ{�X�E���s�� �H�X�q�̃e�[�}�Q
	SCORE_INFO_NO = 66
CASE 10414 ; �d�X���,EXTRA�e�[�}
	SCORE_INFO_NO = 1000
CASE 10415 ; ���������@�` Necro-Fantasy,EXTRA�{�X�E���_ ���̃e�[�}
	SCORE_INFO_NO = 25
CASE 10416 ; �d�X��绁@�` Who done it!,PHANTASM�e�[�}
	SCORE_INFO_NO = 1000
CASE 10417 ; �l�N���t�@���^�W�A,PHANTASM�{�X�E���_ ���̃e�[�}
	SCORE_INFO_NO = 26
CASE 10418 ; �t���̖�,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 10419 ; �����炳����@�` Japanize Dream...,�X�^�b�t���[���e�[�}
	SCORE_INFO_NO = 1005

;�������z�@�` Immaterial and Missing Power.
CASE 10450 ; Demystify Feast,����O�X�e�[�W�̃e�[�}
	SCORE_INFO_NO = 1001
CASE 10451 ; �邪�~��Ă���@�` Evening Star,�Z�~�t�@�C�i���X�e�[�W�E���_ ���̃e�[�}
	SCORE_INFO_NO = 26
CASE 10452 ; �䉾�̍��̋S�����@�` Missing Power,�t�@�C�i���X�e�[�W�E�ɐ� ���̃e�[�}
	SCORE_INFO_NO = 10

;�����i�鏴�@�` Imperishable Night.
CASE 10500 ; �i�鏴�@�` Eastern Night.,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10501 ; �����̖�@�` Ghostly Eyes,�P�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10502 ; 忁X�H���@�` Mooned Insect,�P�ʃ{�X�E���O���E�i�C�g�o�O�̃e�[�}
	SCORE_INFO_NO = 27
CASE 10503 ; �鐝�̉̐��@�` Night Bird,�Q�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10504 ; �����̂����������Ȃ�,�Q�ʃ{�X�E�~�X�e�B�A�E���[�����C�̃e�[�}
	SCORE_INFO_NO = 28
CASE 10505 ; �������������̌��@�` Old World,�R�ʂ̃e�[�}
	SCORE_INFO_NO = 1000
CASE 10506 ; �v���C���G�C�W�A,�R�ʃ{�X�E�㔒�� �d���̃e�[�}
	SCORE_INFO_NO = 67
CASE 10507 ; �i��̕񂢁@�` Imperishable Night.,�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10508 ; �����Y�z�ȁ@�` Dream Battle,�S�ʃ{�X�E���� �얲�̃e�[�}
	SCORE_INFO_NO = 1
CASE 10509 ; ���F�}�X�^�[�X�p�[�N,�S�ʃ{�X�E���J �������̃e�[�}
	SCORE_INFO_NO = 2
CASE 10510 ; �V���f�����P�[�W�@�` Kagome-Kagome,�T�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10511 ; ���C�̓��@�` Invisible Full Moon,�T�ʃ{�X�E���EU�E�C�i�o�̃e�[�}
	SCORE_INFO_NO = 53
CASE 10512 ; ���H���[�W��1969,�U�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10513 ; ��N���z���@�` History of the Moon,�U��A�{�X�E���� �i�Ԃ̃e�[�}
	SCORE_INFO_NO = 72
CASE 10514 ; �|����ā@�` Lunatic Princess,�U��B�{�X�E�H���R �P��̃e�[�}
	SCORE_INFO_NO = 62
CASE 10515 ; ���H���[�W��1970,�i�ԁE�P��t�@�C�i���X�y���̃e�[�}
	SCORE_INFO_NO = 62
CASE 10516 ; �G�N�X�e���h�A�b�V���@�` �H���l,EXTRA�e�[�}
	SCORE_INFO_NO = 1002
CASE 10517 ; ���܂œ͂��A�s���̉�,EXTRA�{�X�E���� ���g�̃e�[�}
	SCORE_INFO_NO = 61
CASE 10518 ; ������,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 10519 ; Eternal Dream�@�` �H���̞��,�X�^�b�t���[���e�[�}
	SCORE_INFO_NO = 1005
CASE 10520 ; �����d������,���X�g���[�h�̃e�[�}
	SCORE_INFO_NO = 1010

;�����ԉf�ˁ@�` Phantasmagoria of Flower View.
CASE 10550 ; �ԉf�ˁ@�` Higan Retour,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10551 ; �t�F���a�@�` Colorful Path,���� �얲�̃e�[�}
	SCORE_INFO_NO = 1
CASE 10552 ; �I���G���^���_�[�N�t���C�g,���J �������̃e�[�}
	SCORE_INFO_NO = 2
CASE 10553 ; �t���������O�i�C�g,�\�Z�� ���̃e�[�}
	SCORE_INFO_NO = 15
CASE 10554 ; �����d�X���@�` Ancient Temple,��� �d���̃e�[�}
	SCORE_INFO_NO = 23
CASE 10555 ; ���C�̓��@�` Invisible Full Moon,���EU�E�C�i�o�̃e�[�}
	SCORE_INFO_NO = 53
CASE 10556 ; ���Ă�Η����̖`��,�`���m�̃e�[�}
	SCORE_INFO_NO = 14
CASE 10557 ; �H��y�c�@�` Phantom Ensemble,�v���Y�����o�[�O�o���̃e�[�}
	SCORE_INFO_NO = 20|21|22
CASE 10558 ; �����̂����������Ȃ��@�` Flower Mix,�~�X�e�B�A�E���[�����C�̃e�[�}
	SCORE_INFO_NO = 28
CASE 10559 ; ���F�����܂̑f����,���� �Ă�̃e�[�}
	SCORE_INFO_NO = 53
CASE 10560 ; ���_�����@ (Short Version),�˖��� ���̃e�[�}
	SCORE_INFO_NO = 29
CASE 10561 ; �|�C�Y���{�f�B�@�` Forsaken Doll,���f�B�X���E�������R���[�̃e�[�}
	SCORE_INFO_NO = 75
CASE 10562 ; ���̌��z���@�` Flower Land,���� �H���̃e�[�}
	SCORE_INFO_NO = 68
CASE 10563 ; �ފ݋A�q�@�` Riverside View,����� �����̃e�[�}
	SCORE_INFO_NO = 76
CASE 10564 ; �Z�\�N�ڂ̓����ٔ��@�` Fate of Sixty Years,�l�G�f�P�E���}�U�i�h�D�̃e�[�}
	SCORE_INFO_NO = 30
CASE 10565 ; �Ԃ̉f���,��b��ʂ̃e�[�}�P
	SCORE_INFO_NO = 1000
CASE 10566 ; ���݂̒�,��b��ʂ̃e�[�}�Q
	SCORE_INFO_NO = 1000
CASE 10567 ; �Ԃ͌��z�̂܂܂�,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 10568 ; ���̉ԁ@�` Another Dream...,�X�^�b�t���[���e�[�}
	SCORE_INFO_NO = 1005

;�������Ԓ��@�` Shoot the Bullet.
CASE 10600 ; �V��̎蒟�@�` Mysterious Note,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10601 ; ���̏z�@�` Wind Tour,�B�e�ȂP
	SCORE_INFO_NO = 1101
CASE 10602 ; �V�炪���Ă���@�` Black Eyes,�B�e�ȂQ
	SCORE_INFO_NO = 1101
CASE 10603 ; ���̍��̖���Ȃ���,�B�e�ȂR
	SCORE_INFO_NO = 1101
CASE 10604 ; ���g���X�y�N�e�B�u���s,�B�e�ȂS
	SCORE_INFO_NO = 1101
CASE 10605 ; ���_����,�B�e�ȂT
	SCORE_INFO_NO = 1101

;�������_�^�@�` Mountain of Faith.
CASE 10650 ; ���󂳂ꂵ�_�X,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10651 ; �l�����_�l�@�` Romantic Fall,�P�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10652 ; ��c�P�l�Ɏ����邩��,�P�ʃ{�X�E�H ���q�̃e�[�}
	SCORE_INFO_NO = 78
CASE 10653 ; ��_�l�̒ʂ蓹�@�` Dark Road,�Q�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10654 ; �^���̃_�[�N�T�C�h,�Q�ʃ{�X�E���R ���̃e�[�}
	SCORE_INFO_NO = 79
CASE 10655 ; �_�X�����������z��,�R�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10656 ; �H�열�V��͓̉��@�` Candid Friend,�R�ʃ{�X�E�� �ɂƂ�̃e�[�}
	SCORE_INFO_NO = 51
CASE 10657 ; �t�H�[���I�u�t�H�[���@�` �H�߂���,�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10658 ; �d���̎R�@�` Mysterious Mountain,�S�ʃ{�X�E�˖��� ���̃e�[�}
	SCORE_INFO_NO = 29
CASE 10659 ; �������������{�̌����i,�T�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10660 ; �M�͙R���l�Ԃׂ̈�,�T�ʃ{�X�E�����J ���c�̃e�[�}
	SCORE_INFO_NO = 31
CASE 10661 ; �䒌�̕��@�` Grave of Being,�U�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10662 ; �_���т��Ð��@�` Suwa Foughten Field,�U�ʃ{�X�E���� �_�ގq�̃e�[�}
	SCORE_INFO_NO = 32
CASE 10663 ; �����n���̓��A�P�̍��,EXTRA�e�[�}
	SCORE_INFO_NO = 1002
CASE 10664 ; �l�C�e�B�u�t�F�C�X,EXTRA�{�X�E�k�� �z�K�q�̃e�[�}
	SCORE_INFO_NO = 33
CASE 10665 ; �[�̐_��,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 10666 ; �_�͌b�݂̉J���~�炷�@�` Sylphid Dream,�X�^�b�t���[���e�[�}
	SCORE_INFO_NO = 1005
CASE 10667 ; �v���C���[�Y�X�R�A(�������_�^),�Q�[���I�[�o�[�e�[�}
	SCORE_INFO_NO = 1003

;������z�V�@�` Scarlet Weather Rhapsody.
CASE 10700 ; �����C�ɍg���@�` Legendary Fish,�i�] �ߋ�̃e�[�}
	SCORE_INFO_NO = 35
CASE 10701 ; �L���V�ρ@�` Wonderful Heaven,��ߖ��� �V�q�̃e�[�}
	SCORE_INFO_NO = 34
CASE 10702 ; �c�S�n�̗L���V,���X�g�X�y���̃e�[�}
	SCORE_INFO_NO = 1005

;�����n��a�@�` Subterranean Animism.
CASE 10750 ; �n��B�̋N��,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10751 ; �Èł̕���,�P�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10752 ; ������ꂽ�d���@�` Lost Place,�P�ʃ{�X�E���J ���}���̃e�[�}
	SCORE_INFO_NO = 83
CASE 10753 ; �n��҂̓r�₦����,�Q�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10754 ; �Ί�̃W�F���V�[,�Q�ʃ{�X�E���� �p���X�B�̃e�[�}
	SCORE_INFO_NO = 60
CASE 10755 ; ���n���X�����s��,�R�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10756 ; �؂̂����Â���]�R,�R�ʃ{�X�E���F �E�V�̃e�[�}
	SCORE_INFO_NO = 64
CASE 10757 ; �n�[�g�t�F���g�t�@���V�[,�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10758 ; �������Ƃ�@�` 3rd eye,�S�ʃ{�X�E�Ö��n ���Ƃ�̃e�[�}
	SCORE_INFO_NO = 49
CASE 10759 ; �p�������o�C,�T�ʂ̃e�[�}
	SCORE_INFO_NO = 1000
CASE 10760 ; ���̗��s�@�` Be of good cheer!,�T�ʃ{�X�E�Ή��L �ӂ̃e�[�}
	SCORE_INFO_NO = 36
CASE 10761 ; �Ɖ΃}���g��,�U�ʂ̃e�[�}
	SCORE_INFO_NO = 1000
CASE 10762 ; ��m�̑��z�M�@�` Nuclear Fusion,�U�ʃ{�X�E��G�H ��̃e�[�}
	SCORE_INFO_NO = 37
CASE 10763 ; ���X�g�����[�g,EXTRA�̃e�[�}
	SCORE_INFO_NO = 1002
CASE 10764 ; �n���g�}���̗d������,EXTRA�{�X�E�Ö��n �������̃e�[�}
	SCORE_INFO_NO = 38
CASE 10765 ; �n��B�̋A��,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 10766 ; �G�l���M�[�t�� �` Future Dream...,�X�^�b�t���[���̃e�[�}
	SCORE_INFO_NO = 1005
CASE 10767 ; �v���C���[�Y�X�R�A(�����n��a),�Q�[���I�[�o�[�e�[�}�@�i�����_�^�Ɠ����j
	SCORE_INFO_NO = 1003

;�������@�D�@�` Undefined Fantastic Object.
CASE 10800 ; ��̉e,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10801 ; �t�̖���,�P�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10802 ; �����ȏ����Ȍ���,�P�ʃ{�X�E�i�Y�[�����̃e�[�}
	SCORE_INFO_NO = 39
CASE 10803 ; �������_�̒ʂ��H,�Q�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10804 ; ���N�u���P�ɂ����ӂ�,�Q�ʃ{�X�E���X�� ���P�̃e�[�}
	SCORE_INFO_NO = 40
CASE 10805 ; �X�J�C���[�C��,�R�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10806 ; ����e���ƃn�C�J������,�R�ʃ{�X�E�_�� ��ց��_�R�̃e�[�}
	SCORE_INFO_NO = 85
CASE 10807 ; �H��q�D�̎�����z������,�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10808 ; �L���v�e���E�����T,�S�ʃ{�X�E���� �����̃e�[�}
	SCORE_INFO_NO = 86
CASE 10809 ; ���E�n���s�s�G�\�e���A,�T�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10810 ; �Օ��̔�����V,�T�ʃ{�X�E�Њ� ���̃e�[�}
	SCORE_INFO_NO = 87
CASE 10811 ; �@�E�̉�,�U�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10812 ; ����̖��V�O�@�` Cosmic Mind,�U�ʃ{�X�E�� ���@�̃e�[�}
	SCORE_INFO_NO = 55
CASE 10813 ; ���̃��[�t�H�[���}���X,EXTRA�̃e�[�}
	SCORE_INFO_NO = 1002
CASE 10814 ; �����̃G�C���A��,EXTRA�{�X�E���b �ʂ��̃e�[�}
	SCORE_INFO_NO = 41
CASE 10815 ; �d����,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 10816 ; ��̋A�蓹�@�` Sky Dream,�X�^�b�t���[���̃e�[�}
	SCORE_INFO_NO = 1005
CASE 10817 ; �v���C���[�Y�X�R�A(�������@�D),�Q�[���I�[�o�[�e�[�}�@�i�����_�^�E�n��a�Ɠ����j
	SCORE_INFO_NO = 1003

;������z�V���@�` ���W���M�j�����̓��ǂ�
CASE 10850 ; �A���m�E��X�@�` Unfound Adventure,�t�@�C�i���X�e�[�W���ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 10851 ; ��ɕ����ԕ���X,���c�X�g�[���[�E���X�g�X�y���̃e�[�}
	SCORE_INFO_NO = 1005

;�_�u���X�|�C���[�@�` �������Ԓ�
CASE 10900 ; �j���[�X�n�E���h,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10901 ; ���Ȃ��̒��̉�����,��ނ̃e�[�}�P
	SCORE_INFO_NO = 1102
CASE 10902 ; �d�����_���R���j�[,��ނ̃e�[�}�Q
	SCORE_INFO_NO = 1102
CASE 10903 ; �l���V�X�̗v��,��ނ̃e�[�}�R
	SCORE_INFO_NO = 1102
CASE 10904 ; ���Ԃ̏��@�` Infinite Nightmare,��ނ̃e�[�}�S
	SCORE_INFO_NO = 1102
CASE 10905 ; �d���̎R�@�` Mysterious Mountain,��ނ̃e�[�}�T
	SCORE_INFO_NO = 1102
;CASE ;10906 ; �i�Ȗ��s���j,�͂��ă��[�h�J����ʁE�R���v���[�g��ʂ̃e�[�}
	;SCORE_INFO_NO = -1

;�d����푈�@�` �����O����
CASE 10950 ; �t�̕X��,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 10951 ; ������푈�̃��t���[��,�P�ʂ̃e�[�}
	SCORE_INFO_NO = 1100
CASE 10952 ; ��������ɖ���������,�P�A�Q�ʃ{�X�̃e�[�}
	SCORE_INFO_NO = 1100
CASE 10953 ; �N�������̍D��S,�Q�ʂ̃e�[�}
	SCORE_INFO_NO = 1100
CASE 10954 ; �^�钆�̃t�F�A���[�_���X,�R�ʂ̃e�[�}
	SCORE_INFO_NO = 1100
CASE 10955 ; �d����푈�@�` Fairy Wars,�R�ʃ{�X�̃e�[�}
	SCORE_INFO_NO = 1100
CASE 10956 ; ���[�Y���C��,EXTRA�̃e�[�}
	SCORE_INFO_NO = 1002
CASE 10957 ; ���C�K�X�i�C�g,EXTRA�{�X�E���J �������̃e�[�}
	SCORE_INFO_NO = 2
CASE 10958 ; �t�̕X���@- �� -,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 10959 ; �v���C���[�Y�X�R�A(�d����푈),�l�[�����W�X�g�̃e�[�}
	SCORE_INFO_NO = 1003

;�����_��_�@�` Ten Desires.
CASE 11000 ; �~�[���썰,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 11001 ; ����̖��,�P�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11002 ; �S�[�X�g���[�h,�P�ʃ{�X�E���s�� �H�X�q�̃e�[�}
	SCORE_INFO_NO = 66
CASE 11003 ; �d�����ւ悤����,�Q�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11004 ; ��O�̗d������,�Q�ʃ{�X�E�H�J ���q�̃e�[�}
	SCORE_INFO_NO = 88
CASE 11005 ; �f�G�ȕ��ŕ邵�܂���,�R�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11006 ; ���W�b�h�p���_�C�X,�R�ʃ{�X�E�{�� �F���̃e�[�}
	SCORE_INFO_NO = 89
CASE 11007 ; �f�U�C�A�h���C�u,�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11008 ; �Â����A���V�F��,�S�ʃ{�X�E� �M�̃e�[�}
	SCORE_INFO_NO = 90
CASE 11009 ; ���a���J�_,�T�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11010 ; ��_�_�b�`,�T�ʃ{�X�E���� �z�s�̃e�[�}
	SCORE_INFO_NO = 92
CASE 11011 ; �����ȗ~�]�̐���,�U�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11012 ; �����`���@�` True Administrator,�U�ʃ{�X�E�L���� �_�q�̃e�[�}
	SCORE_INFO_NO = 56
CASE 11013 ; �d�����Q��,EXTRA�̃e�[�}
	SCORE_INFO_NO = 1002
CASE 11014 ; ���n�̓�b��,EXTRA�{�X�E��b�� �}�~�]�E�̃e�[�}
	SCORE_INFO_NO = 69
CASE 11015 ; �_�Ђ̐V������,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 11016 ; �f�U�C�A�h���[��,�X�^�b�t���[���e�[�}
	SCORE_INFO_NO = 1005
CASE 11017 ; �v���C���[�Y�X�R�A(�����_��_),�Q�[���I�[�o�[�e�[�}�@�i���d����푈�Ɠ����j
	SCORE_INFO_NO = 1003

;�����S�Y�O�@�` Hopeless Masquerade.
CASE 11050 ; ���z���̓�b��,��b�� �}�~�]�E�̃e�[�}
	SCORE_INFO_NO = 69
CASE 11051 ; �S���̃G���[�V����,�` ������̃e�[�}
	SCORE_INFO_NO = 57

;�����P�j��@�` Double Dealing Character.
CASE 11100 ; �s�v�c�Ȃ��P���_,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 11101 ; �~�X�g���C�N,�P�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11102 ; �鋫�̃}�[���C�h,�P�ʃ{�X�E�킩�����P�̃e�[�}
	SCORE_INFO_NO = 93
CASE 11103 ; �^�͂��s�������l�d,�Q�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11104 ; ���̉��̃f�����n��,�Q�ʃ{�X�E�Ԕ؊�̃e�[�}
	SCORE_INFO_NO = 73
CASE 11105 ; �����̒|��,�R�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11106 ; �ǓƂȃE�F�A�E���t,�R�ʃ{�X�E���� �e�T�̃e�[�}
	SCORE_INFO_NO = 63
CASE 11107 ; �}�W�J���X�g�[��,�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11108 ; ���z��ڗ�,�S�ʃ{�X�E��\�� �فX����\�� �����̃e�[�}
	SCORE_INFO_NO = 94|95
CASE 11109 ; �󒆂ɒ��ދP�j��,�T�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11110 ; ���o�[�X�C�f�I���M�[,�T�ʃ{�X�E�S�l ���ׂ̃e�[�}
	SCORE_INFO_NO = 97
CASE 11111 ; �j���_��̓V��t,�U�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11112 ; �P���j�̏��l���@�` Little Princess,�U�ʃ{�X�E���� �j���ۂ̃e�[�}
	SCORE_INFO_NO = 71
CASE 11113 ; ���̗͂��_,EXTRA�̃e�[�}
	SCORE_INFO_NO = 1002
CASE 11114 ; �n���̃r�[�g�@�` Pristine Beat,EXTRA�{�X�E�x�� ���ۂ̃e�[�}
	SCORE_INFO_NO = 96
CASE 11115 ; ���Ƃ̖���,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 11116 ; �s�v�c�ȕs�v�c�ȓ���B,�X�^�b�t���[���e�[�}
	SCORE_INFO_NO = 1005
CASE 11117 ; �v���C���[�Y�X�R�A(�����P�j��),�Q�[���I�[�o�[�e�[�}�@�i���_��_�E�d����푈�Ɠ����j
	SCORE_INFO_NO = 1003

;�e���A�}�m�W���N�@�` Impossible Spell Card.
CASE 11150 ; �����̘T�����グ��,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 11151 ; �s�\�e���ɂ͔�����,�ŏ��Ղ̃e�[�}
	SCORE_INFO_NO = 1103
CASE 11152 ; �~�b�h�i�C�g�X�y���J�[�h,���Ղ̃e�[�}
	SCORE_INFO_NO = 1103
CASE 11153 ; ���}���`�b�N����s,���Ղ̃e�[�}
	SCORE_INFO_NO = 1103
CASE 11154 ; �i���̎O���V��,�I�Ղ̃e�[�}
	SCORE_INFO_NO = 1103
CASE 11155 ; �鋫�̃}�[���C�h(�e���A�}�m�W���N),�i���P�j�邩��Ę^�j
	SCORE_INFO_NO = 1103
CASE 11156 ; ���o�[�X�C�f�I���M�[(�e���A�}�m�W���N),�i���P�j�邩��Ę^�j
	SCORE_INFO_NO = 1103
CASE 11157 ; ���z��ڗ�(�e���A�}�m�W���N),�i���P�j�邩��Ę^�j
	SCORE_INFO_NO = 1103
CASE 11158 ; �d���̎R�@�` Mysterious Mountain(�e���A�}�m�W���N),�i�����_�^����Ę^�j
	SCORE_INFO_NO = 1103

;�����[��^�@�` Urban Legend in Limbo.
CASE 11200 ; �؋��Ԃ̃o�g���t�B�[���h,��� �ؐ�̃e�[�}
	SCORE_INFO_NO = 43
CASE 11201 ; ���X�g�I�J���e�B�Y���@�` �������̔�p�t,�F���� 俎q�̃e�[�}
	SCORE_INFO_NO = 106
CASE 11202 ; �A���m�E��X�@�` Occultly Madness,EXTRA�t�@�C�i���X�e�[�W�e�[�}
	SCORE_INFO_NO = 1005

;��������`�@�` Legacy of Lunatic Kingdom.
CASE 11250 ; �F���ޏ�����,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 11251 ; �Y�ꂪ�����A�悷���̗�,�P�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11252 ; �e�͕����~�肽,�P�ʃ{�X�E�����̃e�[�}
	SCORE_INFO_NO = 107
CASE 11253 ; �΂�߂̌������f����,�Q�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11254 ; �㌎�̃p���v�L��,�Q�ʃ{�X�E���̃e�[�}
	SCORE_INFO_NO = 108
CASE 11255 ; �F�����ԕs�v�c�țޏ�,�R�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11256 ; �i���̏t��,�R�ʃ{�X�E�h���~�[�E�X�C�[�g�̃e�[�}
	SCORE_INFO_NO = 109
CASE 11257 ; ����t�����i���̓s,�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11258 ; �t�]����z�C�[���I�u�t�H�[�`����,�S�ʃ{�X�E�H�_ �T�O���̃e�[�}
	SCORE_INFO_NO = 110
CASE 11259 ; �y���R�W���L���̃{���[�W��,�T�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11260 ; �������̃s�G��,�T�ʃ{�X�E�N���E���s�[�X�̃e�[�}
	SCORE_INFO_NO = 111
CASE 11261 ; �̋��̐����f��C,�U�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11262 ; �s���A�q���[���[�Y�@�` �S�̍ݏ�,�U�ʃ{�X�E���ς̃e�[�}
	SCORE_INFO_NO = 112
CASE 11263 ; �����������������̐��E,EXTRA�̃e�[�}
	SCORE_INFO_NO = 1002
CASE 11264 ; �p���f���j�b�N�v���l�b�g,EXTRA�{�X�E�w�J�[�e�B�A�E���s�X���Y���̃e�[�}
	SCORE_INFO_NO = 113
CASE 11265 ; �_�Ђ��猩���錎,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 11266 ; �F���ޏ��A�҂���,�X�^�b�t���[���e�[�}
	SCORE_INFO_NO = 1005
CASE 11267 ; �v���C���[�Y�X�R�A(��������`),�Q�[���I�[�o�[�e�[�}�@�i���P�j��E�_��_�E�d����푈�Ɠ����j
	SCORE_INFO_NO = 1003

;�����V�����@�` Hidden Star in Four Seasons.
CASE 11300 ; �������U��V��,�^�C�g����ʃe�[�}
	SCORE_INFO_NO = 1001
CASE 11301 ; ��]�̐��͐�躂ɏ���,�P�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11302 ; �^�Ă̗d���̖�,�P�ʃ{�X�E�G�^�j�e�B�����o�̃e�[�}
	SCORE_INFO_NO = 118
CASE 11303 ; �F�������͗d���̎R��,�Q�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11304 ; �R���̃G���J�E���^�[,�Q�ʃ{�X�E��c �l���m�̃e�[�}
	SCORE_INFO_NO = 119
CASE 11305 ; ���F�̊C���j����,�R�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11306 ; ��΂̐_�b,�R�ʃ{�X�E����� ������̃e�[�}
	SCORE_INFO_NO = 120
CASE 11307 ; ���z�̃z���C�g�g���x���[,�S�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11308 ; ���@�̊}�n��,��c���@�����̃e�[�}
	SCORE_INFO_NO = 121
CASE 11309 ; �֒f�̔��̌������́A���̐������̐���,�T�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11310 ; �N���C�W�[�o�b�N�_���T�[�Y,����c�@���E���q�c�@���T�̃e�[�}
	SCORE_INFO_NO = 122|123
CASE 11311 ; �C���g�D�E�o�b�N�h�A,�U�ʃe�[�}
	SCORE_INFO_NO = 1000
CASE 11312 ; �铽���ꂽ�t�H�[�V�[�Y���Y,�������@�B��ނ̃e�[�}
	SCORE_INFO_NO = 124
CASE 11313 ; �����h�A�ɂ͓���Ȃ�,Extra�X�e�[�W�̃e�[�}
	SCORE_INFO_NO = 1002
CASE 11314 ; ��_�}�^�[���@�` Hidden Star in All Seasons,�������@�B���(�^)�̃e�[�}
	SCORE_INFO_NO = 124
CASE 11315 ; �s���R�Ȏ��R,�G���f�B���O�e�[�}
	SCORE_INFO_NO = 1004
CASE 11316 ; �������l,�X�^�b�t���[���e�[�}
	SCORE_INFO_NO = 1005
CASE 11317 ; �v���C���[�Y�X�R�A(�����V����),�Q�[���I�[�o�[�e�[�}�@�i������`�E�P�j��E�_��_�E�d����푈�Ɠ����j
	SCORE_INFO_NO = 1003

ENDSELECT

RETURNF SCORE_INFO_NO


code:
;-------------------------------------------------
;�y���̓���������擾
;SCORE_NO �y���ԍ�
;
;RETURNFS �������
;-------------------------------------------------
@GET_SCORE_INFO_MESSAGE(SCORE_NO)
#FUNCTIONS
#DIM SCORE_NO		; �y���ԍ�
#DIM SCORE_INFO_NO	; ��������ԍ�
#DIMS MESSAGE		; ���b�Z�[�W

SCORE_INFO_NO = GET_SCORE_INFO_NO(SCORE_NO)

SELECTCASE SCORE_INFO_NO
	CASE IS < �y��������@�F�����_��
		; �֘A�L�����̉��t�听�����ɓ���
		MESSAGE = �u%CSVNAME(SCORE_INFO_NO)%�v�ɑ听���̉��t�𕷂��������ɓ���
	CASE �y��������@�F�����_��
		MESSAGE = ���t���Ƀ����_���œ���
	CASE �y��������@�F�V���[�Y���擾
		MESSAGE = ���̃V���[�Y�̊y�������߂Ď�ɓ��ꂽ�ۂɓ���
	CASE �y��������@�F�V���[�Y�����_���R���v
		MESSAGE = ���̃V���[�Y�̃����_���y����S�Ď�ɓ��ꂽ�ۂɓ���
	CASE �y��������@�F�V���[�Y�֘A�L�����e������
		MESSAGE = ���̃V���[�Y�̊֘A�L�����ɒe�������𒧂񂾍ۂɓ���
	CASE �y��������@�F�V���[�Y�֘A�L�����ח�
		MESSAGE = ���̃V���[�Y�̊֘A�L�����Ɋח������i����E���~�j�������ۂɓ���
	CASE �y��������@�F�V���[�Y���S�R���v
		MESSAGE = ���̃V���[�Y�ł���ȊO�̑S�y������ɓ��ꂽ�ۂɓ���
	CASE �y��������@�F�����_���i�L���������j
		; �L�����e�[�}�����A�֘A�L���������Ȃ��̂Ń����_������
		MESSAGE = ���t���Ƀ����_���œ���
	; --- ������� ---
	CASE �y��������@�F�d���˗�����
		; �d����푈
		MESSAGE = �T�j�[�E���i�E�X�^�[�E��d���E�`���m�̈˗��������ɓ���
	CASE �y��������@�F���˗�����
		;�������Ԓ�
		MESSAGE = ���̈˗��������ɓ���
	CASE �y��������@�F�͂��Ĉ˗�����
		;�_�u���X�|�C���[
		MESSAGE = �͂��Ă̈˗��������ɓ���
	CASE �y��������@�F�������s��
		;�e���A�}�m�W���N
		MESSAGE = �������s���ɓ���
	CASEELSE
		; ����ȊO
		MESSAGE = �G���[
ENDSELECT

RETURNF MESSAGE

;-------------------------------------------------
;�y�����莞�̃��b�Z�[�W���擾
;SCORE_NO �y���ԍ�
;
;RETURNFS �y�����莞�̃��b�Z�[�W
;-------------------------------------------------
@GET_SCORE_OBTAIN_MESSAGE(SCORE_NO)
#FUNCTIONS
#DIM SCORE_NO	; �y���ԍ�

#DIM SERIES_NO		; �V���[�Y�ԍ�
#DIM SCORE_INFO_NO	; ��������ԍ�
#DIMS MESSAGE		; ���b�Z�[�W

SERIES_NO = GET_SERIES_NO(SCORE_NO)
SCORE_INFO_NO = GET_SCORE_INFO_NO(SCORE_NO)

SELECTCASE SCORE_INFO_NO
	CASE IS < �y��������@�F�����_��
		MESSAGE = ���t���%CSVCALLNAME(SCORE_INFO_NO)%��%GET_SCORE_FULLNAME(SCORE_NO)%�̊y�������ꂽ�I
	CASE �y��������@�F�����_��, �y��������@�F�����_���i�L���������j
		MESSAGE = %GET_SCORE_FULLNAME(SCORE_NO)%�̊y���������I
	CASE �y��������@�F�V���[�Y���擾
		MESSAGE = %GET_SERIES_SHORT_NAME(SERIES_NO)%�̍U���J�n�I %GET_SCORE_FULLNAME(SCORE_NO)%�̊y������ɓ��ꂽ�I
	CASE �y��������@�F�V���[�Y�����_���R���v
		MESSAGE = %GET_SERIES_SHORT_NAME(SERIES_NO)%�̑S�X�e�[�W���B�I %GET_SCORE_FULLNAME(SCORE_NO)%�̊y�����Q�b�g���I
	CASE �y��������@�F�V���[�Y�֘A�L�����e������
		MESSAGE = �s�`�����I �c�@�͌�������%GET_SCORE_FULLNAME(SCORE_NO)%�̊y������ɓ��ꂽ�I
	CASE �y��������@�F�V���[�Y�֘A�L�����ח�
		MESSAGE = ������%GET_SCORE_FULLNAME(SCORE_NO)%�̊y�����u���Ă������B
	CASE �y��������@�F�V���[�Y���S�R���v
		MESSAGE = %GET_SERIES_SHORT_NAME(SERIES_NO)%�����S�N���A���I %GET_SCORE_FULLNAME(SCORE_NO)%�̊y������ɓ��ꂽ�I
	; --- ������� ---
	CASE �y��������@�F�d���˗�����
		MESSAGE = �H�I %GET_SCORE_FULLNAME(SCORE_NO)%�̊y�������ꂽ�I
	CASE �y��������@�F���˗�����
		MESSAGE = ��ސ����I %GET_SCORE_FULLNAME(SCORE_NO)%�̊y������ɓ��ꂽ�I
	CASE �y��������@�F�͂��Ĉ˗�����
		MESSAGE = �V���b�^�[�`�����X�I %GET_SCORE_FULLNAME(SCORE_NO)%�̊y������ɓ��ꂽ�I
	CASE �y��������@�F�������s��
		MESSAGE = %GET_SCORE_FULLNAME(SCORE_NO)%�̊y������ɓ���Ă��܂����I
	CASEELSE
		MESSAGE = �G���[
ENDSELECT

RETURNF MESSAGE

repo_name: akadiya/eratw

license: unknown


code:
;-----------------------------------------------------------
;�y���������_����1�擾
;
;RETURNF �擾�����y���ԍ��A�擾�ł��Ȃ������ꍇ��-1
;-----------------------------------------------------------
@�y������_�����_��
#FUNCTION

RETURNF EXEC_SCORES(�y���������[�h�F�y���������_���ɂP�擾, �y��������@�F�����_��)

;-----------------------------------------------------------
;�L�����ԍ��Ɠ�����������̊y���������_����1�擾
;TARGET �L�����ԍ�
;
;RETURNF �擾�����y���ԍ��A�擾�ł��Ȃ������ꍇ��-1
;-----------------------------------------------------------
@�y������_���t�听��(TARGET)
#FUNCTION

RETURNF EXEC_SCORES(�y���������[�h�F�y���������_���ɂP�擾, TARGET)

;-----------------------------------------------------------
;�L�����ԍ��Ɋ֘A��������������u�y��������@�F�V���[�Y�֘A�L�����ח��v�̊y������擾
;TARGET �L�����ԍ�
;
;RETURNF �擾�����y���ԍ��A�擾�ł��Ȃ������ꍇ��-1
;-----------------------------------------------------------
@�y������_�ח�(TARGET)
#FUNCTION

COUNT = EXEC_SCORES(�y���������[�h�F�L�����֘A�V���[�Y��S�擾, TARGET)
FOR LOCAL, 0, COUNT
	RESULT = EXEC_SCORES(�y���������[�h�F�y���������_���ɂP�擾, �y��������@�F�V���[�Y�֘A�L�����ח�, RESULT:LOCAL)
	SIF RESULT != -1
		RETURNF RESULT
NEXT

RETURNF -1

;-----------------------------------------------------------
;�L�����ԍ��Ɋ֘A��������������u�y��������@�F�V���[�Y�֘A�L�����e�������v�̊y������擾
;TARGET �L�����ԍ�
;
;RETURNF �擾�����y���ԍ��A�擾�ł��Ȃ������ꍇ��-1
;-----------------------------------------------------------
@�y������_�e������(TARGET)
#FUNCTION

COUNT = EXEC_SCORES(�y���������[�h�F�L�����֘A�V���[�Y��S�擾, TARGET)
FOR LOCAL, 0, COUNT
	RESULT = EXEC_SCORES(�y���������[�h�F�y���������_���ɂP�擾, �y��������@�F�V���[�Y�֘A�L�����e������, RESULT:LOCAL)
	SIF RESULT != -1
		RETURNF RESULT
NEXT

RETURNF -1

;-----------------------------------------------------------
;�w�肵����������̊y������擾
;EXEC_MODE �y���������[�h
;
;RETURNF �擾�����y���ԍ��A�擾�ł��Ȃ������ꍇ��-1
;-----------------------------------------------------------
@�y������_�������(EXEC_MODE)
#FUNCTION
#DIM EXEC_MODE
RETURNF EXEC_SCORES(�y���������[�h�F�y���������_���ɂP�擾, EXEC_MODE)

;-----------------------------------------------------------
;�y�������
;SCORE_NO �y���ԍ�
;SKIP_CHECK �`�F�b�N����ꍇ��1
;
;RETURNF ����ς݂Ȃ�0, ������Ȃ�1
;-----------------------------------------------------------
@OBTAIN_SCORE(SCORE_NO, SKIP_CHECK=1)
#FUNCTION
#DIM SCORE_NO	; �y���ԍ�
#DIM SKIP_CHECK	; �`�F�b�N����ꍇ��1

IF HAVE_SCORE(SCORE_NO)
	;�y������ς݂̏ꍇ�A�������X�L�b�v
	RETURNF 0
ELSE
	RESULT = SET_SCORE(SCORE_NO, 1)
	PRINTFORML %GET_SCORE_OBTAIN_MESSAGE(SCORE_NO)%
	RETURNF 1
ENDIF

;-----------------------------------------------------------
;�y���擾�ɘA�����Ď擾�����y���̃`�F�b�N
;SCORE_NO �y���ԍ�
;-----------------------------------------------------------
@OBTAIN_SCORE_CHECK(SCORE_NO)
#FUNCTION
#DIM DYNAMIC SCORE_NO	; �y���ԍ�

#DIM DYNAMIC SERIES_NO	; �V���[�Y�ԍ�

SERIES_NO = GET_SERIES_NO(SCORE_NO)

;�y�y��������@�F�V���[�Y���擾�z�̏���
LOCAL = EXEC_SCORES(�y���������[�h�F�������J�E���g, -1, SERIES_NO)
SIF 0 < LOCAL
	; 1�ȏ�y��������ꍇ�A�y�V���[�Y���擾�z�̊y����S�Ď擾
	RESULT = EXEC_SCORES(�y���������[�h�F�S�y�����擾, �y��������@�F�V���[�Y���擾, SERIES_NO)

;�y�y��������@�F�V���[�Y�����_���R���v�z�̏���
LOCAL:1 = EXEC_SCORES(�y���������[�h�F�����J�E���g, �y��������@�F�����_��, SERIES_NO)
LOCAL:2 = EXEC_SCORES(�y���������[�h�F�������J�E���g, �y��������@�F�����_��, SERIES_NO)
SIF LOCAL:1 <= LOCAL:2
	RESULT = EXEC_SCORES(�y���������[�h�F�S�y�����擾, �y��������@�F�V���[�Y�����_���R���v, SERIES_NO)

;�y�y��������@�F�V���[�Y���S�R���v�z�̏���
LOCAL:1 = EXEC_SCORES(�y���������[�h�F�����J�E���g, -1, SERIES_NO)
LOCAL:2 = EXEC_SCORES(�y���������[�h�F�������J�E���g, -1, SERIES_NO)
LOCAL:3 = EXEC_SCORES(�y���������[�h�F�����J�E���g, �y��������@�F�V���[�Y���S�R���v, SERIES_NO)
SIF (LOCAL:1 - LOCAL:3) <= LOCAL:2
	; �y���������� (���� - ���S�R���v�̊y����) �������Ă����ꍇ�A�y�V���[�Y���S�R���v�z�̊y����S�Ď擾
	RESULT = EXEC_SCORES(�y���������[�h�F�S�y�����擾, �y��������@�F�V���[�Y���S�R���v, SERIES_NO)

RETURNF 0


code:
;-------------------------------------------------
;���s����
;-------------------------------------------------
@COM_ABLE366
SIF !TFLAG:100
	RETURN 0
SIF TARGET <= 0
	RETURN 0
;���Ԓ�~/����/�Y���Q/���ӂӒ��͕s��
SIF SHIRAHU(TARGET) != 1
	RETURN 0
;�ꊇ�Ǘ�
SIF GLOBAL_COMABLE(366)
	RETURN RESULT

SELECTCASE IRAI_CHARA_TO_PROGRESS(TARGET)
CASE "�˗������"
;�󂫃X���b�g�������Ȃ�s��
	SIF !SEARCH_IRAI_EMPTY()
		RETURN 0
;�X�Ɏw�肳�ꂽ�������݂����Ȃ���
	SIF !INT_DATA_IRAI(CFLAG:TARGET:�˗����e, "�˗�����\����", TARGET)
		RETURN 0
CASE "�˗���"
;�˗��m�F/�j�����\
CASE "�˗��B��"
;�����񍐉\
CASE "�����؂�", "�񍐖Y��", "�˗����s"
;���s��
CASE "�˗��I���i�����j", "�˗��I���i�����؂�j", "�˗��I���i�񍐖Y��j", "�˗��I���i���s�j"
;�����͈˗��t���O�̏��ő҂��Ȃ�ŐG��Ȃ�
		RETURN 0
CASEELSE
		RETURN 0
ENDSELECT
RETURN 1

@COM366
SELECTCASE IRAI_CHARA_TO_PROGRESS(TARGET)
CASE "�˗������"
	CALL IRAI_START(TARGET)
	RETURN RESULT
CASE "�˗���"
	CALL IRAI_LOOK(TARGET)
	RETURN RESULT
CASE "�˗��B��", "�����؂�", "�񍐖Y��", "�˗����s"
	CALL IRAI_REPORT(TARGET)
	RETURN 1
ENDSELECT

;-------------------------------------------------
;�˗����
;-------------------------------------------------
@IRAI_START(CHARA)
#DIM CHARA
;�˗��񎦎�
PRINTFORMW �ǂ����%CALLNAME:CHARA%��%CALLNAME:MASTER%�ɗ��ݎ�������悤��
CALL SHOW_IRAI_MESSAGE(CHARA, CFLAG:CHARA:�˗����e, "�˗��񎦎�")
CALL SHOW_IRAI_DATA(CFLAG:CHARA:�˗����e, 0)
CALL ASK_YN("�˗����󂯂�", "�f��")
IF RESULT
	PRINTFORML %CALLNAME:MASTER%�͒��d�ɂ��f�肵��
	CALL SHOW_IRAI_MESSAGE(CHARA, CFLAG:CHARA:�˗����e, "�˗�������")
	PRINTFORMW %CALLNAME:CHARA%�͎c�O�����Ȋ�����Ă���
	RETURN -1
ELSE
	CALL SET_IRAI_SLOT(CHARA)
	PRINTFORML %CALLNAME:MASTER%��%CALLNAME:CHARA%�̈˗����󂯂�
	CALL SHOW_IRAI_MESSAGE(CHARA, CFLAG:CHARA:�˗����e, "�˗������")
	WAIT
	RETURN 1
ENDIF

;-------------------------------------------------
;�˗��m�F/�j��
;-------------------------------------------------
@IRAI_LOOK(CHARA)
#DIM CHARA
#DIM CHK_SLOT
CHK_SLOT = SEARCH_IRAI_SLOT(CFLAG:CHARA:�˗����e)
CALL SHOW_IRAI_MESSAGE(CHARA, CFLAG:CHARA:�˗����e, "�˗��m�F��")
CALL SHOW_IRAI_DATA(CFLAG:CHARA:�˗����e, CHK_SLOT)
CALL ASK_YN("�m�F", "�j��")
SIF !RESULT
	RETURN -1
PRINTFORML �{���ɁH
CALL ASK_YN
SIF RESULT
	RETURN -1
CALL SHOW_IRAI_MESSAGE(CHARA, CFLAG:CHARA:�˗����e, "�˗��j����")
PRINTFORMW �˗���j�����܂����B
CALL CLEAR_IRAI_SLOT(CHARA, CHK_SLOT, "�˗��I���i���s�j")

;-------------------------------------------------
;�˗���
;-------------------------------------------------
@IRAI_REPORT(CHARA)
#DIM CHARA
#DIM CHK_SLOT
CHK_SLOT = SEARCH_IRAI_SLOT(CFLAG:CHARA:�˗����e)
;�˗�������
;�˗����s��
SELECTCASE IRAI_CHARA_TO_PROGRESS(CHARA)
CASE "�˗��B��"
	CALL SHOW_IRAI_MESSAGE(CHARA, CFLAG:CHARA:�˗����e, "�����񍐎�")
	CALL IRAI_CARRYOUT(CHARA, CFLAG:CHARA:�˗����e, "�˗�������")
CASE "�����؂�", "�񍐖Y��", "�˗����s"
	CALL SHOW_IRAI_MESSAGE(CHARA, CFLAG:CHARA:�˗����e, "���s�񍐎�")
	CALL IRAI_CARRYOUT(CHARA, CFLAG:CHARA:�˗����e, "�˗����s��")
ENDSELECT

;�y�����菈��
SELECTCASE IRAI_CHARA_TO_PROGRESS(CHARA)
CASE "�˗��B��"
	RESULT = �y������_�������(�y��������@�F�d���˗�����)
	PRINTL
	SELECTCASE CHARA
	CASE 5,6,7,13,14
		RESULT = �y������_�������(�y��������@�F�d���˗�����)
	CASE 29
		RESULT = �y������_�������(�y��������@�F���˗�����)
	CASE 42
		RESULT = �y������_�������(�y��������@�F�͂��Ĉ˗�����)
	ENDSELECT
CASE "�˗����s"
	IF (RAND:(100) < 30)
		PRINTL
		RESULT = �y������_�������(�y��������@�F�������s��)
	ENDIF
ENDSELECT

SELECTCASE IRAI_CHARA_TO_PROGRESS(CHARA)
CASE "�˗��B��"
	CALL CLEAR_IRAI_SLOT(CHARA, CHK_SLOT, "�˗��I���i�����j")
CASE "�����؂�"
	CALL CLEAR_IRAI_SLOT(CHARA, CHK_SLOT, "�˗��I���i�����؂�j")
CASE "�񍐖Y��"
	CALL CLEAR_IRAI_SLOT(CHARA, CHK_SLOT, "�˗��I���i�񍐖Y��j")
CASE "�˗����s"
	CALL CLEAR_IRAI_SLOT(CHARA, CHK_SLOT, "�˗��I���i���s�j")
ENDSELECT

path: 原版+前人整合等各种readme/パッチ/eraTW Ver4.692用_楽譜コレクション追加Ver.20190506/ERB/コマンド関連/COMF/依頼/COMF366 依頼を聞く.ERB


code:
@DANMAKU_OPPONENT_STATUS(ARG, ARG:1)
;����\�͕\��
LOCAL:1 = 0
FOR LOCAL, 0, 10
	SIF GETBIT(CFLAG:ARG:�e�����\, LOCAL)
		LOCAL:1 ++
NEXT
IF LOCAL:1 == 10
	CALL DANMAKU_SA_OUTPUT(ARG, LOCAL:1)
ELSEIF LOCAL:1 == 0
	PRINTFORML �e���X�L��������
ELSE
	FOR LOCAL, 0, 10
		CALL DANMAKU_SA_OUTPUT(ARG, LOCAL)
	NEXT
ENDIF

SIF ARG:1
	RETURN
;�퓬�\�͂̍��Ń��b�Z�[�W����
SELECTCASE ABL:ARG:�퓬�\�� - ABL:MASTER:�퓬�\��
	CASE -6 TO -4
		PRINTFORML �ډB�����č����Ă��Ă����Ă�B
	CASE -4 TO -2
		PRINTFORML �ډB�����Ă��Ă����Ă������B
	CASE -1
		PRINTFORML ������C�͂��Ȃ��B
	CASE 0
		PRINTFORML ���Ԃ񏟂Ă������B
	CASE 1
		PRINTFORML ���ĂȂ�����ł͂Ȃ��B
	CASE 2
		PRINTFORML ����͂��Ȃ苭�������B
	CASE 3
		PRINTFORML ���Ȃ��Ƃ��A���Ȃ��̔{�͋��������B
	CASE 4
		PRINTFORML ��Ղ��N���Ȃ���ΎE����邾�낤�B
	CASE 5,6
		PRINTFORML ���肪���l���Ƃ���΁A���Ȃ��͋a�̃t���ȉ����B
	CASEELSE

ENDSELECT

@DANMAKU_SA_OUTPUT(OPPONENT, ARG:0)
#DIM OPPONENT

SIF ARG:0 < 10
	LOCAL = GETBIT(CFLAG:OPPONENT:�e�����\, ARG:0)
	IF ARG:0 == 10
		SETCOLOR C_RED
		PRINTFORML �y�S�ږ����z: �S�Ă̓���\�͂����킹���B�ŋ�
	ELSEIF LOCAL && ARG:0 == 0
		SETCOLOR C_P_BLUE
		PRINTFORML �y���Ύ���z: ����̃_�C�X��Down
	ELSEIF LOCAL && ARG:0 == 1
		SETCOLOR C_P_BLUE
		PRINTFORML �y���_�֌��z: ����̃_�C�X��Down
	ELSEIF LOCAL && ARG:0 == 2
		SETCOLOR C_RED
		PRINTFORML �y�E�C�z�X�z: %CALLNAME:OPPONENT%�̃_�C�X��Up
	ELSEIF LOCAL && ARG:0 == 3
		SETCOLOR C_RED
		PRINTFORML �y���������z: %CALLNAME:OPPONENT%�̃_�C�X��Up
	ELSEIF LOCAL && ARG:0 == 4
		SETCOLOR C_P_PURPLE
		PRINTFORML �y���͗��_�z: %CALLNAME:OPPONENT%�̃_�C�X�l������̃_�C�X�l��菬�����Ă��A���̍�����萔�ȉ��Ȃ�A�c�@������Ȃ�
	ELSEIF LOCAL && ARG:0 == 5
		SETCOLOR C_P_PURPLE
		PRINTFORML �y�����[���z: %CALLNAME:OPPONENT%�̏����c�@��4�ɂȂ�
	ELSEIF LOCAL && ARG:0 == 6
		SETCOLOR C_P_PURPLE
		PRINTFORML �y�c�E�����z: ����̔�e����̕��A���̃{������-1�����
	ELSEIF LOCAL && ARG:0 == 7
		SETCOLOR C_P_PURPLE
		PRINTFORML �y�����ꝱ�z: %CALLNAME:OPPONENT%�����m���Ń{�����g���悤�ɂȂ�
	ELSEIF LOCAL && ARG:0 == 8
		SETCOLOR C_RED
		PRINTFORML �y�ĉ�Ǎ��z: %CALLNAME:OPPONENT%�̃_�C�X�C���lUp
	ELSEIF LOCAL && ARG:0 == 9
		SETCOLOR C_P_BLUE
		PRINTFORML �y�H�D�Í��z: ����̃_�C�X�C���lDown
	ENDIF
RESETCOLOR

;-------------------------------------------------
;�퓬���̏���
;-------------------------------------------------
@DANMAKU_BATTLE(OPPONENT, HANDICAP_FIXED, HANDICAP_RAND)
#DIM �v���C���[�c�@
#DIM ����c�@
#DIM �c��HP
#DIM �c��{����
#DIM �^�[����
#DIM �v���C���[�_�C�X��
#DIM ����_�C�X��
#DIM �v���C���[�_�C�X��
#DIM ����_�C�X��
#DIM �v���C���[�_�C�X�l
#DIM ����_�C�X�l
#DIM �v���C���[�C���l
#DIM ����C���l
#DIM ���苭��
#DIM ��[�U�t���O
#DIM ���S�t���O
#DIM HANDICAP_FIXED
#DIM HANDICAP_RAND
#DIM OPPONENT

�v���C���[�c�@ = 3
����c�@ = 3
���苭�� = ABL:OPPONENT:�퓬�\��
�c��HP = MAXBASE:MASTER:�̗�
�c��{���� = 2
�^�[���� = 1
��[�U�t���O = 0
���S�t���O = 0
SIF TALENT:OPPONENT:�v���C�h > 0 && ABL:MASTER:�퓬�\�� < ���苭�� && ���苭�� > 2 && TALENT:OPPONENT:�s������ == 1
	���S�t���O = 1
;�y�����[���z�̌���
SIF GETBIT(CFLAG:OPPONENT:�e�����\, 5)
	����c�@ ++
;�y�G�N�X�e���h�z�̌���
SIF TALENT:MASTER:�G�N�X�e���h == 1
	�v���C���[�c�@ ++
;�y���i�V���[�^�[�z�̌���
SIF TALENT:MASTER:���i�V���[�^�[ == 1
	�c��{���� ++

WHILE �v���C���[�c�@ > 0 && ����c�@ > 0
	;�_�C�X���v�Z
	�v���C���[�_�C�X�� = (ABL:MASTER:�퓬�\�� + RAND:5) * 2 + (ABL:MASTER:�퓬�\�� + RAND:3) / 2
	����_�C�X�� = (���苭�� + RAND:4 + 1) * 2 + ���苭�� / 2 * RAND:3
	SELECTCASE ����c�@
		CASE IS > 2
			IF ���S�t���O && ����c�@ > 2
				CALL COLORMESSAGE(@"%CALLNAME:OPPONENT%��%CALLNAME:MASTER%�̂��Ƃ������т��Ă���",C_YELLOW,1)
				����_�C�X�� -= ���苭�� / 2
			ENDIF
		CASE 2
			����_�C�X�� += ���苭�� / 2
		CASE 1
			����_�C�X�� += ���苭�� / 2 + 1
	ENDSELECT

	;�_�C�X�ʌv�Z
	�v���C���[�_�C�X�� = (ABL:MASTER:�퓬�\�� + 1) * (6 + RAND:8) + RAND:(15 + TFLAG:�K�^�␳) * ABL:MASTER:�퓬�\�� / 2
	����_�C�X�� = (���苭�� + 1) * (9 + RAND:7) + RAND:10 - (����c�@ - 1) * ���苭��
	;�C���l�v�Z
	IF (���苭�� - ABL:MASTER:�퓬�\��) < 0
		�v���C���[�C���l = (ABL:MASTER:�퓬�\�� - ���苭�� + 3) * (-RAND:4 - 8) * ABL:MASTER:�퓬�\�� / 2
		����C���l = (ABL:MASTER:�퓬�\�� - ���苭�� + 3) * (RAND:4 + 8) * ���苭�� / 2
	ELSEIF (���苭�� - ABL:MASTER:�퓬�\��) > 0
		�v���C���[�C���l = (���苭�� - ABL:MASTER:�퓬�\�� + 3) * (RAND:4 + 8) * ABL:MASTER:�퓬�\�� / 2
		����C���l = (���苭�� - ABL:MASTER:�퓬�\�� + 3) * (-RAND:4 - 8) * ���苭�� / 2
	ELSE
		�v���C���[�C���l = 0
		����C���l = 0
	ENDIF

	;�C�x���g�p
	�v���C���[�C���l -= HANDICAP_FIXED
	SIF HANDICAP_RAND
		�v���C���[�C���l -= RAND:(HANDICAP_RAND)
	;�y���Ύ���z�̌���
	SIF GETBIT(CFLAG:OPPONENT:�e�����\, 0)
		�v���C���[�_�C�X�� -= (���苭�� / 2 + RAND:3 + 1) * RAND:2
	;�y���_�֌��z�̌���
	SIF GETBIT(CFLAG:OPPONENT:�e�����\, 1)
		�v���C���[�_�C�X�� -= (���苭�� / 2 + 1) * RAND:4 + RAND:5
	;�y�E�C�z�X�z�̌���
	SIF GETBIT(CFLAG:OPPONENT:�e�����\, 2)
		����_�C�X�� += (���苭�� / 2 + RAND:3 + 2) * RAND:2
	;�y���������z�̌���
	SIF GETBIT(CFLAG:OPPONENT:�e�����\, 3)
		����_�C�X�� += ���苭�� * 2 + 6 / (RAND:3 + 1)
	;�y�ĉ�Ǎ��z�̌���
	SIF GETBIT(CFLAG:OPPONENT:�e�����\, 8)
		����C���l += ���苭�� * (RAND:5 + 5) + RAND:5
	;�y�H�D�Í��z�̌���
	SIF GETBIT(CFLAG:OPPONENT:�e�����\, 9)
		�v���C���[�C���l -= ���苭�� * (RAND:4 + 4) + RAND:9

	;�y��[�U�z�̌���
	IF ��[�U�t���O
		�v���C���[�_�C�X�� += ���苭�� / 2 + 1
		�v���C���[�_�C�X�� += (���苭�� / 2 + 1) * 4
		�v���C���[�C���l += ���苭�� * (RAND:5 + 4)
		��[�U�t���O = 0
	ENDIF

	SIF �v���C���[�_�C�X�� <= 0
		�v���C���[�_�C�X�� = 1
	SIF ����_�C�X�� <= 0
		����_�C�X�� = 1
	SIF �v���C���[�_�C�X�� <= 0
		�v���C���[�_�C�X�� = 1
	SIF ����_�C�X�� <= 0
		����_�C�X�� = 1

	PRINTL
	PRINTFORML -----------------------------------------------------
	PRINTFORML TURN:{�^�[����}
	PRINTFORML -----------------------------------------------------
	PRINTL

	CALL DICE_PRINT(�v���C���[�_�C�X��, �v���C���[�_�C�X��, �v���C���[�C���l, ����_�C�X��, ����_�C�X��, ����C���l, "�m��O")
	PRINTFORMW �^���̃_�C�X���[���I�I
	;�C�x���g�p
	IF (HANDICAP_FIXED || HANDICAP_RAND)
		IF (OPPONENT == [[�H��]])
			SETCOLOR C_RED
			PRINTDATAL
				DATAFORM �ꕨ�����̑��݂��咣���Ă��邹���œ����Â炢�c�c
				DATAFORM %CALLNAME:OPPONENT%��������ɋ����������A�������Ă��邹���ŏW���ł��Ȃ��c�c
				DATAFORM �������C��邾���ŃC�������ɂȂ�c�c
			ENDDATA
		ENDIF
		RESETCOLOR
	ENDIF
	;�_�C�X�l�v�Z
	�v���C���[�_�C�X�l = DICE_VALUE(�v���C���[�_�C�X��, �v���C���[�_�C�X��, �v���C���[�C���l)
	����_�C�X�l = DICE_VALUE(����_�C�X��, ����_�C�X��, ����C���l)
	LOCAL = ����_�C�X�l - �v���C���[�_�C�X�l

	CALL DICE_PRINT(�v���C���[�_�C�X�l, 0, 0, ����_�C�X��, ����_�C�X��, ����C���l, "�m���")
	PRINTL
	PRINTFORML �c��HP: {�c��HP}    �c��{���g�p��: {�c��{����}    �c��c�@: {�v���C���[�c�@}

	CALL ASK_M("����ɐ�O����", 1, "��������", 1)
	SELECTCASE RESULT
		CASE 0
			;�y��[�U�z�̌���
			IF TALENT:MASTER:��[�U == 1
				��[�U�t���O = 1
				SETCOLOR C_RED
				PRINTFORML %CALLNAME:MASTER%�́y��[�U�z�����I
				RESETCOLOR
			ENDIF
			PRINTFORML �e���̉���ɐ�O���邱�Ƃɂ���
			PRINTFORMW �E�E�E
			PRINTL
			CALL DICE_PRINT(�v���C���[�_�C�X�l, ����_�C�X�l, 0, 0, 0, 0, "����")
			PRINTW
			;�y�O���C�Y���z�̌���
			IF TALENT:MASTER:�O���C�Y��� == 1
				IF ABL:MASTER:�퓬�\�� == 0
					LOCAL = LOCAL * 2 / 3
				ELSEIF ABL:MASTER:�퓬�\�� < 3
					LOCAL = (LOCAL * 2) / (ABL:MASTER:�퓬�\�� + 2)
				ELSE
					LOCAL = (LOCAL * 3) / (ABL:MASTER:�퓬�\�� + 3)
				ENDIF
			ENDIF
			IF ABL:MASTER:�퓬�\�� < 4
				IF LOCAL <= 20
					PRINTFORML �قƂ�ǃ_���[�W���󂯂Ȃ�����
					SIF LOCAL > 0
						�c��HP -= LOCAL * 4
				ELSEIF LOCAL <= 50
					PRINTFORML �����_���[�W���󂯂�
					�c��HP -= LOCAL * 5
				ELSEIF LOCAL <= 150
					PRINTFORML ���\�_���[�W���󂯂�
					�c��HP -= LOCAL * 6
				ELSE
					PRINTFORML ���Ȃ�̃_���[�W���󂯂�
					�c��HP = �c��HP - MAXBASE:MASTER:�̗� / 2 + 1
				ENDIF
			ELSE
				IF LOCAL <= 20 * ABL:MASTER:�퓬�\�� / 2
					PRINTFORML �قƂ�ǃ_���[�W���󂯂Ȃ�����
					SIF LOCAL > 0
						�c��HP -= LOCAL * 4
				ELSEIF LOCAL <= 50 * ABL:MASTER:�퓬�\�� / 2
					PRINTFORML �����_���[�W���󂯂�
					�c��HP -= LOCAL * 5
				ELSEIF LOCAL <= 150 * ABL:MASTER:�퓬�\�� / 2
					PRINTFORML ���\�_���[�W���󂯂�
					�c��HP -= LOCAL * 6
				ELSE
					PRINTFORML ���Ȃ�̃_���[�W���󂯂�
					�c��HP = �c��HP - MAXBASE:MASTER:�̗� / 2 + 1
				ENDIF
			ENDIF
			PRINTFORMW �c��HP: {�c��HP}
			IF �c��HP <= 0
				PRINTFORML �_�s�`���[���^
				PRINTFORML ��e���Ă��܂����c�c
				�v���C���[�c�@ --
				�c��HP = MAXBASE:MASTER:�̗�
				�c��{���� = 2
				PRINTFORMW �v���C���[�c�@: {�v���C���[�c�@}
				;�y���i�V���[�^�[�z�̌���
				SIF TALENT:MASTER:���i�V���[�^�[ == 1
					�c��{���� ++
				;�y�c�E�����z�̌���
				IF GETBIT(CFLAG:OPPONENT:�e�����\, 6) && �v���C���[�c�@ > 0
					SETCOLOR C_RED
						PRINTFORMW %CALLNAME:OPPONENT%�́y�c�E�����z�����I
					RESETCOLOR
					;����Ăяo��
					TRYCALLFORM M_KOJO_MESSAGE_COM_K{OPPONENT}_DANMAKU("�c�E����", ����c�@)
					�c��{���� --
				ENDIF
			ENDIF
		CASE 1
			;�y�����ꝱ�z�̌���
			IF GETBIT(CFLAG:OPPONENT:�e�����\, 7)
				IF RAND:100 + 1 < 10 + ���苭�� * 2
					LOCAL:1 = ���苭�� * (7 + RAND:5) * (���苭�� / 2 + 1) + RAND:7
					����_�C�X�l += LOCAL:1
					SETCOLOR C_RED
						PRINTFORML %CALLNAME:OPPONENT%�́y�����ꝱ�z�����I
						PRINTFORMW %CALLNAME:OPPONENT%�̃_�C�X�l��+{LOCAL:1}���ꂽ�I
					RESETCOLOR
					;����Ăяo��
					TRYCALLFORM M_KOJO_MESSAGE_COM_K{OPPONENT}_DANMAKU("�����ꝱ", ����c�@)
					LOCAL = ����_�C�X�l - �v���C���[�_�C�X�l
				ENDIF
			ENDIF
			IF �c��{���� >= 1
				PRINTFORML �{�����g���H
				CALL ASK_M("�g��", 1, "�g��Ȃ�", 1)
				SELECTCASE RESULT
					CASE 0
						LOCAL:1 = ABL:MASTER:�퓬�\�� * (7 + RAND:5) * (ABL:MASTER:�퓬�\�� / 2 + 1) + RAND:7
						;�y���i�V���[�^�[�z�̌���
						SIF TALENT:MASTER:���i�V���[�^�[ == 1
							LOCAL:1 = LOCAL:1 * (RAND:3 + 2)
						�v���C���[�_�C�X�l += LOCAL:1
						PRINTFORMW �_�C�X�l��{�v���C���[�_�C�X�l}�ɂȂ����I
						�c��{���� --
						LOCAL = ����_�C�X�l - �v���C���[�_�C�X�l
					CASE 1

				ENDSELECT
			ENDIF
			PRINTFORML �������邱�Ƃɂ����I
			PRINTFORMW �E�E�E
			PRINTL
			CALL DICE_PRINT(�v���C���[�_�C�X�l, ����_�C�X�l, 0, 0, 0, 0, "����")
			PRINTW
			IF LOCAL > 0
				IF �c��{���� >= 1
					PRINTFORML �ǂ��l�߂�ꂽ%CALLNAME:MASTER%�̓{�����g�����I
					LOCAL:1 = ABL:MASTER:�퓬�\�� * (7 + RAND:5) * (ABL:MASTER:�퓬�\�� / 2 + 1) + RAND:7
					;�y���i�V���[�^�[�z�̌���
					SIF TALENT:MASTER:���i�V���[�^�[ == 1
						LOCAL:1 = LOCAL:1 * (RAND:3 + 2)
					SETCOLOR C_RED
					PRINTFORM �_�C�X�l�̍�:{LOCAL}
					IF LOCAL <= LOCAL:1
						PRINTFORML �� {LOCAL:1}
						PRINTFORMW %CALLNAME:MASTER%�̓{����%CALLNAME:OPPONENT%�̒e����ł��������I
						LOCAL = 0
					ELSE
						PRINTFORMW �� {LOCAL:1}
					ENDIF
					RESETCOLOR
					�c��{���� --
				ENDIF
			ELSEIF LOCAL < 0
				;�y���͗��_�z�̌���
				IF GETBIT(CFLAG:OPPONENT:�e�����\, 4) && (-LOCAL) < ���苭�� * 10
					SETCOLOR C_RED
						PRINTFORML %CALLNAME:OPPONENT%�́y���͗��_�z�����I
						PRINTFORMW %CALLNAME:MASTER%�̕������e���́A%CALLNAME:OPPONENT%�𑨂��鐡�O�ŏ��ł����I
						;����Ăяo��
						TRYCALLFORM M_KOJO_MESSAGE_COM_K{OPPONENT}_DANMAKU("���͗��_", ����c�@)
						LOCAL = 0
					RESETCOLOR
				ENDIF
			ENDIF
			IF LOCAL < 0
				CALL COLORMESSAGE(@"���j�����I�@��������I",C_YELLOW,1)
				����c�@ --
				;����Ăяo��
				TRYCALLFORM M_KOJO_MESSAGE_COM_K{OPPONENT}_DANMAKU("�퓬��", ����c�@)
				PRINTFORMW ����c�@: {����c�@}
			ELSEIF LOCAL == 0
				PRINTFORMW ���݂�����ł�^�����Ȃ������̂ŁA�d�؂蒼����
			ELSE
				PRINTFORML �_�s�`���[���^
				PRINTFORML ��e���Ă��܂����c�c
				�v���C���[�c�@ --
				�c��HP = MAXBASE:MASTER:�̗�
				�c��{���� = 2
				PRINTFORMW �v���C���[�c�@: {�v���C���[�c�@}
				;�y���i�V���[�^�[�z�̌���
				SIF TALENT:MASTER:���i�V���[�^�[ == 1
					�c��{���� ++
				;�y�c�E�����z�̌���
				IF GETBIT(CFLAG:OPPONENT:�e�����\, 6) && �v���C���[�c�@ > 0
					SETCOLOR C_RED
						PRINTFORMW %CALLNAME:OPPONENT%�́y�c�E�����z�����I
					RESETCOLOR
					;����Ăяo��
					TRYCALLFORM M_KOJO_MESSAGE_COM_K{OPPONENT}_DANMAKU("�c�E����", ����c�@)
					�c��{���� --
				ENDIF
			ENDIF
	ENDSELECT

	�^�[���� ++
WEND

PRINTL
IF �v���C���[�c�@ <= 0
	PRINTFORMW %CALLNAME:MASTER%�͕����Ă��܂����c�c
	CALL COLORMESSAGE(@"�������I",C_RED,2,1)
ELSEIF ����c�@ <= 0
	PRINTFORML %CALLNAME:MASTER%��%CALLNAME:OPPONENT%�Ƃ̏����ɏ������I
	CALL COLORMESSAGE(@"�l���̏����ҁI",C_GREEN,2,1)
ENDIF
PRINTL

;�y�����菈��
IF (RAND:(100) < 30)
	RESULT = �y������_�e������(OPPONENT)
	SIF RESULT != -1
		PRINTL
ENDIF

RETURN ����c�@

@DICE_PRINT(ARG:0, ARG:1, ARG:2, ARG:3, ARG:4, ARG:5, ARGS)
IF ARGS == "�m��O"
	PRINTFORM %CALLNAME:MASTER%:
	SETCOLOR C_GREEN
	PRINTFORM {ARG:0}d{ARG:1}
	IF ARG:2 > 0
		SETCOLOR C_RED
		PRINTFORM +{ARG:2}
	ELSEIF ARG:2 < 0
		SETCOLOR C_BLUE
		PRINTFORM {ARG:2}
	ENDIF
	RESETCOLOR
	PRINTFORM (Min:{ARG:0 + ARG:2}, Max:{ARG:0 * ARG:1 + ARG:2})  VS
	SETCOLOR C_GREEN
	PRINTFORM {ARG:3}d{ARG:4}
	IF ARG:5 > 0
		SETCOLOR C_RED
		PRINTFORM +{ARG:5}
	ELSEIF ARG:5 < 0
		SETCOLOR C_BLUE
		PRINTFORM {ARG:5}
	ENDIF
	RESETCOLOR
	PRINTFORM (Min:{ARG:3 + ARG:5}, Max:{ARG:3 * ARG:4 + ARG:5})
	PRINTFORML :%CALLNAME:TARGET%
;ARG:1,2�͎g��Ȃ�
ELSEIF ARGS == "�m���"
	PRINTFORM %CALLNAME:MASTER%:
	SETCOLOR C_GREEN
	PRINTFORM {ARG:0}
	RESETCOLOR
	PRINTFORM VS
	SETCOLOR C_GREEN
	PRINTFORM {ARG:3}d{ARG:4}
	IF ARG:5 > 0
		SETCOLOR C_RED
		PRINTFORM +{ARG:5}
	ELSEIF ARG:5 < 0
		SETCOLOR C_BLUE
		PRINTFORM {ARG:5}
	ENDIF
	RESETCOLOR
	PRINTFORM (Min:{ARG:3 + ARG:5}, Max:{ARG:3 * ARG:4 + ARG:5})
	PRINTFORML :%CALLNAME:TARGET%
;ARG:2,3,4,5�͎g��Ȃ�
ELSEIF ARGS == "����"
	PRINTFORM %CALLNAME:MASTER%:
	SETCOLOR C_GREEN
	PRINTFORM {ARG:0}
	RESETCOLOR
	PRINTFORM VS
	SETCOLOR C_GREEN
	PRINTFORM {ARG:1}
	RESETCOLOR
	PRINTFORML :%CALLNAME:TARGET%
ENDIF

@DICE_VALUE(ARG:0, ARG:1, ARG:2)
#FUNCTION
;���������Ȃ��ƃ_��
LOCAL:1 = 0
FOR LOCAL, 0, ARG:0
	LOCAL:1 += RAND:(ARG:1) + 1
NEXT

RETURNF LOCAL:1 + ARG:2

@SHOW_DANMAKU_RULE
PRINTFORML �݂��Ƀ_�C�X��U��A�o���ڂ̑傫���������Ƃ����̂���{�̃��[���ł��B
PRINTFORMW �ŏ��݂͌��Ɏc�@��3�������Ă��āA�퓬�\�͂��傫���قǃ_�C�X�̐��Ɩʂ������܂��B
PRINTFORMW �v���C���[�̂݁A�����̏o�ڂ�������A����ɐ�O���邩�������邩��I�Ԃ��Ƃ��ł��܂��i���̂Ƃ��A����̏o�ڂ͌����܂���j�B
PRINTFORMW ����ɐ�O���邱�Ƃ�I�񂾏ꍇ�́A�c�@������Ȃ�����ɁA�o�ڂ̍��ɉ�����HP�Ƀ_���[�W���󂯂܂��B
PRINTFORMW HP��0�ɂȂ�ƁA�v���C���[�̎c�@��1����܂��B�c�@��0�ɂȂ�΁A�v���C���[�̔s�k�ł��B
PRINTFORMW �������邱�Ƃ�I�сA�����菬�����o�ڂ������ꍇ�́A�������Ńv���C���[�̎c�@��1����܂��B
PRINTFORMW �������邱�Ƃ�I�сA������傫���o�ڂ��o�����Ƃ��Ɍ���A����̎c�@��1���炷���Ƃ��o���܂��B
;�c�@0�Ȃ�܂��v���C�ł��邶���Ƃ�����Ȃ�
PRINTFORMW �v���C���[�̎c�@��0�ɂȂ�O�ɁA����̎c�@��0�ɂ��邱�Ƃ��ł���΁A�v���C���[�̏����ƂȂ�܂��B
PRINTFORMW �܂��A�v���C���[�̓{�����g���ă_�C�X�̏o�ڂ��v���X�ł���̂ŁA�������Ƃ�����ʂŎg���܂��傤�B
PRINTFORMW �X�ɁA�_�C�X�����ɕ����ăv���C���[�̎c�@�����鎞�A�{�����g�p���Ďc�@������̂�h�����Ƃ�����܂��B
PRINTFORMW �������A�c�@������ƃ{���g�p�񐔂������I��2�ɂȂ�̂ŁA�g��Ȃ��܂܎c�@�����炷�̂͑��ɂȂ�܂��B


code:
;-------------------------------------------------
;403�x�e
;-------------------------------------------------
@MESSAGE_COM403
IF TARGET > 0
	IF CFLAG:TARGET:����
		PRINTDATAL
			DATAFORM %CALLNAME:PLAYER%��%CALLNAME:TARGET%�̐Q������Ȃ���ꑧ����
			DATAFORM %CALLNAME:PLAYER%�͖���%CALLNAME:TARGET%�ׂ̗ŋx�ނ��Ƃɂ���
		ENDDATA
	ELSE
		PRINTDATAL
			DATAFORM %CALLNAME:PLAYER%��%CALLNAME:TARGET%�ƈꑧ����
			DATAFORM %CALLNAME:PLAYER%��%CALLNAME:TARGET%�ƌy���x�ނ��Ƃɂ���
		ENDDATA
	ENDIF
ELSE
	PRINTDATAL
		DATAFORM %CALLNAME:PLAYER%�͈ꑧ����
		DATAFORM %CALLNAME:PLAYER%�͌y���x�ނ��Ƃɂ���
		DATAFORM %CALLNAME:PLAYER%�͍���̗\��������l���Ă݂�
		DATAFORM %CALLNAME:PLAYER%���ڂ���Ă���J���Ə������Ԃ��i��ł���

	ENDDATA
ENDIF
;-------------------------------------------------
;404�ǂ�����
;-------------------------------------------------
;@MESSAGE_COM404
;LOCAL = ABS(TFLAG:193)
;IF TFLAG:193 > 0
;	PRINTFORML %CALLNAME:PLAYER%��\@ TARGET ? %CALLNAME:TARGET%�Ƌ��͂��� #  \@%STR:(200 + LOCAL)%��ǂ�������
;	PRINTFORML   �\ %STR:(200 + LOCAL)%�͐_��_�֋A���čs���܂��� �\
;ELSE
;	PRINTFORML %CALLNAME:PLAYER%��\@ TARGET ? %CALLNAME:TARGET%�Ƌ��͂��� #  \@%STR:(200 + LOCAL)%��ǂ��������Ƃ���
;	PRINTFORML %STR:(200 + LOCAL)%�͉��H��ʊ��%CALLNAME:PLAYER%\@ TARGET ? �B #  \@�����߂Ă���c
;ENDIF

;-------------------------------------------------
;410,�|��
;-------------------------------------------------
@MESSAGE_COM410
IF FLAG:562 == 1
PRINTFORML ��ʂ�|�����I����ƁA%CALLNAME:PLAYER%�͋��ԂɏZ�l�������ĂяW�߂Đ��������B
PRINTFORML ����ł��΂炭�͎U�炩���Ȃ��悤�ɋC��z���Ă����΂����̂����c
FLAG:562 = 0
ELSE
IF FLAG:70
	LOCAL:3 = 0
	FOR LOCAL,1,CHARANUM
		SIF CFLAG:LOCAL:����
			LOCAL:3 ++
	NEXT
	IF LOCAL:3 == 1
		LOCALS = %CALLNAME:MASTER%�͎��Ԃ��~�߂��Ă���%CALLNAME:TARGET%��K�ڂ�
	ELSE
		LOCALS = %CALLNAME:MASTER%��
	ENDIF
ELSEIF TFLAG:193 && !CFLAG:���� && !CFLAG:���ӂ�
	LOCALS = %CALLNAME:MASTER%��%CALLNAME:TARGET%��
ELSEIF CFLAG:���ӂ�
	LOCALS = %CALLNAME:MASTER%��%CALLNAME:TARGET%���ق����炩����
ELSE
	LOCALS = %CALLNAME:MASTER%��
ENDIF
IF OUTROOF(CFLAG:MASTER:���݈ʒu) && DAY:2 == 4
	SELECTCASE TFLAG:194
		CASE 0
			PRINTFORML %LOCALS%�N��������Ȃ��悤�O����ɐႩ��������
		CASE 1
			PRINTFORML %LOCALS%�X�R�b�v���Y��ɐႩ������
		CASE 2
			PRINTFORML %LOCALS%����_���v���g���ĂЂƂ܂��ʂ�邾���̓��������
			PRINTFORML ���͂͂܂��Ⴊ�c���Ă���
		CASE 3
			IF TALENT:MASTER:���|����
				PRINTFORML %CALLNAME:MASTER%�͂������Ɛς������̐�̎R��ڂ̑O�ɂ��Ėڂ��P�����Ȃ����Ƃ𑱂���
				PRINTFORML ���͂͂܂��Ⴊ�c���Ă���
			ELSE
				PRINTFORML %LOCALS%�������Ɛς������̐�̎R��ڂ̑O�ɂ��Č��ɂȂ�Ȃ������Ƃ𑱂���
				PRINTFORML ���͂͂܂��Ⴊ�c���Ă���
			ENDIF
	ENDSELECT
ELSEIF OUTROOF(CFLAG:MASTER:���݈ʒu)
	SELECTCASE TFLAG:194
		CASE 0
			PRINTFORML %LOCALS%�ׂ����S�~��|���Đ����Ȍ��h���ɂ���
		CASE 1
			PRINTFORML %LOCALS%�ق����Ŏ��͂̃S�~��|����
		CASE 2
			PRINTFORML %LOCALS%�S�~�܂����o���ė����Ă���S�~������Еt����
			PRINTFORML ���͂͂܂��G�R�Ƃ��Ă���
		CASE 3
			IF TALENT:MASTER:���|����
				PRINTFORML %CALLNAME:MASTER%�͈��|�I�ȗʂ̃S�~��ڂ̑O�ɂ��Ėڂ��P�����Ȃ����Ƃ𑱂���
				PRINTFORML ���͂͂܂��G�R�Ƃ��Ă���
			ELSE
				PRINTFORML %LOCALS%���|�I�ȗʂ̃S�~��ڂ̑O�ɂ��Č��ɂȂ�Ȃ������Ƃ𑱂���
				PRINTFORML ���͂͂܂��G�R�Ƃ��Ă���
			ENDIF
	ENDSELECT
ELSE
	SELECTCASE TFLAG:194
		CASE 0
			IF TALENT:MASTER:���L�ϐ� < 0
				PRINTFORML %LOCALS%���X�܂ōs���͂����ׂ₩�Ȏ���������
			ELSE
				PRINTFORML %LOCALS%�G�ЂŎ��͂̉����@�������
			ENDIF
		CASE 1
			PRINTFORML %LOCALS%�ق����Ƃ���Ƃ�������Ď��͂�|�����߂�
		CASE 2
			IF TALENT:MASTER:���L�ϐ� > 0 && CFLAG:MASTER:���݈ʒu == 15
				PRINTFORML %LOCALS%�S�~���܂Ƃ߂ĉ�����ɉ����ꂽ
				PRINTFORML ���͂͂܂��G�R�Ƃ��Ă���
			ELSE
				PRINTFORML %LOCALS%�S�~���܂Ƃ߂Ă��������Ɏ̂Ă�
				PRINTFORML ���͂͂܂��G�R�Ƃ��Ă���
			ENDIF
		CASE 3
			IF TALENT:MASTER:���|����
				PRINTFORML %CALLNAME:MASTER%�͈��|�I�ȗʂ̃S�~��ڂ̑O�ɂ��Ėڂ��P�����Ȃ����Ƃ𑱂���
				PRINTFORML ���͂͂܂��G�R�Ƃ��Ă���
			ELSE
				PRINTFORML %LOCALS%���|�I�ȗʂ̃S�~��ڂ̑O�ɂ��Č��ɂȂ�Ȃ������Ƃ𑱂���
				PRINTFORML ���͂͂܂��G�R�Ƃ��Ă���
			ENDIF
	ENDSELECT
ENDIF
IF TALENT:MASTER:���|����
	PRINTFORML %CALLNAME:MASTER%�͑|���̉��y�Ɋ��^���Ԃɐ��߁A�܂𕂂��ׂđ|���𑱂��Ă���
	PRINT ���܂�̉��y�ɉ��������Y��ē������\���
	IF CFLAG:MASTER:���݈ʒu == 3
		PRINTFORMW ���g���܂Ƃ߂Ă���������
		PRINTFORML ��Ȃ�����
	;�H�앪��
	ELSEIF CFLAG:MASTER:���݈ʒu == 9 || CFLAG:MASTER:���݈ʒu == 27 || CFLAG:MASTER:���݈ʒu == 41
		PRINTFORML �����ギ����Ɖ��𗧂Ăĕz�Ђ𓮂��������Ă���
		PRINTFORML �����Ă����΂��܂ł���葱��������
	;�q�ɁA�����ꕪ��
	ELSEIF CFLAG:MASTER:���݈ʒu == 6 || CFLAG:MASTER:���݈ʒu == 18 || CFLAG:MASTER:���݈ʒu == 35 || CFLAG:MASTER:���݈ʒu == 51
		PRINTFORML �������ƂƉ��𗧂ĂĐ����𑱂��Ă���
		PRINTFORML �����Ă����΂��܂ł���葱��������
	ELSE
		PRINTFORML �����ギ����Ɖ��𗧂ĂĎG�Ђ𓮂��������Ă���
		PRINTFORML �����Ă����΂��܂ł���葱��������
	ENDIF
ELSEIF CFLAG:���ӂ� && SHIRAHU(TARGET)
	PRINTL �w�ォ����₩�Ȏ����������邪�C�ɂ��Ȃ����Ƃɂ���
ENDIF
IF STRLENS(TSTR:2)
	WAIT
	PRINTFORML �E�����ςȂ���%TSTR:2%�������Ă���
	PRINT [0] - �����˂� [1] - ��߂Ƃ�
	INPUT
	IF !RESULT
		PRINTFORML %TSTR:2%����������Ƃ����˂�
		CALL PANTS_GETTING(FOUND_PANTS_OWNER, FOUND_PANTS_TYPE)
	ELSE
		TSTR:3 =
		PRINTFORML %TSTR:2%����󂩂��ɕ��荞��
	ENDIF
ENDIF

SIF !TFLAG:193 && TARGET > 0 && !CFLAG:���� && !FLAG:70
	PRINTFORML %CALLNAME:TARGET%�͊��S���Ȃ���%CALLNAME:MASTER%�̍�Ƃ𒭂߂Ă���
ENDIF
;-------------------------------------------------
;411,�퓬�P��
;-------------------------------------------------
@MESSAGE_COM411
PRINTFORM %CALLNAME:MASTER%��
IF TARGET > 0
	IF ABL:MASTER:�퓬�\�� > ABL:TARGET:�퓬�\��
		PRINTFORM %CALLNAME:TARGET%�ɏ������Ȃ���
	ELSE
		PRINTFORM %CALLNAME:TARGET%�ɏ��������Ă��炢�Ȃ���
	ENDIF
ENDIF
IF !TFLAG:194
	PRINTL �e���̌P�����s����
ELSE
	SELECTCASE TIME:5
		CASE 4,6
			PRINTL �J�̒��e���̌P�����s����
			PRINTL �ƂĂ���ꂽ
		CASE 1
			IF TFLAG:194 == 3
				PRINTL ����Ȓ��˓����̉��Œe���̌P�����s����
				PRINTL �M���ǂɂȂ肻�����c
			ELSE
				PRINTL �_��Ȃ���̉��Œe���̌P�����s����
			ENDIF
		CASE 5
			PRINTL �������J���~��r�Ԓ��A�������P�������s����
			PRINTW ���ʂقǔ�ꂽ
		CASE 8,10,12,13
			PRINTL ��̒��e���̌P�����s����
			PRINTL �ƂĂ���ꂽ
		CASE 9
			PRINTL �Ґ���̒��A�������P�������s����
			PRINTW ���ʂقǔ�ꂽ
		CASEELSE
			PRINTL �e���̌P�����s����
	ENDSELECT
ENDIF
IF TALENT:MASTER:�`�� == 4
	IF ABL:MASTER:�퓬�\�� == 0
		PRINTL �P������ŌҊԂ̌��ʂ𒲐��ł���悤�ɂȂ�C������
	ELSEIF ABL:MASTER:�퓬�\�� == 1
		PRINTL �ҊԂ��u�ԓI�ɔ��������ĖڂԂ����ł���悤�ɂȂ��Ă���
	ELSEIF ABL:MASTER:�퓬�\�� == 2
		PRINTL �ҊԂ̌��������ł���C������
	ELSEIF ABL:MASTER:�퓬�\�� == 3
		PRINTL �e���Ɏ�������������D��������悤�ɂȂ��Ă���
	ELSEIF ABL:MASTER:�퓬�\�� == 4
		PRINTL �ҊԂ���������ڒׂ��ƌ�����D��������e���͒��X�̃��m��
	ELSEIF ABL:MASTER:�퓬�\�� == 5
		PRINTL ���Ȃ��̌ҊԂ̌����̓}�X�^�[�X�p�[�N�ɔ����Ă���
	ELSEIF ABL:MASTER:�퓬�\�� >= 6
		PRINTL ���Ȃ��̒e���퓬�\�͈͂������
	ENDIF
ENDIF
SIF ABL:MASTER:�퓬�\�� > 2 && TARGET > 0
	PRINTFORML %CALLNAME:TARGET%��%CALLNAME:MASTER%�̎��͂Ɋ��S���Ă���
SIF ABL:MASTER:�퓬�\�� < ABL:TARGET:�퓬�\�� - 2
	PRINTFORML %CALLNAME:TARGET%�̎w���͂ƂĂ����߂ɂȂ�
SIF TFLAG:194
	PRINTFORMW %CALLNAME:TARGET%�̓n�[�h�ȌP���ō��������܂���
IF TFLAG:193
	PRINTW
	PRINTL �P����ɃX�|�[�c�h�����N������
	PRINTL ��ꂽ�̂ɐ��������ݓn���Ă����c
	ITEM:�X�|�[�c�h�����N --
ENDIF
;-------------------------------------------------
;412,�׋�
;-------------------------------------------------
@MESSAGE_COM412
PRINTFORM %CALLNAME:MASTER%��
IF TARGET > 0 && !CFLAG:TARGET:���� && CFLAG:�s�� != 5
	IF ABL:MASTER:���{ > ABL:TARGET:���{
		PRINTFORM %CALLNAME:TARGET%�Ɏ��X�����Ȃ���
	ELSE
		PRINTFORM %CALLNAME:TARGET%�ɋ����Ă��炢�Ȃ���
	ENDIF
ELSEIF TARGET > 0
	PRINTFORM %CALLNAME:TARGET%�̖T���
ENDIF
PRINTL �׋�������
SIF ABL:MASTER:���{ > 2 && TARGET > 0 && !CFLAG:TARGET:���� && CFLAG:�s�� != 5
	PRINTFORML %CALLNAME:TARGET%��%CALLNAME:MASTER%�̒m���Ɋ��S���Ă���
SIF ABL:MASTER:���{ < ABL:TARGET:���{ - 2 && !CFLAG:TARGET:����&& CFLAG:�s�� != 5
	PRINTFORML %CALLNAME:TARGET%�̎w���͂ƂĂ����߂ɂȂ�
IF ITEM:214 > 0
	PRINTFORML %CALLNAME:MASTER%�h�����Еt����
	ITEM:214 --
ENDIF
;-------------------------------------------------
;413,����
;-------------------------------------------------
@MESSAGE_COM413
IF TFLAG:194 >= 100
	LOCALS = %ITEMNAME:(TFLAG:194 - 100)%
	PRINTFORM %CALLNAME:MASTER%��
	SELECTCASE DAY:2
		CASE 1
			PRINTFORML %LOCALS%�ɉ��R�V���E�ŉ������Ă��甖�߂Ɉ߂����ăJ���b�Ɨg����
		CASE 2
			PRINTFORML �Y��ɂ��낵��%LOCALS%�������Ɠ��~���ė�₵����ɐ���A�~����Y����
		CASE 3
			PRINTFORML %LOCALS%���h�g�ɂ��Ă���y���t��A����ɂ��ē����̃^����h����
		CASE 4
			PRINTFORML ���z�x�[�X�̃V���v���ȏo�`�Ŗ�؂Ƌ���%LOCALS%���ύ���
	ENDSELECT
ENDIF
;-------------------------------------------------
;414,�H�������
;-------------------------------------------------
@MESSAGE_COM414
#DIM DYNAMIC EAT_ALONE
PRINTFORML %CALLNAME:PLAYER%�́�%EX_DISHNAME()%����H�ׂ邱�Ƃɂ���
IF TARGET > 0 && !CFLAG:TARGET:����
	PRINTFORML %CALLNAME:PLAYER%��%CALLNAME:TARGET%\@ GET_TARGETNUM() > 1 ? �B # \@��H���ɗU����
;ELSEIF TARGET > 0 && CFLAG:TARGET:����
;	PRINTFORML %CALLNAME:PLAYER%��%CALLNAME:TARGET%�ɐH������点��
ELSE
	PRINTFORML %CALLNAME:PLAYER%�͂ЂƂ�ŖفX�ƐH����������c
	EAT_ALONE = 1
ENDIF

CALL MESSAGE_EAT_DISH(PLAYER, EAT_ALONE)
IF !DISH_RADICAL()
	IF TARGET > 0
		SIF CFLAG:TARGET:���o�n�D & TCVAR:MASTER:308
			PRINTFORML %CALLNAME:TARGET%�͂��̖��t�����C�ɓ������悤��
		IF TFLAG:193 == 1
			PRINTFORML %CALLNAME:TARGET%��%CALLNAME:PLAYER%�́�%EX_DISHNAME()%����H�ׂȂ���y�����ЂƂƂ����߂������c
		ELSEIF TFLAG:193 == -1
			PRINTFORML �c�ǂ����%CALLNAME:TARGET%�̌��ɍ���Ȃ������悤��
		ENDIF
		RETURN
	ENDIF
ELSE
	IF TARGET > 0
		CALL MESSAGE_REACTION_TASTE
		RETURN
	ENDIF
	SELECTCASE DISH_RADICAL()
	CASE DISH_RADICAL_���h
		PRINTFORML ���藈�鋭��Ȑh����%CALLNAME:PLAYER%�͂��΂炭��₵���c
	CASE DISH_RADICAL_����
		PRINTFORML ���܂�̊Â���%CALLNAME:PLAYER%�͔����i�܂Ȃ��c
	CASE DISH_RADICAL_�킳��
		PRINTFORML %CALLNAME:PLAYER%�͕@��˂�������킳�т̍�������\����
	CASE DISH_RADICAL_������
		PRINTFORML �����ɍL����_���ς���%CALLNAME:PLAYER%�͌��𚁂񂾁c
	ENDSELECT
ENDIF

;-------------------------------------------------
;415,�H�����ӂ�܂�
;-------------------------------------------------
@MESSAGE_COM415
#DIM DYNAMIC EAT_ALONE
SIF GET_TARGETNUM() <= 1
	EAT_ALONE = 1
PRINTFORML %CALLNAME:PLAYER%��%CALLNAME:TARGET%\@ EAT_ALONE == 0 ? �B # \@�Ɂ�%EX_DISHNAME()%����U�镑����
IF TFLAG:193 == -2
	PRINTFORML %CALLNAME:TARGET%�͂Ȃɂ����������ȕ\��ŁA��%EX_DISHNAME()%����˂��Ԃ��Ă���
	RETURN
ENDIF

CALL MESSAGE_EAT_DISH(TARGET, EAT_ALONE)
IF !DISH_RADICAL()
	SIF CFLAG:TARGET:���o�n�D & TCVAR:MASTER:308
		PRINTFORML %CALLNAME:TARGET%�͂��̖��t�����C�ɓ������悤��
	IF TFLAG:193 == 1
		PRINTFORML %CALLNAME:TARGET%�́�%EX_DISHNAME()%���𕽂炰�Ė����������c
	ELSEIF TFLAG:193 == -1
		PRINTFORML �c�ǂ����%CALLNAME:TARGET%�̌��ɍ���Ȃ������悤��
	ENDIF
ELSE
	CALL MESSAGE_REACTION_TASTE
ENDIF

;-------------------------------------------------
;414/415,���ʁA�e�������Ƃ̒n�̕�
;-------------------------------------------------
@MESSAGE_EAT_DISH(CHARA, EAT_ALONE)
#DIM CHARA    ;��̂ƂȂ�L����
#DIM EAT_ALONE;�H�ׂ�̂���l�Ȃ�1
SELECTCASE TFLAG:194
CASE 1
	PRINTL ����́c�@�m�[�p������Ԃ���Ԃ��I
CASE 2
	PRINTL ����͐������������I
CASEELSE
	SELECTCASE DISHNAME
	CASE "�M���M�[����"
		PRINTW �u���ꉽ�̗����H�v
		PRINTW �u�M���M�[�����v
		PRINTW �u�ޗ��́H�v
		PRINTW �u�M���M�[�v
	CASE "���b�c�@�����`�[�Y�ƃg�}�g�̃T���_"
		PRINTL �E���܂����`�����I�@ �c�c�����A����́`���I ���̖��킠���`���I �T�b�p���Ƃ����`�[�Y�Ƀg�}�g�̃W���[�V�[����������݂����܂����I
		PRINTL �`�[�Y���g�}�g���I �g�}�g���`�[�Y���������Ă�b�I �g�n�[���j�[�h���[��ł������`�g���̒��a�h���[��ł����`���I
		PRINTL �Ⴆ��Ȃ�T�C�����ƃK�[�t�@���N���̃f���G�b�g�I�@�E�b�`�����ɑ΂���i���`�����I�@���X���Y�̌���ɑ΂��邿�΂Ă�́g�������̃W���[�h�I
	CASE "�h�[�s���O�R���\���X�[�v"
		PRINTL ��������Ȃ��H�ށE�򕨂𐸖��ȃo�����X�Ŕz��������Ȗ��t�����{���Ďύ��ގ��������ӁI�I
		PRINTL ���t��A����͌����Č��o���ꂸ�A�Ȃ������ׂĂ̖򕨂̌��ʂ����{�c
		PRINTL ���ǂ��璍����i���ׂ�j���ł���ɐ��{���I�I
	CASE "�c�q"
		IF NAME_MOON(DAY:3) == "�\�ܖ� -���H�̖���- "
			PRINTFORML %CALLNAME:CHARA%\@ EAT_ALONE == 0 ? �B # \@��
			IF MOON_WATCH(DAY:3) < 1
				PRINTFORML ���������ʂ��Ƃ�ɂ��݂Ȃ���
			ELSE
				PRINTFORML �����Ȗ����𒭂߂Ȃ���
			ENDIF
			PRINTFORML �����c�q���܂�
		ENDIF
	CASE "�X�V", "�������", "�h�g"
		PRINTFORML %CALLNAME:CHARA%\@ EAT_ALONE == 0 ? �B # \@�͋��̖��킢�����������V���v���Ȃ��牜�[�������ɐ�ۂ�������
	CASE "�X�^�[�Q�C�W�[�p�C"
		PRINTFORML %CALLNAME:CHARA%\@ EAT_ALONE == 0 ? �B # \@�͓V���ɂދ��̌Q��ɋC������Ȃ�����A�ʊ��ɒ��݂�������

	CASE "���܂�"
		SIF DISHSPOIL < 1 && DAY:2 == 4
			PRINTFORML %CALLNAME:CHARA%\@ EAT_ALONE == 0 ? �B # \@�͓��C��������z�J�z�J��%DISHNAME%�ɂ��Ԃ�����I
	CASE "�T���h�C�b�`", "���ɂ���", "�X�R�[��"
		PRINTFORML %CALLNAME:CHARA%\@ EAT_ALONE == 0 ? �B # \@��%DISHNAME%���܂݂Ȃ���ꑧ����

	CASE "����������"
		PRINTFORML %CALLNAME:CHARA%\@ EAT_ALONE == 0 ? �B # \@�͉؂₩�Ȃ����������̏d�������Ȃ���V�N�̓������j����
	CASE "�N�z������"
		PRINTFORML %CALLNAME:CHARA%\@ EAT_ALONE == 0 ? �B # \@�͋�����������Ȃ���
		IF RAND:10 < 5
			PRINTFORML ������V�N�Ɏv����y����
		ELSE
			PRINTFORML �߂��䂭���N��U��Ԃ���
		ENDIF
	CASE "�b����"
		PRINTFORML ������ɂ̓��\���\�Ƒ�������ꖂ鉹�����������Ă���
	;��ؔ���
	CASE "���₵�u��"
		PRINTL ����u�߂�������͂������₵�����ɂȂ��Ă���c�c
	CASE "���Ђ����Ȃ�"
		PRINTL �|�Ɗ��߂����Ŋ̐S�̐؂��Ȃ��c�c
	CASE "�吷���"
		PRINTL �Е����Ȃ��I ���ꂪ�Ȃ��ƐH���i�܂Ȃ��I
	CASE "���b�c�@�����`�[�Y�����̃T���_"
		IF CHARA == [[�i�Y�[����]] || (CHARA == MASTER && FLAG:�Ȃ肫�� == [[�i�Y�[����]])
			;�Ȃ�ĎG�Ȑ�p����I�n�[���j�[���ĂȂ񂾂�
			PRINTL �E���܂����`�����I�@ �c�c�����A����́`���I ���̖��킠���`���I �T�b�p���Ƃ����`�[�Y�Ƀ`�[�Y�̃W���[�V�[����������݂����܂����I
			PRINTL �`�[�Y���`�[�Y���I �`�[�Y���`�[�Y���������Ă�b�I �g�n�[���j�[�h���[��ł������`�g���̒��a�h���[��ł����`���I
			PRINTL �Ⴆ��Ȃ�T�C�����ƃK�[�t�@���N���̃f���G�b�g�I�@�E�b�`�����ɑ΂���i���`�����I�@���X���Y�̌���ɑ΂��邿�΂Ă�́g�������̃W���[�h�I
		ELSE
			PRINTL �E���܂����`�����I�@ �c�c�����A����́`���I
			PRINTL �c�c�Ǝv�������A�Ȃ񂾂��悭�킩��˂����ǂ�H�A��������܂肵�˃F���H ���̃`�[�Y�`
		ENDIF
	CASEELSE
		SIF STRFIND(DISHTASTE, "��ؔ���/") >= 0
			PRINTL ��؂������Ă��Ȃ��c�c
	ENDSELECT
ENDSELECT

;-------------------------------------------------
;416,���t����
;-------------------------------------------------
@MESSAGE_COM416
#DIM DYNAMIC �y��e��
#DIM DYNAMIC �̉S��
#DIMS DYNAMIC �y��M��
#DIMS DYNAMIC �̕M��
VARSET LOCAL
LOCAL = -1
WHILE 1
	LOCAL = FINDCHARA(TALENT:���y�m��, 1, LOCAL + 1)
	SIF LOCAL < 0
		BREAK
	SIF !LOCAL
		CONTINUE
	IF CFLAG:MASTER:���݈ʒu == CFLAG:LOCAL:���݈ʒu
		IF !ACCOMPANY_ABLE(LOCAL) || TARGET == LOCAL
			CONTINUE
		ELSE
			IF !�y��e��
				�y��M�� = %CALLNAME:LOCAL%
			ELSEIF !RAND:�y��e��
				�y��M�� = %CALLNAME:LOCAL%
			ENDIF
			�y��e�� ++
		ENDIF
	ENDIF
WEND
LOCAL:1 = -1
WHILE 1
	LOCAL:1 = FINDCHARA(TALENT:���y�m��, 2, LOCAL:1 + 1)
	SIF LOCAL:1 <0
		BREAK
	SIF !LOCAL:1
		CONTINUE
	IF CFLAG:MASTER:���݈ʒu == CFLAG:(LOCAL:1):���݈ʒu
		IF !ACCOMPANY_ABLE(LOCAL:1) || TARGET == LOCAL:1
			CONTINUE
		ELSE
			IF !�̉S��
				�̕M�� = %CALLNAME:(LOCAL:1)%
			ELSEIF !RAND:�̉S��
				�̕M�� = %CALLNAME:(LOCAL:1)%
			ENDIF
			�̉S�� ++
		ENDIF
	ENDIF
WEND
SIF �y��e�� > 1
	�y��M�� += "�B"
SIF �̉S�� > 1
	�̕M�� += "�B"
IF TFLAG:�g�p�y�� != 0
	PRINTFORM %CALLNAME:MASTER%��
	;�y�펝���L�����A�v�����o�O�o���Ƌ�\��o���Ɨ��ۂ�TARGET�Ŕޏ���̉��y�Z�\�������Ă���
	IF TARGET > 0 && (ABL:MASTER:���y�Z�\ >= ABL:TARGET:���y�Z�\) && TALENT:TARGET:���y�m�� == 1 && ACCOMPANY_ABLE(TARGET)
		PRINTFORM %CALLNAME:TARGET%�ƕ����
	;�̏��L�����A�~�X�e�B�A�Ƌ��q�A�G������TARGET�Ŕޏ���̉��y�Z�\�������Ă���
	ELSEIF TARGET > 0 && (ABL:MASTER:���y�Z�\ >= ABL:TARGET:���y�Z�\) && TALENT:TARGET:���y�m�� == 2 && ACCOMPANY_ABLE(TARGET)
		PRINTFORM %CALLNAME:TARGET%�̉̂ɍ��킹��
	;���Ȃ��̉��y�Z�\��TARGET���Ⴂ��TARGET�����y�m���������Ă���
	ELSEIF TARGET > 0 && (ABL:MASTER:���y�Z�\ <= ABL:TARGET:���y�Z�\ || TALENT:TARGET:���y�m��)
		PRINTFORM %CALLNAME:TARGET%�ɏ��������Ă��炢�Ȃ���
	ELSEIF �y��e�� && �̉S��
		PRINTFORM %�y��M��%�ƕ��сA%�̕M��%�̉̂ɍ��킹��
		LOCAL:2 = 3
	ELSEIF �y��e��
		PRINTFORM %�y��M��%�ƕ���ŁA
		LOCAL:2 = 2
	ELSEIF �̉S��
		PRINTFORM %�̕M��%�ɍ��킹�āA
		LOCAL:2 = 1
	ENDIF
	SELECTCASE TFLAG:�g�p�y��
		CASE 1
			PRINTL �L�[�{�[�h��e���Ă݂�
		CASE 2
			PRINTL �s�A�m��e���Ă݂�
		CASE 3
			PRINTL �M�^�[��e���Ă݂�
		CASE 4
			PRINTL �g�����y�b�g�𐁂��Ă݂�
		CASE 5
			PRINTL ���@�C�I������e���Ă݂�
	ENDSELECT
	IF TFLAG:193 == 1
		IF LOCAL:2
			IF TARGET && !GROUPMATCH(TARGET,20,21,22,28,44,88,94,95,96)
				PRINTFORM %CALLNAME:TARGET%\@ IN_ROOM_NUMBER(CFLAG:MASTER:���݈ʒu) > 2 ? �B #  \@�́A%CALLNAME:MASTER%��
				IF LOCAL:2 == 3
					PRINTFORM %�y��M��%��%�̕M��%�̑������C�u
				ELSEIF LOCAL:2 == 2
					PRINTFORM %�y��M��%�̃A���T���u��
				ELSEIF LOCAL:2 == 1
					PRINTFORM %�̕M��%�̋���
				ENDIF
				PRINTFORML �ɂ����Ƃ�ƕ�������Ă���
			ELSE
				PRINTFORML %CALLNAME:TARGET%�́A%CALLNAME:MASTER%�Ƃ̃Z�b�V�����Ƀm���m���ŋ����Ă���
			ENDIF
		ELSE
			IF TARGET
				IF !GROUPMATCH(TARGET,20,21,22,28,44,88,94,95,96)
					PRINTFORML %CALLNAME:TARGET%\@ IN_ROOM_NUMBER(CFLAG:MASTER:���݈ʒu) > 2 ? �B #  \@�͂����Ƃ肵���\��ŕ�������Ă���
				ELSE
					PRINTFORML %CALLNAME:TARGET%�́A%CALLNAME:MASTER%�Ƃ̃Z�b�V�����Ƀm���m���ŋ����Ă���
				ENDIF
			ELSEIF (WITH_MOB() || DATE_HITOGOMI()) && !GROUPMATCH(TIME:2,1,6,7)
				PRINTFORML \@ (MAIN_MAP !=9 && CFLAG:MASTER:���݈ʒu == 960) || (IN_HOME(CFLAG:MASTER:���݈ʒu) && !CHK_FOCUS(927,CFLAG:MASTER:���݈ʒu,948) && (ROOMDATA:(CFLAG:MASTER:���݈ʒu % 100) & �ꏊ_���u)) ? %ANIMALNAME()% # %DATE_HITOGOMI_SYUBETU()% \@��%CALLNAME:MASTER%�̑��ɗ��ĕ�������Ă���
			ELSE
				PRINTFORML �N�������Ȃ���S�̉��t������Ă���
			ENDIF
		ENDIF
	ELSEIF TFLAG:193 == -1
		IF LOCAL:2
			IF TARGET && !GROUPMATCH(TARGET,20,21,22,28,44,88,94,95,96)
				PRINTFORM %CALLNAME:TARGET%�́A%CALLNAME:MASTER%��
				IF LOCAL:2 == 3
					PRINTFORM %�y��M��%��%�̕M��%��
				ELSEIF LOCAL:2 == 2
					PRINTFORM %�y��M��%��
				ELSEIF LOCAL:2 == 1
					PRINTFORM %�̕M��%��
				ENDIF
				PRINTFORML ���Ă�s���a���Ɋ���E�߂Ă���
			ELSE
				PRINTFORML %CALLNAME:TARGET%�́A%CALLNAME:MASTER%�Ƃ̃Z�b�V������؂�グ�čQ�Ăė��ꂽ
			ENDIF
		ELSE
			IF TARGET
				PRINTFORML %CALLNAME:TARGET%�͗���Ŏ����ǂ��ł���
			ELSEIF WITH_MOB() || DATE_HITOGOMI()
				PRINTFORML \@ (MAIN_MAP !=9 && CFLAG:MASTER:���݈ʒu == 960) || (IN_HOME(CFLAG:MASTER:���݈ʒu) && !CHK_FOCUS(927,CFLAG:MASTER:���݈ʒu,948) && (ROOMDATA:(CFLAG:MASTER:���݈ʒu % 100) & �ꏊ_���u)) ? %ANIMALNAME()% # %DATE_HITOGOMI_SYUBETU()% \@�́A�Q�Ă�%CALLNAME:MASTER%�̑����痣�ꂽ
			ELSE
				PRINTFORML �q�h�����t�����͂̒��a�����������Ă���
			ENDIF
		ENDIF
	ELSE
		IF LOCAL:2
			IF TARGET && !GROUPMATCH(TARGET,20,21,22,28,44,88,94,95,96)
				PRINTFORM %CALLNAME:TARGET%\@ IN_ROOM_NUMBER(CFLAG:MASTER:���݈ʒu) > 2 ? �B #  \@�́A%CALLNAME:MASTER%��
				IF LOCAL:2 == 3
					PRINTFORM %�y��M��%��%�̕M��%�̑����Z�b�V����
				ELSEIF LOCAL:2 == 2
					PRINTFORM %�y��M��%�̃A���T���u��
				ELSEIF LOCAL:2 == 1
					PRINTFORM %�̕M��%�̋���
				ENDIF
				PRINTFORML �����S���Ȃ��璭�߂Ă���
			ELSE
				PRINTFORML %CALLNAME:TARGET%�́A%CALLNAME:MASTER%�Ƃ̃Z�b�V�����Ɋy�������ɗ��ł���
			ENDIF
		ELSE
			IF TARGET
				IF !GROUPMATCH(TARGET,20,21,22,28,44,88,94,95,96)
					PRINTFORML %CALLNAME:TARGET%\@ IN_ROOM_NUMBER(CFLAG:MASTER:���݈ʒu) > 2 ? �B #  \@�͊��S�����l�q�ŕ����Ă���
				ELSE
					PRINTFORML %CALLNAME:TARGET%�́A%CALLNAME:MASTER%�Ƃ̃Z�b�V�����Ɋy�������ɗ��ł���
				ENDIF
			ELSEIF WITH_MOB() || DATE_HITOGOMI()
				PRINTFORML \@ (MAIN_MAP !=9 && CFLAG:MASTER:���݈ʒu == 960) || (IN_HOME(CFLAG:MASTER:���݈ʒu) && !CHK_FOCUS(927,CFLAG:MASTER:���݈ʒu,948) && (ROOMDATA:(CFLAG:MASTER:���݈ʒu % 100) & �ꏊ_���u)) ? %ANIMALNAME()% # %DATE_HITOGOMI_SYUBETU()% \@�́A%CALLNAME:MASTER%�̑��Ɋ���Ă���
			ELSE
				PRINTFORML �N�������Ȃ����t������Ă���
			ENDIF
		ENDIF
	ENDIF
ENDIF

;�y�����菈��
PRINTL
LOCAL = -1
SIF TFLAG:193 == 1
	LOCAL = �y������_���t�听��(TARGET)
SIF (LOCAL == -1) && TARGET && (TFLAG:193 != -1) && (RAND:(100) < 30)
	RESULT = �y������_�����_��()

;-------------------------------------------------
;417,���Q����
;-------------------------------------------------
@MESSAGE_COM417
TFLAG:193 = RAND:6
IF TFLAG:194 == 2
	SELECTCASE TFLAG:193
		CASE 0,2,4
			PRINTFORML %CALLNAME:PLAYER%���N���オ��Ƒ̂���ѕz�����藎����
			PRINTFORML �N���������Ă��ꂽ�炵��
			PRINTFORML �S�����Ɋ��ӂ���%CALLNAME:PLAYER%�͍s�����J�n����
		CASEELSE
			PRINTL �o������ƍd����̊��G���`����Ă���
	ENDSELECT
ELSEIF TFLAG:194 == 1
	IF CFLAG:TARGET:�Y���Q��
		PRINTFORML %CALLNAME:TARGET%��%CALLNAME:PLAYER%�ׂ̗ň��炩�ȐQ���𗧂ĂĂ���c
	ELSE
		SELECTCASE TFLAG:193
			CASE 0
				PRINTFORML �Ȃ񂾂��̂��d�����c�c
				PRINTFORML �g�������Ƃ�Ȃ����Ƃɋ^��������ڂ��J�����
				PRINTFORM %CALLNAME:TARGET%��%CALLNAME:PLAYER%��������߂Ȃ���Q�Ă����@
				IF TARGET == 57 && !TALENT:����
					PRINTFORML ���ƂЂ���Ƃ��̖ʂ��h��Ă���
				ELSE
					PRINTFORML ���̕\��͉��₩��
				ENDIF
				PRINTFORML ���̂܂܂ł͐g�������ł��Ȃ��̂ŋ�΂����Ȃ���%CALLNAME:TARGET%��h�蓮������
			CASE 1
				PRINTFORML �ڂ��o�܂���%CALLNAME:PLAYER%�͑������ɏd�݂�������
				PRINTFORML %CALLNAME:TARGET%��%CALLNAME:PLAYER%�̑̂𖍑���ɖ����Ă���
				PRINTFORML %CALLNAME:PLAYER%�����̉�����̂�����������
				PRINTFORML ���̎g����͕s���̐���R�炵�Ėڂ��o�܂���
			CASE 2
				PRINTFORML �ڂ��o�܂��Ɨׂ�%CALLNAME:TARGET%�������Ă���
				PRINTFORM ���̂�������������
				IF TARGET == 57 && !TALENT:����
					PRINTFORML ���̖ʂŊ���B����
				ELSE
					PRINTFORML ���Ԃ�߂Ă���
				ENDIF
				PRINTFORML %CALLNAME:PLAYER%�����A�����%CALLNAME:TARGET%�͂������Ȃ��Ԏ�����
			CASE 3
				PRINTFORML %CALLNAME:PLAYER%���ڂ��o�܂��Ɩڂ̑O�ɂ�%CALLNAME:TARGET%�̊炪����
				PRINTFORML ���`�����܂�Ă����̂��ƋC�Â��̂�%CALLNAME:TARGET%����т̂��͓���������
				PRINTFORM %CALLNAME:TARGET%�͉������Ȃ������悤�ɐU�������Ƃ��Ă�����
				IF TARGET == 57 && !TALENT:����
					PRINTFORML ���Ǝ��q���̖ʂ��������Ă���
				ELSE
					PRINTFORML �����^���Ԃ�
				ENDIF
				PRINTFORML %CALLNAME:PLAYER%�͎v�킸�ɂ₯�Ă��܂���
			CASE 4
				PRINTFORML �ڂ��o�܂���%CALLNAME:PLAYER%��%CALLNAME:TARGET%�ɕG������Ă��邱�ƂɋC������
				PRINTFORML �ڊo�߂�%CALLNAME:PLAYER%�ɋC�Â���%CALLNAME:TARGET%�͔��΂� %CALLNAME:PLAYER%�̓��𕏂ł�
				PRINTFORML ���΂炭�̊ԁA���t�����킳�����̂܂܉߂�����
			CASE 5
				PRINTFORML %CALLNAME:PLAYER%�͌ҊԂ������Ɲ��܂�銴�G�ɖڂ��J����
				PRINTFORML �ڂ̑O�ɂ�%CALLNAME:TARGET%�̊炪����
				PRINTFORML %CALLNAME:PLAYER%���W�g�ڂ��ɂ�ł�%CALLNAME:TARGET%�͂�����ʊ�Ŕ��΂ȃ}�b�T�[�W�𑱂���
		ENDSELECT
	ENDIF
ENDIF
;-------------------------------------------------
;420,��`���ƂƘb��
;-------------------------------------------------
@MESSAGE_COM420
PRINTFORML ��`���Ɓu�ȏ�̂悤�ɂȂ��Ă���܂��B\@ TFLAG:195 != 0 && TFLAG:195 != 14 ? ����ł́A�����Ă�����Ⴂ�܂� # ���Ɏ���Ȃǂ͂������܂����H\@�v
;-------------------------------------------------
;421,��|��
;-------------------------------------------------
@MESSAGE_COM421
SIF FLAG:��|�����e == 0
RETURN 0
IF !TFLAG:193
	PRINTFORML %CALLNAME:PLAYER%�͂��ΑK�����Ă��ς�l�Ɋ肢��������
	SIF FLAG:��|�����e <= 10 || FLAG:��|�����e == 57 || FLAG:��|�����e == 71 || FLAG:��|�����e == FLAG:�Z�ݍ��݃L����
		PRINTFORML %CALLNAME:(FLAG:��|�����e)%�Ƃ̒����[�܂����C�������c
	SIF FLAG:��|�����e >= 11 && FLAG:��|�����e <= CHARANUM && FLAG:��|�����e != 57 && FLAG:��|�����e != 71 && FLAG:��|�����e != FLAG:�Z�ݍ��݃L����
		PRINTFORML �Ȃ񂾂�������%CALLNAME:(FLAG:��|�����e)%�ɉ�����ȋC������c
	SIF FLAG:��|�����e == 200
		PRINTL �Ȃ񂾂��}�Ƀ����������Ă����c
	SIF FLAG:��|�����e == 201
		PRINTL �S���₩�ɂȂ�A�ϔY����܂����̂�������
	SIF FLAG:��|�����e == 202
		PRINTL ���Ȃ�A�p���c����������ɓ���C������c�I
	SIF FLAG:��|�����e == 203
		CALL PINK_WIND
ELSEIF TFLAG:193 == 200
	PRINTFORML %CALLNAME:53%�ɐ_�����������I
ELSE
	SELECTCASE TFLAG:193
		CASE 23
			LOCALS = ���ɍD��I
		CASE 31
			LOCALS = ����I
		CASE 41
			LOCALS = �G��₷����
		CASE 70
			LOCALS = �����ɑf��
		CASE 80
			LOCALS = �|���I
		CASE 82
			LOCALS = ���s�I
		CASE 83
			LOCALS = ��s�I
		CASE 101
			LOCALS = "�b���x"
		CASE 102
			LOCALS = "�u���x"
		CASE 103
			LOCALS = "�`���x"
		CASE 104
			LOCALS = "�a���x"
		CASE 106
			LOCALS = "�l���x"
	ENDSELECT
	PRINTFORML %CALLNAME:TARGET%�͂Ȃ񂾂��\���\�����Ă���c
	IF TFLAG:193 > 100
		PRINTFORML �ꎞ�I��%CALLNAME:TARGET%��%LOCALS%���オ��܂����B
	ELSE
		PRINTFORML �ꎞ�I��%CALLNAME:TARGET%��%LOCALS%�ɂȂ����B
	ENDIF
ENDIF
;-------------------------------------------------
;431,�����C�ł��낮
;-------------------------------------------------
@MESSAGE_COM431
;�ԑ��{�点�Ă��܂����ꍇ
IF (TFLAG:209 == 4 && CFLAG:MASTER:���݈ʒu == 250) || (TFLAG:211 == 4 && CFLAG:MASTER:���݈ʒu == 940)
		PRINTFORML �ԑ�̕�����s�����������ł��Ă���c�c
		PRINTFORML �܂��������߂ė����ق����ǂ��������c�c
;���ɓ������Ă���
ELSEIF TFLAG:194 == 1
	IF (CFLAG:MASTER:���݈ʒu == ��O���� && TFLAG:209 == 0) || (CFLAG:MASTER:���݈ʒu == 940 && TFLAG:211 == 0)
		PRINTFORML ���ɂ����C�ɂ͓����Ă���̂ł��΂炭��߂Ƃ���
	ELSEIF TFLAG:209 == 1 && MAIN_MAP != 2 && CFLAG:MASTER:���݈ʒu == ��O����
		PRINTFORML �u�ǂ�������܂����Ȃ�A���ꂶ��v
	ELSEIF TFLAG:211 == 1 && MAIN_MAP != 9 && CFLAG:MASTER:���݈ʒu == 940
		PRINTFORML �u���񂵂�񂪂܂����Ă����̑҂��Ƃ邾����[�I�v
	ELSE
		PRINTFORML �������������΂��肾
	ENDIF
ELSE
	IF CFLAG:MASTER:���݈ʒu == ��O���� || CFLAG:MASTER:���݈ʒu == 940
		PRINTFORML %CALLNAME:PLAYER%�̓��t���b�V������
;	ELSEIF CFLAG:MASTER:���݈ʒu == 13 || CFLAG:MASTER:���݈ʒu == 24 || CFLAG:MASTER:���݈ʒu == 30 || CFLAG:MASTER:���݈ʒu == 39
	ELSEIF BATHCHECK(CFLAG:MASTER:���݈ʒu)
		PRINTFORML %CALLNAME:PLAYER%�͗���ł��낢��
	ELSE
		PRINTFORML %CALLNAME:PLAYER%�͊ȈՃv�[���ł��낢��
		SIF GETBIT (FLAG:�v�[��, 2)
			PRINTL �g�̂������
		TFLAG:400 = RAND:2
		IF TFLAG:400 && DATE_HITOGOMI()
			PRINTFORML ���͂ɂ���%DATE_HITOGOMI_SYUBETU()%���A����ȏꏊ�Ŏ����^��ł����ȈՃv�[����
			PRINTFORML �Z�����đ̂�􂢂�����%CALLNAME:MASTER%���ٗl�Ȃ��̂�����ڂŌ��Ă���c�c
		ENDIF
	ENDIF

ENDIF
;-------------------------------------------------
;436,�Ǐ�
;-------------------------------------------------
@MESSAGE_COM436
IF TARGET == 54 && TFLAG:194 == 1
	IF TFLAG:193 > 5
		IF  CFLAG:TARGET:2 < 500
			PRINTFORML �K���p�`�����[��%CALLNAME:MASTER%�̕��Ȃǌ����������Ă��Ȃ�
		ELSEIF !TALENT:TARGET:����
				PRINTFORML ��u�A�y�̂̊፷����������
		ENDIF
	ELSEIF CFLAG:TARGET:2 > 500
		PRINTFORML �Ǐ����A�ӂƎ����������Ċ���グ��ƃp�`�����[������������Ă���
		IF CFLAG:TARGET:2 < 1000
			PRINTFORML ���A�����ɖڂ���炳�ꂽ
		ELSE
			PRINTFORML �p�`�����[��%CALLNAME:MASTER%�ɔ��΂݂����Ă���
		ENDIF
	ENDIF
ENDIF
SELECTCASE TFLAG:193
	CASE 1
		PRINTFORML %CALLNAME:MASTER%�͐_��I�ȃJ���e�̋ɈӂɐG�ꂽ
	CASE 2
		PRINTFORML �����ʔ����̂�������Ȃ��c
	CASE 3
		PRINTFORML ���҂��ĂȂ��������z���ȏ�ɖʔ�������
	CASE 4
		PRINTFORML ���ɖڂڂ����m���͓����Ȃ�����
	CASE 5
		PRINTFORML ���߂ɂȂ�m���𓾂邱�Ƃ��o����
	CASE 6
		PRINTFORML %CALLNAME:MASTER%�͐�l�����̉b�q�ɐ[���h�ӂ������
	CASE 7
		PRINTFORML %CALLNAME:MASTER%���̂Ɋւ��闝����[�߂�
	CASE 8
		PRINTL �~�]���N���オ���Ă���
ENDSELECT

;-------------------------------------------------
;440,�҂�
;-------------------------------------------------
@MESSAGE_COM440
PRINTFORM %CALLNAME:MASTER%
IF ((!IN_HOME(CFLAG:MASTER:���݈ʒu) && !NOSAMES(CFLAG:MASTER:���݈ʒu, 10, ���n���ʂ�, �L��, ���̌�, �|�ѓ����, �X�̓����, ���L�̓�, �[�̎��C, ��V�̑�, ���z����)) || (IN_HOME(CFLAG:MASTER:���݈ʒu) && CHK_ENTRANCE(CFLAG:MASTER:���݈ʒu, MAIN_MAP))) && !RAND:3
	PRINT ��
	;�ꏊ����A�ꏊ�ʂɕ����p�^�[����
	SELECTCASE CFLAG:MASTER:���݈ʒu
		CASE �Q��,10
			PRINTDATAL
				DATAFORM �Q���̌������𒭂߂Ȃ��玞�Ԃ�ׂ����c
				DATAFORM �Q���̐Βi�ɍ������낵�A����s�����Ԃ��߂������c
				DATAFORM �_�Ђ��畷�����錖���𕷂��Ȃ��玞�������̂������Ă����c
				DATAFORM ���Q�������؂��������������������̂��l������ł����c
				DATAFORM ���x�����Ă������Ⴄ�ΊK�i�̒i���𐔂��Ă����c
			ENDDATA
		CASE ���n���ʂ�,101
			PRINTDATAL
				DATAFORM �������̒n���ɂ��Q�肵�Ď��Ԃ�ׂ����c
				DATAFORM �n���̎���ɋ�����ꂽ�����̕��Ԃ𒭂߂Ă��邤���Ɏ��Ԃ��߂��Ă������c
				DATAFORM �n���ɎQ��ɗ����V�k�Ƒ������Ȃ����Ԙb�����ĉ߂������c
				DATAFORM ���@���̕��𒭂߂Ȃ��玞�Ԃ������̂��y���񂾁c
				DATAFORM �����̒ʂ��ʂ�߂����̂��N���v���Ԃ����߂ɍl�����񂾁c
			ENDDATA
		CASE �L��,201
			PRINTDATAL
				DATAFORM �L�ꂩ�畷�����錖���𕷂��Ȃ��玞�Ԃ��߂������c
				DATAFORM �ʂ���s�������l�X�����ڂɎ��Ԃ�ׂ����c
				DATAFORM �l���݂̒��Ȃ̂Ɉ�l�ł���ǓƂ������Ă����c
				DATAFORM �L��ɒN������̂����҂��Ȃ���Â��Ɉ�l�҂��Ă����c
				DATAFORM ���������������Ă����̂��N�����������v���Ԃ����A��X�Ƃ������Ԃ����ꂽ�c
			ENDDATA
		CASE ���̌�,301
			PRINTDATAL
				DATAFORM ��̌������Ɍ��g���ق𒭂߂Ȃ��玞�Ԃ�ׂ����c
				DATAFORM �Ζʂ𒭂߂Ȃ���Â��ȂЂƂƂ����߂������c
				DATAFORM ���т���d���̎R�𒭂߂Ă��邤���Ɏ��Ԃ��o���Ă����c
				DATAFORM ���ʂɐl�e�炵�����̂�F�߂����A�������Ȃ��̂ŋC�ɂ��Ȃ����Ƃɂ����c
				DATAFORM ���̌��������狿���L���ɂȂ����𕷂����悤�ȋC���������C�̏��ׂ������c
			ENDDATA
		CASE �|�ѓ����,447
			PRINTDATAL
				DATAFORM �����̂����@��Ȃ��玞�Ԃ�ׂ����c\@DAY:2 == 1 ? # ��A�����̂��H \@
				DATAFORM ���������Ɩ΂�|�̖炷�t���𕷂��Ȃ��炵�΂��̎����߂������c
				DATAFORM �����畷�����邤���������̌������y���񂾁c
				DATAFORM �|�т̒���Y�������ώ@���Ă��΂��̎����߂������c
				DATAFORM ���̂��������Đ����邽���̂��₽���̂�����L�т邫�̂����ώ@���邱�Ƃɂ����B����ȂƂ���ɂ܂Ő�΂��c
			ENDDATA
		CASE �X�̓����,501
			PRINTDATAL
				DATAFORM �������̒������ڂɒ��߂Ȃ��玞�Ԃ�ׂ����c
				DATAFORM �X�̂Ȃ��ɂ��т����������グ�Ȃ���������Ǝ��Ԃ������̂������Ă����c
				DATAFORM ���ԂԂ��ɗd�C���ӂ��X�̗l�q���ώ@�����邱�Ƃɂ����c
				DATAFORM ���[�ɐ��������������̂����H�ׂ���̂��Y�݁A�C�Â��Ύ�������Ă��܂����c
				DATAFORM ���̂��������Đ����邽���̂��₽���̂�����L�т邫�̂����ώ@���邱�Ƃɂ����B����ȂƂ���ɂ܂Ő�΂��c
			ENDDATA
		CASE ���L�̓�
			PRINTDATAL
				DATAFORM ��������Ɍ����ʘO�𒭂߂Ď��Ԃ�ׂ����Ƃɂ����c
				DATAFORM �O�r�̐�̓n���M�����Ȃ���������Ƃ��������߂������c
				DATAFORM ��̗���������Ȃ���A���΂炭���Ԃ�ׂ����c
				DATAFORM ���n��H��̐��𐔂��Ă��邤���ɁA�C�Â��Ό��\�Ȏ��Ԃ��߂����悤���c
				DATAFORM �H��Ɉꏏ�ɉ͂�n��悤�U��ꂽ�����f�肵�Ă�����Ɏ��Ԃ��߂����c
			ENDDATA
		CASE �[�̎��C,701
			PRINTDATAL
				DATAFORM �؁X�̌��Ԃ��猩����R���𒭂߂Ď��Ԃ�ׂ����c
				DATAFORM �ӂ�̖؁X���ώ@���Ă��邤���Ɏ��Ԃ����ꂽ�c
				DATAFORM �Î�̒��ɋ����؁X�̂���߂��𒮂��Ȃ��玞�Ԃ�ׂ����c
				DATAFORM ���C�Ȃ��������܂��ƁA���̒r���畷�����Ă���̂��A�^�̂������c�������Ă����I�H�i�����̂��܂肵�΂���R�j
				DATAFORM ���C�̐[�݂��s�v�c�Ȃ��߂������������Ă��邪�C�ɂ��Ȃ��悤�ɂ����B
			ENDDATA
		CASE ��V�̑�
			PRINTDATAL
				DATAFORM ��̉������ɂ��Ȃ��炵�΂�������̌i�F�𒭂߂Ă����c
				DATAFORM �R���ɂ��т�����_�Ђ𒭂߂Ď��Ԃ�ׂ����c
				DATAFORM �R�̏ォ��[�̌i�F�𒭂߂Ă��邤���Ɏ��Ԃ��߂����悤���c
				DATAFORM �R����ꡂ���ɖ]�ޓV�E���i�O�L�b�j�c�񂪒ɂ��Ȃ��Ă��΂����̏�ɂ������܂��Ă����c
				DATAFORM ���Ŕ򖗂��グ�鐅�����Ă��Ȃ��炵�΂������߂������c
			ENDDATA
		CASE ���z����,948
			PRINTDATAL
				DATAFORM �L��Ȓn���̐��E�𒭂߂Ď��Ԃ�ׂ����c
				DATAFORM �߂��ōs�������S�����̗l�q���ώ@���Ă��邤���Ɏ��͗��ꂽ�c
				DATAFORM �����Ɍ�����n��a�𒭂߂Ȃ��玞�Ԃ�ׂ����c
				DATAFORM �S�ɒǂ����Ă��鉅��ɒǂ��񂳂�A�����؂������ɂ͎��Ԃ��߂��Ă��܂����c
				DATAFORM �ߓ����ɐL�т�΂��������Ă��΂������₵���B
			ENDDATA
		CASEELSE
			PRINTL �Ȃɂ�����ł��Ȃ����Ԃ��߂������c
			;PRINTL �C���t���Ǝ��Ԃ��߂��Ă����c
	ENDSELECT
ELSE
	;���򍞂݂ł�����ƒǉ��A�ꕔ������Ȃ��̂����邩������Ȃ��ł������������B
	SELECTCASE RAND:3
		CASE 0,1
			;�G�ߕ���
			IF DAY:2 == 1
				PRINT ��
				;�t
				PRINTDATAL
					DATAFORM ���ԂԂ��ɂ��傤�����ǂ������Ă݂��c
					DATAFORM ���[�ɍ炭�Ԃ𒭂߂Ă��邤���Ɏ��Ԃ�����Ă������c
					DATAFORM �̂ǂ��ȗz�C�ɂ����Ƃ��ƂƂ��Ă��܂����c
					DATAFORM ���̒n�𗣂��n�蒹�𒭂߂Ȃ��牽�C��ї������������Ă݂��c
				ENDDATA
			ELSEIF DAY:2 == 2
				;��
				PRINTDATAL
					DATAFORM �̓Z�~���Ŏ��Ԃ��₵���c
					DATAFORM �͓��A�Ŋ���@���Ȃ��牸�₩�Ȏ��Ԃ�����Ă����̂��������c
					DATAFORM �̓u�b�|�E�\�E��R�m�n�Y�N�A�z�g�g�M�X�̋������𕷂��Ȃ��玞�Ԃ�ׂ����c
					DATAFORM ���C�Â��ƁA�ˑR�ӂ肪�Â��Ȃ�y���~��̉J���~�肻�����A���߂̊ԂɉJ�͂��ō~��O�ƕς��Ȃ��V�C�ƂȂ����c
				ENDDATA
			ELSEIF DAY:2 == 3
				;�H
				PRINTDATAL
					DATAFORM �̓g���{��߂܂��Ă��邤���Ɏ��Ԃ��߂��Ă������c
					DATAFORM �͐F�Â����ޕ��̎R�𒭂߂Ď��Ԃ�ׂ����c
					DATAFORM �����ɂȂт��ė����䂭�͂�t�����Ă��邤���Ɏ��Ԃ��o���Ă����悤���c
					DATAFORM �������ꂽ��ŌF����������Ă����̂𒭂߂Ă����c
				ENDDATA
			ELSEIF DAY:2 == 4
				PRINT ��
				;�~
				PRINTDATAL
					DATAFORM �����ł������񂾎��f���Œg�߂Ȃ��玞�������̂�҂����c
					DATAFORM �����𓥂�Ŏ��Ԃ�ׂ����c
					DATAFORM �ӂ������܂���Ă��邤���ɕX�Ɋ����ē]��ł��܂����c
					DATAFORM �����̑��Ղ��Ȃ����T���Ă݂��c
				ENDDATA
			ENDIF
		CASE 2
			PRINT ��
			;���̑��̕���
			;�_�^�J�^��̉��ꂩ�̃t���O����
			IF GETBIT(TIME:5,3) || GETBIT(TIME:5,2) || GETBIT(TIME:5,1)
				PRINTL �|�G��������Ď��Ԃ�ׂ����c
			;�H����
			ELSEIF TIME:2 >= 5 && TIME:2 <= 7
				PRINTL �������܂𒭂߂Ȃ��玞�Ԃ�ׂ����c
			ELSE
				PRINTL �_�𒭂߂Ȃ��玞�Ԃ�ׂ����c
			ENDIF
		CASEELSE
			;�ی�
			PRINTL �͂Ȃɂ�����ł��Ȃ����Ԃ��߂������c
			;PRINTL �C���t���Ǝ��Ԃ��߂��Ă����c
	ENDSELECT
ENDIF
;-------------------------------------------------
;441,���Ƃ��󂯂�
;-------------------------------------------------
@MESSAGE_COM441
PRINTFORM %CALLNAME:MASTER%��
IF TARGET > 0

ENDIF
IF TARGET > 0
	IF ABL:MASTER:���{ > ABL:TARGET:���{
		PRINTFORM %CALLNAME:TARGET%�Ɏ��X�����Ȃ���
	ELSE
		PRINTFORM %CALLNAME:TARGET%�ɋ����Ă��炢�Ȃ���
	ENDIF
ENDIF
PRINTL ���Ƃ��󂯂Ă���
SIF ABL:MASTER:���{ > 2 && TARGET > 0
	PRINTFORM %CALLNAME:TARGET%��%CALLNAME:MASTER%�̒m���Ɋ��S���Ă���
SIF ABL:MASTER:���{ < ABL:TARGET:���{ - 2
	PRINTFORM %CALLNAME:TARGET%�̎w���͂ƂĂ����߂ɂȂ�

;-------------------------------------------------
;445,�̏W����
;-------------------------------------------------
@MESSAGE_COM445

SELECTCASE TFLAG:193
	CASE 0
		PRINTFORML ����������Ȃ������c�c
	CASEELSE
		SETCOLOR 0x00FF00
		PRINTFORM %ITEMNAME:(TFLAG:193)%��
		IF TFLAG:194 > 1
			PRINTFORM {TFLAG:194}
		ELSE
			PRINTFORM �P
		ENDIF
		IF GROUPMATCH(TFLAG:193, 706)
			PRINTFORM �C
		ELSE
			PRINTFORM ��
		ENDIF
		PRINTFORML ���������I
		RESETCOLOR
		DRAWLINE
		PRINTFORM
		CALL ITEM_DESCRIPTION(TFLAG:193)
ENDSELECT

;-------------------------------------------------
;445,��������
;-------------------------------------------------
@MESSAGE_COM446

SELECTCASE TFLAG:193
	CASE 0

	CASEELSE
		SETCOLOR 0x00FF00
		PRINTFORM %ITEMNAME:(TFLAG:193)%��
		IF TFLAG:194 > 1
			PRINTFORM {TFLAG:194}
		ELSE
			PRINTFORM �P
		ENDIF
		PRINTFORML ��������
		RESETCOLOR
		DRAWLINE
ENDSELECT

;-------------------------------------------------
;460,�ϑz�I�i�j�[
;-------------------------------------------------
@MESSAGE_COM460

SELECTCASE TCVAR:194
CASE 1
	PRINTFORML �����~�߂��܂܂ł͐��_�ɂ����镉�S���傫������c�c
CASE 2
	PRINTFORML �l�O�ŃI�i�j�[�����Ă͂����܂���
CASE 3
	PRINTFORML %CALLNAME:MASTER%�͐��_���W�������A�ϑz�ňӒ��̐l�Ɛ������鎖�ɂ���
CASE 4
	PRINTFORML ���͂܂��I�i�j�[���ׂ����ł͂Ȃ��c�c%CALLNAME:MASTER%�͂����v���A�I�i�j�[���~�߂��c�c
ENDSELECT

;-------------------------------------------------
;461,��ɕԂ�
;-------------------------------------------------
@MESSAGE_COM461
;IF (MAXBASE:MASTER:�C�� / BASE:MASTER:�C��) >= 10
;�ꊄ�ȉ�
IF BASE:MASTER:�C�� <= (MAXBASE:MASTER:�C�� / 10)
	PRINTFORML ��ꂫ����%CALLNAME:MASTER%�̓I�i�j�[���~�߂�
	SIF TALENT:MASTER:2 == 2
		PRINTFORML %CALLNAME:MASTER%�̎�ƃy�j�X�ɂ͐��t�����т���A�ӂ�ɐ��L���L�����[�����Ă���c�c
	SIF TALENT:MASTER:2 == 1
		PRINTFORML %CALLNAME:MASTER%�͈̑̂��t�ɓh��A�ӂ�Ɏ��̓������[�����Ă���c�c
	SIF TALENT:MASTER:2 == 3
		PRINTFORML %CALLNAME:MASTER%�͑S�g���t�Ɛ��t�h��Ō�������c�Ȏp���c�c
;ELSEIF (MAXBASE:MASTER:�C�� / BASE:MASTER:�C��) >= 2
;�����ȉ�
ELSEIF BASE:MASTER:�C�� <= (MAXBASE:MASTER:�C�� / 2)
	PRINTFORML %CALLNAME:MASTER%�͂قǂقǂ̂Ƃ���ŃI�i�j�[���~�߂�
	SIF TALENT:MASTER:2 == 2
		PRINTFORML %CALLNAME:MASTER%�̎�ƃy�j�X�ɂ͐��t�����т���A�ӂ�ɐ��L���L�����Y���Ă���c�c
	SIF TALENT:MASTER:2 == 1
		PRINTFORML %CALLNAME:MASTER%�͈̑̂��t�ɓh��A�ӂ�Ɏ��̓������Y���Ă���c�c
	SIF TALENT:MASTER:2 == 3
		PRINTFORML %CALLNAME:MASTER%�͑̂ɂ͎��鏊�ɐ��t�ƈ��t�����т���Ă���c�c
ELSE
	PRINTFORML %CALLNAME:MASTER%�͂܂��]�T�����邪�̂��C�����ăI�i�j�[���~�߂�
	SIF TALENT:MASTER:2 == 2
		PRINTFORML %CALLNAME:MASTER%�̎�ƃy�j�X�ɂ͂ق�̋͂��ȉ䖝�`���t�����Ă���c�c
	SIF TALENT:MASTER:2 == 1
		PRINTFORML %CALLNAME:MASTER%�̑̂ɂ͂ق�̋͂��Ȉ��t���t�����Ă���c�c
	SIF TALENT:MASTER:2 == 3
		PRINTFORML %CALLNAME:MASTER%�̑̂ɂ͋͂��ȉ䖝�`�ƈ��t���t�����Ă���c�c
ENDIF
PRINTFORML %CALLNAME:MASTER%�����߂����Ȃ���


code:
==============================================================================
### �����菇 ###
01: eraTW4.692(�摜�����ς�) �ɂ��̃p�b�`���㏑�����Ă��������B
==============================================================================
### �T�v ###
�R���N�V�����v�f�̊y����ǉ�����p�b�`�ł��B
�y���̓�������Ɋւ��ẮA�u�y���������.txt�v�Ɓu�y���ꗗ.csv�v���m�F���Ă��������B

1���̊J�n��ʂ���A�u[108] - ��ɓ��ꂽ�y���v��I������ƁA�y���ꗗ���m�F�ł��܂��B
* ������̊y���́A�Ȗ���?�ŕ\������Ă��܂�
* �}�E�X�I�[�o�[������ƁA���̊y���̓���������m�F�ł��܂��B

### ���u�ω摜�p�b�`��K�p�ς݂̕��ւ̒��ӎ��� ###
�u/CSV/Str.csv�v�̏C�����d�Ȃ��Ă��邽�߁A���u�摜�̕\���ɉe��������܂��B
Str.csv �ɑ΂��ăt�@�C���㏑���ł͂Ȃ��A872�s�ڈȍ~�̊y���֘A�̓��e�𖖔��ɒǉ����Ă��������B

### Q&A ###
Q1: �V���[�Y�̊֘A�L�������ĉ��H
A1: ������₱�����̂ŉ��Ő������܂��B

�u�y���ꗗ.csv�v��4��ڂ�1000�ȉ��̏ꍇ�A����͊֘A�L�����̔ԍ���\���Ă��܂��B
����グ�܂���70�s�ڂ́u�����d���k�v�� 1�ƂȂ��Ă���A����̓L�����ԍ� 1�Ԃ́u����얲�v���֘A���Ă��邱�Ƃ�\���Ă��܂��B
�܂��u10202:�����d���k�v�́u����������v�V���[�Y�̊y���Ȃ̂ŁA�u����얲�v�́u����������v�V���[�Y�Ɋ֘A���Ă���Ƃ����`�ɂȂ�܂��B

Q2: �����H ����얲���ĂقڑO��ɏo�Ă邩��S���֘A���Ă�񂶂�Ȃ��́H�@�ݒ肨�������Ȃ��H
A2: �d�l�ł��B�����ƁA�ʂ̕����ٕς����������̂ł��傤�B
* �V���[�Y���Ƃ̓o��L������I�m�ɐݒ肷��̂��������̂ł����A�����܂Ŏ肪���Ȃ������̂ŃV���[�Y���ɃL�����e�[�}������L�������֘A�Ƃ��Ă��܂��B

Q3: �u���L�v�ŉ��t�听�������̂Ɂu10308:�֒f�̖��@�@�` Forbidden Magic�v����ɓ���Ȃ��񂾂��ǁH
A3: �d�l�ł��B���Ԃ��Ԍ��̃L�������܂Ƃ߂Ċy�����Ǘ����Ă���̂ł��傤
* �����l�ł̃e�[�}�Ɋւ��Ă̒�������₱���������̂ŁA�Ƃ肠�������̌`�ɂ��Ă���܂��B

==============================================================================
### ���̑� ###
���̃p�b�`�Ɋւ��Ă͎��R�ɉ��ρE�Ĕz�z���Ă�����č\���܂���B�A�����s�v�ł��B
==============================================================================
�p�b�`����ҁF�Ȃ�ƂȂ��p�b�`�������Ă�l