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

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

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

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

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

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

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

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

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K130
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
	PRINTFORMW 「没在这里见到过你啊、是迷路了吗？」
	PRINTFORMW 金色短发，头上长着分叉的角，最显眼的特征还得数那背上的壳，这样的一位女性，朝%CALLNAME:MASTER%搭起了话。
	PRINTFORMW 「一个有肉身的人类在这可是相当罕见的、在这种地方想要干什么？」
	PRINTFORMW 她用好像要把人吸进去似的充满魅力的红瞳朝着这边发起了质问。
	PRINTFORMW 「哼嗯——，好像没什么……又好像有什么……」
	PRINTFORMW 「嘛、算了，我是吉弔八千慧，现在当着鬼杰组的组长」
	PRINTFORMW 「平常的话我就在畜生界这里、要是有什么事的话可以来找我」
	PRINTFORMW 「想必对你而言也不是件坏事吧、那就让我们好好相处吧」
	CALL ASK_YN("好的","是的")
	IF !RESULT
	ELSE
	ENDIF
	PRINTFORMW 「不错的回复，那么、下次再见」
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K130_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 「所以说、能不能接受我一个小小的请求呢？」
	CALL ASK_YN("好的","是的")
	IF !RESULT
	ELSE
	ENDIF
	PRINTFORMW 「那我就不客气了……」
	PRINTFORMW 八千慧把手搭在%CALLNAME:MASTER%的脖子上，然后就那么吻了过来。
	PRINTFORMW 「啾……」
	PRINTFORMW 「……就只有这样而已啦，那么，下次见」
	PRINTFORMW 她告了别之后便离開了。
	PRINTFORMW
	PRINTFORMW （我这样做也太狡猾了吧……也就只有某个肌肉笨蛋会想都不想就直接下手吧）
	PRINTFORMW （如果不用的话……%CALLNAME:MASTER%是不是就不会接受了呢……？）
	PRINTFORMW 八千慧俯下身，忍住想要夺眶而出的泪水，回味着那苦涩的唇味。
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K130_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 「哪就直截了当的说吧、我喜欢%CALLNAME:MASTER%」
			PRINTFORMW 八千慧连语言都组织不流畅，但还是继续说了下去。
			PRINTFORMW 「我只是对你抱有着好意？不止啊，我爱着你啊」
			PRINTFORMW 「所以说，那个……能不能接受我的告白，和我成为恋人呢」
			PRINTFORMW 「……这种时候，应该还有更好的告白方式吧，虽然还是变成了这样」
			PRINTFORMW 在这么说的同时，朝着%CALLNAME:MASTER%的看去
			PRINTFORMW 「%CALLNAME:MASTER%变成别人的东西什么的，我不想要那样啊」
			PRINTFORMW 「就连想到%CALLNAME:MASTER%和别人关系好而已都会让我感觉胸口挨了重重的一记一般，难以呼吸」
			PRINTFORMW 「这是我一生仅此的请求，所以说……」
			PRINTFORMW 「%CALLNAME:MASTER%，可以成为仅属于我的%CALLNAME:MASTER%吗？」
			PRINTFORMW 能看到八千慧现在相当害羞。
		;二回目の告白
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%，不会让你还能再羞辱我一次」
			PRINTFORMW 八千慧把手放在了胸前，像做好了觉悟一样深吸了一口气，開口说道。
			PRINTFORMW 「我爱你……可以请你和我交往吗？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「呼~，做这种事情可真紧张啊」
		PRINTFORMW 八千慧一说完就高兴的环抱住%CALLNAME:MASTER%的脖子，和%CALLNAME:MASTER%紧紧贴在一起。
		PRINTFORMW 「嗯……」
		PRINTFORMW 接着便亲上了%CALLNAME:MASTER%的嘴唇
		PRINTFORMW 「这是誓约之吻，不要背叛我哦，%CALLNAME:MASTER%」
		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_K130_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 「约好了，明天还要去约会哦？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「今天玩的很開心呢，下次还要来找我约会哦」
			CALL ASK_YN("好的","是的")
			IF !RESULT
			ELSE
			ENDIF
			PRINTFORMW 「……我很期待哦」
		ELSEIF TALENT:思慕
			PRINTFORMW 「今天就这样结束了吗，下次记得还来约我哦」
			CALL ASK_YN("好的","是的")
			IF !RESULT
			ELSE
			ENDIF
			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_K130_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_K130
				ELSEIF CFLAG:318 == 1
					PRINTFORMW 「……你能别靠近吗？」
				;屋外かつ満月
				ELSEIF NAME_MOON(DAY:3) == "十五夜 -中秋的名月- " && OPENPLACE(CFLAG:MASTER:現在位置) >= 2
					PRINTFORMW 「哦，是%CALLNAME:MASTER%吗，今夜的月色可真美啊」
					IF TALENT:恋人
						PRINTFORMW 「可以像现在这样和%CALLNAME:MASTER%在一起赏月，我也许很幸福呢」
					ELSEIF TALENT:恋慕
						PRINTFORMW 「……什么事都没有哦」
					ENDIF
				;台風
				ELSEIF FLAG:異常気象 == 9
					PRINTFORMW 「台风要来了，这可真糟糕啊%CALLNAME:MASTER%」
					IF TALENT:恋人
						PRINTFORMW 「……那接下来，就%UNICODE(0x2665) *1%」
						PRINTFORMW 八千慧在妩媚地笑着。
					ENDIF
				;猛吹雪
				ELSEIF FLAG:異常気象 == 10
					PRINTFORMW 「%CALLNAME:MASTER%今天最好不要出门哦」
					IF TALENT:恋人
						PRINTFORMW 「我也很不擅长应付寒冷呢，让我们一起来温暖对方吧%UNICODE(0x2665) *1%」
					ENDIF
				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_K130
				ELSEIF CFLAG:318 == 1
					PRINTFORMW 「……真糟糕」
				;屋外かつ満月
				ELSEIF NAME_MOON(DAY:3) == "十五夜 -中秋的名月- " && OPENPLACE(CFLAG:MASTER:現在位置) >= 2
					PRINTFORMW 「啊啊、是%CALLNAME:MASTER%吗、今夜的月色可真美啊」
					IF TALENT:恋人
						PRINTFORMW 「可以像现在这样和%CALLNAME:MASTER%在一起赏月，我也许很幸福呢」
					ELSEIF TALENT:恋慕
						PRINTFORMW 「……什么事都没有哦」
					ENDIF
				;台風
				ELSEIF FLAG:異常気象 == 9
					PRINTFORMW 「台风要来了，这可真糟糕啊%CALLNAME:MASTER%」
					IF TALENT:恋人
						PRINTFORMW 「……那接下来，就%UNICODE(0x2665) *1%」
						PRINTFORMW 八千慧妩媚地微笑着。
					ENDIF
				;猛吹雪
				ELSEIF FLAG:異常気象 == 10
					PRINTFORMW 「%CALLNAME:MASTER%今天最好不要出门哦」
					IF TALENT:恋人
						PRINTFORMW 「我也很不擅长应付寒冷呢，让我们一起来温暖对方吧%UNICODE(0x2665) *1%」
					ENDIF
				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 「擦个背当然可以的吧、都已经是那种关系了呢」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「难得的机会就一起洗吧、怎么、又不会缺点什么」
			ELSEIF TALENT:思慕
				PRINTFORMW 「哦呀？我也一起进来没关系的吧？」
				CALL ASK_YN("好的","是的")
				IF !RESULT
				ELSE
				ENDIF
			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 「啊，%CALLNAME:MASTER%？你已经进来了吗？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが浴室に入ってきて追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 5
			IF TALENT:恋人
				PRINTFORMW 「嗯ー抱歉，现在没那种心情」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……对不起，可以请你出去吗？」
			ELSEIF TALENT:思慕
				PRINTFORMW 「我想一个人洗，可以请你出去吗？」
				CALL ASK_YN("好的","是的")
				IF !RESULT
				ELSE
				ENDIF
				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_K130
				ELSEIF CFLAG:318 == 1
					PRINTFORMW 「……真糟糕」
				;屋外かつ満月
				ELSEIF NAME_MOON(DAY:3) == "十五夜 -中秋的名月- " && OPENPLACE(CFLAG:MASTER:現在位置) >= 2
					PRINTFORMW 「啊啊、是%CALLNAME:MASTER%吗、今夜的月色可真美啊」
					IF TALENT:恋人
						PRINTFORMW 「可以像现在这样和%CALLNAME:MASTER%在一起赏月，我也许很幸福呢」
					ELSEIF TALENT:恋慕
						PRINTFORMW 「……什么事都没有哦」
					ENDIF
				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 CFLAG:行動 == 5 && !TCVAR:130:今天有否见面
				PRINTFORMW 「我正忙着呢，有什么事吗？」
			ELSE
				IF TALENT:恋人
					PRINTFORMW 「……」
					PRINTFORMW 「……笨蛋」
				ELSEIF TALENT:恋慕
					PRINTFORMW 「是在幽会吗，%CALLNAME:MASTER%？」
					PRINTFORMW （花心大萝卜……）
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%是在约会吗？好像很高兴的样子呢」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;特別な日イベント用関数
;==================================================
;-------------------------------------------------
@SPECIALDAY_EVENT_K130
;-------------------------------------------------
	;謹賀新年
	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%」
			CALL ASK_YN("好的","是的")
			IF !RESULT
			ELSE
			ENDIF
		ELSE
			PRINTFORMW 「新年快乐 %CALLNAME:MASTER%」
		ENDIF
	;情人節
	ELSEIF DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%、」
			PRINTFORMW 八千慧悄咪咪的向%CALLNAME:MASTER%搭起了话
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%，给你这个……」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%、给你这个……」
		ELSEIF CFLAG:2 >= 1000
			PRINTFORMW 「%CALLNAME:MASTER%、」
		ENDIF
		SELECTCASE CFLAG:好感度
		CASE 1000 TO 3000
			PRINTFORMW 「是巧克力哦」
			PRINTFORMW 八千慧把巧克力递了过来。
			PRINTFORMW 「受你关照了，这是回礼，尝尝吧」
		CASE 3001 TO 5000
			PRINTFORMW 八千慧给了%CALLNAME:MASTER%巧克力。
			PRINTFORMW 「这是平日的感谢、听水獭灵说地上有这样的节日」
			PRINTFORMW 她貌似有些害臊，说完就小碎步离開了现场。
		CASE IS > 5000
			IF EXP:愛情経験 >= 100
				PRINTFORMW 「姑且是自己手工做的……」
				PRINTFORMW 「我以前没怎么做过这种东西……这是按照我自己的喜好来做的……」
				PRINTFORMW 「要是合你口味的话就好了……」
				PRINTFORMW 她像是想掩饰自己的害羞一样玩着自己的发梢，将巧克力递了过来。
			ELSE
				PRINTFORMW 「拿着，巧克力」
				PRINTFORMW 说着，八千慧把巧克力递了过来。
				PRINTFORMW 「买了毕竟贵的，味道应该是有保证的」
			ENDIF
		ENDSELECT
	;万圣节
	ELSEIF DAY:2 == 3 && DAY:3 == 30
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%!不给糖就捣蛋♪」
			PRINTFORMW 八千慧朝%CALLNAME:MASTER%搭起了话。
			PRINTFORMW 「哼哼……别看我这样，恶作剧我可是很厉害的哦」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「不给糖就捣蛋♪」
			PRINTFORMW 八千慧威胁着%CALLNAME:MASTER%。
			PRINTFORMW 「要是不给我糖果的话我就要捣蛋了哦？」
			PRINTFORMW 八千慧的脸上并没有笑容……
		ELSEIF TALENT:思慕
			PRINTFORMW 「不给糖就捣蛋♪」
			PRINTFORMW 八千慧把手搭在%CALLNAME:MASTER%的肩上小声说道。
			PRINTFORMW 「吓到了吗？那就把糖果交出来……」
		ELSE
			PRINTFORMW 「不给糖就捣蛋♪」
			PRINTFORMW 八千慧这么说道。
			PRINTFORMW 「唔……明明听说这么做就可以拿到糖果的……」
		ENDIF
	;圣诞节
	ELSEIF DAY:2 == 4 && DAY:3 == 25
		IF TALENT:恋人
			PRINTFORMW 「圣诞快乐，%CALLNAME:MASTER%%UNICODE(0x2665) *1%」
			PRINTFORMW 八千慧很高兴似的对%CALLNAME:MASTER%说。
			PRINTFORMW 「圣诞礼物难道不能是互相的吗……？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「圣诞快乐，%CALLNAME:MASTER%♪」
			PRINTFORMW 八千慧朝这边搭起了话。
			PRINTFORMW 「今夜想必会很愉快吧」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%，圣诞快乐」
			PRINTFORMW 八千慧朝这边搭起了话。
			PRINTFORMW 「礼物想要什么？……我可没过说我要送你」
		ELSE
			PRINTFORMW 「圣诞快乐，%CALLNAME:MASTER%」
			PRINTFORMW 八千慧朝这边搭起了话。
			PRINTFORMW 「能过个不错的圣诞节就好了呢」
		ENDIF
	ENDIF
;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K130_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%%UNICODE(0x2665) *1%」
			PRINTFORMW 八千慧好像很高兴地向%CALLNAME:MASTER%道了声早安。
			PRINTFORMW 「睡脸很不错哦、你的睡脸意外的很可爱呐%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%，早上好啊♪」
			PRINTFORMW 八千慧道了个早安
			PRINTFORMW 「……再睡会也行哦」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%，早上好」
			PRINTFORMW 八千慧道了个早安
			PRINTFORMW 「睡太久会变成笨蛋的哦？」
		ELSE
			PRINTFORMW 「早上好，%CALLNAME:MASTER%」
			PRINTFORMW 八千慧道了个早安
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「早上好，%CALLNAME:MASTER%%UNICODE(0x2665) *1%」
			PRINTFORMW 八千慧好像很高兴地向%CALLNAME:MASTER%道了声早安。
			PRINTFORMW 「睡脸很不错哦、你的睡脸意外的很可爱呐%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%，早上好啊♪」
			PRINTFORMW 八千慧道了个早安
			PRINTFORMW 「……再睡会也行哦」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%，早上好」
			PRINTFORMW 八千慧道了个早安
			PRINTFORMW 「睡太久会变成笨蛋的哦？」
		ELSE
			PRINTFORMW 「早上好，%CALLNAME:MASTER%」
			PRINTFORMW 八千慧道了个早安
		ENDIF
		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
	;-------------------------------------------------
	;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 「嗯，早上好」
			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_K130_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%%UNICODE(0x2665) *1%」
		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%%UNICODE(0x2665) *1%」
			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%，你能出去吗？」
				CALL ASK_YN("好的","是的")
				IF !RESULT
				ELSE
				ENDIF
			ELSEIF TALENT:思慕
				PRINTFORMW 「%CALLNAME:MASTER%、能让我一个人先睡了吗？」
				CALL ASK_YN("好的","是的")
				IF !RESULT
				ELSE
				ENDIF
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%，你能出去吗？」
				CALL ASK_YN("好的","是的")
				IF !RESULT
				ELSE
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他キャラとのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF TALENT:恋人
				PRINTFORMW 「……%CALLNAME:MASTER%……能请你从这个世界上消失吗？」
			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%%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%、晚安♪」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%、晚安」
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%、不要做什么奇怪的事情啊」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;移動時すれちがい
;==================================================
@M_KOJO_EVENT_K130_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%%UNICODE(0x2665) *1%」
			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_K130_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_K130_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 「我也要参加进来，可以的吧？」
				CALL ASK_YN("好的","是的")
				IF !RESULT
				ELSE
				ENDIF
		ELSE
			PRINTFORMW 「我也可以一起吗？」
				CALL ASK_YN("好的","是的")
				IF !RESULT
				ELSE
				ENDIF
		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_K130_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 「不用在意哦，只看着我就好了%UNICODE(0x2665) *1%」
		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_K130_8(ARG,ARG:1)
RETURN 1

;==================================================
;胖次没収された
;==================================================
@M_KOJO_EVENT_K130_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_K130_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 「都是%CALLNAME:MASTER%不好%UNICODE(0x2665) *1%」
				PRINTFORMW 这么说着，八千慧開始玩弄起了%CALLNAME:MASTER%的下半身。
			ELSE
				PRINTFORMW 「……」
				PRINTFORMW 八千慧沉默地用体重将紧贴着的%CALLNAME:MASTER%给推到了。
				PRINTFORMW 「朱鹭虽然不会吃人，但我会吃了你哦%UNICODE(0x2665) *1%」
				PRINTFORMW 她将身体紧贴%CALLNAME:MASTER%，向%CALLNAME:MASTER%渴求着。
				PRINTFORMW 「所以，给我做好觉悟哦%UNICODE(0x2665) *1%」
			ENDIF
		ELSEIF TALENT:恋慕
			IF RAND:3 == 0
				PRINTFORMW 「%CALLNAME:MASTER%%UNICODE(0x2665) *1%」
				PRINTFORMW 八千慧突然将身体压了过来，把%CALLNAME:MASTER%给推倒了。
				PRINTFORMW 「可以抱我哦%UNICODE(0x2665) *1%」
				CALL ASK_YN("好的","是的")
				IF !RESULT
				ELSE
				ENDIF
				PRINTFORMW 说着，八千慧一边亲了上来一边玩弄着%CALLNAME:MASTER%的身体。
				PRINTFORMW 「不错的回答，那么就尽管来吧%UNICODE(0x2665) *1%」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「%CALLNAME:MASTER%」
				PRINTFORMW 八千慧突然抓住%CALLNAME:MASTER%的肩膀将其推倒了。
				PRINTFORMW 「都是视而不见的%CALLNAME:MASTER%不好%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%……」
				PRINTFORMW 「我不知怎么兴奋起来了%UNICODE(0x2665) *1%」
				PRINTFORMW 八千慧浮现出妖艳的笑容玩弄起%CALLNAME:MASTER%。
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「%CALLNAME:MASTER%……」
				PRINTFORMW 八千慧突然把身体压了过来，沉默着将%CALLNAME:MASTER%压倒了。
				PRINTFORMW 「让我这么兴奋，要给我负起责任来哦%UNICODE(0x2665) *1%」
				CALL ASK_YN("好的","是的")
				IF !RESULT
				ELSE
				ENDIF
				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_K130_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 「混浴吗，不错的爱好嘛%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……可不可以别一直盯着我看呐？」
			PRINTFORMW 八千慧有点郁闷地浸在浴缸里。
		ELSEIF TALENT:思慕
			PRINTFORMW 「唔……可以是可以……不要做奇怪的事情哦」
		ELSE
			PRINTFORMW 「可以，但你要是敢做什么奇怪的事情我就会杀了你哦」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;寝床に忍び込み
;==================================================
@M_KOJO_EVENT_K130_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 「夜袭可是NG的哦……」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「请不要进来」
		ELSEIF TALENT:思慕
			PRINTFORMW 「能请你出去吗？」
			CALL ASK_YN("好的","是的")
			IF !RESULT
			ELSE
			ENDIF
		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_K130_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_K130_14(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		PRINTFORMW 「我饿了呢……」
		PRINTFORMW 「%CALLNAME:MASTER%，可以把尼带着的食物给我吗？」
		CALL ASK_YN("好的","是的")
		IF !RESULT
		ELSE
		ENDIF
		PRINTFORMW 「那么，我不客气了♪」
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;MASTERが推倒た
;==================================================
@M_KOJO_EVENT_K130_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_K130_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_K130_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 一边捂住嘴一边思考要把嘴里剩下的种子怎么办后
				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_K130_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 「好吧，要请你付好责任哦%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……一起，来生个孩子吧」
		ELSE
			PRINTFORMW 「……真没办法，行吧」
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K130_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「要说服巫女可真麻烦……不过总算是成功了」
		PRINTFORMW 「那家伙可真顽固，有够麻烦的，不过终归还是没什么大不了的」
		PRINTFORMW 八千慧一脸坏笑地说道。
		PRINTFORMW 「那么，接下来就是愉快的同居生活了呢」
		PRINTFORMW 「今晚不会让你睡的哦？」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「那巫女也真是麻烦」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K130_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 「下次也要来个愉快的约会哦%UNICODE(0x2665) *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
		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_K130_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
			PRINTFORMW 八千慧一回到家就摊在了被窝上。
			PRINTFORMW 「……」
			PRINTFORMW 「……我这是怎么了」
			PRINTFORMW 「……我要怎么办呢」
			PRINTFORMW 明明只是使用能力的话马上就能解决的问题，明明只是这样的小问题...
			PRINTFORMW （我不想……那样子）
			PRINTFORMW 用手遮住已然通红的脸，反复地思考着。
			PRINTFORMW （啊啊……我到底要怎么办呐……）
			PRINTFORMW 「……看来只有变成笨蛋这一个方法了……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
			PRINTFORMW 八千慧一回到家就摊在了被窝上。
			PRINTFORMW 「那种事情……明明……」
			PRINTFORMW 被不能理解的雾霾所笼罩，八千慧睡着了。
			PRINTFORMW （我被人给……）
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 「嗯……」
		PRINTFORMW  八千慧忍耐着情欲躺上了床。
		PRINTFORMW 「……%CALLNAME:MASTER%……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		PRINTFORMW 她呆呆凝望着天空，带着无神的眼睛，手伸向秘部。
		PRINTFORMW 接受了自己已然变得如此淫乱的事实，脑内浮现出%CALLNAME:MASTER%的事情。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「……%CALLNAME:MASTER%……」
		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_K130_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;通常自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORMW 「嗯……嗯~……%UNICODE(0x2665) *1%」
			PRINTFORMW 「%CALLNAME:MASTER%……让我只能做这种事……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「嗯……不可以……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:思慕
			PRINTFORMW 「嗯……嗯……啊……」
		ELSE
			PRINTFORMW 「啊……嗯……」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同室時自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:思慕
			PRINTFORMW 「嗯……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORMW 「……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;中だし精液自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORMW 「啊嗯，还在流出来%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「嗯%UNICODE(0x2665) *1%」
		ELSEIF TALENT:思慕
			PRINTFORMW 「嗯……%CALLNAME:MASTER%的精子，好多……%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORMW 「……还有精子在里面……%UNICODE(0x2665) *1%」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無知持ち（自慰経験(調教自慰経験は差し引き)による分岐あり
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		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 = 1
	;-------------------------------------------------
	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
		;其他
		;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
		IF TALENT:恋人
			PRINTFORMW 「嗯……啊……%CALLNAME:MASTER%%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「哈啊……嗯……喜欢……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:思慕
			PRINTFORMW 「嗯……%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORMW 「嗯嗯……嗯……%UNICODE(0x2665) *1%」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 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
		;其他
		;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
		IF TALENT:恋人
			PRINTFORMW 「嗯……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「还不够……%UNICODE(0x2665) *1%」
		ELSEIF TALENT:思慕
			PRINTFORMW 「嗯……%CALLNAME:MASTER%……%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORMW 「啊……嗯……%UNICODE(0x2665) *1%」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;我慢
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K130_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 八千慧稍微考虑了一会之后
			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%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「可以哦，是想趁热吧」
		ELSEIF TALENT:思慕
			PRINTFORMW 「没问题，但要是敢做什么奇怪的事想必组员是不会沉默了事的吧」
		ELSE
			PRINTFORMW 「嘛，行吧，你胆子也真是大呐」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K130_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 八千慧温柔得抚摸着自己的腹部，感受着其中生命的鼓动。
		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_K130_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
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K130_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 「……去死！」
				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 八千慧大声斥责，将%CALLNAME:MASTER%赶了出去。
			ELSEIF TALENT:恋人
				PRINTFORMW 「……现在可以让我一个人吗」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「刚刚的都给我忘掉！快忘了！」
			ELSEIF TALENT:思慕
				PRINTFORMW 「回去！」
				CALL ASK_YN("好的","是的")
				IF !RESULT
				ELSE
				ENDIF
			ELSE
				PRINTFORMW 「……请回去！」
				CALL ASK_YN("好的","是的")
				IF !RESULT
				ELSE
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;やっちゃう
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF CFLAG:318 == 1
				PRINTFORMW 「……笨蛋！」
				PRINTFORMW 八千慧一边斥责着%CALLNAME:MASTER%一边接受着。
			;処女
			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_K130_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 「放轻松就好了%UNICODE(0x2665) *1%」
			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_K130_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%的内裤给我的话就行」
						CALL ASK_YN("好的","是的")
						IF !RESULT
						ELSE
						ENDIF
						PRINTFORMW 「那就交换吧」
					ELSEIF RAND:2 == 0
						PRINTFORMW 「……那就来交换吧」
						CALL ASK_YN("好的","是的")
						IF !RESULT
						ELSE
						ENDIF
					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 「嘛，倒也无所谓」
					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_K130_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_K130_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_K130_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_K130_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 「独自一人可是很寂寞的……」
				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_K130_ONABARE_1(ARG)
;-------------------------------------------------
:口上色を付けるならコメントアウトを外しXを角色番号に
;CALL M_KOJO_COLOR_K130

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

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

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

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

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

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

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

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

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

path: ERB/口上・メッセージ関連/個人口上/【130】八千慧/M_KOJO_K130_イベント.ERB


repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【130】八千慧/M_KOJO_K130_カウンター.ERB

license: unknown