code:
;-------------------------------------------------
;eraTW4.782用 稀神サグメ口上
;-------------------------------------------------
;※コンセプト
;むっつりスケベ、無口、実は情熱的なサグメ様口上
;※※※※※※他者による修正、加筆、改変についての但し書き※※※※※※
;前提としてオリジナル作者以外が手を入れる場合は、オリジナル作者の許可を求めること
;オリジナル作者とコンタクトが取れない場合には以下の但し書きに従ってUPできるかどうか判断してください。

;**** Copyright ****************************************************************
;本口上の修正について（許可する行為のみ残してください）
;【誤字・脱字修正】【分岐条件・erb構文に関する修正】【本体Ver・Rev変更対応】【フラグの管理・修正】

;本口上の加筆・改変について（許可する行為のみ残してください）
;【未記入部位加筆】【ランダム分岐加筆】【記入済部位加筆】【記入済部位削除】【記入済部位コメントアウト】

;本口上に対するメンテナンス禁止時限について（設定しない場合、未設定のみ残してください）
;【未設定】【設定：期間 YY-MM-DDからYY-MM-DDまでオリジナル作者のみ修正可】【期限延長 有】

;本口上に対するその他但し書き
;【 】【 】
;******************************************************************************
;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;
;
;
;******************************************************************************

;PS 寅の人
;オリジナル作者と連絡が取れない場合、上記Copyrightに従い加筆改変を行って下さい
;また本体処理・他口上処理等に干渉する異常処理がある場合でオリジナル作者による修正が
;行われない・もしくは困難な場合、Copyrightに関わらず有志による修正を許可します
;その際は元処理を削除せずコメントアウトし修正処理を挿入して下さい

;### 口上存在判定 ###################################
@M_KOJO_K110(ARG)
;ここでRESULTSを設定すると他の同キャラ口上を突っ込まれても正常動作する。

;RESULTS = _TEST_

;と設定すると、"EVENT"系イベントだと
;M_KOJO_TEST_EVENT_K110_1() とかで呼ばれる……はず。（未テスト機能）

;ここでCFLAGやTALENTを利用する場合、キャラ番号が必須です

;眠姦口上有に1を入れると、眠姦時にコマンド口上が読み込まれるように
CFLAG:110:眠姦口上有 = 0

CFLAG:110:時間停止口上有 = 1

RETURN 1
;### 口上色判定 ###################################
@M_KOJO_COLOR_K110

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

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

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K110
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
PRINTFORMW  ふと振り返ると銀髪の少女がそこに立っていた。
PRINTFORMW  銀髪赤眼の彼女は深い切れ込みの入った紫色のスカートに白銀の翼という出で立ちだ。
PRINTFORMW  「何？」
PRINTFORMW  彼女はこちらに気づくと興味深げに見つめてきた。
PRINTFORMW  「……」
PRINTFORMW  「地上人、あまり私に関わらない方がいいわ」
PRINTFORMW  「私は稀神サグメ、一応名乗っておくけど、忘れていい」
PRINTFORMW  「私の能力は喋った事象を逆転させる」
PRINTFORMW  「……」
PRINTFORMW  「だから、あまり口に出したくない」
PRINTFORMW  「……」
PRINTFORMW  「さようなら、もう会うこともないでしょう」
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;デート帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K110_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
;CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	PRINTFORMW 「……」
	PRINTFORMW サグメは後ろ手を組みながら少し早足で%CALLNAME:MASTER%の前を歩いている。
	PRINTFORMW 「……」
	PRINTFORMW サグメは無言で立ち止まると左足を軸にターンし振り返ってこう言った。
	PRINTFORMW 「眼瞑って」
	PRINTFORMW %CALLNAME:MASTER%は言われるまま目を瞑ると
	PRINTFORMW
	PRINTFORMW 「んっ……」
	PRINTFORMW
	PRINTFORMW 柔らかい唇の感触と共にサグメは口付けをしてきた。
	PRINTFORMW 「……」
	PRINTFORMW 「……」
	PRINTFORMW 「……」
	PRINTFORMW 「……さようなら……」
	PRINTFORMW サグメは顔を真赤に上気させながら羽ばたいて行ってしまった。
	;キスをキャンセルしたい場合は以下を開放
	;TCVAR:キスキャンセル = 1
ENDIF
RETURN 1

;==================================================
;デート帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K110_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(1110)
			PRINTFORMW  「ねえ、%CALLNAME:MASTER%」
			PRINTFORMW  サグメはおずおずと話を切り出してきた。
			PRINTFORMW  口に手を当てて数瞬考えこんだ後少しずつ口を開いた
			PRINTFORMW  「あの、ね」
			PRINTFORMW  「今日は、楽しかった」
			PRINTFORMW  「ありがとう」
			PRINTFORMW  「一つだけ、告白したいことがあるの」
			PRINTFORMW
			PRINTFORMW  「%CALLNAME:MASTER%のことが、好き」
			PRINTFORMW  「%CALLNAME:MASTER%となら私は堕ちてもいい」
			PRINTFORMW  「射抜かれちゃったの、私の心」
			PRINTFORMW  「こんな気持ちは初めてで、どうしたらいいのかわからないけど」
			PRINTFORMW  「でも、怖いんじゃなくて、この感情が楽しいの」
			PRINTFORMW  「%CALLNAME:MASTER%と一緒に居られることが、嬉しくて」
			PRINTFORMW  「%CALLNAME:MASTER%と話をするのが、とても好きなの」
			PRINTFORMW  「もっと%CALLNAME:MASTER%と一緒に居たい」
			PRINTFORMW  「もっと%CALLNAME:MASTER%の事を知りたい」
			PRINTFORMW  「もっと%CALLNAME:MASTER%と色んな物を見てみたい」
			PRINTFORMW  「……」
			PRINTFORMW  「私では……駄目……？」
		;二回目の告白
		ELSE
			PRINTFORMW 「……しつこいかもしれないけど」
			PRINTFORMW 「好き……%CALLNAME:MASTER%のこと……」
			PRINTFORMW 「そのためなら何度だって運命を逆転させて見せるわ」
			PRINTFORMW 「だから……お願い……貴方の側に居させて……」
			PRINTFORMW サグメは懇願するようにこちらを見つめている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=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 「……」
		PRINTFORMW 「……分かった」
		PRINTFORMW 「……でも……」
		PRINTFORMW 「好き……だから……」
		PRINTFORMW サグメはそう言って去っていった。
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;デート帰り
;==================================================
@M_KOJO_SPEVENT_K110_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 「……また、明日」
			PRINTFORMW サグメははにかんで別れの挨拶を告げた。
			PRINTFORMW （会える……よね……）
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……じゃあね……」
			PRINTFORMW 「また、会いましょう」
			PRINTFORMW サグメはそう言って去っていった
			PRINTFORMW （会えたら……いいな……）
		ELSEIF TALENT:思慕
			PRINTFORMW 「今日はここまで」
			PRINTFORMW 「楽しかった……じゃあね……」
			PRINTFORMW サグメはそう言って去っていった
		ELSE
			PRINTFORMW 「それじゃ……さようなら」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		ELSEIF TALENT:恋人
			PRINTFORMW 「別に……」
			PRINTFORMW 「もう怒ってない」
			PRINTFORMW 「許す」
		ELSE
			PRINTFORMW 「怒ってない」
			PRINTFORMW 「これはホント」
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「いいけど、まだ怒ってる」
			PRINTFORMW 「まだ誠意を感じられない」
		ELSE
			PRINTFORMW 「わかった……」
			PRINTFORMW 「でもまだ怒ってる」
			PRINTFORMW サグメはまだ少し怒ってるようだ。
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORMW 「……」
			PRINTFORMW 「少しだけ許してあげる」
		ELSE
			PRINTFORMW 「駄目……」
			PRINTFORMW 「許さない」
			PRINTFORMW サグメはそれでも少しだけ怒気を緩めた。
			PRINTW
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K110_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;仕事中ではなく、今日会ってない。
	IF !TCVAR:110:今日会ったか
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;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_K110
			ELSEIF TALENT:恋人
				PRINTFORMW 「？」
				PRINTFORMW 「今日は、何するの？」
				PRINTFORMW サグメはそう言いながらゆっくりと寄ってくる。
				PRINTFORMW 「なんでも、いいよ」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……」
				PRINTFORMW サグメは無言でこちらを凝視している。
				PRINTFORMW 「何するの？」
				PRINTFORMW サグメは顔を赤らめながら首を傾げている。
			ELSEIF TALENT:思慕
				PRINTFORMW 「……！」
				PRINTFORMW サグメは%CALLNAME:MASTER%が入ってくると胸元の蝶ネクタイを直し始めた。
				PRINTFORMW 「で、何？」
			ELSE
				PRINTFORMW 「……」
			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_K110
			ELSEIF TALENT:恋人
				PRINTFORMW 「？」
				PRINTFORMW 「今日は、何するの？」
				PRINTFORMW サグメはそう言いながらゆっくりと寄ってくる。
				PRINTFORMW 「なんでも、いいよ」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……」
				PRINTFORMW サグメは無言でこちらを凝視している。
				PRINTFORMW 「何するの？」
				PRINTFORMW サグメは顔を赤らめながら首を傾げている。
			ELSEIF TALENT:思慕
				PRINTFORMW 「……！」
				PRINTFORMW サグメは%CALLNAME:MASTER%が入ってくると胸元の蝶ネクタイを直し始めた。
				PRINTFORMW 「で、何？」
			ELSE
				PRINTFORMW 「……」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて一緒に入る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 3
			IF TALENT:恋人
				PRINTFORMW 「……どうぞ」
				PRINTFORMW 「一緒に……入ろ？」
				PRINTFORMW サグメはそう言って浴槽の端に寄った。
				PRINTFORMW 「背中、流す……？」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……」
				PRINTFORMW サグメは無言でこちらを凝視している。
				PRINTFORMW 「入りたいのでしょう？」
				PRINTFORMW サグメはそう言って風呂に招き入れた。
			ELSEIF TALENT:思慕
				PRINTFORMW 「……！？」
				PRINTFORMW サグメは%CALLNAME:MASTER%が風呂に入ってくると一瞬困惑したように見つめた後口を開いた。
				PRINTFORMW 「……どうぞ」
			ELSE
				PRINTFORMW 「……」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて出て行った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 4
			IF TALENT:恋人
				PRINTFORMW 「……ごめんなさい」
				PRINTFORMW 「私はもう上がるわね」
				PRINTFORMW サグメはそう言って風呂から出て行った。
				PRINTFORMW （もう逆上せてるのだから……出ることもなかったか……）
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……」
				PRINTFORMW サグメは無言でこちらを凝視している。
				PRINTFORMW 「今上がるわ、どうぞ」
				PRINTFORMW サグメはそう言って風呂から出て行った。
			ELSEIF TALENT:思慕
				PRINTFORMW 「……」
				PRINTFORMW サグメは%CALLNAME:MASTER%が風呂に入ってくると風呂から出て行った。
				PRINTFORMW 「……どうぞごゆるりと」
			ELSE
				PRINTFORMW 「……！？」
				PRINTFORMW サグメは慌てた様子で出て行った。
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 5
			IF TALENT:恋人
				PRINTFORMW 「……ごめんなさい」
				PRINTFORMW 「一人で……入りたいの」
				PRINTFORMW サグメはそう言って風呂から追い出した。
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……！」
				PRINTFORMW サグメは驚いた様子でこちらを凝視している。
				PRINTFORMW 「出てって……」
				PRINTFORMW サグメはそう言って風呂から追い出した。
			ELSEIF TALENT:思慕
				PRINTFORMW 「……！！？」
				PRINTFORMW サグメは%CALLNAME:MASTER%が風呂に入ってくると手と翼をバタバタさせながら追い出すしぐさをしている。
				PRINTFORMW 「……出てって！」
			ELSE
				PRINTFORMW 「……！？」
				PRINTFORMW サグメは驚いた様子で%CALLNAME:MASTER%を追い出した。
			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_K110
			ELSEIF TALENT:恋人
				PRINTFORMW 「！」
				PRINTFORMW 「元気そうね、%CALLNAME:MASTER%」
				PRINTFORMW サグメはそう言って挨拶をしてきた。
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……！」
				PRINTFORMW サグメはこちらに気づくと近寄ってきた。
				PRINTFORMW 「こんにちわ、%CALLNAME:MASTER%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「……こんにちわ」
				PRINTFORMW サグメは挨拶をしてきた。
			ELSE
				PRINTFORMW 「……」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他キャラとデート中に遭遇した
		;ARG:1にデート相手
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 7
			IF TALENT:恋人
				PRINTFORMW 「『……お幸せに……』」
				PRINTFORMW サグメはそう言ってプイっとそっぽを向いた。
			ELSE
				PRINTFORMW 「……」
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;特別な日イベント用関数
;==================================================
;-------------------------------------------------
@SPECIALDAY_EVENT_K110
;-------------------------------------------------
	;謹賀新年
	IF DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1
		IF TALENT:恋人
			PRINTFORMW 「明けましておめでとう」
			PRINTFORMW サグメはそう言って新年の挨拶をしてきた。
			PRINTFORMW 「不束者ですが、よろしくお願いするわ」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「明けましておめでとう」
			PRINTFORMW サグメは新年の挨拶をしてきた。
			PRINTFORMW 「今年もいい年だといいわね」
		ELSEIF TALENT:思慕
			PRINTFORMW 「明けましておめでとう」
			PRINTFORMW サグメは新年の挨拶をしてきた。
			PRINTFORMW 「……今年もよろしく」
		ELSE
			PRINTFORMW サグメは軽く新年の挨拶をしてきた。
			PRINTFORMW 「……明けましておめでとう」
		ENDIF
	;バレンタインデー
	ELSEIF DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000
		IF TALENT:恋人
			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 「……美味しくできたと思うから……食べて」
			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 「%CALLNAME:MASTER%はどんな悪戯をするのかしら？」
			PRINTFORMW そしてこちらをチラチラ様子を窺っている。
			PRINTFORMW
		ELSEIF TALENT:思慕
			PRINTFORMW 「……トリック・オア・トリート」
			PRINTFORMW サグメは後ろからぼそりと呟いた。
			PRINTFORMW 「今日はハロウィン、らしいわ」
		ELSE
			PRINTFORMW 「トリック・オア・トリート」
			PRINTFORMW サグメはそう言って脅かしてきた。
			PRINTFORMW 「……地上では今日こうすると八意様から教わった」
		ENDIF
	;クリスマス
	ELSEIF DAY:2 == 4 && DAY:3 == 25
		IF TALENT:恋人
			PRINTFORMW 「メリークリスマス」
			PRINTFORMW サグメは意気揚々と%CALLNAME:MASTER%に話しかけてくる。
			PRINTFORMW 「ねえ……デートしない？」
			PRINTFORMW そう言いながら予定を尋ねてきた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%、今日は予定空いてる？」
			PRINTFORMW サグメはそう言って話しかけてきた。
			PRINTFORMW 「……私は、%CALLNAME:MASTER%と一緒に過ごしたい……」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%、今日は何してるの？」
			PRINTFORMW サグメはそう言いながら話しかけてきた。
			PRINTFORMW 「……暇なら一緒に居てもいいわ」
		ELSE
			PRINTFORMW 「メリークリスマス」
			PRINTFORMW サグメはそう言って話しかけてきた。
			PRINTFORMW 「……いい子にしてるとプレゼントが貰えるらしいわね、ドレミ―が言ってた」
		ENDIF
	ENDIF
;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K110_2(ARG,ARG:1)
CALL MESSAGE_GOODMONING(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;非同棲かつ相手が先に起きてる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	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
		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:恋人
			PRINTFORMW 「おはよう」
			PRINTFORMW 「好き、%CALLNAME:MASTER%」
			PRINTFORMW サグメはそう言って側に寄ってきた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……」
			PRINTFORMW サグメは少しぼんやりした眼でこちらを見つめている。
			PRINTFORMW 「おはよう、%CALLNAME:MASTER%」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……おはよう」
			PRINTFORMW サグメはそう言いながらゆっくりと起き上がった。
		ELSE
			PRINTFORMW 「……おはよう……」
			PRINTFORMW サグメはあくびをしながら起き上がった
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に帰る（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORMW 「じゃあね、%CALLNAME:MASTER%」
			PRINTFORMW 「また明日……」
			PRINTFORMW サグメはそう言って帰っていった。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……」
			PRINTFORMW サグメは名残惜しげに足を進めていった。
			PRINTFORMW 「帰るわ、さようなら」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……さようなら」
			PRINTFORMW サグメはそう言って帰っていった。
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメは黙って帰っていった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「ふぁぁ……」
			PRINTFORMW 「何でもない……眠くない」
			PRINTFORMW サグメはそう言いながら瞼をこすっている。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……ふぁ……ん……」
			PRINTFORMW 眠いのか、とサグメに聞くと
			PRINTFORMW 「そうではない……眠くない」
			PRINTFORMW そう言いながら船を漕いでいる
		ELSEIF TALENT:思慕
			PRINTFORMW 「……ん……眠い……」
			PRINTFORMW サグメはそう言って体をゆらしている。
		ELSE
			PRINTFORMW 「……ふあ……」
			PRINTFORMW サグメは眠そうにしている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORMW 「……」
			PRINTFORMW 「……%CALLNAME:MASTER%……」
			PRINTFORMW サグメは頬を緩ませながらそう呟いた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……」
			PRINTFORMW サグメは無言で寝ている。
			PRINTFORMW 「……ドレミー……私……」
			PRINTFORMW 何やら人の名前を呟いている。
		ELSEIF TALENT:思慕
			PRINTFORMW 「……ドレミー……」
			PRINTFORMW サグメはそう呟きながら寝ている。
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメは無表情で寝ている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;イタズラ中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF TALENT:恋人
			PRINTFORMW 「……ごめんなさい……」
			PRINTFORMW 「……%CALLNAME:MASTER%……私……疲れた……」
			PRINTFORMW サグメはそう呟いた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……%CALLNAME:MASTER%……」
			PRINTFORMW サグメは%CALLNAME:MASTER%に呼びかけた。
			PRINTFORMW 「……疲れた……」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……疲れた……」
			PRINTFORMW サグメはそう呟いた。
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW （疲れた……）
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		IF TALENT:恋人
			PRINTFORMW 「……大丈夫？」
			PRINTFORMW 「……部屋まで送ってってあげる」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……%CALLNAME:MASTER%？」
			PRINTFORMW サグメは%CALLNAME:MASTER%に呼びかけた。
			PRINTFORMW 「……部屋まで送るからじっとしてて」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……」
			PRINTFORMW サグメは無言で%CALLNAME:MASTER%に肩を貸した。
		ELSE
			PRINTFORMW 「……！」
			PRINTFORMW （面倒ね……）
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで戻ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			IF TALENT:恋人
				PRINTFORMW 「……ごめん」
				PRINTFORMW 「……寝る」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……%CALLNAME:MASTER%？」
				PRINTFORMW 「……今から寝るから変なことしないでね」
			ELSEIF TALENT:思慕
				PRINTFORMW 「……何？」
				PRINTFORMW サグメはそう言いながら着替えて寝た。
			ELSE
				PRINTFORMW 「……」
				PRINTFORMW サグメは無言で着替えて寝た。
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF TALENT:恋人
				PRINTFORMW 「……出てって」
				PRINTFORMW 「……今から寝るの……ごめん」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……%CALLNAME:MASTER%……出てって……」
			ELSEIF TALENT:思慕
				PRINTFORMW 「……変態……」
				PRINTFORMW サグメはそう言って追いだしてきた。
			ELSE
				PRINTFORMW 「……」
				PRINTFORMW サグメは無言で追い出してきた。
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		IF TALENT:恋人
			PRINTFORMW 「……」
			PRINTFORMW 「……何かするの？%CALLNAME:MASTER%」
			PRINTFORMW サグメはそう言いながらゴロゴロしている。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……何してるのかって？」
			PRINTFORMW 「……休憩」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……何？」
			PRINTFORMW サグメはそう言いながら、横たわった。
		ELSE
			PRINTFORMW 「……」
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORM サグメは%CALLNAME:MASTER%のことを
			IF TALENT:恋人
				PRINTFORM にこやかに
			ELSEIF TALENT:恋慕
				PRINTFORM ぼぅっと
			ELSEIF GETBIT(CFLAG:1,0)
				PRINTFORM 物欲しげに
			ENDIF
		PRINTFORMW 見てくる。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;軽く会釈して通り過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「……」
			PRINTFORMW サグメはペコリと頭を下げて会釈を返した。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……」
			PRINTFORMW サグメは少し残念そうに会釈を返した。
		ELSEIF TALENT:思慕
			PRINTFORMW 「……」
			PRINTFORMW サグメは会釈を返した。
		ELSE
			PRINTFORMW 「……」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して通り過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORM サグメは%CALLNAME:MASTER%のことを
			IF TALENT:恋人
				PRINTFORM 何かあるのだろうといった風に
			ELSEIF TALENT:恋慕
				PRINTFORM どうしたのだろうという風に
			ELSEIF GETBIT(CFLAG:1,0)
				PRINTFORM じっと
			ENDIF
		PRINTFORMW 見つめていた。
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;他者介入でムード変化
;==================================================
@M_KOJO_EVENT_K110_5(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
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	IF TALENT:恋人
		PRINTFORMW 「……あ……」
		PRINTFORMW 「……見られちゃった……%UNICODE(0x2665) *1%」
	ELSEIF TALENT:恋慕
		PRINTFORMW 「……人……来ちゃったね」
		PRINTFORMW 「……どうする？」
	ELSEIF TALENT:思慕
		PRINTFORMW 「……どうする？」
		PRINTFORMW サグメはそう言いながら名残惜しげに体を離した。
	ELSE
		PRINTFORMW 「……」
		PRINTFORMW サグメは残念そうに体を離した。
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（馴れ合い度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF TALENT:恋人
			PRINTFORMW 「……」
			PRINTFORMW 「……出るといいわね」
			PRINTFORMW 「赤玉」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……」
			PRINTFORMW 「……お盛んね……」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……」
			PRINTFORMW 「変態」
		ELSE
			PRINTFORMW 「……」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（馴れ合い度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORMW 「……」
			PRINTFORMW 「……私も……混ぜて……」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……混ぜて……」
			PRINTFORMW 「……私も……溜まってる……」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……ずるい……」
			PRINTFORMW 「混ぜて」
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメは無言で情事に参加してきた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF TALENT:恋人
			PRINTFORMW 「……」
			PRINTFORMW 「最低……」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……」
			PRINTFORMW 「……邪魔みたいね……」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……」
			PRINTFORMW 「お邪魔だったかしら？」
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメは顔を赤らめながら無言で立ち去った。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERに誘われて参加
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG:1 == 4
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の馴れ合い度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF TALENT:恋人
			PRINTFORMW 「……」
			PRINTFORMW 「……どうしよう？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……」
			PRINTFORMW 「……続き、する？」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……」
			PRINTFORMW 「見られちゃったわね」
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメは無言で顔を真っ青にしている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の馴れ合い度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORMW 「……」
			PRINTFORMW 「……まあいいけど」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……」
			PRINTFORMW 「……乱交がお好み……？」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……」
			PRINTFORMW 「楽しそうね」
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメは少し残念そうに俯いた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF TALENT:恋人
			PRINTFORMW 「……」
			PRINTFORMW 「……どうする？」
			PRINTFORMW 「続きする？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……」
			PRINTFORMW 「……少し……冷めた……」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……」
			PRINTFORMW 「どうしよっか？」
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメはほっと胸をなでおろしている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERに誘われて目撃者も参加
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG:1 == 4
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;目撃した情事を問い詰める
;==================================================
@M_KOJO_EVENT_K110_8(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERだけ問い詰め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF TALENT:恋人
			PRINTFORMW 「……どういうこと？」
			PRINTFORMW 「私では不満？」
			PRINTFORMW 「……他の人をどれだけ好きでも構わないから」
			PRINTFORMW 「私を……嫌いにならないで……」
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメは無言で服を掴みどういうことかと問い詰めている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;二人とも説教
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORMW 「……別に」
			PRINTFORMW 「欲求不満を解決するのはいい」
			PRINTFORMW 「……私の眼に入らない所でやって」
			PRINTFORMW 「はっきり言って最低」
		ELSE
			PRINTFORMW 「……最低……」
			PRINTFORMW サグメは二人にそう言いながら二人を蔑んでいる。
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;同じ場所に居てパンツを回収された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW 「……これ何？」
			PRINTFORMW サグメはそう言って%CALLNAME:MASTER%の持っていた下着について問い詰めている。
			PRINTFORMW 「女物で、%CALLNAME:MASTER%の物ではないようだけれど」
			PRINTFORMW %CALLNAME:MASTER%が黙っていると
			PRINTFORMW 「……あまりこういうのは好ましくない、没収する」
			PRINTFORMW サグメはそう言って下着を懐にしまった。
			IF TALENT:恋人
				PRINTFORMW 「……こういうのが……好きなの？」
				PRINTFORMW サグメは悪戯っぽく微笑んだ。
			ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;遠距離移動中にパンツを回収された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
			PRINTFORMW 「ちょっと待って」
			PRINTFORMW サグメはそう言って%CALLNAME:MASTER%の懐を探る。
			PRINTFORMW 「……面白い物持っているわね」
			PRINTFORMW サグメはそう言って%CALLNAME:MASTER%の持っていた下着を広げてきた。
			PRINTFORMW 「何するつもりだったの？」
			PRINTFORMW %CALLNAME:MASTER%が黙っていると
			PRINTFORMW 「……まあいい、これは回収」
			PRINTFORMW サグメはそう言って下着を懐にしまった。
			IF TALENT:恋人
				PRINTFORMW 「……下着屋、ランジェリーショップの場所、知ってる？」
				PRINTFORMW サグメは悪戯っぽく微笑んだ。
			ENDIF
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERを押し倒した（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			IF RAND:3 == 0
				PRINTFORMW 「……」
				PRINTFORMW サグメはいきなり体を押し付けてくると押し倒してきた。
				PRINTFORMW 「ん……しましょ……%UNICODE(0x2665) *1%」
				PRINTFORMW そう言いながらサグメは唇を奪ってくる。
				PRINTFORMW 一方的に%CALLNAME:MASTER%の体を好き勝手しながらサグメは言葉を紡ぐ。
				PRINTFORMW 「好きよ……%CALLNAME:MASTER%……」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「%CALLNAME:MASTER%の所為よ」
				PRINTFORMW サグメは%CALLNAME:MASTER%の肩を掴むと押し倒してきた。
				PRINTFORMW 「責任、取りなさい……%UNICODE(0x2665) *1%」
				PRINTFORMW そう言いながらサグメは%CALLNAME:MASTER%の下半身を弄ってくる。
				PRINTFORMW 一方的に%CALLNAME:MASTER%の体を好き勝手しながらサグメは言葉を紡ぐ。
				PRINTFORMW 「愛してるわ……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「……んっ%UNICODE(0x2665) *1%」
				PRINTFORMW サグメは胸元を開けながら%CALLNAME:MASTER%に体をすり寄せてきた。
				PRINTFORMW 「今とてもエッチな気分なの……%UNICODE(0x2665) *1%」
				PRINTFORMW 彼女は%CALLNAME:MASTER%に体を重ねながら首筋にキスをして貪っている。
				PRINTFORMW 「食べちゃう、ぞ%UNICODE(0x2665) *1%」
				PRINTFORMW 顔を赤らめながら片翼の女神は一匹の獣に零落した。
			ENDIF
		ELSEIF TALENT:恋慕
			IF RAND:3 == 0
				PRINTFORMW 「……溜まってるの、ね%UNICODE(0x2665) *1%」
				PRINTFORMW サグメはいきなり体を押し付けてくると押し倒してきた。
				PRINTFORMW 「私が穢を祓ってあげようっていうのよ%UNICODE(0x2665) *1%」
				PRINTFORMW そう言いながらサグメは唇を奪い%CALLNAME:MASTER%の体を弄ってくる。
				PRINTFORMW 「%CALLNAME:MASTER%の穢、全部射精しなさい%UNICODE(0x2665) *1%」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「%CALLNAME:MASTER%……」
				PRINTFORMW サグメは%CALLNAME:MASTER%の肩をグイッと掴むと押し倒してきた。
				PRINTFORMW 「んっ……%UNICODE(0x2665) *1%」
				PRINTFORMW サグメは%CALLNAME:MASTER%の唇を奪いながら下半身を弄ってくる。
				PRINTFORMW 一方的に%CALLNAME:MASTER%の体を好き勝手しながらサグメは言葉を紡ぐ。
				PRINTFORMW 「好き……愛して……%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%、ねえ、えっちなことしましょう」
				PRINTFORMW 「ムラムラ、するの%UNICODE(0x2665) *1%」
				PRINTFORMW サグメは%CALLNAME:MASTER%の体を弄びながら妖艶に笑みを浮かべている。
				PRINTFORMW 「……寝かせて、あげない%UNICODE(0x2665) *1%」
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「……」
				PRINTFORMW サグメはいきなり体を押し付けてくると無言で押し倒してきた。
				PRINTFORMW 「今日は、スケベな女神なの……%UNICODE(0x2665) *1%」
				PRINTFORMW そう言いながらサグメは%CALLNAME:MASTER%の体を弄ってくる。
				PRINTFORMW 「気持ちよくして……%UNICODE(0x2665) *1%」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「%CALLNAME:MASTER%%UNICODE(0x2665) *1%」
				PRINTFORMW サグメは%CALLNAME:MASTER%の名前を呼びながら押し倒してきた。
				PRINTFORMW 「ねえ……」
				PRINTFORMW 「えっち……しよっか……%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「……」
				PRINTFORMW サグメは無言で%CALLNAME:MASTER%を押し倒してきた。
				PRINTFORMW 「……我慢できない……」
				PRINTFORMW そう言いながらサグメは%CALLNAME:MASTER%の唇を奪う。
				PRINTFORMW 「ん……スキ……」
				PRINTFORMW サグメは胸元を緩めながら行為を始めた。
				PRINTFORMW 「……一緒に……なって……」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「……終わり？」
			PRINTFORMW サグメは残念そうに体を離した。
			PRINTFORMW 「分かった……お終いにする」
			PRINTFORMW 意外とあっさりサグメは行為の終了を了承した。
		ELSEIF TALENT:恋慕
			PRINTFORMW  「ん……終わり……？」
			PRINTFORMW サグメは名残惜しそうに抱きついたまま上目遣いで見つめてくる。
			PRINTFORMW  「続き……するの……駄目？」
			PRINTFORMW なおも続きを要求するサグメの頭を撫でながら。
			PRINTFORMW 「分かった……止める……」
			PRINTFORMW  サグメは惜しみながら体を離していった。
		ELSE
			PRINTFORMW  「？」
			PRINTFORMW 「……お終い？」
			PRINTFORMW  サグメは惜しみながら身を引いた。
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORMW 「ごめん、一人で入りたいの」
			PRINTFORMW 「本当にごめんなさい……」
			PRINTFORMW サグメに浴場から追い出されてしまった。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「悪いけど、混浴は……」
			PRINTFORMW サグメは混浴を拒否している。
			PRINTFORMW 「また、今度……」
			PRINTFORMW そう言うとサグメは口まで湯に浸かりブクブクと泡を出している。
		ELSEIF TALENT:思慕
			PRINTFORMW 「出てって」
			PRINTFORMW サグメはそう言って浴場から追い出してきた。
		ELSE
			PRINTFORMW サグメは浴場への侵入者に気づくと
			PRINTFORMW 「……覗き？」
			PRINTFORMW 翼と手で追い出すジェスチャーをしている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「一緒に入るの？」
			PRINTFORMW 「いいわよ、来て……」
			PRINTFORMW サグメは浴場に%CALLNAME:MASTER%を招き入れた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「ん……一緒に入りましょう」
			PRINTFORMW サグメは混浴を許可した。
			PRINTFORMW 「背中、流してあげる」
			PRINTFORMW そう言うとサグメは近づいてきた。
		ELSEIF TALENT:思慕
			PRINTFORMW 「分かった……入っていい」
			PRINTFORMW サグメはそう言って風呂に%CALLNAME:MASTER%を招き入れた。
		ELSE
			PRINTFORMW サグメは浴場への侵入者に気づくと
			PRINTFORMW 「……」
			PRINTFORMW 何も見なかったようにしている。
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（怒り）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「駄目……」
			PRINTFORMW サグメは少し残念そうに%CALLNAME:MASTER%を追い出してきた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「ん……駄目……」
			PRINTFORMW サグメは部屋から追い出してきた。
			PRINTFORMW 「えっち……」
		ELSEIF TALENT:思慕
			PRINTFORMW 「入らないで……！」
			PRINTFORMW サグメはそう言って%CALLNAME:MASTER%を追い出してきた。
		ELSE
			PRINTFORMW サグメは寝床への侵入者に気づくと
			PRINTFORMW 「……変態……」
			PRINTFORMW 怒ったように追い出してきた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=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 == 2
		IF TALENT:恋人
			PRINTFORMW 「ん……何？」
			PRINTFORMW 「どうしたの？」
			PRINTFORMW サグメは部屋に%CALLNAME:MASTER%を招き入れた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……何？」
			PRINTFORMW サグメは眠そうに侵入者を見ている。
			PRINTFORMW 「好きにして……」
			PRINTFORMW そう言うとサグメは横になった。
		ELSEIF TALENT:思慕
			PRINTFORMW 「……何？」
			PRINTFORMW サグメはそう言って寝床に%CALLNAME:MASTER%を招き入れた。
		ELSE
			PRINTFORMW サグメは寝床への侵入者に気づくと
			PRINTFORMW 「……」
			PRINTFORMW 眠気のあまり判別できなさそうな顔でぼうっとしている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF TALENT:恋人
			PRINTFORMW 「……？」
			PRINTFORMW 「出てって……」
			PRINTFORMW サグメは%CALLNAME:MASTER%を部屋から追い出した。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……ん……駄目」
			PRINTFORMW サグメはバッテンを指で作りながら追い出してきた。
		ELSEIF TALENT:思慕
			PRINTFORMW 「……出ていって」
			PRINTFORMW サグメはそう言って%CALLNAME:MASTER%を追い出した。
		ELSE
			PRINTFORMW サグメは寝床への侵入者に気づくと
			PRINTFORMW 「……」
			PRINTFORMW 何も見なかったようにピシャリとドアを閉めた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		IF TALENT:恋人
			PRINTFORMW 「……」
			PRINTFORMW 「疲れてるの……」
			PRINTFORMW サグメはそれでも部屋に%CALLNAME:MASTER%を招き入れた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……どうしたの？」
			PRINTFORMW サグメは疲れ眼で侵入者を見ている。
			PRINTFORMW 「疲れてるの……」
			PRINTFORMW そう言うとサグメは横になった。
		ELSEIF TALENT:思慕
			PRINTFORMW 「……？」
			PRINTFORMW サグメは物言わず押し黙っている。
		ELSE
			PRINTFORMW サグメは寝床への侵入者に気づくと
			PRINTFORMW 「……」
			PRINTFORMW 何も見なかったように横になった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		IF TALENT:恋人
			PRINTFORMW 「……ごめんなさい」
			PRINTFORMW 「疲れてるの……出てって……」
			PRINTFORMW サグメは部屋から%CALLNAME:MASTER%を追い出した。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……ごめんなさい」
			PRINTFORMW サグメは疲れ眼で侵入者を見ている。
			PRINTFORMW 「出てって……」
			PRINTFORMW そう言うとサグメは%CALLNAME:MASTER%を追い出してきた。
		ELSEIF TALENT:思慕
			PRINTFORMW 「……出てって」
			PRINTFORMW サグメはそうつぶやくと追いだしてきた。
		ELSE
			PRINTFORMW サグメは寝床への侵入者に気づくと
			PRINTFORMW 「……‥……」
			PRINTFORMW 黙って追い出してきた。
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;お仕事中
;==================================================
@M_KOJO_EVENT_K110_13(ARG,ARG:1)
;口上主はTARGET
;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
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		IF TALENT:恋人
			PRINTFORMW 「……それ、頂戴」
			PRINTFORMW 「……もぐもぐ……」
			PRINTFORMW サグメは%CALLNAME:MASTER%の持っていたものを食べてしまった。
			PRINTFORMW 「美味しい……」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……それ……欲しい」
			PRINTFORMW そう言うとサグメは%CALLNAME:MASTER%の持っているものを食べてしまった。
			PRINTFORMW 「……もぐもぐ……」
			PRINTFORMW サグメは%CALLNAME:MASTER%の持っていたものを食べてしまった！。
		ELSEIF TALENT:思慕
			PRINTFORMW 「……もぐもぐ……」
			PRINTFORMW サグメは%CALLNAME:MASTER%の持っていたものを食べてしまった！
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメはいつの間にか%CALLNAME:MASTER%の持っていたものを食べてしまった！
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;MASTERが押し倒した
;==================================================
@M_KOJO_EVENT_K110_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 FLAG:時間停止
			PRINTFORMW 凍てついた時の中でサグメを犯し終えた。
			PRINTFORMW 次は何をしてやろうか、肉付きのいい肉体を見ながらその場を離れていった。
		ELSEIF TALENT:恋人
			PRINTFORMW 「……」
			PRINTFORMW 「疲れた……んっ……」
			PRINTFORMW サグメはキスをしながら名残惜しげに体を離していった。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……終わり……？」
			PRINTFORMW サグメは名残惜しげに別れのキスをした。
			PRINTFORMW 「ん……ちゅ……」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……ん……今日はおしまい……」
			PRINTFORMW サグメは名残惜しげに体を離していった。
		ELSE
			PRINTFORMW 「……」
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;添い寝する
;==================================================
@M_KOJO_EVENT_K110_16(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;添い寝を始めた（開始時）(存在せず
	;記入チェック
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;添い寝を終了した（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:TARGET:衰弱
			PRINTFORMW サグメは衰弱した様子で深い眠りについている。
			PRINTFORMW 「……」
			PRINTFORMW %CALLNAME:MASTER%はこのままにしておくことにした。
		ENDIF
		ELSE
			IF CFLAG:318 == 1
				PRINTFORMW 「……」
				PRINTFORMW サグメは不機嫌そうにこちらを見ている。
			ELSEIF TALENT:恋人
				PRINTFORMW 「ん……おはよう……」
				PRINTFORMW サグメは起き上がって挨拶をしてきた。
				PRINTFORMW 「？」
				PRINTFORMW 「服……入らない……」
				PRINTFORMW サグメは服に翼を収めようとあたふたしている。
			ELSEIF TALENT:恋慕
				PRINTFORMW 「おはよう」
				PRINTFORMW サグメは悪戯っぽい笑みを浮かべながら%CALLNAME:MASTER%を起こしてくる。
				PRINTFORMW 「あなた、朝よ」
				PRINTFORMW そういいながらサグメは朝の準備をしている。
			ELSE
				PRINTFORMW
			ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;時止め終了時
;==================================================
@M_KOJO_EVENT_K110_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋慕
			PRINTFORMW 「……！」
			PRINTFORMW サグメは唐突な快感に身悶えしている。
			PRINTFORMW 「なんでも……ない……」
			PRINTFORMW 「……何でもないから！」
			PRINTFORMW （今の……気持よかった……）
		ELSE
			PRINTFORMW 「……！」
			PRINTFORMW サグメはビクッと体を震わせ
			PRINTFORMW 「……」
			PRINTFORMW 口に手を当てながら平静を装っている。
			PRINTFORMW （……やだ……今の……）
			PRINTFORMW ……内心そういうわけでもないのだが
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕
			PRINTFORMW 「……！？！？！？」
			PRINTFORMW サグメは一瞬でへたり込んでしまい何があったのか理解できないようだ。
			PRINTFORMW 「……大丈夫……平気……」
			PRINTFORMW サグメは差し出された手を取るとぷるぷると震えながら立ち上がった。
		ELSE
			PRINTFORMW 「！？」
			PRINTFORMW 「……ん……！」
			PRINTFORMW 突然快楽を叩き込まれたサグメはうずくまると混乱しながらこちらを見ている。
			PRINTFORMW 「どういう……こと……？」
			PRINTFORMW サグメはふとこちらを見つめているが特に証拠も無く問い詰めることもなかった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;パンツ紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 「……？」
		PRINTFORMW 下着を盗まれたサグメはその感覚に違和感を覚えている。
		PRINTFORMW 「……！？」
		PRINTFORMW 状況に気づいたサグメは忙しなく周囲を見渡しながらスカートを押さえている。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
			IF EXP:精液経験 == 0
				PRINTFORMW 「ん……！？！！？」
				PRINTFORMW サグメは口の中に流し込まれた子種に驚いている。
				PRINTFORMW 「ぐほっ……うぇ……やだ……」
				PRINTFORMW サグメは状況に対応できず、精液を飲み込んでしまった。
				PRINTFORMW 「何……？」
				PRINTFORMW サグメは不快そうな顔をしながら口を押さえている。
			ELSE
				PRINTFORMW 「……！？」
				PRINTFORMW サグメは突然口を押さえ体を震わせながら崩れ落ちた。
				PRINTFORMW 「んあ……うぇ……」
				PRINTFORMW 口内に残る子種をどうするか口を押さえながら考えこんだ後
				PRINTFORMW 「ん……んぐ……」
				PRINTFORMW 飲み込むことにしたようだ。
				PRINTFORMW 「何よ……もう……」
			ENDIF
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
			PRINTFORMW 「！？」
			PRINTFORMW 「うぇ……ゲホッ……ゴホッ……」
			PRINTFORMW サグメは突然口内に現れた漢汁の臭気に耐えかねている。
			PRINTFORMW その様子を%CALLNAME:MASTER%はじっと見つめていた。
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
			PRINTFORMW 「！？」
			PRINTFORMW 「ん……ぐっ……」
			PRINTFORMW サグメは口腔のザーメンに耐えかねて口を押さえている。
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
			PRINTFORMW 「……！」
			PRINTFORMW サグメは口腔内のザーメンに気づくと
			PRINTFORMW 「ん……んく……」
			PRINTFORMW サグメは口腔のザーメンを美味しそうに飲み込んだ。
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
			PRINTFORMW 「……！」
			PRINTFORMW サグメは口腔内の濃厚な漢汁に気づくと
			PRINTFORMW 「ゲホッ……ゴホッ……おえ……」
			PRINTFORMW 取り乱しながら吐き出した。
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
			PRINTFORMW 「……！」
			PRINTFORMW サグメは口腔内の濃厚な漢汁に気づくと
			PRINTFORMW 「ん……ちゅる……」
			PRINTFORMW 慣れたように飲み下した。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;幼稚持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
			PRINTFORMW 「……！」
			PRINTFORMW サグメは顔面にへばりついた漢汁に気がつくと
			PRINTFORMW 「……！？！？！？」
			PRINTFORMW 取り乱しながら拭い取った。
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
			PRINTFORMW 「……！」
			PRINTFORMW サグメは顔面にへばりついた漢汁に気がつくと
			PRINTFORMW 「……ん……れろ……ちゅる……」
			PRINTFORMW 美味しそうに舐めとった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
			PRINTFORMW 「……！」
			PRINTFORMW サグメは手にへばりついた漢汁に気がつくと
			PRINTFORMW 「……！？！？」
			PRINTFORMW 取り乱しながら拭い取った。
		;舐めとり
		ELSEIF ARG:1 == 2
			PRINTFORMW 「……！」
			PRINTFORMW サグメは手にへばりついた漢汁に気がつくと
			PRINTFORMW 「れろ……ちゅ……」
			PRINTFORMW 妖艶に舐めとった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚アナル射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚0
		IF ARG:1 == 1
			PRINTFORMW 「……！」
			PRINTFORMW サグメはアナルに違和感を覚えたが、その正体まではわからないようだ。
		;ソレ以外
		ELSEIF ARG:1 == 2
			PRINTFORMW 「……！」
			PRINTFORMW サグメはアナルの違和感に気づくと
			PRINTFORMW 「……何？」
			PRINTFORMW お尻を押さえながらこちらを睨みつけている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
			PRINTFORMW 「……っ！？」
			PRINTFORMW サグメは下腹部の鈍痛に顔をしかめると
			PRINTFORMW 「……何……？」
			PRINTFORMW 悪寒に冷や汗をかいている。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精ピルなし
		IF ARG:1 == 1
			PRINTFORMW 「……！」
			PRINTFORMW サグメは膣内の違和感に気づくと
			PRINTFORMW 「何……やだ……」
			PRINTFORMW 取り乱しながら下腹部を押さえている。
		;非処女膣内射精ピルあり
		ELSEIF ARG:1 == 2
			PRINTFORMW 「……！」
			PRINTFORMW サグメは下半身の違和感に気づくと
			PRINTFORMW 「……これ……でも……八意様の……」
			PRINTFORMW 某女医から貰ったらしい薬を飲んでいたことにホッとしている。
		;処女膣内射精
		ELSEIF ARG:1 == 3
			PRINTFORMW 「……！」
			PRINTFORMW サグメは下半身の鈍痛と違和感に気づくと
			PRINTFORMW 「やだ……なにこれ……」
			PRINTFORMW 取り乱しながら半泣きになっている。
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K110_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 「……」
			PRINTFORMW サグメは完全に無視している。
		ELSEIF TALENT:恋人
			PRINTFORMW 「生で？」
			PRINTFORMW 「それは駄目……」
			PRINTFORMW サグメは避妊を要求してきた。
			PRINTFORMW 「まだ……準備とか……出来てない……」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……生？」
			PRINTFORMW 「駄目……」
			PRINTFORMW 「しないで……欲しい」
		ELSE
			PRINTFORMW 「……生？」
			PRINTFORMW 「……」
			PRINTFORMW サグメは少し考えた後指でバッテンを作り
			PRINTFORMW 「駄目」
			PRINTFORMW 避妊を要求してきた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:318 == 1
			PRINTFORMW 「……」
			PRINTFORMW サグメは完全に無視している。
		ELSEIF TALENT:恋人
			PRINTFORMW 「駄目って言ってるのに……」
			PRINTFORMW 「本当に……駄目よ」
			PRINTFORMW サグメはなおも拒否してきた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……だから……」
			PRINTFORMW 「駄目だって言ってる……」
			PRINTFORMW サグメは半泣きになりながら拒否してきた。
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメはもう一度考え込みながら最終的に指でバッテンを作り
			PRINTFORMW 「駄目」
			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 サグメは妥協した。
			PRINTFORMW 「でも……子供は……あんまり……」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……分かった」
			PRINTFORMW 「でも危険日はダメ」
			PRINTFORMW 「分かった？」
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW 「……分かった……」
			PRINTFORMW サグメは少し考えた後妥協することにした。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF TALENT:恋人
			PRINTFORMW 「……分かったわ」
			PRINTFORMW 「子供、作りましょう」
			PRINTFORMW サグメは覚悟を決めたようにキリッと表情を変えた。
			PRINTFORMW 「%CALLNAME:MASTER%……大好き……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……分かった」
			PRINTFORMW 「その代わり責任とってね」
			PRINTFORMW 「%CALLNAME:MASTER%……好きよ」
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW 「分かった」
			PRINTFORMW サグメは少し考えた少し表情を緩めながらそう言った。
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K110_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%」
		PRINTFORMW 顔を赤らめながらサグメそう言った。
		PRINTFORMW 「言いたいことはあるけど……」
		PRINTFORMW 「よしましょう……また嘘になるといけないから」
		PRINTFORMW こうしてサグメとの新生活が始まった。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「……ん……分かった」
		PRINTFORMW サグメは少し残念そうにしながら
		PRINTFORMW 「大丈夫よ、『いつか一緒になれるもの』」
		PRINTFORMW 悪戯半分といった表情でそう口にした。
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K110_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORMW 「それじゃあね」
			PRINTFORMW 「……また、明日……」
			PRINTFORMW サグメはそう言うと飛び去っていった。
			PRINTFORMW （明日か……）
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……それじゃあね」
			PRINTFORMW そう言うとサグメは飛び去っていった。
			PRINTFORMW 「……また……会えるといいな……」
			PRINTFORMW サグメは。
		ELSEIF TALENT:思慕
			PRINTFORMW 「……バイバイ……」
			PRINTFORMW サグメはそう言って飛び去っていった。
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメはいつの間にか飛び去っていってしまっていた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;デート中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「それじゃあね」
			PRINTFORMW 「……今日は楽しかった、またね」
			PRINTFORMW サグメはそう言うと飛び去っていった。
			PRINTFORMW （明日も……）
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……今日はありがとう」
			PRINTFORMW そう言うとサグメは飛び去っていった。
			PRINTFORMW 「……本当に……楽しかった……」
		ELSEIF TALENT:思慕
			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 そう言うとサグメは飛び去っていった。
		ELSEIF TALENT:思慕
			PRINTFORMW 「……ここでいいわ……」
			PRINTFORMW サグメはそう言って飛び去っていった。
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメはいつの間にか飛び去っていってしまっていた。
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K110_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
			PRINTFORMW サグメは帰宅するとそのまま布団に倒れこんだ。
			PRINTFORMW 「……」
			PRINTFORMW 「……%CALLNAME:MASTER%……」
			PRINTFORMW 「……好き……」
			PRINTFORMW 月の都にいるだけでは分からない感情、とうに捨てた愛情。
			PRINTFORMW 結局の所自分も女なのだとそう考えてしまうのが浅ましいのではないかと葛藤する。
			PRINTFORMW そんな自分が%CALLNAME:MASTER%に相応しいのか……？
			PRINTFORMW 自分の能力で%CALLNAME:MASTER%を不幸にするのではないか。
			PRINTFORMW 「……」
			PRINTFORMW 最悪の事を考えると何も出来ない。
			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 「……」
			PRINTFORMW 結局自分のことなのだがどういうことなのだろうか。
			PRINTFORMW あの人と居ると……
			PRINTFORMW 何故そんなことを考えるのか？
			PRINTFORMW 思い当たるフシはあるが、認めたくはない事実でもある。
			PRINTFORMW 「……」
			PRINTFORMW 認めてしまえば余計に苦しむことになる。
			PRINTFORMW いっそ何も考えなければ……誰も不幸にならないのではないか。
			PRINTFORMW 「……」
			PRINTFORMW 口に出せば嘘になってしまうから
			PRINTFORMW 想いを募らせるとそれだけ―――
			PRINTFORMW 「……」
			PRINTFORMW サグメはそのまま床に入るとまどろみに落ちていった。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
			;なんかGoogle日本語入力で『あいよく』で変換したら穢翼って出てきてえっちだなって思いました。
			PRINTFORMW 「んっ……」
			PRINTFORMW サグメは情欲に苛まれながら床についた。
			PRINTFORMW 「……あっ……%UNICODE(0x2665) *1%」
			PRINTFORMW 彼女はどこか虚ろな目で秘部に手を伸ばしながらぼうっと空を見つめている。
			PRINTFORMW 自分はどうしてこんなことになってしまったのか。
			PRINTFORMW 「……ふぅ……」
			PRINTFORMW 物思いに耽りながらサグメは穢翼の中に堕ちていった。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「っ……%CALLNAME:MASTER%……」
		PRINTFORMW サグメは情欲に苛まれながら床についた。
		PRINTFORMW 「……穢……良くない……」
		PRINTFORMW 彼女はそう言いながらも体を身悶えさせている。
		PRINTFORMW 自分はこうも汚れてしまったのかそう思いながら%CALLNAME:MASTER%との行為の良さを思い出している。
		PRINTFORMW 「……好き……%UNICODE(0x2665) *1%」
		PRINTFORMW 物思いに耽りながらサグメは穢翼の海に堕ちていった。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;セフレ取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW 「……%CALLNAME:MASTER%……」
		PRINTFORMW サグメは情欲に苛まれながら床についた。
		PRINTFORMW 「……もう……我慢できない……！」
		PRINTFORMW 彼女はそう言いながら体を下半身に手を伸ばしている。
		PRINTFORMW 肉体関係を築き上げながらサグメはそう思い性欲に体をふるわせている。
		PRINTFORMW 「……えっち……好き……%UNICODE(0x2665) *1%」
		PRINTFORMW 自慰行為に耽りながらサグメは穢翼の海に堕ちていった。
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K110_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;通常自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORMW 「ん……あっ……%UNICODE(0x2665) *1%」
			PRINTFORMW 「%CALLNAME:MASTER%……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「あっ……ん……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:思慕
			PRINTFORMW 「んん……ふぅ……」
		ELSE
			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%……好き……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%……ん……%UNICODE(0x2665) *1%」
			PRINTFORMW 「あっ……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:思慕
			PRINTFORMW 「んん……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORMW 「あっ……%CALLNAME:MASTER%……んっ……%UNICODE(0x2665) *1%」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;中だし精液自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORMW 「いっぱいっ……出された……%UNICODE(0x2665) *1%」
			PRINTFORMW 「%CALLNAME:MASTER%の……残ってる……んっ」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「あっ……白いの……もっと……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:思慕
			PRINTFORMW 「ん……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORMW 「あっ……精子……残ってる……%UNICODE(0x2665) *1%」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無知持ち（自慰中毒による分岐あり
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;無知消去イベントあり（表示は一度だけ
		IF ABL:LOCAL:自慰中毒 >= 5
		;地の文分岐。書きたい場合は[SKIPSTART][SKIPEND]を削除してください
		[SKIPSTART]
		ELSEIF ABL:LOCAL:自慰中毒 == 4
		ELSEIF ABL:LOCAL:自慰中毒 == 3
		ELSEIF ABL:LOCAL:自慰中毒 == 2
		ELSEIF ABL:LOCAL:自慰中毒 == 1
		[SKIPEND]
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質あり自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;-------------------------------------------------
		;Ｃ敏感orＣ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF TALENT:恋人
				PRINTFORMW 「あっ……ここ……%UNICODE(0x2665) *1%」
				PRINTFORMW 「んっ……あっ……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「んっ……んあっ……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「あっ……んんっ……%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「んっ……あっ……%UNICODE(0x2665) *1%」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｖ敏感orＶ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF TALENT:恋人
				PRINTFORMW 「んあ……もっと……%UNICODE(0x2665) *1%」
				PRINTFORMW 「あっ……っ……%UNICODE(0x2665) *1%」
				PRINTFORMW 「%CALLNAME:MASTER%……あっ……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……%CALLNAME:MASTER%……んっ……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「あっ……んあっ……%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「んっ……ここっ……%UNICODE(0x2665) *1%」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ａ敏感orＡ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			IF TALENT:恋人
				PRINTFORMW 「お尻……お尻……%UNICODE(0x2665) *1%」
				PRINTFORMW 「んっ……あっ……%UNICODE(0x2665) *1%」
				PRINTFORMW 「%CALLNAME:MASTER%の……欲しい……」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「お尻……お尻……んっ……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「あっ……お尻……%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「んっ……お尻……%UNICODE(0x2665) *1%」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｂ敏感orＢ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			IF TALENT:恋人
				PRINTFORMW 「おっぱい……%UNICODE(0x2665) *1%」
				PRINTFORMW 「んっ……あっ……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「あっ……胸……溜まってる……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「ん……おっぱい……%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「んっ……胸……%UNICODE(0x2665) *1%」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部位指定無し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			IF TALENT:恋人
				PRINTFORMW 「んあ……あっ……%UNICODE(0x2665) *1%」
				PRINTFORMW 「あっ……%CALLNAME:MASTER%っ……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……%CALLNAME:MASTER%……んあっ……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「あっ……んっ……んっ……%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「んっ……あんっ……%UNICODE(0x2665) *1%」
			ENDIF
			RETURN 1
		ENDIF
		;その他
		;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;尻穴膣腔同時
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF TALENT:恋人
				PRINTFORMW 「んあ……お尻も……おまんこも……%UNICODE(0x2665) *1%」
				PRINTFORMW 「あっ……んっ……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「2つとも……んっ……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「あっ……これっ……%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「んっ……どっちもっ……%UNICODE(0x2665) *1%」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;膣腔のみ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF TALENT:恋人
				PRINTFORMW 「んあ……もっと……%UNICODE(0x2665) *1%」
				PRINTFORMW 「あっ……っ……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……%CALLNAME:MASTER%……%CALLNAME:MASTER%っ……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「あっ……んんっ……%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「んっ……深いのっ……%UNICODE(0x2665) *1%」
			ENDIF
			RETURN 1
		ENDIF
		;その他
		;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K110_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=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 「……良くない、ダメ」
			PRINTFORMW サグメはそう言うと俯いて黙ってしまった。
			PRINTFORMW （あんまり……裸を見られたくない……）
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……お風呂？」
			PRINTFORMW そう言うとサグメは少し考えた後
			PRINTFORMW 「……ダメ……」
			PRINTFORMW 断ることにした。
		ELSEIF TALENT:思慕
			PRINTFORMW 「……ダメよ」
			PRINTFORMW サグメはそう言って混浴を拒否した。
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメは無言で混浴を拒否している。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「お風呂？」
			PRINTFORMW 「……分かった」
			PRINTFORMW サグメはそう言うと手を繋いできた。
			PRINTFORMW 「背中ぐらい流してあげるわ」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……お風呂？」
			PRINTFORMW そう言うとサグメは少し考えた後
			PRINTFORMW 「……いいわよそれぐらい」
			PRINTFORMW 混浴を許可した。
		ELSEIF TALENT:思慕
			PRINTFORMW 「……いいわよ」
			PRINTFORMW サグメはそう言って混浴を許可した。
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメはコクリと頷き混浴を許可した。
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K110_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「……ん、%CALLNAME:MASTER%……」
		PRINTFORMW サグメは胎内の命の鼓動を感じると優しく腹部を撫でている。
		PRINTFORMW 「%CALLNAME:MASTER%の……子供よ……」
		PRINTFORMW 「愛してるわ……%CALLNAME:MASTER%……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「……%CALLNAME:MASTER%……」
		PRINTFORMW サグメは胎内の命の鼓動を感じると優しく腹部を撫でている。
		PRINTFORMW 「%CALLNAME:MASTER%の……か……」
		PRINTFORMW 「……」
		PRINTFORMW サグメは複雑そうな表情でお腹を眺めている。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 「……%CALLNAME:MASTER%……」
		PRINTFORMW サグメは胎内の命の鼓動を感じると優しく腹部を撫でている。
		PRINTFORMW 「%CALLNAME:MASTER%……」
		PRINTFORMW 「……」
		PRINTFORMW サグメは複雑そうな表情でお腹を眺めている。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K110_25(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「……んあ……んぐっ……」
		PRINTFORMW サグメは新しい生命を出産すると子供にほほえみかけた。
		PRINTFORMW 「%CALLNAME:MASTER%の……%CALLNAME:MASTER%との子供よ……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「……はあ……はあ……ん……」
		PRINTFORMW サグメは子供を出産すると消耗した体力の中でその子の頭を撫でた。
		PRINTFORMW 「ん……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 「……はあ……はあ……ん……」
		PRINTFORMW サグメは子供を出産すると消耗した体力の中でその子の頭を撫でた。
		PRINTFORMW 「ふふ……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「……はあ……ん……んあああ！！」
		PRINTFORMW サグメは子供を出産すると消耗した体力の中でその子の頭を撫でた。
		PRINTFORMW 「……誰の……」
		PRINTFORMW サグメは虚ろな目で空を見つめている。
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K110_26(ARG,ARG:1)

;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;見られた瞬間
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「……」
				PRINTFORMW サグメは何も言わず睨みつけてくる。
			ELSEIF TALENT:恋人
				PRINTFORMW 「……！？」
				PRINTFORMW 「あ……んぐっ！？」
				PRINTFORMW サグメは状況に対応できず履きかけのパンツに足を取られ転んでしまった。
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……っ！？」
				PRINTFORMW サグメは驚きのあまりに変な声が出てしまっている。
				PRINTFORMW 「……何？」
				PRINTFORMW そう言うとサグメは何事かとこちらに聞いてきた。
				PRINTFORMW 明らかにこちらの台詞ではあるが……
			ELSEIF TALENT:思慕
				PRINTFORMW 「……！？」
				PRINTFORMW 「……何？」
				PRINTFORMW サグメは一周回って落ち着いた要素で何事かと尋ねてきた。
			ELSE
				PRINTFORMW 「……」
				PRINTFORMW 「……！！！？」
				PRINTFORMW 時間が止まったのではないかと錯覚するほど長い期間硬直した後サグメはキッとこちらを睨みつけている。
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;何もしない
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「……」
				PRINTFORMW サグメは何も言わず睨みつけてくる。
			ELSEIF TALENT:恋人
				PRINTFORMW 「……」
				PRINTFORMW 「……独りは寂しい……」
				PRINTFORMW サグメはそう呟いた。
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……」
				PRINTFORMW サグメは顔を真っ赤にしながら放置される屈辱を味わっている。
				PRINTFORMW 「……いっそ抱いてくれれば……」
				PRINTFORMW そうつぶやくと行為を再開した。
			ELSEIF TALENT:思慕
				PRINTFORMW 「……」
				PRINTFORMW （嫌な予感……）
				PRINTFORMW サグメは顔を真っ青にしながらそう思案した。
			ELSE
				PRINTFORMW 「……」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;そのまま続行
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「……」
				PRINTFORMW サグメは何も言わず睨みつけてくる。
			ELSEIF TALENT:恋人
				PRINTFORMW 「……ん……%CALLNAME:MASTER%……」
				PRINTFORMW 「……見てて……んっ……」
				PRINTFORMW サグメは%CALLNAME:MASTER%に見られながら興奮を味わっている。
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……%CALLNAME:MASTER%……」
				PRINTFORMW サグメは顔を真っ赤にしながら痴態を続けている。
				PRINTFORMW 「……あっ……%UNICODE(0x2665) *1%……んっ……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「……んっ……%CALLNAME:MASTER%……」
				PRINTFORMW （見られると……いつもより……）
			ELSE
				PRINTFORMW 「……っ……」
				PRINTFORMW サグメは口を押さえながらオナニーを続けている。
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;追い出し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「……」
				PRINTFORMW サグメは何も言わず追い出してきた。
			ELSEIF TALENT:恋人
				PRINTFORMW 「……出てって……」
				PRINTFORMW 「……馬鹿……変態……」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……出てって……」
				PRINTFORMW サグメは顔を真っ赤にしながら追い出してきた。
				PRINTFORMW 「……こういうとこ……%CALLNAME:MASTER%に、見られたくなかった……」
			ELSEIF TALENT:思慕
				PRINTFORMW 「……出ていって」
				PRINTFORMW 「お願いだから……出てって！」
				PRINTFORMW サグメは顔を真っ赤にしながらそう言って追い出してきた。
			ELSE
				PRINTFORMW 「……馬鹿……！」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;やっちゃう
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「……」
				PRINTFORMW サグメは何も言わず押し黙っている。
			ELSEIF TALENT:恋人
				PRINTFORMW 「……分かった……」
				PRINTFORMW 「……好きにして……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……」
				PRINTFORMW サグメは少し考えた後。
				PRINTFORMW 「……いい……よ……」
				PRINTFORMW 情事を許可した。
			ELSEIF TALENT:思慕
				PRINTFORMW 「……」
				PRINTFORMW 「分かった」
				PRINTFORMW サグメは覚悟を決めたようにまぐわうことに許可した。
			ELSE
				PRINTFORMW 「……」
				PRINTFORMW サグメは無言で押し倒されている。
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;事後
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「……」
				PRINTFORMW サグメは何も言わず倒れ込んでいる。
			ELSEIF TALENT:恋人
				PRINTFORMW 「……んっ……%UNICODE(0x2665) *1%」
				PRINTFORMW 「……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……%CALLNAME:MASTER%……」
				PRINTFORMW サグメは顔を真っ赤にしながら横になっている。
				PRINTFORMW 「……好き……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「～～～%UNICODE(0x2665) *1%」
				PRINTFORMW 「凄いのね……%UNICODE(0x2665) *1%」
				PRINTFORMW サグメは顔を真っ赤にしながらそう言った。
			ELSE
				PRINTFORMW 「～%UNICODE(0x2665) *1%～%UNICODE(0x2665) *1%～%UNICODE(0x2665) *1%」
				PRINTFORMW サグメは行為に体力を消費し起き上がれなくなっている。
			ENDIF
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
;==================================================
;相手からデートのお誘い
;==================================================
@M_KOJO_EVENT_K110_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%、デートしましょう%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「%CALLNAME:MASTER%、お願いがあるのだけれど」
				PRINTFORMW 「……デート……しよ」
			ELSEIF TALENT:思慕
				PRINTFORMW 「ねえ、デート……しない？」
			ELSE
				PRINTFORMW 「……%CALLNAME:MASTER%、デートしましょう」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「じゃあ、どこへ行きたい？%CALLNAME:MASTER%の行きたいところに行きたいわ」
			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 「私の家、今から来る？」
			ELSEIF TALENT:思慕
				PRINTFORMW 「……私の家に来ないかしら？」
			ELSE
				PRINTFORMW 「ねえ、暇かしら？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「こういうの、恋人みたいね」
			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_K110_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 「恥ずかしい……%UNICODE(0x2665) *1%」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;下着姿にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
				PRINTFORMW 「可愛いの……着けてない……」
			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 「変態ね……%UNICODE(0x2665) *1%」
					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_K110_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの度胸で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「怒らせないで……！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……なんなの……！」
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW サグメは無言で睨みつけている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;泣かせてしまった　[臆病]持ち
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;相手が押し倒しを解除
;==================================================
@M_KOJO_EVENT_K110_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%……スケベ……%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

[SKIPSTART]
;-------------------------------------------------
;オナバレ遭遇時の地の文。口上色はここで付けてください。
;CFLAG等のキャラ変数を使う場合、キャラ番号の指定が必要になります。
;デフォルトのものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K110_ONABARE_1(ARG)
;-------------------------------------------------
IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレでそのまま続けてもらう場合の地の文。口上色はここで付けてください。
;CFLAG等のキャラ変数を使う場合、キャラ番号の指定が必要になります。
;デフォルトのものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K110_ONABARE_2(ARG)
;-------------------------------------------------
IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレなし崩しックスの地の文。口上色はここで付けてください。
;CFLAG等のキャラ変数を使う場合、キャラ番号の指定が必要になります。
;デフォルトのものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K110_ONABARE_3(前戯１,本番はどっちか,回数,注入量)
;-------------------------------------------------
#DIM 前戯１
;1=C 2=B 3=M
#DIM 本番はどっちか
;0でＶ、1でＡ
#DIM 注入量
#DIM 回数

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

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

path: 原版+前人整合等各种readme/パッチ/eraTW4.810用 修正パッチ/ERB/口上・メッセージ関連/個人口上/サグメ/M_KOJO_K110_イベント.ERB