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

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

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

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

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

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

;眠姦口上有、時間停止口上有、扮演に1を入れると、それぞれ時間停止時、眠姦時、扮演時に指令口上が読み込まれるように
;入れないと時間停止時、眠姦時、扮演時は一切喋りません
;CFLAG:X:眠姦口上有 = 0
;CFLAG:X:時間停止口上有 = 0
;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:X:恋慕 && !TALENT:X:炮友
;	CFLAG:X:推倒禁止 = 1
;ELSE
;	CFLAG:X:推倒禁止 = 0
;ENDIF

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

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

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

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

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K85
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
;拠点が命蓮寺かどうか
IF MAIN_MAP == 1
	PRINTFORML 「……原来如此，虽然有听了圣大人说过」
	PRINTFORML 「你是命莲寺的新住客吧？」
	PRINTFORML 「啊啊失礼了。初次见面」
	PRINTFORML 「你好。我是在命莲寺修行的云居一轮」
	PRINTFORMW 有着端正的容貌的少女敬了一礼、
	PRINTFORMW 此外、胸前硕大的果实、足以招来羡慕的眼光吧
	PRINTL
	PRINTFORMW 「虽然会有诸多困难、但我们是今后一起生活的朋友。请多关照」
	PRINTFORMW 这样说着笑了起来。像太阳一样的笑容让%CALLNAME:MASTER%稍微看入迷了――
ELSE
	PRINTFORMW 「这么说来，听说最近幻想乡里奇怪的居民增加了，原来是你吗？」
	PRINTFORMW 「啊啊失礼了。初次见面」
	PRINTFORMW 「你好。我是在命莲寺修行的云居一轮」
	PRINTFORMW 有着端正的容貌的少女敬了一礼、
	PRINTFORMW 此外、胸前硕大的果实、足以招来羡慕的眼光吧
	PRINTL
	PRINTFORMW 「虽然会有诸多困难、但我们是今后一起生活的朋友。请多关照」
	PRINTFORMW 这样说着笑了起来。像太阳一样的笑容让%CALLNAME:MASTER%稍微看入迷了――

ENDIF

PRINTL
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K85_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
	PRINTFORML
	PRINTFORMW 「哈啊～ 很開心哟。下次再约我吧%CALLNAME:MASTER%」
	PRINTFORMW 回去的时候，两个人步调一致，并排走在回家的路上
	PRINTFORMW 忽然往旁边一看、一轮正凝视着%CALLNAME:MASTER%的侧脸
	PRINTFORMW 被那平静的微笑所吸引，停下了脚步
	PRINTFORMW 想问问是不是脸上沾了什么东西时――
	PRINTFORML
	PRINTFORMW 轻飘飘的、她身上的香味
	PRINTFORMW 一轮的脸近在眼前
	PRINTFORMW 两个人的嘴唇重叠在一起
	PRINTFORMW 「……啾……啾哈啊」
	PRINTFORML
	PRINTFORMW 「……诶嘿嘿、……约会的礼物，请收下吧\/\/\/」
	PRINTFORMW 这么说着的她露出害羞的表情，很可爱
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K85_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に接受かどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML 「第一次打招呼的时候，怎么也想不到两个人会这样去约会呢……」
		PRINTFORMW 并排走在回家的路上，一轮在身旁嘟囔着。
		PRINTFORMW 「我啊、一開始对%CALLNAME:MASTER%，绝对没有当做一个男人来看待呢」
		PRINTFORMW 「但是，在一起的时候，真的很開心，很開心…」
		PRINTFORMW 羞涩地稍微低下头，再抬起头来
		PRINTFORMW 脸上染上了淡淡的朱红色，说出了那句话――
		PRINTFORMW 「我……」
		PRINTFORMW 「我、喜欢%CALLNAME:MASTER%」
		PRINTFORMW 「能和我，交往吗？」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		PRINTFORMW 当告诉她这边也有同样的想法时、一轮的眼睛浮现出朦胧的水汽
		PRINTFORML
		PRINTFORMW 「真的……？」
		PRINTFORMW 「真的吗、喜欢我？」
		PRINTFORML
		PRINTFORMW 一轮带着一副不相信的样子反问、%CALLNAME:MASTER%确实地点了点头
		PRINTFORMW 感动到极点的一轮、不假思索地紧紧抱住了%CALLNAME:MASTER%
		PRINTFORMW 短暂的拥抱后，%CALLNAME:MASTER%摘下了一轮常戴着的头巾
		PRINTFORMW 「啊…\/\/\/」
		PRINTFORMW 抚摸着在风中稍显凌乱的头发。怀中的一轮、和平时不同，像朵花一样温顺。
		PRINTFORMW 「%CALLNAME:MASTER%、最喜欢了っ…\/\/\/」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
				PRINTFORML
		PRINTFORMW 「……」
		PRINTFORMW 「……啊ー、这样啊…」
		PRINTFORMW 「我好像，稍微有些兴奋过头了」
		PRINTFORMW 一轮勉强摆出平静的样子掩饰着、明显可以看出沮丧。
		PRINTFORMW 「今天很開心哦，真的」
		PRINTFORMW 「下次、还能一起出去玩的话我会很開心的」
		PRINTFORMW 「还有、……那个」
		PRINTFORMW 「总有一天，绝对要让你回心转意」
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_SPEVENT_K85_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
		PRINTFORML
		IF TALENT:恋人
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「……啊哈哈、被说是做过头了♪」
				PRINTFORML 享受着有一搭没一搭无聊的对话
				PRINTFORML 手和手紧紧相牵一起走着。仅此就涌出幸福的心情
				PRINTFORML 「诶嘿嘿……我现在、和%CALLNAME:MASTER%在一起很幸福…」
				PRINTFORMW 朝着同一个方向，两个人依偎在一起的同时，慢慢地踏上了归途
			CASE 1
				PRINTFORML 「嗯，下次的约会去哪里好呢？」
				PRINTFORML 「我的话想去那里呢ー」
				PRINTFORML 还在归途的二人，就进行着下一个约定会的商谈
				PRINTFORML 「啊啊但是、那里的景色得是和%CALLNAME:MASTER%你一起看……才行」
				PRINTFORMW 两个人在回家的路上，话题和思念不断地延续着……
			CASEELSE
				PRINTFORML 「呵呵、果然和%CALLNAME:MASTER%在一起，就觉得很開心」
				PRINTFORML 「只是，快乐的时光一转眼就过去了」
				PRINTFORML 「如果那一瞬间能一直持续下去的话、就不会有问题了吧、对吧%CALLNAME:MASTER%♪」
				PRINTFORML 这样说着的一轮kiyo—，的，紧紧地抱住了%CALLNAME:MASTER%
				PRINTFORML 即使抗议说这样走路很辛苦也没用的%CALLNAME:MASTER%
				PRINTFORMW 一边感受着一轮温暖，一边悠闲地走到了回家的路上。……
			ENDSELECT
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 走在回家路上，和一轮一起回顾着今天的约会
				PRINTFORML 「哎呀，真開心啊ー♪」
				PRINTFORML 「对了，下次我们去那里吧，那里！」
				PRINTFORML 「要让你看看我的推荐的地方。呵呵呵」
				PRINTFORML 被挽着的手臂时不时碰到胸部，偷偷享受着那样的触感、
				PRINTFORMW 谈笑着踏上了归途――
			CASE 1
				PRINTFORML 「啊～啊、约会已经结束了吗～……」
				PRINTFORML 「……%CALLNAME:MASTER%開心吗？」
				PRINTFORML %CALLNAME:MASTER%点了点头、一轮便露出開心的微笑
				PRINTFORML 「太好了，那么，下次也要继续哦♪」
				PRINTFORMW 在想着下一次见面的同时，两个人走在回家的路上……
			CASEELSE
				PRINTFORML 「我啊，很喜欢这样回来的时间～」
				PRINTFORML 「怎么说呢，因为这是约会的一部分、的说……」
				PRINTFORML 那样说着的一轮的侧脸、有着平静的充实感
				PRINTFORMW （如果%CALLNAME:MASTER%也有同样的感受的话，就再好不过了……）
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「啊，已经是回家的时间了……」
				PRINTFORML 「度过了非常開心的时光呢♪下次也请多关照～」
				PRINTFORMW 这样说着的一轮，挥着手愉快地回去了……
			CASEELSE
				PRINTFORML 「诶呀～、果然还是得和谁一起出去走走比较好呢ー」
				PRINTFORML 「%CALLNAME:MASTER%、今天真是谢谢你了」
				PRINTFORMW 「那么，再见啦ー♪」
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「那么，差不多该回去了吧？」
				PRINTFORML 「好好转换心情了呢。有机会的话再邀请我吧。」
				PRINTFORMW 一轮鞠了一个躬，轻轻挥着手回去了
			CASEELSE
				PRINTFORML 「啊，今天就这样解散了吗？」
				PRINTFORMW 「回去的路上请小心，那么再见了」
			ENDSELECT
		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_K85_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;境内の場合
		IF CFLAG:MASTER:現在位置 == 102
			IF TALENT:恋慕 || TALENT:恋人
				SELECTCASE RAND:5
				CASE 0
					PRINTFORML 「……总有一天要两个人……诶嘿嘿……」
					PRINTFORML 一轮幸福地自言自语着
					PRINTFORML 「诶嘿嘿……」
					PRINTFORMW 「嗯……？啊、你好、%CALLNAME:MASTER%♪」
				CASE 1
					PRINTFORML %CALLNAME:MASTER%靠近的时候、一轮露出花一般的笑容迎接着
					PRINTFORML 「呀吼ー　%CALLNAME:MASTER%♪」
					PRINTFORML 大概是察觉到了两个人的气氛吧、雲山从一轮身边离開去晒太阳了。
					PRINTFORMW 「让他费心了？没关系的哟。本来就是个喜欢悠闲的家伙」
				CASE 2 TO 3
					PRINTFORML 「啊啊、果然是%CALLNAME:MASTER%啊♪」
					PRINTFORML 一轮用温暖的目光看着%CALLNAME:MASTER%，好像知道他要来似的。
					PRINTFORML 「我是怎么知道的？这是修行的成果哟♪」
					PRINTFORML
					PRINTFORMW ——之前云山在窃窃私语的事就当没看见吧。
				CASEELSE
					SELECTCASE TIME
					;朝８時～夕方５時。実質休日のみ
					CASE 480 TO 1020
						PRINTFORML 一轮和雲山一起和儿童们玩耍着
						PRINTFORML 注意到了%CALLNAME:MASTER%、露出開心的笑容、靠近了%CALLNAME:MASTER%。
						PRINTFORML 那个样子被孩子们看到了、一轮像是要展示给大家看一样，牵起了%CALLNAME:MASTER%的手。
						PRINTFORMW 「呵呵呵、对你们来说刺激太强了吧～♪」
					;それ以外
					CASEELSE
						PRINTFORML 一轮注意到了%CALLNAME:MASTER%、くいくい的、招着手示意过来
						PRINTFORML 走近之后，红着脸的一轮悄悄的把手缠了上来
						PRINTFORML 胸脯柔软的触感和温暖传递到胳膊上……
						PRINTFORML
						PRINTFORML 「这种地方还是有点麻烦呢……%UNICODE(0x2665)%」
						PRINTFORMW 恶作剧般笑着的一轮用手臂封锁了%CALLNAME:MASTER%逃离的路
					ENDSELECT
				ENDSELECT
			ELSEIF TALENT:思慕
				SELECTCASE RAND:5
				CASE 0
					PRINTFORML 「唔恩、姆nia姆nia……%CALLNAME:MASTER%……」
					PRINTFORMW 靠在墙上、一轮梦呓着%CALLNAME:MASTER%的名字
				CASE 1
					PRINTFORML 一轮和人里的儿童们玩耍着
					PRINTFORML 注意到了%CALLNAME:MASTER%一轮，展现出花一般的笑容迎接着。
					PRINTFORML 「%CALLNAME:MASTER%。　你好」
					PRINTFORMW 那个样子被看到的孩子们模仿了…
				CASE 2 TO 3
					PRINTFORML 「啊啊、果然是%CALLNAME:MASTER%嘛」
					PRINTFORML 「诶呀、因为感受到了气息呢」
					PRINTFORMW 注意到%CALLNAME:MASTER%的一轮似乎很開心
				CASEELSE
					SELECTCASE TIME
					;朝８時～夕方５時。実質休日のみ
					CASE 480 TO 1020
						PRINTFORML 一轮和人里的儿童们玩耍着
						PRINTFORML 注意到了%CALLNAME:MASTER%一轮，展现出花一般的笑容迎接着。
						PRINTFORMW 「%CALLNAME:MASTER%。你好」
					CASEELSE
						PRINTFORML 「唔～～嗯、该怎么办呢？」
						PRINTFORML 一轮露出认真的表情在烦恼着
						PRINTFORML
						PRINTFORML 「…买到的酒、要藏在哪里呢…？」
						PRINTFORML …………也许不问是什么比较好
						PRINTFORMW 「啊、%CALLNAME:MASTER%！听到了吧！应该会帮我的吧！」
					ENDSELECT
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「一、二　一、二」
					PRINTFORMW 似乎是在排练的样子
				CASE 1
					PRINTFORML 「哦呀、你好」
					PRINTFORML 一轮一脸轻松愉快地朝这边打招呼，%CALLNAME:MASTER%也做了回应
					PRINTFORMW 虽然只是普通地伫立着，却没看到哪里有漏洞的样子
				CASEELSE
					SELECTCASE TIME
					;朝８時～夕方５時。実質休日のみ
					CASE 480 TO 1020
						PRINTFORML 一轮在和儿童说话
						PRINTFORML 好像是附近村子里的孩子
						PRINTFORMW 「吼啦吼啦、不要在墓地那边玩啊ー！」
					CASEELSE
						PRINTFORML 「啊咧、为什么会在这个时候」
						PRINTFORMW 一副不可思议的表情、一轮和%CALLNAME:MASTER%打了招呼
					ENDSELECT
				ENDSELECT
			ENDIF
		;境内以外
		ELSE
			IF TALENT:恋慕 || TALENT:恋人
				SELECTCASE RAND:4
				CASE 0
					PRINTFORML 「%CALLNAME:MASTER%。在这一起喝茶怎么样？」
					PRINTFORML 坐在那休息的一轮发现了%CALLNAME:MASTER%、
					PRINTFORML 啪啪的、用手拍打着自己旁边的位置
					PRINTFORML
					PRINTFORML 「诶嘿嘿、吼啦、再坐过来点♪」
					PRINTFORML %CALLNAME:MASTER%坐在了旁边、一轮把身体靠了过来
					PRINTFORMW 柔软的触感和微微的甜香令人心旷神怡……
				CASE 1 TO 2
					PRINTFORML 「啊啊、果然是%CALLNAME:MASTER%啊♪」
					PRINTFORML 一轮用温暖的目光看着%CALLNAME:MASTER%，好像知道他要来似的。
					PRINTFORML 「我是怎么知道的？这是修行的成果哟♪」
					PRINTFORML
					PRINTFORMW ——之前云山在窃窃私语的事就当没看见吧。
				CASEELSE
					PRINTFORML 「……唔嘿嘿、%CALLNAME:MASTER%、那里不行～……唔嘿嘿」
					PRINTFORML 总觉得一轮露出愉快的笑容沉眠着
					PRINTFORML 「嗯嗯、所以说、那里是～っ…………啊。」
					PRINTFORML ……醒来的同时眼睛对上了。
					PRINTFORML
					PRINTFORMW 「…………诶、那个……早上好……\/\/\/」
				ENDSELECT
			ELSEIF TALENT:思慕
				SELECTCASE RAND:5
				CASE 0 TO 2
					PRINTFORML 「啊啊、果然是%CALLNAME:MASTER%嘛」
					PRINTFORML 「诶呀、因为感受到了气息呢」
					PRINTFORMW 注意到%CALLNAME:MASTER%的一轮似乎很開心
				CASE 3
					PRINTFORML 「哦呀、你好。%CALLNAME:MASTER%」
					PRINTFORML 见到%CALLNAME:MASTER%的一轮露出淡淡的微笑
					PRINTFORML 无意中问了一下理由、
					PRINTFORML 「诶？笑着た？……为什么」
					PRINTFORMW 好像自己也不太清楚，歪着头思考着
				CASEELSE
					IF INROOM(CFLAG:現在位置)
						PRINTFORML 「……什么呀、这种心情……」
						PRINTFORML 一轮把手放在胸前自问着什么
						PRINTFORML %CALLNAME:MASTER%打了个招呼，一下子回过头来
						PRINTFORML 「哈噫！？谁！？重カラサワカラサワイザナミイザナミアラキデアラキデ！？」
						PRINTFORMW 大概是相当吃惊吧，她说出了谜一样的话。是佛经的一种吗……？
					ELSE
						PRINTFORML 「嗯っ、嗯っ、嗯っ……っと」
						PRINTFORML 朝着声音的方向看过去，一轮正做着伸展运动
						PRINTFORML 时而强调自身存在的非常柔软的股关节、
						PRINTFORML 每次转身都明显晃动的胸部显示着健康的魅力
						PRINTFORMW 「啊、%CALLNAME:MASTER%、如果有空的话一起做吧？」
					ENDIF
				ENDSELECT
			ELSE
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「哦呀、%CALLNAME:MASTER%。你好」
					PRINTFORMW 一圈轻轻地点头，藏在头巾里的头发稍微摇动了起来
				CASEELSE
					PRINTFORM 「哦呀、你好」
					PRINTFORML 一轮一脸轻松愉快地朝这边打招呼，%CALLNAME:MASTER%也做了回应
					PRINTFORMW 虽然只是普通地伫立着，却没看到哪里有漏洞的样子
				ENDSELECT
			ENDIF
			;時姦刻印があるとき時姦刻印/7で
			IF MARK:時姦刻印 > 0 && RAND:7 < MARK:時姦刻印
				PRINTFORML %CALLNAME:MASTER%一接近、\@MARK:快楽刻印>0? #時姦によって\@刻上了强烈快乐的一轮的肉体
				PRINTFORMW 无意识地寻求%CALLNAME:MASTER%的疼爱…
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「稍微失礼一下」
			IF TALENT:恋慕
				PRINTFORMW 一轮以一种平静中充满亲切感的语调靠近了。
			ELSEIF TALENT:思慕
				PRINTFORMW 和%CALLNAME:MASTER%两眼相对时，显得稍微有点慌张的样子、一轮靠近了过来
			ELSE
				PRINTFORMW 说着一轮来到了这里
			ENDIF

			;時姦刻印があるとき時姦刻印/7で
		IF MARK:時姦刻印 > 0 && RAND:7 < MARK:時姦刻印
			IF MARK:快楽刻印 > 0
				PRINTFORML 来到了%CALLNAME:MASTER%身旁、在乍一看很普通的一轮的衣服下
				PRINTFORMW 自然发情变得敏感的性感带焦急地等待着%CALLNAME:MASTER%给予快乐……
			ELSE
				PRINTFORML 看来，由于时奸毫无抵抗地绽放的母体本能、
				PRINTFORMW 无意识地追求着%CALLNAME:MASTER%、就这样缩短了距离……
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			IF MARK:快楽刻印 > 0 && RAND:7 < MARK:快楽刻印
				PRINTFORML 「%CALLNAME:MASTER%发现……嘿咻」
				PRINTFORML 一轮一发现%CALLNAME:MASTER%、飞快地冲了个澡寄身过来
				PRINTFORML 「哈啊～、真暖和真暖和……呼……っ」
				PRINTFORML 伴随着悠闲的声音、浴池里一轮的脚缠上了%CALLNAME:MASTER%的脚
				PRINTFORML 「嗯—～？怎么了、%CALLNAME:MASTER%？」
				PRINTFORML 「……身体碰到了？呼呼呼」
				PRINTFORML 「这里只是放松的地方、应该不会有人在这发情的吧ー……」
				PRINTFORML 恶作剧般笑着的一轮、開始摩擦起了脚
				PRINTFORMW 也许是因为水汽的关系、那双眼睛看上去有些湿润……
			ELSEIF MARK:時姦刻印 > 0 && RAND:7 < MARK:時姦刻印
				PRINTFORML 「哎呀，你已经在里面了呀」
				PRINTFORML 「……我马上就来哦，请稍等」
				PRINTFORML 这样说着，一轮去了洗澡的地方，開始清洗身体
				PRINTFORML 但是视线一直盯着%CALLNAME:MASTER%的身体、样子很奇怪
				PRINTFORML 是被时奸的记忆牵引而发情了吗？
				PRINTFORML 清洁着身体的手非常艳丽地来回抚动，特别是洗私处的指尖有着猥亵的动作
				PRINTFORML 浇上热水冲淋身体后，吐着灼热的气息进入了浴池
				PRINTFORMW 「哈啊啊啊……终于准备好了……嗯呼っ」
			ELSE
				PRINTFORML 「吼啦吼啦%CALLNAME:MASTER%、往旁边坐点ー」
				PRINTFORML 一轮坐到了%CALLNAME:MASTER%泡着的旁边
				PRINTFORML 「嗯—～っ、……哈啊～～、活过来啦～……」
				PRINTFORML 泡了一会儿之后、一轮把頭靠在了%CALLNAME:MASTER%的身上
				PRINTFORML 「呼……舒服的要睡着了、记得在溺水前叫醒我哦？」
				PRINTFORMW 在感受到互相接触的舒适的同时、看到露出可爱的眼神仰视着的一轮说出这种话，%CALLNAME:MASTER%苦笑着点了点头
			ENDIF
		ELSEIF TALENT:恋慕
			PRINTFORML 「――诶呀、你已经在里面了呀」
			PRINTFORML 一轮一边靠近%CALLNAME:MASTER%一边泡进水里
			PRINTFORML
			PRINTFORML 「呵呵，泡澡果然很舒服～……嗯——っ」

			IF MARK:快楽刻印 > 0 && RAND:7 < MARK:快楽刻印
				PRINTFORML 大幅度仰起身体的一轮、露出挑逗的微笑倚在%CALLNAME:MASTER%身上
				PRINTFORML 「啊—但是……%CALLNAME:MASTER%是不是更喜欢別的『舒服的事情』呢？」
				PRINTFORML 看起来像是在漂浮着的丰满的双丘在入浴后不久染上了樱花色，
				PRINTFORMW 不时滴落着热水的双丘的前端牢牢吸引住了%CALLNAME:MASTER%的视线……
			ELSEIF MARK:時姦刻印 > 0 && RAND:7 < MARK:時姦刻印
				PRINTFORML 「……话虽如此……为什么会变成这样呢……」
				PRINTFORML 一轮嘟囔着，她的视线注视着%CALLNAME:MASTER%的裸体，尤其是胯股之间
				PRINTFORML 「不，什么都……哈啊—……っ」
				PRINTFORML 为了不被发现，一瞬间移開了视线、相反的在时停中已经被開发了的一轮的肉体
				PRINTFORMW 不可置否地对%CALLNAME:MASTER%的裸体作出反应，热辣地疼痛着……
			ELSE
				PRINTFORML 眼前逞强的一轮。
				PRINTFORMW 那抖动的胸部和美丽的腋下线条让%CALLNAME:MASTER%为之恍惚
			ENDIF

		ELSE
			PRINTFORML 「――啊咧っ、%CALLNAME:MASTER%！？」
			PRINTFORML 水汽中出现的一轮、慌忙抱掩盖住那丰满的身体
			PRINTFORML
			PRINTFORML 「已经在里面的啊……哈哈哈」
			PRINTFORML 「那个……打扰了！」

			IF MARK:快楽刻印 > 0 && RAND:7 < MARK:快楽刻印
				PRINTFORML 红着脸的一轮一同泡进浴池、
				PRINTFORML 看来是双方赤身裸体的接近让身体想起了性交的记忆
				PRINTFORMW 像上火了似地不时地往%CALLNAME:MASTER%的股间投来热切的目光……
			ELSEIF MARK:時姦刻印 > 0 && RAND:7 < MARK:時姦刻印
				PRINTFORML 见识到%CALLNAME:MASTER%的裸体后，一轮的肉体不由自主地想起时奸的快乐
				PRINTFORMW 从秘所里、还没进入浴池，透明的液体就滴落下来了……
			ELSE
				PRINTFORML %CALLNAME:MASTER%稍微远一些的地方、一轮浸入水中
				PRINTFORMW 水珠滴入隐约可见的胸谷中，真是美艳……
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF MARK:快楽刻印 > 0 && RAND:7 < MARK:快楽刻印
			PRINTFORML 「――啊、……哦哦ー……、咳咳」
			PRINTFORML 「失、失礼了……哈哈哈」
			PRINTFORML 数秒后贪婪地看着%CALLNAME:MASTER%的肢体的一轮清醒了、
			PRINTFORMW 慌慌张张地把看不见的秘部遮住，离開了
		ELSEIF MARK:時姦刻印 > 0 && RAND:7 < MARK:時姦刻印
			PRINTFORML 「呜哇っ、已经有人了吗」
			PRINTFORML 「……嗯咕、请、请慢用……」
			PRINTFORML 一瞬间产生了无法理解的快感的错觉，浑身僵硬的一轮一边咽着口水一边转身。
			PRINTFORML 眼睛朝着即将离去的浑圆屁股下看
			PRINTFORMW 还没进浴室，透明的液体就已经流出来了……
		ELSE
			PRINTFORML 「唔诶！？失、失礼了！」
			PRINTFORMW 一轮有点害臊的出去了……
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML 「kora！洗澡时间都是决定好了的吧！」
		PRINTFORMW 「赶紧给我出去！」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他角色と约会中に遭遇した
	;ARG:1に约会的对象
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K85_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 GETBIT(TALENT:MASTER:性別,1) && CFLAG:既成事實 & 合意_诶嘿嘿 && EXP:奉仕快楽経験 >= 10 && EXP:口淫経験 >= 10
			SELECTCASE RAND:4
			CASE 0
				PRINTFORMW 从睡眠中醒来的%CALLNAME:MASTER%，下半身感觉到了一种很舒服的违和感
				PRINTFORML
				PRINTFORML 「姆孚っ、嗯っ、嗯孚っ、嗯孚哈啊っ……嗯啊？早上好、%CALLNAME:MASTER%」
				PRINTFORML 只见一轮把脸埋在%CALLNAME:MASTER%的股间热情地亲吻着阴茎
				PRINTFORML 「刚起床的的鸡鸡、为什么会这么硬呢……啾噜」
				PRINTFORML 「很美味哦……因为看起来很辛苦呢、っ孚哈、要让它冷静下来……っ」
				PRINTFORML 一轮的嘴唇和舌头在说话的时候也很认真地纠缠着、
				PRINTFORML 因唾液闪闪发光的阴茎和嘴唇奏出的水声变得激烈起来
				PRINTFORML 「嗯孚――っ、哈啊、好厉害っ……！哈姆っ、姆啾噜っ、啾噗啾噗っ、嗯゛、姆゛唔っ！」
				PRINTFORML 终于到了极限的%CALLNAME:MASTER%は、恍惚地往狼吞虎咽的一轮嘴里射出了精液……
				PRINTFORMW 「嗯呼っ、嗯咕っ、恩っ……っ哈啊—、多谢你的款待……诶嘿嘿っ」
			CASE 1
				PRINTFORMW 感受到令人烦恼的感觉，%CALLNAME:MASTER%睁開眼睛、听到了股間噗喳噗喳的声音
				PRINTFORML
				PRINTFORML 「早上壕……哈啊っ、嗯啾っ、呸喽呸喽っ……」
				PRINTFORML 「这样子的、早安咬、喜欢吗……哈啊—っ」
				PRINTFORML %CALLNAME:MASTER%的阴茎和一轮的嘴唇之间、有几条透明的线、
				PRINTFORML 显示了口淫的时长和猥亵
				PRINTFORML 「而且……呵呵、%CALLNAME:MASTER%的睡颜、还有一颤一颤的鸡鸡、都好可爱♪」
				PRINTFORML 「不知不觉就想恶作剧了呢～、诶噜嘞噜っ……啾噜噜っ」
				PRINTFORML 「吼啦—、早晨第一发浓烈的、biuーbiuー的来吧……哈啊姆、嗯噗、嗯っ、嗯っ」
				PRINTFORML 这句话成为了导火线、%CALLNAME:MASTER%膨胀得几乎要裂開的龟头被大力吮吸着
				PRINTFORMW 往一轮口中、射出了滚烫的一发……
			CASE 2
				PRINTFORML 「吼啦、%CALLNAME:MASTER%、快点起床」
				PRINTFORML 「要是输给被窝的诱惑，后果不堪设想～」
				PRINTFORMW %CALLNAME:MASTER%被一轮那充满实感的台词唤醒了
			CASEELSE
				PRINTFORML 「诶—诶—……～♪……啊、起来了」
				PRINTFORML %CALLNAME:MASTER%睁開眼睛、看到了噗尼噗尼的戳着脸颊的一轮的身影
				PRINTFORMW 「因为睡颜很可爱、不知不觉就……好啦、已经早上了哟ー」
			ENDSELECT
		ELSEIF CFLAG:好感度 >= 1500 && CFLAG:信賴度 >= 300
			SELECTCASE RAND:4
			CASE 0
				PRINTFORML 「%CALLNAME:MASTER%－、已经早上了哟ー」
				PRINTFORML 「我知道你还想接着睡啦、快起来ー……」
				PRINTFORMW %CALLNAME:MASTER%被一轮温柔地叫醒、睁開了眼睛
			CASE 1
				PRINTFORML 「起床时间到了哟、%CALLNAME:MASTER%」
				PRINTFORML 「%CALLNAME:MASTER%－？……再不起来我就要恶作剧了哟～……？」
				PRINTFORML 那样说着，一轮的脸慢慢靠近了
				PRINTFORML 享受着飘浮着的柔和香味，%CALLNAME:MASTER%睁開眼睛打了招呼
				PRINTFORML 「等、已经醒了的话就告诉我啊……真是的」
				PRINTFORMW 即使询问恶作剧的内容、也会被脸微微发红的一轮岔開话题
			CASE 2
				PRINTFORML 「%CALLNAME:MASTER%、请快点起床」
				PRINTFORML 「要是输给被窝的诱惑，后果可是不堪设想」
				PRINTFORMW %CALLNAME:MASTER%被一轮那充满实感的台词唤醒了
			CASEELSE
				PRINTFORML 「诶—诶—……～♪……啊、起来了」
				PRINTFORML %CALLNAME:MASTER%睁開眼睛、看到了噗尼噗尼的戳着脸颊的一轮的身影
				PRINTFORMW 「因为睡颜很可爱、不知不觉就……好啦、已经早上了哟ー」
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「吼啦吼啦、已经早上了哟%CALLNAME:MASTER%」
				PRINTFORML 「……睡过头的话，身体反而会变得疲倦哦～？」
				PRINTFORMW %CALLNAME:MASTER%被一轮摇晃着身体醒了过来
			CASEELSE
				PRINTFORML 「%CALLNAME:MASTER%、请快点起床」
				PRINTFORML 「要是输给被窝的诱惑，后果可是不堪设想」
				PRINTFORMW %CALLNAME:MASTER%被一轮那充满实感的台词唤醒了
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			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 = 1
	;-------------------------------------------------
	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
		IF TALENT:恋人
				PRINTFORML 「姆nia姆nia……好困ー……」
				PRINTFORML 虽然好像已经起床了、但一轮还是睡眼惺忪的样子。
				PRINTFORML 「%CALLNAME:MASTER%－、chuー的一下、chuー……」
				PRINTFORML 「不然我就不起来～……姆niu」
				PRINTFORML 啪嗒啪嗒地动着双手的同时，闭着眼睛索求着吻
				PRINTFORML %CALLNAME:MASTER%没有办法，只好亲了亲脸颊、一轮不检点地露出微笑
				PRINTFORML 「嗯—……♪这样子就有精神了呢……嗯～……啊疼っ」
				PRINTFORMW 轻轻地给想再睡懒觉的恋人一手刀、那样子总算醒了过来
		ELSEIF TALENT:恋慕 || TALENT:思慕
				PRINTFORML 「唔哦ー……不用管我先去……姆nia—」
				PRINTFORML 从一边说梦话一边翻了个身的一轮的胸口处、看到一个看起来很柔软的山谷
				PRINTFORML %CALLNAME:MASTER%在欣赏那一幕的时候、一轮睁開了眼睛
				PRINTFORMW 「咕哦哦哦……嗯哦？……啊—、早上好」
		ELSE
			PRINTFORML 「呼啊—……早上好」
			PRINTFORMW 「%CALLNAME:MASTER%也起的这么早啊」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
;ENDIF
RETURN 1

;==================================================
;夜寝るとき（おやすみ口上）
;==================================================
@M_KOJO_EVENT_K85_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 一轮恋恋不舍地，用困倦的表情嘟囔着
			PRINTFORMW 「那么，明天见」
			PRINTFORML
			PRINTFORMW 「……夜爬（“夜這い”这个很难说清楚想知道可以百度）什么的，可不要去做哦？」
		ELSE
			PRINTFORML 「那么，差不多该睡了」
			PRINTFORML 「%CALLNAME:MASTER%也不能太熬得太晚哦ー」
			PRINTFORMW 揉着惺忪的睡眼，一轮回去了……
		ENDIF
		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
	;-------------------------------------------------
	;恶作剧中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内角色がMAIN_MAPで衰弱状態になった場合か、待客室で相手が衰弱した場合に発生
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF TALENT:恋人
			PRINTFORMW 「……っ啊゛～っ、哈っ、哈噫っ……」
			PRINTFORMW 「已经……已经、要死了、呜……」
			PRINTFORMW 稍微观赏了会儿流汗气绝的一轮的身姿、%CALLNAME:MASTER%公主抱着将她送到了被窝里
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……啊、哈啊゛っ…哈っ…太厉害，了」
			PRINTFORMW 「已经不行了，到此为止吧、……っ哈っ、哈啊っ」
			PRINTFORMW 一轮全身染上了樱色、%CALLNAME:MASTER%背着她回到了房间。
		ELSE
			PRINTFORMW 「…哈啊っっ…已经到极限…っ、哈っ…」
			PRINTFORMW 照顾了会儿肩膀起伏着呼吸的一轮后、%CALLNAME:MASTER%送别了她
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		IF TALENT:恋人
			PRINTFORML 「哇哇！%CALLNAME:MASTER%！%CALLNAME:MASTER%！」
			PRINTFORML 「振作点　%CALLNAME:MASTER%！没事吧……诶？只是很累？」
			PRINTFORML 冷静下来确认了%CALLNAME:MASTER%的情况的一轮、安心地叹了口气
			PRINTFORML 「真是……吓我一跳」
			PRINTFORML 「别让我这么担心啊、真是……」
			PRINTFORMW 这样说着一轮温柔地抱起%CALLNAME:MASTER%、搬到了房间里……
		ELSEIF TALENT:恋慕
			PRINTFORML 「没，没事吧！？」
			PRINTFORML 「太乱来了吧……真是的」
			PRINTFORML 「我马上送你回房间，不要勉强」
			PRINTFORMW 这样说着的一轮抱起了%CALLNAME:MASTER%、搬到了房间里……
		ELSE
			PRINTFORML 「没，没事吧ー？」
			PRINTFORML 「这就完全没力气了……没办法」
			PRINTFORML 一轮把手放到%CALLNAME:MASTER%的身体上、微微一用力、把%CALLNAME:MASTER%扛了起来
			PRINTFORMW 「既然这么累就不要勉强自己啊……真是」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
	;-------------------------------------------------
	;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 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色とのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			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_K85_4(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=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:恋人
			PRINTFORML 「嘿嘿ー。%CALLNAME:MASTER%－、去哪里呀」
			PRINTFORML 「……这样啊。那么、那么，请慢走」
			PRINTFORML 这样说着、一轮笑着轻轻地挥手
		ELSEIF TALENT:恋慕
			PRINTFORML 「嘿嘿ー。%CALLNAME:MASTER%－、去哪里呀」
			PRINTFORML 「……这样啊。那么、那么，请慢走」
			PRINTFORML 这样说着、一轮笑着轻轻地挥手
		ELSEIF TALENT:思慕
			PRINTFORML 「好ー哦、那么ー」
			PRINTFORML 一轮爽朗地挥手回复
		ELSE
			PRINTFORML 「啊、你好」
			PRINTFORML 一轮礼貌地点了点头回复
		ENDIF
		;快楽or時姦刻印がある時
		IF MARK:快楽刻印 > 0 && RAND:7 < MARK:快楽刻印
			PRINTFORML 渐渐远去的一轮乍看之下很普通、但和%CALLNAME:MASTER%擦肩而过的时候
			PRINTFORML 刻在脑海里的快乐记忆，一轮的蜜壺自然而然地变成了一滩泥泞……
		ELSEIF MARK:時姦刻印 > 0 && RAND:7 < MARK:時姦刻印
			PRINTFORML 但是在衣服下面、为了防备突然的快感，性感带发出了丝丝的疼痛。
			PRINTFORML 一轮本人也在不知不觉中用目光追随着%CALLNAME:MASTER%……
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;聖が入ってきた 角色番号55
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 15
		IF TALENT:恋人
			PRINTFORML 「圣大人、工作辛苦了」
			PRINTFORML 一轮从紧紧靠着的%CALLNAME:MASTER%的身边离開、向白莲打了招呼
			PRINTFORMW 看着她们对话、一轮在谈话的间隙向这边投来了热情的视线…
		ELSEIF TALENT:恋慕
			PRINTFORML 「圣大人、工作辛苦了」
			PRINTFORML 一轮从紧紧靠着的%CALLNAME:MASTER%的身边离開、向白莲打了招呼
			PRINTFORMW 看着她们对话、一轮在谈话的间隙向这边投来了热情的视线…
		ELSEIF TALENT:思慕
			PRINTFORML 「……要、要是被发现的话会被骂的」
			PRINTFORMW 意识到白莲来了的一轮，急忙整理好了身体
		ELSE
			PRINTFORML 「啊、大概是圣大人来了」
			PRINTFORMW 察觉到气息的一轮，转向了那边
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;聖以外
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		IF TALENT:恋人
			PRINTFORML 「……嗯，有人来了吗？」
			PRINTFORML 一轮和%CALLNAME:MASTER%稍微保持了点距离、
			PRINTFORMW 她的手在看不见的地方触碰着你的身体
		ELSEIF TALENT:恋慕
			PRINTFORML 「……诶呀呀、好像有人来了」
			PRINTFORML 注意到气息的一轮恋恋不舍地拉開了距离
			PRINTFORMW 「……真是」
		ELSEIF TALENT:思慕
			PRINTFORML 「……哦呀、是谁呢？」
			PRINTFORMW 一轮似乎有点遗憾、从身旁离開了
		ELSE
			PRINTFORML 「啊，有人来了啊」
			PRINTFORMW 察觉到气息的一轮，转向了那边
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		;相手がひじりん
		IF ARG == 55
			PRINTFORML 「っ、圣大人……！？」
			PRINTFORML 「――っ……」
			PRINTFORML 目击了%CALLNAME:MASTER%门的情事的一轮稍微踌躇了一下，走近了这边
			PRINTFORML
			PRINTFORML 「好不容易来一次、请让我也加入吧！」
			PRINTFORML
			PRINTFORMW 虽然不知道是什么好不容易，但是无法拒绝带着发情雌性的脸靠近的一轮
			PRINTFORMW %CALLNAME:MASTER%享受着怀中白莲和一轮柔软的皮肤、贪婪地品尝着嘴唇。
		;相手が布都ちゃん
		ELSEIF ARG == 92
			PRINTFORMW 「――啊」
			PRINTFORML 「嘿、嘿—嘿—yi。你们俩、好像很舒服的样子呢――」
			PRINTFORML 目击了%CALLNAME:MASTER%门的情事的一轮稍微踌躇了一下，走近了这边
			PRINTFORML 「那样的话、让我也加入吧」
			PRINTFORML 「再怎么说……我对自己的身体可比这家伙更有自信哟？」
		ELSEIF TALENT:恋慕 || TALENT:思慕
			PRINTFORMW 「――啊」
			PRINTFORML 「你们俩、好像很舒服的样子呢――」
			PRINTFORML 目击了%CALLNAME:MASTER%门的情事的一轮稍微踌躇了一下，走近了这边
			PRINTFORML 「那样的话、让我也加入吧」
			PRINTFORML 「再怎么说……我对自己的身体可是很自信的哟？」
			PRINTFORMW 带着挑衅的表情、一轮加入了%CALLNAME:MASTER%的情事
		ENDIF
		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_K85_7(ARG,ARG:1)
;口上主はTARGET
;ARGに目撃者
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		;相手がひじりん
		IF ARG == 55
			PRINTFORML 「……、欸、骗人、圣大人……！？」
			PRINTFORML 虽然一轮一副慌张的样子、但是感受气息后，菊穴和秘所分泌的爱液反而增加了、
			PRINTFORML 视线交错的瞬间简直就像抓住了子宫一样、膣内紧紧地收缩着
			PRINTFORML 「哈啊っ、这个是、那个、这个……っ」
			PRINTFORMW 寻找着言语的一轮，她的心跳速度惊人地快……
		ELSEIF ABL:露出癖 >= 3
			PRINTFORMW 「啊っ――……啊啊啊……」
			PRINTFORML 被%CALLNAME:ARG%看到了正在性交的样子――
			PRINTFORML 变得对色情感到喜悦的一轮的肉体、
			PRINTFORML 仅凭那个事实就全身淫猥地颤抖着
			PRINTFORMW 在流出新的爱液的同时、一轮一动不动地承受着%CALLNAME:ARG%的视线
		ELSEIF ABL:露出癖 >= 1
			PRINTFORMW 「诶……っ」
			PRINTFORML 和重叠在一起的%CALLNAME:MASTER%的一轮、牢牢映入%CALLNAME:ARG%的视野
			PRINTFORML 被看见了――
			PRINTFORML 这样想的瞬间、一轮感觉到了什么下腹部有点热
			PRINTFORML 「啊咧……我、为什么……？」
			PRINTFORMW 为此困惑的一轮的秘所、湿度稍微增加了一点
		ELSE
			PRINTFORMW 「不要っ！？」
			PRINTFORML 「――啊」
			PRINTFORML 一轮赤裸裸的身姿完全暴露在了%CALLNAME:ARG%眼前
			PRINTFORML 「呜呜……好羞耻」
			PRINTFORMW 耳朵染得通红，两手捂着脸
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		;相手がひじりん
		IF ARG == 55
			PRINTFORML 「啊—、圣大人也没法忍耐了呢……」
			PRINTFORML 「%CALLNAME:MASTER%可真是、罪孽深重呢……特别是、这、里%UNICODE(0x2665)%」
			PRINTFORML 一轮的手指慢慢地在%CALLNAME:MASTER%股间爬行
			PRINTFORMW 「没办法、要好好负起责任哦……？」
		;相手が布都ちゃん
		ELSEIF ARG == 92
			PRINTFORML 「诶？等、诶？为什么反而过来了啊……」
			PRINTFORML 「不不不、这里应该要读空气吧、诶？读懂了空气所以才要参加？」
			PRINTFORML %CALLNAME:ARG%点了点头、一轮突然明白了很多
			PRINTFORML 「……%CALLNAME:MASTER%这个色鬼」
			PRINTFORML 接着一轮開始对正脫着衣服布都发出了威胁。
			PRINTFORMW 「…绝对不会输给你的。谁让%CALLNAME:MASTER%更舒服、一决胜负吧！」
			PRINTFORMW …也许稍微下点决心比较好
		ELSEIF PALAM:欲情 >= PALAMLV:7
			PRINTFORML 「啊—、小%CALLNAME:ARG%也忍不住了呢……」
			PRINTFORML 「%CALLNAME:MASTER%可真是、罪孽深重呢……特别是、这、里%UNICODE(0x2665)%」
			PRINTFORML 一轮的手指慢慢地在%CALLNAME:MASTER%股间爬行
			PRINTFORMW 「没办法、要好好负起责任哦……？」
		ELSE
			PRINTFORML 「诶？等、诶？为什么反而过来了啊……」
			PRINTFORML 「不不不、这里应该要读空气吧、诶？读懂了空气所以才要参加？」
			PRINTFORML %CALLNAME:ARG%点了点头、一轮突然明白了很多
			PRINTFORMW 「……%CALLNAME:MASTER%这个色鬼」
		ENDIF
		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_K85_8(ARG,ARG:1)
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;推倒た
;==================================================
@M_KOJO_EVENT_K85_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:恋人
			PRINTFORML 「啊――。对不起了呢、%CALLNAME:MASTER%」
			PRINTFORML 突然一轮道起了歉、%CALLNAME:MASTER%疑惑地看向了一轮。
			PRINTFORML 刹那、%CALLNAME:MASTER%被一轮逆推了。
			PRINTFORML 「有点、忍不住了…」
			PRINTFORML %CALLNAME:MASTER%动弹不得。
			PRINTFORML 「我喜欢你…%CALLNAME:MASTER%对我呢？…随意啦%UNICODE(0x2665)%」
			PRINTFORMW 来没来得及回答、一轮就用的丰满的胸脯压了上来。
		ELSEIF TALENT:恋慕
			PRINTFORML 「啊――。对不起了呢、%CALLNAME:MASTER%」
			PRINTFORML 突然一轮道起了歉、%CALLNAME:MASTER%疑惑地看向了一轮。
			PRINTFORML 刹那、%CALLNAME:MASTER%被一轮逆推了。
			PRINTFORML 「有点、忍不住了…」
			PRINTFORML %CALLNAME:MASTER%动弹不得。
			PRINTFORML 「我喜欢你…%CALLNAME:MASTER%对我呢？…随意啦%UNICODE(0x2665)%」
			PRINTFORMW 来没来得及回答、一轮就用的丰满的胸脯压了上来。
		ELSE
			PRINTFORML 「ne—、%CALLNAME:MASTER%」
			PRINTFORML 一轮叫着%CALLNAME:MASTER%的名字。
			PRINTFORML 「可以推到你吗？」
			PRINTFORML 唐突的、一轮问了这个问题。
			PRINTFORML 破坏了一切气氛的发言。
			PRINTFORML %CALLNAME:MASTER%開玩笑的、没关系哦、这么说着、
			PRINTFORML 「真的？这样的话……嘿！」
			PRINTFORML 真的、被一轮推倒了。
			PRINTFORMW 看起来、一轮是真的想对%CALLNAME:MASTER%动真格的。
		ENDIF
		RETURN 0
	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
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:思慕
			PRINTFORML 「…………」
			PRINTFORML 看到了%CALLNAME:MASTER%的身影的一轮、片刻后呆呆地僵直了
			PRINTFORML 「………………っ？！」
			PRINTFORML 突然发现毫无遮拦的身子被完全看光了、慌张地叫了起来
			PRINTFORML 「给我出去！」
			PRINTFORMW 因为紧张声音都变得奇怪了的一轮把%CALLNAME:MASTER%赶了出去
		ELSE
			PRINTFORML 「――っ！」
			PRINTFORML 一轮出声后马上抄起手边的桶、朝%CALLNAME:MASTER%扔了过去。
			PRINTFORMW 过了一会儿，听到有人因为桶被砸坏而生气的样子
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORML 「――怎么啦、%CALLNAME:MASTER%か」
			PRINTFORML 「要一起泡吗？可以哟」
			PRINTFORML
			PRINTFORML 被一轮招手叫去一起泡澡、将火热的身体贴了过来
			PRINTFORML 把头发拢起来，露出脖颈的一轮给人与平时不同的印象
			PRINTFORML 眼前的脖颈飘散着扑鼻而来的温柔女性香气、
			PRINTFORMW 再往下看，丰满的山谷牢牢吸引着%CALLNAME:MASTER%的目光
		ELSEIF TALENT:恋慕
			PRINTFORMW 「――啊咧、%CALLNAME:MASTER%」
			PRINTFORML 「要一起泡吗？可以哟」
			PRINTFORML %CALLNAME:MASTER%听了一轮的话，向她身旁走去。
			;刻印があるとき一定確率で
			IF MARK:快楽刻印 > 0 && RAND:7 < MARK:快楽刻印
				PRINTFORML 「……啊—对了，在那之前得先给你清洁身体」
				PRINTFORML 毫无防备地把身体靠过来的一轮格外妖艳、
				PRINTFORML 蹭来蹭去的柔软的胸和硬硬的先端
				PRINTFORML 「吼啦吼啦、不要客气……」
				PRINTFORMW 可能是包含了发情的淫意吧，一轮的指尖碰到的部分非常热……
			ELSEIF MARK:時姦刻印 > 0 && RAND:7 < MARK:時姦刻印
				PRINTFORML 由于裸体的%CALLNAME:MASTER%靠近一轮的身体不由自主開始发热、
				PRINTFORML 寻求着%CALLNAME:MASTER%的疼爱，变得比浴室的水汽还要热……
				PRINTFORML 「好，好热啊，这个浴室……」
				PRINTFORMW 「嘛啊、估计是两个人一起进来的关系吧、哈哈、哈啊、哈啊……っ」
			ELSE
				PRINTFORML 从浴池里窥探到一轮匀整美丽的身体
				PRINTFORML 特别是那两个抢眼的硕大胸部、染上了樱花色，与热水嬉戏着。
				PRINTFORMW 「……那个、可以不要用这种像舔我的身体一样的目光看我吗？」
			ENDIF
		ELSE
			PRINTFORMW 「……一起进去吧？」
			PRINTFORML 犹豫了一会之后、一轮向%CALLNAME:MASTER%发起了邀请
			PRINTFORML 好像可以一起进去的样子、她有点害臊的遮住了自己的身体
			PRINTFORMW 「虽然没什么、但如果做了奇怪的事情会怎么样知道的吧？」
			;刻印があるとき一定確率で
			IF MARK:快楽刻印 > 0 && RAND:7 < MARK:快楽刻印
				PRINTFORML 但是、随着%CALLNAME:MASTER%的靠近一轮的脸颊泛起红潮、
				PRINTFORMW 像上火了似地不时地往%CALLNAME:MASTER%的股间投来热切的目光……
			ELSEIF MARK:時姦刻印 > 0 && RAND:7 < MARK:時姦刻印
				PRINTFORML %CALLNAME:MASTER%一到旁边、一轮的肉体就不由自主地颤动了
				PRINTFORML 「哈啊—……呼呜—……っ」
				PRINTFORML 不知晓的快乐记忆，和浴室里的热气不同
				PRINTFORMW 一轮的身体从内到外慢慢热了起来……
			ELSE
				PRINTFORMW 为了观察那个美丽的肢体、%CALLNAME:MASTER%一点点靠近着
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（憤怒）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
				PRINTFORML 「呜～嗯、姆nia姆nia……」
				PRINTFORML 一进入卧室、就看到一轮带着平静的笑容睡着
				PRINTFORML 「呼呼呼……这招如何……不好……」
				PRINTFORML 好像在做着打倒谁的梦似的，不时地翻个身
				PRINTFORMW 每一次都会让睡衣和睡袍更加敞開、胸口和大腿都露出来了……
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「啊、……%CALLNAME:MASTER%……」
				PRINTFORML 确认了%CALLNAME:MASTER%的脸后一轮露出放心的表情
				PRINTFORML 「……有什么……？」
				PRINTFORMW 话还没说完、一轮就又睡着了
			CASEELSE
				PRINTFORML 「嗯—……早上毫晚岸……」
				PRINTFORML %CALLNAME:MASTER%没听错的话，这是同时说出起床和睡觉的问候、
				PRINTFORML 疲倦的一轮马上又睡着了
				PRINTFORMW 「…………suya…………」
		ENDSELECT
		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
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;工作開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;吹雪、霧雪、雨雪交加、冰雹。あるいは台風、猛吹雪の場合
			IF GROUPMATCH(TIME:5, 9, 11, 12, 13) || GROUPMATCH(FLAG:異常気象, 9, 10)
				PRINTFORML 「实、实在有些难受啊—……呜呜」
				PRINTFORMW 虽然说着泄气的话、但一轮还是在这种天气完成着工作……
				RETURN 1
			;裙子、胖次、桃色の風の場合
			ELSEIF GROUPMATCH(FLAG:異常気象, 6, 7, 8)
				PRINTFORML 「是什么异变吗、这种乱七八糟的天气？　哈……」
				PRINTFORML 「希望不要有奇怪的家伙就好了……哈啊」
				PRINTFORMW 一轮带着难以言喻的表情，红着脸继续打扫……
				RETURN 1
			ENDIF
				IF TALENT:恋慕 || TALENT:恋人
							PRINTFORML 「――啊啦、%CALLNAME:MASTER%」
							PRINTFORML 「怎么了？有什么事吗？」
							PRINTFORMW 「如果帮我搭把手的话我会很高兴的……」
				ELSEIF TALENT:思慕
							PRINTFORML 「――啊、%CALLNAME:MASTER%」
							PRINTFORML 「现在我抽不開身」
							PRINTFORML 「对不起，请稍等一下」
							PRINTFORMW 这样说着、一轮加快了拿着扫帚的手。
				ELSE
							PRINTFORML 「嗯咻、嘿」
							PRINTFORMW 微微弯下了腰的一轮、用扫把和簸箕打扫着附近
				ENDIF

		RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;吹雪、霧雪、雨雪交加、冰雹。あるいは台風、猛吹雪の場合
			IF GROUPMATCH(TIME:5, 9, 11, 12, 13) || GROUPMATCH(FLAG:異常気象, 9, 10)
				PRINTFORML 「呜—……连内衣都全湿了…」
				PRINTFORMW 虽然说着泄气的话、但一轮还是在这种天气完成着工作……
				RETURN 1
			;裙子、胖次、桃色の風の場合
			ELSEIF GROUPMATCH(FLAG:異常気象, 6, 7, 8)
				PRINTFORML 「哈啊…奇怪的天气啊…」
				PRINTFORML （…总觉得、身体深处很难受…明明不是讲好事…）
				PRINTFORMW 一轮带着难以言喻的表情，红着脸继续打扫……
				RETURN 1
			ENDIF
				IF TALENT:恋慕 || TALENT:恋人
							PRINTFORML 一轮在扫除的间隙偷偷看向%CALLNAME:MASTER%
							PRINTFORML %CALLNAME:MASTER%若无其事地走到一轮身边，她便開心地抱住胳膊
							PRINTFORMW 「只要能被%CALLNAME:MASTER%看到就很開心了」
				ELSEIF TALENT:思慕
							PRINTFORML 一轮在扫除的间隙偷偷看向%CALLNAME:MASTER%
							PRINTFORMW %CALLNAME:MASTER%注意到了视线的时候，一轮慌忙移開目光
				ELSE
							PRINTFORML 「嗯咻、嘿」
							PRINTFORMW 微微弯下了腰的一轮、用扫把和簸箕打扫着附近
				ENDIF

		RETURN 1
	ENDIF
	;-------------------------------------------------
	;工作結束
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORML 「――呼—、终于结束了」
			PRINTFORML 「这样的话、终于能和%CALLNAME:MASTER%一起度过了呢」
			PRINTFORMW 一轮说着露出了笑容。
		ELSEIF TALENT:恋慕
			PRINTFORML 「――呼—、终于结束了呢」
			PRINTFORML 「然后……今天、要做什么呢？」
			PRINTFORMW 一轮不知为何脸有些红、这样问着。
		ELSE
			PRINTFORML 「――呼—、终于结束了」
			PRINTFORML 一轮吐了一口气。
			PRINTFORMW 「……那么、有什么事吗？」
		ENDIF
		RETURN 0
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;MASTERが推倒た
;==================================================
@M_KOJO_EVENT_K85_15(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORML 「――那个、%CALLNAME:MASTER%？」
			PRINTFORML 「这个……是不是稍微强硬过头了？」
			PRINTFORML 不行吗？%CALLNAME:MASTER%这么问着、
			PRINTFORML 「……不、没关系。那么、请開始吧？」
			PRINTFORMW 这样说着，一轮放松了全身的力量。
		ELSEIF TALENT:恋慕
			PRINTFORML 「――噫呀っ！？」
			PRINTFORML 一轮发出了可爱的尖叫。
			PRINTFORML 「……真是……不要这么粗暴啊」
			PRINTFORMW %CALLNAME:MASTER%应和着点了点头、一轮放松了全身的力量。
		ELSEIF TALENT:思慕
			PRINTFORML 「――っ！？稍微！」
			PRINTFORML 一轮对突然发生的事感到吃惊。
			PRINTFORML 「……要、做……？」
			PRINTFORML 不行吗？%CALLNAME:MASTER%这么问着、
			PRINTFORML 「……这个、那个……我的话、没关系……」
			PRINTFORMW 一轮的脸渐渐红了起来，这样回答着。
		ELSE
			PRINTFORML 「――っ！？」
			PRINTFORML 一轮对突然发生的事感到吃惊。
			PRINTFORML 「――喂、%CALLNAME:MASTER%」
			PRINTFORML 一轮面无表情地看着这边。
			PRINTFORML 「……没什么……」
			PRINTFORMW 一轮好像放弃了似的、冷冷地看着这边。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF FLAG:時間停止
			PRINTFORML
			PRINTFORML %CALLNAME:MASTER%整理好了服装、从一轮身旁离開了。
			PRINTFORML 为什么这个能力这么方便呢？
			PRINTFORMW %CALLNAME:MASTER%哈哈地笑了。
		ELSEIF PALAM:欲情 >= PALAMLV:15
			PRINTFORML
			PRINTFORML 「哈啊っ、哈啊っ……已经……不、行……」
			PRINTFORML 一轮已经精疲力尽、慌乱地喘息着。
			PRINTFORML 那个样子有点煽情。
			PRINTFORMW 但是不能袭击如此疲劳的一轮、%CALLNAME:MASTER%只是欣赏着一轮的身姿。
		ELSEIF TALENT:恋人
			IF PALAM:欲情 >= PALAMLV:10
				PRINTFORML
				PRINTFORML 「哈啊、哈啊、终、终于、结束了吗？」
				PRINTFORML 一轮一边肩膀起伏着呼吸，一边这样问着。
				PRINTFORML 还想做吗、这样问着、
				PRINTFORML 「不、已经不行了、腰、直不起来了、不要」
				PRINTFORMW 一轮可愛的陈述着理由。
			ELSE
				PRINTFORML 「――啊……已经、结束了？」
				PRINTFORML 还想做吗、这样问着、
				PRINTFORML 「不、没有那种事」
				PRINTFORML 「而且、%CALLNAME:MASTER%倒下了也不好办」
				PRINTFORMW 感谢你的关心、%CALLNAME:MASTER%答谢着。
			ENDIF
		ELSEIF TALENT:恋慕
			IF PALAM:欲情 >= PALAMLV:10
				PRINTFORML
				PRINTFORML 「哈啊、哈啊、哈……结、结束了？」
				PRINTFORML 一轮一边吐着灼热的气息一边问
				PRINTFORML 是啊、还想继续吗、这样问着、
				PRINTFORML 「不、不行、已经不行了、已经、很累了」
				PRINTFORMW と、一轮面红耳赤地回答着。
			ELSE
				PRINTFORML 「――诶、已经结束了？」
				PRINTFORML 还不够吗？、と%CALLNAME:MASTER%一边浮起笑容一边问着、
				PRINTFORML 「没、没有、才没那回事！？」
				PRINTFORML と、一轮慌慌张张地掩饰起来。
				PRINTFORMW 看着一轮的反应、真的很有趣。
			ENDIF
		ELSEIF TALENT:思慕
			IF PALAM:欲情 >= PALAMLV:10
				PRINTFORML
				PRINTFORML 「哈啊、哈啊、嗯、哈啊……终于、结束了吗？」
				PRINTFORML 一轮喘着气问。
				PRINTFORML 有点累、这样回答着、
				PRINTFORML 「对、对啊、我也、累了哦」
				PRINTFORMW 一轮这样说着。
			ELSE
				PRINTFORML 「――啊啦、已经、结束了？」
				PRINTFORML 很累、%CALLNAME:MASTER%这样回答着、
				PRINTFORML 「这样……那样的话就没办法了、呢」
				PRINTFORMW と、一轮好像放弃似了的说着。
			ENDIF
		ELSE
			IF PALAM:欲情 >= PALAMLV:10
				PRINTFORML
				PRINTFORML 「哈啊っ……哈啊っ……终于、结束了、呢？」
				PRINTFORMW 一轮面无表情、红着脸颊说。
			ELSE
				PRINTFORML 「――终于结束了？」
				PRINTFORMW 一轮生硬地说。
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
;ENDIF
RETURN 1
	;-------------------------------------------------
	;事後描写
	;記入チェック（=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_K85_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_K85_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_K85_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_K85_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
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K85_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_K85_21(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
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=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_K85_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_K85_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
			PRINTFORMW 「……不行、又不是那种关系」
			PRINTFORMW 一轮叹着气回答。
			PRINTFORMW 「如果你再执迷不悟的话，就要让云山来劝劝你吧！」
			PRINTFORMW 一轮断然拒绝了。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕
			PRINTFORML
			PRINTFORMW 「一起进浴室吗？」
			PRINTFORMW 「呵呵…让我给你搓背吧%UNICODE(0x2665)%」
			PRINTFORMW 抑制住对爽快承诺的一轮跃跃欲试的冲动、假装平静地走进更衣室
			PRINTFORML 「…你先进去吧？」
			PRINTFORMW 听了一轮的话迅速脱掉衣服进入浴场
			PRINTFORML 「…久等啦」
			PRINTFORMW %CALLNAME:MASTER%回头一看、一轮害羞得红着脸、重要的地方毫无遮挡地走了进来
			PRINTFORML 「……别老盯着看，快点进去吧？」
			PRINTFORMW 互相往后背浇上热水、在稍微有些宽阔的浴池里偎依在一起
			;刻印があるとき一定確率で
			IF MARK:快楽刻印 > 0 && RAND:7 < MARK:快楽刻印
				PRINTFORML 「呼—…好舒服…」
				PRINTFORMW 一轮抱着%CALLNAME:MASTER%的手臂、一边放松一边享受着热水
				PRINTFORMW 被那个柔软的东西紧紧贴在身上、%CALLNAME:MASTER%的股间硬的发痛
				PRINTFORMW 发现已经勃起了的一轮、把%CALLNAME:MASTER%的手拉到自己的乳房上
				PRINTFORMW 「呵呵…很柔软吧？　对自己的身体…我可是很有自信的哟%UNICODE(0x2665)%」
				PRINTFORMW 隔着乳房传来了一轮飞快的心跳、%CALLNAME:MASTER%的理性就这样融化在浴池里…
			ENDIF
		ELSE
			PRINTFORML
			PRINTFORMW 「一起进浴室吗？」
			PRINTFORMW 「…嘛啊……不是不行」
			PRINTFORMW 抑制住对爽快承诺的一轮跃跃欲试的冲动、假装平静地走进更衣室
			PRINTFORML 「…你先进去吧？」
			PRINTFORMW 听了一轮的话迅速脱掉衣服进入浴场
			PRINTFORML %CALLNAME:MASTER%回头一看、一轮用手巾遮住了前部。
			PRINTFORMW 「……再盯着看的话、是想挨拳头吗？」
			PRINTFORMW 一轮红着脸说
			;刻印があるとき一定確率で
			IF MARK:快楽刻印 > 0 && RAND:7 < MARK:快楽刻印
				PRINTFORML 但是、随着%CALLNAME:MASTER%的靠近一轮的脸颊泛起红潮、
				PRINTFORMW 像上火了似地不时地往%CALLNAME:MASTER%的股间投来热切的目光……
			ENDIF
		ENDIF
		RETURN 0
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K85_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_K85_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_K85_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

;==================================================
;相手から约会のお誘い
;==================================================
@M_KOJO_EVENT_K85_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_K85_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_K85_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_K85_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_K85_31(ARG,ARG:1)
;口上主はTARGET
;ARGは会ってない日数
;何日以上会ってなかったら愚痴を言うとかできます
;CFLAG:オナバレで分岐入れてもよさそう
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;今日会っていない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		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_K85_ONABARE_1(ARG)
;-------------------------------------------------
:口上色を付けるならコメントアウトを外しXを角色番号に
;CALL M_KOJO_COLOR_K85

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

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

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

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

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

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_K85_LOST_VIRGIN_STOP
;-------------------------------------------------
PRINTFORML
RETURN 1

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

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

path: ERB/口上・メッセージ関連/個人口上/【85】一輪試作/M_KOJO_K85_イベント.ERB


repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【85】一輪試作/M_KOJO_K85_奉仕系コマンド.ERB

license: unknown