code:
;-------------------------------------------------
;eraTW4.860用 TWの梅莉口上
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。

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

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

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

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

;### 口上基本フラグ設定 #############################
@M_KOJO_FLAGSETTING_K82
;基本フラグ設定はここで行ってください
;共通の口上フラグは必要な箇所のコメントアウトを外してご利用ください
;口上専用フラグはご自由に
;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_K82

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

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

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K82
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
	;システム上周回すると梅莉側の記憶はリセットされるけど稍微だけ何かしら残ってたり残ってなかったりする感じ。
	;なので周回時には矛盾した発言をしている。前週時に恋慕をつけてると好きかもしれないわの意味が変わってくる形。
	;それはそれはとても残酷な話ですわ。
		PRINTFORMW 「ねえ、そこの貴方」
		PRINTFORMW 突然呼び止められると怪訝そうな目で見つめてくる女性がいた。
		PRINTFORMW ゆったりとした長裙に睡帽のような帽子を付けた少女―――
		PRINTFORMW 「さっきから変な目でこっち見てるけど、何か用かしら？」
		PRINTFORMW 「私？私は瑪愛露貝莉・赫恩、呼びにくいなら梅莉でいいわよ」
		PRINTFORMW そう言いながら彼女は%CALLNAME:MASTER%の目注視しながらまじまじと顔を見つめてくる。
		PRINTFORMW 「よく見ると気味の悪い目をしているわね、貴方の名前は？」
		PRINTFORMW 「%CALLNAME:MASTER%？そういう名前なのね、面白いわ」
		PRINTFORMW 「私達は秘封倶楽部っていう活動しているんだけどいつの間にか―――こんな場所に居たのよ」
		PRINTFORMW 「ここであったのも何かの縁だから困ったことがあったらお互いに助け合いましょうね」
	RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K82_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
	PRINTFORMW 「ねえ、%CALLNAME:MASTER%」
	PRINTFORMW いつもの如く突然梅莉に呼び止められると彼女は%CALLNAME:MASTER%の顔に悄悄的手を伸ばした。
	PRINTFORMW 「意外と綺麗ね、%CALLNAME:MASTER%の眼」
	PRINTFORMW そう言いながら彼女は%CALLNAME:MASTER%の唇に接吻をした。
	PRINTFORMW 「んっ…私はこれぐらいしかあげられないけど、いつも私に付き合ってくれてありがとうね」
	PRINTFORMW 彼女はそう言って夕闇の中に消えていった。
	PRINTFORMW
	PRINTFORMW （なんて恥ずかしいことをしたのかしら…！）
	PRINTFORMW そう思いながらもどこか紅潮させた自分の頬を撫で、彼女は帰路に着くのだった。
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K82_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
		;初回
		IF FIRSTTIME(1026)
			PRINTFORMW 「%CALLNAME:MASTER%、話があるの」
			PRINTFORMW 梅莉是つになく緊張した口調で話しかけてきた。
			PRINTFORMW 「私ね、少し不安だったの」
			PRINTFORMW 「知らない世界で、いえ、知っている世界だったとしても」
			PRINTFORMW 「蓮子と一緒と是え分からないことばかりだらけの世界は確かに楽しかったわ」
			PRINTFORMW 「でも%CALLNAME:MASTER%に会えたことが、私にとって一番の幸せだったのかもしれないの」
			PRINTFORMW そう言って梅莉は%CALLNAME:MASTER%の眼を深く見つめ
			PRINTFORMW
			PRINTFORMW 「―――%CALLNAME:MASTER%、貴方のことが好きです」
			PRINTFORMW
			PRINTFORMW 「だから、私と恋人になってもらえませんか？」
			PRINTFORMW 少し怯えながらそう告げた。
		;二回目の告白
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%、女の子に何度も告白させるものじゃないわ」
			PRINTFORMW 梅莉は少しおどけながら言葉を紡いでいった。
			PRINTFORMW 「ねえ、私と付き合ってはくれないの？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「……うん、私を受け入れてくれるのね、%CALLNAME:MASTER%」
		PRINTFORMW 「これからもずっと私と一緒にいてね、%CALLNAME:MASTER%」
		PRINTFORMW 「ああ、でも浮気は駄目よ、私だけを見ていればいいんだから」
		PRINTFORMW そう言いながら彼女は身を翻し、悄悄的%CALLNAME:MASTER%に接吻をした。
		PRINTFORMW 「誓いの接吻よ、これでもう裏切れないわね♪」
		PRINTFORMW 満脸笑容的彼女は開心地そう言った。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「……これでも勇気出したんですけど」
		PRINTFORMW 梅莉はそう言いながら少しむくれている。
		PRINTFORMW 「いいわ、いつか後悔させてあげるんだから」
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_SPEVENT_K82_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 CFLAG:318 == 1
			PRINTFORMW 「……返回わ、じゃあね」
			PRINTFORMW 梅莉は憤怒ながら帰っていった。
		ELSEIF TALENT:恋人
			PRINTFORMW 「返回わ、また明日会いましょうね♪」
			PRINTFORMW 梅莉は名残惜し気に別れて行った。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「そろそろお開きね、楽しかったわ」
		ELSEIF TALENT:思慕
			PRINTFORMW 「じゃあ、また今度、会いましょうね」
		ELSE
			PRINTFORMW 「それじゃ、また誘ってちょうだい」
		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_K82_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;仕事中、今日会ってない。
	IF CFLAG:行動 == 5 && !TCVAR:82:今天有否见面
		PRINTFORMW 「今レポート書いてるから邪魔しないでね」
	;今日会ってない。
	ELSEIF !TCVAR:82:今天有否见面
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;MASTERが入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
			;正月、バレンタイン、萬聖節、聖誕節の場合
			IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
				CALL SPECIALDAY_EVENT_K82
			ELSEIF CFLAG:318 == 1
				PRINTFORMW 「……何？」
			ELSEIF TALENT:恋人
				IF RAND:3 == 0
					PRINTFORMW 「恋人に会いに来てくれるなんて真面目ね、%CALLNAME:MASTER%」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「待っていたわ、%CALLNAME:MASTER%、楽しみにしていたのよ」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%、恋人を探していたのかしら？」
					PRINTFORMW 梅莉は小さく手を振りながら%CALLNAME:MASTER%に挨拶をした。
					PRINTFORMW 「能力じゃないわ、女の勘よ」
				ENDIF
			ELSEIF TALENT:恋慕
				IF RAND:3 == 0
					PRINTFORMW 「あら%CALLNAME:MASTER%、私も会いたかったのよ」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、元気？私は元気よ」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%、会えて嬉しいわ♪」
				ENDIF
			ELSEIF TALENT:思慕
				IF RAND:3 == 0
					PRINTFORMW 「あら？%CALLNAME:MASTER%。会えて嬉しいわ」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、今日は何をしているのかしら？」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%は何を見ているの？私も見てみたいわ」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「あら、%CALLNAME:MASTER%、何を見ているのかしら？」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、こんなところで会うなんてね」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%、こんにちわ」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 2
			;正月、バレンタイン、萬聖節、聖誕節の場合
			IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
				CALL SPECIALDAY_EVENT_K82
			ELSEIF CFLAG:318 == 1
				PRINTFORMW 「……何？」
			ELSEIF TALENT:恋人
				IF RAND:3 == 0
					PRINTFORMW 「恋人に会いに来てくれるなんて真面目ね、%CALLNAME:MASTER%」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「待っていたわ、%CALLNAME:MASTER%、楽しみにしていたのよ」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%、恋人を探していたのかしら？」
					PRINTFORMW 梅莉は小さく手を振りながら%CALLNAME:MASTER%に挨拶をした。
					PRINTFORMW 「能力じゃないわ、女の勘よ」
				ENDIF
			ELSEIF TALENT:恋慕
				IF RAND:3 == 0
					PRINTFORMW 「あら%CALLNAME:MASTER%、私も会いたかったのよ」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、元気？私は元気よ」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%、会えて嬉しいわ♪」
				ENDIF
			ELSEIF TALENT:思慕
				IF RAND:3 == 0
					PRINTFORMW 「あら？%CALLNAME:MASTER%。会えて嬉しいわ」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、今日は何をしているのかしら？」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%は何を見ているの？私も見てみたいわ」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「あら、%CALLNAME:MASTER%、何を見ているのかしら？」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、こんなところで会うなんてね」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%、こんにちわ」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;風呂のやつって浴場で遭遇と違うのかわからん
		;-------------------------------------------------
		;TARGETが風呂に入ってきて一緒に入る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 3
			IF TALENT:恋人
				PRINTFORMW 「一緒に入りましょ、%CALLNAME:MASTER%♪」
				PRINTFORMW 「背中も……背中以外も洗ってあげるわ♪」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「あら？もう入ってたのね%CALLNAME:MASTER%？」
				PRINTFORMW そう言うと梅莉は浴場へ入ってきた。
				PRINTFORMW 「いいじゃない、減ったりしないわ」
			ELSEIF TALENT:思慕
				PRINTFORMW 「あっ、先に入ってたのね」
				PRINTFORMW 「邪魔するわ、気にしなくていいわよ」
			ELSE
				PRINTFORMW 「あら？先に入ってたのね」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて出て行った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 4
			IF TALENT:恋人
				PRINTFORMW 「一人の方がよさそうね、ごめんなさい」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「あら？邪魔したわね」
			ELSEIF TALENT:思慕
				PRINTFORMW 「先に入ってるなら言ってくれればよかったのに……」
			ELSE
				PRINTFORMW 「……ごめんなさい」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 5
			IF TALENT:恋人
				PRINTFORMW 「ごめんね、また今度ゆっくり入りましょう♪」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「ごめんなさい、お風呂に入りたいの%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「……一人で入らせて、ね%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「あら？譲ってもらえるかしら？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;外出先で遭遇した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 6
			;正月、バレンタイン、萬聖節、聖誕節の場合
			IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
				CALL SPECIALDAY_EVENT_K82
			ELSEIF CFLAG:318 == 1
				PRINTFORMW 「……何？」
			ELSEIF TALENT:恋人
				IF RAND:3 == 0
					PRINTFORMW 「恋人に会いに来てくれるなんて真面目ね、%CALLNAME:MASTER%」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「待っていたわ、%CALLNAME:MASTER%、楽しみにしていたのよ」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%、恋人を探していたのかしら？」
					PRINTFORMW 梅莉は小さく手を振りながら%CALLNAME:MASTER%に挨拶をした。
					PRINTFORMW 「能力じゃないわ、女の勘よ」
				ENDIF
			ELSEIF TALENT:恋慕
				IF RAND:3 == 0
					PRINTFORMW 「あら%CALLNAME:MASTER%、私も会いたかったのよ」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、元気？私は元気よ」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%、会えて嬉しいわ♪」
				ENDIF
			ELSEIF TALENT:思慕
				IF RAND:3 == 0
					PRINTFORMW 「あら？%CALLNAME:MASTER%。会えて嬉しいわ」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、今日は何をしているのかしら？」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%は何を見ているの？私も見てみたいわ」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「あら、%CALLNAME:MASTER%、何を見ているのかしら？」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、こんなところで会うなんてね」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%、こんにちわ」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色と约会中に遭遇した
		;ARG:1に约会的对象
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 7
			;憤怒
			IF CFLAG:318 == 1
				PRINTFORMW 「……怒ってなんてないわ！」
			;憤怒 恋慕時 约会的对象が紫
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 26
				PRINTFORMW 「気持ち悪い……！」
			;憤怒 恋慕時 约会的对象が蓮子
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 81
				PRINTFORMW 「二股なんて最低っ！」
			;恋慕時 约会的对象が紫
			ELSEIF TALENT:恋慕 && ARG:1 == 26
				PRINTFORMW （何……？気分悪い……）
			;恋慕時 约会的对象が蓮子
			ELSEIF TALENT:恋慕 && ARG:1 == 81
				PRINTFORMW 「ふぅん、そういうことしちゃうんだ二人共」
			ELSEIF TALENT:恋人
				PRINTFORMW 「……裏切り者……！」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……」
				PRINTFORMW 梅莉は憎しみを込めた目でこちらを睨んでいる。
			ELSEIF TALENT:思慕
				PRINTFORMW 「……そっか、约会するんだ」
			ELSE
				PRINTFORMW 「仲いいわね、貴方達」
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;特別な日イベント用関数
;==================================================
;-------------------------------------------------
@SPECIALDAY_EVENT_K82
;-------------------------------------------------
	;謹賀新年
	IF DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1
		IF TALENT:恋人
			PRINTFORMW 「明けましておめでとう、%CALLNAME:MASTER%♪」
			PRINTFORMW 梅莉はそう言って新年の挨拶をしてきた。
			PRINTFORMW 「今年も幸せな1年にしましょうね♪」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「明けましておめでとう、%CALLNAME:MASTER%」
			PRINTFORMW 梅莉は新年の挨拶をしてきた。
			PRINTFORMW 「%CALLNAME:MASTER%はどんな1年にしたいのかしら？」
		ELSEIF TALENT:思慕
			PRINTFORMW 「明けましておめでとう、%CALLNAME:MASTER%」
			PRINTFORMW 梅莉は新年の挨拶をしてきた。
			PRINTFORMW 「今年もよろしくね」
		ELSE
			PRINTFORMW 「明けましておめでとう、今年もよろしくね」
		ENDIF
	;情人節
	ELSEIF DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%、今日は何の日か知ってるわよね？」
			PRINTFORMW 梅莉は怯生生地%CALLNAME:MASTER%に話しかけてきた
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%、あのね……」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%、稍微待って」
		ELSEIF CFLAG:2 >= 1000
			PRINTFORMW 「%CALLNAME:MASTER%、渡すものがあるんだけど」
		ENDIF
		SELECTCASE CFLAG:好感度
		CASE 1000 TO 3000
			PRINTFORMW 「是、これ」
			PRINTFORMW 梅莉は巧克力を渡してきた。
			PRINTFORMW 「日頃の礼物よ、これでも感謝してるの」
		CASE 3001 TO 5000
			PRINTFORMW 梅莉は%CALLNAME:MASTER%に巧克力を渡してきた。
			PRINTFORMW 「ふふ、私があげるんだから喜んでいいわよ」
			PRINTFORMW 少し有点害臊的彼女はそそくさと別屋て行った。
		CASE IS > 5000
			IF EXP:愛情経験 >= 100
				PRINTFORMW 「これ、作ってきたの……」
				PRINTFORMW そう言いながら梅莉は巧克力を渡してきた。
				PRINTFORMW 「味には自信あるわ！%CALLNAME:MASTER%の好みに合わせてきたから！」
			ELSE
				PRINTFORMW 「巧克力よ、ここで手に入るとは思わなかったけど」
				PRINTFORMW そう言いながら梅莉は巧克力を渡してきた。
				PRINTFORMW 「高くついたんだから、礼物、期待してるわよ♪」
			ENDIF
		ENDSELECT
	;萬聖節
	ELSEIF DAY:2 == 3 && DAY:3 == 30
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%、トリックオアトリート～♪」
			PRINTFORMW 梅莉は%CALLNAME:MASTER%に朗らかに話しかけてくる。
			PRINTFORMW 「诶嘿嘿、悪戯されたい？私はされたいな♪」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「トリック・オア・トリート～♪」
			PRINTFORMW 梅莉はそう言いながら話しかけてきた。
			PRINTFORMW 「お菓子くれないと悪戯しちゃうわよ♪」
		ELSEIF TALENT:思慕
			PRINTFORMW 「トリック・オア・トリート～♪」
			PRINTFORMW 梅莉は%CALLNAME:MASTER%の从后面将呟いた。
			PRINTFORMW 「お菓子は貰えないのかしら？」
		ELSE
			PRINTFORMW 「トリック・オア・トリート～♪」
			PRINTFORMW 梅莉はそう言って脅かしてきた。
			PRINTFORMW 「……他人にするには恥ずかしいわね」
		ENDIF
	;聖誕節
	ELSEIF DAY:2 == 4 && DAY:3 == 25
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%、梅莉聖誕節%UNICODE(0x2665) *1%」
			PRINTFORMW 梅莉は開心地%CALLNAME:MASTER%に話しかけてくる。
			PRINTFORMW 「聖誕節约会しましょうか♪」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%、梅莉聖誕節♪」
			PRINTFORMW 梅莉はそう言って話しかけてきた。
			PRINTFORMW 「予定が空いてるなら约会してあげるわ、行きましょう」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%、梅莉聖誕節！」
			PRINTFORMW 梅莉はそう言いながら話しかけてきた。
			PRINTFORMW 「いい子にしてたら约会してあげるわよ？」
		ELSE
			PRINTFORMW 「梅莉聖誕節、%CALLNAME:MASTER%」
			PRINTFORMW 梅莉はそう言って話しかけてきた。
			PRINTFORMW 「あら？そういう日だと思ってたんだけど」
		ENDIF
	ENDIF
;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K82_2(ARG,ARG:1)
CALL MESSAGE_GOODMONING(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 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		IF TALENT:恋人
			PRINTFORMW 「あら、%CALLNAME:MASTER%、おはよう%UNICODE(0x2665) *1%」
			PRINTFORMW 梅莉は開心地%CALLNAME:MASTER%に朝の挨拶をしてきた。
			PRINTFORMW 「私のために起きてくれたのかしら？嬉しいわ%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%、起きたかしら？」
			PRINTFORMW 梅莉はそう言って朝の挨拶をしてきた。
			PRINTFORMW 「いい寝顔だったわ、いい夢を見ていたのかしら？」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%、おはよ」
			PRINTFORMW 梅莉はそう言って朝の挨拶をしてきた。
			PRINTFORMW 「たっぷり寝られたのかしら？熟睡だったわね」
		ELSE
			PRINTFORMW 「おはよう、朝ごはんは面包しかないけどいいかしら？」
			PRINTFORMW 梅莉はそう言いながらにこやかに笑着いる。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「あら、%CALLNAME:MASTER%、おはよう%UNICODE(0x2665) *1%」
			PRINTFORMW 梅莉は開心地%CALLNAME:MASTER%に朝の挨拶をしてきた。
			PRINTFORMW 「私のために起きてくれたのかしら？嬉しいわ%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%、起きたかしら？」
			PRINTFORMW 梅莉はそう言って朝の挨拶をしてきた。
			PRINTFORMW 「いい寝顔だったわ、いい夢を見ていたのかしら？」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%、おはよ」
			PRINTFORMW 梅莉はそう言って朝の挨拶をしてきた。
			PRINTFORMW 「たっぷり寝られたのかしら？熟睡だったわね」
		ELSE
			PRINTFORMW 「おはよう、朝ごはんは面包しかないけどいいかしら？」
			PRINTFORMW 梅莉はそう言いながらにこやかに笑着いる。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORMW 「ねえ―――」
			PRINTFORMW 梅莉は幸せそうに睡眠こけている。
			PRINTFORMW 「私、恋人ができたの」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「んん……」
			PRINTFORMW 梅莉は睡眠こけている。
			PRINTFORMW 「ねえ蓮子、帰りましょう？」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……帰り道、分からないわ……」
			PRINTFORMW 梅莉はぐっすりと睡眠こけている。
		ELSE
			PRINTFORMW 「……ん……」
			PRINTFORMW 梅莉は寝息も立てず睡眠こけている。
		ENDIF
		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 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		IF TALENT:恋人
			PRINTFORMW 「んん……起きてたのね、%CALLNAME:MASTER%」
			PRINTFORMW 「起こしてくれたらよかったのに……可愛かったから起こさなかった？」
			PRINTFORMW 「……ありがと」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「んん……おはよう、朝弱いの……」
		ELSEIF TALENT:思慕
			PRINTFORMW 「ん……あんまりすっぴん見ないで……」
		ELSE
			PRINTFORMW 「ん……まだ眠い……」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	;PRINTFORMW 「おはよう、%CALLNAME:MASTER%」
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に返回（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		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
	;-------------------------------------------------
	;恶作剧中
	;記入チェック（=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 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW
		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 = 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
	;其他
	PRINTFORMW 「お休み、%CALLNAME:MASTER%」
ENDIF
RETURN 1

;==================================================
;移動時すれちがい
;==================================================
@M_KOJO_EVENT_K82_4(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
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;他者介入で情緒変化
;==================================================
@M_KOJO_EVENT_K82_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 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他（角色指定無
	PRINTFORMW 「いい情緒だったのに……！」
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（亲热度:低）
	;記入チェック（=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
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の亲热度:低）
	;記入チェック（=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
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORMW 「最低……！」
		IF TALENT:恋慕
			PRINTFORMW （こういうのが好みなのね！）
		ENDIF
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;推倒た
;==================================================
@M_KOJO_EVENT_K82_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 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		IF TALENT:恋人
			PRINTFORMW 「ねえ、%CALLNAME:MASTER%」
			PRINTFORMW 念着%CALLNAME:MASTER%的名字ながら梅莉は%CALLNAME:MASTER%を推倒た。
			PRINTFORMW 「恋人らしいことってこういうことも含むんでしょう？」
			PRINTFORMW そう言いながら梅莉は%CALLNAME:MASTER%の服を脱がし、肌を密着させてくる。
			PRINTFORMW 「私だけを見て……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%、私今とても興奮してるのよ」
			PRINTFORMW 梅莉は笑みを浮かべながら%CALLNAME:MASTER%に密着してくる。
			PRINTFORMW 「温暖わね……%CALLNAME:MASTER%%UNICODE(0x2665) *1%」
			PRINTFORMW そう言いながら彼女は%CALLNAME:MASTER%の脖子に甘噛みをしてきた。
		ELSE
			PRINTFORMW 「ねえ%CALLNAME:MASTER%」
			PRINTFORMW 梅莉は%CALLNAME:MASTER%を組み敷くと
			PRINTFORMW 「いけないわ、私に負けるなんて」
			PRINTFORMW 梅莉は%CALLNAME:MASTER%を愛撫しながら情欲を誘っている。
		ENDIF
		TCVAR:82:発情 = 1
		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 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;随便状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW 「駄目よ、%CALLNAME:MASTER%は私だけを見ていればいいの」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORMW 「女の子が満足してないのに逃げちゃうなんて駄目よ」
			RETURN 1
		ENDIF
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;浴場で遭遇
;==================================================
@M_KOJO_EVENT_K82_11(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
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（憤怒）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		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
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=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_K82_13(ARG,ARG:1)
;口上主はTARGET
;ARG:1に残っている工作量
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;工作開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF (DAY:2 == 4 && DAY:3 == 30)
			IF RAND:3 == 0
				PRINTFORMW 「レポート書かないと……」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「締め切り前は徹夜ねぇ」
			ELSE
				PRINTFORMW 「ここで起きたこと、書いてもいいかしら？」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF (DAY:2 == 4 && DAY:3 == 30)
			IF RAND:3 == 0
				PRINTFORMW 「ヒトの意思が主体的である限り、私たちは私たちの意志では存在し得ないのよね」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「他人の精神に行動が左右される以上、主体的精神性という物はありえないわ」
			ELSE
				PRINTFORMW ……異物が混入したら、排除しないと
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;工作結束
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF (DAY:2 == 4 && DAY:3 == 30)
			IF RAND:3 == 0
				PRINTFORMW 「はー疲惫わ、もう寝ましょうか」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「ようやく課題も終わったわね」
			ELSE
				PRINTFORMW 「蓮子は終わったのかしら？」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;吃飯系
;==================================================
@M_KOJO_EVENT_K82_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_K82_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 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「もう終わりなのね%UNICODE(0x2665) *1%」
			PRINTFORMW 「……気持ちよかったのに」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「こうしているのが続けば、寂しくないのにね」
			PRINTFORMW 梅莉は名残惜しげに体を離していった。
		ELSEIF TALENT:思慕
			PRINTFORMW 「うん、悪くなかったわ」
		ELSE
			PRINTFORMW 「……臭い」
		ENDIF
		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_K82_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_K82_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_K82_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:318 == 1
			PRINTFORMW 「……避妊はして欲しいんだけど？」
		ELSEIF TALENT:恋人
			PRINTFORMW 「生で……？」
			PRINTFORMW 「うん稍微それは……覚悟できてないって言うか……」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……えっと生は可怕的わ」
		ELSE
			PRINTFORMW 「駄目よ、避妊しないとしてあげないわ」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:318 == 1
			PRINTFORMW 「……嫌なんだけど」
		ELSEIF TALENT:恋人
			PRINTFORMW 「駄目よ、譲れないわ」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「嫌だって言ってるんだけど？」
		ELSE
			PRINTFORMW 「……ナマは嫌よ」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 「嫌！」
		PRINTFORMW 梅莉は怒気を孕んだ声で拒絶している。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF TALENT:恋人
			PRINTFORMW 「……分かったわ」
			PRINTFORMW 「まあ、生の方が気持ちいいしね」
			PRINTFORMW 「……万が一の時は責任取ってよね♪」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……分かったわよ」
			PRINTFORMW 「でも危険日は駄目だからね？」
		ELSE
			PRINTFORMW 「……仕方ないわね」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF TALENT:恋人
			PRINTFORMW 「いいわ、私も%CALLNAME:MASTER%の兒童欲しくなってきたし」
			PRINTFORMW 「責任、取ってよね%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……分かったわ」
			PRINTFORMW 「もっと気持ちよくなりましょうか%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORMW 「……分かったわ、いいわよ」
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K82_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「これで、私たち夫婦になれるわね」
		PRINTFORMW 「結納はどうしましょ、ここでの結婚なんて考えたことも無かったわ」
		PRINTFORMW 梅莉はどこか虚な眼でこちらを看了过来。
		PRINTFORMW 「……あっごめんなさい、私盛り上がっちゃって」
		PRINTFORMW 「でも、これでいつまでも一緒にいられるわね%CALLNAME:MASTER%♪」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「むぅ……こんな良妻賢母と同棲を拒否するなんて……！」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K82_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:318 == 1
			PRINTFORMW 「……もう返回時間ね」
			PRINTFORMW 梅莉是つの間にか帰っていった。
		ELSEIF TALENT:恋人
			PRINTFORMW 「それじゃあ、これでお別れね」
			PRINTFORMW 「……夢の中でも浮気しないでよ？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「一緒には帰ってくれないのね」
		ELSEIF TALENT:思慕
			PRINTFORMW 「もう返回時間だわ、じゃあね」
		ELSE
			PRINTFORMW 「それじゃあ、私はもう返回わね」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:318 == 1
			PRINTFORMW 「……もう返回わ」
			PRINTFORMW 梅莉は憤怒ながら消え去っていった。
		ELSEIF TALENT:恋人
			PRINTFORMW 「今日はもう返回けど、浮気しちゃだめだからね？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「今日はありがとう、楽しかったわ」
		ELSEIF TALENT:思慕
			PRINTFORMW 「たまには男の人と交手のも楽しいわね」
		ELSE
			PRINTFORMW 「今日は楽しかったわ、また玩耍ましょうね」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF CFLAG:318 == 1
			PRINTFORMW 「見送りなんていらないんだけど」
			PRINTFORMW 梅莉は憤怒ながら去っていった。
		ELSEIF TALENT:恋人
			PRINTFORMW 「見送りは嬉しいけど、一緒には帰ってくれないのかしら？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「それじゃあね、また明日会いましょうか」
		ELSEIF TALENT:思慕
			PRINTFORMW 「見送りありがとう、ここでいいわよ」
		ELSE
			PRINTFORMW 「じゃあ、さようなら」
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K82_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
			PRINTFORMW 梅莉は帰宅するとそのまま被窝に倒れこんだ。
			PRINTFORMW 「%CALLNAME:MASTER%……」
			PRINTFORMW 「男の人の事考えるなんて今までなかったわね」
			PRINTFORMW 「……」
			PRINTFORMW 彼女はぼんやりそんなことを考えながら天井を眺めている。
			PRINTFORMW 「ねえ、%CALLNAME:MASTER%」
			PRINTFORMW 「私と―――」
			PRINTFORMW 曖昧な境界線上に立つよりは一歩進もう、彼女はそう決意した。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
			PRINTFORMW 梅莉は帰宅するとそのまま被窝に倒れこんだ。
			PRINTFORMW 「……まさかね……」
			PRINTFORMW よくわからないもやもやに包まれ的同时、梅莉は微睡に落ちて行った。
			PRINTFORMW （%CALLNAME:MASTER%……）
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 「んんっ……あっ……%UNICODE(0x2665) *1%」
		PRINTFORMW 梅莉は情欲に苛まれながら床についた。
		PRINTFORMW 「%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		PRINTFORMW 彼女はどこか虚ろな目で秘部に手を伸ばしながらぼうっと空を看了过来。
		PRINTFORMW 自分が淫乱であったということを受け入れながら彼女は%CALLNAME:MASTER%の事を脳裏に浮かべていた。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		PRINTFORMW 梅莉は情欲に苛まれながら床についた。
		PRINTFORMW 「……体だけでも愛されたいわ……%UNICODE(0x2665) *1%」
		PRINTFORMW そう言って梅莉は愛人関係を受け入れた。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW 「……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		PRINTFORMW 梅莉は情欲に苛まれながら床についた。
		PRINTFORMW 「……んっ……！」
		PRINTFORMW 彼女はそう言いながら下半身に手を伸ばしている。
		PRINTFORMW 肉体関係を築き上げながら梅莉は性欲に体をふるわせている。
		PRINTFORMW 「……責任は取ってもらうんだから……%UNICODE(0x2665) *1%」
		PRINTFORMW 自慰行為に耽りながら梅莉は淫らに堕ちていった。
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K82_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
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
	;其他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	IF TALENT:恋慕
		PRINTFORMW 「あっ……%UNICODE(0x2665) *1%%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
	ELSE
		PRINTFORMW 「んっ……蓮子……%UNICODE(0x2665) *1%」
	ENDIF
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K82_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_K82_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_K82_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_K82_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_K82_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「ねえ、%CALLNAME:MASTER%、玩耍に行かない？」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「%CALLNAME:MASTER%、暇なら付き合ってくれないかしら？」
			ELSEIF TALENT:思慕
				PRINTFORMW 「%CALLNAME:MASTER%、稍微付き合ってほしいんだけど」
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%、どこかに行かない？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「二人だけの星空でも見に行きましょうか♪」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「さあ、楽しい散歩にしましょうか♪」
			ELSEIF TALENT:思慕
				PRINTFORMW 「これでも緊張してるのよ、エスコートしてくれないかしら？」
			ELSE
				PRINTFORMW 「何か面白いものが見つかるといいわね」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「あら？浮気かしら？」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「残念ね、またの機会にするわ」
			ELSEIF TALENT:思慕
				PRINTFORMW 「あら？残念だわ」
			ELSE
				PRINTFORMW 「そう、じゃあ蓮子を誘うわ」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「%CALLNAME:MASTER%、私的房間で茶でもしない？」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「%CALLNAME:MASTER%、私的房間で休憩しない？」
			ELSEIF TALENT:思慕
				PRINTFORMW 「%CALLNAME:MASTER%、少し休憩していかないかしら？」
			ELSE
				PRINTFORMW 「暇なら私的房間にでも来る？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「ふふっ、帰さないわよ%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「いい茶淹れてあげるわよ」
			ELSEIF TALENT:思慕
				PRINTFORMW 「……変なことはしないでね」
			ELSE
				PRINTFORMW 「じゃあこっちよ、入っていいわ」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「あら、浮気？」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「あら？残念、いい茶が手に入ったのに」
			ELSEIF TALENT:思慕
				PRINTFORMW 「じゃあ蓮子のところにでも行こうかしら？」
			ELSE
				PRINTFORMW 「そう、じゃあいいわ」
			ENDIF
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K82_28(ARG,ARG:1)
;口上主はTARGET
;ARGに脱がし方選択
;ARG:1（ARG=3の場合のみあり）地の文の反応
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;全裸にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
				PRINTFORMW 「人に見られてもいいぐらいには維持してるつもりよ」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;变成只穿内衣的样子
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
				PRINTFORMW 「どうかしら？%CALLNAME:MASTER%の好みに合う？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
				PRINTFORMW 「服、汚れちゃう……」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;胖次ちょうだい
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE ARG:1
				;-------------------------------------------------
				CASE 0
				;交換です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「%CALLNAME:MASTER%のもくれるならいいわよ？」
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「男の人ってこういうのでも興奮するのね……」
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「別に……いいけど」
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「嫌よ……気持ち悪い」
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

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

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

IF LOCAL
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;疲惫
		PRINTFORMW 「駄目……私体力無いから……%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;満足して解放
		PRINTFORMW 「うん、満足……%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;満足したところを被逆推た
		PRINTFORMW 「駄目……今全身馬鹿になってる……%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;壊れるまでしてあげる
		PRINTFORMW 「駄目よ、壊れちゃうわ、それでもいいの%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;一日の終了時(AFTERTRAニーの前)、面識がなければ呼び出されない
;==================================================
@M_KOJO_EVENT_K82_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_K82_ONABARE_1(ARG)
;-------------------------------------------------
:口上色を付けるならコメントアウトを外しXを角色番号に
;CALL M_KOJO_COLOR_K82

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

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

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

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

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

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

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

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

repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【82】メリー/M_KOJO_K82_イベント.ERB

license: unknown


path: ERB/口上・メッセージ関連/個人口上/【82】メリー/M_KOJO_K82_カウンター.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;性騷擾系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;310,摸屁股
;TFLAG:193(1=不快(TALENT:膽怯なら涙目) 2&&3=恥ずかしがる(TALENT:討厭男人兼MASTERが男なら、身をすくめる) 4=されるがまま)
;CFLAG:诶嘿嘿==2&&TCVAR:20(胖次無し顔面騎乗(70=強制舐陰 71=口交強制 72=肛門奉仕) 35=裙子内見せつけ 52=素股)
;CFLAG:诶嘿嘿==2&&TEQUIP:六九式(胖次ありTCVAR:20(70～72)はこちら)
;PREVCOM(305=膝枕
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_SUCCESS_COM_K82_310
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K82_310
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K82_310_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K82_310_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:睡眠
	ELSEIF CFLAG:318 == 1
		PRINTFORMW 「……痴漢！」
		PRINTFORMW 梅莉はバシッと%CALLNAME:MASTER%の頬にビンタを喰らわせた。
	ELSEIF CFLAG:诶嘿嘿 == 2
		CALL M_KOJO_MESSAGE_COM_K82_5_1
	ELSEIF TALENT:恋人
		IF RAND:3 == 0
			PRINTFORMW 「んんっ%UNICODE(0x2665) *1%」
			PRINTFORMW 「駄目よ%UNICODE(0x2665) *1%こんなことされたら癖になっちゃう%UNICODE(0x2665) *1%」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「んっ%UNICODE(0x2665) *1%これだけでいいの？」
		ELSE
			PRINTFORMW 「んっ%UNICODE(0x2665) *1%後でね%UNICODE(0x2665) *1%」
		ENDIF
	ELSEIF TALENT:恋慕
		IF RAND:3 == 0
			PRINTFORMW 「ん%UNICODE(0x2665) *1%稍微、やめてよ%UNICODE(0x2665) *1%」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「んあっ！」
			PRINTFORMW 「……駄目よ、こんなプレイなんてしたことないわ%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORMW 「……ほかのとこ、行きましょ♪」
			PRINTFORMW 梅莉は少し困ったように人気のないところに誘ってきた。
		ENDIF
	ELSEIF TALENT:思慕
		IF RAND:3 == 0
			PRINTFORMW 「……変態」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「男の人ってすぐそういうことするわよね」
		ELSE
			PRINTFORMW 「……痴漢」
		ENDIF
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「何するのよ……！」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「もう、最低！」
		ELSE
			PRINTFORMW 「嫌！やめて！」
			PRINTFORMW 梅莉は自分の尻を蹂躙する%CALLNAME:MASTER%の手を振り払った。
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;311,擁抱
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:诶嘿嘿==2&&TCVAR:20(32=前から抱きつく 60=ディープ接吻 73=ぱふぱふ 74=乳合わせ 77=乳を吸わせる ＶＡ性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅき大堂ド)
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_SUCCESS_COM_K82_311
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K82_311
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K82_311_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K82_311_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
;	ELSEIF CHK_DATENOW(CFLAG:LOCAL:约会中)
	ELSEIF CFLAG:睡眠
		PRINTFORMW 「……蓮子……？」
		PRINTFORMW 梅莉は誰かと勘違いしながら%CALLNAME:MASTER%の体温を感じている。
	ELSEIF CFLAG:诶嘿嘿 == 2
		PRINTFORMW 「ん？温いわね……%UNICODE(0x2665) *1%」
	ELSEIF TALENT:恋人
		IF RAND:3 == 0
			PRINTFORMW 「んーずっとこうしていたいな%UNICODE(0x2665) *1%」
			PRINTFORMW 梅莉は%CALLNAME:MASTER%を抱き返してきた。
		ELSEIF RAND:2 == 0
			PRINTFORMW 「私から別屋ちゃ駄目よ、%CALLNAME:MASTER%」
			PRINTFORMW 梅莉は%CALLNAME:MASTER%に抱きつかれると小声でそういった。
		ELSE
			PRINTFORMW 「うん、こうしているとお互相用体温が移っていくのが分かるわね」
		ENDIF
	ELSEIF TALENT:恋慕
		IF RAND:3 == 0
			PRINTFORMW 「どうしたの？抱き着いてきちゃって」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「くすぐったいわ、そんなに引っ付かなくてもどこにも行かないわよ」
		ELSE
			PRINTFORMW 「もう、よしよし、どうしたの？」
			PRINTFORMW 梅莉はそう言いながら%CALLNAME:MASTER%を愛おしそうに抱きとめた。
		ENDIF
	ELSEIF TALENT:思慕
		IF RAND:3 == 0
			PRINTFORMW 「もう、蓮子みたいね……」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「あんまり人に見られたら付き合ってると思われちゃうわ」
		ELSE
			PRINTFORMW 「んっ、伝わってくるわ、%CALLNAME:MASTER%の鼓動」
		ENDIF
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「暑苦しいんだけど、別屋てくれる？」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「……男臭い……」
		ELSE
			PRINTFORMW 「気味悪いわ、そんなに引っ付かれると」
		ENDIF
	ENDIF

ENDIF
RETURN 1
;==================================================
;312,接吻
;TFLAG:193(99=拒絶(接吻不可) 1=大成功 0=成功 -1=失敗)
;CFLAG:诶嘿嘿==2&&TCVAR:20(32=前から抱きつく 50=手淫 60=接吻 性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅき大堂ド)
;PREVCOM(305=膝枕
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_SUCCESS_COM_K82_312
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K82_312
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K82_312_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K82_312_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
		PRINTFORMW 凍てついた時の中で梅莉の唇を奪った。
		PRINTFORMW その唇は柔らかく、甘酢っぱい味がした。
	ELSEIF CFLAG:诶嘿嘿 == 2
		CALL M_KOJO_MESSAGE_COM_K82_20_1
	ELSEIF CFLAG:睡眠
		PRINTFORMW 「……んんっ」
		PRINTFORMW 梅莉は接吻をされると少しくぐもった声を出した。
	ELSEIF TALENT:恋人
		IF RAND:3 == 0
			PRINTFORMW 「んっ……%UNICODE(0x2665) *1%もっと繋がっていたいわ%UNICODE(0x2665) *1%」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「んっ……馬鹿っずるいわ……%UNICODE(0x2665) *1%」
			PRINTFORMW 梅莉はそう言いながらも%CALLNAME:MASTER%の唇を奪い返した。
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%%UNICODE(0x2665) *1%接吻だけじゃなくて、ね%UNICODE(0x2665) *1%」
			PRINTFORMW 梅莉は唇を奪われたままなすがままになっている。
		ENDIF
	ELSEIF TALENT:恋慕
		IF RAND:3 == 0
			PRINTFORMW 「んっ！」
			PRINTFORMW 「もっと接吻して%UNICODE(0x2665) *1%」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「んっ%UNICODE(0x2665) *1%」
			PRINTFORMW 「強引ね、私も好きよ%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORMW 「っ%UNICODE(0x2665) *1%続けて……%UNICODE(0x2665) *1%」
			PRINTFORMW 梅莉は接吻をされるとさらに唇を押し付けてきた。
		ENDIF
	ELSEIF TALENT:思慕
		IF RAND:3 == 0
			PRINTFORMW 「んっ%UNICODE(0x2665) *1%もう、急に接吻しないで……」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「んん%UNICODE(0x2665) *1%」
			PRINTFORMW 「気持ちいいけど、続きは？」
		ELSE
			PRINTFORMW 「ん%UNICODE(0x2665) *1%」
			PRINTFORMW 「……もっとしてもいいわよ」
		ENDIF
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「…んん…稍微！」
			PRINTFORMW 梅莉は%CALLNAME:MASTER%に唇を奪われて困惑している。
		ELSEIF RAND:2 == 0
			PRINTFORMW 「……！」
			PRINTFORMW 「……変態」
		ELSE
			PRINTFORMW 「んっ……何するの！？」
			PRINTFORMW 梅莉は唇をぬぐいながら弱々しく睨みつけている。
		ENDIF
	ENDIF

ENDIF
RETURN 1
;==================================================
;313,胸愛撫
;CFLAG:诶嘿嘿==2&&TCVAR:20(27=谷間を見せる 33=胸を揉ませる 53=乳交(小分岐は地の文EVENT_MESSAGE_COM_性騷擾.ERB参照) 73=ぱふぱふ 77=乳を吸わせる 性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅき大堂ド)
;ABL:Ｂ感覚(2未満=性的には感じてない 5未満=多少感じてる 5以上=カイカン)
;TFLAG:400(1=约会先or地底の路人が反応する)
;乳の尺寸でも変わる場合があるので、地の文EVENT_MESSAGE_COM_性騷擾.ERB参照
;==================================================
@M_KOJO_MESSAGE_COM_K82_313
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K82_313_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K82_313_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
		PRINTFORMW 凍てついた時の中で梅莉の豊満的爱抚着胸た。
	ELSEIF CFLAG:睡眠
		PRINTFORMW 「……もう馬鹿‥‥」
		PRINTFORMW 梅莉は豊満的胸を愛撫されると少しくぐもった声を出した。
	ELSEIF CFLAG:诶嘿嘿 == 2
		CALL M_KOJO_MESSAGE_COM_K82_6_1
	ELSEIF TALENT:恋人
		IF RAND:3 == 0
			PRINTFORMW 「んんっ……%UNICODE(0x2665) *1%もうっ%UNICODE(0x2665) *1%」
			PRINTFORMW 「%CALLNAME:MASTER%に揉まれたらまた大きくなっちゃうわ%UNICODE(0x2665) *1%」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「んっ……ほら、もっと触っていいわよ%UNICODE(0x2665) *1%」
			PRINTFORMW 梅莉はそう言いながら体を震わせている。
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%に揉まれると気持ちいいわね%UNICODE(0x2665) *1%」
		ENDIF
	ELSEIF TALENT:恋慕
		IF RAND:3 == 0
			PRINTFORMW 「んっ！？」
			PRINTFORMW 「もう、また大きくなっちゃうわ%UNICODE(0x2665) *1%」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「んっ%UNICODE(0x2665) *1%」
			PRINTFORMW 「駄目よ、そんなに揉んだら」
		ELSE
			PRINTFORMW 「大きくてもいいことあるのね%UNICODE(0x2665) *1%」
			PRINTFORMW 梅莉は红了脸并胸を愛撫されている。
		ENDIF
	ELSEIF TALENT:思慕
		IF RAND:3 == 0
			PRINTFORMW 「んっ%UNICODE(0x2665) *1%もう、蓮子じゃないんだから」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「まあっ%UNICODE(0x2665) *1%」
			PRINTFORMW 「蓮子じゃ揉めないものね」
		ELSE
			PRINTFORMW 「んっ%UNICODE(0x2665) *1%」
			PRINTFORMW 「もうっ温柔的してよ」
		ENDIF
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「%CALLNAME:MASTER%に揉まれる謂れはないんだけど！」
			PRINTFORMW 梅莉は%CALLNAME:MASTER%に胸を触れられて困惑している。
		ELSEIF RAND:2 == 0
			PRINTFORMW 「男の人って胸しか見ないわよね」
		ELSE
			PRINTFORMW 「……警察呼ぶわよ、いるのか知らないけど」
		ENDIF
	ENDIF

ENDIF
RETURN 1
;==================================================
;314,肛門愛撫
;CFLAG:诶嘿嘿==2&&TCVAR:20(72=肛門奉仕
;CFLAG:诶嘿嘿==2&&TEQUIP:六九式(胖次ありTCVAR:20(70～72)はこちら)
;ABL:Ａ感覚(2未満=受け入れられない 4未満=異物感に翻弄 4以上=カイカン)
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K82_314
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K82_314_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K82_314_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL

	IF FLAG:70
		PRINTFORMW 凍てついた時の中で梅莉の肛門を愛撫起来。
	ELSEIF CFLAG:睡眠
		PRINTFORMW 「……んんん……？」
		PRINTFORMW 梅莉は肛門を愛撫されると少しくぐもった声を出した。
	ELSEIF CFLAG:诶嘿嘿 == 2
		CALL M_KOJO_MESSAGE_COM_K82_5_1
	ELSEIF TALENT:恋人
		IF RAND:3 == 0
			PRINTFORMW 「んっ%UNICODE(0x2665) *1%だめよっ%UNICODE(0x2665) *1%」
			PRINTFORMW 「こんなところでお尻なんて……%UNICODE(0x2665) *1%」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「んっ……駄目よ、感じちゃうから%UNICODE(0x2665) *1%」
			PRINTFORMW 梅莉はそう言いながら体を震わせている。
		ELSE
			PRINTFORMW 「あっ%UNICODE(0x2665) *1%そこはダメぇっ%UNICODE(0x2665) *1%」
		ENDIF
	ELSEIF TALENT:恋慕
		IF RAND:3 == 0
			PRINTFORMW 「んっ%UNICODE(0x2665) *1%」
			PRINTFORMW 「……もうっそんなところばかりっ%UNICODE(0x2665) *1%」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「んっ%UNICODE(0x2665) *1%」
			PRINTFORMW 「もう、変態%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORMW 「……馬鹿っ%UNICODE(0x2665) *1%」
			PRINTFORMW 梅莉は红了脸并肛門を愛撫されている。
		ENDIF
	ELSEIF TALENT:思慕
		IF RAND:3 == 0
			PRINTFORMW 「変態っ！」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「……痴漢！」
		ELSE
			PRINTFORMW 「何するのよ！」
		ENDIF
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「……変態！」
			PRINTFORMW 梅莉は%CALLNAME:MASTER%に肛門に触れられて困惑している。
		ELSEIF RAND:2 == 0
			PRINTFORMW 「痴漢で済まないわよ！」
		ELSE
			PRINTFORMW 「何するの！？」
		ENDIF
	ENDIF

ENDIF
RETURN 1
;==================================================
;315,陰蒂愛撫
;CFLAG:诶嘿嘿==2&&TCVAR:20(35=裙子の中を見せる 70=強制舐陰 85=Ｖ挿入する 86=だいしゅき大堂ド 87=Ａ挿入する 88=腰振りＶ 89=腰振り
;ABL:Ｃ感覚(4未満=くすぐったい 6未満=稍微いいかも 6以上=カイカン)
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K82_315
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K82_315_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K82_315_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:睡眠
	ELSEIF CFLAG:诶嘿嘿 == 2
		CALL M_KOJO_MESSAGE_COM_K82_0_1
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;316,指挿入れ
;CFLAG:诶嘿嘿==2&&TCVAR:20(35=裙子の中を見せる 70=強制舐陰 87=Ａ挿入する 89=腰振りＡ
;TALENT:処女(指挿入れ連続時喪失注意、基本拒否ぎみ)
;ABL:Ｖ感覚(1未満=違和感に戸惑う 5未満=稍微気持ちいい 5以上＝カイカン)
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K82_316
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K82_316_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K82_316_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:睡眠
	ELSEIF CFLAG:诶嘿嘿 == 2
		CALL M_KOJO_MESSAGE_COM_K82_3_1
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;317,動起腰身
;ABL:Ｖ感覚(2未満=まだ気持ち良くない 5未満=稍微気持ちいい 5以上=カイカン
;==================================================
@M_KOJO_MESSAGE_COM_K82_317
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K82_317_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K82_317_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL MERRYAEGIV1
ENDIF
RETURN 1
;==================================================
;318,動起腰身（Ａ）
;==================================================
@M_KOJO_MESSAGE_COM_K82_318
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K82_318_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K82_318_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL MERRYAEGIA1
ENDIF
RETURN 1
;==================================================
;330,掀裙子
;TFLAG:193(-5=拒絶（ビンタ） -3=拒絶（つねり） -1=いやがる 0=いやがる（嬉しげ） 1=受け入れ)
;TFLAG:193=1&&ABL:露出癖(5以上=人目のある場所で、自ら裙子をまくり上げる 4以下=人目のある場所でめくられるさいに弱い抵抗 3以上=人目のない場所で自ら裙子をまくり上げる 3未満=弱い抵抗)
;TFLAG:400(1=约会先or地底の路人が反応する)
;从后面将ピラリ、ではなく、前からペラって感じ（そうじゃなかったら、めくり上げようとするのを止めて即座にビンタとか無理、めくり上げられた後にしかならないしその状況ならビンタ食らうより普通に弾幕で一発ＫＯにならないほうがおかしい
;==================================================
@M_KOJO_MESSAGE_COM_K82_330
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K82_330_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K82_330_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:時間停止
		PRINTFORMW 凍てついた時の中で梅莉の裙子をめくった。
		PRINTFORMW %CALLNAME:MASTER%は梅莉の雄を誘うような肉付きのいい尻を眺めて楽しんだ。
	ELSEIF CFLAG:诶嘿嘿 == 2
		PRINTFORMW 「こっちにも興味があるの？変態さん%UNICODE(0x2665) *1%」
	ELSEIF CFLAG:318 == 1
		PRINTFORMW 「死んじゃえ！」
		PRINTFORMW 梅莉はキッと睨み付けながら裙子を抑えている。
	ELSEIF TALENT:恋人
		IF RAND:3 == 0
			PRINTFORMW 「ん？」
			PRINTFORMW 梅莉は裙子を捲り上げられながら有点害臊的红着脸いる。
			PRINTFORMW 「可愛いの、履いてきたの……%UNICODE(0x2665) *1%」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「もうっ、捲るだけなの？」
		ELSE
			PRINTFORMW 「どうかしたの？」
			PRINTFORMW 梅莉は裙子を捲りあげられるとそのまま端を持ち上げて中を展示了出来。
			PRINTFORMW 「どう？続きする？」
		ENDIF
	ELSEIF TALENT:恋慕
		IF RAND:3 == 0
			PRINTFORMW 「稍微っ！」
			PRINTFORMW 「こんなプレイ……他ではさせないでよ……%UNICODE(0x2665) *1%」
			PRINTFORMW 梅莉はそう言って怯生生地裙子の端を捲り上げている。
		ELSEIF RAND:2 == 0
			PRINTFORMW 「もう！見せて欲しいなら見せてあげるのに……」
		ELSE
			PRINTFORMW 「そんなに見たかったの？変態さん%UNICODE(0x2665) *1%」
		ENDIF
	ELSEIF TALENT:思慕
		IF RAND:3 == 0
			PRINTFORMW 「普通こういうことする？まあ減りはしないけど……」
			PRINTFORMW 梅莉は呆れた様子で裙子を捲られている。
		ELSEIF RAND:2 == 0
			PRINTFORMW 「私の境界を暴きたいなんて下心丸見えよ？」
		ELSE
			PRINTFORMW 「蓮子だってそんなことしないのに……」
		ENDIF
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「……昔は痴漢っていたらしいけど、ここにもいるのね」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「駄目よ、あんまりそういうことしないで」
		ELSE
			PRINTFORMW 「男の人って最低なんだから……」
		ENDIF
	ENDIF
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【82】メリー/M_KOJO_K82_セクハラコマンド.ERB


path: ERB/口上・メッセージ関連/個人口上/【82】メリー/M_KOJO_K82_奉仕系コマンド.ERB


path: ERB/口上・メッセージ関連/個人口上/【82】メリー/M_KOJO_K82_性交系コマンド.ERB


path: ERB/口上・メッセージ関連/個人口上/【82】メリー/M_KOJO_K82_愛撫系コマンド.ERB