code:
;-------------------------------------------------
;eraTW4.782用 九十九弁々口上
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。
;おっぱいとお尻が大きい
;独占欲高、恐怖政治の推進者
;若干ヤンデレ気味
;面倒見のよい性格

;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;CFLAG:94:1900 お兄ちゃん呼びフラグ
;CFLAG:94:1901 兄さん呼びフラグ
;CFLAG:94:1902 お姉ちゃん呼びフラグ
;CFLAG:94:1903 姉さん呼びフラグ
;CFLAG:94:1904 お兄ちゃん呼び会話イベントフラグ
;
;******************************************************************************

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

;RESULTS = _TEST_

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

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

;眠姦口上有に1を入れると、眠姦時にコマンド口上が読み込まれるように
CFLAG:94:眠姦口上有 = 0
RETURN 1
;### 口上色判定 ###################################
@M_KOJO_COLOR_K94

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

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

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K94
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
PRINTFORMW  辺りを散策していると薄い黄褐色のワンピースに白の長袖シャツという出で立ちの薄紫の長い髪の女性がいた。
PRINTFORMW  彼女は何やら琵琶のようなもので音楽を奏でていたがこちらに気づいて近づいてきた。
PRINTFORMW  「あんた、さっきからこっち見てるけど、何か用？」
PRINTFORMW  「ふーん…そう、聴き惚れてた？」
PRINTFORMW  「ありがと、聴いてくれて」
PRINTFORMW  「私は弁々、九十九弁々、琵琶の付喪神よ」
PRINTFORMW  「元々どこぞの小人の起こした異変に巻き込まれたおかげで琵琶の付喪神になったんだけど」
PRINTFORMW  「雷鼓さんに助けられたり妹の八橋と姉妹になったりして今に至っているの」
PRINTFORMW  「どのみち琵琶の付喪神として産まれたのなら誰にも負けない音楽を奏でてみせる、そういう夢もあるんだけどね」
PRINTFORMW  「お兄さんはあまり興味ないかもしれないけど、よかったら聴いていってね」
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;デート帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K94_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
;CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	PRINTFORMW  「ねえ、%CALLNAME:MASTER%」
	PRINTFORMW  弁々はそう言いながら後ろ手を組んで振り返った。
	PRINTFORMW  「眼を瞑って…もらえるかしら？」
	PRINTFORMW  %CALLNAME:MASTER%が弁々の言うとおりに目をつぶると
	PRINTFORMW
	PRINTFORMW  「んっ…ちゅっ…」
	PRINTFORMW
	PRINTFORMW  弁々はいつもより少しだけ長く接吻をした。
	PRINTFORMW  顔を上げると弁々が少しだけ微笑みながら%CALLNAME:MASTER%の顔を見上げている。
	PRINTFORMW  「…こういうの、悪くはないものね」
	PRINTFORMW  %CALLNAME:MASTER%が呆然としていると
	PRINTFORMW  「好きよ、%CALLNAME:MASTER%」
	PRINTFORMW  弁々はそう言って悠々と去っていった。
	;キスをキャンセルしたい場合は以下を開放
	;TCVAR:キスキャンセル = 1
ENDIF
RETURN 1

;==================================================
;デート帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K94_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(1094)
				PRINTFORMW 「ねえ、%CALLNAME:MASTER%、」
				PRINTFORMW 「%CALLNAME:MASTER%は好きな人とかいる？」
				PRINTFORMW 「私、%CALLNAME:MASTER%に恋しちゃった」
				PRINTFORMW 「%CALLNAME:MASTER%と一緒にいるとドキドキするの」
				PRINTFORMW 「%CALLNAME:MASTER%のことを考えると夜眠れなくなって」
				PRINTFORMW 「八橋や雷鼓さんと一緒に演奏している時も%CALLNAME:MASTER%のことが頭から離れないの」
				PRINTFORMW 「%CALLNAME:MASTER%が他の女と一緒にいると嫉妬しちゃうし」
				PRINTFORMW 「%CALLNAME:MASTER%が誰かと話をしていると私も%CALLNAME:MASTER%ともっと話をしたいと思っちゃう」
				PRINTFORMW 「%CALLNAME:MASTER%と一緒になりたい」
				PRINTFORMW 「%CALLNAME:MASTER%のモノになりたい」
				PRINTFORMW 「%CALLNAME:MASTER%を私のモノにしたい」
				PRINTFORMW 「そんな想いが毎晩%CALLNAME:MASTER%の顔と一緒に夢に出て来るの」
				PRINTFORMW 「私を」
				PRINTFORMW 「%CALLNAME:MASTER%の恋人にしてください」
				PRINTFORMW 弁々は%CALLNAME:MASTER%の袖を掴みながらそう告白した。
			;二回目の告白
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%、」
				PRINTFORMW 帰路に着くと弁々は意を決したように口を開いた。
				PRINTFORMW 「私、やっぱり%CALLNAME:MASTER%のこと好きだわ」
				PRINTFORMW 弁々はそう言って%CALLNAME:MASTER%に告白した。
				PRINTFORMW 「%CALLNAME:MASTER%のこと、諦めきれない」
				PRINTFORMW 「独占欲が強いのね、私」
				PRINTFORMW 「私とは付き合ってもらえないかしら？」
				PRINTFORMW 「…駄目？」
			ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「…」
		PRINTFORMW 弁々は黙って顔を近づけると
		PRINTFORMW 「ちゅっ…」
		PRINTFORMW 優しくキスをしてきた。
		PRINTFORMW 「ふふっ、私、%CALLNAME:MASTER%のモノになっちゃった…」
		PRINTFORMW %CALLNAME:MASTER%はあっけに取られながらも弁々を抱きとめた。
		PRINTFORMW （下克上だなんだと言ってたこともあったけど…これも幸せね）
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「…」
		PRINTFORMW 「諦めないから」
		PRINTFORMW 弁々はそれだけ言ってその場を後にした。
		PRINTFORMW （これで諦めるぐらいなら…）
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;デート帰り
;==================================================
@M_KOJO_SPEVENT_K94_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		IF CFLAG:318 == 1
			PRINTFORMW 「ふんっ…！」
			PRINTFORMW 弁々は怒りながらぷいっと顔を背けて帰っていった。
		ELSEIF TALENT:恋人
			PRINTFORM 「じゃあね、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
			PRINTFORMW 弁々はそう言いながら%CALLNAME:MASTER%の方へ向き直って礼を言った。
			PRINTFORM 「また、明日、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW とデートできるの、楽しみにしているわよ」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「今日はもうお開きね」
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 、貴方も早く帰りなさい」
			PRINTFORMW 「…じゃあね、バイバイ」
			PRINTFORMW 弁々はそう言って名残惜しげに手を振って去っていった。
		ELSEIF TALENT:思慕
			PRINTFORM 「それじゃあ、また明日ね、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW も元気でね」
			PRINTFORMW 弁々はそう言ってそそくさと帰っていった。
			PRINTW
		ELSE
			PRINTFORMW 「そろそろ帰るわ」
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW もあんまり遊んでると痛い目見るわよ」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORMW 「…いいわ、許してあげる」
			PRINTFORMW 「でもね…あんまり変なことしちゃ駄目よ？」
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW のこと、信頼してあげるからね」
		ELSE
			PRINTFORMW 「ん、わかった」
			PRINTFORMW 「あんまり人を怒らせることをしちゃ駄目よ」
			PRINTFORMW 「私は優しいからね、許してあげる」
			PRINTFORMW 弁々はどこか怒気を含んだ笑顔でそう言った。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「いいわ、少しだけ許してあげる」
			PRINTFORMW 「まあまだ怒ってるけどね」
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 、もう少し誠意を見せなさい」
		ELSE
			PRINTFORMW 「…」
			PRINTFORMW 「そう簡単に許してあげないわ」
			PRINTFORMW 「少しだけなら許してあげてもいいけど」
			PRINTFORMW 弁々はどこかぎこちない笑顔でそう言った。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORMW 「…わかったわ」
			PRINTFORMW 「でもまだ怒ってるからね」
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 、もうちょっと信用できる態度を取りなさい」
		ELSE
			PRINTFORMW 「…」
			PRINTFORMW 「まだ怒ってるんだけど」
			PRINTFORMW 弁々は%CALLNAME:MASTER%を睨みつけながらそう言った。
		ENDIF
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K94_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;仕事中ではなく、今日会ってない。
	IF !TCVAR:94:今日会ったか
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;MASTERが入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
			;仕事中、今日会ってない。
			IF CFLAG:行動 == 5 && !TCVAR:94:今日会ったか
				PRINTFORMW 「ごめんねー今ライブ中なの♪」
			ELSE
				;正月、バレンタイン、ハロウィン、クリスマスの場合
				IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
					CALL SPECIALDAY_EVENT_K94
				ELSEIF CFLAG:318 == 1
					PRINTFORMW 「…あら、お元気そうね」
					PRINTFORMW 弁々は怒気を含めた声でそう挨拶した。
				ELSEIF TALENT:恋人
					PRINTFORM 「あら、
					CALL MASTER_CALLNAME_K94
					PRINTFORMW 」
					PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと小さく手を振って挨拶をしてきた。
					PRINTFORMW 「今日は何をするの？」
				ELSEIF TALENT:恋慕
					PRINTFORM 「ん？
					CALL MASTER_CALLNAME_K94
					PRINTFORMW じゃない」
					PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと
					PRINTFORMW 「今日は何をしてくれるの？」
					PRINTFORMW 少し顔を赤らめて部屋に迎え入れた。
				ELSEIF TALENT:思慕
					PRINTFORM 「
					CALL MASTER_CALLNAME_K94
					PRINTFORMW 、元気？」
					PRINTFORMW 弁々は%CALLNAME:MASTER%の姿を確認するとこちらを振り向いて挨拶してきた。
					PRINTFORM 「
					CALL MASTER_CALLNAME_K94
					PRINTFORMW 、今日はどうしたの？」
				ELSE
					PRINTFORM 「あら、
					CALL MASTER_CALLNAME_K94
					PRINTFORMW 、元気だった？」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 2
			;仕事中、今日会ってない。
			IF CFLAG:行動 == 5 && !TCVAR:94:今日会ったか
				PRINTFORMW 「ごめんねー今ライブ中なの♪」
			ELSE
				;正月、バレンタイン、ハロウィン、クリスマスの場合
				IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
					CALL SPECIALDAY_EVENT_K94
				ELSEIF CFLAG:318 == 1
					PRINTFORMW 「…あら？」
					PRINTFORM 「なんだ、
					CALL MASTER_CALLNAME_K94
					PRINTFORMW なの」
				ELSEIF TALENT:恋人
					PRINTFORM 「あら、
					CALL MASTER_CALLNAME_K94
					PRINTFORMW じゃない」
					PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと小さく手を振って元気に挨拶をしてきた。
					PRINTFORMW 「何やってるの？私も混ぜてもらえないかしら」
				ELSEIF TALENT:恋慕
					PRINTFORM 「
					CALL MASTER_CALLNAME_K94
					PRINTFORMW は今日なにか予定あるの？」
					PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと呼びかけてきた。
					PRINTFORMW 「私、今暇なのよね」
				ELSEIF TALENT:思慕
					PRINTFORM 「
					CALL MASTER_CALLNAME_K94
					PRINTFORMW 、元気そうね」
					PRINTFORMW 弁々は%CALLNAME:MASTER%の姿を確認すると近づきながら挨拶してきた。
					PRINTFORM 「今日は
					CALL MASTER_CALLNAME_K94
					PRINTFORMW 、予定とかあるの？」
				ELSE
					PRINTFORM 「あら、
					CALL MASTER_CALLNAME_K94
					PRINTFORMW 、元気そうね」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて一緒に入る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 3
			IF CFLAG:318 == 1
				PRINTFORMW 「…変態…」
				PRINTFORMW 弁々は胸を腕で隠しながら睨みつけて抗議している。
			ELSEIF TALENT:恋人
				PRINTFORM 「
				CALL MASTER_CALLNAME_K94
				PRINTFORMW …」
				PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと一度湯船に体を沈めながら呆れつつも招き入れた。
				PRINTFORMW 「まあ、あんたにならいいけどさ…体、洗ってあげようか？」
			ELSEIF TALENT:恋慕
				PRINTFORM 「んえ！？
				CALL MASTER_CALLNAME_K94
				PRINTFORMW ！？」
				PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと
				PRINTFORMW 「…あんたも体、見せなさい！」
				PRINTFORMW そう言って湯船に招き入れた。
			ELSEIF TALENT:思慕
				PRINTFORM 「
				CALL MASTER_CALLNAME_K94
				PRINTFORMW …」
				PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと慌てた様子で湯船に沈んだ。
				PRINTFORM 「覗きなんてあまりいい趣味とは思えないけど…
				CALL MASTER_CALLNAME_K94
				PRINTFORMW が一緒にお風呂入りたいっていうのならまあいいわ…」
			ELSE
				PRINTFORM 「
				CALL MASTER_CALLNAME_K94
				PRINTFORMW …あんたねえ…まあいいわ、入りなさい」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて出て行った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 4
			IF CFLAG:318 == 1
				PRINTFORMW 「どうぞ、ごゆるりと」
				PRINTFORMW 弁々はそう言って軽蔑した眼差しを向けながら出ていった。
			ELSEIF TALENT:恋人
				PRINTFORM 「
				CALL MASTER_CALLNAME_K94
				PRINTFORMW …」
				PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくとそそくさと風呂場から出ていった。
				PRINTFORMW 「一番風呂じゃないけど、どうぞ」
			ELSEIF TALENT:恋慕
				PRINTFORM 「！
				CALL MASTER_CALLNAME_K94
				PRINTFORMW ！？」
				PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと
				PRINTFORMW 「ほら、どうぞ入って」
				PRINTFORMW そう言って湯船から出ていった。
			ELSEIF TALENT:思慕
				PRINTFORMW 「えっと…」
				PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと慌てた様子で湯船から出ていった。
				PRINTFORMW 「変態…！」
			ELSE
				PRINTFORM 「
				CALL MASTER_CALLNAME_K94
				PRINTFORMW ！？ちょっと…入ってたんだけど…！」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 5
			IF CFLAG:318 == 1
				PRINTFORMW 「…変態…気持ち悪い…」
				PRINTFORMW 弁々はそう言いながら%CALLNAME:MASTER%を追い出してきた。
			ELSEIF TALENT:恋人
				PRINTFORM 「
				CALL MASTER_CALLNAME_K94
				PRINTFORMW ！」
				PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくとそそくさと追い出してきた。
				PRINTFORMW 「一人でゆっくりしたいの、ごめんなさい」
			ELSEIF TALENT:恋慕
				PRINTFORM 「
				CALL MASTER_CALLNAME_K94
				PRINTFORMW ！？」
				PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと
				PRINTFORMW 「入らないでよ、もう！」
				PRINTFORMW そう言って風呂場から追い出してきた。
			ELSEIF TALENT:思慕
				PRINTFORMW 「！？」
				PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと慌てた様子で風呂場から追い出してきた。
				PRINTFORM 「
				CALL MASTER_CALLNAME_K94
				PRINTFORMW ！変態！」
			ELSE
				PRINTFORM 「
				CALL MASTER_CALLNAME_K94
				PRINTFORMW ！？出ていきなさい！」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;外出先で遭遇した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 6
			;仕事中、今日会ってない。
			IF CFLAG:行動 == 5 && !TCVAR:94:今日会ったか
				PRINTFORMW 「ごめんねー今ライブ中なの♪」
			ELSE
				;正月、バレンタイン、ハロウィン、クリスマスの場合
				IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
					CALL SPECIALDAY_EVENT_K94
				ELSEIF CFLAG:318 == 1
					PRINTFORMW 「…あら、奇遇ね」
				ELSEIF TALENT:恋人
					PRINTFORM 「
					CALL MASTER_CALLNAME_K94
					PRINTFORMW 、元気そうね」
					PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと小さく手を振って近寄ってきた。
					PRINTFORMW 「今日は何をしているの？」
				ELSEIF TALENT:恋慕
					PRINTFORM 「あら？
					CALL MASTER_CALLNAME_K94
					PRINTFORMW じゃない」
					PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと
					PRINTFORMW 「今日は何か予定あるの？」
					PRINTFORMW そう言って%CALLNAME:MASTER%の腕に腕を絡めてきた。
				ELSEIF TALENT:思慕
					PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと小さく手を振って近寄ってきた。
					PRINTFORM 「
					CALL MASTER_CALLNAME_K94
					PRINTFORMW 、あんたも元気そうね」
				ELSE
					PRINTFORM 「
					CALL MASTER_CALLNAME_K94
					PRINTFORMW ？何やってるの？」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他キャラとデート中に遭遇した
		;ARG:1にデート相手
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 7
			;仕事中、今日会ってない。
			IF CFLAG:行動 == 5 && !TCVAR:94:今日会ったか
				PRINTFORMW 「ごめんねー今ライブ中なの♪」
			ELSE
				IF CFLAG:318 == 1
					PRINTFORMW 「………！」
					PRINTFORMW 弁々は拳を握りしめてこちらを睨みつけている。
				ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 95
					PRINTFORMW 「…へぇ、そういうこと」
					PRINTFORMW 『えーと…姉さん、これはね…』
					PRINTFORM 「
					CALL MASTER_CALLNAME_K94
					PRINTFORMW 、お幸せに！」
					PRINTFORMW 『…やだなぁ…怒らせちゃったかも…』
				ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 96
					PRINTFORMW 「…ふーん、雷鼓さん、好きなんだ」
					PRINTFORMW 『…弁々、これはね…』
					PRINTFORM 「…
					CALL MASTER_CALLNAME_K94
					PRINTFORMW なんて、大っ嫌い！」
				ELSEIF TALENT:恋慕 && ARG:1 == 95
					PRINTFORMW 「…あ…！」
					PRINTFORMW 『あ、姉さん、どうかしたの？』
					PRINTFORM 「
					CALL MASTER_CALLNAME_K94
					PRINTFORMW も、八橋も、元気そうね、じゃあ、それだけだから」
					PRINTFORMW 『…へぇ…姉さんも、そういうこと』
				ELSEIF TALENT:恋慕 && ARG:1 == 96
					PRINTFORMW 「あら、雷鼓さん…と…！？」
					PRINTFORMW 『あら、弁々、どうかしたの？』
					PRINTFORM 「…
					CALL MASTER_CALLNAME_K94
					PRINTFORMW …雷鼓さんも、お似合いね…」
					PRINTFORMW 『…何かあったのかしら？あの子』
				ELSEIF TALENT:恋人
					PRINTFORM 「
					CALL MASTER_CALLNAME_K94
					PRINTFORMW …！」
					PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと怒気を含めた声で近づいてきた。
					PRINTFORMW 「やっぱり人間なんて信用出来ないわね」
					PRINTFORMW そしてそのまま服の裾を引っ掴んでいる。
					PRINTFORMW 「
					CALL MASTER_CALLNAME_K94
					PRINTFORMW なんて嫌いよ」
					PRINTFORMW 弁々はそう言いながらその場を後にした。
				ELSEIF TALENT:恋慕
					PRINTFORMW 「あら…」
					PRINTFORMW 弁々は%CALLNAME:MASTER%に気づくと
					PRINTFORMW 「じゃあね…」
					PRINTFORMW 肩を竦めて立ち去っていった。
				ELSEIF TALENT:思慕
					PRINTFORMW 「えっと…」
					PRINTFORM 「
					CALL MASTER_CALLNAME_K94
					PRINTFORMW 、楽しそうね」
					PRINTFORMW 弁々は%CALLNAME:MASTER%に軽く挨拶をして立ち去っていった。
					PRINTFORMW （少し…嫌な気持ち…）
				ELSE
					PRINTFORM 「
					CALL MASTER_CALLNAME_K94
					PRINTFORMW ？モテモテね」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;特別な日イベント用関数
;==================================================
;-------------------------------------------------
@SPECIALDAY_EVENT_K94
;-------------------------------------------------
	;謹賀新年
	IF DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1
		IF TALENT:恋人
			PRINTFORM 「明けましておめでとう、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
			PRINTFORMW 弁々はそう言って新年の挨拶をしてきた。
			PRINTFORM 「今年も、よろしくね♪
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
		ELSEIF TALENT:恋慕
			PRINTFORM 「明けましておめでとう、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
			PRINTFORMW 弁々は新年の挨拶をしてきた。
			PRINTFORM 「ふふ、新年早々
			CALL MASTER_CALLNAME_K94
			PRINTFORMW に会えるなんていい年になりそうね%UNICODE(0x2665) *1%」
		ELSEIF TALENT:思慕
			PRINTFORM 「明けましておめでとう、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
			PRINTFORMW 弁々は新年の挨拶をしてきた。
			PRINTFORMW 「お年玉？子供じゃないからいらないわ」
		ELSE
			PRINTFORM 「あけましておめでとう、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 、今年もよろしくね」
		ENDIF
	;バレンタインデー
	ELSEIF DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%、これ、受け取ってくれないかしら？」
			PRINTFORMW 弁々は%CALLNAME:MASTER%に話しかけてきた
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%、ねえ、受け取ってくれないかしら？」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%、これ、プレゼントよ」
		ELSEIF CFLAG:2 >= 1000
			PRINTFORMW 「%CALLNAME:MASTER%、今日は何の日か知ってる？」
		ENDIF
		SELECTCASE CFLAG:好感度
		CASE 1000 TO 3000
			PRINTFORMW 「はい、チョコレート」
			PRINTFORMW 弁々はチョコレートを渡してきた。
			PRINTFORMW 「義理だけどね、勘違いしたらダメよ？」
		CASE 3001 TO 5000
			PRINTFORMW 弁々は%CALLNAME:MASTER%にチョコレートを渡してきた。
			PRINTFORMW 「雷鼓さんと選んだから間違いじゃないと思うけど…」
		CASE IS > 5000
			IF EXP:愛情経験 >= 100
				PRINTFORMW 「これ、頑張って作ったの」
				PRINTFORMW そう言いながら弁々はチョコレートを渡してきた。
				PRINTFORMW 「いっぱい、想いを込めたから…食べてね、絶対よ」
			ELSE
				PRINTFORMW 「これ、雷鼓さんと選んで美味しそうなの買ったから…」
				PRINTFORMW そう言いながら弁々はチョコレートを渡してきた。
				PRINTFORMW 「捨てちゃだめよ？ちゃんと食べてね？」
			ENDIF
		ENDSELECT
	;ハロウィン
	ELSEIF DAY:2 == 3 && DAY:3 == 30
		IF TALENT:恋人
			PRINTFORMW 「トリックオアトリート！」
			PRINTFORMW 弁々は%CALLNAME:MASTER%勢いよく話しかけてくる。
			PRINTFORMW 「お菓子を貰っても悪戯しちゃおうかしら…♪」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「トリック・オア・トリート♪」
			PRINTFORMW 弁々はそう言いながら話しかけてきた。
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 、私はお菓子より貴方のほうが欲しいかもしれないわ…♪」
		ELSEIF TALENT:思慕
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 、トリック・オア・トリート！」
			PRINTFORMW 弁々は%CALLNAME:MASTER%にそう言ってお菓子を要求してきた。
			PRINTFORMW 「お菓子をくれないと悪戯しちゃうわよ♪」
		ELSE
			PRINTFORMW 「トリック・オア・トリート♪」
			PRINTFORMW 弁々はそう言って脅かしてきた。
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 、お菓子頂戴な♪」
		ENDIF
	;クリスマス
	ELSEIF DAY:2 == 4 && DAY:3 == 25
		IF TALENT:恋人
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW ！メリークリスマス♪」
			PRINTFORMW 弁々は嬉しそうに%CALLNAME:MASTER%に話しかけてくる。
			PRINTFORMW 「ねえ、今日、暇なら一緒に過ごしてくれないかしら？」
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW と一緒に居たいの…ダメ？」
		ELSEIF TALENT:恋慕
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW ！メリークリスマス♪」
			PRINTFORMW 八橋はそう言って話しかけてきた。
			PRINTFORMW 「今日はクリスマスだけど予定空いてたりしないかしら？」
		ELSEIF TALENT:思慕
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW ！メリークリスマス♪」
			PRINTFORMW 弁々はそう言いながら話しかけてきた。
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW はプレゼント貰えた？それともブラックサンタだった？」
		ELSE
			PRINTFORM 「メリークリスマス、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
			PRINTFORMW 弁々はそう言って話しかけてきた。
			PRINTFORMW 「八橋にプレゼントを置いてきたのだけど、喜んでくれたかしら…」
		ENDIF
	ENDIF
;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K94_2(ARG,ARG:1)
CALL MESSAGE_GOODMONING(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;非同棲かつ相手が先に起きてる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;TARGET私室にMASTERが入っている（恋慕時添い寝中就寝時のみ？
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERが起きていて、相手が起きてきた
	;添い寝時TARGET起床はこちら（TARGET衰弱or添い寝中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;非同棲
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF TALENT:恋人
				PRINTFORM 「おはよ、
				CALL MASTER_CALLNAME_K94
				PRINTFORMW 」
				PRINTFORMW 弁々は元気よく挨拶をしてきた。
			ELSEIF TALENT:恋慕
				PRINTFORMW 「…う～ん…」
				PRINTFORMW 弁々は寝ぼけ眼で挨拶してきた。
				PRINTFORMW 「朝、弱いのよね、私…」
				PRINTFORMW 「まあ覗いてもいいけど…」
			ELSEIF TALENT:思慕
				PRINTFORM 「んっ…おはよう、
				CALL MASTER_CALLNAME_K94
				PRINTFORMW 」
				PRINTFORMW 弁々はそう言いながら布団を跳ね上げて起きた。
			ELSE
				PRINTFORMW 「…おはよ…」
				PRINTFORMW 弁々はゆっくりとあくびをしながら起き上がった
			ENDIF
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に帰る（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORM 「それじゃ、また明日、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 、お休みなさい」
			PRINTFORMW 弁々はそう言って帰っていった。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…そろそろお開きの時間ね…」
			PRINTFORMW 弁々は名残惜しげに足を進めていった。
			PRINTFORM 「お休みなさい、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
		ELSEIF TALENT:思慕
			PRINTFORMW 「お休みなさい、帰るわ」
			PRINTFORMW 弁々はそう言って帰っていった。
		ELSE
			PRINTFORM 「お休みなさい、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
			PRINTFORMW 弁々はそう言って自室に帰っていった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「んっ…眠…」
			PRINTFORMW 弁々はそう言いながら瞼をこすっている。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…ふぁ…ん…」
			PRINTFORMW 弁々はあくびをしながら眠そうにしている。
		ELSEIF TALENT:思慕
			PRINTFORMW 「…眠い…」
			PRINTFORMW 弁々はそう言って体をゆらしている。
		ELSE
			PRINTFORMW 「…ふあぁ…眠いわね…」
			PRINTFORMW 弁々は眠そうにしている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORMW 「…くぅ…」
			PRINTFORM 「…
			CALL MASTER_CALLNAME_K94
			PRINTFORMW …」
			PRINTFORMW 「…んん…」
			PRINTFORMW 弁々は寝言で%CALLNAME:MASTER%の名前を呟いている。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…すぅ…」
			PRINTFORMW 弁々はぐっすりと寝ている。
			PRINTFORMW 「…ん…ふふっ…」
			PRINTFORMW 何やらいい夢をみているようだ。
		ELSEIF TALENT:思慕
			PRINTFORMW 「…ん…にゃぁ…」
			PRINTFORMW 弁々は何かしらつぶやきながらぐっすりと寝ている。
		ELSE
			PRINTFORMW 「…八橋…」
			PRINTFORMW 弁々は家族のことを夢に見ながら寝ているようだ。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;イタズラ中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF TALENT:恋人
			PRINTFORMW 「…ん…疲れた…」
			PRINTFORMW 弁々はそう呟いた。
		ELSEIF TALENT:恋慕
			PRINTFORM 「ふぅ…
			CALL MASTER_CALLNAME_K94
			PRINTFORMW …疲れちゃった…」
		ELSEIF TALENT:思慕
			PRINTFORMW 「…ん…疲れた…」
			PRINTFORMW 弁々はそう呟いた。
		ELSE
			PRINTFORMW 「…ん～…ふぅ…」
			PRINTFORMW （疲れたわね…）
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		IF TALENT:恋人
			PRINTFORMW 「おーい、大丈夫？」
			PRINTFORMW 「…仕方のない人ね…」
		ELSEIF TALENT:恋慕
			PRINTFORM 「…
			CALL MASTER_CALLNAME_K94
			PRINTFORMW ー？おーい？」
			PRINTFORMW 弁々は%CALLNAME:MASTER%に呼びかけた。
			PRINTFORMW 「…もう、ちゃんとしなさいよ」
		ELSEIF TALENT:思慕
			PRINTFORMW 「…ん…大丈夫…じゃなさそうね…」
			PRINTFORMW 弁々はゆっくりと%CALLNAME:MASTER%に肩を貸した。
		ELSE
			PRINTFORM 「…ちょっと、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 、しっかりしなさいよ」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで戻ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			IF TALENT:恋人
				PRINTFORMW 「…私、そろそろ寝るわ」
				PRINTFORMW 「…お休みなさい」
			ELSEIF TALENT:恋慕
				PRINTFORM 「…
				CALL MASTER_CALLNAME_K94
				PRINTFORMW 、寝るからこっち見ないでね」
				PRINTFORMW 「…着替えるって言ってるのよ、お休み」
			ELSEIF TALENT:思慕
				PRINTFORMW 「…お休み」
				PRINTFORMW 弁々はそう言いながら着替えて寝た。
			ELSE
				PRINTFORMW 「…ふぁ…お休み」
				PRINTFORMW 弁々は無防備に着替えて寝た。
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF TALENT:恋人
				PRINTFORMW 「…ん…寝るから…出ていきなさい…」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「…もう寝るから出ていきなさい…」
			ELSEIF TALENT:思慕
				PRINTFORMW 「…何…？もう寝るから出てって」
				PRINTFORMW 弁々はそう言って追いだしてきた。
			ELSE
				PRINTFORMW 「…早く出てって…眠いわ」
				PRINTFORMW 弁々はジロっとこちらを睨みつけながら追い出してきた。
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		IF TALENT:恋人
			PRINTFORMW 「…何してるのかって？」
			PRINTFORMW 「休憩してるだけよ」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「ん、暇ね～」
		ELSEIF TALENT:思慕
			PRINTFORMW 「…暇」
			PRINTFORMW 弁々はそう言いながら、休憩している。
		ELSE
			PRINTFORMW 「…どうかしたの？」
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORM 弁々は%CALLNAME:MASTER%のことを
			IF TALENT:恋人
				PRINTFORM じっとこちらを
			ELSEIF TALENT:恋慕
				PRINTFORM 気になる様子で
			ELSEIF GETBIT(CFLAG:1,0)
				PRINTFORM チラッと
			ENDIF
		PRINTFORMW 見てくる。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;軽く会釈して通り過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:318 == 1
			PRINTFORMW 「…！」
		ELSEIF TALENT:恋人
			PRINTFORMW 弁々はペコリと頭を下げて会釈を返した。
		ELSEIF TALENT:恋慕
			PRINTFORMW 弁々は少し残念そうに会釈を返した。
		ELSEIF TALENT:思慕
			PRINTFORMW 弁々は会釈を返した。
		ELSE
			PRINTFORMW 「…ん？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して通り過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORM 弁々は%CALLNAME:MASTER%のことを
			IF TALENT:恋人
				PRINTFORM 愛おしそうに
			ELSEIF TALENT:恋慕
				PRINTFORM 何をしているのだろうという表情で
			ELSEIF GETBIT(CFLAG:1,0)
				PRINTFORM チラッと横目で
			ENDIF
		PRINTFORMW 見つめていた。
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;他者介入でムード変化
;==================================================
@M_KOJO_EVENT_K94_5(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;霊夢が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;る～ことが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	IF TALENT:恋人
		PRINTFORMW 「…あら？」
		PRINTFORMW 「見られてしまったわね…%UNICODE(0x2665) *1%」
		PRINTFORMW 「…どうする？」
	ELSEIF TALENT:恋慕
		PRINTFORMW 「なんか白けちゃったわね…」
	ELSEIF TALENT:思慕
		PRINTFORMW 「…あ…ここまでね…」
		PRINTFORMW 弁々はそう言いながらも名残惜しげに体を離していった。
	ELSE
		PRINTFORMW 「…うーん、雰囲気ぶち壊しね…」
		PRINTFORMW 弁々はゆっくりと体を離した。
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（馴れ合い度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF CFLAG:318 == 1
			PRINTFORMW 「…変態…」
		ELSEIF TALENT:恋人
			PRINTFORMW 「…あら…」
			PRINTFORMW 「覗いて悪かったわね…」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…こういうの、運が無いわね…」
			PRINTFORMW 「お幸せに、ね」
		ELSEIF TALENT:思慕
			PRINTFORMW 「………！」
			PRINTFORMW 「人のいないところでやっていただけるかしら？」
		ELSE
			PRINTFORMW 「…止めてよ、もう…」
			PRINTFORMW 弁々はそそくさと逃げ出した。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（馴れ合い度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORMW 「…ずるいわね…」
			PRINTFORMW 「…私も混ぜてもらおうかしら？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…そうね」
			PRINTFORMW 「…私もムラムラしていたのよ」
		ELSEIF TALENT:思慕
			PRINTFORMW 「…仲間はずれになんてずるいわ」
			PRINTFORMW 「混ぜてほしいわ、駄目？」
		ELSE
			PRINTFORMW 「私もこういうの、好きよ」
			PRINTFORMW 弁々はそういいながら情事に参加してきた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF CFLAG:318 == 1
			PRINTFORMW 「…こんなところで…変態ね…」
		ELSEIF TALENT:恋人
			PRINTFORMW 「…あんまりこういうこと、しないでね」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…あら、お邪魔だったかしら…？」
		ELSEIF TALENT:思慕
			PRINTFORMW 「…あら？」
			PRINTFORMW 「…何も見なかったわ、そう、何も…」
		ELSE
			PRINTFORMW 「…ふぇ！？」
			PRINTFORMW 弁々は顔を赤らめながら無言で立ち去った。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERに誘われて参加
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG:1 == 4
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の馴れ合い度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF TALENT:恋人
			PRINTFORMW 「ふふっ…見られちゃったね」
			PRINTFORMW 「どうする？続き、する？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「あらあら…」
			PRINTFORMW 弁々は言葉に詰まると
			PRINTFORMW 「どうしましょう？」
			PRINTFORMW %CALLNAME:MASTER%に行為の続きを尋ねてきた。
		ELSEIF TALENT:思慕
			PRINTFORMW 「…これは不味いかもね…」
			PRINTFORMW 「…ブン屋に垂れ込まれなければいいけど…」
		ELSE
			PRINTFORMW 「…これは厄介ね…」
			PRINTFORMW 弁々はそう言いながら体を離していった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の馴れ合い度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORMW 「私は構わないわ」
			PRINTFORMW 「乱交もたまにはいいかもしれないわ」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「えっと…」
			PRINTFORMW 「私は構わない…けど…」
		ELSEIF TALENT:思慕
			PRINTFORMW 「…えーっと…」
			PRINTFORMW 「まあ、いいけどもさ…」
		ELSE
			PRINTFORMW 「…好きにすれば？」
			PRINTFORMW 弁々は少し不貞腐れたように顔を背けた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF TALENT:恋人
			PRINTFORMW 「お似合い、って言われたらいいのにね…%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…面倒ごとになるかな、私はかまわないけど」
		ELSEIF TALENT:思慕
			PRINTFORMW 「えっと…」
			PRINTFORMW 「まあ、なるようになるわよ」
		ELSE
			PRINTFORMW 「…やだ…不味いわね」
			PRINTFORMW 弁々は少し不安げに顔をしかめた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERに誘われて目撃者も参加
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG:1 == 4
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;目撃した情事を問い詰める
;==================================================
@M_KOJO_EVENT_K94_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:恋人
			PRINTFORM 「ねえこれどういうこと？
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
			PRINTFORMW 「私では不満なの？」
			PRINTFORMW 「…浮気者…！」
			PRINTFORMW 弁々はそのまま泣いてしまった。
		ELSE
			PRINTFORM 「…
			CALL MASTER_CALLNAME_K94
			PRINTFORMW ！馬鹿！」
			PRINTFORMW 弁々は思いっきり%CALLNAME:MASTER%の頬を引っ叩いた！
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;二人とも説教
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW もだけどさ」
			PRINTFORMW 「浮気なんてバレないようにするものよ」
			PRINTFORMW 「私の前でやるのは止めてもらえるかしら？」
			PRINTFORMW 「私だって…こんなの…」
			PRINTFORMW 弁々はさめざめと泣いている。
		ELSE
			PRINTFORMW 「こんなこと…しないでよ」
			PRINTFORMW 「嫌いになっちゃうじゃない…」
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;同じ場所に居てパンツを回収された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORMW 「何持ってるの？」
		PRINTFORMW 弁々は%CALLNAME:MASTER%の隠し持っていたパンツを没収した！
		PRINTFORMW 「…あら、下着」
		PRINTFORM 「別に
		CALL MASTER_CALLNAME_K94
		PRINTFORMW の趣味に何も言わないけどさ」
		PRINTFORMW 「あんた、早死するよ」
		PRINTFORMW 「こういうの、バレないようにしなさいな」
		PRINTFORMW 「…なんでこんな説教してるのかしら？私」
		PRINTFORMW 弁々は説教しながらもそのパンツを懐にしまった。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;遠距離移動中にパンツを回収された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORMW 「何持ってるの？」
		PRINTFORMW 弁々は%CALLNAME:MASTER%の隠し持っていたパンツを没収した！
		PRINTFORMW 「…あら、下着」
		PRINTFORM 「別に
		CALL MASTER_CALLNAME_K94
		PRINTFORMW の趣味に何も言わないけどさ」
		PRINTFORMW 「あんた、早死するよ」
		PRINTFORMW 「こういうの、バレないようにしなさいな」
		PRINTFORMW 「…なんでこんな説教してるのかしら？私」
		PRINTFORMW 弁々は説教しながらもそのパンツを懐にしまった。
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERを押し倒した（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORMW 「…えいっ！」
			PRINTFORMW 弁々は掛け声とともに%CALLNAME:MASTER%を押し倒した！
			PRINTFORMW 「こういうの、あんまり得意ではないけど%UNICODE(0x2665) *1%」
			PRINTFORMW そう言いながら弁々は%CALLNAME:MASTER%の唇を奪い服を脱がせていく。
			PRINTFORM 「愛してるわ、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW …%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORM 「ねえ…
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
			PRINTFORMW 弁々は%CALLNAME:MASTER%の名前を呼ぶと
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 、エッチなこと、しましょう…%UNICODE(0x2665) *1%」
			PRINTFORMW 弁々は妖艶に%CALLNAME:MASTER%の唇を奪ってきた。
		ELSE
			PRINTFORM 「…ねえ
			CALL MASTER_CALLNAME_K94
			PRINTFORMW …」
			PRINTFORMW 弁々は%CALLNAME:MASTER%を押し倒してきた。
			PRINTFORMW 「…こういうの、ムラムラするって言うのかしら」
			PRINTFORMW そう言いながら弁々は%CALLNAME:MASTER%の胸元を肌蹴させキスをしてきた。
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW …あんたは私のモノよ…%UNICODE(0x2665) *1%」
			PRINTFORMW 弁々はそう言いながら%CALLNAME:MASTER%を思うがままにしようとしている…
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		SELECTCASE ARG:1
			CASE 0
			;抜け出した
				PRINTFORMW 「…あら、残念ね」
				PRINTFORMW 弁々は少し残念そうに%CALLNAME:MASTER%を解放した。
				RETURN 1
			CASE 1
			;抱き着きモード満足終了
				PRINTFORMW 「…まあいいわ」
				PRINTFORMW 弁々は満足した様子で%CALLNAME:MASTER%を解放した。
				RETURN 1
			CASE 2
			;抱き着きモード強制終了
				PRINTFORML
				RETURN 1
		ENDSELECT
	ENDIF
	;-------------------------------------------------
	;抜け出す失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		SELECTCASE ARG:1
			CASE 1
			;好きにして状態から抜け出せなかった
				PRINTFORMW 「…駄目よ…あんたは私のモノなのよ…%UNICODE(0x2665) *1%」
				PRINTFORMW 弁々は満足していない様子で%CALLNAME:MASTER%を解放しないでいる。
				RETURN 1
			CASE 2
			;欲求不満が高くて抜け出せなかった
				PRINTFORMW 「…駄目よ…まだエッチな気分なの…%UNICODE(0x2665) *1%」
				PRINTFORMW 弁々は満足していない様子で%CALLNAME:MASTER%を解放しないでいる。
				RETURN 1
		ENDSELECT
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:318 == 1
			PRINTFORMW 「…やめなさいよ…！」
		ELSEIF TALENT:恋人
			PRINTFORMW 「…ごめんね、私、今一人で入りたい気分なの」
			PRINTFORMW 弁々は少し申し訳なさそうに%CALLNAME:MASTER%を追い出した。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…あんまり今混浴する気分じゃないわ」
			PRINTFORMW 弁々は申し訳なさそうに%CALLNAME:MASTER%を浴場から追い出した。

		ELSEIF TALENT:思慕
			PRINTFORMW 「一人で入りたいんだけど」
			PRINTFORMW 「出るまで待っててね」
			PRINTFORMW 弁々は湯船に沈みながら%CALLNAME:MASTER%を追い出した。
		ELSE
			PRINTFORMW 「…あのね」
			PRINTFORMW 「私今入ってるの、出てって」
			PRINTFORMW 弁々は顔を赤らめながら%CALLNAME:MASTER%を浴場から追い出した。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:318 == 1
			PRINTFORMW 「…こっち見ないでよ！」
			PRINTFORMW 弁々はそう怒ったように怒鳴った。
		ELSEIF TALENT:恋人
			PRINTFORMW 「お互い減るもんでもないし、好きにしなさい」
			PRINTFORMW 弁々はそれでも少し恥ずかしそうに%CALLNAME:MASTER%を見つめている。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…体、洗ってあげよっか？」
			PRINTFORMW 弁々は悪戯っぽく%CALLNAME:MASTER%を見つめている。
		ELSEIF TALENT:思慕
			PRINTFORMW 「…まあいいけど」
			PRINTFORM 「あんまりジロジロ見ないでね、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
			PRINTFORMW 弁々は胸を腕で隠して湯船に沈みながら%CALLNAME:MASTER%を見つめている。
		ELSE
			PRINTFORMW 「…！」
			PRINTFORMW 「まあいいけど…」
			PRINTFORMW 弁々は顔を赤らめながら%CALLNAME:MASTER%を見つめている。
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（怒り）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「もう！疲れてるって言ってるんだけど」
			PRINTFORMW 弁々は%CALLNAME:MASTER%を追い出してきた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「出てってよ」
			PRINTFORMW 弁々は部屋から追い出してきた。
		ELSEIF TALENT:思慕
			PRINTFORMW 「出てって」
			PRINTFORMW 弁々はそう言って%CALLNAME:MASTER%を追い出してきた。
		ELSE
			PRINTFORMW 弁々は寝床への侵入者に気づくと
			PRINTFORMW 「…出ていきなさい」
			PRINTFORMW 怒ったように追い出してきた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORM 「何？
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 、入ったら？」
			PRINTFORMW 弁々は%CALLNAME:MASTER%を招き入れた。
		ELSE
			PRINTFORMW 弁々は寝床への侵入者に気づくと
			PRINTFORMW 「…どうぞ？」
			PRINTFORMW 何気なく招き入れた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORM 「んーどうしたのよ、
		CALL MASTER_CALLNAME_K94
		PRINTFORMW ？」
		PRINTFORMW 弁々は%CALLNAME:MASTER%を招き入れた。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		IF TALENT:恋人
			PRINTFORMW 「ゴメン、今、駄目なの…」
			PRINTFORMW 弁々は%CALLNAME:MASTER%を追い出してきた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「今日は一人にして…ね」
			PRINTFORMW 弁々は部屋から追い出してきた。
		ELSEIF TALENT:思慕
			PRINTFORMW 「一人にしてくれるかしら？ごめんなさい」
			PRINTFORMW 弁々はそう言って%CALLNAME:MASTER%を追い出してきた。
		ELSE
			PRINTFORMW 弁々は寝床への侵入者に気づくと
			PRINTFORMW 「…一人にして」
			PRINTFORMW 少し怒ったように追い出してきた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		IF TALENT:恋人
			PRINTFORMW 「疲れてるから、一人にしてくれないかしら？」
			PRINTFORMW 弁々は%CALLNAME:MASTER%を追い出してきた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「ごめんなさい、疲れてるの…」
			PRINTFORMW 弁々は部屋から追い出してきた。
			PRINTFORMW 「今度、またデートしましょう」
		ELSEIF TALENT:思慕
			PRINTFORM 「私、つかれちゃった。、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 、貴方も早く帰りなさい」
			PRINTFORMW 弁々はそう言って%CALLNAME:MASTER%を追い出してきた。
		ELSE
			PRINTFORMW 弁々は寝床への侵入者に気づくと
			PRINTFORMW 「…今疲れてるんだけど？」
			PRINTFORMW 少し怒ったように追い出してきた。
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;お仕事中
;==================================================
@M_KOJO_EVENT_K94_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 == 45
			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 RAND:3 == 0
			PRINTFORMW  「♪～♪～♪～」
			PRINTFORMW  弁々は琴をかき鳴らしている
		ELSEIF RAND:2 == 0
			PRINTFORMW  「お次の曲はヘビーに行くよ！」
		ELSE
			PRINTFORMW  「懐かしくも新しい、琵琶の音を聴いてください！」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;仕事終了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
;		IF CFLAG:350 == 45
			IF RAND:3 == 0
				PRINTFORMW  「いいライブだったわね」
			ELSEIF RAND:2 == 0
				PRINTFORMW  「ふふっみんないい音出してくれたわね」
			ELSE
				PRINTFORMW  「雷鼓さんに負けないように、これからも頑張らなきゃ」
			ENDIF
;		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		IF TALENT:恋人
			PRINTFORM 「あら、美味しそう、頂戴、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
			PRINTFORMW 弁々は%CALLNAME:MASTER%の持っていたものを食べてしまった。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「それ…いただける？」
			PRINTFORMW そう言うと弁々は%CALLNAME:MASTER%の持っているものを食べてしまった。
			PRINTFORMW 「…ごめんなさい、お腹へってて…はしたないわね」
		ELSEIF TALENT:思慕
			PRINTFORMW 「…もぐもぐ…ん？」
			PRINTFORMW 弁々は%CALLNAME:MASTER%の持っていたものを食べてしまった！
		ELSE
			PRINTFORMW 「…んぐ…ごくっ…」
			PRINTFORMW 弁々はいつの間にか%CALLNAME:MASTER%の持っていたものを食べてしまった！
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（押し倒しコマンドに統合？
	;MASTERが押し倒した（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF FLAG:時間停止
			PRINTFORMW 凍てついた時の中で弁々を犯し終えた。
			PRINTFORMW 次は何をしてやろうか、肉付きのいい肉体を見ながらその場を離れていった。
		ELSEIF TALENT:恋人
			PRINTFORMW 「…ふぅ…疲れた…」
			PRINTFORM 「意外と、乱暴なのね…
			CALL MASTER_CALLNAME_K94
			PRINTFORMW …こういうの、好きよ…」
			PRINTFORMW 弁々は甘くキスをしながら名残惜しげに体を離していった。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…終わり…？」
			PRINTFORMW 弁々は名残惜しげに体を離していった。
			PRINTFORMW 「ん…好き…%UNICODE(0x2665) *1%」
		ELSEIF TALENT:思慕
			PRINTFORM 「…好きよ…
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
			PRINTFORMW 弁々は名残惜しげに体を離していった。
		ELSE
			PRINTFORMW 「…あら、もうお終い？」
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;添い寝を始めた（開始時）(存在せず
	;記入チェック
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;添い寝を終了した（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;時止め終了時
;==================================================
@M_KOJO_EVENT_K94_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 「あ゛っ%UNICODE(0x2665) *1%ああっ%UNICODE(0x2665) *1%」
			PRINTFORMW 弁々は唐突な快感に身悶えしている。
			PRINTFORMW 「や…%UNICODE(0x2665) *1%…何でもないわ…%UNICODE(0x2665) *1%」
			PRINTFORMW 弁々は快楽に耐えながら必死に何でもない風を装っている。
			PRINTFORMW （これ…気持ちよくて…%UNICODE(0x2665) *1%）
		ELSE
			PRINTFORMW 「～～～%UNICODE(0x2665) *1%」
			PRINTFORMW 弁々はビクッと体を震わせ
			PRINTFORMW 「大丈夫、…平気、よ…」
			PRINTFORMW （…今の…何なのかしら…）
			PRINTFORMW 弁々はあまり経験のない快楽に涙目になっている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕
			PRINTFORMW 「～%UNICODE(0x2665) *1%～%UNICODE(0x2665) *1%～%UNICODE(0x2665) *1%」
			PRINTFORMW 弁々は一瞬でへたり込んでしまい何があったのか理解できないようだ。
			PRINTFORMW 「…な…何よ…もう…%UNICODE(0x2665) *1%」
			PRINTFORMW 彼女はよろめきながらも立ち上がった。
		ELSE
			PRINTFORMW 「んっ%UNICODE(0x2665) *1%」
			PRINTFORMW 「…や…ぁ…%UNICODE(0x2665) *1%」
			PRINTFORMW 突然快楽を叩き込まれた弁々はうずくまってしまった。
			PRINTFORMW 「何だってのよ…もう…%UNICODE(0x2665) *1%」
			PRINTFORMW 弁々は困惑しながら体に手を回して泣いている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;パンツ紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		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 弁々は至極不快そうな顔をしながらゆっくりとどうにか精液を飲み下した。
			ELSE
				PRINTFORMW 「…ん！？」
				PRINTFORMW 弁々は突然口を押さえ体を震わせながら膝から崩れ落ちた。
				PRINTFORMW 「うぇ…んん…」
				PRINTFORMW 口内に残る子種をどうにかして処理しようか寸瞬迷った後
				PRINTFORMW 「ん…んっく…」
				PRINTFORMW 飲み込むことにしたようだ。
				PRINTFORMW 「何よ…もう…」
			ENDIF
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
			PRINTFORMW 「うぇ！？」
			PRINTFORMW 「んっおぇ…」
			PRINTFORMW 弁々は突然口内に現れたザーメンの臭いと苦味に顔をしかめ咳き込んだ。
			PRINTFORMW 「何が…いきなり…」
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
			PRINTFORMW 「！？」
			PRINTFORMW 「ん…うっ…くっ…」
			PRINTFORMW 弁々は何でもない風を装いながら口を押さえている…
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
			PRINTFORMW 「…んぇ！？」
			PRINTFORMW 弁々は突然口の中に流し込まれたザーメンを恐る恐る飲み下した。
			PRINTFORMW 「…んっ…変なの…」
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
			PRINTFORMW 「…んん！？」
			PRINTFORMW 弁々は突然口の中に流し込まれた濃厚な精液を吐き出した。
			PRINTFORMW 「…うぇ…おぇ…」
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
			PRINTFORMW 「…ん！？」
			PRINTFORMW 弁々は突然口の中に流し込まれた濃厚なザーメンを恐る恐る飲み下した。
			PRINTFORMW 「…んっ…美味し…%UNICODE(0x2665) *1%」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;幼稚持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
			PRINTFORMW 「…え！？」
			PRINTFORMW 弁々は顔面にへばりついた精液に気がつくと
			PRINTFORMW 「何…？…何だってのよ…」
			PRINTFORMW 取り乱しながら拭い取った。
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
			PRINTFORMW 「…！？」
			PRINTFORMW 弁々は顔面にへばりついた精液に気がつくと
			PRINTFORMW 「…あら…美味しい…%UNICODE(0x2665) *1%」
			PRINTFORMW 美味しそうに舐めとった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
			PRINTFORMW 「…うっ！？」
			PRINTFORMW 弁々は手にへばりついた精液に気がつくと
			PRINTFORMW 「…何よこれ…」
			PRINTFORMW 取り乱しながら拭い取った。
		;舐めとり
		ELSEIF ARG:1 == 2
			PRINTFORMW 「…えぇ…」
			PRINTFORMW 弁々は手にへばりついた精液に気がつくと
			PRINTFORMW 「ん…れろ…変な味…%UNICODE(0x2665) *1%」
			PRINTFORMW 妖艶に舐めとった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚アナル射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚0
		IF ARG:1 == 1
			PRINTFORMW 「いぎぃ！何！？」
			PRINTFORMW 弁々はアナルに違和感を覚えたが、その正体まではわからないようだ。
		;ソレ以外
		ELSEIF ARG:1 == 2
			PRINTFORMW 「…ひぃっ！？」
			PRINTFORMW 弁々はアナルの違和感に気づくと
			PRINTFORMW 「…何！？何が…」
			PRINTFORMW お尻を押さえながら辺りを睨みつけている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW 「…っ！？」
		PRINTFORMW 弁々は下腹部の鈍痛に顔をしかめると
		PRINTFORMW 「…な…何…？」
		PRINTFORMW 唇を噛み締めながら悪寒に冷や汗をかいている。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精ピルなし
		IF ARG:1 == 1
			PRINTFORMW 「…！？」
			PRINTFORMW 弁々は膣内の違和感に気づくと
			PRINTFORMW 「何…何よ…もう…」
			PRINTFORMW 取り乱しながら下腹部を押さえている。
		;非処女膣内射精ピルあり
		ELSEIF ARG:1 == 2
			PRINTFORMW 「えっ！？」
			PRINTFORMW 弁々は下半身の違和感に気づくと
			PRINTFORMW 「…大丈夫…よね…飲んでるし…」
			PRINTFORMW 何やら薬を飲んでいるようだ。
		;処女膣内射精
		ELSEIF ARG:1 == 3
			PRINTFORMW 「…いっ！？」
			PRINTFORMW 弁々は下半身の鈍痛と違和感に気づくと
			PRINTFORMW 「…何よ…やだ…！」
			PRINTFORMW 下半身から漏れ出る精液に取り乱しながら半泣きになっている。
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K94_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORMW 「生でしたい？」
			PRINTFORM 「そういうの、まだ
			CALL MASTER_CALLNAME_K94
			PRINTFORMW には早いと思うわ」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…生エッチ？」
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			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 弁々は少し伏し目がちになりながら拒否してきた。
		ELSE
			PRINTFORMW 「…駄目よ」
			PRINTFORMW 弁々はキッパリと断った。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORMW 「駄目って言ってるの」
			PRINTFORMW 「聞き分けのない人は嫌いよ」
			PRINTFORMW 八橋弁々はなおも拒否してきた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…何度言ったら分かるの？」
			PRINTFORMW 「駄目って言ってるんだけど！」
			PRINTFORMW 弁々は睨みつけながら拒否してきた。
		ELSE
			PRINTFORMW 「…駄目ったら駄目よ！」
			PRINTFORMW 弁々は声を荒げながらキッパリと断った。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF TALENT:恋人
			PRINTFORMW 「いいけど」
			PRINTFORMW 「危険日は駄目よ」
			PRINTFORMW 弁々は妥協した。
			PRINTFORM 「…
			CALL MASTER_CALLNAME_K94
			PRINTFORMW だけだからね？こういうことするのは」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…こういうの、悪くはないけどもさ」
			PRINTFORMW 「いいわ、こっちの方が気持ちよさそうだもの」
		ELSE
			PRINTFORMW 「…別にいいけど」
			PRINTFORMW 「子供は嫌よ」
			PRINTFORMW 弁々は少し考えた後妥協することにした。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF TALENT:恋人
			PRINTFORMW 「…わかったわ」
			PRINTFORMW 「子供、作りましょう」
			PRINTFORMW 弁々は覚悟を決めたように表情を強張らせながらも笑顔を作ってみせた。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…あんまりこういうこと、詳しくないけど」
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW との子供欲しいな」
		ELSE
			PRINTFORMW 「…いいわ」
			PRINTFORMW 「…でも付喪神でも孕むのかしら？」
			PRINTFORMW 弁々は少し意地悪そうにそう言った。
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K94_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 「こういうの、もっと喜ぶべきかしら？」
		PRINTFORM 「でもね、
		CALL MASTER_CALLNAME_K94
		PRINTFORMW と暮らせるってだけよりもこれから暮らしていく中で幸せを見つけたいじゃない？」
		PRINTFORMW 彼女はそう言いながら%CALLNAME:MASTER%に抱きついてきた。
		PRINTFORMW 「…ふふっ…」
		PRINTFORM 「愛してるわ、
		CALL MASTER_CALLNAME_K94
		PRINTFORMW …」
		PRINTFORMW こうして弁々との新生活が始まった。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「…あら、そう…」
		PRINTFORMW 弁々は少し表情を崩しながら
		PRINTFORMW 「残念ね」
		PRINTFORMW 落胆したようにそう口にした。
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K94_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_K94
			PRINTFORMW 」
			PRINTFORMW 「体、気をつけてね」
			PRINTFORMW 弁々はそう言うと元気よく飛び去っていった。
		ELSEIF TALENT:恋慕
			PRINTFORM 「じゃあ、また今度ね、
			CALL MASTER_CALLNAME_K94
			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:恋人
			PRINTFORM 「じゃあ、お別れね、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW 」
			PRINTFORMW 「また、明日デートしましょう」
			PRINTFORMW 弁々はそう言うと元気よく飛び去っていった。
		ELSEIF TALENT:恋慕
			PRINTFORM 「それじゃ、バイバイ、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW ！」
			PRINTFORMW そう言うと弁々は飛び去っていった。
		ELSEIF TALENT:思慕
			PRINTFORMW 「さよなら、また今度ね」
			PRINTFORMW 弁々はそう言って飛び去っていった。
		ELSE
			PRINTFORMW 「また、デートしましょう」
			PRINTFORMW 弁々はいつの間にか飛び去っていってしまっていた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF CFLAG:318 == 1
			PRINTFORMW 「………」
			PRINTFORMW 弁々は無言で見送った。
		ELSEIF TALENT:恋人
			PRINTFORM 「この辺でいいわよ、じゃあね、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW ♪」
			PRINTFORMW 弁々はそう言うと元気よく飛び去っていった。
		ELSEIF TALENT:恋慕
			PRINTFORM 「じゃあ、ここでお別れね、
			CALL MASTER_CALLNAME_K94
			PRINTFORMW も元気でね」
			PRINTFORMW そう言うと弁々は飛び去っていった。
		ELSEIF TALENT:思慕
			PRINTFORMW 「また、今度ね」
			PRINTFORMW 弁々はそう言って飛び去っていった。
		ELSE
			PRINTFORMW 「それじゃ、私、帰るわ」
			PRINTFORMW 弁々はいつの間にか飛び去っていってしまっていた。
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K94_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 弁々は帰宅すると布団の中で思慕に耽っていた。
		PRINTFORMW 「…」
		PRINTFORM 「…
		CALL MASTER_CALLNAME_K94
		PRINTFORMW …好き…」
		PRINTFORMW 弁々は%CALLNAME:MASTER%への想いを募らせながらも少し自身の立場を考えていた。
		PRINTFORMW 私は八橋の姉で、付喪神で、%CALLNAME:MASTER%と釣り合うのか。
		PRINTFORMW 自分はとりわけ、人間という生き物を信用していないというわけではない。
		PRINTFORMW だが、結局のところ人間に影響され、感化されている。
		PRINTFORMW どこまで行っても主体性を持てず、あの異変から何も変わらないのではないだろうか。
		PRINTFORMW 「私はどうしたいのかしら？」
		PRINTFORMW 所詮自分自身が望まれて産まれたわけでもなくあの忌々しい正義面した連中の産物でしか無いという現実。
		PRINTFORMW そんな自分を愛してくれるのだろうか。
		PRINTFORMW （結局女ね…私）
		PRINTFORMW そういうことを考えてもあまりいい気分ではない、一度微睡みに落ちて頭を切り替えよう。
		PRINTFORM 「…おやすみなさい、
		CALL MASTER_CALLNAME_K94
		PRINTFORMW …」
		PRINTFORMW 自分の手で自分の想いぐらいは成就してみせる―――
		PRINTFORMW 野心でも大望でもない、ちっぽけな誓いを彼女は立てた。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 弁々は床につく準備をしながら明日のことを考えていた。
		PRINTFORMW 「…%CALLNAME:MASTER%…ね」
		PRINTFORMW %CALLNAME:MASTER%の名前を呟きながら忘れないようにと口に手を当てた。
		PRINTFORMW （次、いつ会えるかしら…？）
		PRINTFORMW 少し名残惜しげな表情を浮かべながら彼女は床についた。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 弁々は情欲に苛まされながら%CALLNAME:MASTER%の名前を呼び続けている。
		PRINTFORMW 「…%CALLNAME:MASTER%…%UNICODE(0x2665) *1%」
		PRINTFORMW 「私…好きよ…%UNICODE(0x2665) *1%」
		PRINTFORMW 火照りのある体を押さえつけながら彼女は目を瞑って%CALLNAME:MASTER%の姿を思い浮かべていた。
		PRINTFORMW （もう…なんでもいいから%CALLNAME:MASTER%に会いたい…%UNICODE(0x2665) *1%）
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 弁々は床につく準備をしながら物思いに耽っていた。
		PRINTFORMW 「…%CALLNAME:MASTER%…私は…」
		PRINTFORMW %CALLNAME:MASTER%の名前を呟きながら少し悲しげな表情を浮かべる。
		PRINTFORMW （私、何番目でもいいから、%CALLNAME:MASTER%と…）
		PRINTFORMW 物憂げな表情を表しながら彼女は覚悟を決めた。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;セフレ取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW 弁々は情欲混じりの汗を流しながら物思いに耽っていた。
		PRINTFORMW 「…%CALLNAME:MASTER%…」
		PRINTFORMW %CALLNAME:MASTER%の名前を呟きながら下半身に手を伸ばしている。
		PRINTFORMW （セックス…したいな…%UNICODE(0x2665) *1%）
		PRINTFORMW 感じたことのない情欲に苛まされながら彼女は眠りについた。
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K94_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;通常自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同居時自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;中だし精液自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無知持ち（自慰経験(調教自慰経験は差し引き)による分岐あり
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		LOCAL:2 = EXP:自慰経験 - EXP:調教自慰経験
		;無知消去イベントあり（表示は一度だけ
		IF LOCAL:1 >= 25
		;地の文分岐。書きたい場合は[SKIPSTART][SKIPEND]を削除してください
		[SKIPSTART]
		ELSEIF LOCAL:1 >= 20
		ELSEIF LOCAL:1 >= 15
		ELSEIF LOCAL:1 >= 10
		ELSEIF LOCAL:1 >= 5
		[SKIPEND]
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質あり自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;-------------------------------------------------
		;Ｂ敏感orＢ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ａ敏感orＡ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｃ敏感orＣ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｖ敏感orＶ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部位指定無し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			PRINTFORML
			RETURN 1
		ENDIF
		;その他
		;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;尻穴膣腔同時
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;膣腔のみ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;その他
		;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;我慢
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	IF TALENT:恋人
		PRINTFORMW 「んんっ…%UNICODE(0x2665) *1%…あっ…%UNICODE(0x2665) *1%」
		PRINTFORMW 「%CALLNAME:MASTER%…%UNICODE(0x2665) *1%…%UNICODE(0x2665) *1%」
		PRINTFORMW 弁々は激しく自慰行為をしながら物思いに耽っている。
	ELSEIF TALENT:恋慕
		PRINTFORMW 「んあっ…%UNICODE(0x2665) *1%あっ…%UNICODE(0x2665) *1%」
		PRINTFORMW 「…んんっ…%UNICODE(0x2665) *1%」
	ELSEIF TALENT:思慕
		PRINTFORMW 「あっ%UNICODE(0x2665) *1%…んっ…%UNICODE(0x2665) *1%」
		PRINTFORM 「…
		CALL MASTER_CALLNAME_K94
		PRINTFORMW …%UNICODE(0x2665) *1%」
	ELSE
		PRINTFORMW 「…ん…%UNICODE(0x2665) *1%」
		PRINTFORMW 「…ああっ…%UNICODE(0x2665) *1%」
	ENDIF
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K94_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:318 == 1
			PRINTFORMW 「…変態！」
		ELSEIF TALENT:恋人
			PRINTFORMW 「何？一緒にお風呂入りたいの？」
			PRINTFORMW 「…ふふっまた今度ね%UNICODE(0x2665) *1%」
			PRINTFORMW 弁々は悪戯っぽく微笑みながら混浴を拒否した。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「お風呂ですって？」
			PRINTFORMW そう言うと弁々は少し考えた後
			PRINTFORMW 「…ダメよ」
			PRINTFORMW 断ることにしたようだ。
		ELSEIF TALENT:思慕
			PRINTFORMW 「…そういうの、よくないわよ」
			PRINTFORMW 弁々はそう言って混浴を拒否した。
		ELSE
			PRINTFORMW 「嫌よ」
			PRINTFORMW 弁々はきっぱりと混浴を拒否している。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「混浴ね」
			PRINTFORMW 「いいわよ、私、八橋で慣れてるから人の体洗うの得意なの」
			PRINTFORMW 弁々はそう言うと手を繋いできた。
			PRINTFORM 「
			CALL MASTER_CALLNAME_K94
			PRINTFORMW …いい体してるわね…意外と…♪」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…一緒に入りたいって？」
			PRINTFORMW そう言うと弁々は少し考えた後
			PRINTFORMW 「いいわ、こういうの嫌いじゃないし」
			PRINTFORMW 混浴を許可した。
			PRINTFORMW 「体、綺麗にしてあげるわ」
		ELSEIF TALENT:思慕
			PRINTFORMW 「…構わないわ」
			PRINTFORMW 弁々は湯船に浸かりながらそう言って混浴を許可した。
		ELSE
			PRINTFORMW 「ふぅん…そういう趣味なのね」
			PRINTFORMW 弁々はそう言いながら混浴を許可した。
		ENDIF
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K94_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORM 「…ふふっ、
		CALL MASTER_CALLNAME_K94
		PRINTFORMW の子…か」
		PRINTFORMW 弁々は胎内の命の鼓動を感じると優しく腹部を撫でている。
		PRINTFORMW 「あんたの子…ちゃんと産むからね…」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORM 「…
		CALL MASTER_CALLNAME_K94
		PRINTFORMW の子…」
		PRINTFORMW 弁々は胎内の命の鼓動を感じると優しく腹部を撫でている。
		PRINTFORMW 「…付喪神でも母親になれるものなのね」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORM 「…
		CALL MASTER_CALLNAME_K94
		PRINTFORMW …孕ませた責任は取ってもらうからね…」
		PRINTFORMW 弁々は胎内の命の鼓動を感じると優しく腹部を撫でている。
		PRINTFORMW 「ふふっ…今、動いた…」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「うっ…ぇ…」
		PRINTFORMW 弁々は見に覚えのない嗚咽とともに不快感を示している。
		PRINTFORMW 「やだ…何よ…！」
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K94_25(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「ひっひっ…ふぅ…」
		PRINTFORMW 弁々は新しい命を出産すると子供にほほえみかけた。
		PRINTFORMW 「…%CALLNAME:MASTER%、産まれたよ…」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「ひっ…ふぅ…うぅ…」
		PRINTFORMW 弁々は新しい命を出産すると子供にほほえみかけた。
		PRINTFORMW 「…苦しい…ものね…」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 「ひっ…ひっ…ふぅ…」
		PRINTFORMW 弁々は新しい命を出産すると子供にほほえみかけた。
		PRINTFORMW 「…うん、私、頑張るから…」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「あぁ…うぅ…」
		PRINTFORMW 弁々は新しい命を出産すると虚ろな目で子供にほほえみかけた。
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K94_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 「で、何よ、もう…」
				PRINTFORMW 弁々は顔を赤らめながら取り繕っている。
			ELSEIF TALENT:恋慕
				PRINTFORMW 「！？」
				PRINTFORMW 「ノックも出来ないの？」
			ELSEIF TALENT:思慕
				PRINTFORMW 「ノックぐらいしなさいよ、人間のくせに…」
				PRINTFORMW 弁々はそう言いながら顔を赤らめている。
			ELSE
				PRINTFORMW 「………」
				PRINTFORMW 「…馬鹿！」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;何もしない
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「…甲斐性も無いのね」
				PRINTFORMW 弁々はそう言いながら睨みつけてくる。
			ELSEIF TALENT:恋人
				PRINTFORMW 「…もう！」
				PRINTFORMW 「…ま、悪くはないけど…」
				PRINTFORMW 弁々はそう呟いた。
			ELSEIF TALENT:恋慕
				PRINTFORMW 「…あら？」
				PRINTFORMW 弁々は顔を真っ赤にしながら放置される屈辱を味わっている。
				PRINTFORMW 「…こういうの、ゾクゾクするわね…%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「…あらやだ」
				PRINTFORMW （面倒なことにならなきゃいいけど…）
				PRINTFORMW 弁々は顔を真っ青にしながらそう思案した。
			ELSE
				PRINTFORMW 「…やぁねぇ…」
				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 「…ん…いいわよ…」
				PRINTFORMW 「…見ててね…気持ちよくなるからっ…%UNICODE(0x2665) *1%」
				PRINTFORMW 弁々は%CALLNAME:MASTER%に見られながら興奮を味わっている。
			ELSEIF TALENT:恋慕
				PRINTFORM 「…
				CALL MASTER_CALLNAME_K94
				PRINTFORMW …見ててね…%UNICODE(0x2665) *1%」
				PRINTFORMW 弁々は顔を真っ赤にしながら痴態を続けている。
				PRINTFORMW 「好き…%UNICODE(0x2665) *1%…あっ…%UNICODE(0x2665) *1%…んっ…%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「…んっ…こういうのっ…いい…%UNICODE(0x2665) *1%」
				PRINTFORMW （見ててね…%UNICODE(0x2665) *1%）
			ELSE
				PRINTFORMW 「…んんっ…%UNICODE(0x2665) *1%」
				PRINTFORMW 弁々は口を押さえながらオナニーを続けている。
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;追い出し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「…出ていきなさい！」
				PRINTFORMW 弁々は怒って追い出してきた。
			ELSEIF TALENT:恋人
				PRINTFORMW 「…出ていって！」
				PRINTFORMW 「…一人に…してくれないかしら？」
				PRINTFORMW 弁々はしどろもどろに追い出してきた。
			ELSEIF TALENT:恋慕
				PRINTFORMW 「…出ていきなさい」
				PRINTFORMW 弁々は顔を真っ赤にしながら追い出してきた。
				PRINTFORMW （こんなところ見られたくはなかった…！）
			ELSEIF TALENT:思慕
				PRINTFORMW 「…出ていってよ」
				PRINTFORMW 「…今は…今はだめよ…！」
				PRINTFORMW 弁々は顔を真っ赤にしながらそう言って追い出してきた。
			ELSE
				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 「…いいわ…」
				PRINTFORM 「…
				CALL MASTER_CALLNAME_K94
				PRINTFORMW …滅茶苦茶にして…%UNICODE(0x2665) *1%」
				PRINTFORM 「ふふっ、私、
				CALL MASTER_CALLNAME_K94
				PRINTFORMW の所有物だもの…%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「…ん？」
				PRINTFORMW 弁々は少し考えた後。
				PRINTFORMW 「…こういうのも、悪くはないかもね」
				PRINTFORMW 情事を許可した。
			ELSEIF TALENT:思慕
				PRINTFORMW 「あんた、この状況で…別にいいけど」
				PRINTFORMW 弁々は覚悟を決めたようにまぐわうことに許可した。
			ELSE
				PRINTFORMW 「…あんたの好きにすればいいわ」
				PRINTFORMW 弁々は諦めたように押し倒されている。
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;事後
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「…やだ…もう！」
				PRINTFORMW 弁々は何も言わず倒れ込んでいる。
			ELSEIF TALENT:恋人
				PRINTFORMW 「…んあっ…%UNICODE(0x2665) *1%」
				PRINTFORM 「…
				CALL MASTER_CALLNAME_K94
				PRINTFORMW …大好き…%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORM 「…
				CALL MASTER_CALLNAME_K94
				PRINTFORMW …好き…%UNICODE(0x2665) *1%」
				PRINTFORMW 弁々は顔を真っ赤にしながら横になっている。
			ELSEIF TALENT:思慕
				PRINTFORMW 「ん～%UNICODE(0x2665) *1%」
				PRINTFORMW 「あんた、上手いのね…%UNICODE(0x2665) *1%」
				PRINTFORMW 弁々は顔を真っ赤に上気させながらそう言った。
			ELSE
				PRINTFORMW 「やだ…%UNICODE(0x2665) *1%…んもう…%UNICODE(0x2665) *1%」
				PRINTFORMW （こっちの方がいいわね…%UNICODE(0x2665) *1%）
				PRINTFORMW 弁々は行為の嗚咽を未だ漏らしながらその行為に思いを馳せていた。
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 6
		;事後お泊り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「…居直り強盗ってわけ？」
				PRINTFORMW 弁々は渋々%CALLNAME:MASTER%の宿泊を認めた。
			ELSEIF TALENT:恋人
				PRINTFORM 「…好きよ…
				CALL MASTER_CALLNAME_K94
				PRINTFORMW …もう少しこのまま…%UNICODE(0x2665) *1%」
				PRINTFORMW 「今日は帰さないわよ…%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORM 「…
				CALL MASTER_CALLNAME_K94
				PRINTFORMW …もう少しこのまま…%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「ん？」
				PRINTFORMW 「泊まるのは別にかまわないけど…」
			ELSE
				PRINTFORMW 「…別にいいけど」
				PRINTFORMW 「部屋の片付けぐらいはさせてもらうわよ」
			ENDIF
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF

;==================================================
;相手からデートのお誘い
;==================================================
@M_KOJO_EVENT_K94_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「デートしましょ、%CALLNAME:MASTER%」
			ELSEIF TALENT:恋慕
				PRINTFORM 「…ねえ、デートしない？
				CALL MASTER_CALLNAME_K94
				PRINTFORMW が良ければだけど…」
			ELSEIF TALENT:思慕
				PRINTFORMW 「あんた、今暇してる？」
				PRINTFORMW 「ちょっと付き合ってほしいんだけど…ダメ？」
			ELSE
				PRINTFORMW 「ねえ、ちょっと付き合ってくれないかしら？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORM 「ありがと、好きよ、
				CALL MASTER_CALLNAME_K94
				PRINTFORMW 」
			ELSEIF TALENT:恋慕
				PRINTFORM 「
				CALL MASTER_CALLNAME_K94
				PRINTFORMW って付き合いがいいのね、他の娘にも同じようなのかしら？」
			ELSEIF TALENT:思慕
				PRINTFORMW 「ふふっ、デート、みたいねこれ」
				PRINTFORMW 「…あんまり調子に乗らないでよ？」
			ELSE
				PRINTFORMW 「ありがと、何か奢ってあげるわ」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「あら、残念ね」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「そう…残念」
			ELSEIF TALENT:思慕
				PRINTFORMW 「…そう、忙しそうね、ごめんなさい」
			ELSE
				PRINTFORMW 「あら、忙しいのね」
			ENDIF
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K94_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
				IF RAND:3 == 0
					PRINTFORMW 「ん…これでいいの？」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「…あまりジロジロ見ないでよ…」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%も脱ぎなさい♪」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;下着姿にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「逆に恥ずかしいわね…これ」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「もう…サイズが合うのがないんだから…」
				ELSE
					PRINTFORMW （こういうので興奮するんだ…）
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱ぎ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「意外と好きかもしれないわ…これ」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「ふふっ、興奮するじゃない♪」
				ELSE
					PRINTFORMW 「どんな音を奏でてくれるのかしら…%UNICODE(0x2665) *1%」
				ENDIF
			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 「それじゃあ貴方のパンツも頂戴♪」
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「じゃあ、これ、いっぱい使っていいからね♪」
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「ま、まあ…いいわよ…」
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「嫌よ、変態…」
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;怒り口上
;==================================================
@M_KOJO_EVENT_K94_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの度胸で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「……」
		PRINTFORMW 弁々はギロッと%CALLNAME:MASTER%を睨みつけている……
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;泣かせてしまった　[臆病]持ち
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;疲れた
		PRINTFORMW 「…さすがに疲れちゃったわ」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;満足して解放
		PRINTFORMW 「んー、気持ちよかった♪」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;満足したところを押し倒された
		PRINTFORMW 「んっ、もう…スケベ…」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;壊れるまでしてあげる
		PRINTFORMW 「いいの？私、激しいわよ？」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;呼び捨て用関数
;==================================================
;-------------------------------------------------
@MASTER_CALLNAME_K94
;-------------------------------------------------
IF CFLAG:94:1900 == 1
	PRINTFORM お兄ちゃん
ELSEIF CFLAG:94:1901 == 1
	PRINTFORM 兄さん
ELSEIF CFLAG:94:1902 == 1
	PRINTFORM お姉ちゃん
ELSEIF CFLAG:94:1903 == 1
	PRINTFORM 姉さん
ELSE
	PRINTFORM %CALLNAME:MASTER%
ENDIF

[SKIPSTART]
;-------------------------------------------------
;オナバレ遭遇時の地の文。
;デフォルトのものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K94_ONABARE_1(ARG)
;-------------------------------------------------
IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレでそのまま続けてもらう場合の地の文。
;デフォルトのものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K94_ONABARE_2(ARG)
;-------------------------------------------------
IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレなし崩しックスの地の文。
;デフォルトのものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K94_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]

repo_name: akadiya/eratw

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

license: unknown