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

;※コンセプト
;お姉さん、ちょっとエッチ、甘えてくるタイプ、努力家、悪戯っぽいみたいな感じです。

;※※※※※※他者による修正、加筆、改変についての但し書き※※※※※※
;前提としてオリジナル作者以外が手を入れる場合は、オリジナル作者の許可を求めること
;オリジナル作者とコンタクトが取れない場合には以下の但し書きに従ってUPできるかどうか判断してください。

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

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

;本口上に対するメンテナンス禁止時限について（設定しない場合、未設定のみ残してください）
;【未設定】

;本口上に対するその他但し書き
;【 】【 】
;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;CFLAG:1400　君付けフラグ
;CFLAG:1401　呼び捨てイベント
;
;******************************************************************************

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

;RESULTS = _TEST_

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

;ここでCFLAG等のキャラ変数を使う場合、キャラ番号の指定が必要になります

;コメントアウトを外して眠姦口上有、時間停止口上有に1を入れると、それぞれ時間停止時、眠姦時にコマンド口上が読み込まれるように
;入れないと時間停止時、眠姦時は一切喋りません
;Xにはキャラ番号を入れてください

;CFLAG:X:眠姦口上有 = 0
;CFLAG:X:時間停止口上有 = 0

;口上存在判定です、けしてコメントアウトしないでください
RETURN 1
;### 口上色判定 ###################################
@M_KOJO_COLOR_K96

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

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

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K96
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します

	PRINTL 雷鼓さんのお尻は弱点？
	PRINTL [0] 当然（素質:Ａ敏感を獲得）
	PRINTL [1] そういうのいいです（変化なし）
	$INPUT_LOOP1
	INPUT
	IF RESULT == 0
		PRINTFORMW ―素質、能力を変更します―
		TALENT:TARGET:103 = 1
	ELSEIF RESULT == 1
		PRINTFORMW ―通常モードで開始します―
	ELSE
		GOTO INPUT_LOOP1
	ENDIF

	PRINTL 雷鼓さんに君付けで呼ばれたい？
	PRINTL [0] はい（呼び名の変化、恋人時に呼び捨てになります）
	PRINTL [1] そういうのいいです（変化なし）
	$INPUT_LOOP2
	INPUT
	IF RESULT == 0
		PRINTFORMW ―君付けで呼んでもらいます―
		CFLAG:1400 = 1
	ELSEIF RESULT == 1
		PRINTFORMW ―通常モードで開始します―
	ELSE
		GOTO INPUT_LOOP2
	ENDIF

PRINTFORMW 辺りを散策していると太鼓の上に座って踵のビーターで演奏をしている女性が居た。
PRINTFORMW 赤い髪に白スーツの女性はふとこちらに気づくと近づいてくる。
PRINTFORMW 「さっきからこっちみて…どうかしたの？」
PRINTFORMW
PRINTFORMW 「綺麗だったから？ふふ、照れるわね」
PRINTFORMW 「何しているのかって…見て分からない？ドラムの演奏よ」
PRINTFORMW 「乗っかっちゃダメだろって？まぁ自分の体の一部みたいなものだし大丈夫でしょ」
PRINTFORMW 「私は太鼓の付喪神の堀川雷鼓、あなたは？」
PRINTFORM 「そう、
CALL MASTER_CALLNAME_K96
PRINTFORMW っていうの、素敵な名前ね」
PRINTFORMW 「ん～じゃあ私はもう２、３曲演奏していくけど聞いていく？」
PRINTFORMW 「あ、お金とか取らないわよ、まだ練習の途中だし」
PRINTFORMW 「それじゃあ新曲行ってみよ～！」
TCVAR:350 = 1
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;デート帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K96_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 「う～ん！」
	PRINTFORMW 雷鼓は背中を伸ばしてリラックスしながら身を屈め上目遣いにこちらを向いた。
	PRINTFORMW 「今日はありがと、楽しかったわ…だからね…」
	PRINTFORMW 雷鼓は少し顔を赤らめながら顔を近づけ―――
	PRINTFORMW
	PRINTFORMW 　　　　一瞬で唇を奪われた。
	PRINTFORMW
	PRINTFORMW あまりにも静かに、いつもの雷鼓らしくないような陰を見せながら言葉を紡ぐ。
	PRINTFORMW 「…お礼…嫌だったかしら…？」
	PRINTFORMW 稲妻のごとき速さで音も無くキスされ、%CALLNAME:MASTER%は反応できなかった。
	PRINTFORMW しばらく気まずい雰囲気が流れた後、そんなことない、と言うと雷鼓ははにかんだ笑顔で言う。
	PRINTFORMW 「それじゃ…今日はこれでお開きね、お疲れ様！」
	PRINTFORMW 顔を真っ赤にしながら飛び去っていく。
	PRINTFORMW (何やってんだろ…私…)
	;キスをキャンセルしたい場合は以下を開放
	;TCVAR:キスキャンセル = 1
ENDIF
RETURN 1

;==================================================
;デート帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K96_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(1096)
			PRINTFORMW 「今日はありがとうね、私に付き合ってくれて」
			PRINTFORMW そんなことはない、こっちも楽しかった。
			PRINTFORMW と、返事をすると左足を軸にくるりと振り返り、少し緊張した面持ちで――
			PRINTFORMW それでいて努めてにこやかに話を切り出した。
			PRINTFORMW 「いいえ、今日だけじゃない、これまでずぅっと私に与えてくれた」
			PRINTFORMW 「ま、貴方が本当に…私を想ってくれていたのかは分からないけど…」
			PRINTFORMW 「今からそれを試しましょう。」
			PRINTFORMW
			PRINTFORMW 「好きです」
			PRINTFORMW 「貴方の側に居させてください…」
			PRINTFORMW 「貴方の鼓動…もっと…聞かせて…」
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW 「もしもーし？聞いてるー？」
			PRINTFORMW 唐突な告白に少し固まりながら%CALLNAME:MASTER%は言葉をひり出した…
		;二回目の告白
		ELSE
			PRINTFORM  「――ねぇ
			CALL MASTER_CALLNAME_K96
			PRINTFORMW 」
			PRINTFORMW 帰り際、唐突にこちらを振り返りかなり緊張した様子で言葉が紡がれる。
			PRINTFORMW 「好きです、恋人になってください」
			PRINTFORMW からだを緊張で震わせながら、一生懸命に声を出す。
			PRINTFORMW 「あれから、いっぱい貴方の隣に居られるように努力したつもり…」
			PRINTFORMW 「いえ、努力したんだけど―――」
			PRINTFORMW %CALLNAME:MASTER%はゆっくりと言葉を噛み締めながらそれに答えた…
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTW
		PRINTW
		PRINTFORMW 「…」
		PRINTFORMW %CALLNAME:MASTER%は頷くと、雷鼓は一度俯いて顔を上げて口を開く。
		PRINTFORMW 「よかった…断られたらどうしようかと…」
		PRINTFORMW 胸に手を当てながら少し涙声になりながら言葉を続けていく。
		PRINTFORMW 「私、今までこんなことしたことなかったから…」
		PRINTFORMW 「うまくいくか分かんなくて…」
		PRINTFORMW まぁ付喪神だったしなぁと%CALLNAME:MASTER%が考えていると雷鼓は照れながら言葉を紡ぐ。
		PRINTFORMW 「今日はいい日ね…ありがとう…そして…」
		PRINTFORM 「これからもよろしくね、
		CALL MASTER_CALLNAME_K96
		PRINTFORMW ！」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTW
		PRINTW
		PRINTFORMW  「…」
		PRINTFORMW  「……」
		PRINTFORMW  「………」
		PRINTFORMW  「ふふふ、いいわ、覚えておきなさい…」
		PRINTFORMW  「私、貴方に振り返ってもらえるぐらい努力するから…」
		PRINTFORMW  「――私、あきらめないからね？」
		PRINTFORMW  そういうと雷鼓は寂しそうに去っていった。
		PRINTW
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;デート帰り
;==================================================
@M_KOJO_SPEVENT_K96_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		IF TALENT:恋人
			PRINTW
			PRINTFORMW 「う～ん、楽しかった！」
			PRINTFORMW 「貴方といられるならどこでも楽しいんだけど…」
			PRINTFORM 「明日はどうする？
			CALL MASTER_CALLNAME_K96
			PRINTFORMW はどこへ行きたい？」
			PRINTFORMW 朗らかに明日の予定を聞いてくる雷鼓は楽しそうだ。
			PRINTFORMW 「私？私は―――」
			PRINTFORMW 「やっぱり明日、決めましょう、楽しみにしていて会えなくなっても嫌だから…」
		ELSEIF TALENT:恋慕
			PRINTW
			PRINTFORMW 「あ～楽しかった！」
			PRINTFORM 「
			CALL MASTER_CALLNAME_K96
			PRINTFORMW はどうだった？」
			PRINTFORMW 「私？私は貴方と一緒に居て楽しかったわ！」
			PRINTFORMW 「なんで？そうね…なんでかしらね…」
			PRINTFORMW 雷鼓は何か達観したかのように帰りの空を眺めている。
		ELSEIF TALENT:思慕
			PRINTW
			PRINTFORMW 「ん…今日はありがとう…」
			PRINTFORMW 「できたら…明日も付き合ってくれないかしら？」
			PRINTFORMW やけにしおらしくなった雷鼓はそういうと恥ずかしさから俯いてしまった。
			PRINTW
		ELSE
			PRINTW
			PRINTFORMW 「ふぅ…疲れたわね…」
			PRINTFORMW 「ん…ライブイベントよりかはマシよ、羽を伸ばすってやつね」
			PRINTFORMW 「いやライブが嫌とかじゃなくてねこっちは肩肘張らない楽しさって言うか」
			PRINTFORMW 「もう…じゃあライブに来る？ライブの楽しさっての教えてあげるわ」
			PRINTFORMW なんだか元気そうである。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORMW 「もう、あんまり酷いことしないでね？」
			PRINTFORMW 「私もあんまり怒りたくない…から…」
			PRINTFORMW 「しないでよ？振りじゃないからね？」
			RETURN 1
		ELSE
			PRINTFORMW 「いいわよ」
			PRINTFORMW あっさりと雷鼓は笑顔で許してくれた
			PRINTFORMW 「でも、次は無いからね？」
			PRINTFORMW 差し出された手を取ると静電気がピリッと走った。
			PRINTW
		RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「いいわ、許したげる」
			PRINTFORMW 「でもね、もう怒らせないでよ？」
			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 「…まぁ許してあげないことも無いけど」
			PRINTFORMW 「電気椅子に水含めたスポンジ付けてあげる位には」
			PRINTFORMW  一応は許してくれるらしい。苦しんで死ぬのが楽に死ねるぐらいには、だが。
			RETURN 1
		ELSE
			PRINTFORM 「
			CALL MASTER_CALLNAME_K96
			PRINTFORMW 、」
			PRINTFORMW 「今回だけよ、それと二つ、言っておくわ」
			PRINTFORMW 「一つ目、仏の顔も三度までって言葉知ってる？」
			PRINTFORMW 「二つ目、普通、顔は一つしかない。二度も三度も人を怒らせることをしてはいけない、社会常識よ覚えておきなさい」
			PRINTFORMW 大気が帯電してピリピリしているのが収まっていくのと同時に彼女の怒りも収まって行ったようだ。
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
	PRINTFORMW
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K96_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;今日会ってない。
	IF !TCVAR:96:今日会ったか
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;MASTERが入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
			;仕事中、今日会ってない。
			IF CFLAG:行動 == 5 && !TCVAR:96:今日会ったか && CFLAG:350 == 47
				PRINTFORM 「
				CALL MASTER_CALLNAME_K96
				PRINTFORMW ！盛り上がってるかしら♪」
			ELSE
				;謹賀新年
				IF DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1
					IF TALENT:恋人
						PRINTFORM 「明けましておめでとう！
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓はそう言って新年の挨拶をしてきた。
						PRINTFORMW 「今年もよろしく…ね」
					ELSEIF TALENT:恋慕
						PRINTFORMW 「ハッピーニューイヤー！」
						PRINTFORMW 雷鼓は新年の挨拶をしてきた。
						PRINTFORM 「今年もよろしくね！
						CALL MASTER_CALLNAME_K96
						PRINTFORMW ！」
					ELSEIF TALENT:思慕
						PRINTFORMW 「あけおめー」
						PRINTFORMW 雷鼓は新年の挨拶をしてきた。
					ELSE
						PRINTFORM 「あけおめ、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓は軽く新年の挨拶をしてきた。
						PRINTFORMW 「今年もよろしくね」
					ENDIF
				;バレンタインデー
				ELSEIF DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000
					IF TALENT:恋人
						PRINTFORM 「ねえねえ、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
					ELSEIF TALENT:恋慕
						PRINTFORM 「…今日はバレンタインだね、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
					ELSEIF TALENT:思慕
						PRINTFORM 「あ、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
					ELSEIF CFLAG:2 >= 1000
						PRINTFORM 「あら？
						CALL MASTER_CALLNAME_K96
						PRINTFORMW じゃない」
					ENDIF
					SELECTCASE CFLAG:好感度
					CASE 1000 TO 3000
						PRINTFORMW 「チョコレート、あげるわ」
						PRINTFORMW 雷鼓はチョコレートを渡してきた。
						PRINTFORMW 「大事に食べなさい」
					CASE 3001 TO 5000
						IF TALENT:恋人
							PRINTFORMW 雷鼓は%CALLNAME:MASTER%にチョコレートを渡してきた。
							PRINTFORMW 「美味しいかどうかはしらないけど、ね」
							PRINTFORMW そう言いながら雷鼓は笑みを浮かべている。
						ELSEIF TALENT:恋慕
							PRINTFORMW 「…チョコレート、あげる」
							PRINTFORMW 雷鼓はそう言ってチョコレートを差し出してきた。
						ELSEIF TALENT:思慕
							PRINTFORMW 「これ…あげる」
							PRINTFORMW 雷鼓はそう言ってチョコレートを渡してきた。
							PRINTFORMW 「…義理なんだからね…！」
						ELSEIF CFLAG:2 >= 1000
							PRINTFORMW 「ほら、あげる」
							PRINTFORMW 雷鼓はそう言ってチョコレートを渡してきた。
							PRINTFORMW 「ありがたく食べなさい」
						ENDIF
					CASE IS > 5000
						IF EXP:愛情経験 >= 100
							IF TALENT:恋人
								PRINTFORMW 「チョコレート、どうぞ」
								PRINTFORMW 雷鼓はそう言って%CALLNAME:MASTER%にチョコレートを渡してきた。
								PRINTFORMW 「私の手作りなんだから、味わって食べてね♪」
							ELSEIF TALENT:恋慕
								PRINTFORMW 「…これ…あげる…」
								PRINTFORMW 雷鼓はそう言ってチョコレートを渡してきた。
								PRINTFORMW 「上手く出来たかわからないけど…」
							ELSEIF TALENT:思慕
								PRINTFORMW 「チョコレート、あげる…」
								PRINTFORMW 雷鼓はそう言いながらチョコを渡してきた。
								PRINTFORMW 「…美味しいかどうかまではわからないけど…」
							ELSEIF CFLAG:2 >= 1000
								PRINTFORMW 「これ、あげる」
								PRINTFORMW そう言いながら雷鼓はチョコレートを渡してきた。
								PRINTFORMW 「お姉さんの手作りなんだから、味わってよ？」
							ENDIF
						ELSE
							IF TALENT:恋人
								PRINTFORMW 「チョコレート、どうぞ」
								PRINTFORMW 雷鼓はそう言って%CALLNAME:MASTER%にチョコレートを渡してきた。
								PRINTFORMW 「好きでしょ？こういうの」
							ELSEIF TALENT:恋慕
								PRINTFORMW 「はい、チョコレート♪」
								PRINTFORMW 雷鼓はそう言ってチョコレートを渡してきた。
								PRINTFORMW 「高いやつだから、多分美味しいと思うわ%UNICODE(0x2665) *1%」
							ELSEIF TALENT:思慕
								PRINTFORMW 「チョコレート、あげるわ」
								PRINTFORMW 雷鼓はそう言いながらチョコを渡してきた。
								PRINTFORMW 「結構いいお値段だったんだから、ホワイトデー、楽しみにしてるわ♪」
							ELSEIF CFLAG:2 >= 1000
								PRINTFORMW 「これ、あげるわ」
								PRINTFORMW そう言いながら雷鼓はチョコレートを渡してきた。
								PRINTFORMW 「高かったんだから、味わって食べてよ？」
							ENDIF
						ENDIF
					ENDSELECT
				;ハロウィン
				ELSEIF DAY:2 == 3 && DAY:3 == 30
					IF TALENT:恋人
						PRINTFORM 「あら、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓は%CALLNAME:MASTER%に笑みを浮かべながら話しかけてくる。
						PRINTFORMW 「今日はハロウィン、悪戯、楽しみにしてなさい」
					ELSEIF TALENT:恋慕
						PRINTFORMW 「トリック・オア・トリート！」
						PRINTFORMW 雷鼓はそう言いながら話しかけてきた。
						PRINTFORMW 「悪戯しちゃうぞ%UNICODE(0x2665) *1%」
						PRINTFORMW そしてこちらをチラチラ様子を窺っている。
						PRINTFORMW
					ELSEIF TALENT:思慕
						PRINTFORMW 「…トリック・オア・トリート！」
						PRINTFORMW 雷鼓は後ろから驚かすように呟いた。
						PRINTFORMW 「今日はハロウィンだね！」
						PRINTFORMW 今日のやけにテンションが高い、何があったのだろうか…
					ELSE
						PRINTFORMW 「トリック・オア・トリート！」
						PRINTFORMW 雷鼓はそう言って脅かしてきた。
						PRINTFORMW 「お菓子くれないと～悪戯しちゃうぞ～♪」
					ENDIF
				;クリスマス
				ELSEIF DAY:2 == 4 && DAY:3 == 25
					IF TALENT:恋人
						PRINTFORM 「メリークリスマス！
						CALL MASTER_CALLNAME_K96
						PRINTFORMW ！」
						PRINTFORMW 雷鼓は%CALLNAME:MASTER%に話しかけてくる。
						PRINTFORMW 「今日はクリスマスよ、何かご予定は？」
						PRINTFORMW そう言いながら予定を尋ねてきた。
					ELSEIF TALENT:恋慕
						PRINTFORM 「…今日はクリスマスね、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓はそう言って話しかけてきた。
						PRINTFORMW 「貴方は今日何するの？」
					ELSEIF TALENT:思慕
						PRINTFORM 「あ…
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓はそう言いながら話しかけてきた。
						PRINTFORMW 「…今日はクリスマスだけど」
						PRINTFORMW 「何か予定とかあるの？」
					ELSE
						PRINTFORMW 「メリークリスマス！」
						PRINTFORMW 雷鼓はそう言って話しかけてきた。
						PRINTFORMW 「残念だけど私はサンタじゃないけどね」
					ENDIF
				ELSEIF TALENT:恋人
					PRINTFORMW 「あっれー？」
					PRINTFORM 「どうしたの？
					CALL MASTER_CALLNAME_K96
					PRINTFORMW 」
		;			PRINTFORMW 雷鼓はリラックスした様子でネクタイとシャツを緩め胸元を露にしながら近寄ってくる。
					PRINTFORMW 「今日は何しよっか？」
				ELSEIF TALENT:恋慕
					PRINTFORMW 「あれ？」
		;			PRINTFORMW 雷鼓は部屋に入ってきた侵入者に気づくとネクタイとシャツを緩めながら話しかけてくる。
					PRINTFORMW 「今日はどうして？」
		;			PRINTFORMW なんでもない風に装っているが少し顔を赤らめている。
				ELSEIF TALENT:思慕
					PRINTFORMW 「ん？どうしたの？」
		;			PRINTFORMW 雷鼓は侵入者に気づくと自分の体の埃を払うようにポンポンと叩いている。
					PRINTFORMW 「うん…変な所は無いわね…で、何かしら？」
				ELSE
					PRINTFORM 「おー
					CALL MASTER_CALLNAME_K96
					PRINTFORMW じゃない」
					PRINTFORMW 「今日はどうしたの？」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 2
			;仕事中、今日会ってない。
			IF CFLAG:行動 == 5 && !TCVAR:96:今日会ったか && CFLAG:350 == 47
				PRINTFORM 「
				CALL MASTER_CALLNAME_K96
				PRINTFORMW ！盛り上がってるかしら♪」
			ELSE
				;謹賀新年
				IF DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1
					IF TALENT:恋人
						PRINTFORM 「明けましておめでとう！
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓はそう言って新年の挨拶をしてきた。
						PRINTFORMW 「今年もよろしく…ね」
					ELSEIF TALENT:恋慕
						PRINTFORMW 「ハッピーニューイヤー！」
						PRINTFORMW 雷鼓は新年の挨拶をしてきた。
						PRINTFORM 「今年もよろしくね！
						CALL MASTER_CALLNAME_K96
						PRINTFORMW ！」
					ELSEIF TALENT:思慕
						PRINTFORMW 「あけおめー」
						PRINTFORMW 雷鼓は新年の挨拶をしてきた。
					ELSE
						PRINTFORM 「あけおめ、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓は軽く新年の挨拶をしてきた。
						PRINTFORMW 「今年もよろしくね」
					ENDIF
				;バレンタインデー
				ELSEIF DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000
					IF TALENT:恋人
						PRINTFORM 「ねえねえ、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
					ELSEIF TALENT:恋慕
						PRINTFORM 「…今日はバレンタインだね、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
					ELSEIF TALENT:思慕
						PRINTFORM 「あ、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
					ELSEIF CFLAG:2 >= 1000
						PRINTFORM 「あら？
						CALL MASTER_CALLNAME_K96
						PRINTFORMW じゃない」
					ENDIF
					SELECTCASE CFLAG:好感度
					CASE 1000 TO 3000
						PRINTFORMW 「チョコレート、あげるわ」
						PRINTFORMW 雷鼓はチョコレートを渡してきた。
						PRINTFORMW 「大事に食べなさい」
					CASE 3001 TO 5000
						IF TALENT:恋人
							PRINTFORMW 雷鼓は%CALLNAME:MASTER%にチョコレートを渡してきた。
							PRINTFORMW 「美味しいかどうかはしらないけど、ね」
							PRINTFORMW そう言いながら雷鼓は笑みを浮かべている。
						ELSEIF TALENT:恋慕
							PRINTFORMW 「…チョコレート、あげる」
							PRINTFORMW 雷鼓はそう言ってチョコレートを差し出してきた。
						ELSEIF TALENT:思慕
							PRINTFORMW 「これ…あげる」
							PRINTFORMW 雷鼓はそう言ってチョコレートを渡してきた。
							PRINTFORMW 「…義理なんだからね…！」
						ELSEIF CFLAG:2 >= 1000
							PRINTFORMW 「ほら、あげる」
							PRINTFORMW 雷鼓はそう言ってチョコレートを渡してきた。
							PRINTFORMW 「ありがたく食べなさい」
						ENDIF
					CASE IS > 5000
						IF EXP:愛情経験 >= 100
							IF TALENT:恋人
								PRINTFORMW 「チョコレート、どうぞ」
								PRINTFORMW 雷鼓はそう言って%CALLNAME:MASTER%にチョコレートを渡してきた。
								PRINTFORMW 「私の手作りなんだから、味わって食べてね♪」
							ELSEIF TALENT:恋慕
								PRINTFORMW 「…これ…あげる…」
								PRINTFORMW 雷鼓はそう言ってチョコレートを渡してきた。
								PRINTFORMW 「上手く出来たかわからないけど…」
							ELSEIF TALENT:思慕
								PRINTFORMW 「チョコレート、あげる…」
								PRINTFORMW 雷鼓はそう言いながらチョコを渡してきた。
								PRINTFORMW 「…美味しいかどうかまではわからないけど…」
							ELSEIF CFLAG:2 >= 1000
								PRINTFORMW 「これ、あげる」
								PRINTFORMW そう言いながら雷鼓はチョコレートを渡してきた。
								PRINTFORMW 「お姉さんの手作りなんだから、味わってよ？」
							ENDIF
						ELSE
							IF TALENT:恋人
								PRINTFORMW 「チョコレート、どうぞ」
								PRINTFORMW 雷鼓はそう言って%CALLNAME:MASTER%にチョコレートを渡してきた。
								PRINTFORMW 「好きでしょ？こういうの」
							ELSEIF TALENT:恋慕
								PRINTFORMW 「はい、チョコレート♪」
								PRINTFORMW 雷鼓はそう言ってチョコレートを渡してきた。
								PRINTFORMW 「高いやつだから、多分美味しいと思うわ%UNICODE(0x2665) *1%」
							ELSEIF TALENT:思慕
								PRINTFORMW 「チョコレート、あげるわ」
								PRINTFORMW 雷鼓はそう言いながらチョコを渡してきた。
								PRINTFORMW 「結構いいお値段だったんだから、ホワイトデー、楽しみにしてるわ♪」
							ELSEIF CFLAG:2 >= 1000
								PRINTFORMW 「これ、あげるわ」
								PRINTFORMW そう言いながら雷鼓はチョコレートを渡してきた。
								PRINTFORMW 「高かったんだから、味わって食べてよ？」
							ENDIF
						ENDIF
					ENDSELECT
				;ハロウィン
				ELSEIF DAY:2 == 3 && DAY:3 == 30
					IF TALENT:恋人
						PRINTFORM 「あら、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓は%CALLNAME:MASTER%に笑みを浮かべながら話しかけてくる。
						PRINTFORMW 「今日はハロウィン、悪戯、楽しみにしてなさい」
					ELSEIF TALENT:恋慕
						PRINTFORMW 「トリック・オア・トリート！」
						PRINTFORMW 雷鼓はそう言いながら話しかけてきた。
						PRINTFORMW 「悪戯しちゃうぞ%UNICODE(0x2665) *1%」
						PRINTFORMW そしてこちらをチラチラ様子を窺っている。
						PRINTFORMW
					ELSEIF TALENT:思慕
						PRINTFORMW 「…トリック・オア・トリート！」
						PRINTFORMW 雷鼓は後ろから驚かすように呟いた。
						PRINTFORMW 「今日はハロウィンだね！」
						PRINTFORMW 今日のやけにテンションが高い、何があったのだろうか…
					ELSE
						PRINTFORMW 「トリック・オア・トリート！」
						PRINTFORMW 雷鼓はそう言って脅かしてきた。
						PRINTFORMW 「お菓子くれないと～悪戯しちゃうぞ～♪」
					ENDIF
				;クリスマス
				ELSEIF DAY:2 == 4 && DAY:3 == 25
					IF TALENT:恋人
						PRINTFORM 「メリークリスマス！
						CALL MASTER_CALLNAME_K96
						PRINTFORMW ！」
						PRINTFORMW 雷鼓は%CALLNAME:MASTER%に話しかけてくる。
						PRINTFORMW 「今日はクリスマスよ、何かご予定は？」
						PRINTFORMW そう言いながら予定を尋ねてきた。
					ELSEIF TALENT:恋慕
						PRINTFORM 「…今日はクリスマスね、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓はそう言って話しかけてきた。
						PRINTFORMW 「貴方は今日何するの？」
					ELSEIF TALENT:思慕
						PRINTFORM 「あ…
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓はそう言いながら話しかけてきた。
						PRINTFORMW 「…今日はクリスマスだけど」
						PRINTFORMW 「何か予定とかあるの？」
					ELSE
						PRINTFORMW 「メリークリスマス！」
						PRINTFORMW 雷鼓はそう言って話しかけてきた。
						PRINTFORMW 「残念だけど私はサンタじゃないけどね」
					ENDIF
				ELSEIF TALENT:恋人
					PRINTFORM 「
					CALL MASTER_CALLNAME_K96
					PRINTFORMW 、いる？」
		;			PRINTFORMW 雷鼓は中に%CALLNAME:MASTER%がいることを確認するとにこやかに入ってきた。
				ELSEIF TALENT:恋慕
					PRINTFORM 「あら、
					CALL MASTER_CALLNAME_K96
					PRINTFORMW 、元気そうね」
		;			PRINTFORMW 雷鼓はこちらに気づくと一瞬ビクッと体を震わせながら部屋に入ってくる。
				ELSEIF TALENT:思慕
					PRINTFORM 「
					CALL MASTER_CALLNAME_K96
					PRINTFORMW 、入ってもいいかしら？」
		;			PRINTFORMW 頷くと雷鼓はいそいそと入ってくる。
					PRINTFORMW 「…何か変かしら？」
		;			PRINTFORMW 綺麗だから見とれていた、と言うと顔を赤くして俯いてしまった。
				ELSE
					PRINTFORM 「
					CALL MASTER_CALLNAME_K96
					PRINTFORMW ？元気してる？」
		;			PRINTFORMW 雷鼓はにこやかに部屋に入ってきた。
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて一緒に入る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 3
			IF TALENT:恋人
				PRINTFORMW 「あら、一番風呂だと思ってたのに」
				PRINTFORMW 豊満な胸に引き締まった腰、女性らしいシルエットの女性が入ってくる。
				PRINTFORMW 「どうしたの？顔赤くして」
				PRINTFORMW 「お背中流しましょうか？」
				PRINTFORMW  そういうと雷鼓は湯船に浸かってきた。
			ELSE
				PRINTFORMW 「う～ん一番風呂取れなかったか～」
				PRINTFORMW 「とりあえず体から洗おうかしら」
				PRINTFORMW  そういうと雷鼓は体を洗い始めた。
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて出て行った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 4
			PRINTFORMW 「あら、入れ替わりね？一番風呂は頂いてるわよ」
			PRINTFORMW  そういうと雷鼓は風呂からあがり出て行った。
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 5
			PRINTFORMW 「もう…人が気持ちよく風呂に入ってる時に…」
			PRINTFORMW 雷鼓は呆れたように湯船に沈みながら追い出そうとする。
			PRINTFORMW 「私の見たって面白くもなんとも無いんだから…」
			PRINTFORMW  そういうとこちらをギロッと睨み付けてきた。
		ENDIF
		;-------------------------------------------------
		;外出先で遭遇した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 6
			;仕事中、今日会ってない。
			IF CFLAG:行動 == 5 && !TCVAR:96:今日会ったか && CFLAG:350 == 47
				PRINTFORM 「
				CALL MASTER_CALLNAME_K96
				PRINTFORMW ！盛り上がってるかしら♪」
			ELSE
				;謹賀新年
				IF DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1
					IF TALENT:恋人
						PRINTFORM 「明けましておめでとう！
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓はそう言って新年の挨拶をしてきた。
						PRINTFORMW 「今年もよろしく…ね」
					ELSEIF TALENT:恋慕
						PRINTFORMW 「ハッピーニューイヤー！」
						PRINTFORMW 雷鼓は新年の挨拶をしてきた。
						PRINTFORM 「今年もよろしくね！
						CALL MASTER_CALLNAME_K96
						PRINTFORMW ！」
					ELSEIF TALENT:思慕
						PRINTFORMW 「あけおめー」
						PRINTFORMW 雷鼓は新年の挨拶をしてきた。
					ELSE
						PRINTFORM 「あけおめ、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓は軽く新年の挨拶をしてきた。
						PRINTFORMW 「今年もよろしくね」
					ENDIF
				;バレンタインデー
				ELSEIF DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000
					IF TALENT:恋人
						PRINTFORM 「ねえねえ、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
					ELSEIF TALENT:恋慕
						PRINTFORM 「…今日はバレンタインだね、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
					ELSEIF TALENT:思慕
						PRINTFORM 「あ、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
					ELSEIF CFLAG:2 >= 1000
						PRINTFORM 「あら？
						CALL MASTER_CALLNAME_K96
						PRINTFORMW じゃない」
					ENDIF
					SELECTCASE CFLAG:好感度
					CASE 1000 TO 3000
						PRINTFORMW 「チョコレート、あげるわ」
						PRINTFORMW 雷鼓はチョコレートを渡してきた。
						PRINTFORMW 「大事に食べなさい」
					CASE 3001 TO 5000
						IF TALENT:恋人
							PRINTFORMW 雷鼓は%CALLNAME:MASTER%にチョコレートを渡してきた。
							PRINTFORMW 「美味しいかどうかはしらないけど、ね」
							PRINTFORMW そう言いながら雷鼓は笑みを浮かべている。
						ELSEIF TALENT:恋慕
							PRINTFORMW 「…チョコレート、あげる」
							PRINTFORMW 雷鼓はそう言ってチョコレートを差し出してきた。
						ELSEIF TALENT:思慕
							PRINTFORMW 「これ…あげる」
							PRINTFORMW 雷鼓はそう言ってチョコレートを渡してきた。
							PRINTFORMW 「…義理なんだからね…！」
						ELSEIF CFLAG:2 >= 1000
							PRINTFORMW 「ほら、あげる」
							PRINTFORMW 雷鼓はそう言ってチョコレートを渡してきた。
							PRINTFORMW 「ありがたく食べなさい」
						ENDIF
					CASE IS > 5000
						IF EXP:愛情経験 >= 100
							IF TALENT:恋人
								PRINTFORMW 「チョコレート、どうぞ」
								PRINTFORMW 雷鼓はそう言って%CALLNAME:MASTER%にチョコレートを渡してきた。
								PRINTFORMW 「私の手作りなんだから、味わって食べてね♪」
							ELSEIF TALENT:恋慕
								PRINTFORMW 「…これ…あげる…」
								PRINTFORMW 雷鼓はそう言ってチョコレートを渡してきた。
								PRINTFORMW 「上手く出来たかわからないけど…」
							ELSEIF TALENT:思慕
								PRINTFORMW 「チョコレート、あげる…」
								PRINTFORMW 雷鼓はそう言いながらチョコを渡してきた。
								PRINTFORMW 「…美味しいかどうかまではわからないけど…」
							ELSEIF CFLAG:2 >= 1000
								PRINTFORMW 「これ、あげる」
								PRINTFORMW そう言いながら雷鼓はチョコレートを渡してきた。
								PRINTFORMW 「お姉さんの手作りなんだから、味わってよ？」
							ENDIF
						ELSE
							IF TALENT:恋人
								PRINTFORMW 「チョコレート、どうぞ」
								PRINTFORMW 雷鼓はそう言って%CALLNAME:MASTER%にチョコレートを渡してきた。
								PRINTFORMW 「好きでしょ？こういうの」
							ELSEIF TALENT:恋慕
								PRINTFORMW 「はい、チョコレート♪」
								PRINTFORMW 雷鼓はそう言ってチョコレートを渡してきた。
								PRINTFORMW 「高いやつだから、多分美味しいと思うわ%UNICODE(0x2665) *1%」
							ELSEIF TALENT:思慕
								PRINTFORMW 「チョコレート、あげるわ」
								PRINTFORMW 雷鼓はそう言いながらチョコを渡してきた。
								PRINTFORMW 「結構いいお値段だったんだから、ホワイトデー、楽しみにしてるわ♪」
							ELSEIF CFLAG:2 >= 1000
								PRINTFORMW 「これ、あげるわ」
								PRINTFORMW そう言いながら雷鼓はチョコレートを渡してきた。
								PRINTFORMW 「高かったんだから、味わって食べてよ？」
							ENDIF
						ENDIF
					ENDSELECT
				;ハロウィン
				ELSEIF DAY:2 == 3 && DAY:3 == 30
					IF TALENT:恋人
						PRINTFORM 「あら、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓は%CALLNAME:MASTER%に笑みを浮かべながら話しかけてくる。
						PRINTFORMW 「今日はハロウィン、悪戯、楽しみにしてなさい」
					ELSEIF TALENT:恋慕
						PRINTFORMW 「トリック・オア・トリート！」
						PRINTFORMW 雷鼓はそう言いながら話しかけてきた。
						PRINTFORMW 「悪戯しちゃうぞ%UNICODE(0x2665) *1%」
						PRINTFORMW そしてこちらをチラチラ様子を窺っている。
						PRINTFORMW
					ELSEIF TALENT:思慕
						PRINTFORMW 「…トリック・オア・トリート！」
						PRINTFORMW 雷鼓は後ろから驚かすように呟いた。
						PRINTFORMW 「今日はハロウィンだね！」
						PRINTFORMW 今日のやけにテンションが高い、何があったのだろうか…
					ELSE
						PRINTFORMW 「トリック・オア・トリート！」
						PRINTFORMW 雷鼓はそう言って脅かしてきた。
						PRINTFORMW 「お菓子くれないと～悪戯しちゃうぞ～♪」
					ENDIF
				;クリスマス
				ELSEIF DAY:2 == 4 && DAY:3 == 25
					IF TALENT:恋人
						PRINTFORM 「メリークリスマス！
						CALL MASTER_CALLNAME_K96
						PRINTFORMW ！」
						PRINTFORMW 雷鼓は%CALLNAME:MASTER%に話しかけてくる。
						PRINTFORMW 「今日はクリスマスよ、何かご予定は？」
						PRINTFORMW そう言いながら予定を尋ねてきた。
					ELSEIF TALENT:恋慕
						PRINTFORM 「…今日はクリスマスね、
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓はそう言って話しかけてきた。
						PRINTFORMW 「貴方は今日何するの？」
					ELSEIF TALENT:思慕
						PRINTFORM 「あ…
						CALL MASTER_CALLNAME_K96
						PRINTFORMW 」
						PRINTFORMW 雷鼓はそう言いながら話しかけてきた。
						PRINTFORMW 「…今日はクリスマスだけど」
						PRINTFORMW 「何か予定とかあるの？」
					ELSE
						PRINTFORMW 「メリークリスマス！」
						PRINTFORMW 雷鼓はそう言って話しかけてきた。
						PRINTFORMW 「残念だけど私はサンタじゃないけどね」
					ENDIF
				ELSEIF CFLAG:318 == 1
					PRINTFORMW 「…あら、どうも」
					PRINTFORMW 怒った雷鼓はどこか他人行儀に話しかけてきた。
				ELSEIF TALENT:恋人
					PRINTFORM 「
					CALL MASTER_CALLNAME_K96
					PRINTFORMW 、元気？」
					PRINTFORMW 雷鼓は%CALLNAME:MASTER%に気づくと手を振って近寄ってきた。
					PRINTFORM 「ねえ、今日は
					CALL MASTER_CALLNAME_K96
					PRINTFORMW と過ごしたいな…♪」
				ELSEIF TALENT:恋慕
					PRINTFORM 「あ！
					CALL MASTER_CALLNAME_K96
					PRINTFORMW ！」
					PRINTFORMW 雷鼓は%CALLNAME:MASTER%に気づくと
					PRINTFORMW 「今日は暇かしら？私は暇なんだけど」
					PRINTFORMW そう言って手を振りながら近づいてきた。
				ELSEIF TALENT:思慕
					PRINTFORM 「
					CALL MASTER_CALLNAME_K96
					PRINTFORMW ～」
					PRINTFORMW 雷鼓は%CALLNAME:MASTER%に気づくと手を振って近づいてきた。
					PRINTFORMW 「相も変わらず暇そうね」
				ELSE
					PRINTFORM 「
					CALL MASTER_CALLNAME_K96
					PRINTFORMW 、元気にしてる？」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他キャラとデート中に遭遇した
		;ARG:1にデート相手
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 7
			;仕事中、今日会ってない。
			IF CFLAG:行動 == 5 && !TCVAR:96:今日会ったか && CFLAG:350 == 47
				PRINTFORM 「
				CALL MASTER_CALLNAME_K96
				PRINTFORMW ！盛り上がってるかしら♪」
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K96_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 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			IF TALENT:恋人
				PRINTFORMW 「…起きたの？」
				PRINTFORMW %CALLNAME:MASTER%が起きると、雷鼓は少し残念そうに呟いた。
				PRINTFORMW 「ふふ、寝顔、可愛かったわよ」
				PRINTFORMW 雷鼓はそういうと顔を近づけてくる。
				PRINTFORMW 「もう少しこのまま…」
				PRINTFORMW  二人は添い寝したまましばらく見つめあった。
			ELSEIF TALENT:恋慕
				PRINTFORMW 「…お早いお目覚めね…」
				PRINTFORMW %CALLNAME:MASTER%は何かしたのか問い詰めた。
				PRINTFORMW 「あーえっとね…」
				PRINTFORMW 「いや、いい寝顔だからほっぺたつねったりとか…」
				PRINTFORMW  しどろもどろに答える雷鼓は非常に可愛らしい。
			ENDIF
			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:恋人
			PRINTFORM 「う～ん、おはよう、
			CALL MASTER_CALLNAME_K96
			PRINTFORMW 」
			PRINTFORMW 雷鼓はそういうと上体を起こし、こちらを向いた。
			PRINTFORMW 「ねえ、今日は何する？」
			PRINTFORMW 雷鼓は妖艶な雰囲気を纏いながら問いかけてきた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…ん…おはよう…」
			PRINTFORMW 雷鼓は乱れた寝巻きを正しながら起き上がっている。
			PRINTFORMW 「…お花摘みに行って来るわ…」
			PRINTFORMW どこかで飲んでいたのだろうか、二日酔いに頭を抱えている。
			PRINTFORMW
		ELSEIF TALENT:思慕
			PRINTFORMW 「ん…」
			PRINTFORMW 朝の日差しを眩しそうに浴びながら背伸びをしている。
			PRINTFORMW 「朝…か…」
			PRINTFORMW 夢でも見ていたのか、名残惜しそうに布団からゆっくりと出てきた。
		ELSE
			PRINTFORMW 「…おはよう」
			PRINTFORMW 雷鼓は気だるげに挨拶をしてくる。
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;夜寝るとき（おやすみ口上）
;==================================================
@M_KOJO_EVENT_K96_3(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 「ありがとう…それじゃお言葉に甘えて退散するわ」
			PRINTFORMW 「それじゃ、また明日、元気でね」
			PRINTFORMW  そういうと少しふらつきながら雷鼓は自室へ帰って行った。
		ELSEIF TALENT:思慕
			PRINTFORMW 「もうそろそろお開きかしら？」
			PRINTFORMW 雷鼓は時計を見て確認してくる。
			PRINTFORMW 「ごめんなさい、名残惜しいんだけど…」
			PRINTFORMW 「今日はこれぐらいで…」
		ELSE
			PRINTFORMW 「う～んそれじゃ、おやすみなさい」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「ん…」
			PRINTFORMW 「ちょっと…眠くなってきたわね…」
			RETURN 1
		ELSEIF TALENT:恋慕
			PRINTFORMW 「ふぁぁ…」
			PRINTFORMW 「眠く…なっちゃった…」
		ELSEIF TALENT:思慕
			PRINTFORMW 「ん…駄目ね…」
			PRINTFORMW 「少し…眠いわ…」
		ELSE
			PRINTFORMW 「ふぁ…眠い…」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORMW 「ん…すぅ…」
			PRINTFORMW 「…%CALLNAME:MASTER%…」
			RETURN 1
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…くぅ…」
			PRINTFORMW 「…%CALLNAME:MASTER%…」
		ELSEIF TALENT:思慕
			PRINTFORMW 「…すぅ…ん…」
			PRINTFORMW 「くぅ…」
		ELSE
			PRINTFORMW 「くぅ…すぅ…」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;イタズラ中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内キャラがMAIN_MAPで衰弱状態になった場合か、お招き部屋で相手が衰弱した場合に発生
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF TALENT:恋人
			PRINTFORMW  「…ごめんなさい…疲れちゃった…」
			RETURN 1
		ELSEIF TALENT:恋慕
			PRINTFORMW  「はぁ…流石に疲れたわね…」
		ELSE
			PRINTFORMW  「う～ん…疲れた…」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		IF TALENT:恋人
			PRINTFORMW  「ちょ…ちょっと…！？」
			PRINTFORMW  「大丈夫！？…じゃないか…よっ…と」
			PRINTFORMW  そう言いながら%CALLNAME:MASTER%を抱きかかえると
			PRINTFORMW  「部屋どっちだっけ？」
			PRINTFORMW  %CALLNAME:MASTER%を所謂お姫様抱っこの姿勢で部屋まで送っていく雷鼓はどことなく嬉しそうだった。
			RETURN 1
		ELSEIF TALENT:恋慕
			PRINTFORMW  「大丈夫？」
			PRINTFORMW  そういうと肩を貸しながら雷鼓は立ち上がろうとする。
			PRINTFORMW  「よっと…部屋まで行く？」
			PRINTFORMW  そういうと二人で部屋まで行くことになった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで戻ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他キャラとのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;前のターンから一緒の部屋にいる状態で相手が寝る（お招き部屋含む（
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		SIF FLAG:70
			RETURN 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
		SIF FLAG:70
			RETURN 1
		IF TALENT:恋人
			PRINTFORMW 「あら、残念」
			PRINTFORMW 「浮気しちゃ駄目よ」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「むぅ…冷たいなぁ…」
			PRINTFORMW  そういうと雷鼓は%CALLNAME:MASTER%を見送った。
		ELSEIF TALENT:思慕
			PRINTFORM 「あ、
			CALL MASTER_CALLNAME_K96
			PRINTFORMW ！」
			PRINTFORMW 雷鼓はそういうと軽く手を振って来た。
		ELSE
			PRINTFORMW 雷鼓は会釈して去っていった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して通り過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		SIF FLAG:70
			RETURN 1
		PRINTFORM 雷鼓は%CALLNAME:MASTER%のことを
			IF TALENT:恋人
				PRINTFORM 残念そうに
			ELSEIF TALENT:恋慕
				PRINTFORM ぼうっと
			ELSEIF GETBIT(CFLAG:1,0)
				PRINTFORM チラッと
			ENDIF
				PRINTFORMW 見てくる。
		RETURN 1
		RETURN 1
	ENDIF
	;その他
	PRINTFORMW
ENDIF
RETURN 1

;==================================================
;他者介入でムード変化
;==================================================
@M_KOJO_EVENT_K96_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 「ん…残念ね…」
		PRINTFORMW 雷鼓はゆっくりと体を離した。
		PRINTFORMW 「…続き、する？」
		PRINTFORMW そういって雷鼓は行為の続きを求めてきた。
ENDIF
RETURN 1

;==================================================
;情事を目撃した
;==================================================
@M_KOJO_EVENT_K96_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 「あ…お邪魔…みたいね…」
			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 「私も混ぜてもらおうかしら…」
			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:1 == 3
		IF TALENT:恋人
			PRINTFORMW 「…あーそれじゃあごゆっくりどうぞ」
			PRINTFORMW 雷鼓は気まずそうに肩を落として去っていった。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「ん！？」
			PRINTFORMW 「…お邪魔だったかしら？」
			PRINTFORMW 雷鼓はそう言いながら気まずそうに去っていった。
		ELSEIF TALENT:思慕
			PRINTFORMW 「………」
			PRINTFORMW 雷鼓は情事を目撃すると黙って去っていった。
		ELSE
			PRINTFORMW 「あら？」
			PRINTFORMW 雷鼓は少し驚いた様子で去っていった。
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;情事を見られた
;==================================================
@M_KOJO_EVENT_K96_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 「どうしよっか？」
			PRINTFORMW 雷鼓はそう言いながらしなだれかかって来た。
			RETURN 1
		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:1 == 2
		IF TALENT:恋人
			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:1 == 3
		IF TALENT:恋人
			PRINTFORMW 「…これは…」
			PRINTFORMW 「まぁいいかな、バレたって」
			PRINTFORMW 雷鼓はそう言いながらしなだれかかって来た。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「あーあ」
			PRINTFORMW 「でもこれで…」
			PRINTFORMW 雷鼓は怪しい笑みを浮かべている。
		ELSEIF TALENT:思慕
			PRINTFORMW 「…どうしようもないわね、これ」
			PRINTFORMW 雷鼓はそう言って項垂れた。
		ELSE
			PRINTFORMW 「…結構まずいかも…」
			PRINTFORMW 雷鼓は情事を見られて動揺している。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERに誘われて目撃者も参加
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		IF TALENT:恋人
			PRINTFORMW 「…お盛んなのは結構だけど」
			PRINTFORMW 「そういうの、嫉妬しちゃうな」
			PRINTFORMW 雷鼓はそう言いながらしなだれかかって来た。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「まぁいいけど」
			PRINTFORMW 「こういうの、好きじゃないな」
			PRINTFORMW 雷鼓はすこしピリピリした様子でそう言った。
		ELSEIF TALENT:思慕
			PRINTFORMW 「…私だけじゃ不満？」
			PRINTFORMW 雷鼓はそう言って頬を膨らませた。
		ELSE
			PRINTFORMW 「…別にいいけど」
			PRINTFORMW 雷鼓はそう言って頬を膨らませた。
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;目撃した情事を問い詰める（現在無し
;==================================================
@M_KOJO_EVENT_K96_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 「…いけないわね、こういうの」
			PRINTFORM 「浮気は良くないわね、
			CALL MASTER_CALLNAME_K96
			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:1 == 2
		IF TALENT:恋人
			PRINTFORMW 「…あのねぇ」
			PRINTFORMW 「百歩譲って浮気はいいにしろ人に見つかる所でしたら駄目でしょ」
			PRINTFORM 「ねぇ、聞いてる？
			CALL MASTER_CALLNAME_K96
			PRINTFORMW ！」
			PRINTFORMW 雷鼓はそう言いながら空気を帯電させている。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「まぁどこで盛ってようがいいんだけど」
			PRINTFORMW 「二人とももう少し場所選びなさいな」
			PRINTFORMW 雷鼓はそう言って問い詰めてきた。
		ELSEIF TALENT:思慕
			PRINTFORMW 「何でこんな所で…二人共ねぇ…」
			PRINTFORMW 雷鼓はそう言って説教を始めた。
		ELSE
			PRINTFORMW 「…いや、場所ぐらいはさぁ…」
			PRINTFORMW 雷鼓はそう言って説教を始めた。
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORMW
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF RAND:2 == 0
			PRINTFORMW 「ねえねえ」
			PRINTFORMW 雷鼓は突然悪戯っぽく笑みを浮かべながら
			PRINTFORMW 「これな～んだ？」
			PRINTFORMW そういうと雷鼓はパンツの両端に人差し指を通しながら蒐集品を見せびらかしてくる。
			PRINTFORMW 何も言わずに沈黙を保っていると雷鼓はパンツに手をかざして何かしている。
			PRINTFORMW 「何してるのって？ちょっと魔力与えて自分で持ち主の所に帰ってもらうのよ」
			PRINTFORMW 「…そんなに下着が欲しいなら言ってくれればあげるわよ？」
			PRINTFORMW  雷鼓は少し呆れながらそんなことを言った。
			PRINTFORMW  そしてこの行為が幻想郷パンツ異変に繋がる事を
		ELSE
			PRINTFORMW 「ん？ちょっと…」
			PRINTFORMW 歩きながら雷鼓が呼び止めてくる。
			PRINTFORMW いきなり体中を弄るとスルリと下着を取り出し―――
			PRINTFORMW 「なぁに？これ？」
			PRINTFORMW 悪戯っぽく微笑を浮かべながら摘み上げた下着を見せびらかしてくる。
			PRINTFORMW 「お姉さん信じてたんだけどなぁこんなことする人じゃないって」
			PRINTFORMW 「まあいいわ、見逃したげる、返してあげないけどね」
			PRINTFORMW なんとか助かったようだ…帯電している空気を除けば、だが。
		ENDIF
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;うふふ==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを押し倒した（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			IF TALENT:恋人
				PRINTFORMW 「えいっ！」
				PRINTFORMW 突然雷鼓が押し倒してきた。
				PRINTFORMW 「ねぇ…ダメ…かしら…？」
				PRINTFORMW そういうと雷鼓は唇を奪いながらシャツとネクタイを緩めている。
				PRINTFORMW 豊満な胸を露出させながら雷鼓は言う。
				PRINTFORMW 「お願い、もう我慢できないの…」
			ELSEIF TALENT:恋慕
				PRINTFORM 「
				CALL MASTER_CALLNAME_K96
				PRINTFORMW 、ちょっとこっち来て」
				PRINTFORMW 雷鼓が呼び止めてくると
				PRINTFORMW 「ねえ、目を瞑ってくれる？」
				PRINTFORMW 言われたとおりに目を瞑ると
				PRINTFORMW 雷鼓は優しく押し倒してきた。
				PRINTFORMW 「ごめんなさい、嫌らしい女だって思われるかもしれないけど^―――」
				PRINTFORMW 「我慢できないの…」
				PRINTFORMW そうして雷鼓は妖艶にしなだれかかって来た―――
			ELSE
				PRINTFORMW 「…」
				PRINTFORMW 押し黙っていた雷鼓は近づいてくるとしなだれかかって来た。
				PRINTFORMW 「ねえ、このまま…」
				PRINTFORMW 雷鼓は恥ずかしそうに行為へ及びたい旨を呟いた。
				PRINTFORMW 「一緒になりましょ？」
				PRINTFORMW ここまでされると断りづらく、いいよと許可をする。
				PRINTFORMW 「うん、じゃあ…」
				PRINTFORMW 雷鼓はキスをしながら押し倒してきた…
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	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 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF TALENT:恋人
				PRINTFORMW 「もう終わり？」
				PRINTFORMW 雷鼓は不満そうに、したりないという表情をしている。
				PRINTFORMW 「でも、貴方が言うのなら仕方ないわね…」
				PRINTFORMW  しぶしぶと雷鼓はその身を引いた。
			ELSEIF TALENT:恋慕
				PRINTFORMW  「ん…今日はこのぐらいで終わりにする？」
				PRINTFORMW こちらの疲れを感じ取ったのか名残惜しそうにその身を引く。
				PRINTFORMW  「ん…じゃあ終わりのキス頂戴」
				PRINTFORMW 甘えてくる雷鼓にキスをやると満足したように離れていく。
				PRINTFORMW 「次は…こんなものじゃすまないわよ？」
				PRINTFORMW  雷鼓は悪戯っぽく笑うと少し名残惜しそうな表情に変わった。
			ELSE
				PRINTFORMW  「？コレで終わり？」
				PRINTFORMW 「う～ん…いいわよ…」
				PRINTFORMW  雷鼓は言われたとおりに身を引いた。
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;抜け出す失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;好きにして状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;浴場で遭遇
;==================================================
@M_KOJO_EVENT_K96_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 雷鼓はそう言って追い出してきた。
		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 雷鼓はそう言って入浴を許可してきた。
		ELSEIF TALENT:思慕
			PRINTFORMW 「あら、入りたいの、見てもつまらないわよ」
			PRINTFORMW 雷鼓はそう言って入浴を許可してきた。
		ELSE
			PRINTFORMW 「…変なことしないでよ」
			PRINTFORMW 雷鼓はそう言って入浴を許可してきた。
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORMW
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（怒り）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:318 == 1
			PRINTFORMW 「…出てってよ！」
			PRINTFORMW 雷鼓は驚きながら怒鳴りつけてきた。
		ELSEIF TALENT:恋人
			PRINTFORMW 「…出てって…」
			PRINTFORMW 「…私今怒っているのよ」
			PRINTFORM 「だから…出てってよ…
			CALL MASTER_CALLNAME_K96
			PRINTFORMW ！」
			PRINTFORMW 雷鼓はそう言いながら空気を帯電させている。
		ELSEIF TALENT:恋人
			PRINTFORMW 「…出てって…」
			PRINTFORMW 「…私今怒っているのよ」
			PRINTFORMW 「だから…出てってよ…%CALLNAME:MASTER%！」
			PRINTFORMW 雷鼓はそう言いながら空気を帯電させている。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…出てってよ…」
			PRINTFORMW 雷鼓はそう言って追い出してきた。
		ELSEIF TALENT:思慕
			PRINTFORMW 「馬鹿…出てってよ」
			PRINTFORMW 雷鼓はそう言って追い出した。
		ELSE
			PRINTFORMW 「…いや、出てってよ…」
			PRINTFORMW 雷鼓はそう言って追い出した。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORMW 「…あら？どうしたの？」
			PRINTFORM 「何したい？
			CALL MASTER_CALLNAME_K96
			PRINTFORMW 」
			PRINTFORMW 雷鼓はそう言いながら来客者を招いた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「どうしたの？」
			PRINTFORM 「
			CALL MASTER_CALLNAME_K96
			PRINTFORMW 、入ってきてもいいわよ？」
			PRINTFORMW 雷鼓はそう言って来客者を招いた。
		ELSEIF TALENT:思慕
			PRINTFORM 「あら、
			CALL MASTER_CALLNAME_K96
			PRINTFORMW 、どうしたの？」
			PRINTFORMW 雷鼓はそう言って来客者を招いた。
		ELSE
			PRINTFORM 「…
			CALL MASTER_CALLNAME_K96
			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 「ごめんなさい、今疲れてるのよ」
			PRINTFORMW 雷鼓はそう言って来客者を招いた。
		ELSEIF TALENT:思慕
			PRINTFORMW 「………何？」
			PRINTFORMW 雷鼓はそう言って来客者を招いた。
		ELSE
			PRINTFORM 「…
			CALL MASTER_CALLNAME_K96
			PRINTFORMW ？」
			PRINTFORMW 雷鼓は心底疲弊した様子で侵入者を確認した。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		IF TALENT:恋人
			PRINTFORMW 「…出てって…」
			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 == 5
		IF TALENT:恋人
			PRINTFORMW 「…あ…ごめんね」
			PRINTFORMW 「今、疲れてるのよ…」
			PRINTFORMW 雷鼓はそう言いながら侵入者を追い出した。
		ELSEIF TALENT:恋慕
			PRINTFORM 「…
			CALL MASTER_CALLNAME_K96
			PRINTFORMW ？…」
			PRINTFORMW 「ごめんなさい、今疲れてるのよ」
			PRINTFORMW 雷鼓はそう言って侵入者を追い出した。
		ELSEIF TALENT:思慕
			PRINTFORMW 「………」
			PRINTFORMW 雷鼓は無言で部屋から追い出した。
		ELSE
			PRINTFORM 「…
			CALL MASTER_CALLNAME_K96
			PRINTFORMW ？」
			PRINTFORMW 雷鼓は心底疲弊した様子で侵入者を追い出した。
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORMW
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;仕事開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:350 == 47
			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 CFLAG:350 == 47
			IF RAND:3 == 0
				PRINTFORMW  「♪～♪～♪～」
				PRINTFORMW  雷鼓はドラムをかき鳴らしている
			ELSEIF RAND:2 == 0
				PRINTFORMW  「まだまだライブは続くわよ♪」
			ELSE
				PRINTFORMW  「私のビートを聴けぇ！」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
 	;-------------------------------------------------
 	;仕事終了
 	;記入チェック（=0, 非表示、1, 表示）
 	LOCAL:1 = 1
 	;-------------------------------------------------
 	IF LOCAL:1 && ARG == 3
 		IF CFLAG:350 == 47
 			IF RAND:3 == 0
 				PRINTFORMW  「今日もいい演奏だったわ！」
 			ELSEIF RAND:2 == 0
 				PRINTFORMW  「結構盛り上がったわね」
 			ELSE
 				PRINTFORMW  「どう？楽しんでくれた？」
 			ENDIF
 		ENDIF
 		RETURN 1
 	ENDIF
 	;その他
 	PRINTFORMW
 ENDIF
 RETURN 1

 ;==================================================
 ;食事系
 ;==================================================
 @M_KOJO_EVENT_K96_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 雷鼓はそう言いながら持っていたものを食べてしまった。
 		ELSEIF TALENT:恋慕
 			PRINTFORMW 「あ…美味しそうなもの持ってる」
 			PRINTFORMW 「一つ頂戴」
 			PRINTFORMW 雷鼓はそう言って持っていたものを食べてしまった。
 		ELSEIF TALENT:思慕
 			PRINTFORMW 「あら、美味しそう、下さいな」
 			PRINTFORMW 雷鼓はそう言って持っていたものを食べてしまった。
 		ELSE
 			PRINTFORMW 「…美味しそうなもの持っているわね」
 			PRINTFORMW 雷鼓はそう言って持っていたものを食べてしまった。
 		ENDIF
 		RETURN 1
 	ENDIF
 	;その他
 	PRINTFORMW
 ENDIF
 RETURN 1

 ;==================================================
 ;MASTERが押し倒した
 ;==================================================
 @M_KOJO_EVENT_K96_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 止まった時間の中で雷鼓をそのままにしておきながら%CALLNAME:MASTER%は帰ろうとする。
 			PRINTFORMW 次は何をしてやろうか―――
 			PRINTFORMW  そんなことを考えながらその場を離れていった…
 		ELSEIF PALAM:欲情 >= PALAMLV:15
 			PRINTFORMW
 			PRINTFORMW 「ん…あっ…あっ…」
 			PRINTFORMW 雷鼓は力尽きたようにぐったりとしながら呼吸していた。
 			PRINTFORMW 汗が胸元に垂れる度にこちらも扇情的な気分になる。
 			PRINTFORMW  流石にこれ以上は辛いだろうが―――
 			PRINTFORMW  次はもっと激しくしてやろうか…などと%CALLNAME:MASTER%は考えていた。
 		ELSEIF TALENT:恋人
 			IF PALAM:欲情 >= PALAMLV:10
 				PRINTFORMW
 				PRINTFORMW 「あ…ま、まだ…大丈夫…よ？」
 				PRINTFORMW 雷鼓は強がりながらそういった。
 				PRINTFORMW 「ん…もう、いけず…」
 				PRINTFORMW  一度キスして離れると雷鼓はぐったりとしている。
 				RETURN 1
 			ELSE
 				PRINTFORMW 「コレで終わり？」
 				PRINTFORMW 終わりを告げると不承不承といった風に身を引いていく。
 				PRINTFORMW 「いいわ、その代わり次はもっと…」
 				PRINTFORMW  言いかけた唇を奪うとそれっきり黙ってしまった。
 				RETURN 1
 			ENDIF
 		ELSEIF TALENT:恋慕
 			IF PALAM:欲情 >= PALAMLV:10
 				PRINTFORMW
 				PRINTFORMW 「ああっ…もうダメ…疲れた…」
 				PRINTFORMW 雷鼓は流石に体力の限界からか上気させた顔を震わせてそう言った。
 				PRINTFORMW じゃあ次の機会に、っとこちらが立つと
 				PRINTFORMW 「もう少し…側に居て…」
 				PRINTFORMW  雷鼓はそれでも名残惜しそうにこちらの腕を掴んできた。
 			ELSE
 				PRINTFORMW 「？」
 				PRINTFORMW 「今日はもう終わり？」
 				PRINTFORMW 「…別にいいんだけど…」
 				PRINTFORMW  雷鼓はそういいつつも離れたくないのか身を寄せてきた。
 			ENDIF
 		ELSEIF TALENT:思慕
 			IF PALAM:欲情 >= PALAMLV:10
 				PRINTFORMW
 				PRINTFORMW 「ん…ああ…これでお開きにしましょう…」
 				PRINTFORMW 雷鼓は上気させた顔を覗かせながら懇願してくる。
 				PRINTFORMW 「ありがと、次は頑張るから…」
 				PRINTFORMW  雷鼓はそういって倒れ伏せてしまった。
 			ELSE
 				PRINTFORMW 「ん…これで終わり？」
 				PRINTFORMW 「もう少しだけ…いや、やっぱりいいわ…」
 				PRINTFORMW  雷鼓は少し残念そうに身を引いていった。
 			ENDIF
		ELSE
			IF PALAM:欲情 >= PALAMLV:10
				PRINTFORMW
				PRINTFORMW 「ん…あ…はぁ…終わり？」
			ELSE
				PRINTFORMW 「ようやく終わり？」
				PRINTFORMW  雷鼓はどこか不服そうにそう言った。
			ENDIF
		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_K96_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  毛布をかけてやると雷鼓は一度寝返りを打った。
		ENDIF
		ELSE
			IF CFLAG:318 == 1
				PRINTFORMW 「………」
				PRINTFORMW 雷鼓は不機嫌そうに瞼をこすっている。
			ELSEIF TALENT:恋人
				PRINTFORMW 「ん…う～ん…」
				PRINTFORMW 雷鼓は寝ぼけ眼で上体を起こしながら背伸びをする。
				PRINTFORM 「ねえ、
				CALL MASTER_CALLNAME_K96
				PRINTFORMW 、これから何しよっか？」
				PRINTFORMW とっくに起きていたことに気づいた様子で話しかけてくる。
				PRINTFORMW 「あんまり人の寝顔をじろじろ見るのってよくないわよ？」
				PRINTFORMW 「…変な顔してなかった？」
				PRINTFORMW 幸せそうな顔をしていた、と伝えると恥ずかしそうに俯いてしまった。
				RETURN 1
			ELSEIF TALENT:恋慕
				PRINTFORMW 「もしも～し、そろそろ起きる時間ですよ～」
				PRINTFORMW 雷鼓が体を揺さぶってくる。
				PRINTFORMW 「起きないとキスしちゃうぞ？」
				PRINTFORMW  そう言いつつも恥ずかしがっているのか頬を突いて来るだけだった。
			ELSE
				PRINTFORMW
			ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;時止め終了時
;==================================================
@M_KOJO_EVENT_K96_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 「あ…な、何でもないから…本当に…」
			PRINTFORMW  （い、いきなりなんだったの…？）
		ELSE
			PRINTFORMW
			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 「な、何でもない…から…大丈夫よ、平気平気…」
			PRINTFORMW  気丈に心配させまいと必死な雷鼓はいつもより愛らしかった。
		ELSE
			PRINTFORMW
			PRINTFORMW 「…ん！？」
			PRINTFORMW 「え…ちょっと！？」
			PRINTFORMW  突然快楽を叩き込まれた雷鼓はうずくまると混乱しながらこちらを見ている。
			PRINTFORMW 「ちょ、ちょっと見ないで…」
			PRINTFORMW  痴態を見られまいと抵抗するも快楽には逆らえないようだ。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;パンツ紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		PRINTFORMW 「？」
		PRINTFORMW どうも下着を盗ったため違和感を覚えたようだ。
		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 「ん…げほっ……今の…」
				PRINTFORMW  雷鼓は不快そうな顔をしながらようやく精液を飲み下した。
			ELSE
				PRINTFORMW
				PRINTFORMW 「…！？」
				PRINTFORMW 雷鼓は突然口を押さえ体を震わせながら崩れ落ちた。
				PRINTFORMW  「うぇ…え…げほ…ん…」
				PRINTFORMW 流し込まれたザーメンを飲み下すと体を震わせながらゆっくりと立つ。
				PRINTFORMW  「これ…うぇ…」
				PRINTFORMW 雷鼓は喉奥から逆流してくる吐き気とアルカリ性の苦味に堪えながらぽろぽろと涙を流している。
				PRINTFORMW 「嫌…もう…」
			ENDIF
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
			PRINTFORMW
			PRINTFORMW 「！？」
			PRINTFORMW 「げほっうぇ…」
			PRINTFORMW 雷鼓は突然口内に現れたザーメンの臭いと苦味に顔をしかめ咳き込んだ。
			PRINTFORMW そしてザーメンを口から吐き出すとごめんなさい、ごめんなさいとこちらに向かって謝っている。
			PRINTFORMW  大丈夫か？っと問いかけると平気だと返事をする。
			PRINTFORMW  その様子を%CALLNAME:MASTER%はニマニマと見つめていた。
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
			PRINTFORMW
			PRINTFORMW 「！？！？」
			PRINTFORMW 「ん…ぐふ…」
			PRINTFORMW 雷鼓は涙目になりながら口を押さえている…
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
			PRINTFORMW
			PRINTFORMW 「…！？」
			PRINTFORMW 雷鼓は突然口の中に流し込まれたザーメンを飲み下すと不思議そうな顔を浮かべている。
			PRINTFORMW 「…ん…ごくっ…」
			PRINTFORMW 「…今の…？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;無知持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
			PRINTFORMW
			PRINTFORMW 「！？」
			PRINTFORMW 雷鼓は顔にかけられたザーメンに怪訝な顔をするとふき取ろうとしている。
			PRINTFORMW 「な、なんでいきなりこんなの…」
			PRINTFORMW 取り出したハンカチのほうも精液まみれになってしまい雷鼓は複雑な表情を浮かべている。
		ELSEIF ARG:1 == 2
			PRINTFORMW
			PRINTFORMW 「…？」
			PRINTFORMW 雷鼓は今までにない不快感を顔に浴びながら困惑している。
			PRINTFORMW 「…これ…何よ…」
			PRINTFORMW 「…変なにおい…汚いわね…」
			PRINTFORMW  ザーメンを拭い取りながら雷鼓は不快そうな表情を浮かべている。
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
			PRINTFORMW
			PRINTFORMW 「…！？」
			PRINTFORMW 「ちょっとこれ…」
			PRINTFORMW 雷鼓は困惑しながらも素手で子種をふき取りしばらくそれを見つめていた。
			PRINTFORMW  それから濡れそぼった指を口元に近づけ―――
			PRINTFORMW 「れろ…ちゅ…」
			PRINTFORMW 艶かしく自分の指を綺麗にしている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
			IF EXP:精液経験 == 0
				PRINTFORMW
				PRINTFORMW 「…ちょっとこれ…」
				PRINTFORMW 「…気持ち悪い…」
				PRINTFORMW  雷鼓は手に付いた子種をふき取って綺麗にした。
			ELSE
				PRINTFORMW
				PRINTFORMW 「…いつのまにこんなの…」
				PRINTFORMW 「気持ち悪いわね…」
				PRINTFORMW  雷鼓は手に付いた精液をふき取って綺麗にした。
			ENDIF
		;舐めとり
		ELSEIF ARG:1 == 2
			PRINTFORMW
			PRINTFORMW 「………？」
			PRINTFORMW 雷鼓は手に付いた精液を不思議そうに眺め、
			PRINTFORMW 「れろ…ちゅ…ん…」
			PRINTFORMW 雷鼓は妖艶に指に纏わり付く精液を舐め取っている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚アナル射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
			IF EXP:精液経験 == 0
				PRINTFORMW
				PRINTFORMW 「…っ！？んあっ！？」
				PRINTFORMW 雷鼓は突然お尻を押さえて飛び上がった。
				PRINTFORMW 「…な…今の…」
				PRINTFORMW  唐突な出来事に困惑が大きいようだ。
			ELSE
				PRINTFORMW
				PRINTFORMW 「やだ！？」
				PRINTFORMW 雷鼓はお尻を押さえながら膝から崩れ落ちる。
				PRINTFORMW 「な、なによ…これ…ん…」
				PRINTFORMW  呻き声を上げつつ尻を突き出す格好になっている。
			ENDIF
		;ソレ以外
		ELSEIF ARG:1 == 2
			IF EXP:精液経験 == 0
				PRINTFORMW
				PRINTFORMW 「…ひっ！？」
				PRINTFORMW 「何！？な…」
				PRINTFORMW 雷鼓は唐突な精液の感覚に戸惑っている。
			ELSE
				PRINTFORMW
				PRINTFORMW 「！！？？！？！」
				PRINTFORMW 「な、何！？今の！？」
				PRINTFORMW 雷鼓は突然現れたアナルの精液に困惑している。
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		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 雷鼓は急に焦りだし懐を弄っている。
			PRINTFORMW 大丈夫か、と尋ねると
			PRINTFORMW 「だ、大丈夫よ…何でも…なんでもないから…」
			PRINTFORMW 両手を振り回してなんでもないという風に装っている。
		;非処女膣内射精ピルあり
		ELSEIF ARG:1 == 2
			PRINTFORMW
			PRINTFORMW 「…え…！？」
			PRINTFORMW 「やだ…なんでよ…」
			PRINTFORMW 「…飲んでるし…大丈夫か…」
			PRINTFORMW  雷鼓はピルを飲んでいることを思い出し胸をなでおろした。
		;処女膣内射精
		ELSEIF ARG:1 == 3
			PRINTFORMW
			PRINTFORMW 「や…！？」
			PRINTFORMW 「なに…これ…」
			PRINTFORMW  雷鼓は下腹部の違和感に顔をしかめている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K96_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORML 「ん～？生でしたいの？」
			PRINTFORML 「だ～め♪」
			PRINTFORML 断られてしまった。
			PRINTFORMW 「今日は…ね？お願い」
			RETURN 1
		ELSEIF TALENT:恋慕
			PRINTFORML 「…生で？」
			PRINTFORML 「え～っと…ダメ…かな…」
			PRINTFORMW 「まだ早いって言うか…その…覚悟が…ね…」
		ELSE
			PRINTFORML 「生でしたい…って？」
			PRINTFORML 「ダメよ、外に出すなりゴム着けるなりして」
			PRINTFORML 「…気持ちよくたってダメよ」
			PRINTFORMW 「ちゃ～んと避妊しなさい」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORML 「え～とね」
			PRINTFORML 「だめよ」
			PRINTFORML やはり断られてしまった。
			PRINTFORMW 「もう…心の準備できてないんだから…」
			RETURN 1
		ELSEIF TALENT:恋慕
			PRINTFORML 「…だから…ダメっていってるじゃない…」
			PRINTFORML 「もう、話聞いてよ…」
		ELSE
			PRINTFORML 「だから生はダメっていってるじゃない」
			PRINTFORML 「ダメったらダメよ…」
			PRINTFORMW 「ちゃんと避妊しなさい！」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
			PRINTFORML 「…」
			PRINTFORML 雷鼓は怒ってそっぽを向いてしまった…
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF TALENT:恋人
			PRINTFORML 「いいわよ」
			PRINTFORML 「生でしたいんでしょ？」
			PRINTFORML お許しが出たようだ。
			PRINTFORMW 「…ちゃんと…気持ちよくしてよ？」
			RETURN 1
		ELSEIF TALENT:恋慕
			PRINTFORML 「生でしたい？」
			PRINTFORML 「いいけど…任せるわ…」
		ELSE
			PRINTFORML 「ゴム着けてくれないの？」
			PRINTFORML 「いいけど、万が一の時は責任取ってね？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF TALENT:恋人
			PRINTFORML 「生でしたいって…いいけど…」
			PRINTFORML 「責任…取ってよね…」
			PRINTFORMW 「貴方となら…一緒に…」
			RETURN 1
		ELSEIF TALENT:恋慕
			PRINTFORML 「いいけど…今日危ないわよ？」
			PRINTFORML 「…責任とってもらうからね？」
		ELSE
			PRINTFORML 「…別にいいけど」
			PRINTFORML 「ちゃんと責任とってね？」
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K96_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 雷鼓はそういうとくるりと振り返り―――
		PRINTFORM 「これからも、よろしくね、
		CALL MASTER_CALLNAME_K96
		PRINTFORMW 」
		PRINTFORMW 笑みを浮かべながらそういった。
		PRINTFORMW 「ふふ、人間ってこんな感じなのかなぁ」
		PRINTFORMW こうして期待半分不安半分の新生活が始まることになった。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		PRINTFORMW 「…むぅ…ケチ…」
		PRINTFORMW 雷鼓はぶつくさと文句を言いながら帰路に着く。
		PRINTFORMW 「まぁ今度はぎゃふんと言わせてやるわよ、ぎゃふんと」
		PRINTFORMW 何をするつもりだろうか…手荒な真似はよしてほしい。
		PRINTFORMW  「貴方がそういうのなら…分かったわよ…」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K96_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:恋人
			PRINTFORM 「それじゃあね、
			CALL MASTER_CALLNAME_K96
			PRINTFORMW 」
			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 == 2
		IF CFLAG:318 == 1
			PRINTFORMW 「…じゃあね…」
			PRINTFORMW 雷鼓は不機嫌そうに分かれていった。
		ELSEIF TALENT:恋人 && CFLAG:1400 == 1 && CFLAG:1401 == 0
			PRINTFORM 「ねえ
			CALL MASTER_CALLNAME_K96
			PRINTFORMW 、一つお願いがあるんだけど…」
			PRINTFORMW 雷鼓は帰宅途中で%CALLNAME:MASTER%の顔をまじまじと見つめながらそうつぶやいた。
			PRINTFORM 「あのね、その…
			CALL MASTER_CALLNAME_K96
			PRINTFORMW のことなんだけど…」
			PRINTFORMW 「%CALLNAME:MASTER%って呼んじゃ…駄目…？」
			PRINTFORMW 「いや、その、せっかく恋人同士だしね、いつまでも他人行儀じゃその…」
			PRINTFORMW 「駄目…かな…？」
			$INPUT_LOOP3
			PRINTL [0]いいよ
			PRINTL [1]君付けのままで
			INPUT
			SELECTCASE RESULT
				CASE 0
					CFLAG:1400 = 0
					PRINTFORMW 「ありがとう、そして」
					PRINTFORMW 「これからもよろしくね、
					CALL MASTER_CALLNAME_K96
					PRINTFORMW ！」
					PRINTFORMW 雷鼓は満面の笑みでそう言った。
					CFLAG:1401 = 1
				CASE 1
					PRINTFORMW 「分かったわ…」
					PRINTFORM 「それじゃあね、
					CALL MASTER_CALLNAME_K96
					PRINTFORMW 」
					PRINTFORMW 雷鼓は少し残念そうに俯いた。
					CFLAG:1401 = 1
			CASEELSE
			GOTO INPUT_LOOP3
			ENDSELECT
		ELSEIF TALENT:恋人
			PRINTFORM 「それじゃあね、
			CALL MASTER_CALLNAME_K96
			PRINTFORMW 」
			PRINTFORMW 「浮気しちゃ駄目よ」
			PRINTFORMW 雷鼓はそう言って帰宅していった。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「それじゃあね、またデートしましょ」
			PRINTFORMW 雷鼓はそう言って帰宅していった。
		ELSEIF TALENT:思慕
			PRINTFORMW 「さようなら、続きはまた今度ね」
			PRINTFORMW 雷鼓はそう言って帰宅していった。
		ELSE
			PRINTFORM 「それじゃあね、
			CALL MASTER_CALLNAME_K96
			PRINTFORMW 」
			PRINTFORMW 雷鼓はそう言って帰宅していった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K96_21(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  「………」
		PRINTFORMW  何なのだろうか、この胸の中の熱い気持ちは…
		PRINTFORMW  そう考えて考えることで分からないということにしておきたかった。
		PRINTFORMW  そうすれば少なくとも理解できないということで納得し、動悸も治まっていた。
		PRINTFORMW  しかし、最近はそうもいかない。
		PRINTFORMW  「なんなんだろう…」
		PRINTFORMW  そう自問しても答えは既に出ている。
		PRINTFORMW  好きなのだ、あの人が。
		PRINTFORMW  「%CALLNAME:MASTER%…」
		PRINTFORMW  結局のところ自分はどうしたいのか、それが分かると雷鼓は一度寝ることにした。
		PRINTFORMW  「私を…おかしくしたんだから…」
		PRINTFORMW  「お返しもいっぱいもらわないと…ね…」
		PRINTFORMW  横になり、まどろみの中に落ちていく中、目蓋の裏には一人の人間の顔が映っていた…
		PRINTFORMW  「…好きよ…」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		PRINTFORMW  「…」
		PRINTFORMW  空を見上げる視線は力なく、雷鼓は物思いに耽っていた。
		PRINTFORMW  「何なのかしら…この感じ…」
		PRINTFORMW  付喪神になって初めての感情。
		PRINTFORMW  どうなっているのだろうか、私の体は。
		PRINTFORMW  いっそのことただの和太鼓だったらこんなに悩まなくても済んだのだろう。
		PRINTFORMW  あの人にであって…自分の鼓動のリズムすらよく分からなくなってしまった。
		PRINTFORMW  「…%CALLNAME:MASTER%…は…」
		PRINTFORMW  わたしのことをどう思っているのだろうか。
		PRINTFORMW  その感情は彼女の中で芽生えたばかりで―――
		PRINTFORMW  ―――育つにはもう少し時間が掛かりそうだ。

		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		PRINTFORMW  雷鼓は床にへたり込みながら受けとめた情欲を思い出していた。
		PRINTFORMW  「%CALLNAME:MASTER%…」
		PRINTFORMW  愛しい相手を思いつつも自身の体の火照りをどこか恥ずかしく感じている。
		PRINTFORMW  「ん…ああ…」
		PRINTFORMW  自身の乳首を弄くりながら行為を思い出している。
		PRINTFORMW  「あっ…ここ…ん…」
		PRINTFORMW  慣れない事をやっているとどうも自分ではうまくできないことに気づく
		PRINTFORMW  「…あの人なら…もっとうまくやってくれるのかしら…」
		PRINTFORMW  その独白はいつの間にか嬌声に埋もれていった…
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF !TALENT:恋慕
			PRINTFORMW
			PRINTFORMW  「ん…きょうも…いっぱいシちゃった…」
			PRINTFORMW  雷鼓は疲れた様子で横になる。
			PRINTFORMW  「…明日は何するのかなぁ…」
			PRINTFORMW  疲労に対して覚めやらぬ情欲はその想いを強くしていく。
			PRINTFORMW  「ん…もっと…次は…」
			RETURN 1
		ELSE
			PRINTFORMW
			PRINTFORMW  「もうだめ…」
			PRINTFORMW  疲れきった雷鼓はぐったりと身を横たえる。
			PRINTFORMW  「いっぱい…されちゃった…」
			PRINTFORMW  幸せそうな、それでいて悲しそうな顔をしながら雷鼓は
			PRINTFORMW  「もっと…もっと愛してもらえば…」
			PRINTFORMW  そう独白しながらまどろみの中に落ちていった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;セフレ取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		PRINTFORMW 「ん…もう…」
		PRINTFORMW 雷鼓は行為の熱情が体から抜けきっていないようだ。
		PRINTFORMW 「どうしてこんな…」
		PRINTFORMW 悶々とした情欲をどうやって解消するか、考えつつも抑えきれいてない。
		PRINTFORMW 「…」
		PRINTFORMW あの人はどう思っているのだろうか、そんなことを考えながら一つの考えに到達する。
		PRINTFORMW 「まあいいや…考えてもどうにもならないわ…」
		PRINTFORMW 気分を切り替えながら雷鼓は床に付く。
		PRINTFORMW  「気持ちよくしてさえくれば…」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K96_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 「ん…く…%CALLNAME:MASTER%…」
		PRINTFORMW 「あっ…くっ…」
	ELSEIF TALENT:恋慕
		PRINTFORMW 「あ…ん…」
	ELSEIF TALENT:思慕
		PRINTFORMW 「んあ…っく…」
	ELSE
		PRINTFORMW 「あっあっ…ふぅ…」
	ENDIF
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K96_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 「…やめなさい…」
			PRINTFORMW 雷鼓は不機嫌そうにバチバチと帯電させている。
		ELSEIF TALENT:恋人
			PRINTFORM 「
			CALL MASTER_CALLNAME_K96
			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 TALENT:恋人
			PRINTFORM 「
			CALL MASTER_CALLNAME_K96
			PRINTFORMW 」
			PRINTFORMW 「背中流してあげよっか？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「いいわよ、気持ちいいものね」
		ELSEIF TALENT:思慕
			PRINTFORMW 「いいけど…変なことしないでよ」
		ELSE
			PRINTFORMW 「いいわよ、あまり変なことすると怒るけど」
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORMW
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K96_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_K96_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_K96_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 そう言いながら雷鼓は服装を整えていく。
			PRINTFORMW 「ノックぐらい…してよ…もう…」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「！？」
			PRINTFORM 「な、何の用？
			CALL MASTER_CALLNAME_K96
			PRINTFORMW ？」
		ELSEIF TALENT:思慕
			PRINTFORMW 「………」
			PRINTFORMW 「えっと…」
			PRINTFORMW 数瞬止まった時間の後、雷鼓はおずおずと話を切り出した。
		ELSE
			PRINTFORMW 「………」
			PRINTFORMW 「何…かな？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	CASE 1
	;何もしない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1
		IF CFLAG:318 == 1
			PRINTFORMW 「………」
		ELSEIF TALENT:恋人
			PRINTFORMW 「…」
			PRINTFORMW 「えっと…帰っちゃうの？」
			PRINTFORMW 雷鼓はそう言いながら見送っていった。
			PRINTFORMW 「馬鹿…」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…帰るの？」
			PRINTFORMW 「そう…つれないわね」
		ELSEIF TALENT:思慕
			PRINTFORMW 「………」
			PRINTFORMW 「いや、その…帰っちゃうの？」
		ELSE
			PRINTFORMW 「………」
			PRINTFORMW 雷鼓は呆然とした様子で床にへたり込んでいる。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	CASE 2
	;そのまま続行
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1
		IF CFLAG:318 == 1
			PRINTFORMW 「………」
			PRINTFORMW 雷鼓は俯いたまま黙々と行為を行っている。
		ELSEIF TALENT:恋人
			PRINTFORMW 「ん…見てて…%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「もう…変態なんだから…」
			PRINTFORMW そう言いながらも雷鼓は行為を再開した。
		ELSEIF TALENT:思慕
			PRINTFORMW 「…んっ…」
			PRINTFORMW 雷鼓は黙々と行為を再開し始めた。
		ELSE
			PRINTFORMW 「………」
			PRINTFORM 「…
			CALL MASTER_CALLNAME_K96
			PRINTFORMW …%UNICODE(0x2665) *1%」
			PRINTFORMW 雷鼓は%CALLNAME:MASTER%の名前を呼びながら行為を再開した。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	CASE 3
	;追い出し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1
		IF CFLAG:318 == 1
			PRINTFORMW 「…出てってよ…！」
			PRINTFORMW 雷鼓は声を荒げて追い出してきた。
		ELSEIF TALENT:恋人
			PRINTFORMW 「ごめんね、埋め合わせはいつかするから…」
			PRINTFORMW 「一人にして…」
			PRINTFORMW 羞恥のあまり雷鼓は%CALLNAME:MASTER%を追い出してきた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…一人にして…お願い」
			PRINTFORMW そう言って雷鼓は部屋から追い出してきた。
		ELSEIF TALENT:思慕
			PRINTFORMW 「出てって！」
			PRINTFORMW 「お願い…」
			PRINTFORMW 雷鼓は羞恥と驚愕のために声を荒げて追い出してきた。
		ELSE
			PRINTFORMW 「………」
			PRINTFORMW 「見なかったことに…ね…」
			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 「激しく…ね…%UNICODE(0x2665) *1%」
			PRINTFORMW そう言いながら雷鼓は腰に手を回してきた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「わ、分かったわ」
			PRINTFORMW （ホントは…見られるのも好きなんだけどね…）
			PRINTFORMW 雷鼓は顔を少し赤らめながら%CALLNAME:MASTER%に押し倒された。
		ELSEIF TALENT:思慕
			PRINTFORMW 「ん…」
			PRINTFORMW 「お願い…気持よくして…」
			PRINTFORMW そう言いながら雷鼓は身を委ねてきた。
		ELSE
			PRINTFORMW 「…」
			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%…あっ…%UNICODE(0x2665) *1%」
			PRINTFORM 「好きよ…
			CALL MASTER_CALLNAME_K96
			PRINTFORMW …%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「んっ…%UNICODE(0x2665) *1%」
			PRINTFORMW 「もうだめ…限界よ…」
		ELSEIF TALENT:思慕
			PRINTFORMW 「ん…%UNICODE(0x2665) *1%」
			PRINTFORMW 「じゃあね…良かったわ」
		ELSE
			PRINTFORMW 「んん…」
			PRINTFORMW 「ふぅ…」
		ENDIF
		RETURN 1
	ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;相手からデートのお誘い
;==================================================
@M_KOJO_EVENT_K96_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:恋人
				PRINTFORM 「ねえ、
				CALL MASTER_CALLNAME_K96
				PRINTFORMW 、デートしよ%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORM 「
				CALL MASTER_CALLNAME_K96
				PRINTFORMW 、デートしよ！」
			ELSEIF TALENT:思慕
				PRINTFORM 「
				CALL MASTER_CALLNAME_K96
				PRINTFORMW 、デートしない？」
			ELSE
				PRINTFORM 「
				CALL MASTER_CALLNAME_K96
				PRINTFORMW 、デートしよっか？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「ふふっ%UNICODE(0x2665) *1%じゃあ、どこへ行きましょうか？」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「それじゃあ、今日はどこへ行きましょうか？」
			ELSEIF TALENT:思慕
				PRINTFORMW 「ありがとう、じゃあ行きましょう！」
			ELSE
				PRINTFORMW 「今日は一緒に楽しみましょう%UNICODE(0x2665) *1%」
			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:恋人
				PRINTFORM 「
				CALL MASTER_CALLNAME_K96
				PRINTFORMW 、家来ない？」
			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 「ふふっ%UNICODE(0x2665) *1%じゃあ、行きましょうか%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「やったー！じゃあ行きましょう！」
			ELSEIF TALENT:思慕
				PRINTFORMW 「それじゃ、ついてきてね%UNICODE(0x2665) *1%」
			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_K96_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 「あら？こういう方が興奮するのかしら%UNICODE(0x2665) *1%」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱ぎ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
				PRINTFORMW 「こういうのも、私好きよ%UNICODE(0x2665) *1%」
			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 「ねえ、下着、交換しましょ%UNICODE(0x2665) *1%」
					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_K96_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの度胸で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;泣かせてしまった　[臆病]持ち
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;相手が押し倒しを解除
;==================================================
@M_KOJO_EVENT_K96_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_K96_ONABARE_1(ARG)
;-------------------------------------------------
IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

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

[SKIPSTART]
;-------------------------------------------------
;オナバレなし崩しックスの地の文。口上色はここで付けてください。
;CFLAG等のキャラ変数を使う場合、キャラ番号の指定が必要になります。
;デフォルトのものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K96_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]
;==================================================
;呼び捨て用関数
;==================================================
;-------------------------------------------------
@MASTER_CALLNAME_K96
;-------------------------------------------------
IF CFLAG:1400 == 1
	PRINTFORM %CALLNAME:MASTER%君
ELSE
	PRINTFORM %CALLNAME:MASTER%
ENDIF

repo_name: akadiya/eratw

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

license: unknown