code:
;-------------------------------------------------
; eraTheWorld 4.860用 豊姫口上（角色の名前を入れる、下にコンセプトなど一言那个ば入れる）
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。

;幼い頃大好きだった近所のお姉ちゃん
;結婚して家を出てから疎遠になっていたけど、色々あって帰って来たらしい
;久しぶりに挨拶に行った你を出迎えてくれたのは、あの頃と変わらないままのお姉ちゃんで……
;そんなイメージで書きました（嘘

;ひたすら甘えさせてくれる年上のお姉ちゃんのイメージで書きました（本当

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

;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;
;TCVAR:99:350 费米纤维の説明で使用
;TCVAR:99:399 推倒た時・推倒返した時に口上を切り替える為に使用
;CFLAG:99:1000 反感減少スイッチ 初対面の選択肢で『是』を選ぶとONに
;CFLAG:99:1998 口上側の地の文オンオフ制御で使用
;CFLAG:99:1999 UPDATEに使用
;
;******************************************************************************

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

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

;### 口上基本フラグ設定 #############################
@M_KOJO_FLAGSETTING_K99
;基本フラグ設定はここで行ってください
;共通の口上フラグは必要な箇所のコメントアウトを外してご利用ください
;口上専用フラグはご自由に
;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:99:恋慕 || TALENT:99:炮友 || TALENT:99:風騷
	CFLAG:99:推倒禁止 = 0
;素質が無い場合は推倒てこない
ELSE
	CFLAG:99:推倒禁止 = 1
ENDIF

;来訪不能に1を入れると、来訪してこなくなります
IF !CFLAG:99:面識
	CFLAG:99:来訪不能 = 1
ELSE
	CFLAG:99:来訪不能 = 0
ENDIF

;推倒た時・推倒返した時で口上を切り替える為の処理
;口上存在判定でやるのはマズい気がするけどこれしか思いつかない…
IF !CFLAG:诶嘿嘿
	TCVAR:99:399 = 0
ENDIF

CALL BAN_COMMON_IRAI([[豊姫]], 3)
CALL BAN_COMMON_IRAI([[豊姫]], 12)
CALL BAN_COMMON_IRAI([[豊姫]], 13)

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

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

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

IF CFLAG:99:面識 == 1 && CFLAG:99:1999 == 0
	CALL TOYOHIME_SETTINGS
	CFLAG:99:1999 = 1
ENDIF

PRINTL
PRINTFORMDL 做爱的时候显示丰姬状态的口上内容的表示·隐藏变更\n（译者注：关闭的话、性交系口上只会显示丰姬的呻吟、開启后会有对当前两人动作的额外描述、建议開启）
PRINTFORMDL 口上推荐显示、但认为没有必要的人请选择【不显示】
PRINTL
CALL ASK_YN("显示","不显示")
SELECTCASE RESULT
	CASE 0
		CFLAG:99:1998 = 0
		PRINTFORMDL 改为显示了
	CASE 1
		CFLAG:99:1998 = 1
		PRINTFORMDL 改为不再显示了
ENDSELECT
PRINTFORMDW 需要更改的话、请再按下[UPDATE]

RETURN 1

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

;月で遭遇
IF (CFLAG:MASTER:現在位置 / 100) == 10
	;月に住んでる
	IF MAIN_MAP == 10
		PRINTFORMW 「啊、是%CALLNAME:MASTER%、住的还习惯吗？」
		PRINTFORMDL %CALLNAME:MASTER%连忙向一见面就爽快地打招呼的女性鞠了一躬
		PRINTFORMDL 她的名字是绵月丰姬
		PRINTFORMDW 是藏匿了因为被追捕、而迷失在月球上的%CALLNAME:MASTER%的救命恩人
		PRINTFORMW 「用不着那么严肃、不然的话、我们交流起来会很麻烦吧？」
		PRINTFORMDL 对于%CALLNAME:MASTER%来说、幸运的是、这个叫绵月丰姬的女性对地面上的人有深刻的理解
		PRINTFORMDW 『如果我不把你藏起来的话、你一定会被他们处死的』她这样说
		PRINTFORMW 「说起来、你也是个怪人、竟然不想回到地球上」
		PRINTFORMW 「像你这样的地上之民、是第二个了」
		PRINTFORMDW 因为我想报答你对我的帮助。听到这样的话的丰姬愉快地笑了
		PRINTFORMW 「呵呵……有趣、把你藏起来果然是对的」
		PRINTFORMW 「我有种感觉、如果是你的话、和我的妹妹、还有兔子们、也能马上融洽相处」
		PRINTFORMDL 为什么对一个刚见面的人这么亲切呢？
		PRINTFORMDW %CALLNAME:MASTER%对丰姬、有了一些特别的感情
	;それ以外
	ELSE
		;ほぼ儚月抄の初登場シーンまんまな気がする……
		PRINTFORML
		PRINTFORMW 「桃李不言、下自成蹊」
		PRINTFORMW 「因为桃李能结出美味的果实、所以即使它们无法言语、人们自然也会去接近它们」
		PRINTFORMW 「还有一点……通向甜美桃子的路就要完成咯……」
		PRINTFORMW
		PRINTFORMDW 『地上人、来绵月亭有何贵干？』
		PRINTFORMDL 在豪华的宅邸门前、%CALLNAME:MASTER%陷入了困境
		PRINTFORMDW 发现了一棵桃树、长的桃子看起来很好吃、但是被挡在门外无法进去
		PRINTFORMDW 『现在立刻离開、这里禁止地上人进入』
		PRINTFORMDL 理所当然的、吃了这样的闭门羹
		PRINTFORMDL 有没有可以侵入的地方？
		PRINTFORMDW %CALLNAME:MASTER%环顾四周、不经意间看到了上面……
		SETCOLOR C_RED
		FONTBOLD
		PRINTFORML
		PRINTFORML
		PRINTFORML 呃啊！————
		PRINTFORML
		PRINTFORMW
		FONTREGULAR
		RESETCOLOR
		CALL M_KOJO_COLOR_K99
		PRINTFORMDW 『咦咦？丰姬大人！？』
		PRINTFORMW 「捡桃子、顺便运动一下、听到正门这边好吵、就过来看看」
		PRINTFORMW 「那么、到底在吵些什么」
		PRINTFORMDW 『不、是那个……躺在丰姬大人脚边的地上的人、无论如何也要进去……』
		PRINTFORMW 「地上人……？」
		PRINTFORMDL 丰姬说着把视线转向下方
		PRINTFORMDW 那里是被踩到的、%CALLNAME:MASTER%的身影……
		PRINTFORMDL
		PRINTFORMDL ……………
		PRINTFORMDL ………
		PRINTFORMDL …
		PRINTFORMDW
		PRINTFORMW 「对不起、真没想到会有人……」
		PRINTFORMDL %CALLNAME:MASTER%被邀请到宅邸中与丰姬喝茶
		PRINTFORMDL 幸运的是、并没有肉眼可见的伤处、腰却有点疼、一定是错觉吧
		PRINTFORMDW %CALLNAME:MASTER%笑着对丰姬说、自己可取的长处就是身体结实
		PRINTFORMW 「所以、你说你是从地上来的……」
		PRINTFORMW 「你是怎么来到这里的？」
		PRINTFORMDW %CALLNAME:MASTER%一边嚼着桃子一边说明到这里的经过
		PRINTFORMW 「原来如此……」
		PRINTFORMW （也可以就这样送回地面……）
		PRINTFORMW 「也就是说、走到这里、你应该很累了吧？请慢慢歇息一下吧」
		PRINTFORMW 「而且……我也对你有一些兴趣」
		PRINTFORMDW 疑惑地询问丰姬、到底是怎么回事
		PRINTFORMW 「嗯……用这种说法、我的妹妹可能会生气……」
		PRINTFORMW 「简单地说、我很闲、无事可做」
		PRINTFORMDW 她满不在乎地那样说
		PRINTFORMW 「所以、请你告诉我关于你的事吧」
		PRINTFORMW 「能靠自己走到这里的、一定不是普通人吧？」
		PRINTFORMW 「……呵呵、不用那么戒备也没关系」
		PRINTFORMW 「只是和我聊聊天而已」
		PRINTFORMDL 说罢、丰姬对着%CALLNAME:MASTER%微微一笑
		PRINTFORMDL %CALLNAME:MASTER%并没有足够用来拒绝的理由、同时也是作为请吃桃子的感谢
		PRINTFORMDL 而且、和这样的美人对话、也足以令人心情愉快
		PRINTFORMDW %CALLNAME:MASTER%又拿起一个桃子、对着丰姬重新坐下……
		RESETCOLOR
	ENDIF
;それ以外
ELSE
	PRINTFORML 「你好、我叫綿月豊姫」
	PRINTFORMW 「今后也请多多关照」
ENDIF
CFLAG:99:1999 = 1
CALL TOYOHIME_SETTINGS
RETURN 1

;==================================================
;豊姫の設定変更用関数
;==================================================
@TOYOHIME_SETTINGS

PRINTL
PRINTFORMDL 要将丰姬的素质和经验等变更为推荐口上吗？\n（译者注：即还原零设、丰姬为未亡人身份）
PRINTFORMDL ※豊姫不会向主角告白
PRINTFORMDL ※处女的情况下、会变成非处女
PRINTFORMD ※丧失初吻和处女，
CALL COLORMESSAGE(@"“献给了曾经的爱人”",C_PINK,0,1)
PRINTFORMDL ，会这样进行表示
PRINTFORMDL ※额外获得「大胃王」素质
PRINTFORMDL ※舌頭靈活の素質が削除されます
PRINTFORMDL ※在执行一些指令、例如性骚扰指令时的反感会大幅减少
PRINTFORMDL ※不变更的情况下、可能会影响口上的表达效果
PRINTL
CALL ASK_YN("口上推荐变更","不改变")
SELECTCASE RESULT
	CASE 0
		SETBIT CFLAG:[[豊姫]]:约会後イベントフラグ , 1
		CFLAG:99:1000 = 1
		CFLAG:99:処女喪失記念日 = -1
		CFLAG:99:初吻喪失記念日 = -1
		CSTR:99:処女喪失履歴 = 献给了曾经的爱人
		CSTR:99:初吻喪失履歴 = 献给了曾经的爱人
		TALENT:99:無接吻経験 = 0
		TALENT:99:大胃王 = 1
		TALENT:99:舌頭靈活 = 0
		EXP:99:接吻経験 += 20
		EXP:99:Ｖ性交経験 += 10
		SIF TALENT:99:処女 == 1
			TALENT:99:処女 = 0
		PRINTFORMDW 变更完毕
	CASE 1
		PRINTFORMDW 不进行变更
ENDSELECT

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;※稍微急展開すぎるから後で書き直すかも
;==================================================
@M_KOJO_SPEVENT_K99_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
;CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
CALL M_KOJO_COLOR_K99
	;好感度3000未満は中止接吻
	IF CFLAG:99:好感度 < 3000
		TCVAR:中止接吻 = 1
	;成功
	ELSE
		PRINTFORMDL
		PRINTFORMDL 约会回家的路上、感到依依不舍的丰姬叫住了%CALLNAME:MASTER%
		PRINTFORMDL 将她的身体拉近、夺走了她的嘴唇……
		PRINTFORMDW
		;ズキュウウウン
		PRINTFORMW 「嗯！？啊……我……」
		PRINTFORMDL ……可能有点太强硬了
		PRINTFORMDW 虽然这么想、但丰姬完全没有抵抗
		PRINTFORMW 「我……啾……咿……嗯……」
		PRINTFORMDL 不仅如此、她还把嘴唇贴得更近了
		PRINTFORMDW 简直像在说『我也在忍耐着』一样……
		PRINTFORMDW ………
		PRINTFORMW 「啊啊……呐、%CALLNAME:MASTER%……」
		PRINTFORMDW 许久才离開丰姬的嘴唇、热情地注视着她
		PRINTFORMW 「约会……就这样结束了吗……？」
		PRINTFORMW 「我……我还想和你多待一会儿……」
		PRINTFORMDL ……这是、那样的事的邀请吗？
		PRINTFORMDW %CALLNAME:MASTER%慎重起见、向丰姬确认了一下
		PRINTFORMW 「………呵呵、你打算让我说出来吗？」
		PRINTFORMDL 咕噜、%CALLNAME:MASTER%咽了下唾沫
		PRINTFORMDW
		;選択肢
		CALL ASK_YN("要这么做吗？","任凭摆布")
		;判定
		SELECTCASE RESULT
			;どうしよう
			CASE 0
				PRINTFORMW 「………噗哧」
				PRINTFORMDL 说不出话来……丰姬扑哧一声笑了出来
				PRINTFORMDW 原来如此……%CALLNAME:MASTER%这才发现自己被開了个玩笑
				PRINTFORMW 「对、对不起……呵呵呵……」
				PRINTFORMW 「一開始我并没有揶揄你的意思……啊、好痛！」
				PRINTFORMDL 与丰姬的初吻、从某种意义上来说、将成为一生的回忆
				PRINTFORMDW %CALLNAME:MASTER%一边这样想着、一边对她的太阳穴进行了猛烈的钻动……
			;流れに任憑擺佈
			CASE 1
				PRINTFORMDL 到了这种地步、也只能往下做了吧……
				PRINTFORMDW %CALLNAME:MASTER%做好了觉悟、抱紧了丰姬的肩膀
				PRINTFORMW 「嗯、那么……」
				CALL HPH_PRINT,@"「从现在開始、享受大人间的约会吧……HPH」","W"
				PRINTFORMDL ……………
				PRINTFORMDL ………
				PRINTFORMDW …
				IF !TALENT:MASTER:非童貞
					FONTBOLD
					SETCOLOR 255,100,255
					PRINTFORMW 童貞喪失
					FONTREGULAR
					RESETCOLOR
					TALENT:MASTER:非童貞 = 1
				ENDIF
				PRINTFORML
				CALL COLORMESSAGE(@"获得了与丰姬的合意",C_PINK,0,1)
				PRINTFORMW
				SETBIT CFLAG:99:既成事實 , 1
				EXP:99:接吻経験 += 5
				EXP:99:絶頂経験 += 1
				EXP:99:Ｖ性交経験 += 3
				EXP:MASTER:接吻経験 += 5
				EXP:MASTER:射精経験 += 1
				EXP:MASTER:挿入経験 += 3
				TIME += 240
		ENDSELECT
	ENDIF
ENDIF
RESETCOLOR
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;この口上は現時点で豊姫側から告白ことを想定していません
;==================================================
@M_KOJO_SPEVENT_K99_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に接受かどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=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

ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_SPEVENT_K99_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:MASTER:初期位置 == CFLAG:99:初期位置
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「很累了吧？」
					PRINTFORML 「是先吃饭、先洗澡、还是……」
					PRINTFORMDL 丰姬贴近了%CALLNAME:MASTER%、開始服侍他
					PRINTFORMDW 就像是对丈夫无微不至的妻子一样、%CALLNAME:MASTER%这么想
				CASE 1
					PRINTFORML 「今天也很開心呢」
					PRINTFORMW 「下次再一起去吧、%CALLNAME:MASTER%♪」
				CASE 2
					PRINTFORML 「那么、一会儿见吧♪」
					PRINTFORMDW 丰姬对%CALLNAME:MASTER%眨了眨眼、先回房间去了
			ENDSELECT
		;通常
		ELSE
			;恋慕
			IF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「随时随地都可以见面、这样的事明明是知道的……」
						PRINTFORML 「还是很寂寞啊……要和你分開」
						PRINTFORMDL 对着不愿离去的丰姬、%CALLNAME:MASTER%说……
						;選択肢
						CALL ASK_M("我也很寂寞", 1, "我很快会来找你的", 1, "快滚", TALENT:MASTER:82)
						;判定
						SELECTCASE RESULT
							;自分も寂しい
							CASE 0
								PRINTFORML 「……呵呵、和我一样呢」
								PRINTFORML 「那就……两个人再待一会儿吧？」
								PRINTFORMDL 于是二人再度握起了手、慢慢散着步
								PRINTFORMDW 在路上、%CALLNAME:MASTER%和丰姬又谈论了许许多多的事……
								;１時間経過
								TIME += 60
							;またすぐに会いに来る
							CASE 1
								PRINTFORML 「……嗯」
								PRINTFORML 「我相信你、会一直等着你的」
								PRINTFORMDW %CALLNAME:MASTER%踏上归途之后、丰姬一直在后面目送着
							;失せろ（ｷﾞﾛｯ
							CASE 2
								PRINTFORML 「哎呀、太过分了……怎么这样……」
								PRINTFORMDW 丰姬软绵绵地抗议了一下、倒也并不是太在意的样子
								;好感度と信賴度が１０下がる
								CALL CHANGE_CFLAG(2, 99, -10)
								CALL CHANGE_CFLAG(4, 99, -10)
						ENDSELECT
					CASE 1
						PRINTFORML 「啊……你已经到家了吗」
						PRINTFORML 「……那个……如果可以的话」
						PRINTFORMDL 『今天过得很開心』%CALLNAME:MASTER%笑着对丰姬说
						PRINTFORMDW 丰姬咽下了将要说出来的话、也微笑着说「我也是」
					CASE 2
						PRINTFORML 「……我……已经没事了」
						PRINTFORML 「下次再去约会吧」
						PRINTFORMDW 与依依不舍的丰姬吻别了
				ENDSELECT
			;思慕
			ELSEIF TALENT:思慕
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「谢谢、送到这里就可以了」
						PRINTFORML 「随时可以再来约我、我等着你哦♪」
						PRINTFORMDL 丰姬看起来很享受的样子
						PRINTFORMDW %CALLNAME:MASTER%在心里小小地欢呼了一下
					CASE 1
						PRINTFORML 「下次什么时候去约会呢？」
						PRINTFORML 「明天、还是后天……啊、或者说现在就继续吗？」
						PRINTFORMDW 『今天就这样结束吧』这么一说、丰姬露出了遗憾的表情
					CASE 2
						PRINTFORML 「%CALLNAME:MASTER%、请等一下」
						PRINTFORML 「……这是……今天的谢礼」
						PRINTFORMDL 回去的时候、丰姬微红着脸、贴了上来……
						PRINTFORMDW %CALLNAME:MASTER%用手指划过脸颊、感觉还残留着丰姬的温暖
				ENDSELECT
			;それ以外
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「那么、回家时要小心哦」
						PRINTFORML 「有机会的话、再来约会吧」
						PRINTFORMDW 丰姬与%CALLNAME:MASTER%挥手告别了
					CASE 1
						PRINTFORML 「啊……有点儿晚了」
						PRINTFORML 「依姬、如果不会生气就好了……」
						PRINTFORMDL 月之使者的领袖这个立场好像很麻烦
						PRINTFORMDW %CALLNAME:MASTER%向丰姬说出了自己的想法、“就是这样啊”她为难地笑了
					CASE 2
						PRINTFORML 「今天过得很高兴」
						PRINTFORML 「下次再叫我去吧」
						PRINTFORMDL 丰姬并没有使用社交辞令、而是真心这样说的
						PRINTFORMDW ……好像是这样
				ENDSELECT
			ENDIF
		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_K99_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		$TOYOHIME_ENCOUNTER
		;既に会っている場合は非表示
		IF !TCVAR:99:今天有否见面
			;恋慕
			IF TALENT:恋慕
				;TIME:2で朝昼晩を選択
				SELECTCASE TIME:2
					;朝
					CASE 1,2
						PRINTFORML 「啊、%CALLNAME:MASTER%、早上好」
						PRINTFORMW 「我们来一起聊聊天吧♪」
					;昼～夕
					CASE 3,4,5
						PRINTFORML 「%CALLNAME:MASTER%、这边这边♪」
						PRINTFORMDW 丰姬注意到%CALLNAME:MASTER%后、立刻向这边挥手
					;夜
					CASE 6,7
						PRINTFORML 「哦哦、%CALLNAME:MASTER%、你来找我了吗」
						PRINTFORML 「都这个时间了、我刚刚还在想今天能不能见面呢……」
						PRINTFORMDW %CALLNAME:MASTER%打了个招呼、丰姬高兴地小跑过来
				ENDSELECT
			;思慕
			ELSEIF TALENT:思慕
				PRINTFORM 「嗯、%CALLNAME:MASTER%。
				;TIME:2で朝昼晩を選択
				SELECTCASE TIME:2
					;朝
					CASE 1,2
						PRINTFORML 今天来得真早啊」
					;昼～夕
					CASE 3,4,5
						PRINTFORML 今天怎么样？」
					;夜
					CASE 6,7
						PRINTFORML 吃过晚饭了吗？」
				ENDSELECT
				PRINTFORMDW 丰姬注意到%CALLNAME:MASTER%后、高兴地笑了
			;それ以外
			ELSE
				;TIME:2で朝昼晩を選択
				SELECTCASE TIME:2
					;朝
					CASE 1,2
						PRINTFORML 「早上好、%CALLNAME:MASTER%」
						PRINTFORML 「今天来得真早啊」
						PRINTFORMDW 丰姬一副困倦的样子、大概是刚刚起床吧
					;昼～夕
					CASE 3,4,5
						PRINTFORML 「欸？是%CALLNAME:MASTER%！」
						PRINTFORMW 「我刚好有空、如果可以的话、可以和我说说话吗？」
					;夜
					CASE 6,7
						PRINTFORML 「晚上好、%CALLNAME:MASTER%」
						PRINTFORMW 「这个时间有什么事吗？」
				ENDSELECT
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;既に会っている場合は非表示
		IF !TCVAR:99:今天有否见面
			;恋慕
			IF TALENT:恋慕
				;TIME:2で朝昼晩を選択
				SELECTCASE TIME:2
					;朝
					CASE 1,2
						PRINTFORML 「早上好、%CALLNAME:MASTER%」
						PRINTFORML 「哎呀哎呀、过来这边」
						PRINTFORML 「想要好好看看你的脸」
						PRINTFORMW 「……今天也很帅气哦♪」
					;昼～夕
					CASE 3,4,5
						PRINTFORML 「啊！%CALLNAME:MASTER%、终于见到你了」
						PRINTFORML 「哪里都没有你、所以我很担心、一直在找你」
						PRINTFORMDW 丰姬过度的保护欲、让%CALLNAME:MASTER%无奈地笑了……
					;夜
					CASE 6,7
						PRINTFORML 「唔……真过分啊、%CALLNAME:MASTER%」
						PRINTFORML 「我可是一直在等着你哦」
						PRINTFORMDW 说完、丰姬紧紧抱住了%CALLNAME:MASTER%的手臂
				ENDSELECT
			;思慕
			ELSEIF TALENT:思慕
				;TIME:2で朝昼晩を選択
				SELECTCASE TIME:2
					;朝
					CASE 1,2
						PRINTFORML 「早上好、%CALLNAME:MASTER%」
						PRINTFORML 「嗯？今天起的这么早？呵呵♪」
						PRINTFORMW 「一想到今天要和你见面、就立刻醒过来了呢」
					;昼～夕
					CASE 3,4,5
						PRINTFORML 「啊、是在那里吗、%CALLNAME:MASTER%？」
						PRINTFORMW 「在做什么呢？请让我也加入吧♪」
					;夜
					CASE 6,7
						PRINTFORML 「晚上好、%CALLNAME:MASTER%」
						PRINTFORML 「这个时间在这种地方见面……」
						PRINTFORMW 「呵呵、感觉到了某种命运啊♪」
				ENDSELECT
			;それ以外
			ELSE
				;TIME:2で朝昼晩を選択
				SELECTCASE TIME:2
					;朝
					CASE 1,2
						PRINTFORML 「哦？早上好啊、%CALLNAME:MASTER%♪」
						PRINTFORMDW %CALLNAME:MASTER%打了个招呼、丰姬也爽快地回了个招呼
					;昼～夕
					CASE 3,4,5
						PRINTFORML 「你好、%CALLNAME:MASTER%」
						PRINTFORMW 「在这种地方遇到、真巧啊」
					;夜
					CASE 6,7
						PRINTFORML 「哦……啊……哈啊……%CALLNAME:MASTER%」
						PRINTFORML 「不要熬夜、要好好睡觉哦？」
						PRINTFORMDW 大口打哈欠的丰姬、实在不像是月之公主的样子……
				ENDSELECT
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;恋慕
		IF TALENT:恋慕
			PRINTFORMDL 正在洗头的时候、听到哗啦哗啦的開门声
			PRINTFORMDL ……莫非有人进来了？
			PRINTFORMDL 想要确认、却因为泡沫进去了而睁不開眼睛……
			PRINTFORMDW 『您是哪位？』正想这么说、背上突然贴上来一个软绵绵的东西
			PRINTFORML 「呵呵……没关系哦、就这样继续吧……」
			PRINTFORMW 「等到你洗完头之后、就由我来帮你擦背吧」
			PRINTFORMDL 声音的主人是丰姬、也就是说、现在在背后的是……
			PRINTFORMDW %CALLNAME:MASTER%感觉到血液在下半身聚集、为了摆脱繁杂的思绪、手上摩擦的动作马上加快了……
		;それ以外
		ELSE
			PRINTFORMDL 听到哗啦哗啦的声音、我吓了一跳、转头看向门的一边……
			PRINTFORMDW 竟然是丰姬一丝不挂地站在那里
			PRINTFORML 「是%CALLNAME:MASTER%啊、水温如何呢？」
			PRINTFORML 「嗯？我进来了所以你要出去？」
			PRINTFORML 「好了好了、别那么死板」
			PRINTFORMW 「一起洗澡吧？」
			PRINTFORMDW 丰姬清洗过身体之后、理所当然地在%CALLNAME:MASTER%的旁边坐了下来
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		GOTO TOYOHIME_ENCOUNTER
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他角色と约会中に遭遇した
	;ARG:1に约会的对象
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;既に会っている場合は非表示
		IF !TCVAR:99:今天有否见面
			;永琳と约会
			IF FLAG:约会的对象 == 72
				PRINTFORML 「竟然是八意大人……」
				PRINTFORML 「啊、不不！什么都没有！」
				PRINTFORML 「那么、请您慢走」
			;依姫と约会
			ELSEIF FLAG:约会的对象 == 98
				PRINTFORML 「诶诶？你怎么缩到角落里了？」
				PRINTFORML 「呵呵、不要这么害羞嘛」
				PRINTFORML 「那么、我的妹妹就拜托你了」
			;鈴仙or鈴仙二號と约会
			ELSEIF FLAG:约会的对象 == 52 || FLAG:约会的对象 == 100
				PRINTFORML 「\@ FLAG:73 == 52 ? 鈴仙 # Reisen \@、不用吓成这个样子」
				PRINTFORML 「%CALLNAME:MASTER%、如果发生了什么事、一定要保护好她哦」
				PRINTFORML 「呵呵、我很喜欢你的答复哦、请继续吧」
			;それ以外
			ELSE
				PRINTFORML 「啊、是在约会吗？」
				PRINTFORML 「呵呵、请好好享受吧」
			ENDIF
			PRINTFORMDW 丰姬轻轻挥了挥手、目送约会中的两人离去
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MAIN_MAP上で一日最初の挨拶
	;注、このあと通常の遭遇口上、ARG==1 OR ARG==2に接続します
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で一日最初の挨拶
	;ARG:1に约会的对象、ARG:1が0の場合は非约会
	;注、このあと通常の外出先で遭遇した口上、ARG==6 OR ARG==7に接続します
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;ARG:1と约会中
		IF ARG:1
		;一人で外出
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K99_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 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			;恋慕
			IF TALENT:恋慕
				GOTO TOYOHIME_OHAYO
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			;恋慕
			IF TALENT:恋慕
				GOTO TOYOHIME_OHAYO
			ENDIF
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		$TOYOHIME_OHAYO
		;１５分の１の確率で朝口交
		IF !RAND:15
			PRINTFORMDL 被瘙痒的感觉弄醒
			PRINTFORMDW 所见到的、竟然是丰姬埋在%CALLNAME:MASTER%的股间
			CALL HPH_PRINT,@"「咕噜……嗯嗯……啾……HPH」","L"
			CALL HPH_PRINT,@"「咻啪……咕……噗噗……HPH」","W"
			PRINTFORMDL 丰姬陶醉地含着阴茎、舔舐吸吮着
			PRINTFORMDL 无法忍受这种精妙的奉仕、干脆地射精出来
			PRINTFORMDW 丰姬在喉咙里咕嘟咕嘟地吞咽着早上的第一口鲜榨牛奶……
			PRINTFORMW
			PRINTFORMDL 几十分钟后、%CALLNAME:MASTER%起床时、丰姬就像无事发生过似的、向%CALLNAME:MASTER%打了个招呼
			PRINTFORMDW 嘴角还粘着掉落的阴毛、%CALLNAME:MASTER%稍微思考了一下、还是没有指出来
			BASE:MASTER:精力 -= 50
		;通常
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「哦……起来了吗？」
					PRINTFORML 「呵呵、睡得真香啊」
					PRINTFORMW 「做了什么美梦吗？」
				CASE 1
					PRINTFORMDL %CALLNAME:MASTER%醒来之后、发现丰姬就躺在自己身边
					PRINTFORML 「早上好、%CALLNAME:MASTER%」
					PRINTFORML 「感觉很闷热？呵呵♪应该没什么问题吧♪」
					PRINTFORMDW 亲热了一会儿后、%CALLNAME:MASTER%从被窝里爬了出来
				CASE 2
					PRINTFORMDL 醒来后、看到丰姬正跨坐在%CALLNAME:MASTER%身上
					PRINTFORML 「咦……明明再睡一会儿就好了……」
					PRINTFORMDW 到底打算做什么呢……
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「呼……呼……」
		PRINTFORMDL %CALLNAME:MASTER%醒来时、丰姬还在睡觉
		PRINTFORMDW 为了不吵醒熟睡的她、%CALLNAME:MASTER%悄悄从被窝里爬了出来
		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:恋慕
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「唔……在哪里……」
					PRINTFORML 「抱枕……好舒服……zzz」
					PRINTFORMDL 丰姬把%CALLNAME:MASTER%拉进被窝、当作抱枕抱在怀里、继续发出鼾声
					PRINTFORMDW 这就没办法了、%CALLNAME:MASTER%决定让丰姬再睡一会儿……
					;３０分経過
					TIME += 30
				CASE 1
					PRINTFORMDL %CALLNAME:MASTER%把泡好的茶递给了刚刚醒来的丰姬
					PRINTFORML 「……谢谢、%CALLNAME:MASTER%」
					PRINTFORML 「嗯……咕……」
					PRINTFORMDW 看着慢慢吹气的丰姬的侧脸、%CALLNAME:MASTER%一时之间有些入迷了……
				CASE 2
					PRINTFORML 「嗯……再睡一会儿……不行吗？」
					PRINTFORML 「就５分种……１０分后就会起来的……」
					PRINTFORMDL %CALLNAME:MASTER%把丰姬咕噜噜地从被窝里滚出来、催促她赶紧换衣服
					PRINTFORML 「哈欠……%CALLNAME:MASTER%最近越来越像依姬了……」
					PRINTFORMDW 丰姬一副不情愿的样子、開始为新一天做准备……
			ENDSELECT
		;それ以外
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「嗯啊……哈……啊啊……」
					PRINTFORML 「依酱……真是的……」
					PRINTFORMDL 丰姬可能是睡眼惺忪、误以为%CALLNAME:MASTER%是自己的妹妹
					PRINTFORMDW 帮她换衣服、帮她整理头发……依姬每天早上都做这样的事吗？
				CASE 1
					PRINTFORML 「嗯……嗯嗯～……哦……」
					PRINTFORML 「啊……早上好……然后……晚安……」
					PRINTFORMDL %CALLNAME:MASTER%强行叫醒了再次发出鼾声的丰姬
					PRINTFORMW 「啊……好不容易才在梦的世界享受盛宴……超美味的啊！」
				CASE 2
					PRINTFORML 「不行……我还没有心理准备……」
					PRINTFORML 「啊！求求你、住手啊！」
					PRINTFORMDL 想要收拾床褥的%CALLNAME:MASTER%、和还想要继续睡的丰姬
					PRINTFORMDW 两人的攻防战持续了五分钟左右……
					;５分経過
					TIME += 5
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に帰って寝る（～は【現在地】から【角色の自室】に戻りました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF ARG:1
			;约会中に眠くて帰って寝る（拠点角色のみ）
			PRINTFORMW
		ELSEIF CFLAG:诶嘿嘿
			;诶嘿嘿中に眠くて自室に帰って寝る（拠点角色のみ）
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている（～は眠そうにしている）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（～は沉浸在夢鄉中）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;恶作剧中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱して寝る（体力500以下,诶嘿嘿時は诶嘿嘿強制終了）
	;（角色の自室以外：～を【現在地】から【角色の自室】に運びました）
	;（角色の自室　　：～は疲惫と言って、横成为了）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF CFLAG:诶嘿嘿
			;诶嘿嘿中にダウン
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（恋慕のみ,そのまま一日が終了）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;酒でダウン
		IF BASE:MASTER:酒気 >= MAXBASE:MASTER:酒気
			IF ARG:1
				;自室でダウン,（～が【MASTER】をベッド（被窝）へと運んでくれた…）
				PRINTFORMW
			ELSE
				;部屋まで運ばれる,（～が【MASTER】を私室へと運んでくれた…）
				PRINTFORMW
			ENDIF
		;体力切れでダウン
		ELSE
			IF ARG:1
				;自室でダウン,（～が【MASTER】をベッド（被窝）へと運んでくれた…）
				PRINTFORMW
			ELSE
				;部屋まで運ばれる,（～が【MASTER】を私室へと運んでくれた…）
				PRINTFORMW
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが寝るために自室まで回来了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た（【TARGET】が部屋に回来了→寝間着へと着替え、寝床に潜った）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から逐出て寝た（眠そうな【TARGET】に追い出された…）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF CFLAG:前一次的位置 == CFLAG:現在位置
				;前のターンまで一緒に部屋にいた
				PRINTFORMW
			ELSE
				;寝るために部屋に帰ってきたところ
				PRINTFORMW
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色とのＨを止めさせて寝た（【TARGET】が部屋に回来了→唇をとがらせる【TARGET】に、【MASTER】は渋々【Ｈの相手】から別屋た）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORMW
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;来訪角色が拠点で休憩（～は疲れ切っている→稍微休んでいきなよ）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝室に居る状態でその場で寝る（～は眠気に負け、睡眠についた…）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		IF CFLAG:诶嘿嘿
			;诶嘿嘿中に寝る
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;拠点外で自宅前に居る角色が自室に帰って寝る（眠くなった～は自室に帰って行きました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 10
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;轻轻地会釈して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;他者介入で情緒変化
;==================================================
@M_KOJO_EVENT_K99_5(ARG,ARG:1)
;口上主はTARGET
;ARGに入ってきた角色（人数が膨大なので、自己把握自己責任で
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;霊夢が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;留琴が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他（角色指定無
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（亲热度:低）
	;記入チェック（=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
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の亲热度:低）
	;記入チェック（=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
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;诶嘿嘿==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを推倒た（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			;恋慕
			IF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「呼呼……今天就交给我吧……」
						PRINTFORML 「我会让你感觉很舒服的……♪」
						PRINTFORMDL 被按倒在地、衣服瞬间被脱得一干二净……
						PRINTFORMDW 只是恍惚了一下、%CALLNAME:MASTER%就已经回到了刚出生时的姿态
					CASE 1
						PRINTFORML 「呐……%CALLNAME:MASTER%……」
						PRINTFORML 「今天、能让我撒娇吗……？」
						PRINTFORMDL 丰姬用丰满的胸部压在了%CALLNAME:MASTER%的胸上
						PRINTFORMDW 到了这个地步、%CALLNAME:MASTER%已经没有拒绝的想法了……
					CASE 2
						PRINTFORML 「%CALLNAME:MASTER%……最喜欢了……」
						PRINTFORML 「所以……来做吧……♪」
						PRINTFORMDW 丰姬跨坐在%CALLNAME:MASTER%身上、熟练地解開了衣服……
				ENDSELECT
			;それ以外
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「对不起……我有点亢奋……」
						PRINTFORML 「所以……让我借用一下你的身体吧……♪」
						PRINTFORMDW 丰姬跨坐在%CALLNAME:MASTER%身上、不容分说地脱起了衣服……
					CASE 1
						PRINTFORML 「嘘……没问题的……」
						PRINTFORML 「只会让你我……都舒服起来的……♪」
						PRINTFORMDL 丰姬将%CALLNAME:MASTER%按在地上
						PRINTFORMDW 一边舔着舌头、一边把手放在衣服上……
					CASE 2
						PRINTFORML 「呼呼……这样没有防备可不行哦……」
						PRINTFORML 「会被坏姐姐吃掉的……♪」
						PRINTFORMDL 丰姬窃窃私语着、在耳边吹拂着热气
						PRINTFORMDW 在这种令人浑身酥软的感觉刺激下、%CALLNAME:MASTER%完全失去了抵抗的力量
				ENDSELECT
			ENDIF
			PRINTFORMW
			;推倒口上切り替え用のTCVAR
			TCVAR:99:399 = 1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;抜け出した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;摆脱失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;随便状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;誘ってきた（人目につかない場所に行きたがるやつ）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;ARG:1=TARGETの欲求不満度（最高1000）
		;必要ならばこれで分岐を作ってください
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（憤怒）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		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 = 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
ENDIF
RETURN 1

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

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

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

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;TCVAR:盗み食い抑制で持っていた食物を食われるのを回避できる
	;仕様例（薬が入ってたら食わない）
	;IF DISH_DRG
	;	TCVAR:盗み食い抑制 = 1
	;ENDIF

	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（推倒指令に統合？
	;MASTERが推倒た（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;時間停止中
		IF FLAG:時間停止
			PRINTFORMDL
			PRINTFORMDW
		;睡眠中
		ELSEIF CFLAG:睡眠
			PRINTFORML
			RETURN 1
		;通常
		ELSE
			;恋慕
			IF TALENT:恋慕
				;欲情のパラメーターが１０未満
				IF PALAM:欲情 < PALAMLV:10
					CALL HPH_PRINT,@"「我还想要更多……HPH」","L"
					CALL HPH_PRINT,@"「还不是很想……就这样结束……HPH」","L"
					PRINTFORMDW 丰姬整理好衣服、轻轻地吻了一下%CALLNAME:MASTER%的脸颊
				;欲情のパラメーターが１５未満
				ELSEIF PALAM:欲情 < PALAMLV:15
					CALL HPH_PRINT,@"「怎么样、心情有好一些吗……？HPH」","L"
					CALL HPH_PRINT,@"「……嗯HPH，我也是……%CALLNAME:MASTER%……HPH」","L"
					PRINTFORMDW 寄り添う豊姫の頭を撫でてやると、彼女はうっとりと肩に頭を預けてきた……
				;欲情のパラメーターが最大
				ELSE
					CALL HPH_PRINT,@"「%CALLNAME:MASTER%……今天也很棒哦……HPH」","L"
					CALL HPH_PRINT,@"「被灌注了满满的爱……我很幸福……HPH」","L"
					PRINTFORMDW 身心都得到满足的丰姬、陶醉地依偎着%CALLNAME:MASTER%……
				ENDIF
			;それ以外
			ELSE
				;欲情のパラメーターが１０未満
				IF PALAM:欲情 < PALAMLV:10
					PRINTFORML 「你这么爱我、我很高兴」
					PRINTFORML 「……下次再见吧♪」
					PRINTFORMDW 丰姬整理好衣服、对着%CALLNAME:MASTER%耳语一番
				;欲情のパラメーターが１５未満
				ELSEIF PALAM:欲情 < PALAMLV:15
					PRINTFORML 「唔……腰好疼啊……」
					PRINTFORML 「你……还真是有精力啊……」
					PRINTFORMDW 丰姬揉着腰、好像有点儿太激烈了……
				;欲情のパラメーターが最大
				ELSE
					CALL HPH_PRINT,@"「啊……啊……HPH」","L"
					CALL HPH_PRINT,@"「已经要HPH……好厉害……HPH」","L"
					PRINTFORMDW 丰姬尚且沉浸在余韵中、身体不住地颤抖着……
				ENDIF
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
	;-------------------------------------------------
	;事後描写
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;精液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;愛液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;事後の情緒
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;服を着る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;陪睡
;==================================================
@M_KOJO_EVENT_K99_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_K99_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;胖次紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;無知持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
		;舐めとり
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚肛門射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
		;ソレ以外
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精口服避孕薬無
		IF ARG:1 == 1
		;非処女膣内射精口服避孕薬あり
		ELSEIF ARG:1 == 2
		;処女膣内射精
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K99_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K99_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;你の私室変更により同居
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K99_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:诶嘿嘿
			;诶嘿嘿中に眠くて返回
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:诶嘿嘿
			IF CFLAG:衰弱
				;诶嘿嘿中に疲れて返回
				PRINTFORMW
			ELSE
				;诶嘿嘿中に眠くて返回
				PRINTFORMW
			ENDIF
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り（角色の自宅位置、または角色的房間で约会終了）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会終了時に部屋に来ないかと誘う（～から部屋に来ないかと誘われた）
	;（来訪角色のみ,自宅が無い角色でも発生します）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;部屋に来ないか→「行く」を選択（～に誘われるまま、【MASTER】は【TARGET】的房間へと向かった……）
	;（これが発生すると十中八九被逆推ます）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;部屋に来ないか→「やめとく」を選択（～は心無か寂しそうだ……）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくないと言い出す（～は今夜は帰りたくないと言い出した…）
	;（来訪角色の帰宅時に欲求不満と欲望が高いと発生）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくない→「泊める」を選択（～は【MASTERの自室】に泊まっていくこと成为了）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくない→「泊めない」を選択、または家主が居る（【MASTER】は丁重に断った）
	;（家主が居る＝MASTERの私室に他の角色の私室を設定している）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;疲れて帰宅（疲れきった～は帰って行きました）
	;（～は疲れ切っている→（入り口）まで送るよ でも発生）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 10
		IF CFLAG:诶嘿嘿
			;诶嘿嘿中に疲れて返回
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K99_21(ARG,ARG:1)
;口上主はARG
;CALL M_KOJO_COLOR_K99は豊姫
;SETCOLOR 0xA869BEは依姫
;SETCOLOR 0xCCDFFFは鈴仙二號
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMDL
		PRINTFORMDL ―――宁静海
		PRINTFORMDW
		SETCOLOR 0xA869BE
		PRINTFORMW 「姐姐、你又来到宁静海了啊」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「嗯？啊啊……」
		SETCOLOR 0xA869BE
		PRINTFORMW 「你到底怎么了？最近有点奇怪的样子……」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「……呐、依姬有喜欢的人吗？」
		SETCOLOR 0xA869BE
		PRINTFORMW 「―――欸？」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「单纯的喜欢的人、或者更深一点儿、恋人之类的？」
		SETCOLOR 0xA869BE
		PRINTFORMW 「不、不可能有啊！首先、我和姐姐不一样、没有那么多时间……」
		;依姫が恋慕
		IF TALENT:98:恋慕
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「哦？……你不是和%CALLNAME:MASTER%聊得很開心吗？」
			SETCOLOR 0xA869BE
			PRINTFORMW 「呃………」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「今天早早地回来、约会一定很開心吧」
			SETCOLOR 0xA869BE
			PRINTFORMW 「怎……怎么看出来的」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「我可是依姬的姐姐啊」
			SETCOLOR 0xA869BE
			PRINTFORMW 「和这个应该没什么关系吧……」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「那么、你喜欢%CALLNAME:MASTER%吗？」
			SETCOLOR 0xA869BE
			PRINTFORMW 「……………」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「再不快点儿说的话、我可要把他抢走了哦？」
			SETCOLOR 0xA869BE
			PRINTFORMW 「欸！？」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「其实、我也喜欢他」
			PRINTFORMW 「如果依姬不喜欢他的话、就让我来嫁给他吧」
			SETCOLOR 0xA869BE
			PRINTFORMW 「等！……等等！这个不行……」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「呵呵、果然如此」
			SETCOLOR 0xA869BE
			PRINTFORMW 「……已经全部都看穿了吧」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「我可是依姬的姐姐啊」
			SETCOLOR 0xA869BE
			PRINTFORMW 「我……的确很喜欢他……」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「嗯……我所说的也是真的哦」
			PRINTFORMW 「但是、不会抢依姬喜欢的人的」
			SETCOLOR 0xA869BE
			PRINTFORMW 「………为什么」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「我可是依姬的姐姐啊」
			SETCOLOR 0xA869BE
			PRINTFORMW 「你不是很喜欢他吗？」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「……嗯、很喜欢呢」
			;鈴仙二號が恋慕
			IF TALENT:100:恋慕
				PRINTFORMW
				CALL M_KOJO_COLOR_K99
				PRINTFORMW 「……啊、这么说来，Reisen好像也说过喜欢他」
				PRINTFORMW 「呵呵、竞争对手那么多、有点儿麻烦了呢♪」
				SETCOLOR 0xA869BE
				PRINTFORMW 「……欸？ 真的吗！？」
			ENDIF
		;それ以外
		ELSE
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「我也不是一直闲着……算了、不说这个」
			SETCOLOR 0xA869BE
			PRINTFORMW 「所以、你到底是怎么了？」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「就像那个时候一样……你知道的」
			SETCOLOR 0xA869BE
			PRINTFORMW 「………这样啊」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「没关系、我不会丢下你一个人的」
			SETCOLOR 0xA869BE
			PRINTFORMW 「那时候、他也是这样说的」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「……是啊」
			SETCOLOR 0xA869BE
			PRINTFORMW 「姐姐」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「……怎么了」
			SETCOLOR 0xA869BE
			PRINTFORMW 「我……我不想看到姐姐伤心的样子」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「…………」
			SETCOLOR 0xA869BE
			PRINTFORMW 「那个时候、姐姐的样子………」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「啊、好的好的、我明白了、我明白了」
			PRINTFORMW 「不会再交恋人了、我保证」
			SETCOLOR 0xA869BE
			PRINTFORMW 「………为什么」
			PRINTFORMW
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「算了、不说这些了、依姬也有喜欢的对象吧？」
			SETCOLOR 0xA869BE
			PRINTFORMW 「………诶诶？怎么又到我了！？」
		ENDIF
		RESETCOLOR
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMDL
		PRINTFORMDL ―――綿月亭
		PRINTFORMDW
		SETCOLOR 0xCCDFFF
		PRINTFORMW 「喂喂？……那个……丰姬大人？」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「……欸？啊、怎么了？%CALLNAME:MASTER%……不对！Reisen」
		SETCOLOR 0xCCDFFF
		PRINTFORMW 「是、向您报告、您委托我的信已经交给八意大人了」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「是吗、谢谢、退下吧」
		PRINTFORMDL 深深地鞠了一躬后，Reisen退出了房间
		PRINTFORMDL 坏了、这样下去、又要被依姬数落了
		PRINTFORMDW 这种时候就要补充糖分……于是伸手去拿桃子
		SETCOLOR 0xA869BE
		PRINTFORMW 「失礼了、姐姐，Reisen说姐姐最近很奇怪……」
		PRINTFORMW 「……啊、原来如此。是这样吗」
		PRINTFORMW 「恕我冒昧、姐姐最近桃子吃得太多了」
		PRINTFORMW 「前も食べすぎでしたけど、この頃は特に……」
		PRINTFORMDW 结果只能听妹妹唠叨了
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「想的事情太多、结果变得这么麻烦……」
		SETCOLOR 0xA869BE
		PRINTFORMW 「……你在听吗？」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「是的是的、在听哦」
		RESETCOLOR
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMDL
		PRINTFORMDL ―――这是某一天发生的事
		PRINTFORMDW
		CALL HPH_PRINT,@"「噶咕……っHPH 哈啊……咕呜……HPH」","W"
		PRINTFORMDL
		PRINTFORMDL 一開始……只是单纯的好奇使然
		PRINTFORMDL 作为从地上来的人、也许能从他那里听到有趣的故事
		PRINTFORMDL 原本应该是这样的
		PRINTFORMDW
		CALL HPH_PRINT,@"「那里……摸那里……咕……HPH 啊啊……HPH」","W"
		PRINTFORMDL
		PRINTFORMDL 不知不觉间、我和他的身体重叠在了一起
		PRINTFORMDL 在耳边诉说的爱意、让我混乱得忘乎所以
		PRINTFORMDW
		CALL HPH_PRINT,@"「想要被……插进来……啊……HPH 咕噫……HPH」","W"
		PRINTFORMDL
		PRINTFORMDL 又过了一段时间……兔子们之间開始流传起不确定的传闻
		PRINTFORMDL 绵月丰姬是叛徒、和地上的人勾结起来……
		PRINTFORMDW
		CALL HPH_PRINT,@"「哈啊……HPH进到……HPH 最里面了……HPH」","W"
		PRINTFORMDL
		PRINTFORMDL 那些散播谣言的兔子一定看到了我和他幽会吧
		PRINTFORMDL 我心里很着急、但从某一天開始、这个传闻就停止了
		PRINTFORMDW
		CALL HPH_PRINT,@"「在里面……涨的好大……HPH 啊啊啊啊————HPH」","W"
		PRINTFORMDL
		PRINTFORMDL 我去了兔子们的排练场看看情况、大家都像平时一样悠闲地练习着
		PRINTFORMDL 有几只兔子不见了、询问了之后才知道、她们被认定为是污蔑我的叛徒、已经被驱逐到地上了
		PRINTFORMDL 做出这个命令的好像是依姬、我因此对她充满了歉意
		PRINTFORMDW
		CALL HPH_PRINT,@"「哈啊……哈啊……HPH 喜欢……%CALLNAME:MASTER%……HPH」","W"
		PRINTFORMDL
		PRINTFORMDL 而现在……我今天也这样被他抱着
		PRINTFORMDL 被驱逐的兔子们怎么样了呢？但愿没有被野兽吃掉
		PRINTFORMDW 接受着他的污秽……我心不在焉地想着
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMDL
		PRINTFORMDL ―――这是某一天发生的事
		PRINTFORMDW
		PRINTFORMW 「嗯……哦……」
		PRINTFORMDL 当我醒来的时候、所看见的是陌生的天花板
		PRINTFORMDW 一边用模糊的头脑整理着状况、一边想要坐起来……
		PRINTFORMDW 注意到旁边睡着的%CALLNAME:MASTER%
		PRINTFORMW 「啊……我……」
		PRINTFORMDL 没错、被他邀请约会、然后……
		PRINTFORMDW 顺势……做出了那种事
		PRINTFORMW 「喂、该起床了」
		PRINTFORMDL 我摇晃着他的身体想把他唤醒、但他没有醒过来的迹象
		PRINTFORMDW 窥视着他的脸、安心的睡颜简直像婴儿一样
		PRINTFORMW 「真是……可爱的睡脸啊」
		PRINTFORMW 「叫醒他真可惜……留个字条吧」
		PRINTFORMDL 为了不吵醒对方、安静地从被窝里出来并整理好衣服
		PRINTFORMDW 顺便地、把他脱下来的衣服也整理好、叠放在一边
		PRINTFORMW 「嗯……约会很開心」
		PRINTFORMW 「然后……该怎么写才好呢」
		PRINTFORMDW 考虑了很多……得出了写出真实心情是最好的结论
		PRINTFORMW 「……下次再一起吧。貴方の豊姫」
		PRINTFORMW 「………呵呵」
		PRINTFORMW 「『貴方の豊姫』……这简直就像恋人一样」
		PRINTFORMDL 把字条放在叠好的衣服上、悄悄离開房间
		PRINTFORMDW 像这样偷偷摸摸地离開、有点儿……寂寞啊
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMDL
		PRINTFORMDL ―――綿月亭
		PRINTFORMDW
		SETCOLOR 0xA869BE
		PRINTFORMW 「姐姐、身体不舒服吗？」
		PRINTFORMW 「听说、最近连兔子们的练习都没露面……」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「嗯……的确有一点儿」
		SETCOLOR 0xA869BE
		PRINTFORMW 「……发生什么事了吗？」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「其实也不是这个意思……」
		SETCOLOR 0xA869BE
		PRINTFORMW 「……那就算了」
		PRINTFORMW 「兔子们在怀疑某个人的事、我也不知道哦？」
		PRINTFORMDL 依姬故意叹了口气、离開了房间
		PRINTFORMDW 她是个认真的人、大概是去看看兔子们有没有偷懒吧
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「嗯……该怎么解释呢……」
		PRINTFORMDL 我知道这是不好的行为
		PRINTFORMDW 身为月之使者领袖的我、竟然和地面上的人……
		PRINTFORMW 「这种时候、如果八意大人在场的话……」
		PRINTFORMDW 会叫我当机立断杀了他吗？
		PRINTFORMDW 想到这里、我摇了摇头
		PRINTFORMDL 一直依赖八意大人的话、她一定会失望的
		PRINTFORMDW 接下来该怎么办……必须用自己的头脑思考
		PRINTFORMW 「……呵呵、确实啊」
		PRINTFORMW 「被怀疑也没办法」
		PRINTFORMDW 经过一番思考、我拿起两个桃子……
		PRINTFORMDW 决定了、今天也依然要去他的身边
		RESETCOLOR
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;接吻魔取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;同棲・非同棲で分けようと思ったけど豊姫の能力が那个ば書き分ける必要もないと思ったので共通
		PRINTFORMDW 某天深夜、%CALLNAME:MASTER%因呼吸困难而醒来……
		PRINTFORMDW 丰姬竟然正骑在他身上、贪恋着他的嘴唇
		CALL HPH_PRINT,@"「咕……HPH 啊……把你吵醒了吗……？」","W"
		CALL HPH_PRINT,@"「对不起……再过一会儿、我就能满足了……HPH」","W"
		PRINTFORMDL 也不知道这样子持续了多长时间
		PRINTFORMDW 她的嘴唇周围、被彼此的口水弄得黏糊糊的
		CALL HPH_PRINT,@"「啊嗯……噢……嗯……っHPH」","W"
		CALL HPH_PRINT,@"「再来一次……一次就好……っHPH」","W"
		PRINTFORMDW 一次又一次、不厌其烦地重叠着嘴唇的丰姬
		PRINTFORMDW 結局%CALLNAME:MASTER%が解放されたのは、夜も明けかけ、空が白み始めた頃だった……
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰狂取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		CALL HPH_PRINT,@"「嗯……嗯……HPH」","W"
		PRINTFORMDW 大家都睡着的时候、丰姬像往常一样抚慰着自己的身体。
		PRINTFORMDW 首先隔着内衣摩擦秘裂
		PRINTFORMDW 慢慢地、在焦灼的欲念之中、敏感度渐渐提升
		CALL HPH_PRINT,@"「啊……呜嗯……呀……っHPH」","W"
		PRINTFORMDW 咕唧……哗……淫荡的水声在静谧之中回响
		PRINTFORMDW 明明很微弱、在丰姬耳中却极响
		CALL HPH_PRINT,@"「哈啊……哈啊……っHPH」","W"
		PRINTFORMDW 脱下吸饱了爱液、变得沉重的内衣
		PRINTFORMDW 暴露出来的私密处乱糟糟的、为了寻求更大的刺激而垂涎欲滴
		PRINTFORMDW 已经准备就绪了啊、那之后就是……
		CALL HPH_PRINT,@"「啊……完全……忍受不了……っHPH」","W"
		PRINTFORMDW 旁边放着模仿男性生殖器的玩具。长度和粗细都与%CALLNAME:MASTER%的相同
		PRINTFORMDW 丰姬跳过润滑的程序、直接将其拿在手上―――
		CALL HPH_PRINT,@"「啊啊―――――ッHPH HPH HPH」","W"
		PRINTFORMDW 然后、毫不犹豫地、\@ TALENT:78 ? 像是要将子宫洞穿一样， #  \@一直刺到阴道深处……
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;子宮口性感取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW 「咕唔……啊……」
		PRINTFORMDW 丰姬无法抑制身体的疼痛、用手指玩弄着自己的私密处。
		PRINTFORMDW 叽咕……咯叽……伴随着水声、将手指探入阴道的入口抚弄
		PRINTFORMDW 明明不久之前、这样做还能满足
		PRINTFORMDW 但是、现在……
		PRINTFORMW 「不够……这还不够啊……！」
		PRINTFORMDW 不够、不够、不够
		PRINTFORMDW 在这么浅的地方、又怎么能感觉到呢
		CALL HPH_PRINT,@"「再深一点……啊……这里……HPH」","W"
		PRINTFORMDW 阴道壁的顶部、是女性最敏感的部位，G点
		PRINTFORMDW 无视这一部位……丰姬用指尖轻抚着開闭的子宫入口。
		CALL HPH_PRINT,@"「啊……咕……っHPH 噫……啊啊……っHPH」","W"
		PRINTFORMDW 这才是她所追求的快乐……就在这种地方
		PRINTFORMDW 从那以后再也停不下来
		PRINTFORMDW 口水从嘴角低落、两腿大大地张開
		PRINTFORMDW 伸出手指、不断刺激变成性感带的子宫
		PRINTFORMDW 黏糊糊的爱液把内衣、下半身和寝具都弄得湿漉漉的
		PRINTFORMDW 尽管如此、丰姬依然寻求着快乐
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;漏尿癖取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K99_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:恋慕
            CALL HPH_PRINT,@"「呜呜......啊......HPH」","L"
            PRINTFORMDL 想着%CALLNAME:MASTER%的样子,豊姫沉溺在自慰的快感中。
            CALL HPH_PRINT,@"「%CALLNAME:MASTER%......%CALLNAME:MASTER%......啊HPH」","L"
            PRINTFORMDW 被放在一旁的情趣用品,大多已经被爱液浸湿发亮......
		;それ以外
		ELSE
            CALL HPH_PRINT,@"「哈......嗯......HPH」","L"
            PRINTFORMDL 啾的一声,将手指插入秘处。浅浅抽插着手指,空着的那只手捏弄着乳首。
            PRINTFORMDW 无论过去多少十年,数百年,这种动作已经通过反复练习完全超越了师父。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同室時自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;你が濃厚精液の場合３分の１の確率で肉振動棒にされる
		IF TALENT:MASTER:濃厚精液 && !RAND:3
			PRINTFORMDW 一睁开眼,豊姫已经跨坐在腰上摆动着腰肢。
            CALL HPH_PRINT,@"「哎呀......嘻嘻,终于醒了呢......HPH」","W"
            PRINTFORMDL 啾咕的水声从相连的部位传来。
            PRINTFORMDW %CALLNAME:MASTER%被舒服的感觉刺激的呻吟了一声,豊姫就把脸靠近了过来。
            CALL HPH_PRINT,@"「不行啊......就这么憋着不好吧......HPH」","L"
            CALL HPH_PRINT,@"「得先去『洗手间』尿尿才可以睡觉嘛......HPH」","W"
            PRINTFORMDL 说着,豊姫紧紧夹住了阴道。
            PRINTFORMDW %CALLNAME:MASTER%的阴茎被如此挤压,不知道已经迎来了第几次高潮。
            CALL HPH_PRINT,@"「看吧......还有这么多呢......HPH」","L"
            CALL HPH_PRINT,@"「万一漏出来就糟糕了啊......?HPH」","W"
            PRINTFORMDL 尽管还处在高潮中,%CALLNAME:MASTER%的阴茎还是被豊姫小幅度地摇晃着腰部摩擦着。
            PRINTFORMDW %CALLNAME:MASTER%的呻吟变成了喘息,豊姫像个魅魔一样嘻嘻笑了。
            CALL HPH_PRINT,@"「呵呵呵HPH 很可爱呢,%CALLNAME:MASTER%......HPH」","L"
            CALL HPH_PRINT,@"「来,这次要更猛烈一点吧......?HPH」","W"
            PRINTFORMDL 说完,豊姫开始用阴道在阴茎上猛烈地磨蹭。
            PRINTFORMDW 对于刚刚射精过的敏感阴茎来说,这种刺激简直太强了。
            CALL HPH_PRINT,@"「啊......又射了呢......HPH」","L"
            CALL HPH_PRINT,@"「就这样,把全部都射出来,不要漏尿哦......HPH」","W"
            PRINTFORMDL 一边用阴道抚弄着阴茎,豊姫还催促%CALLNAME:MASTER%再次射精。
            PRINTFORMDW 想说饶了我吧......但嘴被豊姫封住,无法说出。
            PRINTFORMDW ........................
            PRINTFORMDW ............
            PRINTFORMDW ...
            PRINTFORMDL 天空开始发白时,豊姫才终于放开了阴茎。
            PRINTFORMDW %CALLNAME:MASTER%嘴里吐着泡沫,在豊姫身下晕了过去,皮肤上满是水渍......
            SETCOLOR C_PINK
            FONTBOLD
            PRINTFORML 【%CALLNAME:MASTER%体力不足】
            PRINTFORMW 【经历猛烈性爱的%CALLNAME:MASTER%体力稍有增长】
			FONTREGULAR
			RESETCOLOR
			PRINTFORMW
			CALL ADD_SAMEN_V(99, BASE:MASTER:精力)
			MAXBASE:MASTER:体力 += 10
			EXP:精液経験 += 10
			EXP:膣射経験 += 10
			EXP:Ｖ性交経験 += 10
			EXP:絶頂経験 += 10
			EXP:MASTER:絶頂経験 += 10
			EXP:MASTER:射精経験 += 10
			EXP:MASTER:挿入経験 += 10
			TALENT:MASTER:120 = 0
			CFLAG:MASTER:徹夜 = 1
		;それ以外
		ELSE
			CALL HPH_PRINT,@"「呜......嗯......HPH」","L"
            PRINTFORMDL 睁开眼,豊姫正把秘处按在%CALLNAME:MASTER%的手上自慰。
            PRINTFORMDW ......还在睡眠中的%CALLNAME:MASTER%装作没有看见,重新闭上了眼睛。
		ENDIF
		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
	;其他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K99_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「抱歉、这次还是不要了」
		PRINTFORML 「下次再一起进去吧？」
		PRINTFORMDW 被委婉地拒绝了……
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;恋慕
		IF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「哎呀哎呀……呵呵♪」
					PRINTFORMDW これから起こることを想像して勃起来了%CALLNAME:MASTER%の一物に、豊姫は熱い視線を送っている……
				CASE 1
					PRINTFORML 「来这边、坐下来、坐下来♪」
					PRINTFORML 「让姐姐我来给你洗头吧♪」
					PRINTFORMDW %CALLNAME:MASTER%坐到了凳子上、丰姬丰满的胸部旋即压到了背上……
				CASE 2
					CALL HPH_PRINT,@"「啊……HPH 现在还不行……HPH」","L"
					CALL HPH_PRINT,@"「先把衣服脱下来……呵呵HPH」","L"
					PRINTFORMDW %CALLNAME:MASTER%和丰姬一边嬉戏一边走进浴室……
			ENDSELECT
		;それ以外
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORMDL %CALLNAME:MASTER%先进入了浴池等着、过了一会儿、门打開了
					PRINTFORML 「呵呵、久等了」
					PRINTFORMW 「和我一起洗一次吧♪」
				CASE 1
					PRINTFORML 「啊、想一起洗澡吗？」
					PRINTFORML 「嗯……偶尔这么做也可以」
					PRINTFORMDW 丰姬决定一起泡澡
				CASE 2
					PRINTFORML 「有多久没和谁一起进来过了」
					PRINTFORML 「……哎呀、你要给我洗头吗？那就交给你了」
					PRINTFORMDW 丰姬毫无防备地暴露着她丰满的肢体……
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K99_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;妊娠経験済み
		IF CFLAG:99:兒童人数
			PRINTFORML 「%CALLNAME:MASTER%八意大人给我检查了……」
			PRINTFORML 「……呵呵♪ 『恭喜哦』这么说的♪」
			PRINTFORML 「今晚全家人一起庆祝一下吧♪」
			PRINTFORMDL 增加了新的家庭成员、没有比这更高兴的事了
			PRINTFORMDW %CALLNAME:MASTER%抱紧丰姬、温柔地抚摸着孕育着新生命的肚子……
		;初めて妊娠した
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%、来听我说一下吧」
			PRINTFORMW 「你一直想要的东西终于有了」
			PRINTFORMW 「……呵呵、你知道是什么吗？」
			;選択肢
			CALL ASK_M("孩子", 1, "属于你我的家", 1, "米饭", 1)
			;判定
			SELECTCASE RESULT
				;兒童
				CASE 0
					PRINTFORMW 「嗯嗯、是我们的孩子呢」
					PRINTFORMW 「就在……这里哦……♪」
				;舞ホーム
				CASE 1
					PRINTFORMW 「嗯、那个我也想要……」
					PRINTFORMW 「不过现在、只有这个孩子哦……♪」
				;ご飯
				CASE 2
					PRINTFORMW 「你不是刚吃过吗？」
					PRINTFORMW 「正确答案是……我们可爱的孩子啊♪」
			ENDSELECT
			PRINTFORMDL 丰姬牵起%CALLNAME:MASTER%的手、放在自己的肚子上
			PRINTFORMDW 得到那种触感的瞬间、才有了自己成为父亲的实感
			PRINTFORMW 「早点出生吧……爸爸妈妈会让你幸福的……♪」
			PRINTFORMDL 丰姬将自己的手重叠在%CALLNAME:MASTER%的手上、打心眼里露出開心的笑容
			PRINTFORMDW 丰姬和即将出生的孩子、一定要让两个人幸福……%CALLNAME:MASTER%在心中发下坚定的誓言
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		$TOYOHIME_PREGNANCY
		;妊娠経験済み
		IF CFLAG:99:兒童人数
			PRINTFORML 「真想快点儿告诉我们的孩子……」
			PRINTFORML 「这个家庭、又多了一个新成员」
			PRINTFORMDL 丰姬温柔地抚摸着孕育新生命的肚子
			PRINTFORMDW 那是充满了母性的表情
		;初めて妊娠した
		ELSE
			PRINTFORMDL 有一天、正在打扫房间的时候、丰姬找了过来
			PRINTFORMDW 有什么事？%CALLNAME:MASTER%一边泡茶一边问道
			PRINTFORMW 「那个……%CALLNAME:MASTER%……」
			PRINTFORMW 「我……好像有宝宝了……」
			PRINTFORMDL 突然的告白让%CALLNAME:MASTER%目瞪口呆
			PRINTFORMDW 自己是父亲了……丰姬的肚子里、有自己的孩子……
			PRINTFORMW 「……没关系、不是你的错」
			PRINTFORMW 「这孩子我会好好……啊！？」
			PRINTFORMDL 突然被紧紧抱住的丰姬、发出惊讶的声音
			PRINTFORMDW 我很高兴自己有了孩子、%CALLNAME:MASTER%把自己真实的感情传达给了丰姬
			PRINTFORMW 「……谢谢、%CALLNAME:MASTER%」
			PRINTFORMW 「我、会生个健健康康的孩子出来的」
			PRINTFORMW
			PRINTFORMDL 之后、两人进行了小小的庆祝
			PRINTFORMDW 对即将诞生的新家人充满了期望……
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		GOTO TOYOHIME_PREGNANCY
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K99_25(ARG,ARG:1)
;口上主はLOCAL
;ARG:1	何人目の兒童か
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		$TOYOHIME_CHILDBIRTH
		PRINTFORMDL
		;一人目の兒童の時は以下の文が流れる
		IF ARG:1 == 1
			PRINTFORMDL 丰姬临产时、%CALLNAME:MASTER%就在房间外等候
			PRINTFORMDW
			PRINTFORML 不管有什么理由、也不能往里看
			PRINTFORMW 摒弃掉那种想法、就在外面守护着
			PRINTFORMDL
			PRINTFORMDL 虽然也有想要见证孩子出生的心情……现在只能等待
			PRINTFORMDW 一个小时、两个小时、三个小时……时间就这样过去了
			PRINTFORMDW
			PRINTFORMDW ……然后、终于……
			PRINTFORMDW 房间里传来刚出生的婴儿欢快的叫声
			PRINTFORMDL ……………
			PRINTFORMDL ………
			PRINTFORMDW …
		ENDIF
		PRINTFORMW 「乖……乖……好孩子……」
		PRINTFORMW 「喝吧、喝吧、快快长大吧……♪」
		PRINTFORMDL 丰姬正在给自己刚出生的孩子喂奶
		PRINTFORMDW 也不知道继承了谁、孩子的食欲特别旺盛
		PRINTFORMW 「呐、%CALLNAME:MASTER%、给这孩子想几个名字吧？」
		PRINTFORMDL 自己决定也可以、但也想听听丰姬的想法
		PRINTFORMDL %CALLNAME:MASTER%这样说了、豊姫想了想、「那么就是……」列出了几个候补名字
		PRINTFORMDW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		GOTO TOYOHIME_CHILDBIRTH
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		GOTO TOYOHIME_CHILDBIRTH
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K99_26(ARG,ARG:1)

;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;見られた瞬間
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;什麼也不做
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;そのまま続行
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;逐出
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;やっちゃう
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;事後
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 6
		;事後お泊り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
	ENDSELECT
ENDIF

;オナバレックス判定用関数
;RETURN -1で強制失敗、RETURN 1で強制成功
@M_KOJO_EVENT_K99_26_1(ARGS)
#DIM 補正値
IF ARGS == "どうぞそのまま"

ELSEIF ARGS == "二人"

ENDIF

;使用例
;IF !TALENT:XX:恋慕
;	PRINTFORMW %CALLNAME:XX%はガードが堅いぞ！
;	RETURN -1
;ENDIF
;IF TALENT:MASTER:濃厚精液
;	PRINTFORMW %CALLNAME:XX%はちんぽに弱いぞ！
;	RETURN 1
;ENDIF
;==================================================
;相手から约会のお誘い
;==================================================
@M_KOJO_EVENT_K99_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K99_28(ARG,ARG:1)
;口上主はTARGET
;ARGに脱がし方選択
;ARG:1（ARG=3の場合のみあり）地の文の反応
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;全裸にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;变成只穿内衣的样子
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;胖次ちょうだい
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE ARG:1
				;-------------------------------------------------
				CASE 0
				;交換です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;憤怒口上
;==================================================
@M_KOJO_EVENT_K99_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの胆量で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;泣かせてしまった　[膽怯]持ち
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;疲惫
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;満足して解放
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;満足したところを被逆推た
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;壊れるまでしてあげる
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;一日の終了時(AFTERTRAニーの前)、面識がなければ呼び出されない
;==================================================
@M_KOJO_EVENT_K99_31(ARG,ARG:1)
;口上主はTARGET
;ARGは会ってない日数
;何日以上会ってなかったら愚痴を言うとかできます
;CFLAG:オナバレで分岐入れてもよさそう
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;今日会っていない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今日会っている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;自由行動中
;ARG:1      0=行動中,1=完了時
;技能系の行動は技能レベルが1以上なら発生
;==================================================
@M_KOJO_EVENT_K99_32(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
	CASE 0
		;▼考え事,（～は考えに耽っている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 1
		;▼玩遊戲,（～は走り回っている。）
		;※[幼稚]持ちのみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 2
		;▼吃飯,（～は吃飯を摂っている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 3
		;▼つまみ食い（～はこっそりつまみ食いをしている。）
		;※[妖精]持ちと露米亜、恋、幽幽子、紫苑のみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 4
		;▼掃除,（～はテキパキと部屋の掃除をしている。）
		;※[掃除係]持ちまたは汚臭耐性-1以下のみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 5
		;▼運動,（～は張り切って運動している。）
		;※[音楽知識]持ちは除く（演奏になる）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 6
		;▼読書,（～は黙々と本を読んでいる。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 7
		;▼料理,
		IF !ARG:1
			;行動中
			IF Activity_Duration:TARGET > 30
				;料理中（～は軽快に料理をしている。）
				PRINTFORML
			ELSE
				;吃飯中（～は作った料理を食べている。）
				PRINTFORML
			ENDIF
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 8
		;▼演奏
		;※[音楽知識]持ちのみ（TALENT:音楽知識で変化）
		;1,～は小気味よく演奏している。
		;2,～は気ままに歌っている。
		;3,～は華麗に踊っている。
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 9
		;▼採集,（～使える素材を探している。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 10
		;▼釣魚,（～はのんびり釣魚をしている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 11
		;▼実験,（～は可疑実験をしている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 12
		;▼のんびり,（～はのんびりしている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 13
		;▼晩酌,（～はまったりと酒を飲んでいる。）
		;※酒耐性0以上のみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 14
		;▼買い物,（～は気ままに買い物している。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 15
		;▼説教,（～はじっと聞いている…）
		;※神霊・蓬莱人は除く
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 16
		;▼落とし穴,（～は落とし穴を増やしている）
		;※三月精・琪露諾・克勞恩皮絲のみ
		;それ以外は落ちる側
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時,
			;（仕掛け人（失敗時）,誰も引っかからないので～は飽きてしまったようだ…）
			;（落ちた側（戦闘能力2～4）,～はすぐに穴から飛び出して周りをキョロキョロ見回している…）
			PRINTFORML
		ENDIF
	CASE 17
		;▼雪だるま作り
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;ハッピーニューイヤー
;年越しの瞬間に同じ部屋に居ると発生
;==================================================
@M_KOJO_EVENT_K99_33(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORMW
ENDIF
RETURN 1

;==================================================
;技能レベルUP
;各ABL値はレベルUP後の値になってます
;==================================================
@M_KOJO_EVENT_K99_34(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
	CASE 1
		;戦闘技能
		PRINTFORMW
	CASE 2
		;話術技能
		PRINTFORMW
	CASE 3
		;清掃技能
		PRINTFORMW
	CASE 4
		;教養
		PRINTFORMW
	CASE 5
		;料理技能
		PRINTFORMW
	CASE 6
		;採集Lv
		PRINTFORMW
	CASE 7
		IF ARG:1 == 0
			;音楽技能
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【音楽知識】取得
			PRINTFORMW
		ELSEIF ARG:1 == 2
			;【相対音感】取得
			PRINTFORMW
		ENDIF
	CASE 8
		;釣魚Lv
		PRINTFORMW
	CASE 9
		IF ARG:1 == 0
			;調合Lv
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【調合知識】取得
			PRINTFORMW
		ENDIF
	CASE 10
		;伐採Lv
		PRINTFORMW
	CASE 11
		IF ARG:1 == 0
			;指
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【靈活手指】取得
			PRINTFORMW
		ENDIF
	CASE 12
		IF ARG:1 == 0
			;舌
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【舌頭靈活】取得
			PRINTFORMW
		ENDIF
	CASE 13
		IF ARG:1 == 0
			;胸
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【淫乳】取得
			PRINTFORMW
		ENDIF
	CASE 14
		;腰
		PRINTFORMW
	CASE 15
		IF ARG:1 == 0
			;膣
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【淫壺】取得
			PRINTFORMW
		ENDIF
	CASE 16
		IF ARG:1 == 0
			;肛門
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【尻穴狂】取得
			PRINTFORMW
		ENDIF
	ENDSELECT
	PRINTL
ENDIF
RETURN 1

;==================================================
;デイリーイベント2,夢精
;親密5以上で発生（来訪角色のみ）
;▼地の文--------------------------------------------------
;【MASTER】が夢精で汚した内衣を洗っていると【TARGET】が飛んできた！
;【TARGET】はそんなもの他の洗濯物と一緒に洗わないでと抗議すると、【MASTER】の手に収まった内衣を粪だくり戻っていった…
;【TARGET】　欲情の珠＋1000
;==================================================
@M_KOJO_DAILY_EVENT_K99_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 = 0
;-------------
IF LOCAL
	PRINTFORMW
ENDIF
RETURN 1

;==================================================
;デイリーイベント4,物思い
;濃厚精液状態で発生
;▼地の文--------------------------------------------------
;とりとめもない思考に耽っていた【TARGET】は、いつの間にか【MASTER】のことを考えていたことに気づいた
;【TARGET】は明日【MASTER】に会いに行くことにしたようだ
;==================================================
@M_KOJO_DAILY_EVENT_K99_4(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
CALL DAILY_MESSAGE_4(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORMW
ENDIF
RETURN 1

;==================================================
;デイリーイベント12,特訓
;信頼100以上で発生（拠点角色のみ）
;==================================================
@M_KOJO_DAILY_EVENT_K99_12(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
;コメントアウトできるのはARG:1=1,2のみです
CALL DAILY_MESSAGE_12(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG:1
	CASE 1
		;特訓を頼まれる
		;～から新技の訓練に付き合って欲しいと言われた
		PRINTFORML
	CASE 2
		;拒绝
		;～は残念そうだ
		PRINTFORML
	CASE 3
		;～の攻撃！
		;※ここはWAITしないでください
		PRINTFORML
	CASE 4
		IF ARG:2
			;時間停止して回避
			PRINTFORML
		ELSE
			;回避成功
			PRINTFORML
		ENDIF
	CASE 5
		;回避失敗
		PRINTFORML
	ENDSELECT
ENDIF
RETURN 1

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

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

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

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

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

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

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_K99_LOST_VIRGIN_STOP
;-------------------------------------------------
PRINTFORML
RETURN 1

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

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

;-------------------------------------------------
;部屋描写用関数
;口上角色のOMANEKIBEYAか拠点の描写に使います
;記入する際はコメントアウトを外してください
;-------------------------------------------------
;@K99_ROOM_DESCRIPTION
;PRINTFORML 例）生活感のない殺風景な部屋だ
;-------------------------------------------------

;==================================================
;贈り物イベント
;==================================================
@M_KOJO_EVENT_K99_GIFT(ARG, GIFT_ID, 評価点, GIFT_NAME, SENSE)
#DIM GIFT_ID
#DIM 評価点
#DIMS GIFT_NAME
#DIMS SENSE
;---------------------------------------------------------------------------------------------------
;評価点       贈り物の評価点（1～999）,口上主があげた場合でも口上主の評価点
;GIFT_NAME    贈り物の名称
;SENSE        贈り物に設定された属性。STRCOUNT(DISH_TASTE, "ほげほげ/")を使用と特定の属性を判定できます。
;GIFT_ID      これ単体では使いません。以下の式内関数を使用とデータを抽出できます（こだわりたい人用）
;　GET_GIFTDATA(GIFT_ID, "回数")    貰った（あげた）回数
;　GET_GIFTDATA(GIFT_ID, "得点")    得点（1～999）,口上貂プレ内では用意されてます。
;　GET_GIFTDATA(GIFT_ID, "日期")    貰った（あげた）日期（1～9999）
;　GET_GIFTDATA(GIFT_ID, "場所")    買った場所（约会の行き先）
;　GET_GIFTDATA(GIFT_ID, "形容詞")  形容詞番号（贈り物_形容詞.erb参照）
;　GET_GIFTDATA(GIFT_ID, "本体")    本体番号（贈り物_本体.erb参照）
;--------------------------------------------------------------------------------------------------
;约会帰りに口上主が你に贈り物を渡す（陥落や好感度に関わらず親密5以上から発生）
;評価点は701～999（渡す角色本人の評価）
;--------------------------------------------------------------------------------------------------
IF ARG == 1
	;PRINTFORMW 「%GIFT_NAME%をあげるから大事に使って」
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日获得的礼物を大事にする（700点以上）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 2
	;IF STRCOUNT(SENSE, "可愛的/")
	;	PRINTFORMW 「可愛的禮物を貰っちゃった」
	;ELSEIF 評価点 >= 800
	;	PRINTFORMW 「とっても素敵な禮物を貰っちゃった」
	;ELSE
	;	PRINTFORMW 「素敵な禮物を貰っちゃった」
	;ENDIF
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日获得的礼物をお気に入りにする（↑の大事にするから続き）（700点以上かつ最高得点）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 3
	;IF STRCOUNT(SENSE, "穿戴/")
	;	PRINTFORMW 「明日からこれを付けて行こうっと」
	;ELSE
	;	PRINTFORMW 「明日からこれを持って行こうっと」
	;ENDIF
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日获得的礼物をとりあえず保管する（400～699点）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 4
	;PRINTFORMW 「とりあえず飾っておこう」
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日获得的礼物をこっそり質に入れる（400点未満）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 5
	;PRINTFORMW 「私これ嫌いなのよね～」
	RETURN 1
ENDIF
RETURN 1

;==================================================
;斗虫
;斗虫の口上は少し特殊で、PRINTを使用のではなく、
;台詞一行のみをRESULTSに入れてください
;ムシの名前は %MUSHI_NAME% で表示できます
;ムシの名前の最長は亞歷珊卓皇后鳥翼蝶の全角14文字です
;文字数制限があります。はみ出ないように気をつけてください
;ARGは残りムシ数か順位です
;==================================================
@M_KOJO_MESSAGE_COM_K99_MUSHI_BATTLE(ARGS, ARG)
#DIM 残りムシ数
#DIM 順位
SELECTCASE ARGS
CASE "試合前"
	;-------------------------------------------------
	;角色セレクト時,ARGは使えません
	;全角50文字くらいまで
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「ぶっとばしてさしあげますわ！」
	ENDIF
CASE "戦場に出した"
	;-------------------------------------------------
	;"【（角色）】は《（ムシ）》を戦場に出した！」"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「%MUSHI_NAME%！キミにきめた！」
	ENDIF
CASE "攻撃時"
	;-------------------------------------------------
	;"【（角色）】《（ムシ）》の『（攻撃名）』！」"の直前
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「ぶっとばせ！%MUSHI_NAME%！」
	ENDIF
CASE "倒れた時"
	;-------------------------------------------------
	;"【（角色）】《（ムシ）》は倒れた！！"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「ああっ！私の%MUSHI_NAME%がっ！」
	ENDIF
CASE "敗退時"
	;-------------------------------------------------
	;"【（角色）】敗退！！"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「私のムシが全滅めつめつ……」
	ENDIF
CASE "タイマン：勝ち"
	;-------------------------------------------------
	;順位は1位
	;全角20文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「%CALLNAME:MASTER%よわーい！」
	ENDIF
CASE "タイマン：負け"
	;-------------------------------------------------
	;順位は2位
	;全角20文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「%CALLNAME:MASTER%つよーい！」
	ENDIF
CASE "バトルロイヤル：優勝"
	;-------------------------------------------------
	;順位は1位
	;全角30文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「やったー！」
	ENDIF
CASE "バトルロイヤル：２位以下"
	;-------------------------------------------------
	;順位は2～4位
	;全角30文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「くやし～！」
	ENDIF
CASE "チーム戦：勝ち"
	;-------------------------------------------------
	;順位は1位（やられていても）
	;全角32文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「私のおかげね！」
	ENDIF
CASE "チーム戦：負け"
	;-------------------------------------------------
	;順位は2位
	;全角32文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「味方が弱い！！」
	ENDIF
ENDSELECT
SIF RESULTS != ""
	RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【99】豊姫/M_KOJO_K99_イベント.ERB