code:
;-------------------------------------------------
;eraTW4.872用 黒駒早鬼口上
;-------------------------------------------------
;※コンセプト
;你を地上侵攻への先兵にしようと企むが絆されてって貂プレみたいなやちぇ組長口上
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。

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

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

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

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

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

;眠姦口上有、時間停止口上有、扮演に1を入れると、それぞれ時間停止時、眠姦時、扮演時に指令口上が読み込まれるように
;入れないと時間停止時、眠姦時、扮演時は一切喋りません
;CFLAG:X:眠姦口上有 = 0
;CFLAG:X:時間停止口上有 = 0
;CFLAG:X:扮演口上有 = 0

;破瓜中止口上有に1を入れると、@M_KOJO_EVENT_KX_LOST_VIRGIN_STOPで中止の成否を操作できます
;CFLAG:X:破瓜中止口上有 = 0

;口上内抱き寄せ判定_初回と口上内抱き寄せ判定_通常に1を入れると、M_KOJO_EVENT_KX_PERMISSIONで推倒の成否を操作できます
;CFLAG:X:口上内抱き寄せ判定_初回 = 0
;CFLAG:X:口上内抱き寄せ判定_通常 = 0

;推倒禁止に1を入れると、主动推倒てこなくなります
;以下は恋慕か炮友がつくまで推倒てこなくなる使用例
;IF !TALENT:X:恋慕 && !TALENT:X:炮友
;	CFLAG:X:推倒禁止 = 1
;ELSE
;	CFLAG:X:推倒禁止 = 0
;ENDIF

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

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

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

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

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K133
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
	PRINTFORMW 「嗯？那邊的你、等一下！」
	PRINTFORMW %CALLNAME:MASTER%轉過頭，看到一個戴著牛仔帽、黑色馬尾的女孩子正站在那裡，像個仁王立著。
	PRINTFORMW 「不……好像不對，但總感覺看起來很眼熟……」
	PRINTFORMW 這樣說完之後，她重新振作了起來，再次打招呼。
	PRINTFORMW 「嗯，好像沒什麼了不起的樣子......但又好像有點厲害呢......」
	PRINTFORMW 「失禮了，我是勁牙組組長－驪駒早鬼！」
	PRINTFORMW 「畜生界最強的頸牙組，正在考慮入侵人間界，所以需要多些人手！」
	PRINTFORMW 「你也可以加入頸牙組！」
	CALL ASK_YN("是","否")
	IF !RESULT
		PRINTFORMW 「嘿嘿嘿，不錯的回答！和吉弔可不一樣！」
		PRINTFORMW 「不過頸牙組是實力主義至上，所以你現在要好好鍛煉身體哦！」
		PRINTFORMW 「等到正式侵略人間界的時候，我會讓你派上用場的！」
	ELSE
		PRINTFORMW 「咦？拒絕？真是太殘忍了……」
		PRINTFORMW 「不過頸牙組是實力主義至上，所以你現在要好好鍛煉身體哦！」
		PRINTFORMW 「等到正式侵略人間界的時候，我會讓你派上用場的！」
	ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K133_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
;地の文
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
IF LOCAL
	PRINTFORMW 「%CALLNAME:MASTER%，今天謝謝你陪我約會了」
	PRINTFORMW 早鬼說著一邊站在了%CALLNAME:MASTER%面前，擋住了去路。
	PRINTFORMW  「我有一件東西要給你，稍等一下」
	PRINTFORMW 早鬼張開翅膀包裹住兩人，溫柔地擁抱了%CALLNAME:MASTER%。
	PRINTFORMW 接著，注視著%CALLNAME:MASTER%的臉——
	PRINTFORMW 「嗯……」
	PRINTFORMW 「……抱歉，我只能給你這個了」
	PRINTFORMW 接吻結束後，她有點傷心地笑著轉過頭，飛走了。
	PRINTFORMW
	PRINTFORMW （……吉吊的話應該能更聰明地接吻吧）
	PRINTFORMW （我……好像做不到那麼好）
	PRINTFORMW 早鬼在回家的路上，自嘲地想著。
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K133_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(1130)
			PRINTFORMW 「喂%CALLNAME:MASTER%，你願意和我交往嗎？」
			PRINTFORMW 早鬼在約會回去的路上突然告白了。
			PRINTFORMW 「我不知道該怎麼向喜歡的人告白」
			PRINTFORMW 「所以只能這麼做了」
			PRINTFORMW 「我從出生到現在，甚至死後都沒有喜歡上多少人」
			PRINTFORMW 「這份感情……現在一定要傳達出去！」
			PRINTFORMW 「跟我交往吧！成為我的戀人吧，%CALLNAME:MASTER%！」
		;二回目の告白
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%，我現在的實力比以前更強了」
			PRINTFORMW 早鬼將手放在胸前，像是做好了覺悟一樣醞釀著要說的話。
			PRINTFORMW 「而且，我喜歡著你，但你卻不喜歡我，這不公平吧？」
			PRINTFORMW 「所以......跟我交往吧！！！」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「嗯！我就知道你會這麼說的！%CALLNAME:MASTER%！」
		PRINTFORMW 早鬼這麼說著，略微低下身子，並凝視著%CALLNAME:MASTER%的眼睛。

		PRINTFORMW 「但是就算成為戀人了，我還是不知道該做些什麼啊！」
		PRINTFORMW 雖然這麼說著，但早鬼還是直接吻了。
		PRINTFORMW 「嗯……就這樣，我們一起走到世界盡頭，彰顯我們的愛吧！」
		PRINTFORMW 早鬼興奮地高聲宣佈。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「……我會更加鍛鍊自己，有朝一日一定會吸引%CALLNAME:MASTER%的目光的！」
		PRINTFORMW 早鬼露出些微生硬的微笑。
		PRINTFORMW （難受啊，一直傳不達心意……）
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_SPEVENT_K133_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		IF CFLAG:318 == 1
			PRINTFORMW 「……已經要回去了」
			PRINTFORMW 早鬼這樣說完就走了。
		ELSEIF TALENT:恋人
			PRINTFORMW 「今天玩得很開心！」
			PRINTFORMW 「明天也約會吧！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「今天非常開心，所以明天也會來見你的！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「呼呼呼，今天真是美好的一天！還要再一起玩！」
		ELSE
			PRINTFORMW 「跟人類約會也不壞啊！那就拜拜了！」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K133_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;今日会ってない。
	IF !TCVAR:130:今天有否见面
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;MASTERが入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
			;仕事中、今日会ってない。
			IF CFLAG:行動 == 5 && !TCVAR:130:今天有否见面
				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_K133
				ELSEIF CFLAG:318 == 1
					PRINTFORMW 「......我現在心情不好，會踢人的」
				ELSE
					;早朝
					IF TIME:2 == 1 || TIME:2 == 2
						PRINTFORMW 「早安啊， %CALLNAME:MASTER%！」
					;昼
					ELSEIF TIME:2 == 3 || TIME:2 == 4
						PRINTFORMW 「午安啊， %CALLNAME:MASTER%」
					;夕方・夜
					ELSEIF TIME:2 == 5 || TIME:2 == 6
						PRINTFORMW 「晚上好， %CALLNAME:MASTER%」
					ENDIF
					IF TALENT:恋人
						PRINTFORMW 「來看我了嗎！真開心！」
					ELSEIF TALENT:恋慕
						PRINTFORMW 「特地來看我真是太好了啊！」
					ELSEIF TALENT:思慕
						PRINTFORMW 「你這麼有空來找我嗎？不過，很高興啦」
					ENDIF
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 2
			;仕事中、今日会ってない。
			IF CFLAG:行動 == 5 && !TCVAR:130:今天有否见面
				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_K133
				ELSEIF CFLAG:318 == 1
					PRINTFORMW 「......我現在心情不好，會踢人的」
				ELSE
					;早朝
					IF TIME:2 == 1 || TIME:2 == 2
						PRINTFORMW 「早安啊， %CALLNAME:MASTER%！」
					;昼
					ELSEIF TIME:2 == 3 || TIME:2 == 4
						PRINTFORMW 「午安啊， %CALLNAME:MASTER%」
					;夕方・夜
					ELSEIF TIME:2 == 5 || TIME:2 == 6
						PRINTFORMW 「晚上好， %CALLNAME:MASTER%」
					ENDIF
					IF TALENT:恋人
						PRINTFORMW 「追蹤你的氣味居然找到這裡來了！該怎麼辦呢？」
					ELSEIF TALENT:恋慕
						PRINTFORMW 「你的藏身之處真是明顯啊！不是藏的很隱密真是太好了！」
					ELSEIF TALENT:思慕
						PRINTFORMW 「呼–嗯，在做什麼呢？」
					ENDIF
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて一緒に入る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 3
			IF TALENT:恋人
				PRINTFORMW 「什麼，是%CALLNAME:MASTER%啊，一起洗吧！」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「正好機會來了，讓我幫你洗背吧」
			ELSEIF TALENT:思慕
				PRINTFORMW 「哦？已經有人在裡面了？」
				PRINTFORMW 「我可不在乎，你也別太在意啦！」
			ELSE
				PRINTFORMW 「嗯？你在裡面啊？沒關係啦，互不干擾就好！」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて出て行った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 4
			IF TALENT:恋人
				PRINTFORMW 「看起來你更喜歡一個人呢，失陪了」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「慢慢享受吧！我很有耐心的！」
			ELSEIF TALENT:思慕
				PRINTFORMW 「這樣失禮了，我可沒有偷窺的興趣」
			ELSE
				PRINTFORMW 「抱歉啊，不用在意，繼續泡吧」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 5
			IF TALENT:恋人
				PRINTFORMW 「等一下會幫你洗背的，別著急！」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「現在還不是幫你洗背的時候！」
			ELSEIF TALENT:思慕
				PRINTFORMW 「很抱歉，這是我的浴池，請你出去好嗎？」

			ELSE
				PRINTFORMW 「你該不會對我的裸體有興趣吧？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;外出先で遭遇した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 6
			;仕事中、今日会ってない。
			IF CFLAG:行動 == 5 && !TCVAR:130:今天有否见面
				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_K133
				ELSEIF CFLAG:318 == 1
					PRINTFORMW 「......我現在心情不好，會踢人的」
				ELSE
					;早朝
					IF TIME:2 == 1 || TIME:2 == 2
						PRINTFORMW 「早安啊， %CALLNAME:MASTER%！」
					;昼
					ELSEIF TIME:2 == 3 || TIME:2 == 4
						PRINTFORMW 「午安啊， %CALLNAME:MASTER%」
					;夕方・夜
					ELSEIF TIME:2 == 5 || TIME:2 == 6
						PRINTFORMW 「晚上好， %CALLNAME:MASTER%」
					ENDIF
					IF TALENT:恋人
						PRINTFORMW 「追蹤你的氣味居然找到這裡來了！該怎麼辦呢？」
					ELSEIF TALENT:恋慕
						PRINTFORMW 「你的藏身之處真是明顯啊！不是藏的很隱密真是太好了！」
					ELSEIF TALENT:思慕
						PRINTFORMW 「呼–嗯，在做什麼呢？」
					ENDIF
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色と约会中に遭遇した
		;ARG:1に约会的对象
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 7
			IF TALENT:恋人
				PRINTFORMW 「……」
				PRINTFORMW 「……什麼都沒有！」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「性感的男人！越來越愛你了！」
			ELSE
				PRINTFORMW 「真不好意思，竟然誤會了」
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;特別な日イベント用関数
;==================================================
;-------------------------------------------------
@SPECIALDAY_EVENT_K133
;-------------------------------------------------
	;謹賀新年
	IF DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1
		IF TALENT:恋人
			PRINTFORMW 「新年快樂！」
			PRINTFORMW 早鬼這樣說著向大家問候新年。
			PRINTFORMW 「今年也一起度過吧！　%CALLNAME:MASTER%！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「新年快樂！　%CALLNAME:MASTER%！」
			PRINTFORMW 早鬼向大家問候新年。
			PRINTFORMW 「能看到你的臉真是美好的一年啊！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「新年快樂！」
			PRINTFORMW 早鬼向大家問候新年。
			PRINTFORMW 「今年也請多多關照了，%CALLNAME:MASTER%！」
		ELSE
			PRINTFORMW 「新年快樂！」
		ENDIF
	;情人節
	ELSEIF DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%，那個啊」
			PRINTFORMW 早鬼有些害羞地向%CALLNAME:MASTER%說話
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%，這是什麼呢......」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%，這個呢......」
		ELSEIF CFLAG:2 >= 1000
			PRINTFORMW 「%CALLNAME:MASTER%，可以稍微問你一下嗎？」
		ENDIF
		SELECTCASE CFLAG:好感度
		CASE 1000 TO 3000
			PRINTFORMW 早鬼送了巧克力給%CALLNAME:MASTER%。
			PRINTFORMW 「你喜歡這種的吧？所以只是給你的，那麼就先走囉！」
			PRINTFORMW 少女有些害羞地匆匆離去。
		CASE 3001 TO 5000
			PRINTFORMW 「這是巧克力」
			PRINTFORMW 早鬼遞了巧克力過來。
			PRINTFORMW 「我自己不怎麼吃，但聽說這是送巧克力的日子，所以拿去吧！」
		CASE IS > 5000
			IF EXP:愛情経験 >= 100
				PRINTFORMW 「雖然料理不是很拿手，但聽說加入了愛就會變得美味」
				PRINTFORMW 「不確定口味是否合你的口味......是按照食譜做出來的，味道還不錯！」
				PRINTFORMW 「所以就收下吧！」
				PRINTFORMW 少女帶著帽子略微低頭並遞把巧克力遞了過來。
			ELSE
				PRINTFORMW 「來，這是巧克力」
				PRINTFORMW 早鬼這樣說著邊把巧克力遞了過來。
				PRINTFORMW 「因為不知道哪一種最好，所以就選了最貴的，希望你能喜歡啊！」
			ENDIF
		ENDSELECT
	;萬聖節
	ELSEIF DAY:2 == 3 && DAY:3 == 30
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%，不給糖就搗蛋！」
			PRINTFORMW 早鬼對%CALLNAME:MASTER%說。
			PRINTFORMW 「哈哈哈！嚇到了吧？那我就來整你！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「Trick．or．Treat！%CALLNAME:MASTER%！」
			PRINTFORMW 早鬼言語中帶威脅的說著。
			PRINTFORMW 「快！不給糖就搗蛋喔！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「Trick．or．Treat！」
			PRINTFORMW 早鬼猛地從%CALLNAME:MASTER%身後出現並威脅著
			PRINTFORMW 「驚訝了吧！糖果現在！」
		ELSE
			PRINTFORMW 「Trick．or．Treat！」
			PRINTFORMW 早鬼氣勢洶洶地的說著。
			PRINTFORMW 「這種節日在地上也流行著對吧？快！給糖果！」
		ENDIF
	;聖誕節
	ELSEIF DAY:2 == 4 && DAY:3 == 25
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%，聖誕快樂！」
			PRINTFORMW 早鬼開心地對%CALLNAME:MASTER%說著
			PRINTFORMW 「雖然不是馴鹿也不是聖誕老人，但我來了！開心點啊！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%，聖誕快樂！」
			PRINTFORMW 早鬼這樣說著搭話
			PRINTFORMW 「你是我的聖誕老人嗎？真高興啊！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%，聖誕快樂！」
			PRINTFORMW 早鬼這樣說著搭話
			PRINTFORMW 「很可惜並沒有準備禮物，但是能和我見面應該是一件開心的事，對吧！」
		ELSE
			PRINTFORMW 「聖誕快樂，%CALLNAME:MASTER%！」
			PRINTFORMW 早鬼這樣說著搭話
			PRINTFORMW 「今天表現得好的話應該會收到禮物的吧！到底會是什麼呢……！」
		ENDIF
	ENDIF
;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K133_2(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;非同棲かつ相手が先に起きてる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;TARGET私室にMASTERが入っている（恋慕時陪睡中就寝時のみ？
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%！早上好！！！」
			PRINTFORMW 早鬼開心地向%CALLNAME:MASTER%問早
			PRINTFORMW 「能看到你的臉真是個美好的早晨啊！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%，早上好啊！」
			PRINTFORMW 早鬼這麼說著打了個招呼
			PRINTFORMW 「睡懶覺可不好喔！早起三分利！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%，早上好啊！」
			PRINTFORMW 早鬼這麼說著打了個招呼
			PRINTFORMW 「意外的很愛睡懶覺呢！這樣對美容可不太好喔！」
		ELSE
			PRINTFORMW 「早安啊！%CALLNAME:MASTER%！今天天氣真好啊！」
			PRINTFORMW 早鬼這麼說著打了個招呼
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%，早上好啊！」
			PRINTFORMW 早鬼開心地向%CALLNAME:MASTER%問早
			PRINTFORMW 「每天都能看到你的睡顏真是幸福啊！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%，早上好啊！」
			PRINTFORMW 早鬼這麼說著打了個招呼
			PRINTFORMW 「再多睡一會兒也沒關係的啦？反正時間還很充裕嘛......」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%，早上好啊！」
			PRINTFORMW 早鬼這麼說著打了個招呼
			PRINTFORMW 「快點起床啦，不然就要走了喔！」
		ELSE
			PRINTFORMW 「早安啊！今天的早晨真美好啊！」
			PRINTFORMW 早鬼這麼說著打了個招呼
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORMW 「嗯……嗯……%CALLNAME:MASTER%……？」
			PRINTFORMW 早鬼好像再說著些什麼夢話。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「嗯……大人……我是……」
			PRINTFORMW 早鬼好像再說著些什麼夢話。
		ELSEIF TALENT:思慕
			PRINTFORMW 「嗯嗯……胡蘿蔔……？」
			PRINTFORMW 早鬼好像再說著些什麼夢話。
		ELSE
			PRINTFORMW 「噓……姆–姆–……」
			PRINTFORMW 早鬼安然地沉睡著。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERが起きていて、相手が起きてきた
	;添い寝時TARGET起床はこちら（TARGET衰弱or陪睡中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;非同棲
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		IF TALENT:恋人
			PRINTFORMW 「嗚哇～%CALLNAME:MASTER%，早安啊！」
			PRINTFORMW 早鬼開心地向%CALLNAME:MASTER%問早
			PRINTFORMW 「比我還早起床真狡猾啊！再多睡一下！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「嗯嗯～～！早安啊！%CALLNAME:MASTER%！」
			PRINTFORMW 早鬼這麼說著打了個招呼
			PRINTFORMW 「怎麼了？不要一直盯著我看著我起床啦……好害羞啊！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%，早上好啊！」
			PRINTFORMW 早鬼這麼說著打了個招呼
			PRINTFORMW 「今天要做什麼呢，好期待啊！」
		ELSE
			PRINTFORMW 「嗯嗯！？睡醒了嗎！早安！%CALLNAME:MASTER%！」
			PRINTFORMW 早鬼這麼說著打了個招呼
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に返回（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORMW 「嗯，晚安，%CALLNAME:MASTER%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%，晚安，希望在夢中也能見到面！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%，晚安！」
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%，已經要去睡了！晚安！」
		ENDIF
		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
		IF TALENT:恋人
			PRINTFORMW 「呼呼……%CALLNAME:MASTER%……誒嘿嘿……」
			PRINTFORMW 早鬼好像再說著些什麼夢話。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「嗯嗯……%CALLNAME:MASTER%……」
			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
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内角色がMAIN_MAPで衰弱状態になった場合か、待客室で相手が衰弱した場合に発生
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW 「我這樣的人也累了......」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW 「沒事吧！？不要死！！！」
		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 「嗯，你也該去睡了，%CALLNAME:MASTER%！」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「%CALLNAME:MASTER%，你也該去睡了，那麼晚安了！」
			ELSEIF TALENT:思慕
				PRINTFORMW 「%CALLNAME:MASTER%，我要睡覺了，安靜一點」
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%，已經要去睡了」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF TALENT:恋人
				PRINTFORMW 「要去睡覺了，就這樣吧，再見！」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「%CALLNAME:MASTER%，你還不快點出去不然我都睡不著了......」
			ELSEIF TALENT:思慕
				PRINTFORMW 「%CALLNAME:MASTER%，讓我睡啦」
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%，已經該回去睡覺了」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色とのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF TALENT:恋人
				PRINTFORMW 「......因為很想睡，所以快出去！」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「饒了我吧，我困了……」
			ELSEIF TALENT:思慕
				PRINTFORMW 「真是的，你們啊......趕快去睡吧」
			ELSE
				PRINTFORMW 「快點出去，否則我會踢人出去的！」
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW 「稍微休息一下！」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;前のターンから一緒的房間にいる状態で相手が寝る（待客室含む（
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		IF TALENT:恋人
			PRINTFORMW 「那就晚安了，%CALLNAME:MASTER%！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「我要去睡了！晚安！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%，晚安！」
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%，可以不要再房間裡到處找東西了嗎？」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORM 早鬼看著%CALLNAME:MASTER%
			IF TALENT:恋人
				PRINTFORM 焦急的
			ELSEIF TALENT:恋慕
				PRINTFORM 充滿愛意的
			ELSEIF GETBIT(CFLAG:1,0)
				PRINTFORM 感興趣的
			ENDIF
		PRINTFORMW 注視著。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;轻轻地会釈して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「嗨嗨，%CALLNAME:MASTER%還好嗎？」
			PRINTFORMW 早鬼向%CALLNAME:MASTER%輕輕揮手打招呼。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%，揮手就好了啦！」
			PRINTFORMW 早鬼微笑著揮了揮手看起來很開心。
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%！看起來很有精神呢！」
			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_K133_5(ARG,ARG:1)
;口上主はTARGET
;ARGに入ってきた角色（人数が膨大なので、自己把握自己責任で
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;霊夢が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;留琴が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他（角色指定無
	PRINTFORMW 「真是的……本來還可以的說！」
ENDIF
RETURN 1

;==================================================
;情事を目撃した
;==================================================
@M_KOJO_EVENT_K133_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 「白痴！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「......笨蛋！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……太失禮了！」
		ELSE
			PRINTFORMW 「……失禮了」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORMW 「……...把我放置在一旁好狡猾啊！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「真是的……讓我也混在一起！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「獨占好東西真是太卑鄙了！」
		ELSE
			PRINTFORMW 「我也要混再一起！」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF TALENT:恋人
			PRINTFORMW 「笨蛋！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……饒了我吧」
		ELSEIF TALENT:思慕
			PRINTFORMW 「……至少選一下地點吧！」
		ELSE
			PRINTFORMW 「……在這種地方很糟糕」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;情事を見られた
;==================================================
@M_KOJO_EVENT_K133_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 「你只需要注視我就夠了，因為我也只會注視著你！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「我們還沒有到被看到就會很困擾的關係吧？」
		ELSEIF TALENT:思慕
			PRINTFORMW 「我們就讓他們看看吧，我們的關係已經不一樣了！」
		ELSE
			PRINTFORMW 「唔姆姆，該怎麼辦才好呢？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORMW 「……只有兩個人會比較好」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「如果你想這麼做就這麼做吧」
		ELSEIF TALENT:思慕
			PRINTFORMW 「我……算了沒什麼」
		ELSE
			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 「來吧！繼續吧！」
		ELSE
			PRINTFORMW 「如果我們成為話題的話該怎麼辦呢」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

;==================================================
;胖次没収された
;==================================================
@M_KOJO_EVENT_K133_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 「呼–嗯，原來人類的雄性喜歡這種東西啊」
		PRINTFORMW %CALLNAME:MASTER%沉默不語
		PRINTFORMW 「哼哼，算了算了，我不會對任何人說的，放心吧」
		PRINTFORMW 早鬼這樣說著，將內衣收進了懷裡。
		IF TALENT:恋人
			PRINTFORMW 「……喜歡這種東西嗎……沒想到啊」
			PRINTFORMW 早鬼臉紅地說道。
		ENDIF
	RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;诶嘿嘿==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを推倒た（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		IF TALENT:恋人
			IF RAND:3 == 0
				PRINTFORMW 「%CALLNAME:MASTER%」
				PRINTFORMW 早鬼突然把%CALLNAME:MASTER%推倒在地。
				PRINTFORMW 「人類怎麼可能戰勝過我？我的力量比你們強得多了%UNICODE(0x2665) *1%」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「%CALLNAME:MASTER%！」
				PRINTFORMW 早鬼抓住了%CALLNAME:MASTER%的肩膀然後推倒在地。
				PRINTFORMW 「你害我興奮了，都是你的錯%UNICODE(0x2665) *1%」
				PRINTFORMW 這麼說著的早鬼同時玩弄著%CALLNAME:MASTER%的下半身。
			ELSE
				PRINTFORMW 「呵呵，你總是有一種很好聞的味道%UNICODE(0x2665) *1%」
				PRINTFORMW 少女把身體貼在%CALLNAME:MASTER%身上，並臉紅心跳地求歡。
				PRINTFORMW 「一起享受更多的快樂吧%UNICODE(0x2665) *1%」
			ENDIF
		ELSEIF TALENT:恋慕
			IF RAND:3 == 0
				PRINTFORMW 「%CALLNAME:MASTER%%UNICODE(0x2665) *1%」
				PRINTFORMW 早鬼突然把身體貼過來並將其壓倒在地。
				PRINTFORMW 「因為喜歡你，所以要抱你啊%UNICODE(0x2665) *1%」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「%CALLNAME:MASTER%%UNICODE(0x2665) *1%」
				PRINTFORMW 早鬼緊握住%CALLNAME:MASTER%的肩膀並將其壓倒在地上。
				PRINTFORMW 「只要和你在一起，我就會變得不正常......所以你要負責哦%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%%UNICODE(0x2665) *1%」
				PRINTFORMW 「放心，會讓你感覺很舒服的%UNICODE(0x2665) *1%」
				PRINTFORMW 早鬼撫弄著%CALLNAME:MASTER%的身體並露出妖艷的笑容。
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「%CALLNAME:MASTER%！」
				PRINTFORMW 早鬼突然用身體壓過來，不發一語地推倒了
				PRINTFORMW 「從力量上是不可能贏我的%UNICODE(0x2665) *1%」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「%CALLNAME:MASTER%%UNICODE(0x2665) *1%」
				PRINTFORMW 早鬼邊呼喚%CALLNAME:MASTER%的名字邊推倒。
				PRINTFORMW 「你的身體，可以借用一下嗎%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「……%CALLNAME:MASTER%、」
				PRINTFORMW 早鬼推倒了%CALLNAME:MASTER%。
				PRINTFORMW 「比起附身，我更喜歡這樣%UNICODE(0x2665) *1%」
			ENDIF
		ENDIF
		TCVAR:130:発情 = 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;抜け出した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW 「啊……喂！真是的，意外的很強啊～」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW 「噫……真是太舒服了%UNICODE(0x2665) *1%」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORMW 「我知道了……會乖乖聽話的」
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;摆脱失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;随便状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW 「這是在說我沒有贏的可能性嗎……%UNICODE(0x2665) *1%」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORMW 「這邊可是還沒滿足的喔……%UNICODE(0x2665) *1%」
			RETURN 1
		ENDIF
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;浴場で遭遇
;==================================================
@M_KOJO_EVENT_K133_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 被早鬼趕出了浴場。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「對我的肌肉感興趣是好的，但請出去」
			PRINTFORMW 早鬼拒絕了混浴。
		ELSEIF TALENT:思慕
			PRINTFORMW 「我還在泡呢，請不要打擾」
			PRINTFORMW 早鬼這樣說著趕出了浴場。
		ELSE
			PRINTFORMW 早鬼注意到有人闖進浴場
			PRINTFORMW 「不行，對你來說還太早了」
			PRINTFORMW 這樣說著就給敢出去了
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「嘻嘻，盡情地欣賞我的身體吧」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「怎麼樣？我的肌肉很好看吧！」
			PRINTFORMW 早鬼有些困惑地泡在浴缸裡。
		ELSEIF TALENT:思慕
			PRINTFORMW 「對我的肌肉這麼感興趣嗎？真高興啊！」
		ELSE
			PRINTFORMW 「怎麼了？再靠近一點看我的肌肉也沒關係哦？」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（憤怒）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「累了，快走！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「我已經累了，快走吧！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「真是的！我要去睡覺了，快走吧！」
		ELSE
			PRINTFORMW 「......滾！」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;これもしかして睡眠してる分岐が必要？
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		IF TALENT:恋人
			PRINTFORMW 「不好意思，我現在沒那種心情，你去當個聖德太子再回來吧」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「我已經很累了，你也快去睡吧，對肌肉不好」
		ELSEIF TALENT:思慕
			PRINTFORMW 「熬夜對身體不好，我要去睡了」
		ELSE
			PRINTFORMW 「快去睡覺，不然狼靈會生氣的」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		IF TALENT:恋人
			PRINTFORMW 「......我居然先累了真是丟臉啊......休息一下吧」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「......已經累了，饒了我吧」
		ELSEIF TALENT:思慕
			PRINTFORMW 「抱歉有些累了，休息一下」
		ELSE
			PRINTFORMW 「......已經累了，要去睡覺了」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;工作開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;工作結束
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		PRINTFORMW 「看起來好好吃啊！也分給我一些吧！」
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（推倒指令に統合？
	;MASTERが推倒た（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「跟你做的感覺真舒服啊……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「喜歡感覺舒服的事情，但跟你做的感覺格外特別啊！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「和%CALLNAME:MASTER%做真是太棒了！」
		ELSE
			PRINTFORMW 「希望下次也能讓我感覺到舒服」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
	;-------------------------------------------------
	;事後描写
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	;上の終了時と連続表示されるか未確認なので一応埋めておく
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;精液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML 「嘿嘿，真是太好了%UNICODE(0x2665) *1%」
			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 「說不定我也沾染了你的氣息了%UNICODE(0x2665) *1%」
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;陪睡
;==================================================
@M_KOJO_EVENT_K133_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_K133_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  「怎......怎麼回事！？」
		ELSE
			PRINTFORMW 「……嗯嗯！」
			PRINTFORMW 早鬼的身體猛地抖了一下
			PRINTFORMW 「感覺怪怪的......」
			PRINTFORMW 困惑して辺りを見回している。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕
			PRINTFORMW 「っ！！！」
			PRINTFORMW 早鬼一瞬間倒下，完全不知道發生了什麼事。
			PRINTFORMW 「哈啊......怎麼回事......」
			PRINTFORMW 早鬼接住伸過來的手，發抖著站了起來。
		ELSE
			PRINTFORMW 「っ！？」
			PRINTFORMW 「......怎麼了啊......？」
			PRINTFORMW 被突然灌入快感的早鬼蹲了下來一邊在混亂之中一邊環視著周圍。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;胖次紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 「……！？」
		PRINTFORMW 被偷走內褲的早鬼感到很不自在。
		PRINTFORMW 「……啥……啊……！？」
		PRINTFORMW 意識到情況了的早鬼慌張地環顧四周，同時抓著裙子不放。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
			IF EXP:精液経験 == 0
				PRINTFORMW 「嗯！？！！？」
				PRINTFORMW 早鬼被突然灌進嘴裡的精液給嚇了一跳。
				PRINTFORMW 「好噁心啊！」
				PRINTFORMW 早鬼因為無法應對現況，最終還是吞下了精液。
			ELSE
				PRINTFORMW 「嗚誒！？」
				PRINTFORMW 突然早鬼捂住嘴巴，顫抖著倒下了。
				PRINTFORMW 「嗯……嗚嗚……」
				PRINTFORMW 「什麼東西進到嘴裡了……！」
			ENDIF
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
			PRINTFORMW 「嗯嗯！？」
			PRINTFORMW 「咳咳……呃……」
			PRINTFORMW 早鬼忍受不了突然出現在口中的男性精液的臭味。
			PRINTFORMW %CALLNAME:MASTER%目不轉睛地盯著那個樣子。
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
			PRINTFORMW 「嗯！？」
			PRINTFORMW 早鬼捂著嘴巴無法忍受口腔中的精液。
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
			PRINTFORMW 「……嗯！」
			PRINTFORMW 早鬼注意到口中的精液
			PRINTFORMW 「嗯......這個真不好吃......」
			PRINTFORMW 早鬼美味地吞下了口中的精液。
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
			PRINTFORMW 「……嗯嗯！？」
			PRINTFORMW 早鬼注意到口中濃厚的精液
			PRINTFORMW 「嗯嗯……嗚咽……」
			PRINTFORMW 心慌意亂地吐了出來。
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
			PRINTFORMW 「……嗯！」
			PRINTFORMW 早鬼注意到口中濃厚的精液
			PRINTFORMW 「嗯……嗯嗯……嗯唔……%UNICODE(0x2665) *1%」
			PRINTFORMW 習慣似的喝下去了。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;無知持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
			PRINTFORMW 「……嗚哇！」
			PRINTFORMW 早鬼發現臉上黏著精液。
			PRINTFORMW 「好噁啊！」
			PRINTFORMW 慌亂地擦掉了。
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
			PRINTFORMW 「嗯咽！？」
			PRINTFORMW 早鬼發現臉上黏著精液。
			PRINTFORMW 「……味道還不錯」
			PRINTFORMW 舔起來很美味。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
			PRINTFORMW 「……嗚哇……！」
			PRINTFORMW 早鬼發現手上沾滿了精液
			PRINTFORMW 「好髒啊……」
			PRINTFORMW 慌亂地擦掉了。
		;舐めとり
		ELSEIF ARG:1 == 2
			PRINTFORMW 「……嗚哇……！」
			PRINTFORMW 早鬼發現手上沾滿了精液
			PRINTFORMW 「……嗯……奇怪的味道！」
			PRINTFORMW 妖艶地舔了一下。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚肛門射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		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
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K133_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:318 == 1
			PRINTFORMW 「不要把開玩笑開過頭了啊？」
		ELSEIF TALENT:恋人
			PRINTFORMW 「那個……我也還沒準備好呢……」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「這，這種事我可不喜歡……」
		ELSE
			PRINTFORMW 「我可不打算生你這種傢伙的孩子啊！」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:318 == 1
			PRINTFORMW 「……難道要被踢一次才會懂嗎？」
		ELSEIF TALENT:恋人
			PRINTFORMW 「明明說了不要啊......過分......」
			PRINTFORMW 早鬼還是一直拒絕著。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「我說我不要了啊？」
			PRINTFORMW 早鬼還是一直拒絕著。
		ELSE
			PRINTFORMW 「別讓我說這麼多次，笨蛋！」
			PRINTFORMW 早鬼拼命要求著要避孕。
		ENDIF
		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
		IF TALENT:恋人
			PRINTFORMW 「知道了」
			PRINTFORMW 「......但是，危險期是不行的！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「沒辦法呢」
			PRINTFORMW 「不過無套的感覺更好啊！」
		ELSE
			PRINTFORMW 「帶套是基本禮貌，今天就原諒你了」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF TALENT:恋人
			PRINTFORMW 「和你生的孩子的話，應該會又快又聰明吧！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「無套的比較舒服嘛，沒關係的啦」
		ELSE
			PRINTFORMW 「......沒辦法啊，不過算了啦。」
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K133_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「噗哈哈哈哈！終於同居了%CALLNAME:MASTER%！」
		PRINTFORMW 「這樣我們的關係也算是公開了啊！」
		PRINTFORMW 早鬼露出了邪惡的笑容說道。
		PRINTFORMW 「那麼，從今後的生活就交給我吧！」
		PRINTFORMW 「肯定會很有趣的！放心吧！」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「你是想要破壞我們之間的關係嗎？」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K133_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORMW 「已經是回家的時間了！明天見！」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「那我就先走了！明天見！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「還有狼靈在等我，我就先走了！」
		ELSE
			PRINTFORMW 「該回家的時間到了」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		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 == 3
		IF TALENT:恋人
			PRINTFORMW 「其實不用特別送我到這裡來啦……但是我很高興喔%UNICODE(0x2665) *1%」
			PRINTFORMW 早鬼這樣說完後就飛走了。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「就算沒有你送我，我也不會迷路的啦，但是很開心喔！那先走囉！」
			PRINTFORMW 這樣說完後早鬼就飛走了。
		ELSEIF TALENT:思慕
			PRINTFORMW 「特別送行真是太好了！謝謝啦！」
			PRINTFORMW 早鬼這樣說著就飛走了。
		ELSE
			PRINTFORMW 「其實沒必要送我的，太擔了吧你，先走啦！」
			PRINTFORMW 早鬼說完轉身就飛走了。
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K133_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
			PRINTFORMW 早鬼沉醉在薄弱的思緒中。
			PRINTFORMW 「%CALLNAME:MASTER%...喜歡」
			PRINTFORMW 「...在這裡說也沒有什麼用吧」
			PRINTFORMW 「但是，在死之前我都沒有過這樣的經驗過...…」
			PRINTFORMW 「困難的問題交給擅長思考的人處理，但也做不到啊」
			PRINTFORMW 早鬼坐在沙發上撐著下巴思考著該怎麼辦。
			PRINTFORMW 美麗的黑髮少女滿臉憂愁吸引著旁觀者的注意。
			PRINTFORMW 「...不管怎樣我已經死過一次，只能走一步算一步了」
			PRINTFORMW 「但是，我不想被粉碎……盡可能地鍛煉吧」
			PRINTFORMW 少女透過做伏地挺身來吹飛煩惱。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
			PRINTFORMW 早鬼回到家后就倒在了床上。
			PRINTFORMW 「……呼呼呼，原來如此，我啊……」
			PRINTFORMW 「%CALLNAME:MASTER%，真是個有趣的傢伙啊……！」
			PRINTFORMW （從我死後第一次開始對一個人產生感情呢……！）
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 「嗯……」
		PRINTFORMW 早鬼在情慾的煎熬中躺在床上。
		PRINTFORMW 「……啊……啊啊……%UNICODE(0x2665) *1%」
		PRINTFORMW 她用空洞的眼神凝視著天花板，一邊伸手摸索著自己的私處。
		PRINTFORMW 少女一邊想著%CALLNAME:MASTER%，一邊陶醉在自慰中。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「……」
		PRINTFORMW 早鬼在情慾的煎熬中躺在床上。
		PRINTFORMW 「……即便不是第一位也無所謂……因為我愛著你」
		PRINTFORMW 早鬼這樣說著並接受了愛人關係。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW 「……%CALLNAME:MASTER%……那傢伙……」
		PRINTFORMW 早鬼在情慾的煎熬中躺在床上。
		PRINTFORMW 「……表現很好嘛」
		PRINTFORMW 少女一邊說著一邊把手伸向了下半身。
		PRINTFORMW 在建立肉體關係的同時，早鬼也被性欲所支配著。
		PRINTFORMW 「……這樣的關係也許很輕鬆吧……%UNICODE(0x2665) *1%」
		PRINTFORMW 沉迷於自慰行為的早鬼淫蕩地墮落了。
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K133_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%%UNICODE(0x2665) *1%喜歡……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%就算多照顧一點我也不會嫌多喔%UNICODE(0x2665) *1%」
		ELSEIF TALENT:思慕
			PRINTFORMW 「嗯……還是忍不住呢……%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORMW 「嗯嗯……%UNICODE(0x2665) *1%」
			PRINTFORMW 早鬼按捺不住性欲仍在自慰。
		ENDIF
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K133_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 「……可惜現在我沒有這個心情，出去吧」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「洗澡嗎？」
			PRINTFORMW 「一個人不是也可以洗嗎？你是人類啊」
		ELSEIF TALENT:思慕
			PRINTFORMW 「和我一起入浴很無聊吧」
			PRINTFORMW 早鬼拒絕了混浴。
		ELSE
			PRINTFORMW 「我可沒便宜到會你混浴」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「去洗澡？好啊！」
			PRINTFORMW 「我幫你洗遍身上每一片角落%UNICODE(0x2665) *1%而我也拜託你了%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「好啊！來吧，好好洗我身體！」
		ELSEIF TALENT:思慕
			PRINTFORMW 「別抱太大期待啊？」
		ELSE
			PRINTFORMW 「我不介意的，你是在想什麼呢？」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K133_24(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%……%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「……？」
		PRINTFORMW 早鬼感受到腹中嬰兒的心跳聲，輕輕撫摸著
		PRINTFORMW 「%CALLNAME:MASTER%……責任很重啊……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 早鬼感受到腹中嬰兒的心跳聲，輕輕撫摸著
		PRINTFORMW 「……就算是馬骨也能懷孕嗎……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「……唔……！？」
		PRINTFORMW 早鬼在下腹部感到一種異樣的感覺
		PRINTFORMW 「剛剛……那是什麼」
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K133_25(ARG,ARG:1)
;口上主はLOCAL
;ARG:1	何人目の兒童か
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「吸–吸–吐ー……吸–吸–吐ー……」
		PRINTFORMW 早鬼生下孩子後，在耗盡體力的撫摸孩子的頭。
		PRINTFORMW 「%CALLNAME:MASTER%，這是你的孩子......好開心啊%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「吸–吸–吐ー」
		PRINTFORMW 早鬼生下孩子後，在耗盡體力的撫摸孩子的頭。
		PRINTFORMW 「%CALLNAME:MASTER%，一起來撫養吧......」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 「......唔唔......吸–吸–吐ー......！！」
		PRINTFORMW 早鬼生下孩子後，在耗盡體力的撫摸孩子的頭。
		PRINTFORMW 「......真是的，得讓你負全責......！」
		RETURN 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「......唔唔......啊啊......！！」
		PRINTFORMW 早鬼生下孩子後，在耗盡體力的撫摸孩子的頭。
		PRINTFORMW 「……馬嗎……不知道這是和哪裡來的馬骨生的孩子啊……」
		PRINTFORMW 早鬼空洞的眼神注視著天空。
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K133_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 「……殺了你！」
			ELSEIF TALENT:恋人
				PRINTFORMW 「っ！？」
				PRINTFORMW 「你在幹嘛啊笨蛋……！」
				PRINTFORMW 早鬼面對突如其來的情況感到驚訝和困惑。
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……哇！」
				PRINTFORMW 早鬼因驚訝而發出了奇怪的聲音。
				PRINTFORMW 「怎樣啦！」
				PRINTFORMW 早鬼裝出平靜的樣子問道。
			ELSEIF TALENT:思慕
				PRINTFORMW 「……！」
				PRINTFORMW 「不要嚇我啊……！」
				PRINTFORMW 早鬼一臉快哭出來的樣子。
			ELSE
				PRINTFORMW 「……唔！？」
				PRINTFORMW 「突然進來幹嘛啊！」
				PRINTFORMW 早鬼慌張地說道。
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;什麼也不做
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「......殺掉，現在！」
			ELSEIF TALENT:恋人
				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%」
				PRINTFORMW 「這邊比較舒服呢……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「變態……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「……這樣看著真的很難做呢……」
			ELSE
				PRINTFORMW 「看了也沒有什麼好玩的啦」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;逐出
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「……現在就出去的話，會留你一條活路！」
				PRINTFORMW 早鬼大聲怒罵趕人出去。
			ELSEIF TALENT:恋人
				PRINTFORMW 「快走啦！」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「現在就滾！」
			ELSEIF TALENT:思慕
				PRINTFORMW 「滾回去！立刻馬上！」
			ELSE
				PRINTFORMW 「......滾！」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;やっちゃう
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「……在想什麼！」
			;処女
			ELSEIF TCVAR:破瓜 == 1
				PRINTFORMW 「……這是你第一次嗎？要溫柔一點喔」
			ELSEIF TALENT:恋人
				PRINTFORMW 「……這樣的事情真讓人興奮呢……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「就這樣子睡覺是不行喔……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「不要跟任何人說喔？」
			ELSE
				PRINTFORMW 「人類也會做這樣的事情呢……」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;事後
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「……去死吧……」
			ELSEIF TALENT:恋人
				PRINTFORMW 「……原來如此，還不錯呢……%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「果然還是無法與真貨相比啊%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「如果這麼好的話，一開始就應該做了%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「……嗯，還不錯啊……！」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 6
		;事後お泊り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「……到底在想什麼啊，完全理解不了呢」
			ELSEIF TALENT:恋人
				PRINTFORMW 「……明天也繼續吧%UNICODE(0x2665) *1%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「這種事情可不是應該對人做的啊%UNICODE(0x2665) *1%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「啊—真爽快！睡覺吧！」
			ELSE
				PRINTFORMW 「你真是變態啊……」
			ENDIF
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF

;==================================================
;相手から约会のお誘い
;==================================================
@M_KOJO_EVENT_K133_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「%CALLNAME:MASTER%，要不要和我約會呀！」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「%CALLNAME:MASTER%，有空的話要不要和我去約會呀！」
			ELSEIF TALENT:思慕
				PRINTFORMW 「%CALLNAME:MASTER%，請和我交往吧！」
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%，有空嗎？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「只要和你在一起，哪裡都可以去！去到不能去為止！」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「好像會是一個愉快的一天呢！」
			ELSEIF TALENT:思慕
				PRINTFORMW 「地上的事我不大清楚，就交給你了吧」
			ELSE
				PRINTFORMW 「我們一起去爭霸吧！……開玩笑的啦」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「……出軌嗎？如果是的話我會很受傷的」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「被拒絕了啊，那就等下次機會吧」
			ELSEIF TALENT:思慕
				PRINTFORMW 「真是可惜呢，原本還想和你一起去任何地方的」
			ELSE
				PRINTFORMW 「這樣啊，真遺憾啊」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「要不要來我家？現在沒有人喔」
			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%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「期待吧，吃了就會讓你驚訝的東西！」
			ELSEIF TALENT:思慕
				PRINTFORMW 「跟我來吧！來做一些激烈運動吧！」
			ELSE
				PRINTFORMW 「要玩什麼呢？玩桌遊……或是做伏地挺身呢」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「...…那太過分了…...」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「什麼啊—討厭胡蘿蔔嗎？」
			ELSEIF TALENT:思慕
				PRINTFORMW 「你也太殘酷了吧，把我一個人丟著……」
			ELSE
				PRINTFORMW 「難道沒有任何空暇時間嗎？可惜了」
			ENDIF
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K133_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 「我一直都是為了不被你看不起才好好鍛鍊的！」
				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 「雖然裸體會比較舒服啦……」
				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
					IF RAND:3 == 0
						PRINTFORMW 「如果%CALLNAME:MASTER%能給我內褲就好了！」
					ELSEIF RAND:2 == 0
						PRINTFORMW 「如果你的內褲可以交換就好了！我會好好珍惜的！」
					ELSE
						PRINTFORMW 「如果是以交換的方式就沒問題的！」
					ENDIF
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					IF RAND:3 == 0
						PRINTFORMW 「好好珍惜哦！」
					ELSEIF RAND:2 == 0
						PRINTFORMW 「拿這個東西想起我也不錯啊！」
					ELSE
						PRINTFORMW 「就算用在奇怪的事情上，我也會很寬容你的！」
					ENDIF
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					IF RAND:3 == 0
						PRINTFORMW 「沒辦法啊，%CALLNAME:MASTER%就是這樣子啦」
					ELSEIF RAND:2 == 0
						PRINTFORMW 「這樣子應該可以了吧？不太確定......」
					ELSE
						PRINTFORMW 「好好穿啊......？」
					ENDIF
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					IF RAND:3 == 0
						PRINTFORMW 「討厭嗎？」
					ELSEIF RAND:2 == 0
						PRINTFORMW 「這樣可不好哦！」
					ELSE
						PRINTFORMW 「打算拿來做什麼呢？」
					ENDIF
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;憤怒口上
;==================================================
@M_KOJO_EVENT_K133_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの胆量で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF RAND:3 == 0
			PRINTFORMW 「不要讓我太生氣了！」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「殺了你！」
		ELSE
			PRINTFORMW 「你居然敢惹我生氣！」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;泣かせてしまった　[膽怯]持ち
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;疲惫
		PRINTFORMW 「唔！就算是我也有點累了%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;満足して解放
		PRINTFORMW 「呼……還不錯嘛……%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;満足したところを被逆推た
		PRINTFORMW 「看來你的性慾比我還強呢%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;壊れるまでしてあげる
		PRINTFORMW 「除了我，應該沒有別人能滿足你的性慾了吧%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;デイリーイベント2,夢精
;濃厚精液状態で発生
;▼地の文--------------------------------------------------
;【MASTER】が夢精で汚した下着を洗っていると【TARGET】が飛んできた！
;【TARGET】はそんなもの他の洗濯物と一緒に洗わないでと抗議すると、【MASTER】の手に収まった下着をふんだくり戻っていった…
;【TARGET】　欲情の珠＋1000
;==================================================
@M_KOJO_DAILY_EVENT_K133_2(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
;※コメントアウトすると欲情の珠＋1000（JUEL:11 += 1000）もカットされるので注意
CALL DAILY_MESSAGE_2(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	IF TALENT:恋慕
	    PRINTFORMW 「对啊!你也是个男人!别担心!我来洗就行了!」
	    PRINTFORMW 早鬼这么说着,脸红红地开始洗%CALLNAME:MASTER%的内裤。
	ELSE
	    PRINTFORMW 「哦?内裤脏了吗?跟其他衣物洗在一起不太好哦!」
	    PRINTFORMW 早鬼这么说着,开始洗%CALLNAME:MASTER%的内裤。
	ENDIF
ENDIF
RETURN 1

;==================================================
;一日の終了時(AFTERTRAニーの前)、面識がなければ呼び出されない
;==================================================
@M_KOJO_EVENT_K133_31(ARG,ARG:1)
;口上主はTARGET
;ARGは会ってない日数
;何日以上会ってなかったら愚痴を言うとかできます
;CFLAG:オナバレで分岐入れてもよさそう
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;今日会っていない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		IF TALENT:恋人 || TALENT:恋慕
			CALL EVENTEND_TSUBUYAKI
			IF RAND:3 == 0
				PRINTFORML 「啊～好寂寞啊……%CALLNAME:MASTER%……」
				PRINTFORML 早鬼一個人自言自語著。
			ELSEIF RAND:2 == 0
				PRINTFORML 「他現在在做什麼呢」
				PRINTFORML 早鬼一個人自言自語著。
			ELSE
				PRINTFORML 「好無聊啊……這樣下去我得親自去找那傢伙了吧」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今日会っている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1

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

IF ARG
	PRINTFORML Ａ玩弄場合
ELSE
	PRINTFORML Ｖ玩弄場合
ENDIF
;-------------------------------------------------
[SKIPEND]

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

IF ARG
	PRINTFORML Ａ玩弄場合
ELSE
	PRINTFORML Ｖ玩弄場合
ENDIF
;-------------------------------------------------
[SKIPEND]

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

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

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

IF 本番はどっちか
	PRINTFORML Ａ本番
ELSE
	PRINTFORML Ｖ本番
ENDIF
;-------------------------------------------------
[SKIPEND]

;-------------------------------------------------
;処女・無自覚非処女に挿入する直前の口上
;RETURN 1すると指令を中止します
;RETURN 0なら通します
;CFLAG:破瓜中止口上有がオンになってないと読み込まれないので注意
;-------------------------------------------------
@M_KOJO_EVENT_K133_LOST_VIRGIN_STOP
;-------------------------------------------------
PRINTFORML
RETURN 1

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

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

path: ERB/口上・メッセージ関連/個人口上/【133】早鬼/M_KOJO_K133_イベント.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;日常系コマンド
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;300,会話
;TFLAG:193(1=大成功 0=成功 -1=失敗 -2=大失敗（TARGETがMASTERより教養が4以上高い)
;TCVAR:302(0=会話可能 1>=非恋慕時会話不能)
;MARK:反発刻印(3以上=会話不能)(4以上はバグ
;TCVAR:泥酔(1=通常成功or大失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K133_300
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K133_300
;コマンド共通メッセージ(TRAIN_MESSAGE)
;削除すると「～話をした。」とかが消えます。また、削除した場合は自動で口上色が付きません。
CALL TRAIN_MESSAGE
;口上メイン呼出
CALL M_KOJO_MESSAGE_COM_K133_300_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K133_300_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;怒り
	IF CFLAG:318 == 1
		PRINTFORMW 「煩啊，你」
	;会話不能
	ELSEIF TCVAR:302
		IF RAND:5 == 0
			PRINTFORMW 「啊ー對啊」
		ELSEIF RAND:4 == 0
			PRINTFORMW 「話題不太多啊」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「再去找一些話題來吧」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「那個話題我已經聽膩了！」
		ELSE
			PRINTFORMW （和人類對話真是難啊……）
		ENDIF
	;ぐでぐで
	ELSEIF TALENT:恋慕 && BASE:酒気 > (MAXBASE:酒気 / 10) * 8
		IF RAND:5 == 0
			PRINTFORMW 「%CALLNAME:MASTER%不多喝點嗎！」
			PRINTFORMW 「那我來幫你喝！放心吧！」
		ELSEIF RAND:4 == 0
			PRINTFORMW 「什麼啊，%CALLNAME:MASTER%......」
			PRINTFORMW 早鬼在喝醉後纏了上來。
			PRINTFORMW 「......好美的眼睛，好喜歡，你的眼神」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「%CALLNAME:MASTER%」
			PRINTFORMW 早鬼臉紅著喊道。
			PRINTFORMW 「這個名字不錯，很適合我……%UNICODE(0x2665) *1%」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「%CALLNAME:MASTER%你不再喝一點嗎？」
			PRINTFORMW 「已經喝醉了嗎？別說出那麼羞恥的話來啊%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%......再讓你變得更醉一點吧%UNICODE(0x2665) *1%」
		ENDIF
	;酔いどれ
	ELSEIF TALENT:恋慕 && BASE:酒気 > (MAXBASE:酒気 / 10) * 5
		IF RAND:5 == 0
			PRINTFORMW 「嗯......有點喝多了......」
			PRINTFORMW 「怎麼，遇到危險的話你會在身邊的吧？」
		ELSEIF RAND:4 == 0
			PRINTFORMW 「就算是馬也會喝醉的，如果你在場的話」

		ELSEIF RAND:3 == 0
			PRINTFORMW 「酒本身不錯，但和你一起喝更好！」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「......%CALLNAME:MASTER%的酒量如何啊？我很厲害喔，但你不要先比我醉倒喔？」
		ELSE
			PRINTFORMW 「嗯......如果%CALLNAME:MASTER%也在喝的話，那我也要來一杯」
		ENDIF
	;ほろ酔い
	ELSEIF TALENT:恋慕 && BASE:酒気 >= 1
		IF RAND:5 == 0
			PRINTFORMW 「嗯~好酒啊，是因為和你一起喝才讓它更美味的吧」
		ELSEIF RAND:4 == 0
			PRINTFORMW 「%CALLNAME:MASTER%你喜歡這種酒嗎？如果和你一起喝的話，我願意......」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「嘻嘻，感覺越來越有趣了」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「怎樣，我不習慣和別人一起喝酒，別太一直盯著我看啊」
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%，不要喝得太醉喔？」
		ENDIF
	;ぐでぐで
	ELSEIF BASE:酒気 > (MAXBASE:酒気 / 10) * 8
		IF RAND:5 == 0
			PRINTFORMW 「這個世界充滿了小心眼的人，所以要豪爽地活下去！！！」
		ELSEIF RAND:4 == 0
			PRINTFORMW 「哇哈哈哈哈！幻想鄉也是我們的了！！！」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「喝太多了……但還可以再喝更多！！！」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「下一次轉生成蟒蛇怎麼樣！我很期待！！」
		ELSE
			PRINTFORMW 「那時候還不如現在呢，也許死掉是件好事！」
		ENDIF
	;酔いどれ
	ELSEIF BASE:酒気 > (MAXBASE:酒気 / 10) * 5
		IF RAND:5 == 0
			PRINTFORMW 「哈哈哈……果然酒是好東西啊！」
		ELSEIF RAND:4 == 0
			PRINTFORMW 「人類也能做出這麼好的東西啊，真有點羨慕呢」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「既然能讓人感覺這麼好，那就應該再多喝一些！」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「我身體本來就很強壯啦！當然酒量也強大！」
		ELSE
			PRINTFORMW 「哇哈哈哈哈，太愉快了太愉快了！」
		ENDIF
	;ほろ酔い
	ELSEIF BASE:酒気 >= 1
		IF RAND:5 == 0
			PRINTFORMW 「嗚嗯，你也可以盡情放縱喔！」
		ELSEIF RAND:4 == 0
			PRINTFORMW 「姆姆，有點味道了，酒氣飄散著呢」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「那個人也是這種感覺啊」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「該不該給狼靈也喝點呢，不過會不會不好喝呢......」
		ELSE
			PRINTFORMW 「現在感覺不管做什麼都能成功！」
		ENDIF
	;風呂場
	ELSEIF BATHCHECK(CFLAG:MASTER:現在位置) && IN_HOME(CFLAG:MASTER:現在位置)
		IF RAND:3 == 0
			PRINTFORMW 「呼嗚……泡澡真是太棒了，人類製造的東西總是那麼棒！」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「有些動物討厭水嗎？我可是很愛乾淨的，不然要怎麼能吸引到自己喜歡的人呢」
		ELSE
			PRINTFORMW 「水和熱水真的是大不同啊，真是奇妙啊」
		ENDIF
	ELSE
		SELECTCASE RAND:4
		CASE 0
			IF DAY:2 == 1
				IF RAND:3 == 0
					PRINTFORMW 「春天真是運動的好時節啊！」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「陽光明媚的季節最好還是多動一動身體！」
				ELSE
					PRINTFORMW 「來吧！出去散步吧！」
				ENDIF
			ELSEIF DAY:2 == 2
				IF RAND:3 == 0
					PRINTFORMW 「這種炎熱的季節，運動出一身汗才舒服啊！」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「游泳也不錯！要不要去買泳裝啊」
				ELSE
					PRINTFORMW 「今天出了好多汗，想快點洗個澡啊」
				ENDIF
			ELSEIF DAY:2 == 3
				IF RAND:3 == 0
					PRINTFORMW 「運動之秋啊！現在練肌肉痛快！」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「秋天有好多美食啊！真希望地上早點涼快起來啊！」
				ELSE
					PRINTFORMW 「秋天涼爽，所以運動後一定要擦乾汗啊！要不然會感冒的啊！」
				ENDIF
			ELSEIF DAY:2 == 4
				IF RAND:3 == 0
					PRINTFORMW 「冷的季節動一動身體暖暖身才舒服啊！」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「冬天也要好好擦汗啊，不然會感冒的啊！」
				ELSE
					PRINTFORMW 「聽說現在是有接力賽的季節……好想參加啊！」
				ENDIF
			ENDIF
		CASEELSE
			IF TALENT:恋人
				IF RAND:5 == 0
					PRINTFORMW 「跟你在一起不只不無聊，反而變得好開心！」
				ELSEIF RAND:4 == 0
					PRINTFORMW 「%CALLNAME:MASTER%能帶領我能使用我真是太好了」
					PRINTFORMW 「這也是對你的信任啊」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「怎麼了？要不要騎我？」
					PRINTFORMW 「不是開玩笑的啦，我是真的想載著你跑過去的」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「雖然我也考慮過入侵地上，但是跟你在一起，已經是很幸福的呢」
				ELSE
					PRINTFORMW 「姆姆，你的話雖然有點難懂，但是聽起來就覺得很棒啊！」
					PRINTFORMW （......在哪裡感受過這樣的氛圍呢......也許只是錯覺吧）
				ENDIF
			ELSEIF TALENT:恋慕
				IF RAND:5 == 0
					PRINTFORMW 「姆姆，你的話我聽不太懂！但是光是聽著就很有趣！」
				ELSEIF RAND:4 == 0
					PRINTFORMW 「平常都在做些什麼呢？嗯，最近流行的應該是練習跑步吧！」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「吉弔很小氣，讓人很討厭，但你倒是挺爽朗的！」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「應該也要了解一下畜生界的人類靈的故事才對啊……」
					PRINTFORMW 「……不，怎麼可能會覺得人類的話這麼有趣呢」
				ELSE
					PRINTFORMW 「憧憬總是遙遠的，但我卻這麼靠近了，真是很幸福呢」
					PRINTFORMW 「什麼，只是自言自語而已啦，%CALLNAME:MASTER%」
				ENDIF
			ELSEIF TALENT:思慕
				IF RAND:5 == 0
					PRINTFORMW 「地上真晴朗，感覺超好的！」
				ELSEIF RAND:4 == 0
					PRINTFORMW 「據說外面有人工太陽呢」
					PRINTFORMW 「畜生界也想要那樣的東西呢……陽光果然是不一樣啊」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「%CALLNAME:MASTER%喜歡運動嗎？」
					PRINTFORMW 「我喜歡，因為可以不用想東想西的」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「速度就是正義，所以我是正義的代表啊！」
				ELSE
					PRINTFORMW 「地上又大又好跑，真是太好玩了！」
				ENDIF
			ELSEIF CFLAG:2 >= 500
				IF RAND:5 == 0
					PRINTFORMW 「那隻大蜈蚣真是超強的啊...想再跟它戰一次」
				ELSEIF RAND:4 == 0
					PRINTFORMW 「你是人類的話，最好要注意一下吉弔啊」
					PRINTFORMW 「那傢伙可以毫不猶豫地斬殺他人」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「有人曾說過，不如現在實行次優策略，勝過明天實行最佳策略。我覺得這話說得挺好的」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「你是討厭運動嗎？身體動起來的感覺很爽啊」
				ELSE
					PRINTFORMW 「你聞起來也好香啊，不會吃掉你的，我是草食動物呀」
				ENDIF
			ELSE
				IF RAND:5 == 0
					PRINTFORMW 「有什麼要說的嗎？」
				ELSEIF RAND:4 == 0
					PRINTFORMW 「你的話很有趣啊，但是聽不太懂啊」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「果然人類的頭腦跟我們不一樣呢」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「怎麼了？要比賽嗎？一定不會輸！」
				ELSE
					PRINTFORMW 「地上的氣味也不怎麼好聞呢，雖然沒有畜生界那麼糟糕」
				ENDIF
			ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;301,お茶を淹れる
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K133_301
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K133_301
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K133_301_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K133_301_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;怒り
	IF CFLAG:318 == 1
		PRINTFORMW 「你的茶我不想喝！」
	ELSEIF TFLAG:193 == -1
		IF RAND:5 == 0
			PRINTFORMW 「……下次我教你如何泡茶吧」
		ELSEIF RAND:4 == 0
			PRINTFORMW 「嗯！好難喝啊！」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「我泡的比較好喝啊！」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「以前喝的茶比這更美味啊？」
		ELSE
			PRINTFORMW 「……你泡茶技術還不太拿手呢！」
		ENDIF
	ELSE
		IF RAND:5 == 0
			PRINTFORMW 「%CALLNAME:MASTER%真厲害啊！我還沒喝過這麼好喝的茶呢！」
		ELSEIF RAND:4 == 0
			PRINTFORMW 「噗哈……！你泡的茶真好喝啊！」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「嗯！味道格外的好！」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「嘶嘶……味道不錯」
		ELSE
			PRINTFORMW 「嗚啊……喝到這樣的好茶真讓人舒服啊！」
		ENDIF
	ENDIF

ENDIF
RETURN 1
;==================================================
;302,スキンシップ
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K133_302
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K133_302
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K133_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K133_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:318 == 1
		IF RAND:3 == 0
			PRINTFORMW 「不要碰我，我現在很生氣！」
			PRINTFORMW 早鬼對身體接觸怒目而視。
		ELSEIF RAND:2 == 0
			PRINTFORMW 「不要輕易亂碰，很髒……」
			PRINTFORMW 早鬼大聲抗議%CALLNAME:MASTER%的行為。
		ELSE
			PRINTFORMW 「停下來！我現在心情很不好！」
			PRINTFORMW 早鬼用憤怒的表情抗議。
		ENDIF
	;風呂場
	ELSEIF BATHCHECK(CFLAG:MASTER:現在位置) && IN_HOME(CFLAG:MASTER:現在位置)
		IF RAND:3 == 0
			PRINTFORMW 「我來替你洗背吧……什，緊張了嗎！」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「泡湯真的是太棒了！來，我們一起洗吧！」
		ELSE
			PRINTFORMW 「你可以幫我搓背嗎？我喜歡被別人的手洗」
		ENDIF
	ELSEIF TALENT:恋人
		IF RAND:3 == 0
			PRINTFORMW 「我為了讓你能撫摸我的頭髮，特地更換了護髮產品，是不是變得更漂亮了啊？」
			PRINTFORMW 早鬼一邊被%CALLNAME:MASTER%撫摸著柔軟的頭髮，一邊微笑著。
		ELSEIF RAND:2 == 0
			PRINTFORMW 「嗯嗯……被你摸的感覺真舒服……%UNICODE(0x2665) *1%」
			PRINTFORMW 早鬼臉紅著與%CALLNAME:MASTER%進行著親密的肌膚接觸
		ELSE
			PRINTFORMW 「怎麼樣？我的肌肉很厲害吧？多摸摸也沒關係哦！」
			PRINTFORMW 早鬼與%CALLNAME:MASTER%愉快地進行著親密的肌膚接觸。

		ENDIF
	ELSEIF TALENT:恋慕
		IF RAND:3 == 0
			PRINTFORMW 「最好要多練些肌肉哦，你也一樣」
			PRINTFORMW 「來吧！可以摸我的肌肉喔！」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「嗯？要揉肩膀按摩？可能會有些硬哦，因為我鍛鍊過」
		ELSE
			PRINTFORMW 「來吧，我會好好摸你喔！」
			PRINTFORMW 「不過代價是我也要摸你喔！」
		ENDIF
	ELSEIF TALENT:思慕
		IF RAND:3 == 0
			PRINTFORMW 「嗯……和你接觸真的很有趣！」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「可以再用力按一下！」
			PRINTFORMW 「我的肌肉都被鍛煉過了！」
		ELSE
			PRINTFORMW 「呵呵呵……我的肌肉那麼迷人嗎？」
			PRINTFORMW 早鬼正享受著和%CALLNAME:MASTER%的親密接觸。
		ENDIF
	ELSEIF CFLAG:2 >= 500
		IF RAND:3 == 0
			PRINTFORMW 「不要太過親熱了啊，雖然不討厭」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「嗯～好久沒有被人類撫摸了呢」
		ELSE
			PRINTFORMW 「對我的肌肉很感興趣嗎？真高興啊！
		ENDIF
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「你啊，真是意外地很愛親近呢」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「你也應該多練肌肉啊，肌肉可解決一切問題啊！」
		ELSE
			PRINTFORMW 「對我的肌肉感興趣，看來你還是有潛力的嘛！」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;303,謝る
;TFLAG:193(2=菓子折成功 1=大成功 0=成功 -1=失敗 -2=菓子折失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K133_303
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K133_303
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K133_303_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K133_303_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
	CASE 0,1,2
		IF TALENT:恋慕
			PRINTFORMW 「......沒辦法啦」
			PRINTFORMW 早鬼接受了%CALLNAME:MASTER%的道歉詞。
			PRINTFORMW 「你這傢伙，肯定在想些什麼吧」
			PRINTFORMW 「但是不要太惹我生氣喔，因為我可不想討厭你啊」
		ELSE
			PRINTFORMW %CALLNAME:MASTER%向早鬼道歉後
			PRINTFORMW 「嘖，算了，我很大方的，就原諒你了！！！」
			PRINTFORMW 早鬼笑著似乎决定原諒了。
		ENDIF
	CASEELSE
		IF TALENT:恋慕
			PRINTFORMW 「光是道歉是不夠的啊」
			PRINTFORMW 「還是要有所作為才行」
		ELSE
			PRINTFORMW 當%CALLNAME:MASTER%對早鬼道歉後
			PRINTFORMW 「……」
			PRINTFORMW 早鬼保持沉默轉過頭去了。
		ENDIF
	ENDSELECT

ENDIF
RETURN 1
;==================================================
;304,仕事を手伝う
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:350(仕事内容(JOB_仕事内容.ERB参照のこと
;TCVAR:手伝えない(=2 手伝っても早くは終わらない、時間停止中不可 永琳の診察等)
;==================================================
@M_KOJO_SUCCESS_COM_K133_304
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K133_304
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K133_304_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K133_304_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;通常
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;305,膝枕してもらう
;TFLAG:193(-5=MASTERがTARGETよりも巨体の場合(TALENT:MASTER:体型 > TALENT:体型 + 2) 1=大成功 0=成功 -1=失敗)(-5以外は地の文分岐無し)
;ABL:親密(6以上=顔をのぞき込みながら頭を撫でてくれる 3以上=ただ頭を撫でてくれる 2以下=縮こまっている)
;==================================================
@M_KOJO_SUCCESS_COM_K133_305
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K133_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K133_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K133_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:318 == 1
		PRINTFORMW 「你想讓我枕著你的頭直到我生氣嗎？」
		PRINTFORMW 早鬼心中雖然不悅，但還是借出了自己的膝蓋。
	ELSEIF TALENT:恋人
		IF RAND:3 == 0
			PRINTFORMW 「好乖好乖，真是個好孩子」
			PRINTFORMW 早鬼溫柔地撫摸膝上的%CALLNAME:MASTER%的頭。

		ELSEIF RAND:2 == 0
			PRINTFORMW 「這樣做讓我想起了過去」
			PRINTFORMW 早鬼正座後用膝上迎接了%CALLNAME:MASTER%。
			PRINTFORMW 「雖然沒有膝枕的經驗......但還記得被人溫柔對待的記憶，所以也讓你體驗一下」
			PRINTFORMW 早鬼一邊說著一邊輕輕撫摸著%CALLNAME:MASTER%的頭。
		ELSE
			PRINTFORMW 「好了好了，你就好好享受我的無與倫比的美腿吧！！！」
			PRINTFORMW 早鬼一邊說著一邊讓%CALLNAME:MASTER%靠在膝上。
		ENDIF
	ELSEIF TALENT:恋慕
		IF RAND:3 == 0
			PRINTFORMW 「這樣啊，原來你是想要膝枕啊」
			PRINTFORMW 「這樣子會有種親子的感覺呢！好乖好乖」
			PRINTFORMW 早鬼用膝上感受著%CALLNAME:MASTER%的體溫。
		ELSEIF RAND:2 == 0
			PRINTFORMW 「靠在我的膝枕上好好睡吧！！！」
			PRINTFORMW 早鬼稍微有些喘息地讓%CALLNAME:MASTER%躺在膝上。
		ELSE
			PRINTFORMW 「怎麼了？累了嗎？」
			PRINTFORMW 早鬼一邊問一邊讓%CALLNAME:MASTER%的頭靠在膝上。
			PRINTFORMW 「來吧，好好依靠我吧，這樣就能消除疲勞了！」
		ENDIF
	ELSEIF TALENT:思慕
		IF RAND:3 == 0
			PRINTFORMW 「好～啊好啊，在我膝上安心地睡吧！！！」
			PRINTFORMW 「不過這樣的話，你的臉就被胸部給擋住了，看不太清楚呢……」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「不要抱太大期望哦，我也不是很熟練啊」
			PRINTFORMW 早鬼溫柔地撫摸著%CALLNAME:MASTER%的頭。
		ELSE
			PRINTFORMW 「呼誒，這樣的話，是因為我的美腳比吉弔那種瘦弱的腿更有吸引力嗎？」
			PRINTFORMW 「好啊！那就好好感受吧！！！」
		ENDIF
	ELSEIF CFLAG:2 >= 500
		IF RAND:3 == 0
			PRINTFORMW 「哦，想要我給你膝枕啊，真是個有趣的傢伙！那我就來摸摸你吧！！！」
			PRINTFORMW 早鬼一邊給%CALLNAME:MASTER%膝枕，一邊撫摸著頭。
		ELSEIF RAND:2 == 0
			PRINTFORMW 「原來如此，沒關係！這是難得的機會，會好好的撫摸你的！」
			PRINTFORMW 早鬼撫摸著膝上%CALLNAME:MASTER%的頭。
		ELSE
			PRINTFORMW 「好！我會好好疼愛你！」
			PRINTFORMW 早鬼撫摸著%CALLNAME:MASTER%的頭。
		ENDIF
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「不是很有經驗啦……但是我來給你膝枕吧！」
			PRINTFORMW 早鬼一邊給%CALLNAME:MASTER%膝枕，一邊撫摸著頭。
		ELSEIF RAND:2 == 0
			PRINTFORMW 「嗯嗯……人類好像很喜歡這種東西呢！好吧！我來給你膝枕吧！」
			PRINTFORMW 早鬼一邊說著一邊撫摸著%CALLNAME:MASTER%的頭。
		ELSE
			PRINTFORMW 「沒關係啦，其實你是狼靈吧？」
			PRINTFORMW 早鬼一邊說著一邊撫摸著%CALLNAME:MASTER%。
		ENDIF
	ENDIF
ENDIF
RETURN 1

repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【133】早鬼/M_KOJO_K133_日常系コマンド.ERB

license: unknown


code:
eraTheWorld　驪駒早鬼口上

eraTW4.872用の早鬼口上です。
--------------------------------------------------
※注意・コンセプト

考えるより行動するタイプ。
何も考えてないんじゃなくて考えても他者に勝てない以上考えるだけ無駄だと思ってる。
AS極振りタイプ。機動戦論者。

エロ口上全然思いつかないです。

以上の注意を呼んで了承される方は導入して下さい。
--------------------------------------------------
※加筆・修正・改造・口上まとめ等

基本的に全部ＯＫですが加筆・修正・改造に関しては更新履歴に
加筆・修正・改造した箇所と加筆・修正・改造した人の名前を明記していただけると幸いです。
（作者が加筆・修正・改造する際にどこが変わったのか分からなくなるためです。）

--------------------------------------------------
※苦情・バグ報告等

したらば掲示板のera板避難所eratoho総合スレにいることが多いのでそちらで
ご報告お願いします。

--------------------------------------------------
※参考にさせて頂いた方々

eraTheWorld用の貂プレを利用させていただきました、ありがとうございます。
YM青娥様、YM布都様、TW霊夢様の口上を参考にさせていただきました。
其他eraに関わる皆様方、ありがとうございます。

--------------------------------------------------
※更新履歴

2022/11/28
保存も兼ねて投下。

--------------------------------------------------
※作者
黒い人


code:
;  早鬼口上
;  作者：黒い人
;  ＜改変した場合はここに改変者の名前・連絡先を追加する＞
;
;  ＜この口上について語ったりするスペース＞
;
;  ライセンス：
;  作者は以下で○をつけた行為について、誰でも無断で行えるものとし、違反しない限り許可を撤回しないものとします。
;    ○：常に許可　△：要相談、上記の作者と改変者全員に連絡が取れない場合は不許可　×：不許可、相談を受けても許可しない
;
;  +----+-----------------------------------+
;  | 口上の再配布                           |
;  +----+-----------------------------------+
;  | ○ | 単体での再UPロード            |
;  | ○ | 本体への同梱・口上まとめへの収録  |
;  +----+-----------------------------------+
;  | 再配布を許可する場合の改変             |
;  +----+-----------------------------------+
;  | ○ | 口上の加筆                        |
;  | ○ | 口上の改変・其他改変            |
;  +----+-----------------------------------+
;  | 其他                                 |
;  +----+-----------------------------------+
;  | ○ | 他の口上での利用                  |
;  | ○ | 他のeraバリアントでの利用         |
;  | ○ | era以外への流用                   |
;  | ○ | 翻訳・他言語版バリアントへの流用  |
;  | × | 商用利用・金銭のやり取りを伴う利用|
;  | ○ | 二次創作                          |
;  +----+-----------------------------------+
;  ・以下の行為に関しては上記と関係なく、無断で行えるものとします。
;    １：バグ・誤字脱字の修正・本体VerUpへの対応のための改変
;  ・以下の行為に関しては上記と関係なく、作者であっても禁止とします。
;    １：以下の例外を除き、この口上からライセンス文・添付文章（ファイル名を除く）の内容を変更・削除すること
;        ・次期バージョンから、ライセンスの○・△を×に変更すること
;        ・次期バージョンから、上記の作者と改変者全員の許可が那个ば、それ以外の変更も
;    ２：この口上が二次創作等の場合に、原作者が禁止を宣言している行為
;  ・改変者は自分の名前を削除することができ、それによりこの口上に関する一切の権利を放棄し、放棄できない権利について行使しないことを宣言したものとします。
;  ・この口上を使用したことによる損害等について、バリアント・口上の作者、改変者は一切の責任を負いません。

path: ERB/口上・メッセージ関連/個人口上/【133】早鬼/ライセンステンプレ.txt


path: ERB/口上・メッセージ関連/個人口上/【134】美宵/KOJO_DAIRY_K134.ERB