code:
;-------------------------------------------------
; eraTheWorld 4.810用 梅蒂欣口上（角色の名前を入れる、下にコンセプトなど一言那个ば入れる）
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。

;------ ｷﾘﾄﾘ ｶｲｼ -----------
;eraTheWorld proto4.07パッチ取り込み用 Ver1.13
;貂プレートの使い方
;初めに置換指令等により K75 を K(角色No) に変更して下さい
;角色NoはCSVフォルダのCharaファイルを参照　例(霧雨 魔理沙の場合)：K75 =置換=> K11
;
;------ ｷﾘﾄﾘ ｵﾜﾘ -----------

;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;
;
;
;******************************************************************************

;### 口上存在判定 ###################################
@M_KOJO_K75(ARG)
;別人版を作成する際はこの貂プレではなく別人版用口上貂プレをご利用ください

;口上存在判定です、けしてコメントアウトしないでください
;他の処理は一切行わないように
RETURN 1

;### 口上基本フラグ設定 #############################
@M_KOJO_FLAGSETTING_K75
;基本フラグ設定はここで行ってください
;共通の口上フラグは必要な箇所のコメントアウトを外してご利用ください
;口上専用フラグはご自由に
;Xには角色番号を入れてください

;眠姦口上有、時間停止口上有、扮演に1を入れると、それぞれ時間停止時、眠姦時、扮演時に指令口上が読み込まれるように
;入れないと時間停止時、眠姦時、扮演時は一切喋りません
CFLAG:75:眠姦口上有 = 1
CFLAG:75:時間停止口上有 = 1
;CFLAG:X:扮演口上有 = 0

;破瓜中止口上有に1を入れると、@M_KOJO_EVENT_KX_LOST_VIRGIN_STOPで中止の成否を操作できます
;CFLAG:X:破瓜中止口上有 = 0

;口上内抱き寄せ判定_初回と口上内抱き寄せ判定_通常に1を入れると、M_KOJO_EVENT_KX_PERMISSIONで推倒の成否を操作できます
;CFLAG:X:口上内抱き寄せ判定_初回 = 0
;CFLAG:X:口上内抱き寄せ判定_通常 = 0

;推倒禁止に1を入れると、主动推倒てこなくなります
;以下は恋慕か炮友がつくまで推倒てこなくなる使用例
IF !TALENT:75:恋慕
	CFLAG:75:推倒禁止 = 1
ELSE
	CFLAG:75:推倒禁止 = 0
ENDIF

;来訪不能に1を入れると、来訪してこなくなります
;以下は面識があるまで来訪してこなくなる使用例
;IF !CFLAG:X:面識
;	CFLAG:X:来訪不能 = 1
;ELSE
;	CFLAG:X:来訪不能 = 0
;ENDIF

IF CFLAG:75:1222 == 3
	CALL K75_NURSE_MEDECINE
ENDIF

;### 口上色判定 ###################################
@M_KOJO_COLOR_K75

;ここでSETCOLORすることで口上に色を付けられます
;例：SETCOLOR 0xC07070

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"UPDATE判定"
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_UPDATE_K75
;口上独自のUPDATE用
;ENCOUNTER専用に独自分岐フラグを仕込んだ場合等にどうぞ
;UPDATE判定でCFLAG等の角色変数を使用場合、角色番号の指定が必要になります

IF !CFLAG:75:1111
	PRINTFORML 想要让梅蒂欣的身体跟随口上変更吗？
	PRINTL
	PRINTFORML ※※※※※※※※※※※※※注　意※※※※※※※※※※※※※※※
	PRINTFORML ※如果适用的话、直到事件达成为止　　　　　　　　　　　　　　※
	PRINTFORML ※梅蒂欣将无法通过阴道和肛门进行性交　　　　　　　　　　　　※
	PRINTFORML ※而且、无法通过爱抚来获得快感　　　　　　　　　　　　　　　※
	PRINTFORML ※如果改变的话、虽说能够和梅蒂欣进行性交、　　　　　　　　　※
	PRINTFORML ※但是会和本口上产生极大的差异　　　　　　　　　　　　　　　※
	PRINTFORML ※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
	PRINTFORML
	PRINTFORML [0] 変更 (UPDATE的时候可以再次进行改变)
	PRINTFORML [1] 暂且保留
	PRINTFORML [2] 不再进行変更
	$INPUT_LOOP_K75_BC
	INPUT
	IF RESULT == 0
		PRINTFORML
		PRINTFORML 梅蒂欣的身体会跟随口上而产生变化
		PRINTL
		PRINTFORML 梅蒂欣失去了阴道…
		PRINTFORML 梅蒂欣失去了肛门…
		PRINTFORML 梅蒂欣失去了阴蒂…
		TALENT:75:人形 = 99
		PRINTW
	ELSEIF RESULT == 1
		PRINTFORMW 不进行梅蒂欣的身体变化
	ELSEIF RESULT == 2
		PRINTFORMW 之后、不会再次表示这个选项
		CFLAG:75:1111 = 1
	ELSE
		GOTO INPUT_LOOP_K75_BC
	ENDIF
ENDIF

IF !CFLAG:75:1112 && (CFLAG:75:1003 == 0 || CFLAG:75:1004 == 0 || CFLAG:75:1005 == 0)
	PRINTFORML 改变梅蒂欣对于性器和精液的名称
	PRINTFORML 要进行变更吗？
	PRINTFORML
	PRINTFORML [0] 変更 (UPDATE的时候可以再次进行改变)
	PRINTFORML [1] 暂且保留
	PRINTFORML [2] 不再进行変更
	$INPUT_LOOP_K75_TN
	INPUT
	IF RESULT == 0
		PRINTFORML
		CALL PENIS_NAME_SET_K75
		CALL SAMEN_NAME_SET_K75
		CALL OMANKO_NAME_SET_K75
		PRINTFORML
	ELSEIF RESULT == 1
		PRINTFORMW 暂时不进行名称变更。
	ELSEIF RESULT == 2
		PRINTFORMW 之后、不会再次表示这个选项。
		CFLAG:75:1112 = 1
	ELSE
		GOTO INPUT_LOOP_K75_TN
	ENDIF
ENDIF

RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K75
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
;竹林拠点
IF MAIN_MAP == 4
	;無明之丘
	IF CFLAG:現在位置 == 436
		PRINTFORML 铃兰盛開的山丘
		PRINTFORML 铃兰花田之中、少女伫立着
		PRINTW
		PRINTFORML 她的年龄、还没有达到少女那个阶段
		PRINTFORML 波浪状的金色头发上、缠绕着深红的丝带
		PRINTW
		PRINTFORML 五官十分端正、观赏其美丽的同时也能感受到可爱。简直就像人偶一样
		PRINTFORML 以黑色和红色为基调的连衣裙、充分衬托出了她的可爱
		PRINTW
		;禁断的知識持ちなら、知識として知っている
		IF TALENT:MASTER:禁断的知識
			PRINTFORML 然而、这样子的还没有成年的幼女、为什么会在这么危险的地方呢
			PRINTFORML 如果自己是什么都不知道的普通人、一定会抱有这样的感想吧
			PRINTW
			PRINTFORML 然而、自己通过零碎的知识了解到
			PRINTFORML 　　　自動人偶
			PRINTFORML 她是自動人偶。是被遗弃在这片铃兰原野的人偶随着时间的推移变成的妖怪
			PRINTFORML 记得、她的名字是──
			PRINTW
		ELSE
			PRINTFORML 然而、这样子的还没有成年的幼女、为什么会在这么危险的地方呢
			PRINTFORML 即使是和父母走散了、这样偏僻的地方、一般人是无法来到这里的吧
			PRINTFORML 是被父母丢弃了吗、还是被妖怪带走了吗
			PRINTW
			PRINTFORML 再说了、铃兰可是带毒的。如果她、不小心吸入了铃兰毒的话──
		ENDIF
		PRINTFORML 「啊啦？　你是…人类呢？」
		PRINTFORML 眼前的幼女注意到了这边的存在、将头转过来张開了小嘴
		PRINTW
		PRINTFORML 从正面看到的她那小脸的可爱丝毫没有欠损、不如说、显得更加吸引人了
		PRINTFORML 如同蓝宝石般大大的眼睛、小巧端正的鼻子、丰盈得恰到好处的脸颊、
		PRINTFORML 还有那、染上淡淡的绯红色、丰润的嘴唇
		PRINTW
		PRINTFORML 「人类最讨厌了。自己擅自地制造出了我们人偶、随心所欲地利用我们、然后随意地丢弃」
		PRINTFORML 「你也、和这种人类是一样的吗」
		PRINTW
		IF !TALENT:MASTER:禁断的知識
			PRINTFORML 虽然难以置信、但眼前的她难道说是人偶吗
		ENDIF
			PRINTFORML 虽然不清楚具体情况、但她似乎敌视着人类
			PRINTW
		CALL ASK_YN("看起来是那样的吗？","我不打算做过分的事情")
		IF !RESULT
			PRINTFORML 「我不知道哇。但是、被毒倒的话就是一样的了。呐、铃铃？」
			PRINTFORML 人偶的幼女对着什么也没有的虚空说着话。有什么只有她才能看到的东西在那里吗？
			PRINTW
		ELSE
			PRINTFORML 「真的吗？　感觉没法相信啊」
			PRINTFORML 人偶的幼女面带怀疑的神色看着这边。果然、这样一看还是只能半信半疑地认为她是人偶
			PRINTW
			PRINTFORML 「…嘛算了。今天的我浑身充盈着毒心情很棒」
			PRINTFORML 「而且呢、我的毒的话、杀掉你轻轻松松啦。呐、铃铃？」
			PRINTFORML 人偶的幼女对着什么也没有的虚空说着话。有什么只有她才能看到的东西在那里吗？
			PRINTW
		ENDIF
		PRINTFORML 比起这个、毒、这个危险的单词蹦出来了。是单纯的比喻吗、还是说真的能够操控毒呢
		PRINTFORML 无论如此、必须表示没有敌意才行。即使是说谎、也不想要很不快得和幼女交战
		PRINTFORML 为了表示没有敌意摆出了笑脸、拼命地说服她
		PRINTW
		PRINTFORML 「…哼ー、虽然我不相信你、但是打倒你的事情先搁置吧」
		PRINTFORML 「我要是想那么做的话、杀掉你这种程度的事情根本没什么难度」
		PRINTW
		PRINTFORML 从刚才開始毒啦杀啦这些危险的单词、就从幼女的嘴里不断蹦出来让你笑了起来
		PRINTFORML 总之、看来是不会不分青红皂白直接攻击过来了
		PRINTW
		PRINTFORML 「我是梅蒂欣・梅兰可莉ー。想要解放被人类虐待的人偶们」
		PRINTFORML 「这孩子是铃铃。是我重要的伙伴哟」
		PRINTW
		PRINTFORML 还是往常那般「铃铃」没有出现、就当做它在那里吧
		PRINTFORML 「人类。你的名字是什么？」
		PRINTW
		PRINTFORML 明明很明明讨厌人类、却对人类很有兴趣吗？
		PRINTFORML 话虽如此、也不能轻易地损害对方的好心情、老实地抱上了名字
		PRINTW
		PRINTFORML 「是叫%CALLNAME:MASTER%呢。哼ー、奇怪的名字」
		PRINTFORML 「呐、%CALLNAME:MASTER%。你、告诉我更多关于人类的事情」
		PRINTW
		PRINTFORML 明明讨厌人类却想了解人类的事情吗？
		PRINTFORML 是因为想法表现在了表情上吧、梅蒂欣很明显得露出了蔑视的表情
		PRINTFORML 虽说是人偶表情却相当丰富啊
		PRINTW
		PRINTFORML 「真是笨蛋呢。『知己知彼、就能做到点什么』是这么说的对吧」
		PRINTFORML 「为了总有一天会到来的人偶解放日、有必要更详细地了解人类哟」
		PRINTW
		PRINTFORML 「但是、我要是从铃兰田里走出来的话、就会被各种各样的人盯上变得很麻烦」
		PRINTFORML 「%CALLNAME:MASTER%你就教我关于人类的各种事情」
		PRINTW
		PRINTFORML 由于意外的相遇、好像被任命为人偶妖怪的教师（？）了
		PRINTFORML 虽说并不理解她所说的「人偶解放」是什么、但是在这里摇头的话说不定就会遭殃
		PRINTW
		CALL ASK_YN("不情愿地答应了","产生了兴趣。答应她")
		IF !RESULT
			PRINTFORML 时间停止的话或许能够逃跑、但是万一已经被下了迟效性的毒的话估计就没有办法了
			PRINTFORML 总之先老老实实地服从她吧
			PRINTW
		ELSE
			PRINTFORML 另一方面、自己也对梅蒂欣抱有兴趣
			PRINTFORML 如果她进一步了解人类的话、会变成什么样子呢？
			PRINTW
		ENDIF
		PRINTFORML 「没错、很明智呢」
		PRINTFORML 梅蒂欣说着恩恩点了点头
		PRINTW
		PRINTFORML 「啊啊、但是」
		PRINTFORML 「我、并不打算和%CALLNAME:MASTER%搞好关系」
		PRINTW
		PRINTFORML 果然、还是不接受比较好吗…
		PRINTFORML 和你的表情相反、对于能否解開她那顽固的心、你感到了不安…
	;鈴蘭畑以外
	ELSE
		PRINTFORML 和「她」的相遇十分突然
		PRINTW
		PRINTFORML 她的年龄、还没有达到少女那个阶段
		PRINTFORML 波浪状的金色头发上、缠绕着深红的丝带
		PRINTW
		PRINTFORML 五官十分端正、观赏其美丽的同时也能感受到可爱。简直就像人偶一样
		PRINTFORML 以黑色和红色为基调的连衣裙、充分衬托出了她的可爱
		PRINTW
		;禁断的知識持ちなら、知識として知っている
		IF TALENT:MASTER:禁断的知識
			PRINTFORML 然而、这样子的还没有成年的幼女、为什么会一个人在这里呢
			PRINTFORML 如果自己是什么都不知道的普通人、一定会抱有这样的感想吧
			PRINTW
			PRINTFORML 然而、自己通过零碎的知识了解到
			PRINTFORML 　　　自動人偶
			PRINTFORML 她是自動人偶。是被遗弃在这片铃兰原野的人偶随着时间的推移变成的妖怪
			PRINTFORML 记得、她的名字是──
			PRINTW
		ELSE
			PRINTFORML 然而、这样子的还没有成年的幼女、为什么会一个人在这里呢
			PRINTFORML 即使是和父母走散了、这样偏僻的地方、一般人是无法来到这里的吧
			PRINTFORML 是被父母丢弃了吗、还是被妖怪带走了吗
			PRINTFORML 如果是迷路的话、就把她送回家里去吧──
			PRINTW
		ENDIF
		PRINTFORML 「啊啦？　你是…人类呢？」
		PRINTFORML 眼前的幼女注意到了这边的存在、将头转过来张開了小嘴
		PRINTW
		PRINTFORML 从正面看到的她那小脸的可爱丝毫没有欠损、不如说、显得更加吸引人了
		PRINTFORML 如同蓝宝石般大大的眼睛、小巧端正的鼻子、丰盈得恰到好处的脸颊、
		PRINTFORML 还有那、染上淡淡的绯红色、丰润的嘴唇
		PRINTW
		PRINTFORML 「人类最讨厌了。自己擅自地制造出了我们人偶、随心所欲地利用我们、然后随意地丢弃」
		PRINTFORML 「你也、和这种人类是一样的吗」
		PRINTW
		IF !TALENT:MASTER:禁断的知識
			PRINTFORML 虽然难以置信、但眼前的她难道说是人偶吗
		ENDIF
			PRINTFORML 虽然不清楚具体情况、但她似乎敌视着人类
			PRINTW
		CALL ASK_YN("看起来是那样的吗？","我不打算做过分的事情")
		IF !RESULT
			PRINTFORML 「我不知道哇。但是、被毒倒的话就是一样的了。呐、铃铃？」
			PRINTFORML 人偶的幼女对着什么也没有的虚空说着话。有什么只有她才能看到的东西在那里吗？
			PRINTW
		ELSE
			PRINTFORML 「真的吗？　感觉没法相信啊」
			PRINTFORML 人偶的幼女面带怀疑的神色看着这边。果然、这样一看还是只能半信半疑地认为她是人偶
			PRINTW
			PRINTFORML 「…嘛算了。今天的我浑身充盈着毒心情很棒」
			PRINTFORML 「而且呢、我的毒的话、杀掉你轻轻松松啦。呐、铃铃？」
			PRINTFORML 人偶的幼女对着什么也没有的虚空说着话。有什么只有她才能看到的东西在那里吗？
			PRINTW
		ENDIF
		PRINTFORML 比起这个、毒、这个危险的单词蹦出来了。是单纯的比喻吗、还是说真的能够操控毒呢
		PRINTFORML 无论如此、必须表示没有敌意才行。即使是说谎、也不想要很不快得和幼女交战
		PRINTFORML 为了表示没有敌意摆出了笑脸、拼命地说服她
		PRINTW
		PRINTFORML 「…哼ー、虽然我不相信你、但是打倒你的事情先搁置吧」
		PRINTFORML 「我要是想那么做的话、杀掉你这种程度的事情根本没什么难度」
		PRINTW
		PRINTFORML 从刚才開始毒啦杀啦这些危险的单词、就从幼女的嘴里不断蹦出来让你笑了起来
		PRINTFORML 总之、看来是不会不分青红皂白直接攻击过来了
		PRINTW
		PRINTFORML 「我是梅蒂欣・梅兰可莉ー。想要解放被人类虐待的人偶们」
		PRINTFORML 「这孩子是铃铃。是我重要的伙伴哟」
		PRINTW
		PRINTFORML 还是往常那般「铃铃」没有出现、就当做它在那里吧
		PRINTFORML 「人类。你的名字是什么？」
		PRINTW
		PRINTFORML 明明很明明讨厌人类、却对人类很有兴趣吗？
		PRINTFORML 话虽如此、也不能轻易地损害对方的好心情、老实地抱上了名字
		PRINTW
		PRINTFORML 「是叫%CALLNAME:MASTER%呢。哼ー、奇怪的名字」
		PRINTFORML 「呐、%CALLNAME:MASTER%。你、告诉我更多关于人类的事情」
		PRINTW
		PRINTFORML 明明讨厌人类却想了解人类的事情吗？
		PRINTFORML 是因为想法表现在了表情上吧、梅蒂欣很明显得露出了蔑视的表情
		PRINTFORML 虽说是人偶表情却相当丰富啊
		PRINTW
		PRINTFORML 「真是笨蛋呢。『知己知彼、就能做到点什么』是这么说的对吧」
		PRINTFORML 「为了总有一天会到来的人偶解放日、有必要更详细地了解人类哟」
		PRINTW
		PRINTFORML 「但是、我要是从铃兰田里走出来的话、就会被各种各样的人盯上变得很麻烦」
		PRINTFORML 「%CALLNAME:MASTER%你就教我关于人类的各种事情」
		PRINTW
		PRINTFORML 由于意外的相遇、好像被任命为人偶妖怪的教师（？）了
		PRINTFORML 虽说并不理解她所说的「人偶解放」是什么、但是在这里摇头的话说不定就会遭殃
		PRINTW
		CALL ASK_YN("不情愿地答应了","产生了兴趣。答应她")
		IF !RESULT
			PRINTFORML 时间停止的话或许能够逃跑、但是万一已经被下了迟效性的毒的话估计就没有办法了
			PRINTFORML 总之先老老实实地服从她吧
			PRINTW
		ELSE
			PRINTFORML 另一方面、自己也对梅蒂欣抱有兴趣
			PRINTFORML 如果她进一步了解人类的话、会变成什么样子呢？
			PRINTW
		ENDIF
		PRINTFORML 「没错、很明智呢」
		PRINTFORML 梅蒂欣说着恩恩点了点头
		PRINTW
		PRINTFORML 「啊啊、但是」
		PRINTFORML 「我、并不打算和%CALLNAME:MASTER%搞好关系」
		PRINTW
		PRINTFORML 果然、还是不接受比较好吗…
		PRINTFORML 和你的表情相反、对于能否解開她那顽固的心、你感到了不安…
	ENDIF
ELSE
	;無明之丘
	IF CFLAG:現在位置 == 460
		PRINTFORML 铃兰盛開的山丘
		PRINTFORML 铃兰花田之中、少女伫立着
		PRINTW
		PRINTFORML 她的年龄、还没有达到少女那个阶段
		PRINTFORML 波浪状的金色头发上、缠绕着深红的丝带
		PRINTW
		PRINTFORML 五官十分端正、观赏其美丽的同时也能感受到可爱。简直就像人偶一样
		PRINTFORML 以黑色和红色为基调的连衣裙、充分衬托出了她的可爱
		PRINTW
		;禁断的知識持ちなら、知識として知っている
		IF TALENT:MASTER:禁断的知識
			PRINTFORML 然而、这样子的还没有成年的幼女、为什么会在这么危险的地方呢
			PRINTFORML 如果自己是什么都不知道的普通人、一定会抱有这样的感想吧
			PRINTW
			PRINTFORML 然而、自己通过零碎的知识了解到
			PRINTFORML 　　　自動人偶
			PRINTFORML 她是自動人偶。是被遗弃在这片铃兰原野的人偶随着时间的推移变成的妖怪
			PRINTFORML 记得、她的名字是──
			PRINTW
		ELSE
			PRINTFORML 然而、这样子的还没有成年的幼女、为什么会在这么危险的地方呢
			PRINTFORML 即使是和父母走散了、这样偏僻的地方、一般人是无法来到这里的吧
			PRINTFORML 是被父母丢弃了吗、还是被妖怪带走了吗
			PRINTW
			PRINTFORML 再说了、铃兰可是带毒的。如果她、不小心吸入了铃兰毒的话──
		ENDIF
		PRINTFORML 「啊啦？　你是…人类呢？」
		PRINTFORML 眼前的幼女注意到了这边的存在、将头转过来张開了小嘴
		PRINTW
		PRINTFORML 从正面看到的她那小脸的可爱丝毫没有欠损、不如说、显得更加吸引人了
		PRINTFORML 如同蓝宝石般大大的眼睛、小巧端正的鼻子、丰盈得恰到好处的脸颊、
		PRINTFORML 还有那、染上淡淡的绯红色、丰润的嘴唇
		PRINTW
		PRINTFORML 「人类最讨厌了。自己擅自地制造出了我们人偶、随心所欲地利用我们、然后随意地丢弃」
		PRINTFORML 「你也、和这种人类是一样的吗」
		PRINTW
		IF !TALENT:MASTER:禁断的知識
			PRINTFORML 虽然难以置信、但眼前的她难道说是人偶吗
		ENDIF
			PRINTFORML 虽然不清楚具体情况、但她似乎敌视着人类
			PRINTW
		CALL ASK_YN("看起来是那样的吗？","我不打算做过分的事情")
		IF !RESULT
			PRINTFORML 「我不知道哇。但是、被毒倒的话就是一样的了。呐、铃铃？」
			PRINTFORML 人偶的幼女对着什么也没有的虚空说着话。有什么只有她才能看到的东西在那里吗？
			PRINTW
		ELSE
			PRINTFORML 「真的吗？　感觉没法相信啊」
			PRINTFORML 人偶的幼女面带怀疑的神色看着这边。果然、这样一看还是只能半信半疑地认为她是人偶
			PRINTW
			PRINTFORML 「…嘛算了。今天的我浑身充盈着毒心情很棒」
			PRINTFORML 「而且呢、我的毒的话、杀掉你轻轻松松啦。呐、铃铃？」
			PRINTFORML 人偶的幼女对着什么也没有的虚空说着话。有什么只有她才能看到的东西在那里吗？
			PRINTW
		ENDIF
		PRINTFORML 比起这个、毒、这个危险的单词蹦出来了。是单纯的比喻吗、还是说真的能够操控毒呢
		PRINTFORML 无论如此、必须表示没有敌意才行。即使是说谎、也不想要很不快得和幼女交战
		PRINTFORML 为了表示没有敌意摆出了笑脸、拼命地说服她
		PRINTW
		PRINTFORML 「…哼ー、虽然我不相信你、但是打倒你的事情先搁置吧」
		PRINTFORML 「我要是想那么做的话、杀掉你这种程度的事情根本没什么难度」
		PRINTW
		PRINTFORML 从刚才開始毒啦杀啦这些危险的单词、就从幼女的嘴里不断蹦出来让你笑了起来
		PRINTFORML 总之、看来是不会不分青红皂白直接攻击过来了
		PRINTW
		PRINTFORML 「我是梅蒂欣・梅兰可莉ー。想要解放被人类虐待的人偶们」
		PRINTFORML 「这孩子是铃铃。是我重要的伙伴哟」
		PRINTW
		PRINTFORML 还是往常那般「铃铃」没有出现、就当做它在那里吧
		PRINTFORML 「人类。你的名字是什么？」
		PRINTW
		PRINTFORML 明明很明明讨厌人类、却对人类很有兴趣吗？
		PRINTFORML 话虽如此、也不能轻易地损害对方的好心情、老实地抱上了名字
		PRINTW
		PRINTFORML 「是叫%CALLNAME:MASTER%呢。哼ー、奇怪的名字」
		PRINTFORML 「呐、%CALLNAME:MASTER%。你、告诉我更多关于人类的事情」
		PRINTW
		PRINTFORML 明明讨厌人类却想了解人类的事情吗？
		PRINTFORML 是因为想法表现在了表情上吧、梅蒂欣很明显得露出了蔑视的表情
		PRINTFORML 虽说是人偶表情却相当丰富啊
		PRINTW
		PRINTFORML 「真是笨蛋呢。『知己知彼、就能做到点什么』是这么说的对吧」
		PRINTFORML 「为了总有一天会到来的人偶解放日、有必要更详细地了解人类哟」
		PRINTW
		PRINTFORML 「但是、我要是从铃兰田里走出来的话、就会被各种各样的人盯上变得很麻烦」
		PRINTFORML 「%CALLNAME:MASTER%你就教我关于人类的各种事情」
		PRINTW
		PRINTFORML 由于意外的相遇、好像被任命为人偶妖怪的教师（？）了
		PRINTFORML 虽说并不理解她所说的「人偶解放」是什么、但是在这里摇头的话说不定就会遭殃
		PRINTW
		CALL ASK_YN("不情愿地答应了","产生了兴趣。答应她")
		IF !RESULT
			PRINTFORML 时间停止的话或许能够逃跑、但是万一已经被下了迟效性的毒的话估计就没有办法了
			PRINTFORML 总之先老老实实地服从她吧
			PRINTW
		ELSE
			PRINTFORML 另一方面、自己也对梅蒂欣抱有兴趣
			PRINTFORML 如果她进一步了解人类的话、会变成什么样子呢？
			PRINTW
		ENDIF
		PRINTFORML 「没错、很明智呢」
		PRINTFORML 梅蒂欣说着恩恩点了点头
		PRINTW
		PRINTFORML 「啊啊、但是」
		PRINTFORML 「我、并不打算和%CALLNAME:MASTER%搞好关系」
		PRINTW
		PRINTFORML 果然、还是不接受比较好吗…
		PRINTFORML 和你的表情相反、对于能否解開她那顽固的心、你感到了不安…
	ELSE
		PRINTFORML 和「她」的相遇十分突然
		PRINTW
		PRINTFORML 她的年龄、还没有达到少女那个阶段
		PRINTFORML 波浪状的金色头发上、缠绕着深红的丝带
		PRINTW
		PRINTFORML 五官十分端正、观赏其美丽的同时也能感受到可爱。简直就像人偶一样
		PRINTFORML 以黑色和红色为基调的连衣裙、充分衬托出了她的可爱
		PRINTW
		;禁断的知識持ちなら、知識として知っている
		IF TALENT:MASTER:禁断的知識
			PRINTFORML 然而、这样子的还没有成年的幼女、为什么会一个人在这里呢
			PRINTFORML 如果自己是什么都不知道的普通人、一定会抱有这样的感想吧
			PRINTW
			PRINTFORML 然而、自己通过零碎的知识了解到
			PRINTFORML 　　　自動人偶
			PRINTFORML 她是自動人偶。是被遗弃在这片铃兰原野的人偶随着时间的推移变成的妖怪
			PRINTFORML 记得、她的名字是──
			PRINTW
		ELSE
			PRINTFORML 然而、这样子的还没有成年的幼女、为什么会一个人在这里呢
			PRINTFORML 即使是和父母走散了、这样偏僻的地方、一般人是无法来到这里的吧
			PRINTFORML 是被父母丢弃了吗、还是被妖怪带走了吗
			PRINTFORML 如果是迷路的话、就把她送回家里去吧──
			PRINTW
		ENDIF
		PRINTFORML 「啊啦？　你是…人类呢？」
		PRINTFORML 眼前的幼女注意到了这边的存在、将头转过来张開了小嘴
		PRINTW
		PRINTFORML 从正面看到的她那小脸的可爱丝毫没有欠损、不如说、显得更加吸引人了
		PRINTFORML 如同蓝宝石般大大的眼睛、小巧端正的鼻子、丰盈得恰到好处的脸颊、
		PRINTFORML 还有那、染上淡淡的绯红色、丰润的嘴唇
		PRINTW
		PRINTFORML 「人类最讨厌了。自己擅自地制造出了我们人偶、随心所欲地利用我们、然后随意地丢弃」
		PRINTFORML 「你也、和这种人类是一样的吗」
		PRINTW
		IF !TALENT:MASTER:禁断的知識
			PRINTFORML 虽然难以置信、但眼前的她难道说是人偶吗
		ENDIF
			PRINTFORML 虽然不清楚具体情况、但她似乎敌视着人类
			PRINTW
		CALL ASK_YN("看起来是那样的吗？","我不打算做过分的事情")
		IF !RESULT
			PRINTFORML 「我不知道哇。但是、被毒倒的话就是一样的了。呐、铃铃？」
			PRINTFORML 人偶的幼女对着什么也没有的虚空说着话。有什么只有她才能看到的东西在那里吗？
			PRINTW
		ELSE
			PRINTFORML 「真的吗？　感觉没法相信啊」
			PRINTFORML 人偶的幼女面带怀疑的神色看着这边。果然、这样一看还是只能半信半疑地认为她是人偶
			PRINTW
			PRINTFORML 「…嘛算了。今天的我浑身充盈着毒心情很棒」
			PRINTFORML 「而且呢、我的毒的话、杀掉你轻轻松松啦。呐、铃铃？」
			PRINTFORML 人偶的幼女对着什么也没有的虚空说着话。有什么只有她才能看到的东西在那里吗？
			PRINTW
		ENDIF
		PRINTFORML 比起这个、毒、这个危险的单词蹦出来了。是单纯的比喻吗、还是说真的能够操控毒呢
		PRINTFORML 无论如此、必须表示没有敌意才行。即使是说谎、也不想要很不快得和幼女交战
		PRINTFORML 为了表示没有敌意摆出了笑脸、拼命地说服她
		PRINTW
		PRINTFORML 「…哼ー、虽然我不相信你、但是打倒你的事情先搁置吧」
		PRINTFORML 「我要是想那么做的话、杀掉你这种程度的事情根本没什么难度」
		PRINTW
		PRINTFORML 从刚才開始毒啦杀啦这些危险的单词、就从幼女的嘴里不断蹦出来让你笑了起来
		PRINTFORML 总之、看来是不会不分青红皂白直接攻击过来了
		PRINTW
		PRINTFORML 「我是梅蒂欣・梅兰可莉ー。想要解放被人类虐待的人偶们」
		PRINTFORML 「这孩子是铃铃。是我重要的伙伴哟」
		PRINTW
		PRINTFORML 还是往常那般「铃铃」没有出现、就当做它在那里吧
		PRINTFORML 「人类。你的名字是什么？」
		PRINTW
		PRINTFORML 明明很明明讨厌人类、却对人类很有兴趣吗？
		PRINTFORML 话虽如此、也不能轻易地损害对方的好心情、老实地抱上了名字
		PRINTW
		PRINTFORML 「是叫%CALLNAME:MASTER%呢。哼ー、奇怪的名字」
		PRINTFORML 「呐、%CALLNAME:MASTER%。你、告诉我更多关于人类的事情」
		PRINTW
		PRINTFORML 明明讨厌人类却想了解人类的事情吗？
		PRINTFORML 是因为想法表现在了表情上吧、梅蒂欣很明显得露出了蔑视的表情
		PRINTFORML 虽说是人偶表情却相当丰富啊
		PRINTW
		PRINTFORML 「真是笨蛋呢。『知己知彼、就能做到点什么』是这么说的对吧」
		PRINTFORML 「为了总有一天会到来的人偶解放日、有必要更详细地了解人类哟」
		PRINTW
		PRINTFORML 「但是、我要是从铃兰田里走出来的话、就会被各种各样的人盯上变得很麻烦」
		PRINTFORML 「%CALLNAME:MASTER%你就教我关于人类的各种事情」
		PRINTW
		PRINTFORML 由于意外的相遇、好像被任命为人偶妖怪的教师（？）了
		PRINTFORML 虽说并不理解她所说的「人偶解放」是什么、但是在这里摇头的话说不定就会遭殃
		PRINTW
		CALL ASK_YN("不情愿地答应了","产生了兴趣。答应她")
		IF !RESULT
			PRINTFORML 时间停止的话或许能够逃跑、但是万一已经被下了迟效性的毒的话估计就没有办法了
			PRINTFORML 总之先老老实实地服从她吧
			PRINTW
		ELSE
			PRINTFORML 另一方面、自己也对梅蒂欣抱有兴趣
			PRINTFORML 如果她进一步了解人类的话、会变成什么样子呢？
			PRINTW
		ENDIF
		PRINTFORML 「没错、很明智呢」
		PRINTFORML 梅蒂欣说着恩恩点了点头
		PRINTW
		PRINTFORML 「啊啊、但是」
		PRINTFORML 「我、并不打算和%CALLNAME:MASTER%搞好关系」
		PRINTW
		PRINTFORML 果然、还是不接受比较好吗…
		PRINTFORML 和你的表情相反、对于能否解開她那顽固的心、你感到了不安…
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K75_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
;地の文
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
IF LOCAL
	IF TALENT:恋慕
		IF TALENT:75:無知
			PRINTFORML 「呐、%CALLNAME:MASTER%。可以蹲下来吗」
			PRINTFORML 依梅蒂欣所言、蹲到了视线能够相视的程度
			PRINTW
			PRINTFORML 啾～～～～～～～
			PRINTFORML 梅蒂欣的脸凑了过来、有一股柔软的触感贴在嘴唇上
			PRINTW
			PRINTFORML 「嗯嗯～～～～～～～噗哈。这是我的谢礼哦」
			PRINTFORML 「以前、我曾看到有人类把嘴唇贴在一起、同时还说着『我喜欢你』」
			PRINTW
			PRINTFORML 「所以、和%CALLNAME:MASTER%接吻的话你会很高兴的吧」
			PRINTFORML 看来梅蒂欣是模仿人类的举措来献出了自己的初吻
			PRINTW
			PRINTFORML 不过与其说是接吻不如说是被强吻了、没什么情趣…
			PRINTFORML 尽管如此、我还是很高兴她能以自己的方式来表达爱意、所以摸了摸她的头发
			PRINTW
			PRINTFORML 「真是的～、你马上又把我当成小孩子了～」
			PRINTFORML 头发被弄乱的梅蒂欣气鼓鼓地鼓起了脸颊、但很快又恢复了笑容、抱住了%CALLNAME:MASTER%
			PRINTW
			PRINTFORML 「%CALLNAME:MASTER%、最喜欢你了。一直以来都谢谢你」
			PRINTW
		ELSE
			PRINTFORML 「呐、%CALLNAME:MASTER%。可以蹲下来吗」
			PRINTFORML 依梅蒂欣所言、蹲到了视线能够相视的程度
			PRINTW
			PRINTFORML 「现在我要给你一个好东西。在我拿出来之前、你要闭着眼睛哦」
			PRINTFORML 好东西？　会是什么呢？　一边这么想着一边闭上眼睛
			PRINTW
			PRINTFORML 啾
			PRINTFORML 嘴唇感受到一股柔软的触感。
		ENDIF
	ELSE
		PRINTFORML 「呐、%CALLNAME:MASTER%。可以蹲下来吗」
		PRINTFORML ？
		PRINTW
		PRINTFORML 「好啦给我蹲下！　快点快点！」
		PRINTFORML 因为看见梅蒂欣生气了、一边无奈地说着呀嘞呀嘞一边蹲了下来
		PRINTW
		PRINTFORML 紧抓！
		PRINTFORML 梅蒂欣一脸生气的表情、抓着%CALLNAME:MASTER%的脸
		PRINTW
		PRINTFORML 「请闭上眼睛」
		PRINTFORML 「好啦、快点闭上眼睛ー！」
		PRINTW
		PRINTFORML 这样吗？%CALLNAME:MASTER%闭上了眼睛
		PRINTFORML 梅蒂欣并没有回答
		PRINTW
		IF TALENT:75:無知
			PRINTFORML 啾…呣啾————
			PRINTW
			PRINTFORML 嘴唇有种凉丝丝的感觉…与此同时、嘴唇開始发痒…
			PRINTFORML 这是一个强有力的吻、毒性的伤害十分强烈
			PRINTW
			PRINTFORML 「哈ー。好啦。可以睁開眼睛了」
			PRINTFORML 一睁開眼、红着脸羞涩不已的梅蒂欣……之类的场面并没有出现、
			PRINTFORML 只有着因为产生了奇妙的成就感而作出一副得意洋洋表情的梅蒂欣
			PRINTW
			PRINTFORML 「以前在书上看过。这样做会让人类高兴」
			PRINTFORML 「所以、你很高兴吧？　咦？　难道说…不高兴吗？」
			CALL ASK_YN("我很高兴","有点太过刺激了吧…")
			IF !RESULT
				PRINTFORML 「是吧！　我就知道%CALLNAME:MASTER%一定会很高兴的。真是好懂啊」
				PRINTFORML 虽然觉得梅蒂欣说得很过分、但看着她天真烂漫的样子、我摸着刺痛的嘴唇心想这样也不错
				PRINTW
			ELSE
				PRINTFORML 「？　虽然不太明白、你意思是很高兴吗？」
				PRINTFORML 虽然是字面上的意思、但也不能对梅蒂欣的好意泼冷水、所以决定沉默以对
				PRINTW
			ENDIF
		ELSE
			PRINTFORML 啾…
			PRINTW
			PRINTFORML 嘴唇有种凉丝丝的感觉…与此同时、嘴唇開始发痒…
			PRINTFORML 当我意识到那是接吻的时候、梅蒂欣已经将嘴唇移開了
			PRINTW
			PRINTFORML 「好啦。可以把眼睛睁開了」
			PRINTFORML 睁開眼睛、一脸羞涩的梅蒂欣站在那里
			PRINTW
			PRINTFORML 「这是约会的谢礼。今天、很開心…大概吧」
			PRINTFORML 梅蒂欣把脸转向一边。我觉得像这样无法坦率地将自己的感情表达出来的样子才像是她
			PRINTW
			PRINTFORML 「咦…%CALLNAME:MASTER%的嘴唇、肿起来了呢。呼呼、好有趣ー」
			PRINTFORML 梅蒂欣指着%CALLNAME:MASTER%的脸、開始哈哈大笑起来
			PRINTFORML 和梅蒂欣的初吻、从各种意义上来说都是难忘的回忆
			PRINTW
		ENDIF
	ENDIF
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K75_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に接受かどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_SPEVENT_K75_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		IF TALENT:恋慕 || TALENT:恋人
			;约会回数１００回
			IF CFLAG:1001 == 100
				PRINTFORML 「一直以来谢谢你了、%CALLNAME:MASTER%」
				PRINTFORML 「虽然没能实现人偶解放、但是和%CALLNAME:MASTER%一起、十分地幸福哟」
				PRINTFORML 「这之后、也要一直在我身边呢。约好了哟」
				PRINTW
			ELSE
				IF BASE:75:情緒 == MAXBASE:75:情緒
					IF CFLAG:MASTER:初期位置 == CFLAG:75:初期位置
						PRINTFORML 「出去玩是在一起。回到家里也是一起」
						PRINTFORML 「我、十分地幸福哇。铃铃也、很開心呢」
						PRINTW
						PRINTFORML 梅蒂欣轻轻地伸出了小手
						PRINTFORML 握住她的小手后、梅蒂欣脸上浮现出了柔和的笑容
						PRINTFORML 二人牵着手向着家里走去
						PRINTW
					ELSE
						SELECTCASE RAND:2
						CASE 0
							PRINTFORML 「和%CALLNAME:MASTER%一起的时候、我、十分的幸福哟」
							PRINTFORML 「明天也要来看我呢。约好了哟」
							PRINTW
							CALL ASK_YN("当然哟","明天…不清楚啊")
							IF !RESULT
								PRINTFORML 「真的吗？　好開心！」
								PRINTFORML 满脸笑容的梅蒂欣抱住了你
							ELSE
								SELECTCASE RAND:3
								CASE 0
									PRINTFORML 「为什么？　你讨厌和我见面了吗？」
									PRINTFORML 梅蒂欣带着难过的表情抬头仰视着这边…
								CASE 1
									PRINTFORML 「讨厌…不能和%CALLNAME:MASTER%见面的话、会很寂寞的」
									PRINTFORML 梅蒂欣紧紧地抓住了自己的衣角
								CASE 2
									PRINTFORML 「我、会当一个好孩子的。拜托了。之后请还要来看我啊」
									PRINTFORML 「我不会说任性的话。但是寂寞、讨厌」
								ENDSELECT
							ENDIF
						CASE 1
							PRINTFORML 「和%CALLNAME:MASTER%一起的时候、我、十分的幸福哟」
							PRINTFORML 「明天也要来看我呢。约好了哟」
						ENDSELECT
						PRINTW
					ENDIF
				ELSEIF BASE:75:情緒 >= MAXBASE:75:情緒 / 2
					IF CFLAG:MASTER:初期位置 == CFLAG:75:初期位置
						PRINTFORML 「每次和%CALLNAME:MASTER%出去玩、总会有快乐的发现哇」
						PRINTFORML 「那么、回我家去吧」
						PRINTFORML 「被%CALLNAME:MASTER%抱着的话、在床上肯定会做有趣的梦呢」
						PRINTW
					ELSE
						PRINTFORML 「一直以来都不擅长应对这个时间点」
						PRINTFORML 「因为、这个时间会和%CALLNAME:MASTER%分開的啊」
						PRINTW
					ENDIF
				ELSE
					IF CFLAG:MASTER:初期位置 == CFLAG:75:初期位置
						PRINTFORML 「我想多和%CALLNAME:MASTER%一起去各种各样的地方游览」
						PRINTFORML 「还是说、想和我在家里两个人独处吗？」
						PRINTW
					ELSE
						PRINTFORML 「马上就回去吧、真无聊啊」
						PRINTFORML 「我想、更多地待在%CALLNAME:MASTER%的身边啊」
						PRINTW
					ENDIF
				ENDIF
			ENDIF
		ELSE
			;约会回数１００回
			IF CFLAG:1001 == 100
				PRINTFORML 「──一直以来、谢谢了」
				CALL ASK_YN("不用客气","你刚刚说了什么？")
				IF !RESULT
					PRINTFORML 「那种从容的样子真让人生气哇」
					PRINTFORML 「我的立场可是比你更高的。不要忘记了啊」
					PRINTFORML 「你要是明白的话、就赶紧停下那种笑嘻嘻的笑脸」
					PRINTW
				ELSE
					PRINTFORML 「什么也没有哟。呐、铃铃」
					PRINTFORML 梅蒂欣一下子就把头扭过去了
				ENDIF
			ELSE
				IF BASE:75:情緒 == MAXBASE:75:情緒
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「…以你的程度来说做的很好了呢」
					CASE 1
						PRINTFORML 「…以%CALLNAME:MASTER%的程度来说挺好的呢」
						CALL ASK_YN("称呼我的名字很開心","刚才、叫了我的名字吗？")
						IF !RESULT
							PRINTFORML 「…因为一直叫『你』的话会很麻烦的」
							PRINTFORML 梅蒂欣说完就把脸扭向一边了
							PRINTW
						ELSE
							PRINTFORML 「是心理作用哟。你的耳朵是腐烂坏掉了吧？」
							CALL ASK_YN("叫我的名字了对吧？","是这样啊")
							IF !RESULT
								PRINTFORML 「都说了是心理作用吧」
								PRINTFORML 「呜ー、真是纠缠不休！　干掉他、铃铃！」
								PRINTFORML 梅蒂欣生气了接着把毒弹幕撒了出来
								PRINTW
							ELSE
								PRINTFORML 「就是这样」
								PRINTFORML 「想要我叫你的名字的话、就更多地带我去各种各样的地方玩吧」
								PRINTW
							ENDIF
						ENDIF
					ENDSELECT
				ELSEIF BASE:75:情緒 >= MAXBASE:75:情緒 / 2
					SELECTCASE RAND:2
					CASE 0
						SELECTCASE RAND:2
						CASE 0
							PRINTFORML 「并不怎么无聊哇。就保持这样子加油吧」
							PRINTW
						CASE 1
							PRINTFORML 「并不怎么无聊哇。就保持这样子加油吧」
							CALL ASK_YN("在下理解了、大小姐","还是老样子那么拽啊")
							IF !RESULT
								PRINTFORML 「什么啊、这种语气。简直、就像佣人一样」
								PRINTFORML 「但是、你来当我的佣人也不错呢」
								PRINTFORML 「我是说可以使唤的意思。不准那样嘻嘻地笑。很恶心的哇」
								PRINTW
							ELSE
								PRINTFORML 「啊啦、你没注意到吗？　你现在还活着、是因为我让你活着而已啊」
								PRINTFORML 「不想被毒干掉的话、接下来也要好好听我说的话呢」
								PRINTW
							ENDIF
						ENDSELECT
					CASE 1
						PRINTFORML 「今天一般般吧」
						PRINTFORML 「明天要带我去更有趣的地方啊」
						PRINTW
					ENDSELECT
				ELSE
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「看着蚯蚓中毒后痛苦地翻滚的样子更開心啊」
						PRINTW
					CASE 1
						PRINTFORML 「我还以为人类、会稍微知识渊博点的、看来期待是落空了啊」
						PRINTW
					CASE 2
						PRINTFORML 「哈啊、真是好无聊」
						PRINTFORML 「我还以为你可能和其他人类不一样、期待落空真是对你失望透顶啊」
						PRINTW
					ENDSELECT
				ENDIF
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K75_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他角色と约会中に遭遇した
	;ARG:1に约会的对象
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;人类と约会中（種族：人類が付いている角色）
		IF GROUPMATCH(ARG:1,1,11,15,23,31,46,47,56,61,62,67,70,72,80,81,82,90,92,98,99,106,110,122,123)
			IF TALENT:恋慕 || TALENT:恋人
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「%CALLNAME:MASTER%…」
					PRINTW
				CASE 1
					PRINTFORML 「%CALLNAME:MASTER%…果然、还是和人类一起更開心吗？」
					PRINTFORML 梅蒂欣露出了快要哭出来的难过表情
					PRINTW
				ENDSELECT
			ELSE
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「…果然、人类是会抛弃我的啊」
					PRINTW
				CASE 1
					PRINTFORML 「果然人类还是喜欢和人类粘在一起的啊」
					PRINTW
				ENDSELECT
			ENDIF
		ELSE
			IF TALENT:恋慕 || TALENT:恋人
				PRINTFORML 「不要把%CALLNAME:MASTER%从我这里夺走啊」
				PRINTFORML 梅蒂欣露出了快要哭出来的难过表情
				PRINTW
			ELSE
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「哼哒、没有%CALLNAME:MASTER%陪着人家可是一点也不寂寞呢」
					PRINTFORML 梅蒂欣说完就把脸扭向一边了
					PRINTW
				CASE 1
					PRINTFORML 「等下、今天不是你教我人类事情的日子吗？」
					PRINTW
				ENDSELECT
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MAIN_MAP上で一日最初の挨拶
	;注、このあと通常の遭遇口上、ARG==1 OR ARG==2に接続します
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		IF TALENT:恋慕 || TALENT:恋人
			IF TIME >= 360 && TIME < 720
				SIF CFLAG:75:1002 == 1
					PRINTFORML 「早上好、%CALLNAME:MASTER%」
					PRINTFORML 梅蒂欣满脸笑容得向你打招呼
					CALL ASK_YN("早上好","怎么了、心情好像很棒呢")
					IF !RESULT
						PRINTFORML 「今天要玩什么好呢。%CALLNAME:MASTER%你、想要做什么呢？」
						PRINTW
					ELSE
						PRINTFORML 「没错、因为、早上就遇见了%CALLNAME:MASTER%嘛」
						PRINTFORML 「早上就遇见%CALLNAME:MASTER%的日子毫无疑问是很幸福的。呐、铃铃」
						PRINTW
					ENDIF
					PRINTW
			ELSEIF TIME >= 720 && TIME < 930
				SIF CFLAG:75:1002 == 1
				PRINTFORML 「你好、%CALLNAME:MASTER%」
				PRINTFORML 「%CALLNAME:MASTER%真是爱睡懒觉啊。我等得真是累死了哇」
				PRINTFORML 「等待浪费的时间、要多多陪我补上才行哦」
				PRINTW
			ELSEIF TIME >= 930 && TIME < 960
				SIF CFLAG:75:1002 == 1
				PRINTFORML 「你好、%CALLNAME:MASTER%」
				PRINTFORML 「我正好准备回家去呢」
				IF CFLAG:MASTER:初期位置 == CFLAG:75:初期位置
					PRINTFORML 「%CALLNAME:MASTER%也和我一起回去吧」
					PRINTW
				ELSE
					PRINTFORML 「如果能来我家的话、我会很開心的」
					CALL ASK_YN("当然","或许有点难")
					IF !RESULT
						PRINTFORML 「好開心！　来说好多好多的话吧」
						PRINTFORML 「想要在%CALLNAME:MASTER%的膝盖上、被拥抱着来聊天呢」
						PRINTW
					ELSE
						PRINTFORML 「这样啊…真的太可惜了哇」
						PRINTFORML 梅蒂欣很明显地变得十分失落
						PRINTW
					ENDIF
				ENDIF
			ELSE
				IF CFLAG:75:1002 == 1
					SIF TIME >= 1080
					PRINTFORML 「晚上好、%CALLNAME:MASTER%」
				ENDIF
				PRINTFORML 「我还以为今天没法见面了、十分的寂寞啊」
				PRINTFORML
			ENDIF
		ELSE
			IF TIME >= 360 && TIME < 720
				SIF CFLAG:75:1002 == 1
					PRINTFORML 「早上好」
					IF TIME < 600
						PRINTFORML 「你起得很早呢」
					ELSE
						IF GROUPMATCH(TIME:5, 0, 1)
							PRINTFORML 「太阳已经升的很高了哟。你真的是爱睡懒觉啊」
							PRINTW
						ELSE
							PRINTFORML 「你真的是爱睡懒觉啊」
							PRINTW
						ENDIF
					ENDIF
			ELSEIF TIME >= 720 && TIME < 930
				SIF CFLAG:75:1002 == 1
				PRINTFORML 「你好」
				IF GROUPMATCH(TIME:5, 0, 1)
					PRINTFORML 「太阳已经升的很高了哟。太迟了哇」
					PRINTW
				ELSE
					PRINTFORML 「太迟了哇。你要让我等多久啊」
					PRINTW
				ENDIF
			ELSEIF TIME >= 930 && TIME < 960
				SIF CFLAG:75:1002 == 1
				PRINTFORML 「你好」
				PRINTFORML 「我、本来想着已经该回家的…」
				PRINTFORML 「你真的是、在比妖怪还晚的时间里活动呢」
				PRINTW
			ELSE
				IF CFLAG:75:1002 == 1
					SIF TIME >= 1080
					PRINTFORML 「晚上好」
					PRINTFORML 「你觉得现在已经是几点了啊」
					PRINTFORML 「我、这个点都已经想要在家里好好休息了…」
					PRINTW
				ELSE
					PRINTFORML 「你觉得现在已经是几点了啊」
					PRINTFORML 「我、这个点都已经想要在家里好好休息了…」
					PRINTW
				ENDIF
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で一日最初の挨拶
	;ARG:1に约会的对象、ARG:1が0の場合は非约会
	;注、このあと通常の外出先で遭遇した口上、ARG==6 OR ARG==7に接続します
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;ARG:1と约会中
		IF ARG:1
		;一人で外出
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K75_2(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;非同棲かつ相手が先に起きてる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;TARGET私室にMASTERが入っている（恋慕時陪睡中就寝時のみ？
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF TALENT:恋慕 || TALENT:恋人
				PRINTFORML 「…来、…起来、%CALLNAME:MASTER%、快起来」
				PRINTFORML 一睁開眼睛、梅蒂欣的脸就完全占据了视野
				PRINTFORML 「啊、终于起来了。%CALLNAME:MASTER%真是爱睡懒觉呢」
				PRINTW
				PRINTFORML 不知什么时候梅蒂欣就像骑马般骑到了你的身上
				CALL ASK_M("亲吻她", EXP:75:接吻経験 >= 1, "抱住她", 1, "抚摸她的脸颊", 1, "再睡5分钟…", 1)
				SELECTCASE RESULT
				;接吻
				CASE 0
					PRINTFORML 「啊…嗯…啾…啾…」
					PRINTFORML 虽然一瞬间露出了吃惊的表情、但是梅蒂欣还是老实地接受了亲吻
					PRINTW
					PRINTFORML 「噗啊…已经、结束了吗？」
					PRINTFORML 恋恋不舍似的银丝、将二人联系在了一起
					PRINTW
					CALL ASK_YN("继续亲吻","差不多该起来了")
					IF !RESULT
						PRINTFORML 「真美妙。脑袋感觉快要荡漾了。啾、啾噗、库啾…」
						PRINTFORML 在彼此满足之前、在漫长的时间里二人尽情地相互亲吻着
						PRINTW
					ELSE
						PRINTFORML 「%CALLNAME:MASTER%真是坏心眼」
						PRINTFORML 梅蒂欣鼓起脸颊进行抗议
						PRINTFORML 「之后要继续呢。约好了哟」
						PRINTFORML 说着知道了约好了后、亲吻着额头、梅蒂欣露出了很痒似的表情
						PRINTW
					ENDIF
				;抱きしめる
				CASE 1
					PRINTFORML 「%CALLNAME:MASTER%、真温暖啊」
					IF GROUPMATCH(TALENT:MASTER:体型,1,2,3)
						;周回時の素質変更は想定してません。あしからず
						PRINTFORML 梅蒂欣那娇小的身体、能够被完美地搂在胳膊里
						PRINTFORML 「%CALLNAME:MASTER%抱着的时候、感觉十分的安心呢」
						PRINTFORML 温柔地抚摸着、脸颊贴在胸前的梅蒂欣的小脑袋
					ENDIF
					PRINTW
				;頬を撫でる
				CASE 2
					IF GROUPMATCH(TALENT:MASTER:体型,1,2,3)
						PRINTFORML 「大大的手。会保护我的手。会摸我头的手」
						PRINTFORML 梅蒂欣小手蹭着摸着脸颊的手、脸上露出幸福的表情
						PRINTW
					ELSE
						PRINTFORML 「被%CALLNAME:MASTER%的手触摸的部位、感觉十分温暖呢」
						PRINTFORML 「%CALLNAME:MASTER%的手是魔法的手呢。给了我、各种各样的东西呀」
						PRINTFORML 梅蒂欣轻轻地将自己的小手重叠在一起
						PRINTW
					ENDIF
				;あと５分…
				CASE 3
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「哼哒。那我也要一起睡啦」
						PRINTFORML 梅蒂欣躺在了床上、依偎在了%CALLNAME:MASTER%的身边
						PRINTW
					CASE 1
						PRINTFORML 「再不起来了的话、就要把让鼻尖变痒的毒灌进去了」
						CALL ASK_YN("继续黏在床上","那个实在是讨厌。起床")
						IF !RESULT
							PRINTFORML 「啊ー、不相信呢。唉咿」
							PRINTFORML 梅蒂欣在鼻尖滴了一滴毒
							PRINTW
							PRINTFORML …………
							PRINTFORML 很普通的那种、十分的痒！
							PRINTW
							PRINTFORML 忍不住痒痒推開了被子、梅蒂欣咯咯地笑着
							PRINTW
						ELSE
							PRINTFORML 「你要是再黏在床上、就危险了呢」
							PRINTFORML 梅蒂欣的指尖上、滴着作用不明的毒
							PRINTFORML 看来真是千钧一发的情况
							PRINTW
						ENDIF
					CASE 2
					SELECTCASE RAND:2
						CASE 0
							PRINTFORML 「呐」
							PRINTFORML ……
							PRINTW
							PRINTFORML 「呐、快起来」
							PRINTFORML ……
							PRINTW
							IF EXP:75:接吻経験 >= 1
								PRINTFORML 「不起来的话、就要亲你了哦」
								CALL ASK_YN("继续睡","不情愿得起床")
								IF !RESULT
									PRINTFORML ……
									PRINTFORML 「真的要亲上来了噢」
									PRINTW
									PRINTFORML 感受到脸颊上、小小的手贴了上来
									PRINTW
									PRINTFORML 「嗯…」
									PRINTFORML 柔软的嘴唇触碰着
									PRINTW
									PRINTFORML 「嗯…嗯、嗯、嗯…」
									PRINTFORML 如小鸟啄食似的、梅蒂欣无数次地轻吻着
									PRINTW
									PRINTFORML 「哈啊…还是、不起来…」
									PRINTFORML 那稚嫩的声音中、開始染上了妖艳的色泽
									PRINTW
									PRINTFORML 「啊姆…啾噜、啾、嗯、姆…」
									PRINTFORML 虽说是妖怪但还很幼小的梅蒂欣的吻、逐渐演变为了情热的接吻
									PRINTW
									PRINTFORML 「呸咯、哈啊、嗯呼、嗯啾、啾、嗯啾」
									PRINTFORML 小小的舌头撬開了嘴唇、侵入了口腔内部
									PRINTFORML 梅蒂欣的舌头、找到了伴侣般与%CALLNAME:MASTER%的舌头缠绕在一起
									PRINTW
									PRINTFORML 舌头上刺痛的感觉在游走着
									PRINTFORML 可能是沉迷于接吻吧、好像没办法完全控制毒了
									PRINTW
									PRINTFORML 与唾液混合的甘美之毒正侵蚀着正常的思考
									PRINTFORML 想要就这样子、溶于粘稠之中合为一体──
									PRINTW
									PRINTFORML 总算是想办法把堕落的思考逼到了头脑的一角后、温柔地推開了梅蒂欣
									PRINTFORML 「噗啊…终于、醒过来了呢。贪睡鬼」
									PRINTW
									PRINTFORML 「明明再多睡一会儿就好的」
									PRINTFORML 虽然是很有魅力的提案、但是不留神的话很可能会变成永眠于是摇了摇头拒绝了
									PRINTW
									PRINTFORML 梅蒂欣、姆ー、得嘟起了嘴
									PRINTFORML 就这、就这样把小脸凑了过来闭上了眼睛
									PRINTW
									PRINTFORML 饱含深情地、将自己的嘴唇与梅蒂欣小巧的嘴唇重叠在一起
									PRINTFORML 享受了很长一段时间后、缓缓地放開了嘴唇、梅蒂欣浮现出了满足的表情
									PRINTW
								ELSE
									PRINTFORML 「……明明就这样睡着也挺好的」
									PRINTFORML 梅蒂欣嘟起了小巧的嘴唇似乎很不满
									PRINTFORML 明明按你说的起来了…
									PRINTW
								ENDIF
							ELSE
								PRINTFORML 「唉咿」
								PRINTFORML 梅蒂欣捏住了嘴巴和鼻子
								PRINTW
								PRINTFORML ……
								PRINTFORML …………
								PRINTFORML ………………～～～～～～～～～～
								PRINTW
								PRINTFORML 「Kya」
								PRINTFORML 由于实在难以呼吸、慌忙地起身了
								PRINTFORML 梅蒂欣发出了微弱的悲鸣声、从%CALLNAME:MASTER%的身上滚了下去
								PRINTW
								PRINTFORML 「真是的、突然起来什么的真过分啊」
								PRINTFORML
							ENDIF
						CASE 1
							PRINTFORML 「真是的！　难得我来叫你起床！　真过分哇！」
							PRINTFORML 梅蒂欣啪嗒啪嗒地敲着胸口
							PRINTW
						ENDSELECT
					ENDSELECT
				ENDSELECT
			;恋慕、恋人無
			ELSE
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 因为感觉胸口有点重睁開眼睛一看、发现梅蒂欣如同骑马般骑在你的身上
					PRINTFORML 「你真是粗心大意呢。家里根本没上锁啊」
					PRINTFORML 「还有、你的睡脸很可爱呢。就像是被摔到地上的青蛙一样」
					PRINTW
				CASE 1
					PRINTFORML 睁開眼睛后、脸颊鼓起的梅蒂欣的身姿完全映入了视野
					PRINTFORML 「总算起来了。你真的是爱睡懒觉！」
					PRINTFORML 梅蒂欣生气的小脸也很可爱。从早上開始就看到了好东西啊
					PRINTFORML 「呜哇、这家伙、一起床就笑嘻嘻的真恶心啊、铃铃」
					PRINTW
				ENDSELECT
			ENDIF
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERが起きていて、相手が起きてきた
	;添い寝時TARGET起床はこちら（TARGET衰弱or陪睡中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;非同棲
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;夜寝るとき（おやすみ口上）
;==================================================
@M_KOJO_EVENT_K75_3(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に返回（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋慕 || TALENT:恋人
			PRINTFORML 「呼啊…已经、该睡了呢」
			PRINTFORML 漏出小小哈欠的梅蒂欣
			PRINTFORML 人偶也会打哈欠呢、被勾起兴趣了啊
			PRINTW
			IF CFLAG:MASTER:初期位置 == CFLAG:75:初期位置
				IF CFLAG:75:积攒度 > 500
					PRINTFORML 然而、梅蒂欣并没有回到自己的寝室、而是看着这边
					PRINTFORML [0] 怎么了？
					$INPUT_OYASUMI
					INPUT
					IF !RESULT
						PRINTFORML 「%CALLNAME:MASTER%。抱我到床上去嘛」
						PRINTFORML 梅蒂欣举起了双手
						PRINTFORML 一边取笑梅蒂欣真是爱撒娇、一边轻轻地抱着她到了卧室
						PRINTW
						IF EXP:75:接吻経験 >= 1
							SELECTCASE RAND:2
							CASE 0
								PRINTFORML 「总觉得还缺点什么。好像还睡不着呢」
								PRINTFORML 明明自己已经迷迷糊糊的了、却还意气用事的梅蒂欣
								PRINTW
								CALL ASK_YN("亲吻梅蒂欣的脸颊","ponpon地拍打她的胸口")
								IF !RESULT
									PRINTFORML 轻轻亲吻她的脸颊后、梅蒂欣很痒似的笑了
									PRINTFORML 收到回礼的吻后、轻轻地给梅蒂欣盖上了被子
									PRINTFORML 「晚安、%CALLNAME:MASTER%。最喜欢了哟」
									PRINTW
								ELSE
									PRINTFORML 「%CALLNAME:MASTER%、太坏心眼了哇。坏…心…眼…」
									PRINTFORML 输给了有节奏地拍打着身体的舒适感、梅蒂欣的眼皮慢慢地闭上了
									PRINTFORML 吻了下開始有规律地呼吸的梅蒂欣的小脸、安静得离開了卧室
									PRINTW
								ENDIF
							CASE 1
								PRINTFORML 「%CALLNAME:MASTER%、能给我一个晚安的吻吗？」
								PRINTFORML 仰望着你的梅蒂欣催促着
								CALL ASK_YN("亲吻梅蒂欣的脸颊","亲吻梅蒂欣的小嘴")
								IF !RESULT
									PRINTFORML 是觉得很痒吗、梅蒂欣「呼呼」得笑了
									PRINTFORML 说着「是回礼哟」、这次是梅蒂欣娇小的嘴唇触碰%CALLNAME:MASTER%的脸颊
									PRINTFORML 「晚安呢、%CALLNAME:MASTER%。最喜欢了哟」
									PRINTW
								ELSE
									PRINTFORML 「…………」
									PRINTFORML 梅蒂欣浮现出了惊讶的表情
									PRINTW
									PRINTFORML 「因为、我以为会吻额头或者脸颊的…」
									PRINTFORML 「刚才的我被吓了一跳所以要求再做一次哇」
									PRINTW
									PRINTFORML 再一次、如同确认彼此的爱般双唇重叠在一起
									PRINTFORML 「…哈啊…虽然是满足了…但是现在没法睡着了啊」
									PRINTFORML 「毕竟胸口是如此激烈地悸动着呢」
									PRINTW
									PRINTFORML 那么、下次就不做晚安的吻了吧、这样子取笑着、
									PRINTFORML 梅蒂欣说着「%CALLNAME:MASTER%真是坏心眼！」后就盖上被子闹别扭了
									PRINTW
								ENDIF
								PRINTW
							ENDSELECT
						ELSE
							PRINTFORML 「呐、%CALLNAME:MASTER%。来陪我说话直到我睡着吧」
							PRINTFORML 和睡前梅蒂欣的日课。回应着小小公主的小小任性
							PRINTW
							PRINTFORML 遥远国度的恋爱故事。小人骑士的勇敢冒险谭。被救助的动物报恩的心地善良少女的童话
							PRINTFORML 注意到的时候、梅蒂欣正发出着有规律的寝息
							PRINTFORML 轻轻地盖上被子、亲吻了额头后、安静得离開了卧室
							PRINTW
						ENDIF
					ELSE
						GOTO INPUT_OYASUMI
					ENDIF
				ELSE
					PRINTFORML 「%CALLNAME:MASTER%也要早点睡呢」
					PRINTFORML 从门缝里露出脸、梅蒂欣反复叮嘱着你
					PRINTW
					PRINTFORML 苦笑着不断说着我明白了回复、梅蒂欣依旧在门缝里露出小脸看着你
					PRINTFORML [0] 怎么了？
					$INPUT_OYASUMI2
					INPUT
					IF !RESULT
						PRINTFORML 「%CALLNAME:MASTER%、最喜欢了哟。晚安呢」
						PRINTFORML 带着害羞表情的梅蒂欣
						PRINTFORML 回答着自己也是后、梅蒂欣满意地点了点头回到了房间的深处
						PRINTW
					ELSE
						GOTO INPUT_OYASUMI2
					ENDIF
				ENDIF
			ELSE
				PRINTFORML 「明天也要来看我呢。约好了哟」
				SIF CFLAG:75:1002 == 1
				PRINTFORML 「那就再见呢。晚安」
				PRINTW
			ENDIF
		ELSE
			PRINTFORML 「明天也要来见我啊。你还要教我人类的事情呢」
			SIF CFLAG:75:1002 == 1
			PRINTFORML 「那就再见呢。晚安」
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕 || TALENT:恋人
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「还、没问题…我还、不困…」
				PRINTFORML 大概是讨厌分開吧、梅蒂欣拼命地和睡魔做着斗争
				PRINTW
			CASE 1
				PRINTFORML 「嗯ー…」
				PRINTFORML 梅蒂欣是很困吗、小脸不停地磨蹭着%CALLNAME:MASTER%的胸口
				PRINTW
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「吵死了…我还、不困呢…」
				PRINTW
			CASE 1
				PRINTFORML 「…………」
				PRINTFORML 或许是很困的梅蒂欣偶尔会发着呆
				PRINTW
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋慕 || TALENT:恋人
			PRINTFORML 「%CALLNAME:MASTER%…最喜欢了…」
			PRINTW
		ELSE
			PRINTFORML 「现在正是…将人偶…人、偶…」
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;恶作剧中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内角色がMAIN_MAPで衰弱状態になった場合か、待客室で相手が衰弱した場合に発生
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		IF TALENT:恋慕 || TALENT:恋人
		ELSE
			PRINTFORML 「哈啊、你真的是需要照顾的家伙啊…」
			PRINTFORML 「正因为这个、人类才如此不方便呢」
			PRINTW
			IF GROUPMATCH(TALENT:MASTER:体型,1,2,3)
				PRINTFORML 「而且说起来、好重～～」
				PRINTW
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで回来了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML 「我现在要去睡觉了。请不要来妨碍我」
			PRINTW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色とのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML 「我现在正想睡呢、请不要吵闹快出去」
			PRINTW
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;前のターンから一緒的房間にいる状態で相手が寝る（待客室含む（
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;移動時すれちがい
;==================================================
@M_KOJO_EVENT_K75_4(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋慕 || TALENT:恋人
			SELECTCASE RAND:4
			CASE 0
				PRINTFORML 「铃铃说、在这里就能和%CALLNAME:MASTER%见面呢」
				PRINTFORML 「真的是这样哇。好開心」
				PRINTW
			CASE 1
				PRINTFORML 「怎么了？　找我有事吗？」
				PRINTW
			CASE 2
				PRINTFORML 「一直想见你呢、%CALLNAME:MASTER%」
				PRINTFORML 笑容满面的梅蒂欣抱住了你
				PRINTW
			CASE 3
				PRINTFORML 「在这里的话、就能见到%CALLNAME:MASTER%、有这种感觉呢」
				PRINTW
			ENDSELECT
		ELSE
			IF CFLAG:75:信賴度 >= 500
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「就这么想要见我吗？　哼、你、果然很奇怪呢」
					PRINTW
				CASE 1
					PRINTFORML 「真是让我好等。那么、今天也让我听听你的话吧」
					PRINTW
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「怎么了？　找我有事吗？」
					PRINTW
				CASE 1
					PRINTFORML 「不要突然停下来啊。真的是被吓到了啊」
					PRINTW
				CASE 2
					PRINTFORML 「真是让我好等。今天也教我人类的各种事情吧」
					PRINTW
				ENDSELECT
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;轻轻地会釈して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕 || TALENT:恋人
			SELECTCASE RAND:4
			CASE 0
				PRINTFORML 「啊啊、走了呢、铃铃」
				PRINTW
			CASE 1
				PRINTFORML 「%CALLNAME:MASTER%、看起来很忙呢、铃铃」
				PRINTW
			CASE 2
				PRINTFORML 「呐、%CALLNAME:MASTER%… 啊昂、走掉了…」
				PRINTW
			CASE 3 && (CFLAG:MASTER:初期位置 == CFLAG:75:初期位置)
			;#DEFINE 天候 TIME:5
			;0= 晴天 1=晴天 2=多雲 3=曇 4=雨 5=大雨 6=霧雨 7=霧 8=雪 9=吹雪 10=細雪 11=霧雪 12=雨雪交加 13=冰雹
				IF DAY:2 == 4
					IF GROUPMATCH(TIME:5,8,10,11,12,13)
						PRINTFORML 「因为下雪了所以要快点回家呢ー！」
						PRINTW
					ELSE
						PRINTFORML 「因为今天很冷、所以要好好保暖哟ー！」
						PRINTW
					ENDIF
				ELSE
					IF GROUPMATCH(TIME:5,4,5,6)
						PRINTFORML 「现在下雨了、不可以被淋湿哟ー！」
					ELSEIF GROUPMATCH(TIME:5,3)
						PRINTFORML 「因为现在天气不好、要在下雨前回去呢ー！」
						PRINTW
					ELSE
						PRINTFORML 「要好好地回家去呢ー！」
						PRINTW
					ENDIF
				ENDIF
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「那么、今天也要教我人类的事…啊咧、走掉了呢、铃铃」
				PRINTW
			CASE 1
				PRINTFORML 「啊、你要去哪里呀！　等下ー！」
				PRINTW
			CASE 2
				PRINTFORML 「已经没影子了…」
				PRINTW
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋慕 || TALENT:恋人
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「%CALLNAME:MASTER%、看起来十分匆忙呢、铃铃」
				PRINTW
			CASE 1
				PRINTFORML 「啊、%CALLNAME:MASTER%…」
				PRINTFORML 「没注意到这边走掉了…」
				PRINTW
			CASE 2
				PRINTFORML 「甚至都不看这边一眼…」
				PRINTFORML 「铃铃、我、是不是做了什么会被讨厌的事情啊…」
				PRINTW
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「被无视了、真讨厌呢。铃铃」
				PRINTW
			CASE 1
				PRINTFORML 「哼哒。就算%CALLNAME:MASTER%不在、铃铃也和我在一起呢」
				PRINTW
			CASE 2
				PRINTFORML 「%CALLNAME:MASTER%、你在做什么啊」
				PRINTW
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;他者介入で情緒変化
;==================================================
@M_KOJO_EVENT_K75_5(ARG,ARG:1)
;口上主はTARGET
;ARGに入ってきた角色（人数が膨大なので、自己把握自己責任で
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;霊夢が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;留琴が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;マウントとりたがりメディちゃん
		IF TALENT:恋慕 || TALENT:恋人
			PRINTFORML 「你明明也是人偶、却爱着%CALLNAME:MASTER%呢」
			PRINTFORML 「但是可惜。%CALLNAME:MASTER%最喜爱的、最爱他的人是我呢」
			PRINTFORML 「不会把%CALLNAME:MASTER%让给你的」
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
	;其他（角色指定無
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;情事を目撃した
;==================================================
@M_KOJO_EVENT_K75_6(ARG,ARG:1)
;口上主はTARGET
;ARGに情事相手
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;情事を見られた
;==================================================
@M_KOJO_EVENT_K75_7(ARG,ARG:1)
;口上主はTARGET
;ARGに目撃者
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF TALENT:恋慕 || TALENT:恋人
			PRINTFORML 「怎么了？　如你所见、我们正在相爱呢」
			PRINTFORML 「现在正忙着呢、希望你不要来打搅啊」
			PRINTW
		ELSE
			PRINTFORML 「怎么了？　我、现在正在调查人类的身体中」
			PRINTFORML 「我很忙的、请不要来打扰我」
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋慕 || TALENT:恋人
			IF GROUPMATCH(ARG,17)
				PRINTFORML 「等下、人偶师桑。现在我可是在和%CALLNAME:MASTER%相爱哟」
				PRINTFORML 「请不要打扰我。要是想碍事的话、我可就要收拾你了」
				PRINTFORML 「啊…那是、我的！　只有我才可以摸的！　不行ー！」
				PRINTW
			ELSEIF GROUPMATCH(ARG,72)
				PRINTFORML 「即使是老师也不会让你打扰我和%CALLNAME:MASTER%相亲相爱的时间！」
				PRINTFORML 「要是打扰我的话、就收拾你哟」
				PRINTFORML 「啊啊ー！　亲上去了！　能和%CALLNAME:MASTER%亲吻的人、只有我一个啊！」
				PRINTW
			ELSE
				PRINTFORML 「不要来打扰我。我现在正在和%CALLNAME:MASTER%相爱中呢」
				PRINTFORML 「啊啊！　喂！　停下来！　不准黏在%CALLNAME:MASTER%身上！」
				PRINTFORML 「快放開！　快放開他！　快ー放ー開ー他ー！」
				PRINTW
			ENDIF
		ELSE
			PRINTFORML 「总觉得变成了很有趣的事情了」
			PRINTFORML 「你、为什么要抱着头呢？」
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF TALENT:恋慕 || TALENT:恋人
			PRINTFORML 「看到我们相爱的样子就逃走了、真是失礼呢」
			PRINTFORML 「但是、碍事的人已经不在了呢。来继续、相爱吧」
			PRINTW
		ELSE
			PRINTFORML 「刚才的人、脸变得通红跑掉了」
			PRINTFORML 「为什么脸会变得那么红呢？」
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;目撃した情事を問い詰める（現在無し
;==================================================
@M_KOJO_EVENT_K75_8(ARG,ARG:1)
RETURN 1

;==================================================
;胖次没収された
;==================================================
@M_KOJO_EVENT_K75_9(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF TALENT:恋慕 || TALENT:恋人
		ELSE
			PRINTFORML 「嗯、那是什么？」
			PRINTFORML 梅蒂欣发现了从口袋了微微探出一角的内裤
			PRINTW
			PRINTFORML 「这个、不是内裤吗。为什么会在这种地方呢？」
			CALL ASK_YN("因为没有袋子装…","……")
			IF !RESULT
				PRINTFORML 「哼ー」
				PRINTFORML 回答得很随意。很明显是不相信这边的说辞
				PRINTW
			ELSE
				PRINTFORML 「啊ー、在藏着什么」
				PRINTFORML 被梅蒂欣盯着脸看、因为尴尬把脸扭向了另一边
			ENDIF
			PRINTFORML 「总觉得有点可疑、所以这些内裤就没收了呢。铃铃」
			PRINTFORML 试图要回来的时候、内裤一瞬间就变成了紫色…
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;推倒た
;==================================================
@M_KOJO_EVENT_K75_10(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;诶嘿嘿==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを推倒た（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1

		IF !TALENT:75:無知
			PRINTFORML 「为什么%CALLNAME:MASTER%还不来袭击我呢？」
			PRINTFORML 骑马般骑在身上的梅蒂欣、紧紧地盯着%CALLNAME:MASTER%看
			PRINTW
			PRINTFORML 「我已经不是只能等待的公主了」
			PRINTFORML 「%CALLNAME:MASTER%不对我出手的话、就由我袭击过来吧」
			PRINTW
		ELSE
			PRINTFORML 「到底是为什么呢。为什么会想要这么做了呢」
			PRINTFORML 「接下来我该做什么才好。教教我、%CALLNAME:MASTER%」
			PRINTFORML 「做你想要做的事情就行了」
			PRINTW
		ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;抜け出した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;摆脱失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;随便状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;誘ってきた（人目につかない場所に行きたがるやつ）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;ARG:1=TARGETの欲求不満度（最高1000）
		;必要ならばこれで分岐を作ってください
		IF TALENT:恋慕 || TALENT:恋人
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「呐、%CALLNAME:MASTER%。我们来二人独处吧」
				PRINTFORML 梅蒂欣拉扯着你衣服的下摆
				PRINTW
			CASE 1
				PRINTFORML 「我、现在是很想要和%CALLNAME:MASTER%二人独处的心情」
				PRINTW
			CASEELSE
				PRINTFORML 「来找个更安静的地方来聊天吧」
				PRINTW
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「不是很喜欢很吵闹的地方哇。我们走吧」
				PRINTFORML 梅蒂欣拉扯着你衣服的下摆
				PRINTW
			CASE 1
				PRINTFORML 「在这里的话很难听清你说的话。到其他地方去吧」
				PRINTW
			CASEELSE
				PRINTFORML 「总觉得、我不喜欢待在这里」
				PRINTFORML 「我刚刚这么感觉的哟。不行么？」」
				PRINTW
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;浴場で遭遇
;==================================================
@M_KOJO_EVENT_K75_11(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「请你出去」
		PRINTFORML 门被紧紧地关上了
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕 || TALENT:恋人
			PRINTFORML 「%CALLNAME:MASTER%也想要进来泡澡吗？」
			PRINTFORML 「一起进来吧。我想让你洗一下身体哇」
			PRINTW
		ELSE
			PRINTFORML 「什么呀。人偶不可以泡澡吗？」
			CALL ASK_YN("身体会不疼吗？","浴缸变成了怪异的颜色…")
			IF !RESULT
				PRINTFORML 「只是泡个澡的话没问题哟」
				PRINTFORML 「比起那个、你也不要一直站在那里进来一起怎么样？」
				PRINTW
			ELSE
				PRINTFORML 「啊啊、我身体内的毒好像渗出来了」
				PRINTFORML 感觉简直就是高汤、但是这种情况、不如说是浮沫更正确吧
				PRINTW
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;寝床に忍び込み
;==================================================
@M_KOJO_EVENT_K75_12(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（憤怒）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		SELECTCASE RAND:2
		CASE 0
			PRINTFORML 「不要…打扰睡觉…」
		CASE 1
			PRINTFORML 「呜呜ー…吵死了ー…」
		ENDSELECt
		PRINTFORML 从睡得半睡半醒的梅蒂欣身上、冒出了毒雾
		PRINTFORML 想着这绝对不妙吧、一溜烟儿地跑掉了
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF CFLAG:75:睡眠
			PRINTFORML 梅蒂欣呼呼地发出可爱的寝息声
			PRINTFORML 如果不发出很大的声音的话她就不会醒来吧
			PRINTW
		ELSE
			PRINTFORML 「啊咧…%CALLNAME:MASTER%…」
			PRINTFORML 「怎么了…？　想要和我一起睡吗…？」
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		PRINTDATAL
			DATAFORM 「我现在很困。明天再说吧」
			DATAFORM 「你觉得现在几点了…」
			DATAFORM 「快出去…我很困…」
		ENDDATA
		PRINTW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;お仕事中
;==================================================
@M_KOJO_EVENT_K75_13(ARG,ARG:1)
;口上主はTARGET
;ARG:1に残っている工作量
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;工作開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋慕 || TALENT:恋人
			;诶嘿嘿中断
			IF TFLAG:COMABLE管理 > 1
				PRINTFORML 「啊啊、差不多该去收集毒素了」
				PRINTFORML 「抱歉、%CALLNAME:MASTER%。我、该走了」
				IF BASE:勃起 >= 1000
					PRINTFORML 「啊啊、明明现在还是这么大的状态」
					IF TALENT:75:無知
						PRINTFORML 「把这个弄肿了很抱歉」
						PRINTFORML 梅蒂欣温柔地抚摸着勃起的阴茎
						PRINTFORML 仅仅这样就很轻易地抵达绝顶、前端迸射着先走汁
						PRINTW
						PRINTFORML 「等到我回来后、就继续来治疗肿胀吧」
						PRINTFORML 「等着我呢、%CALLNAME:MASTER%」
						PRINTW
					ELSE
						PRINTFORML 「没法让你满足很抱歉、%CALLNAME:MASTER%」
						PRINTFORML 梅蒂欣轻吻着勃起的阴茎
						PRINTFORML 仅仅这样就很轻易地抵达绝顶、前端迸射着先走汁
						PRINTW
						PRINTFORML 「等工作结束之后、那个…随心所欲地使用我舒服起来也是可以的啦」
						PRINTFORML 「这段时间请做个好孩子慢慢等着呢」
						PRINTW
					ENDIF
				ELSE
					IF TALENT:75:無知
						PRINTFORML 「肿胀似乎消退了。太好了哇」
						PRINTFORML 「那么、我就先走了呢」
						PRINTW
					ELSE
						PRINTFORML 「感觉清爽了吗？　这样就、太好了哇」
						PRINTFORML 「那么、我就先走了呢」
						PRINTW
						PRINTFORML 「啊、对了」
						PRINTFORML 离開的时候、梅蒂欣在你耳边说着悄悄话
						PRINTW
						PRINTFORML 「在我的工作结束前、不可以一个人舒服起来哟」
						PRINTFORML 「%CALLNAME:MASTER%能好好地等我嘛？　这样、好孩子呢」
						PRINTFORML 「能好好地等我回来的话、之后会再次让你舒服起来的呢」
						PRINTW
					ENDIF
				ENDIF
			ELSE
				PRINTDATAL
					DATAFORM 「虽然还想要多和%CALLNAME:MASTER%说说话…但是必须走了」
					DATAFORM 「虽然还想多和%CALLNAME:MASTER%玩一会儿…抱歉呢」
					DATAFORM 「之后还要和我说话呢。约好了哟」
					DATAFORM 「因为是很重要的工作…所以不可以翘掉。抱歉呢」」
				ENDDATA
				PRINTW
			ENDIF
		ELSE
			PRINTDATAL
				DATAFORM 「虽然想听你说更多的话…没办法呢」
				DATAFORM 「现在该去收集毒了」
				DATAFORM 「我很忙。没有功夫搭理你」
			ENDDATA
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
			PRINTDATAL
				DATAFORM 「空啪咯　空啪咯ー　毒啊聚集吧ー」
				DATAFORM 「啊啊、我的身体充满了毒」
				DATAFORM 「唔嗯、今天也聚集了很棒的毒呢」
				DATAFORM 「铃铃、今天也谢谢你」
				DATAFORM 「被老师拜托的毒…这种程度应该就可以了吧」
				DATAFORM 「今天是毒天气呢」
				DATAFORM 「今天也状态很好呢」
			ENDDATA
			PRINTW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;工作結束
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
			PRINTDATAL
				DATAFORM 「结束了哇」
				DATAFORM 「这样就结束了呢」
				DATAFORM 「积累了这种程度的量给老师不知道行不行啊」
				DATAFORM 「铃铃、今天也谢谢你」
				DATAFORM 「唔嗯、已经足够了」
				DATAFORM 「收集这么多的话就足够了哇」」
				DATAFORM 「是不是有点收集过头了呢？」
			ENDDATA
			PRINTW
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;吃飯系
;==================================================
@M_KOJO_EVENT_K75_14(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;TCVAR:盗み食い抑制で持っていた食物を食われるのを回避できる
	;仕様例（薬が入ってたら食わない）

	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		IF DISH_DRG
			TCVAR:盗み食い抑制 = 1
			IF !TALENT:恋慕 || !TALENT:恋人
				PRINTFORML 「这个、放进去了奇怪的东西对吧」
				PRINTFORML 「之前还想着要不要吃、放ー弃啦」
				PRINTW
			ENDIF
		ELSE
			IF STRCOUNT(DISH_TASTE, "辣/") >= 1
				TCVAR:盗み食い抑制 = 1
				PRINTFORML 「很辣的不要…讨厌」
			ELSEIF STRCOUNT(DISH_TASTE, "丰盛/") >= 1
				TCVAR:盗み食い抑制 = 1
				PRINTFORML 「看起来一点也不可爱…」
			ELSEIF STRCOUNT(DISH_TASTE, "香料/") >= 1
				TCVAR:盗み食い抑制 = 1
				PRINTFORML 「火辣辣的、讨厌…」
			ELSE
				IF STRCOUNT(DISH_TASTE, "甜/") > 1
					PRINTFORML 「好甜…好幸福…」
					PRINTFORML 梅蒂欣吃着最喜欢的甜食沉醉其中
					PRINTW
				ELSEIF STRCOUNT(DISH_TASTE, "软绵绵/") >= 1
					PRINTFORML 「软乎乎…软乎乎…」
					PRINTFORML 梅蒂欣小手捂着自己脸颊陶醉着
					PRINTW
				ENDIF
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;MASTERが推倒た
;==================================================
@M_KOJO_EVENT_K75_15(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（推倒指令に統合？
	;MASTERが推倒た（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
	;-------------------------------------------------
	;事後描写
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;精液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;愛液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;事後の情緒
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;服を着る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;陪睡
;==================================================
@M_KOJO_EVENT_K75_16(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;添い寝を始めた（開始時）(存在せず
	;記入チェック
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;添い寝を終了した（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;時止め終了時
;==================================================
@M_KOJO_EVENT_K75_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;胖次紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;無知持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
		;舐めとり
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚肛門射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
		;ソレ以外
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精口服避孕薬無
		IF ARG:1 == 1
		;非処女膣内射精口服避孕薬あり
		ELSEIF ARG:1 == 2
		;処女膣内射精
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K75_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K75_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;你の私室変更により同居
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K75_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K75_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML （我该怎么办…）
		PRINTFORML （我、最近、有时候竟然没有思考人偶解放的事情…）
		PRINTW
		PRINTFORML （都是%CALLNAME:MASTER%的错）
		PRINTFORML （遇见了%CALLNAME:MASTER%后、我、变得奇怪起来了）
		PRINTW
		PRINTFORMW （明明应该是最讨厌人类的）
		PRINTFORMW （%CALLNAME:MASTER%好多次地来见我）
		PRINTFORMW （和我说了好多话）
		PRINTFORMW （但是时不时恶作剧的%CALLNAME:MASTER%稍微有点讨厌）
		PRINTFORMW （也有好好地在保养我）
		PRINTFORMW （偶尔会强行让我吃辣的东西）
		PRINTFORMW （看不到%CALLNAME:MASTER%就会感到寂寞）
		PRINTFORMW （我对于%CALLNAME:MASTER%…）
		PRINTFORML
		PRINTFORMW 「铃铃、我、对人类…对%CALLNAME:MASTER%、我喜欢上了他」
		PRINTFORMW 「我现在还是讨厌人类的哟。但是、%CALLNAME:MASTER%他、%CALLNAME:MASTER%他…」
		PRINTFORMW 「我、想要永远和%CALLNAME:MASTER%在一起啊、铃铃…」
		PRINTW
		PRINTFORML 「明日他也…会来见我吗…」
		PRINTFORML 「%CALLNAME:MASTER%…」
		PRINTW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW （%CALLNAME:MASTER%呢）
		PRINTFORMW （他和至今为止遇到的人类、好像有点不一样）
		PRINTFORMW （会教我各种各样的事情、而且、有些温柔）
		PRINTFORML
		PRINTFORMW （相信他、也可以吗…）
		PRINTFORMW （但是、再次被抛弃的话、好恐怖…）
		PRINTFORML
		PRINTFORMW 「该、该怎么办、才好呢、铃铃」
		PRINTFORMW 「别沉默了告诉我呀。呐、说句话呀」
		PRINTL
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K75_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;通常自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同室時自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;中だし精液自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無知持ち（自慰経験(調教自慰経験は差し引き)による分岐あり
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		LOCAL:2 = EXP:自慰経験 - EXP:調教自慰経験
		;無知消去イベントあり（表示は一度だけ
		IF LOCAL:1 >= 25
		;地の文分岐。書きたい場合は[SKIPSTART][SKIPEND]を削除してください
		[SKIPSTART]
		ELSEIF LOCAL:1 >= 20
		ELSEIF LOCAL:1 >= 15
		ELSEIF LOCAL:1 >= 10
		ELSEIF LOCAL:1 >= 5
		[SKIPEND]
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質あり自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;-------------------------------------------------
		;Ｃ敏感orＣ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｖ敏感orＶ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ａ敏感orＡ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｂ敏感orＢ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部位指定無し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			PRINTFORML
			RETURN 1
		ENDIF
		;其他
		;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;尻穴膣腔同時
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;膣腔のみ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;其他
		;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;我慢
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K75_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K75_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K75_25(ARG,ARG:1)
;口上主はLOCAL
;ARG:1	何人目の兒童か
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K75_26(ARG,ARG:1)

;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;見られた瞬間
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;什麼也不做
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;そのまま続行
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;逐出
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;やっちゃう
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;事後
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 6
		;事後お泊り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
	ENDSELECT
ENDIF

;オナバレックス判定用関数
;RETURN -1で強制失敗、RETURN 1で強制成功
@M_KOJO_EVENT_K75_26_1(ARGS)
#DIM 補正値
IF ARGS == "どうぞそのまま"

ELSEIF ARGS == "二人"

ENDIF

;使用例
;IF !TALENT:XX:恋慕
;	PRINTFORMW %CALLNAME:XX%はガードが堅いぞ！
;	RETURN -1
;ENDIF
;IF TALENT:MASTER:濃厚精液
;	PRINTFORMW %CALLNAME:XX%はちんぽに弱いぞ！
;	RETURN 1
;ENDIF
;==================================================
;相手から约会のお誘い
;==================================================
@M_KOJO_EVENT_K75_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K75_28(ARG,ARG:1)
;口上主はTARGET
;ARGに脱がし方選択
;ARG:1（ARG=3の場合のみあり）地の文の反応
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;全裸にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;变成只穿内衣的样子
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;胖次ちょうだい
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE ARG:1
				;-------------------------------------------------
				CASE 0
				;交換です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;憤怒口上
;==================================================
@M_KOJO_EVENT_K75_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの胆量で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;泣かせてしまった　[膽怯]持ち
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;相手が推倒を解除
;==================================================
@M_KOJO_EVENT_K75_30(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;疲惫
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;満足して解放
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;満足したところを被逆推た
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;壊れるまでしてあげる
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;一日の終了時(AFTERTRAニーの前)、面識がなければ呼び出されない
;==================================================
@M_KOJO_EVENT_K75_31(ARG,ARG:1)
;口上主はTARGET
;ARGは会ってない日数
;何日以上会ってなかったら愚痴を言うとかできます
;CFLAG:オナバレで分岐入れてもよさそう
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL

;==================================================
;梅蒂欣特殊事件枠
;==================================================

	;禁断のポワゾン
	IF ((TALENT:恋慕 && TALENT:恋人) || ((TALENT:恋慕 || TALENT:恋人) && CFLAG:75:好感度 >= 10000 && CFLAG:75:信賴度 >= 5000)) && CFLAG:75:1222 <= 1
		CALL K75_POISON_XXX
	ENDIF

	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;今日会っていない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		IF !TALENT:75:恋慕 || !TALENT:75:恋人
			IF ARG == 124 && CFLAG:好感度 >= 2000 && CFLAG:信賴度 >= 1000
				CALL EVENTEND_TSUBUYAKI
				CALL PRINT_FACE, [[梅蒂欣]], "通常", "服", "", ""
				PRINTFORML 「………………」
				PRINTW
			ELSEIF ARG == 62 && CFLAG:好感度 >= 2000 && CFLAG:信賴度 >= 500
				CALL EVENTEND_TSUBUYAKI
				CALL PRINT_FACE, [[梅蒂欣]], "発情", "裸", "", ""
				PRINTFORML （%CALLNAME:MASTER%…肯定、把我的事情什么的忘记了呢）
				PRINTFORML （果然、人类什么的不能相信）
				PRINTW
			ELSEIF ARG == 31 && CFLAG:好感度 >= 1000 && CFLAG:信賴度 >= 300
				CALL EVENTEND_TSUBUYAKI
				CALL PRINT_FACE, [[梅蒂欣]], "通常", "裸", "", ""
				PRINTFORML （%CALLNAME:MASTER%、完全不来见我）
				PRINTFORML 「真是讨厌的心情嗯、铃铃」
				PRINTW
			ELSEIF ARG == 10 && CFLAG:好感度 >= 1000 && CFLAG:信賴度 >= 100
				CALL EVENTEND_TSUBUYAKI
				CALL PRINT_FACE, [[梅蒂欣]], "憤怒", "服", "", ""
				PRINTFORML 「那家伙真是的、已经好几天不来见我了」
				PRINTFORML 「真是个没礼貌的家伙啊、铃铃」
				PRINTW
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今日会っている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1

[SKIPSTART]
;-------------------------------------------------
;オナバレ遭遇時の地の文を默认のものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等の角色変数を使用場合、角色番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K75_ONABARE_1(ARG)
;-------------------------------------------------
:口上色を付けるならコメントアウトを外しXを角色番号に
;CALL M_KOJO_COLOR_K75

IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレでそのまま続けてもらう場合の地の文を默认のものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等の角色変数を使用場合、角色番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K75_ONABARE_2(ARG)
;-------------------------------------------------
:口上色を付けるならコメントアウトを外しXを角色番号に
;CALL M_KOJO_COLOR_K75

IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレ無崩しックスの地の文を默认のものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等の角色変数を使用場合、角色番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K75_ONABARE_3(前戯１,本番はどっちか,回数,注入量)
;-------------------------------------------------
#DIM 前戯１
;1=C 2=B 3=M
#DIM 本番はどっちか
;0でＶ、1でＡ
#DIM 注入量
#DIM 回数

:口上色を付けるならコメントアウトを外しXを角色番号に
;CALL M_KOJO_COLOR_K75

SELECTCASE 前戯１
	CASE 1
		PRINTFORML Ｃ責め
	CASE 2
		PRINTFORML Ｂ責め
	CASE 3
		PRINTFORML Ｍ責め
ENDSELECT

IF 本番はどっちか
	PRINTFORML Aで本番
ELSE
	PRINTFORML Vで本番
ENDIF
;-------------------------------------------------
[SKIPEND]

;-------------------------------------------------
;処女・無自覚非処女に挿入する直前の口上
;RETURN 1すると指令を中止します
;RETURN 0なら通します
;CFLAG:破瓜中止口上有がオンになってないと読み込まれないので注意
;-------------------------------------------------
@M_KOJO_EVENT_K75_LOST_VIRGIN_STOP
;-------------------------------------------------
PRINTFORML
RETURN 1

;-------------------------------------------------
;CFLAG:口上内抱き寄せ判定_初回がオンになっている場合のみ有効。
;初めて推倒た時、ここでRETURN -1すると推倒を強制的に中止します。
;RETURN 0なら通常の判定を行い、RETURN 1すると無条件に成功させます。
;特定のイベント（约会帰り接吻など）を見るまで诶嘿嘿できないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_K75_PERMISSION_1
;-------------------------------------------------
PRINTFORML
;RETURN -1
RETURN 0
;RETURN 1
;-------------------------------------------------

;-------------------------------------------------
;CFLAG:口上内抱き寄せ判定_通常がオンになっている場合のみ有効。
;合意付きで推倒た時、ここでRETURN -1すると推倒を強制的に中止します。
;RETURN 0なら通常街道成功させます。
;合意があっても何らかの理由で诶嘿嘿できないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_K75_PERMISSION_2
;-------------------------------------------------
PRINTFORML
RETURN 0
;RETURN -1
;-------------------------------------------------

;-------------------------------------------------
;部屋描写用関数
;口上角色のOMANEKIBEYAか拠点の描写に使います
;記入する際はコメントアウトを外してください
;-------------------------------------------------
;@K75_ROOM_DESCRIPTION
;PRINTFORML 例）生活感のない殺風景な部屋だ
;-------------------------------------------------

;-------------------------------------------------
;角色が你に贈り物をくれたときの口上
;-------------------------------------------------
;@M_KOJO_EVENT_K75_GIFT(GIFT_NAME)
;#DIMS GIFT_NAME	;贈り物の名称

;PRINTFORML 「%GIFT_NAME%をあげるから大事に使って」

path: ERB/口上・メッセージ関連/個人口上/【75】メディスン/M_KOJO_K75_イベント.ERB


repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【75】メディスン/M_KOJO_K75_カウンター.ERB

license: unknown