code:
�f�[�g�I���^�C���A�b�v���� 105�s�ڂɃC�^�Y��OFF��ݒ�
�f�o�b�O���ĂȂ����Ǒ�������
�������ĂȂ������I���߂�Ȃ����I
101�s�ڂɐݒ�

path: 原版+前人整合等各种readme/パッチ/eraTW4.754用イタズラ帰宅バグ修正2/readme.txt


code:
eraTW4.754�p�摜�\���C���p�b�` V1.02

�E�T�v
TW4.754�Ő������\���֘A�̃o�O��A�摜���𒲐��������̂ł��B
�����`�ł���΂ǂ̉摜�T�C�Y�ł�180�~180�ŕ\�������悤�ɒ������܂����B
�\���摜�T�C�Y��ύX�������ꍇ�A�Q�[�����ŃT�C�Y�䗦���グ�邩�A�L�����`�拤��.ERH�̃f�t�H���g�L�����摜������ύX���Ă��������B
���ƂȂ��Ă���.config�͕ύX�O�ɏC�����܂����B

�E�������@
�W�J�����t�H���_�����̂܂�eraTW4.754�ɏ㏑�����Ă��������B
�K���o�b�N�A�b�v�����悤���肢���܂��B

�E������
�ȉ��̊��Ńp�b�`�𓱓����Ă�������
# TW4.754 + eraTW�f�P�l����+�����G�g��p�b�`

TW4.753���d���摜�p�b�`���p�[�W�����AeraTW�f�P�l�����G�g��p�b�`�𓱓����Ă��Ȃ��ꍇ�A���퓮���ۏ؂ł��܂���B
�o�[�W�����A�b�v�A�܂��͓��p�b�`���}�[�W���Ă��瓱�����������B
�܂��A���̂ق���TW4.754�p�p�b�`�Ƃ͓��������m�F���Ă��܂���̂ł��������B

�E�ڍ�
v1.02
ERB/
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@�@�@�ʉ摜�̃G�t�F�N�g���������\������Ȃ������C��
�@�@�@�ʉ摜��I�����Ă����ꍇ�A�\�͕\����ʂ��ʉ摜���\�������悤�ύX

v1.01
ERB/
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@�@�@�e�L�X�g�^�O�{�^���̊Ԋu�����̒l�ɂȂ�Ȃ��悤�C��

v1.0
CSV/
��_fixed.config
�@�@TW4.753�ȑO�̂��̂ɏC��
ERB/
���O���t�B�b�N�\�����C�u����/
�����O���t�B�b�N�\��.ERB
���@�@�摜�T�C�Y�����摜�̍������Q�Ƃ����A�f�t�H���g�L�����摜�������Q�Ƃ���悤��
���@�@�摜���]���A�c���͔��]���Ȃ��悤��
���@�@�c�ʒu�̌v�Z��ύX�A"��s�̍���"���Q�Ƃ���悤��
���@�@�s�N�Z���������s�̌v�Z��ύX
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@���@�摜�T�C�Y��̌v�Z��ύX�A���E�B���h�E���ɍ����悤��
�@���@�e�L�X�g�^�O�{�^���̊Ԋu�v�Z��ύX
�@���@���Ԓ�~�A�t���[���̕`��̈ꕔ���ȗ�
�@���@�X�e�[�^�X��ʂ̉摜�\���Ńt���[�����\�������悤��
�@���@���ׁX�Ƃ����\�L��C���f���g���C��
�@���L�����`�拤��.ERH
�@�@�@�g�p���Ȃ��ϐ����폜
emuera.config
�@TW4.753�ȑO�̂��̂ɏC��

repo_name: akadiya/eratw

path: 原版+前人整合等各种readme/パッチ/eraTW4.754用画像表示修正パッチv1.02/Readme.txt

license: unknown


code:
@ESTRUS_CYCLE(ARG)
#FUNCTION
SELECTCASE CFLAG:(ARG:0):900
	;���S��
	CASE 1 TO 2
		LOCAL = 15
	CASE 3 TO 4
		LOCAL = 30
	CASE 5
		LOCAL = 50
	CASE 6
		LOCAL = 70
	;�댯��
	CASE 7
		LOCAL = 150
	CASE 8
		LOCAL = 100
	CASE 9
		LOCAL = 60
	CASE 10
		LOCAL = 40
ENDSELECT
RETURNF LOCAL

@REAL_ESTRUS_CYCLE(ARG)
#FUNCTION
	LOCAL = ESTRUS_CYCLE(ARG)
	SIF TCVAR:ARG:�����r��
		LOCAL = MAX(LOCAL, LOCAL / 5 + 100)
RETURNF LOCAL

;������������F�֐�
;�����Ȃǂ̏�Ԃ��Q�Ƃł���
@ESTRUS_CATEGORY(C_ID, ADD_DAY)
#FUNCTIONS
#DIM C_ID     ;�o�^�ԍ�
#DIM ADD_DAY  ;��������Q�Ƃ��邩�A0�Ȃ獡��
#DIM CHECK_DAY;���ۂɎQ�Ƃ������̎���
SIF ADD_DAY < 0
	ADD_DAY = -(ABS(ADD_DAY) % 10)
CHECK_DAY = (CFLAG:C_ID:�������� + ADD_DAY + 10) % 10
SIF !CHECK_DAY
	CHECK_DAY = 10
SIF TCVAR:C_ID:�����r��
	RETURNF "�r���U���܌��ʔ�����"
SELECTCASE CHECK_DAY
;���S��
CASE 1 TO 2
	RETURNF "���S��"
CASE 6
	RETURNF "�댯���O��"
;�댯��
CASE 7
	RETURNF "�댯��"
CASE 8
	RETURNF "�r��"
CASEELSE
	RETURNF "��댯��"
ENDSELECT

;���������\���֐�
;�����悤�Ȃ̂�����������̂őS�������ŏ��������Ⴄ
@NEW_CYCLE_PRINT(C_ID, ADD_DAY, OP)
#DIM  C_ID    ;�o�^�ԍ�
#DIM  ADD_DAY ;��������Q�Ƃ��邩�A0�Ȃ獡��
#DIMS OP      ;�I�v�V�����A���݁u�����v�̂�
#DIMS �\����  ;�\���������e
VARSET �\����
IF TALENT:C_ID:�D�P
	SETCOLOR C_PINK
	�\���� '= CLIP_HEART("�D�P")
ELSEIF CFLAG:C_ID:�D�P�o�ߓ���
	SETCOLOR C_PINK
	�\���� '= CLIP_HEART("������")
ELSEIF !ADD_DAY && TCVAR:C_ID:����
	SETCOLOR C_PINK
	�\���� '= CLIP_HEART("���")
ELSEIF �D�P��(C_ID)
	�\���� '= ESTRUS_CATEGORY(C_ID, ADD_DAY)
	SIF !STRLENS(�\����)
		RETURN
	SELECTCASE �\����
		CASE "�댯��"
			SETCOLOR C_PINK
			�\���� '= CLIP_HEART(�\����)
		CASE "�r��", "�댯���O��", "�r���U���܌��ʔ�����"
			SETCOLOR 0xEE60EE
		CASE "���S��"
			SETCOLOR C_AQUA
	ENDSELECT
ELSE
	�\���� '= ESTRUS_CATEGORY(C_ID, ADD_DAY)
	SIF !STRLENS(�\����)
		RETURN
	SELECTCASE �\����
		CASE "�댯��"
			SETCOLOR 0xc099a0
			�\���� '= CLIP_HEART(�\����)
		CASE "�r��", "�댯���O��", "�r���U���܌��ʔ�����"
			SETCOLOR 0xe4d2d8
		CASE "���S��"
			SETCOLOR 0xe0ffff
	ENDSELECT
	�\���� = �H�H�H
ENDIF
IF STRCOUNT(OP, "�u�����v")
	PRINTFORM %�\����, 10, LEFT%
ELSE
	PRINTFORM %�\����%
ENDIF
RESETCOLOR

@CYCLE_PRINT(ARG)
CALL NEW_CYCLE_PRINT(ARG)
RETURN

VARSET LOCAL
IF TALENT:ARG:�D�P
	SETCOLOR C_PINK
	CALL HEART
	PRINTFORM �D�P{CFLAG:ARG:�D�P�o�ߓ���}����
	CALL HEART
ELSEIF CFLAG:ARG:�D�P�o�ߓ���
	SETCOLOR C_PINK
	CALL HEART
	PRINTFORM ������
	CALL HEART
ELSEIF ESTRUS_CYCLE(ARG) == 150
	SETCOLOR C_PINK
	CALL HEART
	IF TCVAR:ARG:����
		PRINTFORM ���
	ELSE
		PRINTFORM �댯��
	ENDIF
	CALL HEART
ELSEIF ESTRUS_CYCLE(ARG) == 100
	SETCOLOR 0xEE60EE
	PRINTFORM �r��
ELSEIF ESTRUS_CYCLE(ARG) == 70
	SETCOLOR 0xEE60EE
	PRINTFORM �댯���O��
ELSEIF ESTRUS_CYCLE(ARG) == 15
	SETCOLOR C_AQUA
	PRINTFORM ���S��
ENDIF
RESETCOLOR

@CYCLE_PRINT����(ARG)
CALL NEW_CYCLE_PRINT(ARG, 1)
RETURN

VARSET LOCAL
IF TALENT:ARG:�D�P
	SETCOLOR C_PINK
	CALL HEART
	PRINTFORM �D�P
	CALL HEART
ELSEIF CFLAG:ARG:�D�P�o�ߓ���
	SETCOLOR C_PINK
	CALL HEART
	PRINTFORM ������
	CALL HEART
ELSEIF CFLAG:ARG:900 == 6
	SETCOLOR C_PINK
	CALL HEART
	IF TCVAR:ARG:����
		PRINTFORM ���
	ELSE
		PRINTFORM �댯��
	ENDIF
	CALL HEART
ELSEIF CFLAG:ARG:900 == 7
	SETCOLOR 0xEE60EE
	PRINTFORM �r��
ELSEIF CFLAG:ARG:900 == 5
	SETCOLOR 0xEE60EE
	PRINTFORM �댯���O��
ELSEIF CFLAG:ARG:900 == 10 || CFLAG:ARG:900 == 1
	SETCOLOR C_AQUA
	PRINTFORM ���S��
ENDIF
RESETCOLOR

;@CYCLE_PRINT����()��\�����ꂵ�Ȃ��悤
;�e�L�X�g�𓯂����ŏo�͂���悤�ɂ�������
@PRINT_CYCLE_����(�L�����o�^�ԍ�)
#DIM �L�����o�^�ԍ�
#DIMS �\����
CALL NEW_CYCLE_PRINT(�L�����o�^�ԍ�, 1, "�u�����v")
RETURN

�\���� =
IF TALENT:�L�����o�^�ԍ�:�D�P
	SETCOLOR C_PINK
	�\���� = %CLIP_HEART("�D�P")%
ELSE
	SELECTCASE CFLAG:�L�����o�^�ԍ�:��������
	CASE 6
		SETCOLOR C_PINK
		IF TCVAR:�L�����o�^�ԍ�:����
			�\���� = %CLIP_HEART("���")%
		ELSE
			�\���� = %CLIP_HEART("�댯��")%
		ENDIF
	CASE 7
		SETCOLOR 0xEE60EE
		�\���� = �r��
	CASE 5
		SETCOLOR 0xEE60EE
		�\���� = �댯���O��
	CASE 10, 1
		SETCOLOR C_AQUA
		�\���� = ���S��
	ENDSELECT
ENDIF
PRINTFORM %�\����, 10, LEFT%
RESETCOLOR

path: 原版+前人整合等各种readme/パッチ/eraTW4.756用 排卵誘発剤強化パッチ/ERB/イベント関連/妊娠関連/CYCLE.ERB


code:
;����̏I���ɌĂяo�����֐�
@GET_CHILD(ARG)
#DIM �D�P�K�v�l
#DIM ���ŕ␳
#DIM �D�P���t����

SELECTCASE ABL:ARG:�S�˒���
	CASE 0 TO 2
		���ŕ␳ = 5
	CASE 3 TO 5
		���ŕ␳ = 4
	CASEELSE
		���ŕ␳ = 2
ENDSELECT

EX:ARG:�q�{�����t += EX:ARG:�S�����t / ���ŕ␳

SIF TALENT:ARG:�c�t && !TALENT:ARG:����
	EX:ARG:�q�{�����t = 0

IF !TALENT:MASTER:���\�s�܂�
	IF (TALENT:ARG:�S || TALENT:ARG:�z���S)
		�D�P�K�v�l = 10000 - 3000 * TALENT:MASTER:�S�s�܂�
		SIF CFLAG:ARG:�q��␳ >= 5
			�D�P�K�v�l = �D�P�K�v�l * MAX(60 - 2 * CFLAG:ARG:�q��␳, 10) / 50
	ELSEIF TALENT:ARG:�V��
		�D�P�K�v�l = 5000 - 2000 * TALENT:MASTER:�V��s�܂�
		SIF CFLAG:ARG:�q��␳ >= 5
			�D�P�K�v�l = �D�P�K�v�l * MAX(30 - 2 * CFLAG:ARG:�q��␳, 10) / 20
	ELSEIF TALENT:ARG:�d��
		�D�P�K�v�l = 4000 - 1500 * TALENT:MASTER:�d���s�܂�
		SIF CFLAG:ARG:�q��␳ >= 5
			�D�P�K�v�l = �D�P�K�v�l * MAX(30 - 2 * CFLAG:ARG:�q��␳, 10) / 20
	ELSEIF TALENT:ARG:�_��
		�D�P�K�v�l = 20000 - 15000 * TALENT:MASTER:�_��s�܂�
		SIF CFLAG:ARG:�q��␳ >= 5
			�D�P�K�v�l = �D�P�K�v�l * MAX(50 - 2 * CFLAG:ARG:�q��␳, 10) / 50
	ELSEIF TALENT:ARG:�t�r�_
	;��{�K�v�l�͗d����荂��������g�p�o���ɂ���ĉ�����
		�D�P�K�v�l = MAX(5000 - EXP:MASTER:����g�p�o�� * (1 + TALENT:MASTER:�t�r�_�s�܂�), 2000)
		SIF CFLAG:ARG:�q��␳ >= 5
			�D�P�K�v�l = �D�P�K�v�l * MAX(30 - 2 * CFLAG:ARG:�q��␳, 10) / 20
	ELSEIF TALENT:ARG:�H���l
	;��|���ɂ��e�������ΓI�ɂł���
		�D�P�K�v�l = 200000
		SIF TALENT:MASTER:�H���s�܂�
			�D�P�K�v�l /= 10
		SIF CFLAG:ARG:�q��␳ >= 5
			�D�P�K�v�l = �D�P�K�v�l * MAX(50 - 2 * CFLAG:ARG:�q��␳, 1) / 100
	ELSEIF TALENT:ARG:�񐶕�
		�D�P�K�v�l = 150000
		SIF TALENT:MASTER:�d���s�܂�
			�D�P�K�v�l /= 10
		SIF CFLAG:ARG:�q��␳ >= 5
			�D�P�K�v�l = �D�P�K�v�l * MAX(60 - 2 * CFLAG:ARG:�q��␳, 1) / 100
	ELSEIF TALENT:ARG:�l�� == 3
		�D�P�K�v�l = MAX(2000 - CFLAG:ARG:�q��␳ * 10, 500) / 10 * (10 + TALENT:MASTER:�ޏ��s�܂�)
	ELSEIF TALENT:ARG:�l��
		�D�P�K�v�l = MAX(2000 - CFLAG:ARG:�q��␳ * 10, 500)
	ELSE
		�D�P�K�v�l = MAX(2000 - CFLAG:ARG:�q��␳ * 10, 500) / 10 * (10 + TALENT:MASTER:�d���s�܂�)
	ENDIF
ELSE
	�D�P�K�v�l = MAX(2000 - CFLAG:ARG:�q��␳ * 12, 500)
ENDIF
SIF FLAG:���� == 6
	�D�P�K�v�l = �D�P�K�v�l / 2
SIF FLAG:���� == 9
	�D�P�K�v�l = �D�P�K�v�l * 9 / 10
SIF TALENT:ARG:�l��
	�D�P�K�v�l /= 2
SIF TALENT:ARG:�s������
	�D�P�K�v�l /= 4
SIF TALENT:MASTER:�Z�����t
	�D�P�K�v�l /= 4

IF �[�U��(ARG,4) > 20
	SETCOLOR C_CREAM
	PRINTFORML %CALLNAME:ARG%�̎q�{�̒��͒������܂ꂽ%CALLNAME:MASTER%�̐��Ŗ�������Ă���c
	IF !FLAG:�摜�\��
		SETFONT "�l�r �o�S�V�b�N"
		PRINTL �@�@�@�@�@�@�@�@�@�@�@}�@}�@�@�@�@�@�@�@�@�@�@�@�@ �@ �@ �i
		PRINTL �R.__�@�@�@�@�@�@�@�@�@',�@',�@_�@�@�@�@�@�@�@�@�@�@�@�@�@�@�j�@�@�@�@�@�@�@�@�@�@�@�@�@�@ �@ �@ �@ �@ �@ , --�
		PRINTL �@(�@�M�R�@�@�@�@�@�@�@ �R Ɂ@ �R�@�@�@�@�@�@�@�@�@�@�@�@0�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�Q__ �m�m�܁_
		PRINTL �@�@�[ '�@�@�@�@�@�@�@�@�@�� �Q}�@�@�@�@�@�@�@�@�@�@ �@ ...........�@�@�@�@�@�@ /�܁L�@�@/ �P �M�S�� �L
		PRINTL �@�@�@�@�@�@�@�M�܁R.. �Q�@�@�@�@�@ �@ ��).�@�@�@�@�@,..::::::::::::::::.:..�@�@ (__���@�@�@�@�@���Q__�m
		PRINTL �@�@�@�@�@�@�@�@�@�@ ���Q�j �@ �@�@�@�@�@�[(__)�@�@.j::::'�L�@ �M ::::�k
		PRINTL �@�@�@�@�@�܁[�i�܁j�@�@�@�@�@�@�@�@�@�@�@�@- � �@ �l::::.�@�@ ..:::::{�@�@�@�@�@�@�@�@�@ -�\ - �
		PRINTL �@�@�@�@�@�@�@�@�@�@�@---�@� �@ �@�@�@�@�@��_�m�@�@�::::.::::::.::::::ҁ@�@�@�@�@�@�@ �i�@�@�@�@�@�@�M�P �M�R
		PRINTL �@�@�@�@�@�@�@�@�@ /�@�@�@ �@ �_ �@�@�[ �L�@-�_���@�@�M~~~~~�L�@, -- ��@�@�@�@�@�@�[�@�܁L�P�P�j�@}
		PRINTL �@�@�Q�@�@�@�@�@ �l�@�@�@�@�@�@ ',�@�@�@�@/�@�@�@�@�@�@�@�@�@�@�@��__�m�܁R�@�@�@�@�@�@�@�@�@�@ �i�@�i
		PRINTL �L�@�@�@�@ �_�@�@{�@ }�@�@�@�@�@�@ }�@�@�@�@�@�@�@�@�@�@ 0�@�@�@�@�@�@�@�@�@�@ �[�@�@ �Q�@�@�@�@�@�@ �[�\
		PRINTL �@�@ -- ��@�@�M�P �L �R�@�@�Q ..�m�@�@�@�@�@�@�@�@�@�@ (�@�@�@�@�@�@�@�@�@�@�@�@�@ �i�@�@�@�M�R
		PRINTL �^�@�@�@ �_ _�Q�@�C�M�N�N�L�@--��@�@�@--��@�@�@�@�@�@���@�@�@�@�@�@�@�@�@�@�@�@�@�_�@�Q ��
		PRINTL �@ �@�@�i�܁j�@�@�@�@�@�@__/ �@�@�@�[��__�m�@ _�@�@�@�@�@�@(�� �j�@�@---�@��@�@�@�@�@�@�@�@�@ �_
		PRINTL �['�܁L�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�i__�j�@�@�@�@�@ �܁R /�@�@�@�@�@�_�@�@�@�@�@�@�@�@�@ �[ ��
		PRINTL �@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�Q�@�@�@�@�@ �m�@�@�@-��@�@�@�@�@.���@�@�@�@�@�@�_
		PRINTL �@�@�@�@�@�@�@�@�@�@�@�@�@ �^�@�@�@ �R�@�@.�V�@�@ �i__�m�@�@�@�@�@�@�@�@�@�@�@�@�@�@ �
		PRINTL �@�@�@�@�@�@�@�@�@�@�@�@ /�@�@�@�@�@�@}�@�@{{�@�@�@�i�@�@�@�@�@�@�@i
		PRINTL �@�@�@�@�@�@�@�@�@�@�@�@.{�@�@�@�@�@�@Ɂ@�@ j�@�@�@�@�j�@�@�@--��@{�@�@�@�@�@�@�@�@�@�@ ',
		PRINTL �@�@�@-�\�\�@��@�@�@�m �� �@�@ �^�@�@ /�@�@�@�@�@�@�@ {�@�@ }�@',�@�@�@�@�@�@�@ �@ �@ }
		PRINTL �^�@�@�\�\�@� �M�P�@ �j-- �܁L�@�@�@�@�@�@�@�@�@�@�@�@ ��__ !.�@�R�@�@�@�@�@�@�@�@�@ ,
		PRINTL �@ �^�@�@�@�@�@ �M�P�P�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@}}�@�@ �_�@�@�@�@�@�@�@/
		PRINTW �^�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@ �@ �@ �@ �@ {{�@�@�@�@�@�[�\�@��@ {
	ELSE
		CALL PRINT_IMAGE_ANIMATION("��",0,7,FLAG:�A�j���[�V����,1)
		CALL PRINT_IMAGE_ANIMATION("��",0,3,1,0)
		CALL PRINT_IMAGE("��2")
		WAIT
	ENDIF
ENDIF
SETFONT
IF MIN(�[�U��(ARG,4),100) * REAL_ESTRUS_CYCLE(ARG) / 100 > RAND:�D�P�K�v�l
	CFLAG:ARG:�D�P�o�ߓ��� = 1
	SIF FLAG:���� == 6
		FLAG:���� = 9
	IF FLAG:1007
		SETCOLOR C_CREAM
		PRINTFORML ���Ȃ��̎q��͉䂪�����%CALLNAME:ARG%�̎q�{���j�����A���h���ȗ��q�ւƎE�����Ă������c
		IF !FLAG:�摜�\��
			SETFONT "�l�r �o�S�V�b�N"
			PRINTL �@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@..__�Q....-------....�Q..
			PRINTL �@�@�@�@�@�@�@�@�@�@�@�@ .._..-�]'"�܁@�@�@�@�@�@�@�@ �M"'''�T�_..
			PRINTL �@�@�@�@�@�@�@�@�@�@_..�]''�L�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@"� �A..
			PRINTL �@�@�@�@�@�@�@�@ .:�m'�L�@�@. .�@. �@ .�@ . . .. .: . .�@.�@ ..�@�@�@ �@ �@ `�_:.
			PRINTL �@�@�@�@�@�@�@.:�m�� �@ .�@ . .: .:.: .:. .: . .: .: .:. . : .: .:.. : . .�@. �@ �@ �@ ށT:.�@�@�����==-�]'�L�P�M�R�A_,
			PRINTL �@�@�@�@�@ .:_�^ �@ . ..:..:.:.::;:;;';:;';';.:�@'"�L�@�@�@�@'�@�@;.:.. : .�@.�@�@�@�@ �@ �_:.
			PRINTL �@�@�@�@�@.:/�� �@ .. ..:.:.:;:;';;';'.''�L�@�@�@�@�@ �@ �@ �@ �@ �@ ;.:. . .�@�@ �@ �@ �R�A:.
			PRINTL �@�@�@�@.:���@.�@.�@. ..:.::;';':''�@�@�@�@�@�@�@�@�@ �@ �@ �@ �@ �@ :.:. : .�@�@�@ �@ �R::
			PRINTL �@�@�@ .:���@�@�@..�@. ..::;'���@�@�@�@�@�@�@ �@ �@ �@ �@ �@ �@ �@ ,:.:.. . .�@ �@ �@ '�A::
			PRINTL �@�@�@ ::�u�@�@�@�@.. . .:.;'�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@ �@ �@ :.:.�@ . �@ �@ .�@i�A::�@�@�@�����==-�]'�ܘ��A�Q�m
			PRINTL �@�@�@::||�@�@�@�@. . ..:.;�@�@�@�@�@�@�@�@ �@ �@ �@ �@ �@ �@ �@ �@ �@ ;.: . . .�@�@ ,::�@!::
			PRINTL �@�@�@::�l �@ �@ �@ . ..:;�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@ �@ :.:. . .�@:';';���==-�]'�L�P�M�R�A_,
			PRINTL �@�@�@::|!�@�@�@�@�@..:.:;�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@ �@ ;.: :.�@�@ �@�M: .!'::�@�@�@�@�@�@�@�@"
			PRINTL �@�@�@::�m�@�@�@�@.. .:.:,�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@.:.:. . .. . �@ �@ |::���@[][]/7
			PRINTL �@�@�@ ::'�A�@�@�@ �@ . .::,�@�@�@�@�@�@�@�@�@�@�@�@ �@ �@ �@ �@ �@ ,:.: . .�@�@�@�@ ��:: �@ �@ //l�j��
			PRINTL �@�@�@ ::�T �@ �@ �@ .. . :.,�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@ �@ ,.:.: : .�@�@�@ �@ ��::�@�@�@�@�@�@// �߁V
			PRINTL �@�@�@�@ ::�R�@�@ �@ �@ . . .:...�@�@�@ �@ �@ �@ �@ �@ �@ �@ �@ ,..: .: . ..�@ �@ �@ _j���@�@�@�@�@�@�@�@�@�L�@߁@�
			PRINTL �@�@�@�@�@':�R�A�@�@�@�@�@.�@.: :': . ..�@�@ �@ �@ �@ �@ �@ ,. .:.: . :�@.. �@ �@ �@ /���@�@�@�@�@�@�@�@�@ �@ �@ �@ ��
			PRINTL �@�@�@�@�@�@':�R�A�@�@ �@ �@ ..�@. : .: ' : . ...,. .,... . : ' :. : .�@.�@�@�@ �@ �@ _�^:'
			PRINTL �@�@�@�@�@�@�@ ':�S �A�@�@�@�@�@�@ ..�@:�@. .: . . : .�@:�@.�@�@�@�@�@�@�@ _�^:'�@�@�@�@�����==-�]'�ܘ��A�Q�m
			PRINTL �@�@�@�@�@�@�@�@�@':ށT��@�@�@�@�@�@�@�@�@ .�@ .�@�@�@�@�@�@�@�@�@_�m'�L:'
			PRINTL �@�@�@�@�@�@�@�@�@�@�@':��'�T�_ �@�@�@�@�@�@�@�@�@�@�@�@�@�@_..-�]'�L:'
			PRINTL �@�@�@�@�@�@�@�@�@�@�@�@�@�@':��'''�-....�Q�Q____�Q....-��"�L:'
			PRINTW �@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@�@ ''�P�M''
			SETFONT
		ELSE
			CALL PRINT_IMAGE_ANIMATION("��",0,12,FLAG:�A�j���[�V����,0)
			CALL PRINT_IMAGE("��11")
			WAIT
		ENDIF
		IF TALENT:ARG:����
			PRINTFORMW %CALLNAME:ARG%�̐g�͈̂�����%CALLNAME:MASTER%�̈�`�q�����X�Ƃ��Ď󂯓���Ă������c
		ELSE
			PRINTFORMW %CALLNAME:ARG%�̐g�͖̂{�l�̈ӎv�Ƃ͖��֌W��%CALLNAME:MASTER%�̈�`�q���󂯓��ꂽ�c
		ENDIF
		IF TALENT:ARG:�s������ == 1
			FONTBOLD
			PRINTFORMW %CALLNAME:ARG%�͍s�������%CALLNAME:MASTER%�ɛs�܂���Ă��܂����c�c
			FONTREGULAR
			FLAG:�s������s�܂��� ++
		ENDIF
	ENDIF
	IF TCVAR:(ARG):��t����ꎩ�o
		CFLAG:ARG:�g�Ɋo��_�� = 1
		;PRINTFORML Succeed2
	ELSE
		CFLAG:ARG:�����o�D�P = 1
	ENDIF
ENDIF
RESETCOLOR
;�D�P�ɔ������ꂱ��
@CHANGE_N_STATUS(ARG)

CFLAG:ARG:�񕜑��x�_�E�� = TALENT:ARG:�񕜑��x + 2
IF TALENT:ARG:�񕜑��x > -1
	PRINTFORMW %CALLNAME:ARG%�͔��₷���Ȃ���
	TALENT:ARG:�񕜑��x = -1
ENDIF

;�����o�ւ̏���
@PERCIEVE(ARG)
IF CFLAG:ARG:�D�P�o�ߓ��� == 71
	PRINTFORMW %CALLNAME:ARG%�̏o�Y���߂��Ȃ����B
	PRINTFORMW �������s�ׂ͔����������ǂ��������c
	IF GROUPMATCH(ARG,2,5,6,7,8,9,12,13,14,15,16,17,29,32,33,41,50,54,59,62,80,81,82)
		PRINTFORMW ��̂Ɋ댯���o��\�������邩��ƁA%CALLNAME:ARG%���o�Y�܂ŋx�{�����鎖�ɂ����c
		CFLAG:ARG:�Y�x = 1
	ENDIF
ELSEIF CFLAG:ARG:�D�P�o�ߓ��� == 60
	IF TALENT:ARG:�o�X�g�T�C�Y < 2
		TALENT:ARG:�o�X�g�T�C�Y += 1
		PRINTFORMW %CALLNAME:ARG%�̋����傫���Ȃ���
		CFLAG:ARG:�������N�A�b�v = 1
	ENDIF
	IF !TALENT:ARG:����̎�
		PRINTFORMW %CALLNAME:ARG%�͕�����o��悤�ɂȂ���
		TALENT:ARG:����̎� = 1
	ENDIF

	PRINTFORML ���͂�%CALLNAME:ARG%���D�P���Ă��邱�Ƃ͉��ڂɂ����炩���c
	IF !CFLAG:ARG:�����o�D�P && GROUPMATCH(ARG,1,11,23,25,26,34,37,43,44,52,55,60,67,68,79,85,87,97)
		PRINTFORML %CALLNAME:ARG%�͖����������A���΂炭�x�{���邱�ƂɌ��߂��c
		CFLAG:ARG:�Y�x = 1
	ELSEIF CFLAG:ARG:�����o�D�P
		PRINTFORML %CALLNAME:ARG%�͐g�Ɋo���̂Ȃ��D�P�Ɍ������ܜ����Ă���c
		IF GROUPMATCH(ARG,4,10,11,14,17,20,21,22,28,31,35,36,40,43,44,52,56,57,58,65,70,72,75,76,87,91,96)
			PRINTFORMW %CALLNAME:ARG%�͎������D�P�������Ƃ��󂯓���A�{�����邱�ƂɌ��߂��c
			CFLAG:ARG:�Y�x = 1
		ENDIF
		;�������x�����ɔD�P���Ă��邱�Ƃ����o���鎞���Ƃ���
		CFLAG:ARG:�D�P���o��� = 1
	ENDIF

	BASE:ARG:�̗� -= 200
	MAXBASE:ARG:�̗� -= 200
	BASE:ARG:�C�� -= 200
	MAXBASE:ARG:�C�� -= 200

ELSEIF CFLAG:ARG:�D�P�o�ߓ��� == 40
	PRINTFORML %CALLNAME:ARG%�̂����̖c��݂��͂����肵�Ă����c
	IF !CFLAG:ARG:�����o�D�P && GROUPMATCH(ARG,14,17,20,21,22,28,31,35,40,44,52,57,70,72,76,91,96)
		PRINTFORM %CALLNAME:ARG%�͐g�̂̕��S������邽�߁A���΂炭
		IF GROUPMATCH(ARG,96,91,35)
			PRINTFORM �V�E�ł̑҂����킹
		ELSEIF GROUPMATCH(ARG,76,57,31,22,21,20)
			PRINTFORM %GET_JOBNAME(ARG)%\@ ARG == 76 || ARG == 31 ? �̎d�� # \@
 		ELSEIF ARG == 17
			PRINTFORM �l�`��
		ELSE
			PRINTFORM ����
		ENDIF
		PRINTFORML ���x�ގ��ɂ����c
		CFLAG:ARG:�Y�x = 1
	ELSEIF CFLAG:ARG:�����o�D�P
		PRINTFORML %CALLNAME:ARG%�͂܂�����̑̂̕ω����󂯓�����Ȃ��悤��
	ENDIF
	BASE:ARG:�̗� -= 200
	MAXBASE:ARG:�̗� -= 200
	BASE:ARG:�C�� -= 200
	MAXBASE:ARG:�C�� -= 200

ELSEIF CFLAG:ARG:�D�P�o�ߓ��� == 30
	PRINTFORML %CALLNAME:ARG%�̂����̖c��݂͂܂��ڗ����Ȃ��c
	PRINTFORMW %CALLNAME:ARG%�̑̂͑啪��������������ɓ������悤���c
	IF !CFLAG:ARG:�����o�D�P && GROUPMATCH(ARG,4,10,11,36,43,56,58,65,75,87)
		PRINTFORM %CALLNAME:ARG%�͐g�̂̕��S������邽�߁A���΂炭
		IF ARG == 10 || ARG == 11
			PRINTFORM �g���[�j���O
		ELSEIF ARG == 87
			PRINTFORM �΍s
		ELSE
			PRINTFORM  %GET_JOBNAME(ARG)%
		ENDIF
		PRINTFORML ���x�ގ��ɂ����c
		CFLAG:ARG:�Y�x = 1
	ELSEIF CFLAG:ARG:�����o�D�P
		PRINTFORML %CALLNAME:ARG%�͑����̈�a���������Ă͂�����̂́A�����D�P�����Ƃ͋C�Â��Ă��Ȃ��悤��
	ENDIF
	BASE:ARG:�̗� -= 100
	MAXBASE:ARG:�̗� -= 100
	BASE:ARG:�C�� -= 100
	MAXBASE:ARG:�C�� -= 100
ELSEIF CFLAG:ARG:�D�P�o�ߓ��� == 20
	PRINTFORMW %CALLNAME:ARG%�̗l�q�����������c
	PRINTFORML %CALLNAME:ARG%�͎q����g�U�����l��
	PRINTFORMW %CALLNAME:ARG%��[�D�P]�����l���B
	TALENT:ARG:�D�P = 1
	CALL CHANGE_N_STATUS(ARG)

	;���o�ŕ���
	IF CFLAG:ARG:�g�Ɋo��_�� == 1 && !CFLAG:ARG:�����o�D�P
		PRINTFORML %CALLNAME:ARG%�̑̂��s���ɂȂ��ė����B
		PRINTFORML ������܂Ŗ����ȍs�ׂ͔����������ǂ��������c
		IF TALENT:ARG:����
			PRINTFORMW %CALLNAME:ARG%�͂͂ɂ��݂Ȃ���%CALLNAME:MASTER%�̎q�������������Ƃ�񍐂��Ă���
			CALL KOJO_MESSAGE_SEND("EVENT",24,ARG,1,0)
		ELSEIF TALENT:ARG:�v��
			PRINTFORMW %CALLNAME:ARG%�͂���������%CALLNAME:MASTER%�̎q�������������Ƃ�񍐂��Ă���
			CALL KOJO_MESSAGE_SEND("EVENT",24,ARG,2,0)
			;CFLAG:ARG:�D�P�o�ߓ��� = 2
		ELSE
			PRINTFORMW %CALLNAME:ARG%�͍��f���%CALLNAME:MASTER%�̎q�������������Ƃ�񍐂��Ă���
			CALL KOJO_MESSAGE_SEND("EVENT",24,ARG,3,0)
			;CFLAG:ARG:�D�P�o�ߓ��� = 1
		ENDIF
		SIF ARG == 10 || ARG == 36
			PRINTFORMW �D�P����%CALLNAME:ARG%�́A�o�Y����܂ň������������鎖�ɂ����c
			;���o�ː�������̂ŔD�P���Ă��邱�Ƃ͂����Ɏ��o����
		CFLAG:ARG:�D�P���o��� = 1
	ELSE
		PRINTFORMW ������%CALLNAME:ARG%�͎����̐g�ɉ����N�������C�Â��Ă͂��Ȃ��悤���c
		CALL KOJO_MESSAGE_SEND("EVENT",24,ARG,4,0)
	ENDIF
ENDIF

@MasterPregnancy
#DIM C_ID
VARSET LOCAL
;�D�P�I�t�Ȃ��΂�
SIF FLAG:�D�P�X�C�b�`
	RETURN
;�j�Ȃ��΂�
SIF TALENT:MASTER:���� == 2
	RETURN
;�����D�P���Ă����΂�
SIF CFLAG:MASTER:�D�P�o�ߓ���
	RETURN
;�L�����������_�}�C�Y
CALL FISHER_YATES_SHAFFLE(CHARANUM - 1)

FOR LOCAL , 0 , CHARANUM - 1
	C_ID = SHAFFLE_ARRAY:LOCAL + 1
	SIF !TCVAR:C_ID:��t����
		CONTINUE
	SIF TALENT:C_ID:�s������
		CONTINUE
	;�����ŔD�P����A�����ĂȂ�����R�����g�A�E�g���Ƃ��B
	;TCVAR:��t�����o����������CFLAG:�g�Ɋo��_�� = 1���Ă����ĂˁB
	;CALL ���Ȃ��D�P����(C_ID)
	;���̂ŔD�P�����烋�[�v���f
	SIF CFLAG:MASTER:�D�P�o�ߓ���
		BREAK
NEXT

path: 原版+前人整合等各种readme/パッチ/eraTW4.756用 排卵誘発剤強化パッチ/ERB/イベント関連/妊娠関連/PREGNANCY.ERB


code:
;-------------------------------------------------
;�����🹂��(�����)
;����n�R�}���h�A���x��1
;-------------------------------------------------
@COM331
#DIM ��������
#DIM ���o�m��
#DIM �����m��
�������� = 0
�����m�� = RAND:100
IF �����m�� <= 9
	;10���ő听��
	EXP:MASTER:��b�o�� ++
	TFLAG:193 = 1
	TFLAG:98 = 2
ELSE
	;�c��͈ꎞ�I�ɐ���
	TFLAG:193 = 0
	TFLAG:98 = 0
ENDIF
LOCAL:2 = 0
LOCAL:1 = TARGET
���o�m�� = TALENT:MASTER:�����m�� ? 5 # 3
;IF TALENT:MASTER:�����m��
;	���o�m�� = 5
;ELSE
;	���o�m�� = 3
;ENDIF
FOR LOCAL, 1, GET_TARGETNUM() + 1
	;�Q�Ă���l�Ɉ��܂����Ȃ�
	SIF CFLAG:(TARGET:LOCAL):����
		CONTINUE
	TARGET = TARGET:LOCAL
	CALL KOJO_MESSAGE_SEND("SUCCESS",-1,TARGET,-1,-1)
	SELECTCASE TFLAG:192
		;�ʏ�
		CASE 0
			;������A�C�X�e�B�[�͖��C�������Ă���ƈ��܂Ȃ�
			IF TCVAR:TARGET:�����򋭓x >= 2 && TFLAG:131 == 252
				;PRINTFORML %CALLNAME:TARGET%�͂����т����Ȃ��炨����f����
				TCVAR:TARGET:�����򂨒��g�p = 0
				CONTINUE
			;[���L�q��][���ȏ�]�͈Ⴂ�̕�����l
			;���o����\���͒����m���̗L����1/2��1/1
			ELSEIF TALENT:TARGET:61 < 0
				IF (���o�m�� - 3) ? !RAND:(���o�m�� - 3) # 1
					;LOCAL:2 ++
					;PRINTFORML %CALLNAME:TARGET%�͂����Ɍ������Ȃ�����
					CONTINUE
				ENDIF
			;���L�ϐ��̑f�����Ȃ���Δ��o����\���͒����m���̗L����1/5��1/3
			ELSEIF TALENT:TARGET:61 == 0
				IF !RAND:���o�m��
					;LOCAL:2 ++
					;PRINTFORML %CALLNAME:TARGET%�͂����Ɍ������Ȃ�����
					CONTINUE
				ENDIF
			ENDIF
		;��������or�听��
		CASE 1
			;������A�C�X�e�B�[�͖��C�������Ă���ƈ��܂Ȃ�
			IF TCVAR:TARGET:�����򋭓x >= 2 && TFLAG:131 == 252
				;PRINTFORML %CALLNAME:TARGET%�͂����т����Ȃ��炨����f����
				TCVAR:TARGET:�����򂨒��g�p = 0
				CONTINUE
			ENDIF
		;�������s
		CASE -1,-2
			CONTINUE
		;�R�}���h�I��
		;CASE -2
			;RETURN 0
	ENDSELECT
	;[���L�݊�][���ꖳ��]������Ίm��ň��ށA�������
	;SIF LOCAL:2
		;BREAK
	CALL COM331_1
	;TFLAG:193�̐��۔����COM��TARGET��p�Ȃ̂ŏC��
	SIF TARGET == LOCAL:1
		�������� = 1
NEXT
;SIF TCVAR:TARGET:�Z�� != 210 && TCVAR:TARGET:���A�� != 210 && TCVAR:TARGET:����� != 1 && !TCVAR:TARGET:�����򋭓x >= 2
SIF !��������
	TFLAG:193 = -1
TFLAG:98 += 3
SIF TFLAG:193 == -1
	TFLAG:98 = 0
;SIF LOCAL:2 > 0
	;TFLAG:98 = 0
DOWNBASE:MASTER:�C�� += 100
DOWNBASE:MASTER:�̗� += 50
TIME += 30
TARGET = LOCAL:1
TFLAG:131 = 0
RETURN 1

@COM331_1

DOWNBASE:�C�� += 10

;�Œ�Ŋl������\�[�X
SOURCE:���y = 500

;ABL:�]�����݂�
IF ABL:�]�� <= 1
	SOURCE:���y += (ABL:�]�� * 60)
ELSEIF ABL:�]�� <= 3
	SOURCE:���y += 200 + (ABL:�]�� * 60)
ELSEIF ABL:�]�� <= 5
	SOURCE:���y += 500 + (ABL:�]�� * 60)
ELSEIF ABL:�]�� <= 8
	SOURCE:���y += 750 + (ABL:�]�� * 75)
ELSEIF ABL:�]�� <= 11
	SOURCE:���y += 1000 + (ABL:�]�� * 75)
ELSE
	SOURCE:���y += 2000 + (ABL:�]�� * 30)
ENDIF

;�D���x���݂�
IF CFLAG:2 <= 500
	SOURCE:���y += CFLAG:2
ELSEIF CFLAG:2 <= 5000
	SOURCE:���y += 500 + (CFLAG:2 - 500) / 3
ELSE
	SOURCE:���y += 2000 + (CFLAG:2 - 5000) / 5
ENDIF
SIF SOURCE:���y < 0
	SOURCE:���y = 0

SOURCE:�� = 200 + 100 * ABL:�]��
SOURCE:���� = 200 + 100 * ABL:�T�h���C

IF TFLAG:193 == -1
	TIMES SOURCE:���y , 0.10
	TIMES SOURCE:���� , 0.50
	TIMES SOURCE:�� , 0.50
ELSEIF TFLAG:193 == 0
	TIMES SOURCE:���y , 1.00
	TIMES SOURCE:���� , 1.00
	TIMES SOURCE:�� , 1.00
ELSE
	TIMES SOURCE:���y , 2.00
	TIMES SOURCE:���� , 2.00
	TIMES SOURCE:�� , 2.00
ENDIF
IF TFLAG:131 == 41
	TCVAR:TARGET:�Z�� = 210
	DOWNBASE:TARGET:�C�� += 150
	DOWNBASE:TARGET:�̗� += 150
	;PRINTFORML %CALLNAME:TARGET%�͛Z�����̂��������ɂ���
ELSEIF TFLAG:131 == 42
	TCVAR:TARGET:���A�� = 210
	DOWNBASE:TARGET:�C�� += 150
	DOWNBASE:TARGET:�̗� += 150
	;PRINTFORML %CALLNAME:TARGET%�͗��A�ܓ���̂��������ɂ���
ELSEIF TFLAG:131 == 250
	;PRINTFORML %CALLNAME:TARGET%�͍�������̂��������ɂ���
	TCVAR:TARGET:����� = 210
	DOWNBASE:TARGET:�C�� += 150
	DOWNBASE:TARGET:�̗� += 150
ELSEIF TFLAG:131 == 252
	;PRINTFORML %CALLNAME:TARGET%�͐��������̂��������ɂ���
	IF TCVAR:TARGET:�����򋭓x < 2
		TCVAR:TARGET:�����򋭓x = 2
		TCVAR:TARGET:�����򂨒��g�p = 1
	ENDIF
ELSEIF TFLAG:131 == 91
	TCVAR:TARGET:�����r�� = 210
	DOWNBASE:TARGET:�C�� += 150
	DOWNBASE:TARGET:�̗� += 150
	;PRINTFORML %CALLNAME:TARGET%�͔r���U���ܓ���̂��������ɂ���
ENDIF
;���������񂾃t���O
TCVAR:300 = 1440 * DAY + TIME

RETURN 1

;-------------------------------------------------
;���s����
;-------------------------------------------------
@COM_ABLE331
;�����🹂����s����
SIF !TFLAG:100
	RETURN 0
;�ꊇ�Ǘ�
SIF GLOBAL_COMABLE(301)
	RETURN RESULT
;�񎞊ԊԊu
SIF TIME_PROGRESS(TCVAR:300) < 120
	RETURN 0
;������
SIF CFLAG:����
	RETURN 0
;�Y���Q��
SIF CFLAG:�Y���Q��
	RETURN 0
SIF !TFLAG:131
	RETURN 0
;����
;SIF CFLAG:MASTER:���݈ʒu == 13 || CFLAG:MASTER:���݈ʒu == 24 || CFLAG:MASTER:���݈ʒu == 30 || CFLAG:MASTER:���݈ʒu == 39
SIF BATHCHECK(CFLAG:MASTER:���݈ʒu) && GET_MAPID(CFLAG:MASTER:���݈ʒu) == MAIN_MAP
	RETURN 0
;�f�[�g��
SIF CHK_DATENOW(CFLAG:�f�[�g��) && CFLAG:���݈ʒu != OMANEKIBEYA()
	RETURN 0
;�C��0
SIF BASE:MASTER:�C�� <= 0
	RETURN 0
;��~���͕s��
SIF FLAG:70
	RETURN 0
RETURN 1

path: 原版+前人整合等各种readme/パッチ/eraTW4.756用 排卵誘発剤強化パッチ/ERB/コマンド関連/COMF/日常系/COMF331 お茶を淹れる（薬入り）.ERB


code:
;-------------------------------------------------
;���������
;����n�R�}���h�A���x��1
;-------------------------------------------------
@COM413
;�H�ނ��Ȃ�
IF !CAN_COOK("�S��", MASTER)
	DRAWLINE
	PRINTFORMW �H�ނ��Ȃ�
	RETURN -1
ENDIF
;��ɏ���擾
IF TARGET <= 0
ELSEIF SHIRAHU(TARGET) == 1 && ABL:�e�� * 500 + ABL:�]�� * 500 + ABL:�����Z�\ * 1000 > CFLAG:310 - CFLAG:MASTER:310
	DISHASSI = TARGET
ENDIF
CALL COOKING_MENU
IF !RESULT
	CALL RESET_DISH
	RETURN -1
ENDIF

;�܂Ȕ␳�Ŕ��������ł��܂�
IF ITEM:�C�`���E�̂܂Ȕ�
	SELECTCASE ITEM:�C�`���E�̂܂Ȕ�
		CASE 1
			DISHQUALITY += RAND:3
		CASE 2
			DISHQUALITY += MAX(RAND:3, 1)
		CASE 3
			DISHQUALITY += MAX(RAND:4, 1)
	ENDSELECT
	PRINTFORML ����ł܂Ȕ��S�n�悢���𗧂ĂĂ���c
ENDIF

IF TFLAG:194 == 1
	DOWNBASE:MASTER:�̗� = 50
	DOWNBASE:MASTER:�C�� = 50
	TIME += 15
	SIF CFLAG:���s
		CFLAG:���s += 15
ELSEIF TFLAG:194 == 2
	DOWNBASE:MASTER:�̗� = 100
	DOWNBASE:MASTER:�C�� = 100
	TIME += 45
	SIF CFLAG:���s
		CFLAG:���s += 45
ELSEIF TFLAG:194 == 3
	DOWNBASE:MASTER:�̗� = 100
	DOWNBASE:MASTER:�C�� = 100
	TIME += 45
	SIF CFLAG:���s
		CFLAG:���s += 45
ELSEIF TFLAG:194 == 4
	DOWNBASE:MASTER:�̗� = 150
	DOWNBASE:MASTER:�C�� = 150
	TIME += 45
	SIF CFLAG:���s
		CFLAG:���s += 45
ENDIF

IF TARGET > 0 && !CFLAG:���� && !FLAG:70
	IF DISHASSI
		TFLAG:193 = 1
		EXP:�����o�� ++
	ELSE
		TFLAG:193 = 0
	ENDIF
	;�Œ�Ŋl������\�[�X
	SOURCE:���y = 200

	;�M��
	TFLAG:98 = 3

	;ABL:�]�����݂�
	IF ABL:�]�� <= 1
		SOURCE:���y += (ABL:�]�� * 60)
	ELSEIF ABL:�]�� <= 3
		SOURCE:���y += 200 + (ABL:�]�� * 60)
	ELSEIF ABL:�]�� <= 5
		SOURCE:���y += 500 + (ABL:�]�� * 60)
	ELSEIF ABL:�]�� <= 8
		SOURCE:���y += 750 + (ABL:�]�� * 75)
	ELSEIF ABL:�]�� <= 11
		SOURCE:���y += 1000 + (ABL:�]�� * 75)
	ELSE
		SOURCE:���y += 2000 + (ABL:�]�� * 30)
	ENDIF

	;�D���x���݂�
	IF CFLAG:2 <= 500
		SOURCE:���y += CFLAG:2
	ELSEIF CFLAG:2 <= 5000
		SOURCE:���y += 500 + (CFLAG:2 - 500) / 3
	ELSE
		SOURCE:���y += 2000 + (CFLAG:2 - 5000) / 5
	ENDIF
	SIF SOURCE:���y < 0
		SOURCE:���y = 0
ENDIF
TCVAR:MASTER:308 = 0
SIF TARGET < 1 && (!GET_OPTION_COOKING("�������t���ݒ�") || GET_OPTION_COOKING("�ٕ������\") || GET_OPTION_COOKING("�򕨍����\"))
	CALL MIX_MENU
SIF GET_OPTION_COOKING("�������t���ݒ�")
	CALL AUTO_SEASONING

IF ITEM:�����w�쏑
	SIF !RAND:2
		EXP:MASTER:�����o�� ++
	SIF !RAND:2 && TARGET
		EXP:TARGET:�����o�� ++
ENDIF
DISHTIME = 1440 * DAY + TIME

STAIN:MASTER:0 = 0
STAIN:MASTER:1 = 0
CFLAG:MASTER:���ɐ��t = 0
CFLAG:MASTER:��ɐ��t = 0
CFLAG:MASTER:��ɐ��t = 0
IF TARGET
	STAIN:0 = 0
	STAIN:1 = 0
	CFLAG:���ɐ��t = 0
	CFLAG:��ɐ��t = 0
	CFLAG:��ɐ��t = 0
ENDIF

RETURN 1

@COOKING_MENU
PRINTL �������܂����H
{
CALL ASK_M(
	"����ς��߂�", 1,
	"�y�H",           CAN_COOK("�y�H", MASTER),
	"��H",           CAN_COOK("��H", MASTER),
	"�f�U�[�g",       CAN_COOK("�f�U�[�g", MASTER),
	"�֒f�̗���",     CAN_COOK("�֒f�̗���", MASTER),
	"������",         (CAN_COOK("������", MASTER) || CAN_COOK("�J�G������", MASTER)))
}
SELECTCASE RESULT
CASE 1
	DISHTYPE = RESULT
	CALL INGREDIENT_CHOICE
	SIF RESULT == 0
		RETURN 0
	IF GET_OPTION_COOKING("�������e��������")
		CALL COOKING(, "�u�������e��������v")
	ELSE
		CALL COOKING
		SIF RESULT == 0
			RETURN 0
	ENDIF
	TFLAG:194 = 1
	CALL VEGE_CHOICE
	CALL REMOVE_VEGE
	CALL SHOW_DISHDATA
	WAIT
	RETURN 1
CASE 2
	DISHTYPE = RESULT
	CALL INGREDIENT_CHOICE
	SIF RESULT == 0
		RETURN 0
	IF GET_OPTION_COOKING("�������e��������")
		CALL COOKING(, "�u�������e��������v")
	ELSE
		CALL COOKING
		SIF RESULT == 0
			RETURN 0
	ENDIF
	TFLAG:194 = 2
	CALL VEGE_CHOICE
	CALL REMOVE_VEGE
	CALL SHOW_DISHDATA
	WAIT
	RETURN 1
CASE 3
	DISHTYPE = RESULT
	CALL INGREDIENT_CHOICE
	SIF RESULT == 0
		RETURN 0
	IF GET_OPTION_COOKING("�������e��������")
		CALL COOKING(, "�u�������e��������v")
	ELSE
		CALL COOKING
		SIF RESULT == 0
			RETURN 0
	ENDIF
	TFLAG:194 = 3
	CALL VEGE_CHOICE
	CALL REMOVE_VEGE
	CALL SHOW_DISHDATA
	WAIT
	RETURN 1
CASE 4
	IF !ITEM:0
		PRINTFORMW �H�ނ�����܂���
		TIME += 5
		RETURN 0
	ENDIF

	ITEM:0 --
	DISHTYPE = 4
	CALL COOKING
	TFLAG:194 = FLAG:����
	CALL VEGE_CHOICE
	CALL REMOVE_VEGE
	CALL SHOW_DISHDATA
	WAIT
	RETURN 1
CASE 5
	PRINTFORML �H�ނ�I��ł�������
	CALL ASK_M(@"���@{ITEM:��}������", ITEM:��, @"���܂����@{ITEM:���܂���}������", ITEM:���܂���,@"�J�G���@{ITEM:�J�G��}�C����", ITEM:�J�G�� >= 3,"��߂�",1)
	SELECTCASE RESULT
		CASE 0
			DISHQUALITY = 1
			DISHTYPE = 5
			;@COOKING�p�Ɉꎞ�I��5��6���������邪���DISHTYPE = 2�ŏ㏑�������
			DISHTASTE += GET_TASTE_INGREDIENT("��")
		CASE 1
			DISHQUALITY = 2
			DISHTYPE = 5
			DISHTASTE += GET_TASTE_INGREDIENT("���܂���")
		CASE 2
			DISHQUALITY = 1
			DISHTYPE = 6
			DISHTASTE += GET_TASTE_INGREDIENT("�J�G��")
		CASE 3
			RETURN 0
	ENDSELECT
	IF GET_OPTION_COOKING("�������e��������")
		CALL COOKING(, "�u�������e��������v")
	ELSE
		CALL COOKING
		SIF RESULT == 0
			RETURN 0
	ENDIF
	TFLAG:194 = 2
	CALL VEGE_CHOICE
	CALL REMOVE_VEGE
	CALL SHOW_DISHDATA
	WAIT
	RETURN 1
CASE 0
	RETURN 0
ENDSELECT

;�������s�֐�
;�����˗��ɗ��p�ł���悤�ɍ쐬
;��ɌĂяo������DISHTYPE��DISHQUALITY�����߂Ă�������
;�H�ނ̏��������ɂ��܂��Ă�������
@COOKING(CHARA, OP)
#DIM  CHARA ;�L������n���Ǝ�`���Ă����i�˗��p�ACOM413�͎��s��ɗ����o������̂ŕs�v�j
#DIMS CONST MENU_TYPE, 7 = "", "SNACK", "MAINDISH", "DESSERT", "FORBIDDEN","FISH", "FROG"
#DIMS OP
SIF CHARA
	DISHASSI = CHARA
IF STRCOUNT(OP, "�u�������e��������v") || MENU_TYPE:DISHTYPE == "FORBIDDEN"
	CALL SET_DISHNAME(MENU_TYPE:DISHTYPE)
ELSE
	CALL SELECT_DISHNAME(MENU_TYPE:DISHTYPE)
	SIF RESULT == 0
		RETURN
ENDIF
PRINTFORMW %DISHNAME%�����܂�
SELECTCASE DISHTYPE
CASE 1
	CALL COOKING_TAKARI([[�H�X�q]], 5)
	CALL COOKING_TAKARI([[����]], 5)
CASE 2
	CALL COOKING_TAKARI([[�H�X�q]], 10)
	CALL COOKING_TAKARI([[����]], 10)
	EXP:MASTER:�����o�� ++
	IF CHARA
		EXP:CHARA:�����o�� ++
		SIF EXP:MASTER:�����o�� > EXP:CHARA:�����o��
			EXP:CHARA:�����o�� ++
	ENDIF
CASE 3
CASE 4
CASE 5
	YOGORE:(CFLAG:MASTER:���݈ʒu) += 500
ENDSELECT
YOGORE:(CFLAG:MASTER:���݈ʒu) += 500
	EXP:MASTER:�����o�� ++
	IF CHARA
		EXP:CHARA:�����o�� ++
		SIF EXP:MASTER:�����o�� > EXP:CHARA:�����o��
			EXP:CHARA:�����o�� ++
	ENDIF
SIF DISHASSI
	DISHTASTE += GET_TASTE_ASSIBONUS(DISHASSI)
DISHTASTE += GET_TASTE_ASSIBONUS(MASTER)
IF STRCOUNT(DISHTASTE, ESCAPE("�G��/"))
	ITEM:�G�� --
ELSEIF STRCOUNT(DISHTASTE, ESCAPE("�Õ�/"))
	ITEM:�Õ� --
ELSEIF STRCOUNT(DISHTASTE, ESCAPE("����/"))
	ITEM:���� --
ELSEIF STRCOUNT(DISHTASTE, ESCAPE("���܂���/"))
	ITEM:���܂��� --
ELSEIF STRCOUNT(DISHTASTE, ESCAPE("��/"))
	ITEM:�� --
ELSEIF STRCOUNT(DISHTASTE, ESCAPE("�J�G������/"))
	ITEM:�J�G�� -= 3
ENDIF
RETURN 1

;�������蓮�ݒ�֐�
@SELECT_DISHNAME(MENU_TYPE)
#DIMS         MENU_TYPE      ;��肽�����j���[�̎��
#DIM          NUM_MENUS      ;
#DIM          FOOD_ID        ;
#DIMS DYNAMIC FOOD_NAME, 100 ;
#DIMS DYNAMIC FES_NAME       ;
#DIM  DYNAMIC CNT_SHOW       ;
FES_NAME '= FESTIVAL_MENU()
PRINTFORML ������낤���H
SELECTCASE MENU_TYPE
CASE "SNACK"
	PRINTFORML ���y�H���j���[��
	ARRAYCOPY "FOOD_SNACK", "FOOD_NAME"
	NUM_MENUS = MENUS_SNACK

CASE "MAINDISH"
	PRINTFORML ����H���j���[��
	ARRAYCOPY "FOOD_MAINDISH", "FOOD_NAME"
	NUM_MENUS = MENUS_MAINDISH

CASE "DESSERT"
	PRINTFORML ���f�U�[�g���j���[��
	ARRAYCOPY "FOOD_DESSERT", "FOOD_NAME"
	NUM_MENUS = MENUS_DESSERT

CASE "FISH"
	PRINTFORML �����������j���[��
	ARRAYCOPY "FOOD_FISH", "FOOD_NAME"
	NUM_MENUS = MENUS_FISH

CASE "FROG"
	PRINTFORML ���J�G���������j���[��
	ARRAYCOPY "FOOD_FROG", "FOOD_NAME"
	NUM_MENUS = MENUS_FROG
ENDSELECT
FOR FOOD_ID, NUM_MENUS - 1, -1, -1
	SIF !STRLENS(FOOD_NAME:FOOD_ID)
		CONTINUE
	LOCALS = [{FOOD_ID, 2}]%FOOD_NAME:FOOD_ID, 24%
	PRINTFORM �@
	PRINTBUTTON LOCALS, FOOD_ID
	CNT_SHOW ++
	SIF CNT_SHOW % 3 == 0
		PRINTFORML
NEXT
SIF CNT_SHOW % 3
	PRINTFORML
SIF STRLENS(FES_NAME) && MENU_TYPE == "MAINDISH"
	PRINTFORML �@[90]%FES_NAME, 24%
PRINTFORML �@[99]��߂�
DO
	INPUT
	SELECTCASE RESULT
	CASE 99
		RETURN
	CASE 90
		SIF !(STRLENS(FES_NAME) && MENU_TYPE == "MAINDISH")
			GOTO RETRY
		DISHNAME  '= FES_NAME
		MENU_TYPE '= "FESTIVAL"
	CASE 0 TO NUM_MENUS - 1
		FOOD_ID = RESULT
		SIF !STRLENS(FOOD_NAME:FOOD_ID)
			GOTO RETRY
		DISHNAME  '= FOOD_NAME:FOOD_ID
	CASEELSE
		$RETRY
		PRINTFORML �����ȓ��͂ł�
		CONTINUE
	ENDSELECT
	BREAK
LOOP 1
SELECTCASE MENU_TYPE
CASE "SNACK"
	DISHTYPE = 1
	FLAG:���� = FOOD_ID
CASE "MAINDISH"
	DISHTYPE = 2
	FLAG:���� = FOOD_ID + 10
CASE "DESSERT"
	DISHTYPE = 3
	FLAG:���� = FOOD_ID + 50
CASE "FISH"
	DISHTYPE = 2
CASE "FROG"
	DISHTYPE = 2
CASE "FESTIVAL"
	DISHTYPE = 5
	FLAG:���� = 999
ENDSELECT
DISHTASTE += GET_TASTE_MENUTYPE(MENU_TYPE)
DISHTASTE += DISHNAME + "/" + GET_TASTE_DISH(DISHNAME)
RETURN 1

;�������I�֐�
;�����̌����FLAG�ւ̋L�^�ADISHNAME����܂�
;DISHQUALITY�̐ݒ�͌Ăяo�����ōs������
@SET_DISHNAME(MENU_TYPE)
#DIMS MENU_TYPE
#DIM  FOOD_ID
SELECTCASE MENU_TYPE
CASE "SNACK"
	DISHTYPE = 1
	FLAG:���� = RAND:MENUS_SNACK + 1
	DISHNAME = %FOOD_SNACK:(FLAG:����)%
CASE "MAINDISH"
	DISHTYPE = 2
	FOOD_ID = RAND:MENUS_MAINDISH
	FLAG:���� = FOOD_ID + 10
	DISHNAME = %FOOD_MAINDISH:(FOOD_ID)%
	IF FESTIVAL_MENU() != ""
		DISHNAME = %FESTIVAL_MENU()%
		FLAG:���� = 999
		DISHTYPE = 5
	ENDIF
CASE "DESSERT"
	DISHTYPE = 3
	FOOD_ID = RAND:MENUS_DESSERT
	DISHNAME = %FOOD_DESSERT:(FOOD_ID)%
	FLAG:���� = FOOD_ID + 50
CASE "FORBIDDEN"
	DISHTYPE = 4
	DISHNAME = %FOOD_FORBIDDEN:(DAY:2)%
	FLAG:���� = 99 + DAY:2
CASE "FISH"
	DISHTYPE = 2
	DISHNAME = %FOOD_FISH:(RAND:MENUS_FISH)%
CASE "FROG"
	DISHTYPE = 2
	DISHNAME = %FOOD_FROG:(RAND:MENUS_FROG)%
ENDSELECT

IF DISHTYPE == 5
	DISHTASTE += GET_TASTE_MENUTYPE("FESTIVAL")
ELSE
	DISHTASTE += GET_TASTE_MENUTYPE(MENU_TYPE)
ENDIF
DISHTASTE += DISHNAME + "/" + GET_TASTE_DISH(DISHNAME)

@�H��(ARG)
#DIM ���͉񕜗�
#DIM �C�͉񕜗�
#DIM �̗͉񕜗�
#DIM ���͉񕜗�
#DIM �C�͉񕜗�
#DIM �̗͉񕜗�
#DIMS CONST DISH_TO_�����x = "", "�y�H", "��H", "�f�U�[�g", "��H", "��H"
#DIM COOK_POWER		;�L�����̒����́A�܂��͊O�H���̖�
;�񕜗���0.1%�P��

���͉񕜗� = 0
�C�͉񕜗� = 0
�̗͉񕜗� = 0
���͉񕜗� = 0
�C�͉񕜗� = 0
�̗͉񕜗� = 0

SELECTCASE DISHTYPE
	CASE 1
	;�y�H
		�̗͉񕜗� = 65
		�C�͉񕜗� = 200
		���͉񕜗� = 50
	CASE 2
	;��H
		�̗͉񕜗� = 200
		�C�͉񕜗� = 300
		���͉񕜗� = 200
	CASE 3
	;�f�U�[�g
		�̗͉񕜗� = 50
		�C�͉񕜗� = 500
		���͉񕜗� = 50
	CASE 4
	;�֒f�̗���
		�̗͉񕜗� = 300
		�C�͉񕜗� = 300
		���͉񕜗� = 300
		EXP:ARG:�b�o�� += 30
	CASE 5
	;�Փ����j���[
		�̗͉񕜗� = 100
		�C�͉񕜗� = 150
		���͉񕜗� = 100
ENDSELECT

IF !DISH_RADICAL()
ELSEIF TASTE_GIVEUP(ARG, DISH_RADICAL())
	TIMES �̗͉񕜗�, 0.1
	TIMES �C�͉񕜗�, 0.1
	TIMES ���͉񕜗�, 0.1
ELSE
	TIMES �̗͉񕜗�, 1.2
	TIMES �C�͉񕜗�, 1.2
	TIMES ���͉񕜗�, 1.2
ENDIF
CALL �����x�㏸(ARG, DISH_TO_�����x:DISHTYPE)

�̗͉񕜗� = (MAXBASE:ARG:�̗� * �̗͉񕜗� / 1000) * (ABL:MASTER:�����Z�\ + 5 + DISHQUALITY) / 10
�C�͉񕜗� = (MAXBASE:ARG:�C�� * �C�͉񕜗� / 1000) * (ABL:MASTER:�����Z�\ + 5 + DISHQUALITY) / 10
���͉񕜗� = (MAXBASE:ARG:���� * ���͉񕜗� / 1000) * (ABL:MASTER:�����Z�\ + 5 + DISHQUALITY) / 10
;�ǉ��H�ރ{�[�i�X
IF DISHVEGE > 0
	�̗͉񕜗� += 50
	�C�͉񕜗� += 50
	���͉񕜗� += 50
ENDIF

;�����̘r�ɂ�����␳
COOK_POWER = 8 + ABL:MASTER:�����Z�\ * 2
SIF DISHASSI
	COOK_POWER += ABL:DISHASSI:�����Z�\

CALL RECOVER(ARG, �̗͉񕜗�, "�̗�", "�H���ɂ���")
CALL RECOVER(ARG, �C�͉񕜗�, "�C��", "�H���ɂ���")
IF ARG == MASTER
	CALL RECOVER(ARG, ���͉񕜗�, "����", "�H���ɂ���")
ELSEIF STRLENS(DISHTASTE) && GET_OPTION_COOKING("�̓_�@�\�I��")
	CALL FOOD_TASTING(ARG, DISHTASTE, COOK_POWER)
	PRINTFORML %CALLNAME:ARG + "�̕]���c�c�c�c", 40, LEFT%{TCVAR:ARG:�������]���l, 3}�_
ENDIF

;�C�^�Y�����d���܂�Ă���
SELECTCASE DISH_MIXTURE()
CASE DISH_DRAG_�Z��
	TCVAR:TARGET:�Z�� = 210
CASE DISH_DRAG_���A��
	TCVAR:TARGET:���A�� = 210
CASE DISH_DRAG_�����
	TCVAR:TARGET:����� = 210
CASE DISH_DRAG_������
	IF TCVAR:TARGET:�����򋭓x < 2
		TCVAR:TARGET:�����򋭓x = 2
		TCVAR:TARGET:�����򂨒��g�p = 1
	ENDIF
CASE DISH_DRAG_�r���U����
	TCVAR:TARGET:�����r�� = 210
ENDSELECT

@�����x�㏸(ARG,ARGS)
SIF TASTE_GIVEUP(ARG, DISH_RADICAL())
	RETURN
SELECTCASE ARGS
	CASE "�y�H"
		TCVAR:ARG:�󕠎��� = 1440 * DAY + TIME + 180
		SIF TALENT:ARG:���V
			TCVAR:ARG:�󕠎��� -= 30
	CASE "��H"
		TCVAR:ARG:�󕠎��� = 1440 * DAY + TIME + 360
		SIF TALENT:ARG:���V
			TCVAR:ARG:�󕠎��� -= 90
	CASE "�f�U�[�g"
		TCVAR:ARG:�f�U�[�g�󕠎��� = 1440 * DAY + TIME + 180
		SIF TALENT:ARG:���V
			TCVAR:ARG:�f�U�[�g�󕠎��� -= 30
ENDSELECT

;-------------------------------------------------
;���s����
;-------------------------------------------------
@COM_ABLE413
;��~���͕s��
SIF FLAG:70 == 1
	RETURN 0
;�|�����s����
SIF !TFLAG:100
	RETURN 0
;�ꊇ�Ǘ�
SIF GLOBAL_COMABLE(413)
	RETURN RESULT

;�~�[�Ȃ̂�
SIF !KITCHEN(CFLAG:MASTER:���݈ʒu)
	RETURN 0
;�C��0
SIF BASE:MASTER:�C�� <= 0
	RETURN 0
SIF CFLAG:���ӂ�
	RETURN 0
;�Y���Q��
SIF CFLAG:�Y���Q��
	RETURN 0
;�C�^�Y����
SIF CFLAG:MASTER:�C�^�Y��
	RETURN 0
;���ɗ���������Ă���
SIF DISHNAME != ""
	RETURN 0
RETURN 1

@HUNGER(ARG)
#FUNCTIONS
LOCAL = TCVAR:ARG:�󕠎��� - TIME:1
SELECTCASE LOCAL
	CASE IS > 270
	SETCOLOR C_GREEN
		RETURNF "����"
	CASE IS > 180
	SETCOLOR C_P_GREEN
		RETURNF "������"
	CASE IS > 0
	SETCOLOR C_P_YELLOW
		RETURNF "����"
	CASEELSE
		RETURNF "�H����"
ENDSELECT

@INGREDIENT_CHOICE
PRINTFORML �H�ނ�I��ł�������
CALL ASK_M(@"�G��({ITEM:48})", ITEM:48, @"�Õ�({ITEM:50})", ITEM:50, @"����({ITEM:47})", ITEM:47,"��߂�",1)
SELECTCASE RESULT
	CASE 0
		DISHTASTE += GET_TASTE_INGREDIENT("�G��")
	CASE 1
		DISHTASTE += GET_TASTE_INGREDIENT("�Õ�")
	CASE 2
		DISHTASTE += GET_TASTE_INGREDIENT("����")
	CASE 3
		DISHTYPE = 0
		RETURN 0
ENDSELECT
DISHQUALITY = RESULT + 1
RETURN DISHQUALITY

;�ǉ������؂̑I��
@VEGE_CHOICE
#DIMS CONST VEGE_NAME = "", "�L���x�c", "�C�`�S", "�J�u", "�L���E��", "�g�}�g", "�X�C�J", "�i�X", "�T�c�}�C��", "�u�h�E", "�����l", "�j���W��", "�l�M", "�R��"
#DIM  VEGE_ID
#DIM  TEMP_INPUT
;��؂��Ȃ�
{
IF MAX(
	ITEM:�L���x�c, ITEM:�C�`�S,     ITEM:�J�u,
	ITEM:�L���E��, ITEM:�g�}�g,     ITEM:�X�C�J,
	ITEM:�i�X,     ITEM:�T�c�}�C��, ITEM:�u�h�E,
	ITEM:�����l,   ITEM:�j���W��,   ITEM:�l�M,
	ITEM:�R��                                    ) <= 0
}
	RETURN
ENDIF
DO
	PRINTFORML �����ɒǉ�����H�ނ�I��ŉ�����
	FOR VEGE_ID, VARSIZE("VEGE_NAME") - 1, 0, -1
		IF ITEM:(GETNUM(ITEM, VEGE_NAME:VEGE_ID)) > 0
			PRINTBUTTON @"{VEGE_ID, 2, RIGHT}[%VEGE_NAME:VEGE_ID, 10%]", VEGE_ID
		ELSE
			SETCOLOR 0x606060
			PRINTPLAINFORM {VEGE_ID, 2, RIGHT}[%VEGE_NAME:VEGE_ID, 10%]
			RESETCOLOR
		ENDIF
		IF VEGE_ID % 3 == 1
			PRINTFORML
		ELSE
			PRINTFORM �@
		ENDIF
	NEXT
	PRINTBUTTON @" 0[%"��߂�", 10%]", 0
	PRINTFORML
	INPUT
	TEMP_INPUT = RESULT
	SELECTCASE TEMP_INPUT
	CASE 0
		RETURN
	CASE 1 TO VARSIZE("VEGE_NAME") - 1
		;�s�V�����������[�v�p�Ɏg�����̂��g���܂킵�Ă܂�
		VEGE_ID = GETNUM(ITEM, VEGE_NAME:TEMP_INPUT)
		SIF ITEM:VEGE_ID <= 0
			GOTO RETRY
		BREAK
	CASEELSE
		$RETRY
		PRINTFORML �����ȓ��͂ł�
		CONTINUE
	ENDSELECT
LOOP 1
ITEM:VEGE_ID --
DISHVEGE  = VEGE_ID
DISHTASTE += ITEMNAME:VEGE_ID + "/" + GET_TASTE_VEGE(ITEMNAME:VEGE_ID)

@RESET_DISH
DISHTIME = 0
DISHSPOIL = 0
FLAG:���� = 0
DISHQUALITY = 0
DISHTYPE = 0
DISHNAME =

DISHTASTE =
DISHVEGE = 0
DISHASSI = 0

;��؏����������s����֐�
;�T�j�[�N���s�̃R���r�ŗ��������7����ؔ���
@CAN_REMOVE_VEGE
#FUNCTION
#DIM DYNAMIC VEGE_HATE_MAS
#DIM DYNAMIC VEGE_HATE_ASI
SIF !STRCOUNT(DISHTASTE, ESCAPE("���/"))
	RETURNF 0
SIF FLAG:�Ȃ肫��
	VEGE_HATE_MAS = STRCOUNT(GET_STR(, "�L�����f�[�^", FLAG:�Ȃ肫��, "�����F�����Ȗ�"), ESCAPE("���/"))
SIF RAND(1, 11) <= VEGE_HATE_MAS
	RETURNF 1
SIF !DISHASSI
	RETURNF 0
VEGE_HATE_ASI = STRCOUNT(GET_STR(, "�L�����f�[�^", DISHASSI, "�����F�����Ȗ�"), ESCAPE("���/"))
SIF RAND(1, 11) <= VEGE_HATE_ASI
	RETURNF 2

;��؏����������s�֐�
;���X�̗����̖��o�ɂ��e�����o�Ă��܂���
;�Ȃɂ������A�����̃o�����X�I�ȃT���V���O������Ă��܂��Ɣ]���⊮���Ă�������
;
;�N���s���x�[�X�ł��邽��
;�L���E��/�T�c�}�C��/�l�M�A�������甲���Ă邪�߂�ǂ����������̂܂�
;
;�]���̓g�}�g/�j���W�����������͂�������������̂ł����o�����X�͂Ƃ�邩��
;��ؔ��������ō��]�����󂯂₷���u�g��/�N�₩�v�������Ă��܂���
;�����ĉe�����󂯂Ȃ��C�`�S�͑��ς�炸����
@REMOVE_VEGE
SELECTCASE CAN_REMOVE_VEGE()
CASE 0
	RETURN
CASE 1
	PRINTFORML %CALLNAME:MASTER%�͗������炱������Ƌ��Ȗ�؂���菜�����c�c
CASE 2
	PRINTFORML %CALLNAME:DISHASSI%�͗������炱������Ƌ��Ȗ�؂���菜�����c�c
ENDSELECT

SIF STRCOUNT(DISHTASTE, ESCAPE("�L���x�c/"))
	DISHTASTE '= REPLACE(DISHTASTE, "�L���x�c\/|�����ς�\/", "")

SIF STRCOUNT(DISHTASTE, ESCAPE("�J�u/"))
	DISHTASTE '= REPLACE(DISHTASTE, "�J�u\/|�Ȃ߂炩\/", "")

SIF STRCOUNT(DISHTASTE, ESCAPE("�g�}�g/"))
	DISHTASTE '= REPLACE(DISHTASTE, "�g�}�g\/|�g��\/|�N�₩\/", "")

SIF STRCOUNT(DISHTASTE, ESCAPE("�i�X/"))
	DISHTASTE '= REPLACE(DISHTASTE, "�i�X\/|�����ς�\/", "")

SIF STRCOUNT(DISHTASTE, ESCAPE("�����l/"))
	DISHTASTE '= REPLACE(DISHTASTE, "�����l\/|��i\/", "")

SIF STRCOUNT(DISHTASTE, ESCAPE("�j���W��/"))
	DISHTASTE '= REPLACE(DISHTASTE, "�j���W��\/|�N�₩\/", "")

SIF STRCOUNT(DISHTASTE, ESCAPE("�R��/"))
	DISHTASTE '= REPLACE(DISHTASTE, "�R��\/|���\/", "")

DISHTASTE '= REPLACE(DISHTASTE, "���\/", "��ؔ���\/")

IF DISHNAME == "����u��"
	DISHNAME = ���₵�u��
	DISHTASTE += "���f/�n��/"
	DISHTASTE '= REPLACE(DISHTASTE, "����u��\/", "���₵�u��\/")
ELSEIF DISHNAME == "���Ђ���"
	DISHNAME = ���Ђ����Ȃ�
	DISHTASTE += "�n��/" * 3
	DISHTASTE '= REPLACE(DISHTASTE, "���Ђ���\/", "���Ђ����Ȃ�\/")
ELSEIF DISHNAME == "�Е��ɑ吷���"
	DISHNAME = �吷���
	DISHTASTE '= REPLACE(DISHTASTE, "�Е��ɑ吷���\/", "�吷���\/")
ELSEIF DISHNAME == "���b�c�@�����`�[�Y�ƃg�}�g�̃T���_"
	DISHNAME = ���b�c�@�����`�[�Y�����̃T���_
	DISHTASTE += "�`�[�Y/" * 2
	DISHTASTE '= REPLACE(DISHTASTE, "���b�c�@�����`�[�Y�ƃg�}�g�̃T���_\/", "���b�c�@�����`�[�Y�����̃T���_\/")
ENDIF
DISHVEGE = 0

;����̃��j���[�̎��s�����𖞂����Ă��邩�𔻒�
;�ꉞ�AMASTER�ȊO���n����悤�ɂ���
@CAN_COOK(MENU_TYPE, C_ID)
#FUNCTION
#DIM  DYNAMIC C_ID      ;�������s�҂�C_ID
#DIMS DYNAMIC MENU_TYPE ;����ΏۂƂȂ钲�����j���[
;�j���n(FESTIVAL)�͔���Ȃ��Ȃ̂ł����������ӁiMAINDISH����̔h���ɂȂ�j
SELECTCASE MENU_TYPE
CASE "SNACK", "�y�H"
	SIF MAX(ITEM:����, ITEM:�G��, ITEM:�Õ�) > 0
		RETURNF 1
CASE "MAINDISH", "��H"
	SIF ABL:C_ID:�����Z�\ > 1 && MAX(ITEM:����, ITEM:�G��, ITEM:�Õ�) > 0
		RETURNF 1
CASE "DESSERT", "�f�U�[�g"
	SIF ABL:C_ID:�����Z�\ > 2 && MAX(ITEM:����, ITEM:�G��, ITEM:�Õ�) > 0
		RETURNF 1
CASE "FORBIDDEN", "�֒f�̗���"
	SIF ABL:C_ID:�����Z�\ > 2 && ITEM:���[�^�[ > 0
		RETURNF 1
CASE "FISH", "������"
	SIF ABL:C_ID:�����Z�\ > 1 && MAX(ITEM:��, ITEM:���܂���) > 0
		RETURNF 1
CASE "FROG", "�J�G������"
	SIF ABL:C_ID:�����Z�\ > 1 && ITEM:�J�G�� >= 3
		RETURNF 1
CASE "ALL", "�S��", ""
;DYNAMIC�𗘗p�����ċA�Ăяo��
	SIF CAN_COOK("SNACK", C_ID)
		RETURNF 1
	SIF CAN_COOK("MAINDISH", C_ID)
		RETURNF 1
	SIF CAN_COOK("DESSERT", C_ID)
		RETURNF 1
	SIF CAN_COOK("FORBIDDEN", C_ID)
		RETURNF 1
	SIF CAN_COOK("FISH", C_ID)
		RETURNF 1
	SIF CAN_COOK("FROG", C_ID)
		RETURNF 1
ENDSELECT
RETURNF 0

;�������\���pF�֐�
@EX_DISHNAME
#FUNCTIONS
#DIMS DYNAMIC EX_DISHNAME
SIF DISHASSI
	EX_DISHNAME += CALLNAME:DISHASSI + "�ƍ����"
SIF DISHVEGE
	EX_DISHNAME += ITEMNAME:DISHVEGE + "������"
SIF STRCOUNT(DISHTASTE, ESCAPE("����/"))
	EX_DISHNAME += "����"
EX_DISHNAME += DISHNAME
IF !STRCOUNT(DISHTASTE, ESCAPE("��ؔ���/"))
ELSEIF !GROUPMATCH(DISHNAME, "���₵�u��", "���Ђ����Ȃ�", "�吷���", "���b�c�@�����`�[�Y�����̃T���_")
	EX_DISHNAME += "�i��ؔ����j"
ENDIF
RETURNF EX_DISHNAME

;����ȗ������ł�����I��\������֐�
@SHOW_DISHDATA
PRINTFORML ��%EX_DISHNAME()%��
CALL SHOW_TASTE(DISHTASTE)

;���̕\���p�֐�
;���ɂ����炸�g���܂킹�����H
;�����̌��E�ɒ���
@SHOW_TASTE(TASTE_STR)
#DIMS TASTE_STR               ;�\���Ώۂ̖��f�[�^
#DIMS DYNAMIC TASTE_LIST, 100 ;�����X�g
#DIM  DYNAMIC TASTE_CNT,  100 ;�����X�g�e�v�f�̏d����
#DIM  DYNAMIC TASTE_NUM       ;���̎�ނ̑���
#DIM  DYNAMIC SHOW_NUM        ;�\���������̐�
#DIM  TASTE_ID                ;���[�v�p
;�����X�g�̎擾
CALLF CNT_SPLIT(TASTE_STR, TASTE_LIST, TASTE_CNT, TASTE_NUM)
;�����X�g�̕\��
FOR TASTE_ID, 0, TASTE_NUM
	SIF !STRLENS(TASTE_LIST:TASTE_ID)
		CONTINUE
	LOCALS = [%TASTE_LIST:TASTE_ID%]Lv{TASTE_CNT:TASTE_ID, 2}
	;�V�X�e������6�����A�����̂�14����������肠��
	PRINTFORM �@%LOCALS, 20%
	SHOW_NUM ++
	SIF SHOW_NUM % 5
		CONTINUE
	PRINTFORML
NEXT
SIF SHOW_NUM % 5
	PRINTFORML

;-------------------------------------------------
;���o�]�������֐�
;�ꉞ�͕����񂾂��ŕ]���ł���悤�ɂ͂�����TCVAR���Q�Ƃ���
;-------------------------------------------------
@FOOD_TASTING(C_ID, TASTE_FOOD, COOK_POWER)
#DIM          C_ID              ;�ΏۃL����
#DIM          COOK_POWER		;�L�����̒����́A�܂��͊O�H���̖�
#DIMS         TASTE_FOOD        ;�o���������̖�
TCVAR:C_ID:�����D�]���l = TASTE_GOOD(C_ID, TASTE_FOOD, COOK_POWER)
TCVAR:C_ID:�������]���l = TASTE_BAD(C_ID, TASTE_FOOD)
TCVAR:C_ID:�������]���l = TCVAR:C_ID:�����D�]���l * 100 / (TCVAR:C_ID:�����D�]���l + TCVAR:C_ID:�������]���l)

SELECTCASE TCVAR:C_ID:�������]���l
	CASE IS >= 80
		CALL KIGEN_CHANGE(C_ID,100,1)
	CASE IS < 40
		CALL KIGEN_CHANGE(C_ID,100, -1)
ENDSELECT

;���o�]���֐�GOOD
@TASTE_GOOD(C_ID, TASTE_FOOD, COOK_POWER)
#FUNCTION
#DIM          C_ID              ;�ΏۃL����
#DIMS         TASTE_FOOD        ;�o���������̖�
#DIMS DYNAMIC TASTE_CHARA       ;�L�����̍D��
#DIM  DYNAMIC TASTE_GOOD        ;�����ˁI�Ǝv�����x����
#DIM  COOK_POWER				;�L�����̒����́A�܂��͊O�H���̖�

TASTE_CHARA '= GET_STR(, "�L�����f�[�^", C_ID, "�����F�D���Ȗ�")
TASTE_GOOD = 30 + 10 * STR_MULTI_COUNT(TASTE_CHARA, TASTE_FOOD)
SIF STRCOUNT(TASTE_FOOD, ESCAPE("��������/"))
	TASTE_GOOD += 20
SIF STRCOUNT(TASTE_FOOD, ESCAPE("���C�h��/"))
	TASTE_GOOD += 5
SIF STRCOUNT(TASTE_FOOD, ESCAPE("�ƒ�I/"))
	TASTE_GOOD += 5
;��،����͖�ؔ����Ɗ�ԁi�X�̖�؂͔��肵�Ȃ��j
SIF STRCOUNT(TASTE_FOOD, ESCAPE("��ؔ���/"))
	TASTE_GOOD += STRCOUNT(GET_STR(, "�L�����f�[�^", C_ID, "�����F�����Ȗ�"), ESCAPE("���/"))

;�����{�[�i�X
SIF GROUPMATCH(NAME_MOON(DAY:3), "�]��", "�\�ܖ� -���H�̖���- ") && STRCOUNT(TASTE_FOOD, ESCAPE("����/"))
	TASTE_GOOD += 3

SIF !STRLENS(DISHNAME)
	RETURNF MAX(TASTE_GOOD, 1)

;������聫�͒ʏ�̗���������p�̕]�������ł�
IF !DISH_RADICAL()
ELSEIF TASTE_GIVEUP(C_ID, DISH_RADICAL())
	TIMES TASTE_GOOD, 0.1
ELSE
	TIMES TASTE_GOOD, 1.5
ENDIF

TASTE_GOOD = TASTE_GOOD * COOK_POWER

;�H�����ʑ听���̎�
SIF TFLAG:193 == 1
	TIMES TASTE_GOOD, 1.5
;���肽��
SIF DISHSPOIL < 1
	TIMES TASTE_GOOD, 1.2

;������������������ۛ�����
SIF DISHASSI == C_ID
	TIMES TASTE_GOOD, 1.1

;����n�ځ[�Ȃ�
IF TALENT:C_ID:���l
	TIMES TASTE_GOOD, 2.0
ELSEIF TALENT:C_ID:����
	TIMES TASTE_GOOD, 1.3
ELSEIF TALENT:C_ID:�v��
	TIMES TASTE_GOOD, 1.1
ENDIF

;������ʂɂ��ǉ�����
SIF STRCOUNT(TASTE_FOOD, ESCAPE("�n��/"))
		TIMES TASTE_GOOD, 0.8
SIF STRCOUNT(TASTE_FOOD, ESCAPE("�n��/"))
		TIMES TASTE_GOOD, 1.2
SELECTCASE GET_TALENTNAME(GETNUM(TALENT, "�_��"), TALENT:C_ID:�_��)
CASE "���_", "腖�"
CASEELSE
	SIF TALENT:C_ID:�_�� && STRCOUNT(TASTE_FOOD, ESCAPE("�쌱/"))
		TIMES TASTE_GOOD, 1.1
ENDSELECT

SELECTCASE GET_TALENTNAME(GETNUM(TALENT, "�l��"), TALENT:C_ID:�l��)
CASE "�l��"
	SIF STR_MULTI_COUNT(TASTE_FOOD, ESCAPE("������/�s��/"))
		TIMES TASTE_GOOD, 0.8
CASE "���l"
	SIF STRCOUNT(TASTE_FOOD, ESCAPE("����/"))
		TIMES TASTE_GOOD, 1.1
ENDSELECT

SIF STRCOUNT(TASTE_FOOD, ESCAPE("�p���t��/")) && GET_TALENTNAME(GETNUM(TALENT, "�񕜑��x"), TALENT:C_ID:�񕜑��x) == "�񕜒x��"
		TIMES TASTE_GOOD, 1.1
SIF STRCOUNT(TASTE_FOOD, ESCAPE("�@��/")) && STR_MULTI_COUNT(TASTE_FOOD, ESCAPE("�f�U�[�g/�y�H/"))
		TIMES TASTE_GOOD, 1.1
SIF STRCOUNT(TASTE_FOOD, ESCAPE("��Η�/")) && STR_MULTI_COUNT(TASTE_FOOD, ESCAPE("�Z��/��/"))
		TIMES TASTE_GOOD, 1.1
SIF STRCOUNT(TASTE_FOOD, ESCAPE("���/")) && STRCOUNT(TASTE_FOOD, ESCAPE("��i/"))
		TIMES TASTE_GOOD, 1.1
SIF STRCOUNT(TASTE_FOOD, ESCAPE("����/")) && STRCOUNT(TASTE_FOOD, ESCAPE("�a�H/"))
		TIMES TASTE_GOOD, 1.1
SIF STRCOUNT(TASTE_FOOD, ESCAPE("�����I/")) && GET_TALENTNAME(GETNUM(TALENT, "���I����"), TALENT:C_ID:���I����) == "�D��S"
		TIMES TASTE_GOOD, 1.1
SIF STRCOUNT(TASTE_FOOD, ESCAPE("�d����/")) && TALENT:C_ID:�d��
		TIMES TASTE_GOOD, 1.1
SIF STRCOUNT(TASTE_FOOD, ESCAPE("���\�I/")) && (TALENT:C_ID:�Z�t�� || TALENT:C_ID:���~)
		TIMES TASTE_GOOD, 1.1

SIF STRCOUNT(TASTE_FOOD, ESCAPE("�L��/")) && STR_MULTI_COUNT(TASTE_FOOD, ESCAPE("���/����/"))
		TIMES TASTE_GOOD, 1.2
SIF STRCOUNT(TASTE_FOOD, ESCAPE("������/")) && STR_MULTI_COUNT(TASTE_FOOD, ESCAPE("�Z��/��/�g����/"))
		TIMES TASTE_GOOD, 1.2
SIF STRCOUNT(TASTE_FOOD, ESCAPE("�؂₩/")) && STRCOUNT(TASTE_FOOD, ESCAPE("�N�₩/"))
		TIMES TASTE_GOOD, 1.5
SIF STRCOUNT(TASTE_FOOD, ESCAPE("�J���X�}/")) && STRCOUNT(TASTE_FOOD, ESCAPE("�g��/"))
		TIMES TASTE_GOOD, 1.5
SIF STRCOUNT(TASTE_FOOD, ESCAPE("������/")) && STRCOUNT(TASTE_FOOD, ESCAPE("��/�J���[���C�X/"))
		TIMES TASTE_GOOD, 1.5
SIF STRCOUNT(TASTE_FOOD, ESCAPE("�ؐl����/")) && STRCOUNT(TASTE_FOOD, ESCAPE("����/"))
		TIMES TASTE_GOOD, 2.0
SIF STRCOUNT(TASTE_FOOD, ESCAPE("����/")) && STR_MULTI_COUNT(TASTE_FOOD, ESCAPE("�h�g/�������/�X�V/"))
		TIMES TASTE_GOOD, 2.0

IF STRCOUNT(TASTE_FOOD, ESCAPE("�V�痬/"))
	SIF ALCOHOL_FACE(C_ID) != "�@�f�ʁ@"
		TIMES TASTE_GOOD, 1.1
ENDIF
IF STRCOUNT(TASTE_FOOD, ESCAPE("�S�̉B����/"))
	SELECTCASE ALCOHOL_FACE(C_ID)
	CASE "�ق됌��"
		TIMES TASTE_GOOD, 1.1
	CASE "�����ǂ�"
		TIMES TASTE_GOOD, 1.3
	CASE "���ł���"
		TIMES TASTE_GOOD, 1.5
	ENDSELECT
ENDIF
SIF STRCOUNT(TASTE_FOOD, ESCAPE("���t/"))
	TASTE_GOOD = TASTE_GOOD * (MARK:C_ID:�������� + 1)

IF STRCOUNT(TASTE_FOOD, ESCAPE("�X��/"))
	SIF GET_MONTH() == "�Ă̌�"
		TIMES TASTE_GOOD, 2.0
ELSEIF STRCOUNT(TASTE_FOOD, ESCAPE("�t��/"))
	SIF GROUPMATCH(GET_MONTH(), "�~�̌�", "�t�̌�")
		TIMES TASTE_GOOD, 1.5
ELSEIF STRCOUNT(TASTE_FOOD, ESCAPE("�H��/"))
	SIF GROUPMATCH(GET_MONTH(), "�Ă̌�", "�H�̌�")
		TIMES TASTE_GOOD, 1.5
ENDIF

SIF STRCOUNT(TASTE_FOOD, ESCAPE("���i/")) && (TALENT:C_ID:�v�� || TALENT:C_ID:���� || TALENT:C_ID:���l)
		TIMES TASTE_GOOD, 0.5

SIF DISHASSI > 0 && CSVRELATION(C_ID, DISHASSI)
	TASTE_GOOD = TASTE_GOOD * CSVRELATION(C_ID, DISHASSI) / 100

TASTE_GOOD = TASTE_GOOD / 10
RETURNF MAX(TASTE_GOOD, 1)

;���o�]���֐�BAD
@TASTE_BAD(C_ID, TASTE_FOOD)
#FUNCTION
#DIM          C_ID              ;�ΏۃL����
#DIMS         TASTE_FOOD        ;�o���������̖�
#DIMS DYNAMIC TASTE_CHARA       ;�L�����̍D��
#DIM  DYNAMIC TASTE_BAD         ;���_�ˁI�Ǝv�����x����
TASTE_CHARA '= GET_STR(, "�L�����f�[�^", C_ID, "�����F�����Ȗ�")
TASTE_BAD = 30 + 15 * STR_MULTI_COUNT(TASTE_CHARA, TASTE_FOOD)

SIF !STRLENS(DISHNAME)
	RETURNF MAX(TASTE_BAD, 1)

;���x�m�ۗp
TASTE_BAD = TASTE_BAD * 10

IF !DISH_RADICAL()
ELSEIF TASTE_GIVEUP(C_ID, DISH_RADICAL())
	TIMES TASTE_BAD, 3.0
ELSE
	TIMES TASTE_BAD, 0.8
ENDIF

;�H�����ʑ厸�s�̎�
SIF TFLAG:193 == -1
	TIMES TASTE_BAD, 1.5
;�����o�ߎ���
SELECTCASE DISHSPOIL
CASE 1
	TIMES TASTE_BAD, 1.2
CASE 2
	TIMES TASTE_BAD, 1.8
ENDSELECT

SIF DISHASSI == C_ID
	TIMES TASTE_BAD, 0.9

;������ʂɂ��ǉ�����
SIF STRCOUNT(TASTE_FOOD, ESCAPE("�n��/"))
		TIMES TASTE_BAD, 1.2
SIF GET_TALENTNAME(GETNUM(TALENT, "�l��"), TALENT:C_ID:�l��) == "�l��" && STR_MULTI_COUNT(TASTE_FOOD, ESCAPE("������/�s��/"))
		TIMES TASTE_BAD, 1.1
SIF STRCOUNT(TASTE_FOOD, ESCAPE("�C�z��/"))
		TIMES TASTE_BAD, 0.9
SIF STRCOUNT(TASTE_FOOD, ESCAPE("���C�h��/"))
		TIMES TASTE_BAD, 0.9
SIF STRCOUNT(TASTE_FOOD, ESCAPE("�ƒ�I/"))
		TIMES TASTE_BAD, 0.9
SIF STRCOUNT(TASTE_FOOD, ESCAPE("�K�^/"))
		TIMES TASTE_BAD, 0.8

SIF DISHASSI > 0 && CSVRELATION(C_ID, DISHASSI)
	TASTE_BAD = TASTE_BAD * 100 / CSVRELATION(C_ID, DISHASSI)

TASTE_BAD = TASTE_BAD / 10

RETURNF MAX(TASTE_BAD, 1)

;-------------------------------------------------
;�C�^�Y���֘A����
;-------------------------------------------------
;�C�^�Y���ɂ��H���̒��f����
;�ꉞ����BIT�Ԃ��Ă邪����܈Ӗ��͂Ȃ��낤
@TASTE_GIVEUP(C_ID, TASTE_TYPE)
#FUNCTION
#DIM         C_ID			;����ΏۃL����
#DIM         TASTE_TYPE		;�C�^�Y���̃^�C�v
SELECTCASE TASTE_TYPE
CASE DISH_RADICAL_���h
	SIF GETBIT(CFLAG:C_ID:���o�n�D, DISH_RADICAL_���h)
		RETURNF 0
	SIF STRCOUNT(GET_STR(, "�L�����f�[�^", C_ID, "�����F�D���Ȗ�"), ESCAPE("�X�p�C�X/"))
		RETURNF 0
	RETURNF DISH_RADICAL_���h
CASE DISH_RADICAL_����
	SIF GETBIT(CFLAG:C_ID:���o�n�D, DISH_RADICAL_����)
		RETURNF 0
	SIF STRCOUNT(GET_STR(, "�L�����f�[�^", C_ID, "�����F�D���Ȗ�"), ESCAPE("�Â�/"))
		RETURNF 0
	RETURNF DISH_RADICAL_����
CASE DISH_RADICAL_�킳��
	SIF GETBIT(CFLAG:C_ID:���o�n�D, DISH_RADICAL_�킳��)
		RETURNF 0
	SIF STRCOUNT(GET_STR(, "�L�����f�[�^", C_ID, "�����F�D���Ȗ�"), ESCAPE("�X�p�C�X/"))
		RETURNF 0
	RETURNF DISH_RADICAL_�킳��
CASE DISH_RADICAL_������
	SIF GETBIT(CFLAG:C_ID:���o�n�D, DISH_RADICAL_������)
		RETURNF 0
	RETURNF DISH_RADICAL_������
ENDSELECT

;�����ɃC�^�Y�����{����Ă��邩�ۂ�
;�Z��/�����̖��t�����O
@DISH_MIXTURE()
#FUNCTION
LOCAL = DISH_RADICAL()
SIF LOCAL
	RETURNF LOCAL
LOCAL = DISH_DRAG()
	RETURNF LOCAL
RETURNF

;�C�^�Y���ɂ��ߌ��Ȗ��̂��闿���ł���
@DISH_RADICAL()
#FUNCTION
SIF GETBIT(TCVAR:MASTER:308, DISH_RADICAL_���h)
	RETURNF DISH_RADICAL_���h
SIF GETBIT(TCVAR:MASTER:308, DISH_RADICAL_����)
	RETURNF DISH_RADICAL_����
SIF GETBIT(TCVAR:MASTER:308, DISH_RADICAL_�킳��)
	RETURNF DISH_RADICAL_�킳��
SIF GETBIT(TCVAR:MASTER:308, DISH_RADICAL_������)
	RETURNF DISH_RADICAL_������
RETURNF

;�򕨂̎d���܂ꂽ�����ł���
@DISH_DRAG()
#FUNCTION
SIF GETBIT(TCVAR:MASTER:308, DISH_DRAG_�Z��)
	RETURNF DISH_DRAG_�Z��
SIF GETBIT(TCVAR:MASTER:308, DISH_DRAG_���A��)
	RETURNF DISH_DRAG_���A��
SIF GETBIT(TCVAR:MASTER:308, DISH_DRAG_�����)
	RETURNF DISH_DRAG_�����
SIF GETBIT(TCVAR:MASTER:308, DISH_DRAG_������)
	RETURNF DISH_DRAG_������
SIF GETBIT(TCVAR:MASTER:308, DISH_DRAG_�r���U����)
	RETURNF DISH_DRAG_�r���U����
RETURNF

;-------------------------------------------------
;�������痿���̖����̋L�q
;-------------------------------------------------
;GET_TASTE�n�͕������n���ĕ����񂪕Ԃ��Ă���`��
;���R�Ƃ��Ă͎��ۂɗ���������ʈȊO�ł��g����悤�ɂ��邽��
;�߂�l��"HOGE/"�ŕK��������"/"�����邱�Ɓi�ォ��̒ǉ��ɑΉ��ł���悤�ɂ���j
;-------------------------------------------------
;�����̎��
@GET_TASTE_MENUTYPE(ARGS)
#FUNCTIONS
SELECTCASE ARGS
CASE "SNACK"
	RETURNF "�y�H/"
CASE "MAINDISH"
	RETURNF "��H/"
CASE "DESSERT"
	RETURNF "�f�U�[�g/"
CASE "FORBIDDEN"
	RETURNF "�䗿��/"
	;"�֒f"�͐H�ޑ��ŕt�^���Ă܂�
CASE "FISH"
	RETURNF "������/"
CASE "FROG"
	RETURNF "�J�G������/"
CASE "FESTIVAL"
	RETURNF "��������/"
ENDSELECT

;���C���H��
@GET_TASTE_INGREDIENT(ARGS)
#FUNCTIONS
SELECTCASE ARGS
CASE "�G��"
	RETURNF "�G��/���/"
CASE "�Õ�"
	RETURNF "�Õ�/���f/"
CASE "����"
	RETURNF "����/��i/"
CASE "�J�G��"
	RETURNF "���/"
CASE "��"
	RETURNF "��/���f/"
CASE "���܂���"
	RETURNF "���܂���/��i/"
CASE "���[�^�["
	RETURNF "�֒f/"
ENDSELECT

;�ǉ��H�ށ����
;�ǉ��H�ނ͌Ăяo�����ŐH�ޖ����̂�t�^
@GET_TASTE_VEGE(ARGS)
#FUNCTIONS
SELECTCASE ARGS
CASE "�L���x�c"
	RETURNF "���/�����ς�/"
CASE "�C�`�S"
	RETURNF "�ʕ�/���킢��/�g��/�N�₩/"
CASE "�J�u"
	RETURNF "���/�Ȃ߂炩/"

CASE "�L���E��"
	RETURNF "���/���C/"
CASE "�g�}�g"
	RETURNF "���/�g��/�N�₩/"
CASE "�X�C�J"
	RETURNF "�ʕ�/���C/�Â�/�g��/"

CASE "�i�X"
	RETURNF "���/�����ς�/"
CASE "�T�c�}�C��"
	RETURNF "���/�{�����[����/"
CASE "�u�h�E"
	RETURNF "�ʕ�/���킢��/�Â�/"

CASE "�����l"
	RETURNF "���/��i/"
CASE "�j���W��"
	RETURNF "���/�N�₩/"
CASE "�l�M"
	RETURNF "���/�X�p�C�X/"

CASE "�R��"
	RETURNF "���/���/"
ENDSELECT

;�e�����̖�
;�e�����͌Ăяo�����ŗ��������̂�t�^
@GET_TASTE_DISH(ARGS)
#FUNCTIONS
SELECTCASE ARGS
;��H
CASE "�G��"
	RETURNF "�a�H/����/�����ς�/"
CASE "����������"
	RETURNF "�a�H/����/�{��/�����ς�/�Ȃ߂炩/�V���v��/"
CASE "����u��"
	RETURNF "���/�V���v��/"
CASE "���X�`"
	RETURNF "�a�H/�`��/"
CASE "���Ђ���"
	RETURNF "�a�H/���/�����ς�/"
CASE "���ǂ�"
	RETURNF "�a�H/�˗�/�Ȃ߂炩/"
CASE "�f��"
	RETURNF "�a�H/�˗�/�����ς�/�Ȃ߂炩/"
CASE "����"
	RETURNF "�a�H/�˗�/���/�����ς�/�Ȃ߂炩/"
CASE "�������c"
	RETURNF "�m�H/�{��/�{�����[����/"
CASE "�V�`���["
	RETURNF "�m�H/�`��/�{�����[����/�Z��/"
CASE "�n���o�[�O"
	RETURNF "�m�H/������/�{�����[����/�Z��/"
CASE "�O���^��"
	RETURNF "�m�H/�`�[�Y/�{�����[����/�Z��/"
CASE "�J���[���C�X"
	RETURNF "�m�H/����/�{�����[����/�X�p�C�X/�Z��/"
CASE "����Ԃ����"
	RETURNF "�a�H/������/�����ς�/"
CASE "���[����"
	RETURNF "����/�˗�/�Ȃ߂炩/"
CASE "���I�Ă�"
	RETURNF "�a�H/������/�{�����[����/��/"
CASE "�X�e�[�L"
	RETURNF "�m�H/������/���/�{�����[����/��/"
CASE "���Ҍ{"
	RETURNF "����/������/�{��/�{�����[����/�g����/��/�T�N�T�N/"
CASE "���b�c�@�����`�[�Y�ƃg�}�g�̃T���_"
	RETURNF "�m�H/���/�`�[�Y/�g�}�g/�����ς�/�N�₩/�g��/"
CASE "�h�[�s���O�R���\���X�[�v"
	RETURNF "�m�H/�䗿��/�`��/�֒f/�X�p�C�X/"
CASE "�`��从����c����"
	RETURNF "����/������/�{��/����/�{�����[����/�g����/��/�T�N�T�N/�N�₩/"
CASE "�M���M�[����"
	RETURNF "�䗿��/�{�����[����/�V���v��/"
CASE "�V�n��"
	RETURNF "�a�H/�g����/��/�T�N�T�N/"
CASE "��܂��育�͂�"
	RETURNF "�a�H/����/�{�����[����/�V���v��/"
CASE "�Е��ɑ吷���"
	RETURNF "�a�H/����/���/���f/�����ς�/�{�����[����/�V���v��/"

;�Ö�
CASE "�v����"
	RETURNF "�m�H/��i/�{��/�Ղ�Ղ�/�Ȃ߂炩/"
CASE "�P�[�L"
	RETURNF "�m�H/��i/���n/�{��/�{�����[����/�N�₩/"
CASE "�[���["
	RETURNF "�m�H/�Ղ�Ղ�/�����ς�/�N�₩/���C/"
CASE "�^���g"
	RETURNF "�m�H/���n/�{��/���킢��/"
CASE "�N�b�L�[","�}�J����"
	RETURNF "�m�H/���n/�{��/�T�N�T�N/���킢��/"
CASE "�p�C"
	RETURNF "�m�H/���n/�T�N�T�N/"
CASE "�r�"
	RETURNF "�a�H/����/�{�����[����/�Ȃ߂炩/"
CASE "�啟"
	RETURNF "�a�H/����/�{�����[����/��������/"
CASE "�J�X�e��"
	RETURNF "�m�H/��i/���n/�{��/"
CASE "�c�q"
	SIF GROUPMATCH(NAME_MOON(DAY:3), "�]��", "�\�ܖ� -���H�̖���- ")
		RETURNF "�a�H/��������/����/"
	RETURNF "�a�H/��������/"
CASE "�t���[�c���荇�킹"
	RETURNF "�ʕ�/�����ς�/�N�₩/�V���v��/"
CASE "�p�E���h�P�[�L"
	RETURNF "�m�H/���n/�{��/"
CASE "����݂�"
	RETURNF "�a�H/����/���C/�Ȃ߂炩/"
CASE "�₵�傤��"
	RETURNF "�a�H/��������/�V���v��/"
CASE "�^�s�I�J�~���N�e�B�["
	RETURNF "�Ȃ߂炩/��������/���킢��/���C/"

;�y�H
CASE "�T���h�C�b�`"
	RETURNF "�m�H/���n/"
CASE "���ɂ���"
	RETURNF "�a�H/�V���v��/"
CASE "�n���o�[�K�["
	RETURNF "�m�H/���/���n/�{�����[����/"
CASE "�X�R�[��"
	RETURNF "�m�H/��i/���n/"
CASE "�V�E�}�C"
	RETURNF "����/������/"
CASE "���܂�"
	RETURNF "����/���n/������/�Z��/��������/"
CASE "�t�B�b�V�����`�b�v�X"
	RETURNF "������/�g����/��/"
CASE "�^�R�X"
	RETURNF "�m�H/���/���n/�Z��/"
CASE "�����Ă�"
	RETURNF "�a�H/���n/"

;�֒f
CASE "�g�����[�^�["
	RETURNF "�g����/��/"
CASE "E�}�b�T�[�W�������[�^�[�̓�����"
	RETURNF "�����ς�/"
CASE "�N���L���b�v�p���[�^�[�̈���"
	RETURNF "�a�H/�����ς�/"
CASE "�I�i�z�[���d���Ẵ��[�^�[�ύ���"
	RETURNF "�a�H/�`��/�{�����[����/�Z��/"

;�J�G������
CASE "�J�G���̂���g��"
	RETURNF "������/�g����/��/�T�N�T�N/"
CASE "�J�G���J���["
	RETURNF "�m�H/����/������/�{�����[����/�X�p�C�X/�Z��/"
CASE "�J�G���̃\�e�["
	RETURNF "�m�H/������/��/"
CASE "�J�G���̉��Ă�"
	RETURNF "������/�V���v��/"

;������
CASE "�X�V"
	RETURNF "�a�H/��i/�����ς�/�N�₩/"
CASE "�Ă���"
	RETURNF "�a�H/�V���v��/"
CASE "�ϋ�"
	RETURNF "�a�H/���C/"
CASE "���Ă�"
	RETURNF "�a�H/�Z��/"
CASE "�������"
	RETURNF "�a�H/��i/�����ς�/�V���v��/�N�₩/"
CASE "�}���l"
	RETURNF "�m�H/�����ς�/�N�₩/"
CASE "���j�G��"
	RETURNF "�m�H/�T�N�T�N/"
CASE "�h�g"
	RETURNF "�a�H/��i/�����ς�/�V���v��/"
CASE "�Ƃ�Ă�"
	RETURNF "�a�H/�Z��/"
CASE "���c�g��"
	RETURNF "�a�H/�g����/��/�T�N�T�N/"
CASE "�t�B�b�V���J���["
	RETURNF "�m�H/����/�{�����[����/�X�p�C�X/�Z��/"
CASE "�X�^�[�Q�C�W�[�p�C"
	RETURNF "�䗿��/�m�H/���n/�T�N�T�N/"

;��������
CASE "����������"
	RETURNF "�a�H/��i/�{�����[����/�N�₩/"
CASE "�b����"
	RETURNF "�a�H/����/�{�����[����/"
CASE "�N�z������"
	RETURNF "�a�H/�˗�/�Ȃ߂炩/"
ENDSELECT

;����ŕt�^����閡�o
@GET_TASTE_ASSIBONUS(C_ID)
#FUNCTIONS
#DIM          C_ID
#DIMS DYNAMIC TEMP_TASTE
IF C_ID == MASTER && FLAG:�Ȃ肫��
	TEMP_TASTE '= GET_STR(, "�L�����f�[�^", FLAG:�Ȃ肫��, "�����F�������")
ELSE
	TEMP_TASTE '= GET_STR(, "�L�����f�[�^", C_ID, "�����F�������")
ENDIF

SELECTCASE GET_TALENTNAME(GETNUM(TALENT, "�_��"), TALENT:C_ID:�_��)
CASE "���_", "腖�"
	TEMP_TASTE += "���E��/"
CASEELSE
	SIF TALENT:C_ID:�_��
		TEMP_TASTE += "�쌱/"
ENDSELECT

SELECTCASE GET_TALENTNAME(GETNUM(TALENT, "�l��"), TALENT:C_ID:�l��)
CASE "�l��"
CASE "���@�g��"
	TEMP_TASTE += "���@/"
CASE "�ޏ�"
	TEMP_TASTE += "�쌱/"
CASE "�V�l"
	TEMP_TASTE += "�V�E��/"
CASE "��l"
	TEMP_TASTE += "����/"
CASE "���l"
	TEMP_TASTE += "���s��/"
ENDSELECT

SIF GET_TALENTNAME(GETNUM(TALENT, "�񐶕�"), TALENT:C_ID:�񐶕�) == "���"
	TEMP_TASTE += "�s�v�c/"

SIF TALENT:C_ID:�d��
	TEMP_TASTE += "�d����/"
SIF TALENT:C_ID:�S
	TEMP_TASTE += "�S�̉B����/"
SIF TALENT:C_ID:�V��
	TEMP_TASTE += "�V�痬/"
SIF TALENT:C_ID:�X��
	TEMP_TASTE += "�X��/"

SIF TALENT:C_ID:�����m��
	TEMP_TASTE += "�n�[�u/"
SIF GET_TALENTNAME(GETNUM(TALENT, "�񕜑��x"), TALENT:C_ID:�񕜑��x) == "�񕜑���" || TALENT:C_ID:�ە�
	TEMP_TASTE += "�p���t��/"
SIF GET_TALENTNAME(GETNUM(TALENT, "�K�����x"), TALENT:C_ID:�K�����x) == "�K������" || GET_TALENTNAME(GETNUM(TALENT, "�񕜑��x"), TALENT:C_ID:�񕜑��x) == "�񕜒x��"
	TEMP_TASTE += "�@��/"
SIF TALENT:C_ID:���y�m�� >= 1 || TALENT:C_ID:���� >= 1
	TEMP_TASTE += "�|�p�I/"
SIF TALENT:C_ID:�Z�t�� || TALENT:C_ID:���~
	TEMP_TASTE += "���\�I/"
SIF TALENT:C_ID:�v�� || TALENT:C_ID:����
	TEMP_TASTE += "����/"
SIF TALENT:C_ID:���g�I
	TEMP_TASTE += "�C�z��/"
SIF GROUPMATCH(ALCOHOL_FACE(C_ID), "���ł���", "�����ǂ�")
	TEMP_TASTE += "�ւׂꂯ/"
SIF TALENT:C_ID:���� < 0
	TEMP_TASTE += "�}�C���h/"
RETURNF TEMP_TASTE

@COOKING_TAKARI(ARG, �m��)
#DIM �m��

;�^�J��Ȃ�
IF !CAN_TAKARI(ARG)
	�m�� = 0
;���K���Ȃ�100%
ELSEIF AT_HOME(ARG) && !CFLAG:ARG:�_�ЍݏZ
	�m�� = 100
;�������_�Ȃ�񕪂̈�
ELSEIF AT_HOME(ARG) && CFLAG:ARG:�_�ЍݏZ
	�m�� = �m�� * 1 / 2
ENDIF

;�m��
SIF �m�� < RAND:100
	RETURN

CFLAG:ARG:���_���K = 1
CFLAG:ARG:���݈ʒu = CFLAG:MASTER:���݈ʒu
TCVAR:ARG:�Ȃ�ׂ������Ȃ� = 1
PRINTFORMW �����̋C�z��k������%CALLNAME:ARG%������Ă����c�c

@CAN_TAKARI(ARG)
#FUNCTION
;��������-1h�O
SIF !BETWEENTIME(CFLAG:ARG:���K����, CFLAG:ARG:�A��� - 60)
	RETURNF 0
;MASTER���O
SIF !AT_HOME(MASTER)
	RETURNF 0
;����������
SIF CFLAG:MASTER:���݈ʒu == OMANEKIBEYA()
	RETURNF 0
;MASTER�Ɠ����ꏊ
SIF CFLAG:ARG:���݈ʒu == CFLAG:MASTER:���݈ʒu
	RETURNF 0
;�Q�Ă�
SIF CFLAG:ARG:����
	RETURNF 0
;�d����
SIF CFLAG:ARG:�s�� == 5
	RETURNF 0
RETURNF 1

path: 原版+前人整合等各种readme/パッチ/eraTW4.756用 排卵誘発剤強化パッチ/ERB/コマンド関連/COMF/日常系/COMF413 料理を作る.ERB


code:
;-------------------------------------------------
;��𐷂�
;����n�R�}���h�A���x��1
;-------------------------------------------------
@COM425
PRINTL �ǂ̖�������܂����H
$LOOP
SIF ITEM:41
	PRINTFORML [{41}] %ITEMNAME:41%
SIF ITEM:42
	PRINTFORML [{42}] %ITEMNAME:42%
SIF ITEM:250
	PRINTFORML [{250}] %ITEMNAME:250%
SIF ITEM:252
	PRINTFORML [{252}] %ITEMNAME:252%
SIF ITEM:91
	PRINTFORML [{91}] %ITEMNAME:91%
PRINTL [999] ��߂�
INPUT

SIF RESULT == 999
	RETURN 0
IF RESULT != 41 && RESULT != 42 && RESULT != 250 && RESULT != 252 && RESULT != 91
	GOTO LOOP
ELSEIF ITEM:RESULT
	TFLAG:131 = RESULT
	PRINTFORML ������%ITEMNAME:RESULT%�������܂���
	ITEM:RESULT -= 1
IF FLAG:70
	BASE:MASTER:TSP -= 30
ELSE
	TIME += 10
ENDIF
	RETURN 1
ELSE
	RETURN 0
ENDIF

;-------------------------------------------------
;���s����
;-------------------------------------------------
;��𐷂�
@COM_ABLE425
;�ڌ��҂�����Ƒʖ�
SIF TARGET > 0 && !FLAG:70
	RETURN 0
SIF !TFLAG:100
	RETURN 0
;�ꊇ�Ǘ�
SIF GLOBAL_COMABLE(425)
	RETURN RESULT
;�~�[�E�d���̃L�b�`���E��Ղ̒������E�����X
SIF !KITCHEN(CFLAG:MASTER:���݈ʒu) &&  CFLAG:MASTER:���݈ʒu != 29 &&  CFLAG:MASTER:���݈ʒu != 42 &&  CFLAG:MASTER:���݈ʒu != �����X
	RETURN 0
;�C��0
SIF BASE:MASTER:�C�� <= 0
	RETURN 0
SIF CFLAG:���ӂ� == 2
	RETURN 0
SIF TFLAG:131
	RETURN 0
RETURN 1

path: 原版+前人整合等各种readme/パッチ/eraTW4.756用 排卵誘発剤強化パッチ/ERB/コマンド関連/COMF/日常系/COMF425 薬を盛る.ERB


code:
{
#DIMS CONST FOOD_MAINDISH =
"�G��","����������","����u��","���X�`","���Ђ���","���ǂ�","�f��","����","�������c","�V�`���[",
"�n���o�[�O","�O���^��","�J���[���C�X","����Ԃ����","���[����","���I�Ă�","�X�e�[�L","���Ҍ{","���b�c�@�����`�[�Y�ƃg�}�g�̃T���_","�h�[�s���O�R���\���X�[�v",
"�`��从����c����","�M���M�[����","�V�n��","��܂��育�͂�","�Е��ɑ吷���"
}

#DIM CONST MENUS_MAINDISH = 24

{
#DIMS CONST FOOD_DESSERT =
"�v����","�P�[�L","�[���[","�^���g","�N�b�L�[","�p�C","�r�","�啟","�J�X�e��","�c�q",
"�t���[�c���荇�킹","�p�E���h�P�[�L", "����݂�", "�}�J����", "�^�s�I�J�~���N�e�B�[","�₵�傤��"
}

#DIM CONST MENUS_DESSERT = 16

{
#DIMS CONST FOOD_SNACK = "","�T���h�C�b�`","���ɂ���","�n���o�[�K�[","�X�R�[��","�V�E�}�C","���܂�","�t�B�b�V�����`�b�v�X","�^�R�X","�����Ă�"
}

#DIM CONST MENUS_SNACK = 9

{
#DIMS CONST FOOD_FORBIDDEN = "","�g�����[�^�[","E�}�b�T�[�W�������[�^�[�̓�����","�N���L���b�v�p���[�^�[�̈���","�I�i�z�[���d���Ẵ��[�^�[�ύ���"
}

{
#DIMS CONST FOOD_FROG = "�J�G���̂���g��","�J�G���J���[","�J�G���̃\�e�[","�J�G���̉��Ă�"
}

#DIM CONST MENUS_FROG = 4

{
#DIMS CONST FOOD_FISH =
"�X�V","�Ă���","�ϋ�","���Ă�","�������","�}���l","���j�G��","�h�g","�Ƃ�Ă�","���c�g��",
"�t�B�b�V���J���[","�X�^�[�Q�C�W�[�p�C"
}

#DIM CONST MENUS_FISH = 12

#DIMS DISHNAME
#DIM DISHTYPE
;(1=�y�H�@2=��H�@3=�f�U�[�g�@4=�֒f�@5=�j��)
#DIM DISHQUALITY
#DIM DISHSPOIL
#DIM DISHTIME
#DIM  DISHVEGE  ;�����ɒǉ�������ؑf�ށAITEM�ԍ������̂܂ܓn���܂�
#DIM  DISHASSI  ;��������`�����L����
#DIMS DISHTASTE ;�����̖�

;�C�^�Y���p�̖�BIT��CONST��`
#DIM CONST DISH_RADICAL_���h = 3
#DIM CONST DISH_RADICAL_���� = 4
#DIM CONST DISH_RADICAL_�킳�� = 5
#DIM CONST DISH_RADICAL_������ = 6

#DIM CONST DISH_DRAG_�Z�� = 21
#DIM CONST DISH_DRAG_���A�� = 22
#DIM CONST DISH_DRAG_����� = 23
#DIM CONST DISH_DRAG_������ = 24
#DIM CONST DISH_DRAG_�r���U���� = 25

path: 原版+前人整合等各种readme/パッチ/eraTW4.756用 排卵誘発剤強化パッチ/ERB/コマンド関連/COMF/日常系/FOOD.ERH


code:
@MIX_MENU
PRINTL ���������܂����H
{
CALL ASK_M(
	"��߂Ă���",  1,
	"���t���ύX", !GET_OPTION_COOKING("�������t���ݒ�"),
	"�h���I�Ȗ��ɂ���",  GET_OPTION_COOKING("�ٕ������\"),
	"���N�X������������",  GET_OPTION_COOKING("�򕨍����\") && MAX(ITEM:�Z��, ITEM:���A��, ITEM:�����, ITEM:������) > 0
	)
}
SELECTCASE RESULT
CASE 0
	RETURN
CASE 1
	CALL MANUAL_SEASONING
CASE 2
	CALL MIXTURE_SPICE
CASE 3
	CALL MIXTURE_DRUG
ENDSELECT
RETURN RESULT

@AUTO_SEASONING
#DIM AUTO_TASTE
SIF TCVAR:MASTER:308
	RETURN
TCVAR:MASTER:308 = (GET_OPTION_COOKING("�������t���ݒ�") - 10)

@MANUAL_SEASONING
PRINTL ���t����ύX���܂����H
CALL ASK_M("����",  1, "�Z����", 1, "����",  1)
SELECTCASE RESULT
CASE 2
	PRINTL �����𔖖��ɖ��t����
CASE 1
	PRINTL ������Z�����ɖ��t����
CASE 0
	PRINTFORML ������%CALLNAME:MASTER%�D�݂ɖ��t����
ENDSELECT
SIF RESULT
	TCVAR:MASTER:308 = RESULT
RETURN RESULT

@MIXTURE_SPICE
#DIM CONST BIT_MIX_SPICE = 0, 3, 4, 5, 6
PRINTL �����d���������c
{
CALL ASK_M(
	"����ς��߂�",  1,
	"���hDEATH�\�[�X", 1,
	"���ÃT�b�J����",  1,
	"�����Ղ胏�T�r",  1,
	"�Z�k�������ʏ`",  1)
}
SIF RESULT
	SETBIT TCVAR:MASTER:308, BIT_MIX_SPICE:RESULT
SELECTCASE RESULT
CASE 0
	RETURN
CASE 1
	PRINTFORML %CALLNAME:PLAYER%�͍����%DISHNAME%��DEATH�\�[�X��U�肩����
	PRINTFORML %DISHNAME%�݂͂�݂邤���Ƀn�o�l���J���[�ɐ�����
CASE 2
	PRINTFORML %CALLNAME:PLAYER%��%DISHNAME%�ɔ���������̃T�b�J������U�肩����
	PRINTFORML �����ڂł͕�����Ȃ����Â��͍�����300�{��
CASE 3
	PRINTFORML %CALLNAME:PLAYER%�͐V�N�ȎR�킳�т𖀂艺�낵��%DISHNAME%�ɉ�����
	PRINTFORML �c���Ƃ����������肪%CALLNAME:PLAYER%�̕@��˂���
CASE 4
	PRINTFORML %CALLNAME:PLAYER%��%DISHNAME%�ɔZ�k�������ʏ`��U�肩����
	PRINTFORML �����ڂɂ͂킩��Ȃ���������_���ς����Ƃ��낤
ENDSELECT
RETURN 1

@MIXTURE_DRUG
#DIM CONST BIT_MIX_DRUG = 0, 21, 22, 23, 24, 25
PRINTL �����d���������c
{
CALL ASK_M(
	"����ς��߂�",       1,
	"�Z��",   ITEM:�Z��   > 0,
	"���A��", ITEM:���A�� > 0,
	"�����", ITEM:����� > 0,
	"������", ITEM:������ > 0,
	"�r���U����", ITEM:�r���U���� > 0)
}
SIF RESULT
	SETBIT TCVAR:MASTER:308, BIT_MIX_DRUG:RESULT
SELECTCASE RESULT
CASE 0
	RETURN
CASE 1
	PRINTFORML %CALLNAME:PLAYER%�͉�����Z����o���ƁA%DISHNAME%�ɍ������c
	ITEM:�Z�� --
CASE 2
	PRINTFORML %CALLNAME:PLAYER%�͉����痘�A�܂��o���ƁA%DISHNAME%�ɍ������c
	ITEM:���A�� --
CASE 3
	PRINTFORML %CALLNAME:PLAYER%�͉����獛�����o���ƁA%DISHNAME%�ɍ������c
	ITEM:����� --
CASE 4
	PRINTFORML %CALLNAME:PLAYER%�͉����琇������o���ƁA%DISHNAME%�ɍ������c
	ITEM:������ --
CASE 5
	PRINTFORML %CALLNAME:PLAYER%�͉�����r���U���܂��o���ƁA%DISHNAME%�ɍ������c
	ITEM:�r���U���� --
ENDSELECT
RETURN 1

path: 原版+前人整合等各种readme/パッチ/eraTW4.756用 排卵誘発剤強化パッチ/ERB/コマンド関連/COMF/異物混入.ERB


path: 原版+前人整合等各种readme/パッチ/eraTW4.756用 排卵誘発剤強化パッチ/ERB/ステータス表示関連/INFO.ERB


code:
;500�ȍ~�͂�������
;-------------------------------------------------
;60,������
;-------------------------------------------------
@MESSAGE_SCOM60
PRINTFORML %CALLNAME:PLAYER%��%CALLNAME:TARGET%�Ɏ����������Ă������
IF TFLAG:193 == 1
	PRINTFORML %CALLNAME:TARGET%�͗D���������%CALLNAME:PLAYER%�̎��|�������Ă���c
ELSEIF TFLAG:193 == -1
	PRINTFORML %CALLNAME:TARGET%�͎�����点�Q�ĂĂ���c
ENDIF

;-------------------------------------------------
;61,�����܂���
;-------------------------------------------------
@MESSAGE_SCOM61
PRINTFORML %CALLNAME:PLAYER%��%CALLNAME:TARGET%\@ TALENT:105 > 0 ? �̋��Ɋ�𖄂߂� # ��������߂� \@�������c
;IF TFLAG:193 == 1
;	PRINTFORML %CALLNAME:TARGET%��%CALLNAME:PLAYER%��������߂Ă��₷�݂��������c
;ELSEIF TFLAG:193 == -1
;	PRINTFORML %CALLNAME:TARGET%�͋ꂵ������%CALLNAME:PLAYER%������̂�҂����c
;ENDIF

;-------------------------------------------------
;62,�f�R����[
;-------------------------------------------------
@MESSAGE_SCOM62
PRINTFORML %CALLNAME:PLAYER%��%CALLNAME:TARGET%�̂��ł��Ɍy���L�X�����c
IF !CFLAG:TARGET:����
	IF ABL:�~�] >= 5
		PRINTFORML %CALLNAME:TARGET%�͕�����Ȃ�����%CALLNAME:PLAYER%�����߂Ă���c
	ELSEIF ABL:�e�� >= 5
		PRINTFORM %CALLNAME:TARGET%��
		IF TARGET == 57 && !TALENT:����
			PRINTFORM ���\��̂܂�
		ENDIF
		PRINTFORML ���^���Ԃɂ��ďƂ�Ă���c
	ELSE
		PRINTFORML %CALLNAME:TARGET%�͓ˑR�̎��ɋ����Ă���悤���c
	ENDIF
ENDIF

;-------------------------------------------------
;63,�����ƃL�X����
;-------------------------------------------------
@MESSAGE_SCOM63
IF FLAG:70 == 1
	PRINTFORML %CALLNAME:PLAYER%��%CALLNAME:TARGET%�̌����A�����̌��ōǂ����c
	PRINTL �����ƍǂ����c
	PRINTL �ǂ����c
	PRINTFORML ���Ԃ��~�߂��Ă���%CALLNAME:TARGET%�͖���R�̂܂܌��Â�����Ă���c
ELSEIF CFLAG:TARGET:����
	PRINTFORML %CALLNAME:PLAYER%�͖����Ă���%CALLNAME:TARGET%�̌����A�����̌��ł����ƍǂ����c
	IF ABL:�e�� >= 8
		PRINTFORM �O�𗣂���%CALLNAME:TARGET%��
		IF TARGET == 57 && !TALENT:����
			PRINTFORML ���̖ʂ������ׂĂ���c
		ELSE
			PRINTFORML �͂��ɔ��΂�ł���c
		ENDIF
	ELSEIF ABL:�e�� >= 5
		PRINTFORM %CALLNAME:TARGET%�����ꂵ������
		IF TARGET == 57 && !TALENT:����
			PRINTFORML ���q���̖ʂ𕂂��ׂ��c
		ELSE
			PRINTFORML �����Ђ��߂��c
		ENDIF
	ELSE
		PRINTFORM %CALLNAME:TARGET%��
		IF TARGET == 57 && !TALENT:����
			PRINTFORM �ʎ�̖ʂ𕂂��ׂ�
		ELSE
			PRINTFORM ��������߂�
		ENDIF
		PRINTFORML �Ɩ��ӎ��Ɋ�����ނ����c
	ENDIF
ELSE
	PRINTFORML %CALLNAME:PLAYER%��\@ CFLAG:TARGET:�Y���Q�� ? �Y���Q���� # \@%CALLNAME:TARGET%�̌����A�����̌��ł����ƍǂ����c
	IF TALENT:����
		PRINTFORML %CALLNAME:TARGET%�͊��^���Ԃɂ��Ȃ�����O�������t���Ă����c
	ELSEIF ABL:�e�� >= 5
		PRINTFORML %CALLNAME:TARGET%��%CALLNAME:MASTER%�̌������������ɂƂ�Ƃ�ƒ@���Ă���c
	ELSE
		PRINTFORML %CALLNAME:TARGET%�͑��𗐂��Ă���c
	ENDIF
ENDIF

;-------------------------------------------------
;80,�������
;-------------------------------------------------
@MESSAGE_SCOM80
PRINTFORML %CALLNAME:PLAYER%��%CALLNAME:TARGET%�̎����������}����
IF TFLAG:193 == 1
	PRINTFORM %CALLNAME:TARGET%��%CALLNAME:PLAYER%�ׂ̗ɕ���
	IF TARGET == 57 && !TALENT:����
		PRINTFORM ���̖ʂ𕂂���
	ELSE
		PRINTFORM ����������
	ENDIF
	PRINTFORML �����ŕ����Ă���c
ELSEIF TFLAG:193 == -1
	PRINTFORM %CALLNAME:TARGET%�͎���������܂�
	IF TARGET == 57 && !TALENT:����
		PRINTFORM ���̖ʂ𕂂���
	ELSE
		PRINTFORM ������
	ENDIF
	PRINTFORML �����ŕ����Ă���c
ENDIF

;-------------------------------------------------
;603,����q��
;-------------------------------------------------
@MESSAGE_COM603
PRINTFORML %CALLNAME:PLAYER%��%CALLNAME:TARGET%�̎�������
IF TFLAG:193 == 1
	PRINTFORM %CALLNAME:TARGET%��
	IF TARGET == 57 && !TALENT:����
		PRINTFORM ���\���
	ENDIF
	PRINTFORML �j����ߊ��������Ɏ������Ԃ���
ELSEIF TFLAG:193 == -1
	PRINTFORML �c%CALLNAME:TARGET%�������߂炢�Ȃ������������c
ENDIF

;-------------------------------------------------
;610,�H���ɗU��
;-------------------------------------------------
@MESSAGE_COM610
PRINTFORML %CALLNAME:PLAYER%��%CALLNAME:TARGET%��U����%DATENAME_SPOT()%�ŐH���������
[SKIPSTART]
IF DATE_PARTY(CFLAG:MASTER:���݈ʒu) == 2
	PRINTFORML %DATENAME_SPOT()%�̉���ɎQ������
ELSEIF DATE_PARTY(CFLAG:MASTER:���݈ʒu) == 1
	PRINTFORML %DATENAME_SPOT()%�ŐH���������
ELSE
	SELECTCASE CFLAG:MASTER:���݈ʒu
		;�ۉ�����
		CASE 230
			PRINTDATA
				DATAFORM ���������o�[�Ŏ�������
				DATAFORM ����������O����Ŏ�������
				DATAFORM �]���̉���ł���������
			ENDDATA
			PRINTL
		;����_��
		CASE 340
			PRINTFORML ����_�Ђ̉���ɎQ������
		;�d���̑��
		CASE 350
			PRINTFORML �d�������̂�����ɎQ������
		CASE 410
			PRINTFORML �~�X�e�B�A�̉���Ŕ��ډV��H�ׂ�
	ENDSELECT
ENDIF
[SKIPEND]
IF TFLAG:193 == 1
	PRINTFORML %CALLNAME:TARGET%�͑����Ɋy����ł��ꂽ�悤��
ELSEIF TFLAG:193 == -1
	PRINTFORML �c�c%CALLNAME:TARGET%�͂ǂ��ƂȂ��s���������c
;\@ DATE_PARTTIME(CFLAG:MASTER:���݈ʒu) == 1 ? ���܂�H���i�܂Ȃ������悤���c # �����Ԃ�Ă��܂����c\@
ENDIF

;-------------------------------------------------
;613,�����҂�����
;-------------------------------------------------
@MESSAGE_COM613
PRINTFORM %CALLNAME:PLAYER%\@ TARGET ? �B #  \@��
IF DATE_PARTTIME(CFLAG:MASTER:���݈ʒu) == 2
	PRINTFORM %DATENAME_PLACE()%�ŃA���o�C�g����
ELSEIF DATE_PARTTIME(CFLAG:MASTER:���݈ʒu) == 1
	PRINTFORM %DATENAME_PLACE()%�ŐH�ޏW�߂�����
ELSE
	SELECTCASE CFLAG:MASTER:���݈ʒu
		;���q��
		CASE 240
			PRINTDATA
				DATAFORM ���q���ŗՎ����t������
				DATAFORM �d���̎�`��������
				DATAFORM ���q���̏��ސ���������
			ENDDATA
		;�i����
		CASE 450
			PRINTDATA
				DATAFORM �i�����Œ��܎�`��������
				DATAFORM �V��̎����A���o�C�g������
				DATAFORM �e�����̐��b������
			ENDDATA
		;������
		CASE 520
			PRINTDATA
				DATAFORM �������ŃA���o�C�g����
				DATAFORM �K���N�^�E��������
				DATAFORM �������̒I������`��������
			ENDDATA
		;���J���@�X
		CASE 540
			PRINTDATA
				DATAFORM ���@�X�ŃA���o�C�g����
				DATAFORM ���@����̐�������`����
				DATAFORM �������̎�������`����
			ENDDATA
		;�g����
		CASE 650
			PRINTDATA
				DATAFORM �g���قŃA���o�C�g����
				DATAFORM ���̎d������`����
				DATAFORM �}���ق̐�������`����
			ENDDATA
		;���_��
		CASE 830
			PRINTFORM ���_�ЂŃA���o�C�g����
	ENDSELECT
ENDIF
PRINTFORML \\{TFLAG:200}�̎����𓾂�
TFLAG:200 = 0
;-------------------------------------------------
;615,���ٓ���H�ׂ�
;-------------------------------------------------
@MESSAGE_COM615
PRINTFORML %CALLNAME:TARGET%������Ă��Ă��ꂽ���ٓ��𒸂����Ƃɂ���
IF 	TFLAG:193 == -1
	PRINTL �R�����g�ɍ��閡���c
ELSE
	IF ABL:�����Z�\ < 2
		PRINTFORML �����ȂƂ�������ȏo�����������A%CALLNAME:MASTER%�͂���Ȃ��Ƃ������тɂ��o�������ٓ����Y��ɕ��炰��
	ELSEIF ABL:�����Z�\ < 4
		PRINTFORML �Ȃ��Ȃ�������������
	ELSE
		PRINTFORML %CALLNAME:TARGET%�̗����͂ƂĂ���������
	ENDIF
ENDIF
SIF TFLAG:193 == 1
	PRINTFORML %CALLNAME:MASTER%��%CALLNAME:TARGET%�ƒk�΂��Ȃ���y�����ЂƎ����߂�����
;-------------------------------------------------
;616,�f�@���Ă��炤
;-------------------------------------------------
@MESSAGE_COM616
IF 	TFLAG:193 == 1
		PRINTL ����������Ȃ������̂ŁA����ɖ�̑f�ޏW�߂���炳�ꂽ�c
ELSE
	PRINTL �u���厖�Ɂv
ENDIF

;-------------------------------------------------
;617,�Ö����ɗU��
;-------------------------------------------------
@MESSAGE_COM617
PRINTFORML %CALLNAME:PLAYER%��%CALLNAME:TARGET%��U���ĕ]���̊Ö����֍s����
SIF TFLAG:193 == 1
	PRINTFORML %CALLNAME:TARGET%�͂����x�̂悤��

;-------------------------------------------------
;620,��ވ�
;-------------------------------------------------
@MESSAGE_COM620
IF TFLAG:193 == 1
	PRINTL �u���肪�Ƃ��������܂����v
	PRINTL �u�ݏo���Ԃ͈�T�Ԃł��v
ENDIF

;-------------------------------------------------
;621,�ނ������
;-------------------------------------------------
@MESSAGE_COM621
#DIM CHARA
CHARA = TFLAG:194 % 1000
SELECTCASE TFLAG:193
	CASE 0
		PRINTFORML �����ނ�Ȃ������c�c
		RETURN
	CASE 610
		IF TFLAG:194 > 1000
			PRINTFORML %CALLNAME:CHARA%���ؕЂ�ނ����c
		ELSE
			PRINTFORML �ؕЂ��ނꂽ�c�c
		ENDIF
		RETURN
	CASE 131
		IF TFLAG:194 > 1000
			PRINTFORMW %CALLNAME:CHARA%�����؂��ނ���
		ELSE
			PRINTFORMW ���؂ꂪ�ނꂽ
		ENDIF
		PRINTL
		PRINTL ������������������������������
		PRINTL �b�@�@�@�@�@�@�@�@�@�@�@�@�@�b
		PRINTL �b�@�@���̎�D�@�@�@�@�@�@�b
		PRINTL �b�@�@�@�@�@�@�@�@�@�@�@�@�@�b
		PRINTL �b�@�@�ܖ�������Ɓ@�@�@�@�@�b
		PRINTL �b�@�@�@�������������܂��@�b
		PRINTL �b�@�@�@�@�@�@�@�@�@�@�@�@�@�b
		PRINTL �b�@�����v�͕ۏ؂����˂܂��@�b
		PRINTL �b�@�@�@�@�@�@�@�@�@�@�@�@�@�b
		PRINTL �b�@�@�@�@�@�@�@�@���_�Ё@�b
		PRINTL ������������������������������
		RETURN
	CASE 1 TO 20, 22 TO 60
		LOCALS = %FISH_NAME(TFLAG:193)%
	CASE 21
		LOCALS = ���[�^�[
	CASEELSE
		LOCALS = %ITEMNAME:(TFLAG:193)%
ENDSELECT

IF TFLAG:194 > 1000
	PRINTFORML %CALLNAME:CHARA%��%LOCALS%��ނ����I
ELSE
	PRINTFORML %LOCALS%���ނꂽ�I
	;���[�^�[�ȍ~��e���ăT�C�Y�Ƌ��l���̏���
	IF INRANGE(TFLAG:193, 1, 60) && TFLAG:193 != 21
		;�T�C�Y�̏o��
		LOCAL:1 = FISHING_SIZE(TFLAG:193)
		PRINTFORML �@�T�C�Y�F{LOCAL:1}cm
		;�����܂ł̍ō��T�C�Y�Ɣ�r���đ傫����΋L�^
		IF LOCAL:1 > FISHSIZE_RECORD:(TFLAG:193)
			SETCOLOR C_YELLOW
			SIF FISH_EXP:(TFLAG:193)
				PRINTFORML �@���܂Œނ���%LOCALS%�̒��ł��ő�T�C�Y���I
			RESETCOLOR
			FISHSIZE_RECORD:(TFLAG:193) = LOCAL:1
		ENDIF
		;���l���̉��Z
		FISH_EXP:(TFLAG:193) ++
	ENDIF
ENDIF
;�����𗬂�
SELECTCASE TFLAG:193
	CASE 1 TO 20, 22 TO 60
		DRAWLINE
		PRINTFORML %LOCALS%
		CALL FISHING_EXPLANATION(TFLAG:193)
	CASE 21 ;���[�^�[

	CASE IS > 61
		DRAWLINE
		PRINTFORML %LOCALS%
		PRINTFORML �@�@%ITEM_EXPLANATION(TFLAG:193)%
ENDSELECT

;-------------------------------------------------
;660,�Ǐ�
;-------------------------------------------------
@MESSAGE_COM660
IF TARGET == 54 && CFLAG:TARGET:���݈ʒu == 340 && 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

IF TFLAG:194 == 2
	PRINTFORML ����܂ł����s�v�c�����ɒj�����l���𗍂܂���{�����Ă���%CALLNAME:TARGET%���������������
	;���I�o������̏ꍇ�i�߂�ǂ���������A���Ԃ������o���������S���܂߂����i���������A���{2�ȏォ��MASTER�̋��{3�ȏ�̎��_�ł���Ȃ�Ɏ��Ԍo���Ă锤�i�Ă����{Lv1�Ŗ��m���Ă��ǂ��񂶂�ˁH�@�Ƃ͎v��Ȃ��ł��Ȃ����ǁA�w�K�o��5�Ŏ��鎞�_�ŁA�i���I�j���m�͎��Ȃ��Ă��d���Ȃ���˂Ǝv�������
	FOR LOCAL,0,66
		SIF CSVEXP(TARGET,LOCAL) != EXP:TARGET:LOCAL
			LOCAL:1 ++
	NEXT
	IF LOCAL:1
		PRINTFORM �m���ɂ�������̂͋C������������ǁA�Ȃ�̂��߂��낤�ƍ��X�̋^������ɂ���
	ELSE
		PRINTFORM �Ȃɂ��y�����Ă���Ȃ��Ƃ�����񂾂낤�ƁA�s�v�c�����Ɍ����J��
	ENDIF
	PRINTFORML %CALLNAME:TARGET%
	IF LOCAL:1 && (EXP:�������Ԍo�� || EXP:���Ԍo�� < (EXP:�b�o�� + EXP:�u�o�� + EXP:�`�o�� + EXP:�a�o�� + EXP:�l�o��))
		PRINTFORML %CALLNAME:MASTER%�͑����̍߈������o���A���s�ׂ̈Ӗ��ƖړI���������%CALLNAME:TARGET%�ɋ�������
		IF !TALENT:�v�� && !TALENT:���� && !TALENT:���l && !TALENT:�Z�t�� && !TALENT:���~
			PRINTFORML %CALLNAME:TARGET%�͕��ꂽ�悤�Ȍy�̂���悤�ȕ\���%CALLNAME:MASTER%�����߂Ă���
			CFLAG:�D���x -= 100
			SIF CFLAG:�D���x < 0
				CFLAG:�D���x = 0
			CFLAG:�M���x -= 100
			SIF CFLAG:�M���x < 0
				CFLAG:�M���x = 0
		ELSE
			PRINTFORML %CALLNAME:TARGET%�́A���ꂽ�悤�ɂ��ߑ���������A�ł��C�����������炢���ƏΊ�𕂂��ׂ�
		ENDIF
	ELSEIF LOCAL:1
		PRINTFORML %CALLNAME:MASTER%�o���邾�����m�ɁA���s�ׂ̈Ӗ��ƖړI���������%CALLNAME:TARGET%�ɋ�������
		IF !TALENT:�v�� && !TALENT:���� && !TALENT:���l && !TALENT:�Z�t�� && !TALENT:���~
			PRINTFORML �Ȃ����A%CALLNAME:TARGET%�͊��^���Ԃɂ��Ă���
		ELSE
			PRINTFORML %CALLNAME:TARGET%�͊���g�����Ȃ���A�I�i�j�[�͎q��肶��Ȃ�����_���Ȃ̂��A���ߑ�����
		ENDIF
	ELSE
		PRINTFORML %CALLNAME:MASTER%�͐��m�ɁA���s�ׂ̈Ӗ��ƖړI���������%CALLNAME:TARGET%�ɋ�������
		PRINTFORML %CALLNAME:TARGET%�͊��S�����\��ŁA������Ƙb�𕷂��Ă���
	ENDIF
	PRINTFORML
	PRINTFORML
	PRINTFORML
	PRINTFORML %CALLNAME:TARGET%��[���m]��������
	TALENT:���m = 0
ENDIF

;-------------------------------------------------
;697,������K�˂�
;-------------------------------------------------
@MESSAGE_COM697
;-------------------------------------------------
;698,�����ɓ���
;-------------------------------------------------
@MESSAGE_COM698
PRINTFORML %CALLNAME:TARGET%�������Ɉē����Ă��ꂽ
;-------------------------------------------------
;699,�O�ɏo��
;-------------------------------------------------
@MESSAGE_COM699
IF !TARGET
	PRINTL �O�ɏo��
ELSEIF CFLAG:TARGET:����
	PRINTFORML �Q�Ă���%CALLNAME:TARGET%���N�����Ȃ��悤�ɂ�������O�ɏo��
;������MOVEMENT�Q��
ELSEIF !��������(TARGET) && !CFLAG:TARGET:����
	PRINTFORML %CALLNAME:TARGET%��A��ĊO�ɏo��
ELSE
	PRINTFORML %CALLNAME:TARGET%�Ɍ������ĊO�ɏo��
ENDIF

;-------------------------------------------------
;Sub_Taste,���t������
;-------------------------------------------------
@MESSAGE_REACTION_TASTE
SELECTCASE DISH_MIXTURE()
CASE DISH_RADICAL_���h
	IF TASTE_GIVEUP(TARGET, DISH_RADICAL_���h)
		PRINTFORML %CALLNAME:TARGET%�͋���Ȑh���Ɍ�����������Ɛ������ɑ䏊�֑������c
	ELSE
		PRINTFORML ���h��%DISHNAME%��%CALLNAME:TARGET%�͉��H��ʊ�ŐH���Ă���c
	ENDIF

CASE DISH_RADICAL_����
	IF TASTE_GIVEUP(TARGET, DISH_RADICAL_����)
		PRINTFORML �����ڂɂ�����ʊÂ���%DISHNAME%��O��%CALLNAME:TARGET%��
		IF TARGET == [[������]] && !TALENT:����
			PRINTFORM ���\���
		ENDIF
		PRINTFORML ��������Ă���c
	ELSE
;		IF TARGET == [[��]]
;			PRINTFORML %CALLNAME:TARGET%�͉�������������%DISHNAME%��H�ׂĂ���c
;		ELSE
			PRINTFORML �Â����邢%DISHNAME%��%CALLNAME:TARGET%�͉��H��ʊ�ŐH���Ă���c
;		ENDIF
	ENDIF
CASE DISH_RADICAL_�킳��
	IF TASTE_GIVEUP(TARGET, DISH_RADICAL_�킳��)
		PRINTFORM %CALLNAME:TARGET%�͎R����̂킳�тɎv�킸
		IF TARGET == [[������]] && !TALENT:����
			PRINTFORM ���\���
		ENDIF
		PRINTFORML �܂𗬂��Ă���c
	ELSE
		PRINTFORML �킳�юR�����%DISHNAME%��%CALLNAME:TARGET%�͉��H��ʊ�ŐH���Ă���c
	ENDIF
CASE DISH_RADICAL_������
	IF TASTE_GIVEUP(TARGET, DISH_RADICAL_������)
		PRINTFORM %CALLNAME:TARGET%�͌������ڂ߂��
		IF TARGET == [[������]] && !TALENT:����
			PRINTFORML �W�̖ʂ𕂂��ׂČ��߂Ă���
		ELSE
			PRINTFORML �_���ς����ɖڂ��ׂ߂��c
		ENDIF
	ELSE
		PRINTFORML �������̎_���ς����C�ɂ����߂�%CALLNAME:TARGET%��%DISHNAME%��H���Ă���c
	ENDIF
CASE DISH_DRAG_�Z��
	PRINTFORML %CALLNAME:TARGET%\@ GET_TARGETNUM() > 1 ? �B # \@�͛Z��̓�����%DISHNAME%�𕽂炰��
	PRINTFORML �j���g���������ɔM���ۂ��f����R�炵�Ă���c
CASE DISH_DRAG_���A��
	PRINTFORML %CALLNAME:TARGET%\@ GET_TARGETNUM() > 1 ? �B # \@�͗��A�܂̓�����%DISHNAME%�𕽂炰��
	PRINTFORML �͂��ɓ��҂ɂȂ�A���������ƍ���h�炵�Ă���c
CASE DISH_DRAG_�����
	PRINTFORML %CALLNAME:TARGET%\@ GET_TARGETNUM() > 1 ? �B # \@�͍����̓�����%DISHNAME%�𕽂炰��
	PRINTFORML �����Ƃ�Ƃ����\��ł����Ƃ���������߂Ă���c
CASE DISH_DRAG_������
	PRINTFORML %CALLNAME:TARGET%\@ GET_TARGETNUM() > 1 ? �B # \@�͐�����̓�����%DISHNAME%�𕽂炰��
CASE DISH_DRAG_�r���U����
	PRINTFORML %CALLNAME:TARGET%\@ GET_TARGETNUM() > 1 ? �B # \@�͔r���U���܂̓�����%DISHNAME%�𕽂炰��
ENDSELECT

path: 原版+前人整合等各种readme/パッチ/eraTW4.756用 排卵誘発剤強化パッチ/ERB/口上・メッセージ関連/EVENT_MESSAGE_COM500.ERB


code:
2020/08/23
�@eraTW4.756�p �r���U���܋����p�b�`

���Ώۊ�
�@eraTW4.756

������
�E�r���U���ܓ��肨���͗���������悤��
�@>>270�X����>>616�����
�E�댯���ɔr���U���܂��g���ƔD�P�m����������̂��C��
�@>>270�X����>>703�����

���������@
�@�W�J�����t�H���_�����̂܂�eraTW4.756�ɏ㏑�����Ă�������
�@�K���o�b�N�A�b�v�����悤���肢���܂�

���G�k
�@�p�b�`�̏C���E���p�͂����R�ɂ��肢���܂�

���ڍ�
ERB/
���C�x���g�֘A
�@���D�P�֘A
�@�@��CYCLE.ERB ; �댯���ɔr���U���܂��g���ƔD�P�m����������̂��C��
�@�@�@�@�@�@�@�@; �r���U���܂ɂ��m���ύX�O�ƌ�̃R�[�h�𕪗�
�@�@�@�@�@�@�@�@�@; ���S���̔��f��ESTRUS_CYCLE�Ɉˑ����Ă�R�[�h�����������̂ł���Ȍ`�ɂ���
�@�@��PREGNANCY.ERB ; �D�P�m���v�Z�Ɏg���֐���ύX�iCYCLE.ERB�C���֘A)
���R�}���h�֘A
�@��COMF
�@�@������n
�@�@�@��COMF331 �����🹂��i�����j.ERB ; �r���U���ܓ��肨�������ނƂ��̏���
�@�@�@��COMF413 ���������.ERB ; �r���U���ܓ��肨����������
�@�@�@��COMF425 ��𐷂�.ERB ; �r���U���ܓ��肨��������
�@�@�@��FOOD.ERH ; DISH_DRAG_�r���U���܂�ǉ�
�@�@���ٕ�����.ERB ; �r���U���ܓ��肨����������
������E���b�Z�[�W�֘A
�@��EVENT_MESSAGE_COM500.ERB ; �r���U���ܓ��肨������H�ׂ�Ƃ��̃��b�Z�[�W��ǉ�
���X�e�[�^�X�\���֘A
�@��INFO.ERB ; �r���U���ܓ��肨�����������Ă�Ɨ����̖��O�̂��Ƃ�(�r���U����)���o��

path: 原版+前人整合等各种readme/パッチ/eraTW4.756用 排卵誘発剤強化パッチ/readme.txt


code:
eraTW4.756�p�@���蕨�p�b�`ver0.53

���T�v
�f�[�g���ɓy�Y���i����łɂ������������j�ő��蕨�����ăv���[���g�ł��܂��B
�i�����͌`�e���{�{�̂̌`�Ń����_���ɐ�������A�l�i������ɉ����ĕω����܂��B
�w���i�v���[���g�j����Ɨ��ō̓_���s���A����̏I��ɃC�x���g���������܂��B
���]�����Ƃ��C�ɓ���ɂ��Ă���ALook���ɕ\������܂��B�i���Ɍ��ʂ͂Ȃ��j
�����݂͍̓_���@�\���Ă��Ȃ��̂ō��]���𓾂邱�Ƃ͂ł��܂���B�i�f�o�b�O���͑���\�j

���X�V����
�Ever0.53
�@����L�����ȊO�̊�����ݒ�
�@����ɂ���č̓_�@�\���@�\���܂�
�@�̓_���̋��ʐݒ���C��
�@���蕨�`�e���f�[�^�X�V
�@���蕨�{�̃f�[�^���C��
�@@AREA_SETBIT������

�Ever0.12
�@�Ƃ肠�����S�n��ɓy�Y����ݒ�
�@���蕨�{�̃f�[�^����ʂ�ݒ�
�@�̓_���̋��ʐݒ��ݒ�
�@���L�����f�[�^��ݒ肵�ĂȂ��̂ł܂��̓_�@�\�͎����@�\���Ă܂���

���d�l
���蕨�̃t���O��MASTER��CHARA�ňӖ����Ⴂ�܂�

CFLAG:��������蕨
�@MASTER�c �C�ӂł��C�ɓ���ɂ������蕨�i�������j
�@CHARA �c ���C�ɓ���̑��蕨

CFLAG:�n�������蕨
�@MASTER�c ���蕨��n�����q�׉񐔂ƍŌ�ɑ��蕨��n�����L�����̗����i������ɈӖ��͂Ȃ��j
�@CHARA �c MASTER�ɓn�������蕨�i�������j
�@������ōŌ�ɓn�������蕨���Q�Ƃł���
�@CFLAG:(CFLAG:MASTER:�n�������蕨 % 1000):���蕨�X�g�b�N

CFLAG:���蕨�X�g�b�N
�@MASTER�c ���O�ɔ����Ă��������蕨�i�������j
�@CHARA �c �Ō�ɖ�������蕨

TCVAR:�����̑��蕨
�@MASTER�c ���̓����蕨��n�����L�����i����Ō�̂P�j
�@CHARA �c ���̓���������蕨

�������񑡂蕨��n�����ꍇ
�@1�ڂ����C�ɓ���łȂ��ꍇ�㏑�������
�@2�ڂ̕����]�����Ⴂ�ꍇ��2�ڂ��X�g�b�N�Ɏc��
�@2�ڂ̕����]���������ꍇ�㏑������A1�ڂ̓X�g�b�N�Ɏc��

���蕨�͌`�e���{�{�̂̌`�ō\������Ă��鑼�A�K�v�ȏ����l�ߍ���ID�Ƃ��ċL�^���Ă��܂��B
�EGIFT_ID
000.000.0000.00.00.00.00.0
 ��  ��   �� �� �� �� �����{�̄������������{�̃u���b�N
 ��  ��   �� �� �� �� ���{�̃J�e�S��������
 ��  ��   �� �� �� ���`�e�������������`�e���u���b�N
 ��  ��   �� �� ���`�e���J�e�S�� ����
 ��  ��   �� ���ꏊ�i�n��j
 ��  ��   �����t
 ��  �����_
 ����

�n��ɂ���Č`�e����{�̂̏o���̉ۂ�����A�i�������ς��܂��B
�l�i�͖{�́~�`�e������艿�Ƃ��Ă���̂ł��ꂼ��l�i���قȂ�܂��B

�̓_�@�\�͗����̍̓_�@�\���g���[�X���Ă��܂��B

�t�@�C���̈ʒu�͂Ƃ肠�����C�x���g�ɓ���Ă܂��B
���蕨�f�[�^��2������Ă�͍̂����ʂɑ�����i�\��j�̂ŁB

����̏I��C�x���g��AFTERTRA�j�[�̌�ɂ��Ă܂��B

���C�ɓ���ɂłȂ��ꍇ�ł����]���Ȃ�FLAG:���ւ��C�x���g*10 < �]�����_�Ȃ�Look�ɕ\������܂��B

�����j�Ƃ�
���݂͌`�e��/�{�̂Ƃ���ނ����Ȃ��ł����f�[�^�����Ă��Ȃ����̂����ꂼ��150��/400���炢����܂��B

�E��ꂻ���Ȃ���

��l�ł��y�Y���𗘗p�ł���
�@CFLAG:���蕨�X�g�b�N�Ɉ�����X�g�b�N���Ă����A�f�[�g���C�ӂ̃^�C�~���O�Ńv���[���g�ł���B

���_�ł��y�Y���𗘗p�ł���
�@���s�l����1�l�Ȃ�v���[���g�ł���B�Z���ɂ̓v���[���g�ł��Ȃ��B
�@���ꏊ�����܂�Ȃ��B�i�l���Ƃ��j

�v���[���g���Ă��炦��
�@�Ȃ�炩�̃^�C�~���O�i�f�[�g�A��C�x���g�H�j�Ńf�[�g���肩�瑡�蕨��Ⴆ��B�L�������ƂɃp�^�[�����ς��B
�@CFLAG:�n�������蕨���Q�Ƃ��ĒN���牽���������i�e1���܂Łj�m�F�ł���B
�@1�I��ł��C�ɓ���ɂł���B
�@ITEM�t���O�ɐݒ肷��Ύ���ŏ����Ȃ��i��̎�����Ȃ��I�j

���z�Z�[��
�@�f�C���[�C�x���g�œ���n��̓y�Y���Ŕ��z�Z�[������������B

���V����n�悲�Ƃ̑䎌
�@�X�ɂ���Ēn�̕��ɑ䎌������B
�@USERCOM�\���œX����ς���B�i[������]���j

�����������j���[
�@�Ȃ�炩�̏������ŗ����j���[�������B
�@�����j���[�͒n�搧�����Ȃ��S�Ẵp�^�[���ŏ��i�����������B�i�I�[���u���[�j

�i������������
�@�Ȃ�炩�̏����œy�Y���ɕ��ԏ��i�̐���������B

�l�����E�l�؂�
�@�Ȃ�炩�̏����œy�Y���̒l�i�����������B

����e���v���̎���
�@��ρc�c�B

�\�͕\���ɕ\��
�@�ߑ��̗��H

�̓_�@�\�̂��߂ɖc��ȃL�����f�[�^�̕ҏW���K�v�ł����A������x�v���Z�b�g������ĕ��S�����点�����ł��B
�����ʐݒ肪���܂����Ƃł����̂Ńv���Z�b�g�͗v��܂���ł����B�L�����f�[�^�̃����͂��������ł��܂����B


code:
eraTW4.756�p����Z���N�^UPDATE�C��

 ERB��NEWGAME�������ăj���[�Q�[��.ERB

�A�b�v�f�[�g�ŁA����Z���N�^�������Ȃ��o�O���C��
�������킯����܂���ł���

by������


code:
eraTW4.756�p�摜�\���C���p�b�` V1.05

�E�T�v
TW4.754�p�摜�\���C���p�b�`�̑����ł��B
�A�Q��̎��ԃC�x���g���A�摜�\������ƃ��O�������Ȃ�����������邽�߁A
OPTION�ŏA�Q��̎��ԉ摜�\���L����I�ׂ�悤�ɂ��܂����B�f�t�H���g��ON�ł��B
����Ɉ�l����������摜���������l(�Ƃ�������)�̂��߁A��l���s���肪�~�܂�悤�ɂ��܂����B�s�]�Ȃ�߂�
���X�V�_�Ƃ��āA�\�͕\���������ւ��摜�̕ύX���ł���悤�ɂȂ�܂����B
����ō����ւ��摜�̕ύX�┭�������₷���Ȃ�͂��ł��B�����̊����Ɖ��l���\������ĂȂ����ǁc

�E������
�ȉ��̊��Ńp�b�`�𓱓����Ă�������
# TW4.756

�E�������@
�W�J�����t�H���_�����̂܂�eraTW4.756�ɏ㏑�����Ă��������B
�K���o�b�N�A�b�v�����悤���肢���܂��B

�E�A������
FLAG:1071���g�p���܂����B�l�����Ŏg�p���Ă���l�͂����ӂ�
���̃p�b�`��v1.03�Av1.04�̍X�V���e���܂�ł���܂��B
����ȉ��̃o�[�W������TW4.756�ɓ����ς݂ł��B

�E�ڍ�
eraTW4.756
v1.05
CSV/
��FLAG.csv
�@�@FLAG:1071�����ԉ摜�\�����ʗp�Ɏg�p
ERB/
��SHOP�֘A/
����OPTION.ERB
���@�@���s���폜
���@�@���ԉ摜�\���̑I����ǉ�
���C�x���g�֘A/
����AFTERTRA.ERB
���@�@���ԉ摜�̕\�����t���O���䂷��悤�ɕύX
���@�@���ԃC�x���g��s������~����悤�ύX
���X�e�[�^�X�\���֘A/
�@���\�͕\��.ERB
�@�@�@�����ւ��摜������ꍇ�A�I�ׂ�悤�I�����𑝐�
�@�@�@�摜�\����̉��s��IMEGE.ERB�ōs���悤�ɏC��

v1.04
ERB/
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@�@�@�摜�\��OFF�̏ꍇ���ԉ摜��\�����Ȃ��悤�ɕύX

v1.03
ERB/
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@�@�@���ԉ摜���������\������Ȃ������C��

eraTW4.754
v1.02
ERB/
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@�@�@�ʉ摜�̃G�t�F�N�g���������\������Ȃ������C��
�@�@�@�ʉ摜��I�����Ă����ꍇ�A�\�͕\����ʂ��ʉ摜���\�������悤�ύX

v1.01
ERB/
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@�@�@�e�L�X�g�^�O�{�^���̊Ԋu�����̒l�ɂȂ�Ȃ��悤�C��

v1.0
CSV/
��_fixed.config
�@�@TW4.753�ȑO�̂��̂ɏC��
ERB/
���O���t�B�b�N�\�����C�u����/
�����O���t�B�b�N�\��.ERB
���@�@�摜�T�C�Y�����摜�̍������Q�Ƃ����A�f�t�H���g�L�����摜�������Q�Ƃ���悤��
���@�@�摜���]���A�c���͔��]���Ȃ��悤��
���@�@�c�ʒu�̌v�Z��ύX�A"��s�̍���"���Q�Ƃ���悤��
���@�@�s�N�Z���������s�̌v�Z��ύX
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@���@�摜�T�C�Y��̌v�Z��ύX�A���E�B���h�E���ɍ����悤��
�@���@�e�L�X�g�^�O�{�^���̊Ԋu�v�Z��ύX
�@���@���Ԓ�~�A�t���[���̕`��̈ꕔ���ȗ�
�@���@�X�e�[�^�X��ʂ̉摜�\���Ńt���[�����\�������悤��
�@���@���ׁX�Ƃ����\�L��C���f���g���C��
�@���L�����`�拤��.ERH
�@�@�@�g�p���Ȃ��ϐ����폜
emuera.config
�@TW4.753�ȑO�̂��̂ɏC��

path: 原版+前人整合等各种readme/パッチ/eraTW4.756用画像表示修正パッチv1.05/Readme.txt


code:
eraTW4.756�p�摜�\���C���p�b�` V1.06

�E�T�v
TW4.754�p�摜�\���C���p�b�`�̑����ł��B
eraTW�p���薲������ver.1.3�ōX�V���ꂽ�\���ǉ����܂����B
era��+�Aeratoho�����X���y�ˑ��x:271�z��>>405�l�������������摜��\���ł���悤�ɂ��܂����B
�V�q�A�ʂ��͍����摜�Ƃ��ē��ւ��ŕς��悤�ɁA���ۂ���͌��G����X�V�ł��B
�t�����̊狐������������ɂ��ւ�炸�g���Ă��Ȃ������̂ŁA�\���ł���悤��
�j���ۂ̊�卷�����A�j���ۏ����T�C�Y���܂���MASTER�����l���ŕ\�������悤�ɂ��܂����B
���ׁX�ƏC���������Ă��܂��B
�����I�ɂ͌��㐧��݂����ɊȒP�ɉ摜�ǉ��A�ҏW�ł���悤�ɂ������Ȃ��ƌ��ݍH����
IMAGE.ERB�������Ȃ̂ő�ςȂ̂悱�ꂪ�B

�E������
�ȉ��̊��Ńp�b�`�𓱓����Ă�������
# TW4.756

�E�������@
�W�J�����t�H���_�����̂܂�eraTW4.756�ɏ㏑�����Ă��������B
�K���o�b�N�A�b�v�����悤���肢���܂��B

�E�A������
FLAG:1071���g�p���܂����B�l�������Ŏg�p���Ă���l�͂����ӂ�
���̃p�b�`��v1.03�Av1.04�Av1.05�̍X�V���e���܂݂܂��B
����ȉ��̃o�[�W������TW4.756�ɓ����ς݂ł��B

�E�ڍ�
eraTW4.756
v1.06
resources/
��Big Fairy Plus/
����13.csv
�����@�f���G�t�F�N�g�̍��W�Ɍ�肪�������̂ŏC��
����README.txt
���@�@���C�Z���X�\���̂��ߑ�d���ʉ摜�ǉ��p�b�`��Readme��ǉ�
��9_��.webp
���@eraTW�p���薲������ver.1.3�ōX�V���ꂽ�\����}�[�W
��34_��_1.webp
���@�X��271>>405�̏��������摜��ǉ�
��41_��_1.webp
���@�X��271>>405�̏��������摜��ǉ�
��96_��.webp
���@�X��271>>405�̏��������摜�ɍX�V
����.csv
�@�@�X��271>>405�̓V�q���������摜�������摜�Ƃ��ēo�^
�@�@�X��271>>405�̂ʂ����������摜�������摜�Ƃ��ēo�^
�@�@���ۂɗ��Ƃ�G�t�F�N�g��ǉ�
�@�@�j���ۂ̊��摜�������Ƃ��ēo�^
�@�@���C�Z���̎��ԉ摜�o�^�������C��
�@�@�t�����̋���������o�^
�@�@���������̂������ԉ摜��������̂�o�^
ERB/
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@���@�����摜�̃G�t�F�N�g���������\������Ȃ������C��
�@���@�f���G�t�F�N�g�����Ԓ�~���\������Ȃ��悤�C��
�@���@�V�q�Ƃʂ��̍����摜���������̊���ŕ\�������悤�ɍX�V
�@���@�j���ۂ������T�C�Y�܂���MASTER�����l���A��卷���ŕ\�������悤�X�V
�@���@���ۂ̗��Ƃ��ǉ�
�@���\�͕\��.ERB
�@�@�@�����ւ��摜�I��\���̕�����C��

v1.05
CSV/
��FLAG.csv
�@�@FLAG:1071�����ԉ摜�\�����ʗp�Ɏg�p
ERB/
��SHOP�֘A/
����OPTION.ERB
���@�@���s���폜
���@�@���ԉ摜�\���̑I����ǉ�
���C�x���g�֘A/
����AFTERTRA.ERB
���@�@���ԉ摜�̕\�����t���O���䂷��悤�ɕύX
���@�@���ԃC�x���g��s������~����悤�ύX
���X�e�[�^�X�\���֘A/
�@���\�͕\��.ERB
�@�@�@�����ւ��摜������ꍇ�A�I�ׂ�悤�I�����𑝐�
�@�@�@�摜�\����̉��s��IMEGE.ERB�ōs���悤�ɏC��

v1.04
ERB/
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@�@�@�摜�\��OFF�̏ꍇ���ԉ摜��\�����Ȃ��悤�ɕύX

v1.03
ERB/
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@�@�@���ԉ摜���������\������Ȃ������C��

eraTW4.754
v1.02
ERB/
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@�@�@�ʉ摜�̃G�t�F�N�g���������\������Ȃ������C��
�@�@�@�ʉ摜��I�����Ă����ꍇ�A�\�͕\����ʂ��ʉ摜���\�������悤�ύX

v1.01
ERB/
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@�@�@�e�L�X�g�^�O�{�^���̊Ԋu�����̒l�ɂȂ�Ȃ��悤�C��

v1.0
CSV/
��_fixed.config
�@�@TW4.753�ȑO�̂��̂ɏC��
ERB/
���O���t�B�b�N�\�����C�u����/
�����O���t�B�b�N�\��.ERB
���@�@�摜�T�C�Y�����摜�̍������Q�Ƃ����A�f�t�H���g�L�����摜�������Q�Ƃ���悤��
���@�@�摜���]���A�c���͔��]���Ȃ��悤��
���@�@�c�ʒu�̌v�Z��ύX�A"��s�̍���"���Q�Ƃ���悤��
���@�@�s�N�Z���������s�̌v�Z��ύX
���X�e�[�^�X�\���֘A/
�@��IMAGE.ERB
�@���@�摜�T�C�Y��̌v�Z��ύX�A���E�B���h�E���ɍ����悤��
�@���@�e�L�X�g�^�O�{�^���̊Ԋu�v�Z��ύX
�@���@���Ԓ�~�A�t���[���̕`��̈ꕔ���ȗ�
�@���@�X�e�[�^�X��ʂ̉摜�\���Ńt���[�����\�������悤��
�@���@���ׁX�Ƃ����\�L��C���f���g���C��
�@���L�����`�拤��.ERH
�@�@�@�g�p���Ȃ��ϐ����폜
emuera.config
�@TW4.753�ȑO�̂��̂ɏC��

path: 原版+前人整合等各种readme/パッチ/eraTW4.756用画像表示修正パッチv1.06/Readme.txt


code:
eraTW4.760�p eraTW4.760�p ��ɔ��������p�b�`

��������������������������������������������
����������ۂ͕K���A�b�v�f�[�g���Ă���������
��������������������������������������������

�푰����+���蕨�p�b�`���O�񂾂����̂őS�ĕ��������p�b�`�ɂȂ�܂�
CAV�t�H���_��Chara�t�H���_��Chara134 �s������.csv�͍폜���Ă�������
���̃p�b�`�Ƌ������Ă镔��������̂Œ��ӂ��Ă�������

�����������̒ǉ�
�l�����Ǔے�����є����̕��������܂���
�Ȃ�Ŏ�������˂���Ċ����ł����K���ɋ󂫕����Ȃ蕨�u���Ǝv����
���`���̖�͂����Ɠ����Ă܂�
�퓬�ł��邩������Ȃ���ł����ꉞ�d�������퓬�\�͕t���Ă܂�
�Y�p���Ȃ����ɂ��͐l�Ԃ���Ȃ���������Ȃ�
��ɂ���ĉ摜�͂���܂���B�L�����ƕ��ԂƖ��O�\���������͎̂d�l�ł�
�摜�_�ɋF��܂��傤

���}�b�v�֘A
�Q�Ă鏊�ɂ����l������̂����z�Ȃ̂ň������������܂���
����ɔ����u�����̉��~�v���u�B�c�@�v�ɉ���

�}�b�v�̐F���ʕ\�����������ȉӏ��i��ވ��j���C�����܂���
���ɂ��������ȉӏ���������GETMAP_BUILDING_2���g�����ƂŏC���ł��܂��i�����j

UPDATE�ŏ����ʒu���X�V����悤��
���炭��O�͈ꎞ�؍݃L�����݂̂Ȃ̂ő�������ő��v�Ȃ͂�
�Z�ݍ��݃L�����͕ʓr��������Ă܂�

���푰����֘A
���~���q�����~��炵�œ���

�푰�ɃL�����V�[��ǉ�
�ėp�d���ɂ��Ă���ł����X�����������L�����V�[�Ƃ��Ĉ������ق����ǂ������������̂�
���X�͔񐶕��ł���

�����蕨�֘A
�f�C���[�C�x���g�œy�Y�������z�Z�[��������悤��
�V�����w�ǂ��Ă��Ȃ��Ə�񂪒͂߂܂���i�����̔��拭���Ɠ��l�j
�P������łP�̒n��݂̂ł�
���l�͔��z�ɂȂ�܂�����������͒艿���Q�Ƃ��Ă܂�

���蕨�C�x���g�̌뎚�C��

���ȉ��AeraTW4.760�p �푰����+���蕨�p�b�`ver.1.00�C���ł�readme

���C����
�D�P�֘A�t�H���_�������Ă��̂ŏC�����܂����B

���푰����
�E�푰�f���̐ݒ�𐮗����܂����B
�m�d���n�m�H��n�m�l�`�n�m�ǉ��푰�n��V��
�m�S�n�m�V��n�́m�d���n�Ɉړ�
�m�ޏ��n�m���@�g���n�m�H���l�n�́m�ǉ��푰�n�Ɉړ�
�m�񐶕��n�́m�H��n�m�l�`�n�ɕ������Ĉړ�
�m�ǉ��푰�n�Ƃ��ām���C�h�n��V��
���A�m�l�ԁn�m�d���n�m�_��n�m�H��n�m�l�`�n�m�ǉ��푰�n���ו���

�E�ł��e���̂���D�P�֘A�ɂ��Ă͈ȉ��̒ʂ�B
�m�d���s�܂��n�������Ɓm�d���n�Ɍ��ʂ�����悤��
�m�S�n�m�V��n��s�܂��Ă��m�d���s�܂��n�͎擾�ł��Ȃ����A�m�d���s�܂��n������Ɓm�S�n�m�V��n�̔D�P���ɏ������ʂ�����悤��
�m�H��n�m�l�`�n�ɑ΂��Ắm�H��s�܂��n�m�l�`�s�܂��n��V��
�m�ޏ��n�m���@�g���n�Ɏ����`�Ń��C�h�s�܂��{�[�i�X���ݒ�i�f���ł͂Ȃ������o���j
���Ȃ݂�5�푰�ɓ͂��₷���Ȃ������m�H��n�m�l�`�n�͌��X�m�����Ⴂ�̂ő_���Ď����̂ł͂Ȃ�
�m��l�n�m�V�l�n�m���l�n�m���E�l�n���m�l�ԁn�ƕ����ĔD�P�����኱���~�C��
�n�[�t�̔D�P�m���͐l�Ԃ̔D�P�m���Ƃ̕��ϒl��

�E���̑��̉e���͈ȉ��̒ʂ�B
���F�̕��⒲���A�C�e���̌��ʂ����������m�񐶕��n���m�l�`�n�݂̂ɂ����̂Łm�H��n�ɂ͌��ʂ�����悤��
�˗��w���炵�߂āI�x�̓����Ώۂ�����
�X�J�E�^�[�̔{��������
�\�͕\���̎푰���̕\�����@������
���u�q�̎푰�ɑΉ�

����ȊO�͈ꕔ�̎푰���ς�����L�����ւ̉e���ɂȂ�܂��B
�Ƃ͌����Ă������܂ő傫���ς�����L�������Ȃ��ł��B���������m�l�ԁn�A�A���X�����m�d���n�ɕ�����ꂽ���炢�B

�����蕨
�ЂƂ܂��ݒ肵�����Ƃ���͊������܂����B
��ꂻ���Ȃ��Ƃ͋C���������Ƃ��ɍ�邩���B
���蕨�f�[�^��ǉ��v�f��肽���l�͂����R�ɁB

���X�V����
�Ever1.00
�@����L�������܂ߑS�����̊�����ݒ�
�@�`�e���f�[�^���X�V
�@���@�̐X�̓y�Y�����������\�L��

�Ever0.53
�@����L�����ȊO�̊�����ݒ�
�@����ɂ���č̓_�@�\���@�\���܂�
�@�̓_���̋��ʐݒ���C��
�@���蕨�`�e���f�[�^�X�V
�@���蕨�{�̃f�[�^���C��
�@@AREA_SETBIT������

�Ever0.12
�@�Ƃ肠�����S�n��ɓy�Y����ݒ�
�@���蕨�{�̃f�[�^����ʂ�ݒ�
�@�̓_���̋��ʐݒ��ݒ�
�@���L�����f�[�^��ݒ肵�ĂȂ��̂ł܂��̓_�@�\�͎����@�\���Ă܂���

����ꂻ���Ȃ���
��l�ł��y�Y���𗘗p�ł���
�@CFLAG:���蕨�X�g�b�N�Ɉ�����X�g�b�N���Ă����A�f�[�g���C�ӂ̃^�C�~���O�Ńv���[���g�ł���B

���_�ł��y�Y���𗘗p�ł���
�@���s�l����1�l�Ȃ�v���[���g�ł���B�Z���ɂ̓v���[���g�ł��Ȃ��B
�@���ꏊ�����܂�Ȃ��B�i�l���Ƃ��j

�v���[���g���Ă��炦��
�@�Ȃ�炩�̃^�C�~���O�i�f�[�g�A��C�x���g�H�j�Ńf�[�g���肩�瑡�蕨��Ⴆ��B�L�������ƂɃp�^�[�����ς��B
�@CFLAG:�n�������蕨���Q�Ƃ��ĒN���牽���������i�e1���܂Łj�m�F�ł���B
�@1�I��ł��C�ɓ���ɂł���B
�@ITEM�t���O�ɐݒ肷��Ύ���ŏ����Ȃ��i��̎�����Ȃ��I�j

���z�Z�[��
�@�f�C���[�C�x���g�œ���n��̓y�Y���Ŕ��z�Z�[������������B

���V����n�悲�Ƃ̑䎌
�@�X�ɂ���Ēn�̕��ɑ䎌������B

�����������j���[
�@�Ȃ�炩�̏������ŗ����j���[�������B
�@�����j���[�͒n�搧�����Ȃ��S�Ẵp�^�[���ŏ��i�����������B�i�I�[���u���[�j

�i������������
�@�Ȃ�炩�̏����œy�Y���ɕ��ԏ��i�̐���������B

�l�����E�l�؂�
�@�Ȃ�炩�̏����œy�Y���̒l�i�����������B

����e���v���̎���
�@��ρc�c�B

�\�͕\���ɕ\��
�@�ߑ��̗��H

path: 原版+前人整合等各种readme/パッチ/eraTW4.760用 主に美宵ちゃんパッチ/readme.txt


code:
eraTW4.760�p �C���p�b�`

�ȉ��̋N�����G���[�̏C���ł�

�x��Lv0:�X�e�[�^�X�\���֘A\PRINT_STATE2.ERB:252�s��:������Z�q��"=="���g���Ă��܂�
�x��Lv2:�X�e�[�^�X�\���֘A\PRINT_STATE2.ERB:252�s��:"ELSEIFCFLAG"�͉��߂ł��Ȃ����ʎq�ł�
�x��Lv2:�R�}���h�֘A\COMF\�˗�\��ʈ˗�15_���Ȃ��ɕ����ꂽ��.ERB:507�s��:'%'���g���܂������Ή�����'%'��������܂���
�x��Lv2:�R�}���h�֘A\COMF\�˗�\��ʈ˗�15_���Ȃ��ɕ����ꂽ��.ERB:513�s��:'%'���g���܂������Ή�����'%'��������܂���
�x��Lv2:�R�}���h�֘A\COMF\�˗�\��ʈ˗�15_���Ȃ��ɕ����ꂽ��.ERB:514�s��:'%'���g���܂������Ή�����'%'��������܂���


code:
eraTW4.760�p �푰����+���蕨�p�b�`ver.1.00

��������������������������������������������
���K�p����ۂ͕K���A�b�v�f�[�g���Ă���������
��������������������������������������������

���C����
�D�P�֘A�t�H���_�������Ă��̂ŏC�����܂����B

���푰����
�E�푰�f���̐ݒ�𐮗����܂����B
�m�d���n�m�H��n�m�l�`�n�m�ǉ��푰�n��V��
�m�S�n�m�V��n�́m�d���n�Ɉړ�
�m�ޏ��n�m���@�g���n�m�H���l�n�́m�ǉ��푰�n�Ɉړ�
�m�񐶕��n�́m�H��n�m�l�`�n�ɕ������Ĉړ�
�m�ǉ��푰�n�Ƃ��ām���C�h�n��V��
���A�m�l�ԁn�m�d���n�m�_��n�m�H��n�m�l�`�n�m�ǉ��푰�n���ו���

�E�ł��e���̂���D�P�֘A�ɂ��Ă͈ȉ��̒ʂ�B
�m�d���s�܂��n�������Ɓm�d���n�Ɍ��ʂ�����悤��
�m�S�n�m�V��n��s�܂��Ă��m�d���s�܂��n�͎擾�ł��Ȃ����A�m�d���s�܂��n������Ɓm�S�n�m�V��n�̔D�P���ɏ������ʂ�����悤��
�m�H��n�m�l�`�n�ɑ΂��Ắm�H��s�܂��n�m�l�`�s�܂��n��V��
�m�ޏ��n�m���@�g���n�Ɏ����`�Ń��C�h�s�܂��{�[�i�X���ݒ�i�f���ł͂Ȃ������o���j
���Ȃ݂�5�푰�ɓ͂��₷���Ȃ������m�H��n�m�l�`�n�͌��X�m�����Ⴂ�̂ő_���Ď����̂ł͂Ȃ�
�m��l�n�m�V�l�n�m���l�n�m���E�l�n���m�l�ԁn�ƕ����ĔD�P�����኱���~�C��
�n�[�t�̔D�P�m���͐l�Ԃ̔D�P�m���Ƃ̕��ϒl��

�E���̑��̉e���͈ȉ��̒ʂ�B
���F�̕��⒲���A�C�e���̌��ʂ����������m�񐶕��n���m�l�`�n�݂̂ɂ����̂Łm�H��n�ɂ͌��ʂ�����悤��
�˗��w���炵�߂āI�x�̓����Ώۂ�����
�X�J�E�^�[�̔{��������
�\�͕\���̎푰���̕\�����@������
���u�q�̎푰�ɑΉ�

����ȊO�͈ꕔ�̎푰���ς�����L�����ւ̉e���ɂȂ�܂��B
�Ƃ͌����Ă������܂ő傫���ς�����L�������Ȃ��ł��B���������m�l�ԁn�A�A���X�����m�d���n�ɕ�����ꂽ���炢�B

�����蕨
�ЂƂ܂��ݒ肵�����Ƃ���͊������܂����B
��ꂻ���Ȃ��Ƃ͋C���������Ƃ��ɍ�邩���B
���蕨�f�[�^��ǉ��v�f��肽���l�͂����R�ɁB

���X�V����
�Ever1.00
�@����L�������܂ߑS�����̊�����ݒ�
�@�`�e���f�[�^���X�V
�@���@�̐X�̓y�Y�����������\�L��

�Ever0.53
�@����L�����ȊO�̊�����ݒ�
�@����ɂ���č̓_�@�\���@�\���܂�
�@�̓_���̋��ʐݒ���C��
�@���蕨�`�e���f�[�^�X�V
�@���蕨�{�̃f�[�^���C��
�@@AREA_SETBIT������

�Ever0.12
�@�Ƃ肠�����S�n��ɓy�Y����ݒ�
�@���蕨�{�̃f�[�^����ʂ�ݒ�
�@�̓_���̋��ʐݒ��ݒ�
�@���L�����f�[�^��ݒ肵�ĂȂ��̂ł܂��̓_�@�\�͎����@�\���Ă܂���

����ꂻ���Ȃ���
��l�ł��y�Y���𗘗p�ł���
�@CFLAG:���蕨�X�g�b�N�Ɉ�����X�g�b�N���Ă����A�f�[�g���C�ӂ̃^�C�~���O�Ńv���[���g�ł���B

���_�ł��y�Y���𗘗p�ł���
�@���s�l����1�l�Ȃ�v���[���g�ł���B�Z���ɂ̓v���[���g�ł��Ȃ��B
�@���ꏊ�����܂�Ȃ��B�i�l���Ƃ��j

�v���[���g���Ă��炦��
�@�Ȃ�炩�̃^�C�~���O�i�f�[�g�A��C�x���g�H�j�Ńf�[�g���肩�瑡�蕨��Ⴆ��B�L�������ƂɃp�^�[�����ς��B
�@CFLAG:�n�������蕨���Q�Ƃ��ĒN���牽���������i�e1���܂Łj�m�F�ł���B
�@1�I��ł��C�ɓ���ɂł���B
�@ITEM�t���O�ɐݒ肷��Ύ���ŏ����Ȃ��i��̎�����Ȃ��I�j

���z�Z�[��
�@�f�C���[�C�x���g�œ���n��̓y�Y���Ŕ��z�Z�[������������B

���V����n�悲�Ƃ̑䎌
�@�X�ɂ���Ēn�̕��ɑ䎌������B

�����������j���[
�@�Ȃ�炩�̏������ŗ����j���[�������B
�@�����j���[�͒n�搧�����Ȃ��S�Ẵp�^�[���ŏ��i�����������B�i�I�[���u���[�j

�i������������
�@�Ȃ�炩�̏����œy�Y���ɕ��ԏ��i�̐���������B

�l�����E�l�؂�
�@�Ȃ�炩�̏����œy�Y���̒l�i�����������B

����e���v���̎���
�@��ρc�c�B

�\�͕\���ɕ\��
�@�ߑ��̗��H

path: 原版+前人整合等各种readme/パッチ/eraTW4.760用 種族改定+贈り物パッチver.1.00修正版/readme.txt


code:
eraTW4.760�p ������q�̉Ƃɂ������������p�b�`

����ʒu���ݒ肳��Ă��Ȃ��L����������f�[�g��ɕ����ɗU����悤�ɂȂ�܂��B
����A�Y���L�����̕����͂��̕��@�ł������邱�Ƃ��ł��܂���B
�O�ɏo��ƃ����_���ȋ��_�O�ɕ���o����܂��B
�\���I�ɓ��邱�Ƃ��ł��Ȃ��̂ŁA��x�o��Ɠ��蒼�����Ƃ��o���܂���B

path: 原版+前人整合等各种readme/パッチ/eraTW4.760用 自宅無い子の家にもお招きされるパッチ/readme.txt