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

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

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

;TCVAR:64:350 移動時すれちがい会釈の口上は一日一回だけ表示
;TCVAR:64:351 妊娠時索求膝枕妊娠分岐の口上は一日一回だけ表示
;TCVAR:64:352 妊娠時撫摸肚子妊娠分岐の口上は一日一回だけ表示
;TCVAR:64:353 本気の戦闘訓練は一日一回だけ
;TCVAR:64:354 その日の初回撒豆子で使用
;TCVAR:64:355~356 その日二回目以降の進入房間・外出で使用
;TCVAR:64:357 時間停止で胖次を剥ぎ取ったか
;
;CFLAG:64:1000 UPDATE時の呼び名変更に使用
;CFLAG:64:1001 黄昏画像表示
;CFLAG:64:1002 弾幕勝負口上
;CFLAG:64:1003 约会中地底で遭遇した時に一度だけ案内
;CFLAG:64:1100 戦闘訓練でズルをした場合次回から反撃される
;
;******************************************************************************

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

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

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

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

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

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

;推倒禁止に1を入れると、主动推倒てこなくなります
;清醒の場合は勇儀が推倒てこないように設定
IF BASE:64:酒気 > 0
	CFLAG:64:推倒禁止 = 0
ELSE
	CFLAG:64:推倒禁止 = 1
ENDIF

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

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

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

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

IF !CFLAG:64:1000
	PRINTL
	PRINTFORML 要变更勇仪对你的称呼吗？
	PRINTL
	CALL ASK_M("是的",1 , "不",1 , "不再变更",1 , "变更勇仪的立绘",1)
	SELECTCASE RESULT
		CASE 0
			CALL NAME_SET_K64
			RETURN 1
		CASE 1
			PRINTFORMW 想要变更的时候请再使用[UPDATE]
			RETURN 1
		CASE 2
			PRINTFORMW 明白了
			CFLAG:64:1000 = 1
			RETURN 1
		CASE 3
			IF !CFLAG:64:1001
				CFLAG:64:1001 = 1
			ELSE
				CFLAG:64:1001 = 0
			ENDIF
			PRINTFORMW 变更好了
	ENDSELECT
ENDIF
RETURN 1

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

	PRINTFORMW 「你就是萃香说的人类吗？」
	PRINTFORMDW %CALLNAME:MASTER%转过头、发出快活的声音的是一位女性
	PRINTFORMDW 和成年男性相同、甚至在此之上的高个子
	PRINTFORMDW 及腰程度的金色长发、顶起衣服凸显着存在的双峰
	PRINTFORMDW 以及、怒发冲冠的漂亮红角
	PRINTFORMDW 是鬼没错了……%CALLNAME:MASTER%稍微摆好了架势
	PRINTFORMW 「我是星熊勇儀。山之四天王之一」
	PRINTFORMW 「虽然这么说、但是我现在住在地底就是了……」
	PRINTFORMW 「嘛那种东西无所谓了」
	PRINTFORMW 「那家伙会对你另眼相看、也就是说你有与之相符的实力的咯？」
	PRINTFORMW 「我是为了和你一决胜负而来的」
	PRINTFORMDW 鬼这个种族胜负心很强
	PRINTFORMDW 这个名为星熊勇儀的鬼、看起来也是这样
	PRINTFORMW 「怎么样？当然是会接受的吧？」
	PRINTFORMDW %CALLNAME:MASTER%は……
	CALL ASK_M("接受", 1, "拒绝", 1,)
	SELECTCASE RESULT
		CASE 0
			PRINTFORMW 「是嘛！接受了嘛！」
			PRINTFORMDW %CALLNAME:TARGET%这么说着、将手中的杯子注满酒
			PRINTFORMW 「如果这里边有一滴滴出来的话、就算你赢了好了」
			PRINTFORMW 「如果不这样的话、大概就会打到其中一方再也站不起来了吧」
			PRINTFORMDW 对面提出这种不利的条件就说明是对自己身手相当有自信的吧
			PRINTFORMDW 现在说这个虽然已经晚了、但是真的应该接受吗……
			PRINTFORMW 「不需要准备运动什么的吧？」
			PRINTFORMW 「那就開始吧！」
			PRINTFORMDL ………
			PRINTFORMDL ……
			PRINTFORMDW …
			;你の戦闘力２以下
			IF ABL:MASTER:戦闘能力 <= 2
				PRINTFORMDW 完全称不上是什么比试
				PRINTFORMDW 仅仅只是%CALLNAME:TARGET%拳头放出的拳压、就让%CALLNAME:MASTER%一屁股摔在了地上
				PRINTFORMDW 想要站起来、但是太过恐惧导致膝盖用不上劲
				PRINTFORMDW 看着这样的%CALLNAME:MASTER%、%CALLNAME:TARGET%并没有嘲笑而是把手伸了过来
				PRINTFORMW 「来、要坐到什么时候赶紧站起来吧」
				PRINTFORMW 「哈哈、没想到在一拳打出去之前就结束了呐」
				PRINTFORMW 「说实话有点期待落空了……不过、我大概也理解了」
				PRINTFORMW 「怪不得萃香会对你刮目相看。普通人只会只会害怕着根本不敢接受挑战」
				PRINTFORMW 「不过你接受了挑战。只有这点就够了」
				PRINTFORMDW 刚刚的威压感像是骗人一般的消失了、%CALLNAME:TARGET%哈哈的笑着
				PRINTFORMW 「你的名字是？」
				CALL NAME_SET_K64
				PRINTFORMW 「%MASTERNAME:64%吗、我会记下的」
				PRINTFORMW 「下次再见的时候、就不比打架比喝酒吧」
				PRINTFORMW 「嘛、那方面我可不知道我能不能手下留情呐！」
				PRINTFORMDW 被%CALLNAME:TARGET%啪啪的拍了拍后背、导致%CALLNAME:MASTER%差点跌倒
				PRINTFORMDW 不断发抖的腿终于停了下来
				CALL CHANGE_CFLAG(2, 64, 100)
			;你の戦闘力５以下
			ELSEIF ABL:MASTER:戦闘能力 <= 5
				PRINTFORMW 「干得不错！居然能让我的酒洒出来呐」
				PRINTFORMDW 和精疲力尽的%CALLNAME:MASTER%相对的、是悠哉的喝着酒的%CALLNAME:TARGET%
				PRINTFORMW 「和约定好的一样、是我输了。确实值得萃香对你另眼相看」
				PRINTFORMW 「我还以为人类都是群胆小鬼……」
				PRINTFORMW 「看起来、还有些能看的家伙在」
				PRINTFORMDW %CALLNAME:TARGET%浮现出宛如有什么宝物失而复得一般的笑容…
				PRINTFORMW 「你的名字是？」
				CALL NAME_SET_K64
				PRINTFORMW 「我很中意你哦。你的名字我记下了」
				PRINTFORMW 「而且、你的话可以信赖的样子」
				PRINTFORMW 「你看、不是有句话是腕力强的家伙不会是坏人吗？」
				PRINTFORMDW %CALLNAME:MASTER%回答道『初次听说』、%CALLNAME:TARGET%哈哈的笑了起来
				PRINTFORMW 「哈哈哈哈、总有一天你也会懂的」
				PRINTFORMW 「总而言之请多指教了呐。%MASTERNAME:64%」
				PRINTFORMDW %CALLNAME:MASTER%诚惶诚恐的握住了%CALLNAME:TARGET%朝这边伸出的手……
				CALL CHANGE_CFLAG(2, 64, 300)
			;你の戦闘力６
			ELSE
				PRINTFORMW 「啊ー啊ー……好酒完全浪费了啊」
				PRINTFORMDW %CALLNAME:TARGET%被酒淋在头上、全身湿漉漉的
				PRINTFORMDW 但是、看起来却有些高兴的样子
				PRINTFORMW 「承认了、是我的完败」
				PRINTFORMW 「居然这么强、要重新审视你了啊」
				PRINTFORMW 「……你说我放水了？不不不不」
				PRINTFORMW 「中途開始就认真起来了」
				PRINTFORMW 「尽管如此还是输了…这是事实哦」
				PRINTFORMW 「你可以骄傲的挺起胸膛了」
				PRINTFORMW 「山之四天王中的一人、力之勇仪输给了你。值得骄傲哦」
				PRINTFORMDW 本来还以为她会赌气的不服输的%CALLNAME:MASTER%稍微有些泄气
				PRINTFORMW 「你的名字是？」
				CALL NAME_SET_K64
				PRINTFORMW 「我很中意你哦。你的名字我记下了」
				PRINTFORMW 「对了、可以把你的名字告诉地底的鬼们吗？」
				PRINTFORMW 「可能会有人来挑战你……嘛、以你的实力随便打的咯？」
				PRINTFORMDW 别開玩笑了……%CALLNAME:MASTER%这么拒绝了、%CALLNAME:TARGET%一边说着『别谦虚了』一边拍了拍%CALLNAME:MASTER%的后背
				PRINTFORMDW 收到了令人怀疑脊椎是不是要被拍断了的冲击、她在比试的时候到底是不是真的用了全力……
				CALL CHANGE_CFLAG(2, 64, 500)
			ENDIF
		CASE 1
			PRINTFORMW 「哈……是吗、太失望了」
			PRINTFORMW 「完全忘了人类就是这种生物」
			PRINTFORMDW 看起来让她失望了……
			PRINTFORMW 「为什么会在意这种人……萃香那家伙、到底在想些什么」
			PRINTFORMW 「……嘛、随便吧」
			PRINTFORMW 「你的名字是？」
			CALL NAME_SET_K64
			PRINTFORMW 「%MASTERNAME:64%…吗。就让我再观察你一阵子吧」
			PRINTFORMW 「说不定、你其实实在隐藏实力呢」
			PRINTFORMDW %CALLNAME:TARGET%一边说着『请多指教』一边拍了拍%CALLNAME:MASTER%的后背
			PRINTFORMDW ……相当的痛
	ENDSELECT
RETURN 1

;@K64_BEFORETRAIN
;一日の開始時、正確には来訪判定時に読み込む関数,使うときはコメントアウトを外すこと
;ここでCFLAG:XX:翌日来訪を設定して確実に来訪させたりTCVAR:XX:発情で朝っぱらからサカらせることもできる
;ただし「毎朝例外なく読み込まれる」ため、条件を設定しておくことが望ましい

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K64_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	PRINTFORMW 「啾……」
	PRINTFORMW 「呼呼呼、吓到了吗？」
	PRINTFORMW 「我喝醉了？ 木有那种事哟」
	PRINTFORMW 「还是说、我的吻…就那么大的酒味吗？」
	PRINTFORMDW 因为害羞而脸红的%CALLNAME:TARGET%望着%CALLNAME:MASTER%
	PRINTFORMW 「这是今天的谢礼……这么说也不太好」
	PRINTFORMW 「我想这么做。就是这样」
	PRINTFORMDW 这么说着、%CALLNAME:TARGET%转身走了起来
	PRINTFORMW
	PRINTFORMW 「喂、怎么了？ 别发呆了准备走吧？」
	PRINTFORMDW 找回自我的%CALLNAME:MASTER%赶紧朝%CALLNAME:TARGET%追了上去……
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K64_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に接受かどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORMW 「呐、呐」
		PRINTFORMW 「……那个…什么」
		PRINTFORMW 「我们俩、也认识很长时间了吧」
		PRINTFORMW 「所以那个……ぁ啊真是的！完全不像我」
		PRINTFORMDW %CALLNAME:TARGET%狠狠的挠着头
		PRINTFORMDW 然后、带着下定决心一般的表情看向%CALLNAME:MASTER%
		PRINTFORMW 「不知从何时開始、我被%MASTERNAME:64%吸引了」
		PRINTFORMW 「不是作为朋友、而是作为一个女人」
		PRINTFORMW 「新娘也好、恋人也好、情人什么的都可以」
		PRINTFORMW 「我、想成为%MASTERNAME:64%的女人。想让你只看我一个……」
		PRINTFORMW 「……之后的话、不用我说你也懂的吧？」
		PRINTFORMW 「……如果……」
		PRINTFORMW 「如果你对我没有那种感觉……我也不会埋怨你的」
		PRINTFORMW 「以鬼的荣耀发誓、绝对不会发生那种事」
		PRINTFORMW 「所以%MASTERNAME:64%。让我听听你的回答」
		PRINTFORMDW 说完、%CALLNAME:TARGET%就沉默起来
		PRINTFORMDW 看起来是在等待%CALLNAME:MASTER%的回答的样子……
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMDW %CALLNAME:TARGET%紧紧的抱住了接受了告白的%CALLNAME:MASTER%
		PRINTFORMW 「啊啊……」
		PRINTFORMW 「上次有这种感觉是什么时候了……」
		PRINTFORMDW %CALLNAME:TARGET%的拥抱稍微的用了点力、%CALLNAME:MASTER%全身的骨头都在悲鸣
		PRINTFORMW 「说实话我没想过能成功」
		PRINTFORMW 「只有腕力和酒量的我、到底有没有女人的魅力……」
		PRINTFORMW 「在这之前我们一个是人一个是鬼。如果告白的话会不会被觉得恶心而离我而去……」
		PRINTFORMW 「……但是、%MASTERNAME:64%接受了我」
		PRINTFORMW 「只是想想都高兴的的不得了」
		PRINTFORMDW 嘎吱！ %CALLNAME:MASTER%的身体发出了不可以发出的声音
		PRINTFORMW 「%MASTERNAME:64%……今后要永远在一起哦……啊嘞、%MASTERNAME:64%？」
		PRINTFORMW 「喂、喂？ %MASTERNAME:64%？」
		PRINTFORMW 「哇？！ 喂！ 胳膊朝奇怪的地方扭过去了？！」
		PRINTFORMW 「发生什么事了！？ %MASTERNAME:64%！？」
		PRINTFORMW 「别死啊！ 好不容易才成为了恋人、怎么可以在这里结束！」
		PRINTFORMW 「总之先把胳膊恢复成原样……看招！」
		PRINTFORMDW 嘎吱咕吱嘎吱！！！
		PRINTFORMDL ………
		PRINTFORMDL ……
		PRINTFORMDW …
		PRINTFORMDW 过了一会儿醒过来的%CALLNAME:MASTER%、安慰着不断道歉的%CALLNAME:TARGET%一起踏上了归路……
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「ッ……是这样、嘛……」
		PRINTFORMDW 听到%CALLNAME:MASTER%的回答的%CALLNAME:TARGET%稍微有些悲伤
		PRINTFORMDW 不断地握拳又舒展、不断回味着回答
		PRINTFORMDW 然后、下定决心一般的抬起了头
		PRINTFORMW 「……我明白%MASTERNAME:64%的意思了」
		PRINTFORMW 「不过……我是不会放弃的」
		PRINTFORMW 「说过的吧？关系不会改变」
		PRINTFORMW 「也就是说、我喜欢着%MASTERNAME:64%的心情也不会改变」
		PRINTFORMW 「不管要花多少时间、绝对要让你回心转意」
		PRINTFORMW 「所以、%MASTERNAME:64%你就洗好脖子等着吧？」
		PRINTFORMDW 仿佛要打架一般的台词。%CALLNAME:MASTER%这么吐槽了之后%CALLNAME:TARGET%像往常一样大笑起来
		PRINTFORMW 「啊哈哈哈哈哈！是的！确实呐！」
		PRINTFORMW 「这个呐、是为了让%MASTERNAME:64%回心转意的属于我的战斗」
		PRINTFORMW 「我是有人找茬就打回去的性格%MASTERNAME:64%也知道的吧？」
		PRINTFORMDW 不知不觉间，自己好像给%CALLNAME:TARGET%找茬了的样子
		PRINTFORMW 「就是这样、以后也要拉我一起去约会哦」
		PRINTFORMW 「在%MASTERNAME:64%接受之前、不管多少次我都要传达我的想法！」
		PRINTFORMDW 不管什么事如果和鬼刚上都会变得很麻烦
		PRINTFORMDW 完全体会到这句话的意思了
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_SPEVENT_K64_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 「……啊啊、已经到了吗」
			PRINTFORML 「总感觉还不满足呐、接下来要不要去哪里喝一杯？」
			PRINTFORMDW %CALLNAME:MASTER%回答道『请饶了我吧』之后%CALLNAME:TARGET%笑着回复『開玩笑的啦』
		;思慕
		ELSEIF TALENT:思慕
			PRINTFORML 「今天真開心啊」
			PRINTFORMW 「还会再来邀请我吗？」
		;それ以外
		ELSE
			PRINTFORML 「还算蛮開心的」
			PRINTFORMW 「偶尔这样也还算不错」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「我明白了。之前的各种不愉快就让他过去吧」
		PRINTFORMDL 一时间还以为会被怎样呢、看起来已经原谅了的样子
		PRINTFORML 「怎么了、看起来这么開心」
		PRINTFORML 「嘛算了……如果、下次还敢搞同样的事的话……」
		PRINTFORML 「到时候的下场……不用我说你也知道的吧？」
		PRINTFORMDW 临别之际、看着松了一口气的%CALLNAME:MASTER%被%CALLNAME:TARGET%凶狠的警告了一下……
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「…你可真有毅力啊」
		PRINTFORML 「不仅惹怒了鬼、还敢邀请鬼去约会」
		PRINTFORML 「你到底在企图些什么、差不多该说出来了吧？」
		PRINTFORMDL 约会的归途、一脸无语的%CALLNAME:TARGET%这么问了出来
		PRINTFORMDL 『想要和好』%CALLNAME:MASTER%这么说明了之后、%CALLNAME:TARGET%呆了一下
		PRINTFORML 「……啊哈哈哈哈！」
		PRINTFORML 「真的……真是个有趣的家伙啊、%MASTERNAME:64%」
		PRINTFORMDW %CALLNAME:TARGET%这么说着、稍微有些開心的朝前踏出了步伐……
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「……哈、真是的」
		PRINTFORML 「本来还想揍你一拳呢……」
		PRINTFORMDL %CALLNAME:TARGET%跟在后面、嘀咕着什么恐怖的事情……
		PRINTFORMW 「嘛、算了……」
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K64_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF !TCVAR:64:今天有否见面
			;恋慕
			IF TALENT:恋慕
				PRINTFORML 「%MASTERNAME:64%！ 喂、快来这边！」
				PRINTFORMDL %CALLNAME:MASTER%打过招呼后、%CALLNAME:TARGET%開心的朝这边招着手
				PRINTFORMW 「今天要干什么？ %MASTERNAME:64%想干什么说说看」
			;思慕
			ELSEIF TALENT:思慕
				PRINTFORML 「哦、%MASTERNAME:64%。没想到你会来这里啊」
				PRINTFORMW 「本来就在想差不多该找你露个脸了、省得我去找了」
			;それ以外
			ELSE
				PRINTFORML 「哦呀、这不是%MASTERNAME:64%嘛」
				PRINTFORMW 「找我有什么事吗？」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF !TCVAR:64:今天有否见面
			;酒くれるイベント
			IF ABL:親密 >= 3 && !TALENT:妊娠 && !TALENT:育児中 && !RAND:5
				PRINTFORML 「哦、找到了找到了」
				PRINTFORMDL 看到了%CALLNAME:MASTER%的%CALLNAME:TARGET%拿着酒瓶走了过来
				PRINTFORML 「拿到了不错的酒来着……一个人喝太寂寞了」
				PRINTFORMW 「可以的话要不要一起来喝？」
				CALL GET_ITEM("鬼殺酒", 1, 1)
			;恋慕
			ELSEIF TALENT:恋慕
				PRINTFORML 「哦哦！%MASTERNAME:64%！ 居然在这里吗！」
				PRINTFORMW 「看不到你人影搞得我好担心啊！」
			;思慕
			ELSEIF TALENT:思慕
				PRINTFORML 「哟！ %MASTERNAME:64%」
				PRINTFORMW 「因为很闲来着、过来玩啦」
			;それ以外
			ELSE
				PRINTFORMW 「哦、%MASTERNAME:64%。打扰了哦」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが浴室に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「哦、%MASTERNAME:64%。水温如何？」
		PRINTFORMDL %CALLNAME:TARGET%连前面都不遮就走进了池子
		PRINTFORML 「怎么了这副表情？」
		PRINTFORMW 「我们也不是看个裸体就害羞的关系了吧？」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが浴室に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML 「哦、抱歉呐。没想到有人」
		PRINTFORML 「――啊？可以的话一起洗？」
		PRINTFORML 「也不是不行……不过今天还是算了」
		PRINTFORMDW %CALLNAME:TARGET%边说着「请慢慢享受」离開了
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが浴室に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML 「什么啊、还在洗啊？」
		PRINTFORMW 「后面还有人呢、赶紧出去」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		IF !TCVAR:64:今天有否见面
			;親密３以上で妊娠も育児もしてない場合は一定確率で酔ってる
			IF ABL:親密 >= 3 && !RAND:5 && (!TALENT:妊娠 || !TALENT:育児中)
				PRINTFORML 「嗯～？ 啊！这不是%MASTERNAME:64%嘛！」
				PRINTFORML 「抱歉呐、刚刚还在喝酒。一瞬间没分清是谁」
				PRINTFORML 「对了、不是说迟到罚酒三杯吗、接下来要一起喝吗？」
				PRINTFORMW 「不需要客气！酒的话要多说有多少！」
				BASE:酒気 += 2000
				TALENT:64:心情 = 1
			;恋慕
			ELSEIF TALENT:恋慕
				PRINTFORML 「哦哦！这不是%MASTERNAME:64%嘛！」
				PRINTFORMW 「来这里有什么事吗」
			;思慕
			ELSEIF TALENT:思慕
				PRINTFORML 「%MASTERNAME:64%、来得正好」
				PRINTFORMW 「虽然没有茶、但是酒要多少有多少」
			;それ以外
			ELSE
				PRINTFORML 「啊啊、是你啊」
				PRINTFORMW 「居然在这里遇见可真巧啊」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他キャラと约会中に遭遇した
	;ARG:1に约会的对象
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		IF !TCVAR:64:今天有否见面
			;一回だけ地底案内
			IF CFLAG:MASTER:現在位置 / 100 == 9 && !CFLAG:64:1003
				PRINTFORML 「哦呀、两位、决定好要去哪里了吗？」
				PRINTFORML 「――っ虽然这么说、男女两个人靠在一起要去的地方只有一个不是吗」
				PRINTFORML 「温泉在那边。旅馆在这边。要买土产的话有很多店会宰客请小心一点哦」
				PRINTFORMW 「那么碍事的家伙就先走了哦。请尽情享受怨灵聚集的最凶最强的温泉街」
				CFLAG:64:1003 = 1
			;通常
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「哦、这不是%MASTERNAME:64%吗。在幽会吗？」
						PRINTFORML 「哈哈哈哈！ 也犯不着摆出那种表情！」
						PRINTFORML 「我也不会没眼色到打扰你们两个的亲热」
					CASE 1
						PRINTFORML 「关系这么好是好事」
						PRINTFORML 「好好享受吧。」
					CASE 2
						PRINTFORML 「哦呀、%MASTERNAME:64%和……额」
						PRINTFORML 「打扰你们抱歉了。下次再来说说你们的事吧」
				ENDSELECT
				PRINTFORMDW %CALLNAME:TARGET%这么说着、挥了挥手就离開了
			ENDIF
		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_K64_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
			GOTO YUGI_OHAYO
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF !TALENT:妊娠 && !TALENT:育児中 && !RAND:5
				PRINTFORML 「早上好、睡得好吗？」
				PRINTFORML 「本来找%MASTERNAME:64%有事的、结果你还睡着」
				PRINTFORML 「所以就在这里喝酒等你起来了」
				PRINTFORMDL %CALLNAME:TARGET%的身边丢着好几个酒瓶
				PRINTFORMDW ……之后的扫除看起来会很麻烦
				BASE:酒気 += 500
			ELSE
				PRINTFORML 「早上好！ 终于睡醒了吗？」
				PRINTFORMW 「……っ啊、还在打瞌睡啊？ 来、喝点水」
				PRINTFORMDW %CALLNAME:MASTER%向%CALLNAME:TARGET%道谢后、接过水喝了起来
				PRINTFORMDW 啊ーーーッッ！！！ 本来以为是水、结果居然是酒！
				PRINTFORML 「啊哈哈哈哈！ 好好清醒起来了呐！」
				PRINTFORMW 「对人类来说有点烈的酒。拿来醒觉很不错吧？」
				BASE:MASTER:酒気 += 100
			ENDIF
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		$YUGI_OHAYO
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「啊啊、起来了吗」
				PRINTFORMW 「要换的衣服已经准备好了。赶紧去洗脸吧」
			CASE 1
				PRINTFORML 「嗯、早上好」
				PRINTFORML 「感觉你差不多要醒了。早饭已经做好了哦」
				PRINTFORMDL 听着%CALLNAME:MASTER%那仿佛妻子一般的发言、%CALLNAME:TARGET%害羞的红起了脸
				PRINTFORMW 「被人这么说就会害羞啊……不过、也挺好的」
			CASE 2
				PRINTFORML 「呼呼、终于醒了吗？」
				PRINTFORMDL %CALLNAME:MASTER%刚一睁開眼就和%CALLNAME:TARGET%对上了眼睛
				PRINTFORML 「比起这个、能先放開吗？」
				PRINTFORML 「我倒还好……被人看到就有点糟糕了不是吗？」
				PRINTFORMDL 看起来、不知何时把%CALLNAME:TARGET%当抱枕睡着了
				PRINTFORMW 「真是的、居然把鬼当抱枕睡觉…古今東西、也就只有%MASTERNAME:64%了吧」
		ENDSELECT
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「呼……嘶ー……」
		PRINTFORMDL %CALLNAME:TARGET%还在睡的样子
		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
		;共通
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「呼啊～……睡的真好」
				PRINTFORMDL %CALLNAME:TARGET%『嗯~』的伸了个懒腰、拍了拍脸
				PRINTFORMW 「好、起床吧」
			CASE 1
				PRINTFORML 「啊……%MASTERNAME:64%、起来了吗……」
				PRINTFORML 「……我再稍微睡一会儿……」
				PRINTFORMDL %CALLNAME:MASTER%抓住了再次发出鼾声的%CALLNAME:TARGET%的角、不停的摇着脸
				PRINTFORMW 「呜啊、等！ 起来了！起来了赶紧住手！」
			CASE 2
				PRINTFORML 「呼……ん、ぁぁ……已经早上了……？」
				PRINTFORMDL 打了个哈欠的%CALLNAME:TARGET%醒了过来
				PRINTFORMDL 衣服大開大合乱糟糟的、%CALLNAME:MASTER%不知道眼睛要放哪里才好
				PRINTFORML 「呼啊～～……んー、ふぅ……」
				PRINTFORMW 「好、差不多起床吧」
		ENDSELECT
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

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 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「……嗯ー……醒着的哦ー……」
				PRINTFORMDW %CALLNAME:TARGET%看起来很困的样子
			CASE 1
				PRINTFORML 「…ッ、咕…眼皮好重……」
				PRINTFORMDW 就算是以力量自满的%CALLNAME:TARGET%也没有锻炼眼皮的样子
			CASE 2
				PRINTFORML 「……嗯、啊……什么？」
				PRINTFORMW 「抱歉呐……稍微、有点困了……」
		ENDSELECT
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（～は眠っている）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		SELECTCASE RAND:5
			CASE 0
				PRINTFORML 「呼……噜……」
				PRINTFORMDW %CALLNAME:TARGET%发出了大叔一般的鼾声
			CASE 1
				PRINTFORML 「嘶……嘶……」
				PRINTFORMDW %CALLNAME:TARGET%安稳的睡着觉
			CASE 2
				PRINTFORML 「……%MASTERNAME:64%……zzz」
				PRINTFORMDW 被梦话叫道名字、%CALLNAME:MASTER%吓了一跳
			CASE 3
				PRINTFORML 「再来……酒……」
				PRINTFORML 「……………咕」
				PRINTFORMDW 在梦里参加宴会了吗……
			CASE 4
				PRINTFORML 「呼噶………」
				PRINTFORMDL 突然间%CALLNAME:TARGET%的鼾声停止了
				PRINTFORMDW ……过了一小会又重新開始了
		ENDSELECT
		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 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;酒でダウン
		IF BASE:MASTER:酒気 >= MAXBASE:MASTER:酒気
			IF ARG:1
				;自室でダウン,（～が【MASTER】をベッド（被窝）へと運んでくれた…）
				PRINTFORML 「嘿咻嘿咻……呼」
				PRINTFORML 「真是的、麻烦的家伙」
				PRINTFORMW 「这种事明明应该是你来干才对的」
			ELSE
				;部屋まで運ばれる,（～が【MASTER】を私室へと運んでくれた…）
				PRINTFORML 「喂喂、还好吗？」
				PRINTFORML 「――不行了啊这。完全没有意识了」
				PRINTFORMW 「真没办法啊、只能我来搬了……」
			ENDIF
		;体力切れでダウン
		ELSE
			IF ARG:1
				;自室でダウン,（～が【MASTER】をベッド（被窝）へと運んでくれた…）
				PRINTFORML 「哦……还好吗？」
				PRINTFORML 「不要太勉强了哦」
				PRINTFORMW 「来、我来搀着你」
			ELSE
				;部屋まで運ばれる,（～が【MASTER】を私室へと運んでくれた…）
				PRINTFORML 「哦……是哪里不舒服吗？」
				PRINTFORMDL %CALLNAME:TARGET%担心的看着%CALLNAME: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_K64_4(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;軽く会釈して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;何回も表示されたら邪魔なので１日１回
		IF !TCVAR:64:350
			;恋慕
			IF TALENT:恋慕
				PRINTFORML 「%MASTERNAME:64%、看起来很忙啊」
				PRINTFORML 「有什么我能帮忙的吗？」
				PRINTFORMW 「…没关系？那就好」
			;思慕
			ELSEIF TALENT:思慕
				PRINTFORML 「喂ーい、%MASTERNAME:64%。你要去哪里？」
				PRINTFORML 「有空的话不如一起……啊？现在很忙？」
				PRINTFORMW 「那就算了、下次再一起喝酒吧」
			;それ以外
			ELSE
				PRINTFORML 「哦」
				PRINTFORMDW 勇儀轻轻的举起手目送%CALLNAME:MASTER%离開
			ENDIF
			TCVAR:64:350 = 1
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMDL 勇儀好像并没有注意到这边
		PRINTFORMDW 特意打招呼的话也蛮麻烦的、%CALLNAME:MASTER%无视勇仪离開了这里……
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;念のため
	IF !CFLAG:诶嘿嘿
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;霊夢が入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
			PRINTFORML 「啊啊、霊夢殿下啊」
			PRINTFORMW 「找我们有什么事吗？」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;萃香が入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 10
			PRINTFORML 「什么啊、这不是萃香吗」
			PRINTFORMW 「你还是那么摇摇晃晃的啊」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;魔理沙が入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 11
			PRINTFORML 「哦呀、魔理沙殿下啊」
			PRINTFORMW 「现在稍微有点忙呐、没办法陪你一起哦」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;天狗勢が入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && (ARG == 29 || ARG == 42 || ARG == 64)
			PRINTFORML 「哦呀哦呀、我还以为是谁呢……」
			PRINTFORML 「没想到居然是天狗呐」
			PRINTFORMW 「我还以为你们会故意避開和我们鬼的接触呢……」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;華扇が入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 43
			PRINTFORML 「哦哦、華扇啊。居然在这里遇到了啊」
			PRINTFORML 「偶尔也想和老朋友们聚在一起喝一杯呐」
			PRINTFORMW 「嘛、你也应该不会来吧」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;覚が入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 49
			PRINTFORML 「嗯？ 居然在这里遇见可真稀奇」
			PRINTFORML 「怎么了啊那副表情？」
			PRINTFORMW 「你是说我最好不要和这家伙呆在一起吗？」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;荷取が入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 51
			PRINTFORML 「嗯？ 啊啊、这不是河童吗」
			PRINTFORMW 「也犯不着那么害怕吧、我也没想着重新回到山里面去」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;琶露西・琪斯美・山女が入ってきた
		;琶露西が嫉妬オーラをぶつけてきても全く気にしなさそう
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && (ARG == 60 || ARG == 83 || ARG == 84)
			PRINTFORML 「啊ー、是你啊」
			PRINTFORML 「抱歉现在有点忙呐」
			PRINTFORMW 「下次再来补偿你吧」
			RETURN 1
		ENDIF
		;其他（キャラ指定無
		PRINTFORML 「有谁来了的样子」
		PRINTFORMW 「嘛、也无所谓就是了」
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		;霊夢
		IF ARG == 1
			PRINTFORML 「哦呀哦呀、很热闹啊」
			PRINTFORML 「霊夢殿下、你原来是这种巫女啊？」
			PRINTFORMDW %CALLNAME:TARGET%捉弄着灵梦……
		;萃香
		ELSEIF ARG == 10
			PRINTFORML 「哦、果然是萃香啊」
			PRINTFORML 「老远就能听到你的娇喘了哦？」
			PRINTFORMW 「嘛我倒是没所谓。只是觉得应该过来说一下」
		;魔理沙
		ELSEIF ARG == 11
			PRINTFORML 「我还以为是谁原来是魔理沙殿下吗」
			PRINTFORML 「因为听到了相当可爱的声音、还以为是别的家伙呢」
			PRINTFORMDW %CALLNAME:TARGET%嘻嘻的笑着……
		;天狗勢
		ELSEIF (ARG == 29 || ARG == 42 || ARG == 64)
			PRINTFORML 「天狗吗。又在玩弄人类吗？」
			PRINTFORML 「嘛、也没什么不好。让我看到了好东西呐」
			PRINTFORMDW %CALLNAME:TARGET%做着按下相机快门的手势
		;華扇
		ELSEIF ARG == 43
			PRINTFORML 「这可真是看到了稀奇的东西」
			PRINTFORML 「怎么样？ 那家伙的那玩意儿好吃吗？」
			PRINTFORMW 「哈哈哈哈哈！ 你这家伙果然捉弄起来很有意思啊！」
		;覚
		ELSEIF ARG == 49
			PRINTFORML 「喂喂、读别人心什么的」
			PRINTFORML 「多少为被读心的那一方着想一下吧」
			PRINTFORMW 「也就是说、我现在很烦躁。既然能读心的话就知道的吧？」
		;荷取
		ELSEIF ARG == 51
			PRINTFORML 「什么啊、河童啊」
			PRINTFORML 「听说你很忙来着、原来是在干这个的吗？」
			PRINTFORMW 「嘛、确实很忙。打扰到你们了吗？」
		;琶露西・琪斯美・山女
		ELSEIF (ARG == 60 || ARG == 83 || ARG == 84)
			PRINTFORML 「哦ー哦ー、在搞了在搞了！」
			PRINTFORML 「虽然我也想混进来不过……」
			PRINTFORMDW %CALLNAME:TARGET%用看到了什么有趣的东西的表情看向这边
		;それ以外
		ELSE
			PRINTFORML 「听到有动静就过来看看结果……」
			PRINTFORML 「精力旺盛是好事、不过也要稍微调一下时间和场所哦？」
			PRINTFORMW 「说不定会被人看到哦」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 「还以为你去哪里了、结果居然在……」
			PRINTFORML 「%MASTERNAME:64%是我的东西。快点还回来吧！」
			PRINTFORMDW 像是要夺回%CALLNAME:MASTER%一样%CALLNAME:TARGET%加入进来！
		;それ以外
		ELSE
			PRINTFORML 「什么啊、再做很有趣的事情呐」
			PRINTFORMW 「也加我一个吧！」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML 「啊ー、哪个、抱歉了」
		PRINTFORML 「没想着偷看的」
		PRINTFORMDW 勇儀挠着头、很尴尬的离開了
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		;霊夢
		IF ARG == 1
			PRINTFORML 「为什么在这里……无所谓的吧？」
			PRINTFORML 「对吧？ %MASTERNAME:64%」
			PRINTFORMDW 虽然在征求我的意见但……
		;萃香
		ELSEIF ARG == 1
			PRINTFORML 「啊？ 啊啊萃香啊」
			PRINTFORML 「你也要来吗？」
			PRINTFORMDW %CALLNAME:TARGET%朝萃香招手
		;魔理沙
		ELSEIF ARG == 10
			PRINTFORML 「哈哈哈哈！ 没事吧？ 脸变得很红哦？」
			PRINTFORML 「对小孩子来说稍微有点刺激了吗？」
			PRINTFORMDW %CALLNAME:TARGET%打趣的看着慌张的魔理沙的反应……
		;天狗勢
		ELSEIF (ARG == 29 || ARG == 42 || ARG == 64)
			PRINTFORML 「什么啊、在偷窥吗？」
			PRINTFORML 「我最讨厌天狗的这点了」
			PRINTFORMDW %CALLNAME:TARGET%恶狠狠的瞪着%CALLNAME:ARG%……
		;華扇
		ELSEIF ARG == 43
			PRINTFORML 「你问我在做什么……一看就知道吧？ 在做爱哟」
			PRINTFORML 「对了、你也要加进来吗？ 很舒服哦」
			PRINTFORMDW %CALLNAME:TARGET%用劝说一起洗澡一样的轻佻口气劝诱着華扇一起乱交……
		;覚
		ELSEIF ARG == 49
			PRINTFORML 「一直以为你是个没感情的人、没想到能到这种程度」
			PRINTFORML 「稍微涌起了点亲近感啊。要加进来吗？」
			PRINTFORMDW 觉冷冷的看着这么说着的%CALLNAME:TARGET%
		;荷取
		ELSEIF ARG == 51
			PRINTFORML 「嗯？有谁在吗？」
			PRINTFORML 「河童？ 个子太矮了完全没有注意到啊」
			PRINTFORMDW %CALLNAME:TARGET%完全不在意的样子……
		;琶露西・琪斯美・山女
		ELSEIF (ARG == 60 || ARG == 83 || ARG == 84)
			PRINTFORML 「找这家伙有事吗？」
			PRINTFORML 「抱歉呐、现在我再用着呢」
			PRINTFORMDW 明明被别人看到了、%CALLNAME:TARGET%却依旧不放開%CALLNAME:MASTER%
		;それ以外
		ELSE
			PRINTFORML 「偷窥可不是什么好兴趣」
			PRINTFORML 「还是说、想要加进来一起呢？」
			PRINTFORMDL %CALLNAME:TARGET%朝目击者招着手
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 「不会把%CALLNAME:MASTER%交给我？ 啊、真敢说啊」
			PRINTFORML 「我这边才是不会交给你」
			PRINTFORMDL %CALLNAME:TARGET%斗志高昂的主张着%CALLNAME:MASTER%的所有权
			PRINTFORMDW ……看起来有的忙了
		;思慕
		ELSEIF TALENT:思慕
			PRINTFORML 「呼呼、看起来要有趣起来了」
			PRINTFORMW 「%MASTERNAME:64%也做好觉悟吧」
		;それ以外
		ELSE
			PRINTFORML 「哦、可以哦」
			PRINTFORMW 「我可是很欢迎的哦」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML 「啊ー……好像做了坏事呐」
		PRINTFORMW 「嘛、过去的事就过去吧。来、继续吧！」
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORMW 「这个、是你的东西吗？」
		PRINTFORMDL %CALLNAME:MASTER%拿着的胖次被夺走了
		PRINTFORMDW 赶紧解释说『这是误会』的时候、被%CALLNAME:TARGET%狠狠的瞪了
		PRINTFORMW 「我再问一次」
		PRINTFORMW 「这个、是你的东西吗？」
		PRINTFORMDW ………………
		PRINTFORMW 「……嘛、算了」
		PRINTFORMW 「安心吧、我没想和某爱说教的阎魔大人一样教训你半天」
		PRINTFORMW 「这个由我还给本来的主人。没有意见吧？」
		PRINTFORMDW 面对不容分说的气势、%CALLNAME:MASTER%只能惊慌的点着头……
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;推倒た
;==================================================
@M_KOJO_EVENT_K64_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 「哦呀、不进行抵抗呐」
			PRINTFORMW 「也好、就让我随心所欲的来搞了哦」
			PRINTFORMDL %CALLNAME:TARGET%脱下了%CALLNAME:MASTER%的衣服
			PRINTFORMDW 她的手法十分粗暴、已经等不及想要和%CALLNAME:MASTER%做爱了的样子
			PRINTFORML 「桀桀桀、硬成这个样子了……」
			PRINTFORMW 「你很期待这样的吧？」
			PRINTFORMDL 和刚才的粗暴完全不同、纤细的手法温柔的抚摸着%CALLNAME:TARGET%的下体
			PRINTFORMDW 作为刚才的问题的回答，不断跳动着的男根的前端開始流出忍耐汁
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML 「太突然了？ 没什么不好的吧」
			PRINTFORMW 「我已经要忍不住了」
			PRINTFORMDL %CALLNAME:TARGET%不断的揉弄着%CALLNAME:MASTER%的头
			PRINTFORMDW 沉醉在%CALLNAME:TARGET%的宠爱中的%CALLNAME:MASTER%轻轻的吐出气息……
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;抜け出した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML 「就那么讨厌吗？」
			PRINTFORML 「嘛、行吧」
			PRINTFORMDW %CALLNAME:TARGET%很干脆的放開了%CALLNAME:MASTER%
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML 「嘛、就这样放过你吧」
			PRINTFORML 「再这样下去我也不知道我接下来会干出来什么呐」
			PRINTFORMDW %CALLNAME:TARGET%整理着乱糟糟的衣服……
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML 「唔ー嗯、我还没有完全满足地说……」
			PRINTFORMW 「嘛、算了」
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;摆脱失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;随便状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML 「喂喂、不是你说的随便我吗？」
			PRINTFORML 「一言既出驷马难追、是男人的话就做好觉悟吧」
			PRINTFORMDL %CALLNAME:TARGET%好像要榨干%CALLNAME:MASTER%的样子
			PRINTFORMDW ……还能不能活着回去了啊
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML 「哦呀、我可还没有满足的哦」
			PRINTFORML 「乖乖的被我玩吧！」
			PRINTFORMDW 被两眼冒光的勇仪认真的压制着、%CALLNAME:MASTER%只能放弃了挣扎
			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_K64_11(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「哈！」
		PRINTFORMDL 啪的一声！澡桶砸到了%CALLNAME:MASTER%的头上！
		PRINTFORML 「……嗯？什么啊、原来是%MASTERNAME:64%啊」
		PRINTFORML 「偷窥可不是什么好爱好、差不多得了哦？」
		PRINTFORMDL %CALLNAME:TARGET%光着身子站在前面笑着
		PRINTFORMDW %CALLNAME:MASTER%将这副光景印在脑中后赶紧溜了出去……
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「哦、%MASTERNAME:64%。你也是来泡澡的吗？」
		;恋人
		IF TALENT:恋人
			PRINTFORML 「明明说一声就可以一起来泡的说、真是见外」
			PRINTFORMW 「都是恋人了的说、让我来给你擦背吧」
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMDL %CALLNAME:TARGET%这么说着、给%CALLNAME:MASTER%空出了一段空间
			PRINTFORML 「对了、要让我来给你擦背吗？」
			PRINTFORMW 「不用了？呼呼、不用客气哟！」
		;それ以外
		ELSE
			PRINTFORMDL 即使%CALLNAME:MASTER%进来了也没什么反应的的样子
			PRINTFORMDL 那丰满的欧派漂浮在水中、随着波纹摇来摇去……
			PRINTFORMW 「……？ 你准备傻站到什么时候赶紧进来啊」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;寝床に忍び込み
;==================================================
@M_KOJO_EVENT_K64_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_K64_13(ARG,ARG:1)
;口上主はTARGET
;ARG:1に残っている工作量
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;工作開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 「那么、差不多该出发了」
			PRINTFORML 「对了、我要去喝酒%MASTERNAME:64%也一起来吗？」
			PRINTFORML 「我来给你倒酒、喝酒的人越多越好的咯」
			PRINTFORML 「嘛、什么时候回心转意的话就来吧。地点在博丽神社那边」
		;それ以外
		ELSE
			PRINTFORML 「哦、差不多该走了啊」
			PRINTFORML 「我接下来准备去喝酒。可以的话要不要一起来」
			PRINTFORML 「地点在博丽神社那边」
		ENDIF
		PRINTFORMDW %CALLNAME:TARGET%不知何时背上了准备好的酒桶、踏着轻松的步伐朝博丽神社移动了
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		SELECTCASE RAND:10
			CASE 0
				PRINTFORML 「总觉得好像一直都是我在喝的样子啊……」
				PRINTFORML 「好不容易来一次你也多喝点啊」
				PRINTFORMDW %CALLNAME:MASTER%被%CALLNAME:TARGET%强硬的灌了不少酒
				BASE:MASTER:酒気 += 200
			CASE 1
				PRINTFORML 「嗯、还很能喝呐」
				PRINTFORML 「呐、能帮我把那边的酒递过来吗？」
				PRINTFORMDL %CALLNAME:TARGET%的喝酒完全停不下来
				PRINTFORMDW 明明换做普通人早就喝翻了的量，但是对她来说完全不值一提
			CASE 2
				PRINTFORMDL %CALLNAME:TARGET%一口气喝完了鬼杀酒、忍耐着胸中的炙热啪啪的拍着大腿
				PRINTFORMW 「咕～哈……这么强的酒劲的话果然还是有点吃力呐……」
			CASE 3
				PRINTFORML 「嗯咕、嗯咕……」
				PRINTFORML 「呼哈啊～ッッ！！！」
				PRINTFORMDL %CALLNAME:TARGET%仿佛喝水一样的灌着酒……
				PRINTFORMDW 看着这勇猛的喝法、%CALLNAME:MASTER%也不由得稍微喝多了一些
				BASE:MASTER:酒気 += 50
			CASE 4
				PRINTFORML 「这个还剩……一半」
				PRINTFORML 「这边这个……空了、这个也空了」
				PRINTFORMDW %CALLNAME:TARGET%不断窥视着散落一地的酒瓶……
			CASE 5
				PRINTFORML 「喂、别发呆了你也来喝啊！」
				PRINTFORMDL %CALLNAME:TARGET%不断的将酒注入杯中
				PRINTFORMDL %CALLNAME:MASTER%拒绝不掉、只好一口气喝光了
				PRINTFORMW 「哈哈哈哈！真是不错的喝法！」
				BASE:MASTER:酒気 += 200
			CASE 6
				PRINTFORML 「哦、这个里边还有剩」
				PRINTFORML 「额ー嗯……这个应该怎么读……？」
				PRINTFORMDW %CALLNAME:TARGET%盯着洋酒瓶上的文字
			CASE 7
				PRINTFORML 「慢慢的品尝虽然也不错……」
				PRINTFORMDW %CALLNAME:TARGET%朝酒杯注大量的酒，一口气喝光了
			CASE 8
				PRINTFORML 「说到好喝的酒的话、果然还得配这个」
				PRINTFORMDW %CALLNAME:TARGET%很開心的品尝着下酒菜
			CASE 9
				PRINTFORML 「嗯？ 这是什么、乙醇？」
				PRINTFORML 「emmmm……嗯！？」
				PRINTFORMW 「噶～～～ッッ！！！ 这个可真有劲！」
		ENDSELECT
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;工作結束
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 「呼～……稍微有点喝多了吗……？」
			PRINTFORMDL 满面赤红的%CALLNAME:TARGET%扑了过来
			PRINTFORML 「一股酒臭？哈哈、因为刚刚在喝酒嘛」
			PRINTFORMW 「稍微这样抱一会儿，醒一下酒……」
		;それ以外
		ELSE
			PRINTFORML 「呼哈～！ 喝爽了喝爽了！」
			PRINTFORMDL 走廊上摆满了酒瓶和木桶，连下脚的地方都没有的程度
			PRINTFORMDL %CALLNAME:MASTER%总之先收拾了一下
			PRINTFORML 「哦、居然帮我收拾，很机灵嘛」
			PRINTFORMW 「有你这样的在的话喝起酒来酒轻松多了」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

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

	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		PRINTFORML 「哦！ 拿着很好吃的东西啊」
		PRINTFORMDL 在%CALLNAME:MASTER%转个身的功夫、勇儀就開始吃了起来
		PRINTFORML 「不可以擅自吃？ 反正有这么多呢、别那么见外啦」
		PRINTFORML 「嗯、这可真好吃！ 再吃最后亿口……」
		PRINTFORMDL 仿佛再吃下酒菜一样不断的朝嘴里送着食物
		PRINTFORMW
		PRINTFORML 「哈～……吃饱了吃饱了……」
		PRINTFORMDL 最后一口吃完了的勇仪满足的摸了摸自己的肚子
		PRINTFORMDW 难得准备的料理全部消失在了鬼的胃袋里了……
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;MASTERが推倒た
;==================================================
@M_KOJO_EVENT_K64_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 CFLAG:睡眠
			PRINTFORML
			RETURN 1
		;危険日＆危険日生Ｈ解禁済＆非妊娠＆口服避孕薬未使用＆膣内精液１以上
		ELSEIF CFLAG:900 == 7 && CFLAG:允许无套 >= 2 && !TALENT:妊娠 && !TCVAR:口服避孕薬 && 充填率(TARGET,1) > 0
			PRINTFORML 「%MASTERNAME:64%的种子、我收下了哟」
			PRINTFORML 「剩下的就是等待了……虽然这么说、真的能怀上吗」
			PRINTFORMDL 嘛、短时间内不会知道不用你说我也明白
			PRINTFORML 「嘛、慢慢等就是了。如果这次没中的话、再来一次就是了」
			;恋慕
			IF TALENT:恋慕
				PRINTFORML 「……对吧？」
				PRINTFORMDW %CALLNAME:TARGET%浮现出淫靡的表情、隔着衣服不断抚摸着%CALLNAME:MASTER%……
			;それ以外
			ELSE
				PRINTFORML 「哈哈、这么搞得好像我期待怀孕一样了」
				PRINTFORMDW 行為的热度也冷却了、%CALLNAME:TARGET%完全恢复成了平时的状态
			ENDIF
		;通常
		ELSE
			;恋慕
			IF TALENT:恋慕
				;欲情のパラメーターが１０未満
				IF PALAM:欲情 < PALAMLV:10
					PRINTFORML 「舒服了吗？」
					PRINTFORML 「――呼呼。那就好」
					PRINTFORMDW 对于%CALLNAME:MASTER%的回答%CALLNAME:TARGET%露出了满足的笑容
				;欲情のパラメーターが１５未満
				ELSEIF PALAM:欲情 < PALAMLV:15
					PRINTFORML 「呼……借你肩膀用一用」
					PRINTFORMDL %CALLNAME:TARGET%靠在了%CALLNAME:MASTER%的肩膀上
					PRINTFORMDW 一时间、两人沉默着沉浸在余韵之中……
				;欲情のパラメーターが最大
				ELSE
					PRINTFORML 「哈…在这种事情上我完全比不过%MASTERNAME:64%啊」
					PRINTFORML 「对此感觉良好的我也确实是……」
					PRINTFORMDW 被%CALLNAME:MASTER%抚摸着头发的%CALLNAME:TARGET%稍微闭上了眼睛……
				ENDIF
			;それ以外
			ELSE
				;欲情のパラメーターが１０未満
				IF PALAM:欲情 < PALAMLV:10
					PRINTFORML 「差不多还算開心。作为消遣时间来说不错的」
					PRINTFORML 「期待下次能有更激烈点的哦」
					PRINTFORMDW %CALLNAME:TARGET%像是没发生任何事一样整理着衣服
				;欲情のパラメーターが１５未満
				ELSEIF PALAM:欲情 < PALAMLV:15
					PRINTFORML 「你也满能干的啊」
					PRINTFORML 「很久没这么激烈过了」
					PRINTFORMDW %CALLNAME:TARGET%露出了满足的表情……
				;欲情のパラメーターが最大
				ELSE
					PRINTFORML 「没想到我居然被玩弄成这样」
					PRINTFORMDW %CALLNAME:TARGET%坐在%CALLNAME:MASTER%身边、发出了想让灼热身躯冷静下来的深深的吐息
					PRINTFORML 「呼……嘛、偶尔来上一次也不错」
					PRINTFORML 「可以的话下次再来一起」
					PRINTFORMDW 这么说着的%CALLNAME:TARGET%、听起来有些期待的样子……
				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_K64_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_K64_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「嗯……？」
		PRINTFORMDL 因为突如其来的谜之快感%CALLNAME:TARGET%稍微皱了皱眉头
		PRINTFORML 「到底发生了什么……呜啊」
		PRINTFORMDL 然后、注意到了不知何时自己的股间湿漉漉的
		PRINTFORML 「什么时候……」
		PRINTFORML 「漏了……好像也不是这样」
		PRINTFORMW 「……哈、要洗个澡了啊」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		CALL HPH_PRINT,@"「咕、啊~啊ッ！？HPH」","L"
		PRINTFORMDL 突如其来的强烈快感使得%CALLNAME:TARGET%不由得瘫坐在地上
		CALL HPH_PRINT,@"「啊、哈…ッHPH 嗯、呼…ッHPH」","L"
		PRINTFORMDL %CALLNAME:TARGET%吐着舌头喘着粗气像个可怜女人一样颤抖着身体
		PRINTFORMDL 因汗水而变得透明的衣服隐约可以看到在那之下勃起了的乳头、脚边的爱液像水洼一样扩散開来。
		CALL HPH_PRINT,@"「啊……哈……ッHPH」","L"
		CALL HPH_PRINT,@"「咕……到底是、怎么一回事……ッHPH」","W"
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;胖次紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「啊……？」
		PRINTFORMDL %CALLNAME:TARGET%注意到了自己下体空着的这一事实
		PRINTFORML 「真奇怪…明明应该穿了的……」
		PRINTFORMW 「……嘛、无所谓吧」
		TCVAR:64:357 = 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
			PRINTFORML 「咕嗯？」
			PRINTFORML （这是什么、痰吗？ 明明也没有感冒之类的）
			PRINTFORMDL %CALLNAME:TARGET%蠕动着舌头摆弄着口中的粘性的液体
			PRINTFORMDW 稍微考虑了一下之后将其喝了下去
		;精液中毒低吐き出し＆濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 2 || ARG:1 == 5
			PRINTFORML 「唔、咳咳咳！……呸、是感冒了吗」
			PRINTFORMDL %CALLNAME:TARGET%将口内的精液随口吐了出来
			PRINTFORML 「很脏？ 无所谓吧」
			;メジャーリーガーが噛みタバコを吐き捨てるみたいな
			PRINTFORMW 「最近好像有不少喜欢扫除的家伙、只是帮他们创造工作而已」
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
			PRINTFORML 「咳！咳咳！」
			PRINTFORMDL %CALLNAME:TARGET%想都没想直接吐出了口中突然出现的腥臭液体
			PRINTFORMDL 因为咳嗽而飞出来的精液从手指间流出……
			PRINTFORML 「ッ……啊啊真是的、把手给弄脏了」
			PRINTFORML 「是感冒引起的吗…？ 不对、鬼才不会得病」
			PRINTFORML 「说起来还真是臭、总觉得好像在那里见过的感觉……」
			PRINTFORMDW %CALLNAME:TARGET%盯着手上的精液……
		;精液中毒高精飲＆濃厚精液精液中毒高精飲
		ELSEIF ARG:1 == 4 || ARG:1 == 6
			PRINTFORML （这个腥臭、还有黏糊糊的触感）
			PRINTFORML （就算是我也知道、这玩意儿是……）
			PRINTFORML 「……咽」
			PRINTFORMDL %CALLNAME:TARGET%一口吞下了口中的精液
			PRINTFORML 「嗯、呼……」
			PRINTFORMDL 稍微吐出一口气、浓厚的精液的味道充斥着鼻腔
			PRINTFORMDW 面对刺激着雌性本能的液体、%CALLNAME:TARGET%的密处不由得開始渗出爱液……
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;無知持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
			PRINTFORML 「啊……？」
			PRINTFORMDL 注意到了脸上出现的『什么东西』的%CALLNAME:TARGET%挥手擦拭
			PRINTFORMDL 擦拭的手上沾着的、是粘稠的精液
			PRINTFORML 「咕、什么时候……」
			PRINTFORMW 「作为玩笑可笑不出来」
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
			PRINTFORML 「唔啊、什么时候」
			PRINTFORMDL 不知何时脸上沾上了精液的%CALLNAME:TARGET%吓了一跳
			PRINTFORML 「虽然不知道是谁干的、居然敢对我搞这种事」
			PRINTFORML 「真是有趣的家伙、真想见识一下是什么样的家伙」
			PRINTFORMDW %CALLNAME:TARGET%用手指擦拭了一下粘在脸上的精液、毫不犹豫的放入了口中
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
			;書いてから思ったけど温泉街の元締めなら金に不自由とかしてなさそう
			PRINTFORML 「如果有突然出现在手里的东西的话真希望是金子之类的玩意儿」
			PRINTFORML 「那样的话、应该多少还能补些酒钱」
			PRINTFORMDL %CALLNAME:TARGET%甩了下手、粘在手上的精液四处飞散
			PRINTFORMDW 看着那仿佛要扭断什么的脖子的动作、%CALLNAME:MASTER%背后不由得冒出了冷汗
		;舐めとり
		ELSEIF ARG:1 == 2
			PRINTFORML 「啊ー…真是的、有够夸张」
			PRINTFORML 「……嘛、我就心怀感激的收下了」
			PRINTFORMDL %CALLNAME:TARGET%露出恍惚的表情、慢慢的将手伸向嘴边
			PRINTFORML 「舔……啾……啾……嗯……っ」
			PRINTFORMDW 然后用舌头舔起精液，在口中慢慢品尝起来……
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚肛門射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
			PRINTFORML 「唔嗯！？」
			PRINTFORMDL 因为时间停止被解除了的原因、注满了的精液从%CALLNAME:TARGET%的肛門漏了出来
			PRINTFORMDL 虽然赶紧闭紧了肛門、已经漏出来了的精液却已经流到了%CALLNAME:TARGET%脚边
			PRINTFORML 「唔、咕……突然、肚子有点不舒服……ッ」
			PRINTFORML 「咕！ 在哪里、厕所……ッ！」
			PRINTFORMDL %CALLNAME:TARGET%仿佛吞下了一寸法师一般的痛苦着
			PRINTFORMDW 只不过、刺在腹中的不是针而是精子就是了……
		;ソレ以外
		ELSEIF ARG:1 == 2
			PRINTFORML 「咕……肚子……ッ」
			PRINTFORMDL 充斥着大量精子的精液在%CALLNAME:TARGET%的肠内波动着
			PRINTFORMDL 肚子在请求排泄許可一样鸣叫着、越来越把%CALLNAME:TARGET%逼入绝境……
			PRINTFORML 「……哈哈、这可惨了啊」
			PRINTFORML 「被称之为力之勇仪之人、居然连便意都抑制不住什么的、さ……ッ」
			PRINTFORMDL 尽管如此、%CALLNAME:TARGET%还是为了避免丑态而尽力忍耐着
			PRINTFORMDW %CALLNAME:MASTER%内心偷笑着将这副情景印在了眼中
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精
		IF ARG:1 == 1 || ARG:1 == 2
			PRINTFORML 「ッ…怎么回事、这是……」
			PRINTFORMDL 大量的精液从%CALLNAME:TARGET%的秘处溢了出来
			PRINTFORMDL 被狠狠的使用了的性器仿佛还没有忘掉男根一般、阴唇不断開合着
			PRINTFORML 「还真是拿我的身体好好的快乐了一番啊……」
			PRINTFORML 「不管是谁做的、都要给他送上相应的回礼呐」
			PRINTFORMDW 一拳打在手心上的%CALLNAME:TARGET%、正是一副与鬼相符的姿态
		;処女膣内射精
		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_K64_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 「那个、为了以防万一」
			PRINTFORML 「……你懂的吧？」
			PRINTFORMDW %CALLNAME:TARGET%要求避孕措施……
		;それ以外
		ELSE
			PRINTFORML 「等下等下」
			PRINTFORML 「想做倒是没问题、至少要有最低限度的礼仪吧？」
			PRINTFORMDW %CALLNAME:TARGET%的言外之意是要求避孕措施
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 「不是、你看、中了的话不是很麻烦吗？」
			PRINTFORML 「倒不是说讨厌%MASTERNAME:64%……只是还没有自信」
			PRINTFORMW 「如果非要这样的话、至少要等安全日……」
		;それ以外
		ELSE
			PRINTFORML 「不行。你就放弃吧」
			PRINTFORMW 「我才不想怀上连基础的礼仪都不遵守的家伙的孩子」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 「……真是个笨蛋啊、%MASTERNAME:64%」
			PRINTFORML 「并不是说我可不可爱的问题」
			PRINTFORML 「多少也为中奖之后的孩子着想一下如何？」
			PRINTFORMDW 被露出认真表情的%CALLNAME:TARGET%的气势所压倒、%CALLNAME:MASTER%不情愿的放弃了
		;それ以外
		ELSE
			PRINTFORML 「如果非要这样的话……」
			PRINTFORML 「就用力量来让我屈服吧！」
			PRINTFORMDW 这么说着的%CALLNAME:TARGET%的手掌朝%CALLNAME:MASTER%的面部完成了漂亮的一击
			BASE:MASTER:体力 -= 2000
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 「啊、咕……」
			PRINTFORML 「行吧行吧。别用那种眼神看我」
			PRINTFORMW 「……嘛、今天的话应该没关系吧」
		;それ以外
		ELSE
			PRINTFORML 「就那么想无套来吗？」
			PRINTFORML （……嘛、鬼和人的话也没那么容易中……）
			PRINTFORMW 「既然都说到了这个份上……好、来吧」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 「就、就那么想和我做孩子吗？」
			PRINTFORML 「……认真的吗」
			PRINTFORMW 「既然这样……我也稍微下定决心吧……」
		;それ以外
		ELSE
			PRINTFORML 「哈……没想到这么缠人」
			PRINTFORML 「……是我输了、随你喜欢好了」
			PRINTFORMW 「只不过、如果中了的话你可要好好负责哦？」
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K64_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「居然又这样住到了地上什么的……」
		PRINTFORMW 「明明曾经放弃了之后潜入了地底什么的、稍微有点不好意思啊」
		PRINTFORMDL 据%CALLNAME:TARGET%所说、鬼曾经放弃了在地面上生活
		PRINTFORMDL 尽管如此还是搬来了地上、到底经历了什么样的心境变化
		PRINTFORMDW 这其中、%CALLNAME:MASTER%的存在无疑产生了至关重要的影响
		PRINTFORML 「那么、我们就这样一起生活吧」
		PRINTFORMW 「作为纪念、今晚就通宵畅饮吧！」
		PRINTFORMDL %CALLNAME:TARGET%一把抱住了%CALLNAME:MASTER%的肩膀
		PRINTFORMDW 她的表情十分明朗
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「我还想着一起生活的话、就能每晚喝个痛快了的说……」
		PRINTFORML 「嘛、既然%MASTERNAME:64%都这么说了那就算了」
		PRINTFORML 「被讨厌了的鬼就乖乖的回去地底了哦」
		PRINTFORMDW %CALLNAME:TARGET%装作毫不在意的样子、背影看起来有点寂寞
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;你の私室変更により同居
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「嘛、随便放松一下吧」
		PRINTFORML 「今天開始就是我们两个人的家啦」
		PRINTFORML 「钥匙也给你一份。别弄丢了哦？」
		PRINTFORMDW 和勇仪的同居生活開始了
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K64_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 「哦、差不多该回去了啊」
			PRINTFORML 「下次我会带点更好喝的酒的。如果没有忘了的话」
			PRINTFORMDW %CALLNAME:MASTER%朝她挥了挥手之后%CALLNAME:TARGET%也朝这里挥手告别
		;思慕
		ELSEIF TALENT:思慕
			PRINTFORML 「啊啊、已经这个时间了啊」
			PRINTFORML 「还会再来的哦、%MASTERNAME:64%」
			PRINTFORMDW %CALLNAME:TARGET%稍微有些依依不舍的回去了
		;それ以外
		ELSE
			PRINTFORML 「那么、差不多该回去了」
			PRINTFORMW 「那么下次再见、%MASTERNAME:64%」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:诶嘿嘿
			IF CFLAG:衰弱
				;诶嘿嘿中に疲れて返回
				PRINTFORMW
			ELSE
				;诶嘿嘿中に眠くて返回
				PRINTFORMW
			ENDIF
		ELSE
			;疲れて返回
			IF CFLAG:衰弱
				;恋慕
				IF TALENT:恋慕
					PRINTFORML 「哈……稍微有点闹腾过头了啊……」
					PRINTFORMDL %CALLNAME:TARGET%疲备不堪的坐了下来
					PRINTFORMDL 『我送你到家门口』看起来不能很快恢复的%CALLNAME:TARGET%被%CALLNAME:MASTER%背了起来
					PRINTFORML 「哈哈、这可真是轻松」
					PRINTFORML 「……抱歉呐、让你担心了」
					PRINTFORMDW 『不用放在心上』这么回答了之后、%CALLNAME:TARGET%小声地『嗯』了一下作为回答……
				;それ以外
				ELSE
					PRINTFORML 「哦……」
					PRINTFORMDL %CALLNAME:TARGET%摇晃了一下、%CALLNAME:MASTER%赶紧用身体撑住
					PRINTFORML 「我也疏于锻炼了啊……才这种程度就有点受不了了」
					PRINTFORMDL %CALLNAME:MASTER%说出担心的话、%CALLNAME:TARGET%咧嘴笑了起来
					PRINTFORML 「呼呼、被人忌讳讨厌的鬼居然被人类担心什么的」
					PRINTFORML 「……谢谢你、%MASTERNAME:64%」
					PRINTFORMDW 虽然约会中途终止了、%CALLNAME:TARGET%看起来却很满足的样子……
				ENDIF
			;眠くて返回
			ELSE
				;恋慕
				IF TALENT:恋慕
					PRINTFORML 「呼啊～……感觉有点困了啊」
					PRINTFORML 「啊啊不是、并不是因为约会太无聊了什么的……」
					PRINTFORML 「平时都是差不多这个时间開始睡的、一道这个时间就会打瞌睡呐」
					PRINTFORMDW %CALLNAME:MASTER%提出『就先结束吧』之后、%CALLNAME:TARGET%烦恼了一下之后接受了
				;それ以外
				ELSE
					PRINTFORML 「差不多就到这里结束吧」
					PRINTFORMW 「抱歉呐、下次再来约我吧」
				ENDIF
			ENDIF
		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_K64_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMDW 某天夜晚
		PRINTFORMDW %CALLNAME:TARGET%陷入沉思、小口小口地喝着酒
		PRINTFORMW 「……%MASTERNAME:64%……」
		PRINTFORMDW 突然的、无意识从口中漏出的人类的名字
		PRINTFORMDW 仿佛像烈酒一般、渐渐的深入胸中
		PRINTFORMW 「………」
		PRINTFORMW 「干脆把他抓过来吧」
		PRINTFORMW 「……什么的、真能做得到的话就不会这么苦恼了……」
		PRINTFORMW 「我也变得圆滑起来了」
		PRINTFORMW 「……………」
		PRINTFORMW 「―――恋爱、吗」
		PRINTFORMW 「对我来说可能有点太过刺激了呐」
		PRINTFORMDW %CALLNAME:TARGET%自嘲的笑着、将杯中剩下的酒一饮而尽
		PRINTFORML
		CALL COLORMESSAGE(@"和勇仪的关系变为了[恋慕] 要改变勇仪对你的称呼吗？",C_YELLOW,1,1)
		CALL ASK_M("是的",1 , "不用了",1)
		SELECTCASE RESULT
			CASE 0
				CALL NAME_SET_K64
				RETURN 1
			CASE 1
				PRINTFORMW 不做变更
				RETURN 1
		ENDSELECT
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMDW 某日、%CALLNAME:TARGET%和同伴们如同往常一样聚在一起喝酒
		PRINTFORMW 「然后―――」
		PRINTFORMDW 『大姐头』
		PRINTFORMW 「啊？」
		PRINTFORMDW 『从刚刚開始、就全是在说那个人类的话题啊』
		PRINTFORMDW 『听的耳朵都要长章鱼了哦？』
		PRINTFORMDW 哇哈哈哈哈！！！
		PRINTFORMW 「不是、很有趣不是吗？」
		PRINTFORMW 「那种人类在什么时代都是很少见的不是吗」
		PRINTFORMDW 『不、不是再说那种话』
		PRINTFORMDW 『说那家伙的话题的时候……就是、总觉得……』
		PRINTFORMW 「明明是个鬼说话别那么扭扭捏捏。不觉得丢人吗」
		PRINTFORMW 「有想说的话就直说」
		PRINTFORMDW 『大姐头、与其说变成了女人的模样不如说』
		PRINTFORMDW 『雌性的面容？』
		PRINTFORMDW 『对对就是这个！』
		PRINTFORMDW 哇哈哈哈哈哈！！！
		PRINTFORMW 「……像个女人？我？」
		PRINTFORMW 「别開玩笑了」
		PRINTFORMDW 那不是和我完全无缘的东西吗
		PRINTFORMDW ……真的是这样吗
		PRINTFORMDW 酒过三丈的脑袋、不是很能理解
		PRINTFORMDW 这种时候就要―――
		PRINTFORMW 「喂！再多拿点酒过来！要最烈的那种！」
		PRINTFORMDW 就要来这招
		PRINTFORML
		CALL COLORMESSAGE(@"和勇仪的关系变为了[思慕] 要改变勇仪对你的称呼吗？",C_YELLOW,1,1)
		CALL ASK_M("是的",1 , "不",1)
		SELECTCASE RESULT
			CASE 0
				CALL NAME_SET_K64
				RETURN 1
			CASE 1
				PRINTFORMW 不做变更
				RETURN 1
		ENDSELECT
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		CALL HPH_PRINT,@"「……嗯……呼……っHPH」","W"
		PRINTFORMDL 趁喝醉了的鬼们都睡着了的时候
		PRINTFORMDW %CALLNAME:TARGET%欲火焚身忍不住自慰起来
		CALL HPH_PRINT,@"「…っ咕……偏偏这种时候、%MASTERNAME:64%居然不在……っHPH」","W"
		PRINTFORMDL 不断地用手指爱抚着蜜穴、回想着不在此处的人物
		PRINTFORMDL 两根手指、甚至用上三根手指、都完全比不上%CALLNAME:MASTER%的男根赐予的快乐
		PRINTFORMDW 尽管如此、被调教了的%CALLNAME:TARGET%的肉体轻易的达到了绝顶
		CALL HPH_PRINT,@"「ぅ、啊……哈……っHPH」","W"
		CALL HPH_PRINT,@"「到了明天、被%MASTERNAME:64%……っHPH 嗯、呼……っHPH」","W"
		PRINTFORMDL 仿佛要将从小穴中流出的爱液重新塞回去一般、再一次将手指插入其中
		PRINTFORMDW 想着到了明天一定要好好要求补偿、%CALLNAME:TARGET%再次開始了自慰……
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW 「没想到居然会在那种地方被留下痕迹……」
		PRINTFORMW 「真是的、今天真是丢人丢到家了」
		PRINTFORMDL %CALLNAME:TARGET%喝着酒自言自语
		PRINTFORMDW 没有注意到脖子上的吻痕、再酒席上好不容易糊弄了过去
		PRINTFORMW 「这也好那也好、都是因为那家伙……」
		PRINTFORMDL %CALLNAME:MASTER%会想起被抱住的时候的事情、脖子上的吻痕像是像是烫伤一样疼了起来
		PRINTFORMDW 各种各样情事相加的结果、不知何时两人的关系完全扭曲了
		PRINTFORMW 「………呼」
		PRINTFORMW 「哈哈哈哈！因为这种事情烦恼什么的完全不是我的风格啊」
		PRINTFORMDL 因此被人揶揄了又怎么样
		PRINTFORMDW 都活了那么长时间了、做爱什么的当然也会做那么一次两次了
		PRINTFORMW 「哈ー……嘛、反正和%MASTERNAME:64%一起做也蛮舒服的……」
		PRINTFORMW 「姑且暂时、维持着这种关系也没什么不好的吧……」
		PRINTFORMDL %CALLNAME:TARGET%像是要吹散烦恼一样朝酒杯注满了酒液
		PRINTFORMDW 下次要什么时候和那家伙做呢、開始考虑着这种事情……
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;接吻魔取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰狂取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;子宮口性感取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;漏尿癖取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K64_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:恋慕
			SELECTCASE RAND:3
				CASE 0
					CALL HPH_PRINT,@"「嗯、啊……ッHPH」","L"
					PRINTFORMDL 不知第几次的绝顶的%CALLNAME:TARGET%的蜜穴中流出浓厚的汁液
					PRINTFORMDL 本来只想一次就结束的、但是想着%CALLNAME:MASTER%手指完全停不下来
					CALL HPH_PRINT,@"「哈……哈……ッHPH 这种时候、如果%MASTERNAME:64%在的话……HPH」","L"
					CALL HPH_PRINT,@"「………んんッHPH」","L"
					PRINTFORMDW 结果这天、在%CALLNAME:TARGET%累的睡着之前一直持续着自慰
				CASE 1
					CALL HPH_PRINT,@"「%MASTERNAME:64%……ッHPH 啊啊、%MASTERNAME:64%……ッHPH」","L"
					PRINTFORMDL 一边不断抽动着手指、一边不断的呼喊着一个人类的名字
					PRINTFORMDL %CALLNAME:TARGET%沉浸于被%CALLNAME:MASTER%按住粗暴的侵犯的幻想，不断地持续着自慰
					CALL HPH_PRINT,@"「ぁ、啊ッHPH %MASTERNAME:64%……更多、把我……ぉッHPH」","L"
					PRINTFORMDL 本能的降下来的子宫口被指尖触碰到的瞬间
					PRINTFORMDW %CALLNAME:TARGET%扑哧一声喷出潮水剧烈的高潮了
				CASE 2
					CALL HPH_PRINT,@"「哈……ッHPH 如果能被抱的话就好了……HPH」","L"
					CALL HPH_PRINT,@"「自己的手指的话、完全不能满足……ッHPH」","L"
					PRINTFORMDL %CALLNAME:TARGET%在这天、已经自慰了一个小时
					PRINTFORMDL 不管%CALLNAME:MASTER%再怎么做出相似的动作都不能满足自己的欲望
					CALL HPH_PRINT,@"「ッ、ぁ、嗯ッHPH イッ、咕、ぅッHPH」","L"
					PRINTFORMDL ……猛烈的从密处喷出的潮水、弄脏了身下的被子
					PRINTFORMDW 然后就这样、为了满足自己身体内部的欲望再次開始了自慰……
			ENDSELECT
		;それ以外
		ELSE
			SELECTCASE RAND:3
				CASE 0
					CALL HPH_PRINT,@"「……ッ……ぅッHPH」","L"
					PRINTFORMDL 抑制着声音自慰着的%CALLNAME:TARGET%达到了高潮
					PRINTFORMDL 很久没有做过的勇仪、在这天自我安慰了
					PRINTFORML 「呼……啊、已经这个时间了啊」
					PRINTFORML 「洗澡……嘛、起来再洗吧」
					PRINTFORMDW 发现经过了比预想更长时间的%CALLNAME:TARGET%、选择了尽快入睡
				CASE 1
					CALL HPH_PRINT,@"「嗯、咕……ッHPH」","L"
					PRINTFORMDL 在昏暗的房间中、%CALLNAME:TARGET%不断自慰着
					PRINTFORMDL 沾满了黏糊糊的爱液的手指、不断爱抚着阴蒂
					CALL HPH_PRINT,@"「再稍微、で……ッHPH 啊HPH」","L"
					PRINTFORMDL 高潮的瞬间、%CALLNAME:TARGET%发出了甜美的声音
					PRINTFORMDW 无法想象的从鬼之四天王的勇仪口中发出的声音、被外边鬼的吵闹声覆盖了
				CASE 2
					PRINTFORML 「呼……就这样吧」
					PRINTFORMDL 结束自慰的%CALLNAME:TARGET%深深的喘了一口气
					PRINTFORMDL 整理了一下乱糟糟的一副、大腿附近传来潮湿的触感
					PRINTFORML 「啊、被子变得湿漉漉了……」
					PRINTFORMW 「哈、真是的……麻烦死了……」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同室時自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		CALL HPH_PRINT,@"「哈……ッHPH ぁ、嗯嗯……ッHPH」","W"
		PRINTFORMDW 听到湿漉漉的水声观察了一下来源、居然是%CALLNAME:TARGET%正在自慰
		CALL HPH_PRINT,@"「真是的、太过分了吧……HPH」","W"
		CALL HPH_PRINT,@"「让人兴奋起来……自己却早早的睡觉什么的……ぁッHPH」","W"
		PRINTFORMDL 露出淫荡的表情自慰的%CALLNAME:TARGET%、注意到了%CALLNAME:MASTER%已经醒了过来
		PRINTFORMDW 忍不住咽了口口水、水声直接的间隔越来越短
		CALL HPH_PRINT,@"「ぁ、噫、くッHPH %MASTERNAME:64%ッHPH 啊啊HPH」","W"
		CALL HPH_PRINT,@"「哈……哈……ッHPH」","W"
		PRINTFORMDL ……看起来高潮了
		PRINTFORMDW %CALLNAME:TARGET%晃动着巨大的胸部、调整起混乱的呼吸
		PRINTFORMDL %CALLNAME:MASTER%的下体勃起到极限、雄性的本能不断产生着袭击的冲动……
		PRINTFORMDW 但是为了保护%CALLNAME:TARGET%的自尊、只好硬着头皮继续睡觉了
		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 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML 「说起来、很久没见面了啊……」
		PRINTFORMW 「明天去找%MASTERNAME:64%搭话吧……」
		RETURN 1
	ENDIF
	;其他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K64_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「想要一起洗澡？」
		PRINTFORML 「哈哈哈哈、那就帮我擦一下背吧」
		PRINTFORMDL %CALLNAME:MASTER%回答道当然可以、然后被弹额头了
		PRINTFORML 「笨蛋、開玩笑的」
		PRINTFORML 「嘛、我倒是蛮喜欢你这种有话直说的」
		PRINTFORMDW 虽然很遗憾、裸体相见还要再之后才行的样子
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「我最喜欢洗去运动一整天之后的汗水的瞬间了」
				PRINTFORML 「%MASTERNAME:64%也是？ 哈哈哈！我们很合得来呐！」
				PRINTFORMDW %CALLNAME:MASTER%跟在%CALLNAME:TARGET%身后进入了洗浴间
			CASE 1
				PRINTFORML 「好、稍微进去喝点酒吧」
				PRINTFORMDL %CALLNAME:TARGET%脱掉了一副、丰满的胸部跳了出来
				PRINTFORML 「啊？ 怎么了？一直盯着这边」
				PRINTFORML 「%MASTERNAME:64%也赶紧脱了吧」
				PRINTFORMDL %CALLNAME:TARGET%拿着毛巾大摇大摆的走进了进去
				PRINTFORMDW 随着步伐而不断摇动的巨乳、不断勾引着%CALLNAME:MASTER%的视线
			CASE 2
				PRINTFORML 「洗澡的话有个绝对不能忘了拿的东西」
				PRINTFORML 「你问是什么？ 那当然是酒啊？」
				PRINTFORMDL %CALLNAME:TARGET%兴冲冲的准备好了酒走进了浴场
				PRINTFORMDW 当然、斟酒是%CALLNAME:MASTER%的任务
		ENDSELECT
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K64_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:兒童人数
			PRINTFORMW 「呼呼、那么努力的作孩子有了回报」
			PRINTFORMW 「知道会有弟弟或者妹妹出生的话、那孩子也一定会高兴的」
			PRINTFORMDW %CALLNAME:TARGET%温柔的抚摸着再次诞生了生命的肚子
			PRINTFORMW 「又要忍耐着少喝点酒？ 啊哈哈哈哈！确实是呐」
			PRINTFORMW 「等这孩子能够独当一面之后、再来開我珍藏了很长时间的好酒吧」
			PRINTFORMW 「……到那个时候、%MASTERNAME:64%也来一起喝吧」
			PRINTFORMDW 两人依偎在一起、畅想着孩子的未来……
		ELSE
			PRINTFORMW 「来、你也摸一摸吧」
			PRINTFORMDL 稍微摸了摸还没有鼓起来的%CALLNAME:TARGET%的腹部
			PRINTFORMDW 虽然没有任何感觉、但是这里确实存在着两人的孩子
			PRINTFORMW 「是男孩、还是女孩……嘛、不管是那种都行吧」
			PRINTFORMW 「只要孩子能健康成长我就心满意足了」
			PRINTFORMDW %CALLNAME:MASTER%点了点头、%CALLNAME:TARGET%露出了满足的微笑
			PRINTFORMW 「不过说回来……」
			PRINTFORMW 「啊啊～ッ！ 不能喝酒什么的、完全不觉得能忍得住！」
			PRINTFORMW 「酒就是命！ 将其夺走的话、我该用什么支撑……ッ」
			PRINTFORMDW 『还有肚子里的孩子不是吗』这么说了之后、%CALLNAME:TARGET%一脸惊讶的看着肚子
			PRINTFORMW 「嘛、确实是……ッ」
			PRINTFORMW 「………」
			PRINTFORMW 「……咕……」
			PRINTFORMDL 为了腹中的孩子下定了戒酒的决心
			PRINTFORMDW 但是、很快就动摇了
			PRINTFORMW 「一周……不、一个月一口就好！」
			PRINTFORMW 「………不行吗？」
			PRINTFORMDL %CALLNAME:MASTER%摇了摇头、%CALLNAME:TARGET%垂头丧气起来
			PRINTFORMDW 以上是某天的日常生活
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		$YUGI_PREGNANCY
		IF CFLAG:兒童人数
			PRINTFORMW 「哈哈哈、又有孩子了啊」
			PRINTFORMW 「你也好我也好、真是不知悔改啊」
			PRINTFORMDL 再次出现的新生命
			PRINTFORMDW %CALLNAME:TARGET%仿佛习惯了一般拍了拍肚子
			PRINTFORMW 「这次会生下来怎样的孩子呢」
			PRINTFORMW 「我觉得的话、只要能够健康成长的话就好了……」
			PRINTFORMW 「不管怎样、我都很期待！」
			PRINTFORMW 「%MASTERNAME:64%也是这么觉得的吧？」
			PRINTFORMDL 明明又要一段时间不能喝酒了、%CALLNAME:TARGET%却对此毫不在意一心只为肚子里的孩子考虑
			PRINTFORMDW 对于满含期待的她的话语、%CALLNAME:MASTER%只能同意的应答着
		ELSE
			PRINTFORMDL 有一天、%CALLNAME:MASTER%拿着就来到了%CALLNAME:TARGET%家
			PRINTFORMDW 敲过门之后过了一会儿勇仪出来了、看到酒之后她尴尬的移開了视线
			PRINTFORMW 「啊ー……我准备暂时不喝酒了」
			PRINTFORMW 「在这里有点那什么、先进来吧」
			PRINTFORMDL ……………
			PRINTFORMDL ………
			PRINTFORMDW …
			PRINTFORMW 「那么、该从哪里说起呢……」
			PRINTFORMW 「………ん」
			PRINTFORMW 「単刀直入的说了」
			PRINTFORMW 「我怀孕了」
			PRINTFORMW 「你要当爸爸了」
			PRINTFORMDW 面对这一串话、%CALLNAME:MASTER%思考停止了
			PRINTFORMW 「你看起来很不相信啊？ 但是、鬼是不会撒谎的」
			PRINTFORMW 「哈哈、没想到我会怀上人类的孩子」
			PRINTFORMW 「看起来、%MASTERNAME:64%的种子相当强力啊」
			PRINTFORMDL 为了缓和现场的气氛勇仪開了開玩笑
			PRINTFORMDW %CALLNAME:MASTER%完全笑不出来
			PRINTFORMW 「嘛、说实话我也很混乱……」
			PRINTFORMW 「但是有了也没办法、不如说是件喜事吧」
			PRINTFORMW 「…所以、你也不要畏畏缩缩的做好觉悟吧！」
			PRINTFORMDW %CALLNAME:TARGET%拍了拍%CALLNAME:MASTER%的后背、将其拉回了现实
			PRINTFORMW 「会负起责任？ 那可真是可靠」
			PRINTFORMW 「那么、我就依靠你了哦」
			PRINTFORMW 「……作为这个孩子父亲的你」
			PRINTFORMDL %CALLNAME:TARGET%抚摸着寄宿着新生命的肚子
			PRINTFORMDW 在那之中完全没有山之四天王的强大、只有作为母亲的温柔
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		GOTO YUGI_PREGNANCY
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K64_25(ARG,ARG:1)
;口上主はLOCAL
;ARG:1	何人目の兒童か
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;２人目以降
		IF ARG:1 > 1
			PRINTFORMW 「好乖好乖、多喝一点」
			PRINTFORMDL %CALLNAME:TARGET%在给刚出生不久的孩子喂奶
			PRINTFORMDW 看着很有精神喝奶的孩子、%CALLNAME:MASTER%不由得笑開了花
			PRINTFORMW 「这种、应该觉母性吗……」
			PRINTFORMW 「把小孩子抓走吃掉什么的、现在完全无法想象」
			PRINTFORMW 「嗯？别说那么恐怖的事？ 嘛嘛、你忘了吗我可是鬼啊」
			PRINTFORMW 「以前也有好几次这种事情……っ啊、不说了不说了」
			PRINTFORMW 「这种话完全不应该在刚出生不久的孩子面前说的」
			PRINTFORMDL %CALLNAME:MASTER%被骂了
			PRINTFORMW 「不管怎么说……」
			PRINTFORMW 「这么健康的生下来了、这就足够了」
			PRINTFORMDW 这么说着抚摸着孩子的%CALLNAME:TARGET%的表情充满了母性
		;１人目
		ELSE
			PRINTFORMW 「呼呼、哭的很大声的健康孩子呐」
			PRINTFORMDL 勇仪温柔的抱着刚出生不久的孩子
			PRINTFORMDW 就算是她也因为出产而变得疲备不堪
			PRINTFORMW 「哈哈、快看啊。这就開始喝奶了」
			PRINTFORMW 「这种忠实自己欲望的行为、真不愧是你的孩子啊」
			PRINTFORMW 「………開玩笑啦」
			PRINTFORMW 「这样的话就不用担心了」
			PRINTFORMW 「稍微有点困了、我先休息一下……」
			PRINTFORMDL %CALLNAME:TARGET%这么说着、喂着孩子奶的同时睡着了
			PRINTFORMDW %CALLNAME:MASTER%坐在一边、在%CALLNAME:TARGET%醒过来之前守望着她们……
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		$YUGI_CHILDBIRTH
		;２人目以降
		IF ARG:1 > 1
			PRINTFORMW 「哦哦来了吗、真慢啊」
			PRINTFORMW 「早就生下来了啊」
			PRINTFORMDW 听说孩子要出生了赶紧赶了过来、好像没能赶上
			PRINTFORMW 「嘛就算看到了也没什么有趣的就是了」
			PRINTFORMW 「就那么想见我吗？」
			PRINTFORMDW 想要见证孩子出生的瞬间是父亲共通的心情
			PRINTFORMW 「这么想看的话、下次再有机会的话……」
			PRINTFORMW 「………嗯？ 怎么了这副表情」
			PRINTFORMDL 从勇仪口中说出的『下次的机会』
			PRINTFORMDW 也就是说、只要再怀一次就好了
			PRINTFORMW 「……啊ー、不是……」
			PRINTFORMW 「…嘛、都走到这步了再生几个也没什么变化就是了」
			PRINTFORMW 「你想那样的话、我也奉陪就是了」
			PRINTFORMW 「是说、这孩子才刚生出来就在谈论下个孩子的事？」
			PRINTFORMDW %CALLNAME:MASTER%被%CALLNAME:TARGET%惊呆了
		;１人目
		ELSE
			PRINTFORMDW 听说孩子要出生了的%CALLNAME:MASTER%紧急的前往了%CALLNAME:TARGET%家
			PRINTFORMW 「……嗯、来了吗」
			PRINTFORMW 「看、就是这孩子哦」
			PRINTFORMDL %CALLNAME:TARGET%将刚出生不久的孩子递给了%CALLNAME:MASTER%
			PRINTFORMDW 慌忙的接过来之后、刚才还很安静的孩子突然大声哭了起来
			PRINTFORMW 「哈哈、在你来之前也有好几个人来看望来着」
			PRINTFORMW 「被我以外的人抱住的话、就会像这样哭起来」
			PRINTFORMDW %CALLNAME:MASTER%将孩子还给了%CALLNAME:TARGET%之后、立马停止了哭泣
			PRINTFORMW 「嘛好不容易来一趟、慢慢的欣赏自己的孩子吧」
			PRINTFORMW 「我要稍微休息一下、发生什么就拜托你了……」
			PRINTFORMDL 因为%CALLNAME:MASTER%的到来舒缓下来、%CALLNAME:TARGET%仿佛晕过去一般睡着了
			PRINTFORMDW 出产这么重要的场合却没有在场、%CALLNAME:MASTER%感到有些后悔……
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		GOTO YUGI_CHILDBIRTH
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K64_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_K64_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_K64_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「对了、有空的话陪我一下吧？」
			PRINTFORMW 「做什么？ 当然是来约会啦」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「好！那么就出发吧！」
			PRINTFORMDW 勇儀牵住%CALLNAME:MASTER%的手大步走了起来
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「什么啊、真是个冷淡的家伙呐」
			PRINTFORMW 「嘛算了、下次一定要陪我哦」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「对了、要不要来我家？」
			PRINTFORML 「虽然大家一起热热闹闹的也不错、偶尔两个人静静的对饮也不错吧？」
			PRINTFORML 「……也不会有人捣乱什么的」
			PRINTFORMDW %CALLNAME:TARGET%稍微有点脸红
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「你问是不是真的只有喝酒？」
			PRINTFORML 「呼呼、这要取决于%MASTERNAME:64%你了」
			PRINTFORMDW %CALLNAME:TARGET%说着饱含深意的话语将%CALLNAME:MASTER%招待到了家里
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「是嘛。那我就去找别人喝去了」
			PRINTFORMDW %CALLNAME:TARGET%看起来并不怎么在意的样子
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K64_28(ARG,ARG:1)
;口上主はTARGET
;ARGに脱がし方選択
;ARG:1（ARG=3の場合のみあり）地の文の反応
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;全裸にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
				PRINTFORMDL 将隐藏身体的最后一件衣服脱掉了的%CALLNAME:TARGET%的裸体暴露了出来
				;妊娠
				IF TALENT:妊娠
					PRINTFORMDL 原本紧实的肌肉因为怀孕堆积了脂肪、多少有点松弛了
				;それ以外
				ELSE
					PRINTFORMDL 紧实的肉体没有一点浪费、只有诱惑男人的部位堆积着脂肪
				ENDIF
				PRINTFORMDL 丰满的果实足以魅惑住所见的任何人
				PRINTFORMW 「呼呼、那么開始找乐子吧」
			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_K64_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_K64_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_K64_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_K64_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
	CASE 18
		;▼炬燵でのんびり（～は炬燵に入って温まっている）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

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

;==================================================
;技能レベルアップ
;各ABL値はレベルアップ後の値になってます
;==================================================
@M_KOJO_EVENT_K64_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_K64_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_K64_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_K64_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_K64_ONABARE_1(ARG)
;-------------------------------------------------
:口上色を付けるならコメントアウトを外しXをキャラ番号に
;CALL M_KOJO_COLOR_K64

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

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

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

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

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

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

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

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

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

;==================================================
;贈り物イベント
;==================================================
@M_KOJO_EVENT_K64_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_K64_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

;==================================================
;引力操作
;TCVAR:引力点に場所IDを入れるとその地点に引っ張られていきます
;場所IDと同じ拠点Mapでしか効果はありません（博麗神社の境内なら拠点が博麗神社のときだけ）
;条件を付けないと永久に引っ張られ继続ので注意
;RANDは基本的に使えません。CFLAG:今日の運勢にその日の随机数値（0～999）が入っているのでこれを使うと良いです
;==================================================
@M_KOJO_EVENT_K64_GRAVITY(ARG)

SIF 0
	TCVAR:引力点 = 0

;▼共通設定で使われているサンプル
[SKIPSTART]
	;平日の昼間は随机で玩耍に行く
	IF YOUBI_MATCH(DAY, "月火水木金") && INRANGE(TIME, 600, 960)
		SELECTCASE CFLAG:今日の運勢 % 5
		CASE 1
			TCVAR:引力点 = P2境内
		CASE 2
			TCVAR:引力点 = P10走廊
		CASE 3
			TCVAR:引力点 = P11庭
		CASE 4
			TCVAR:引力点 = P25鎮守之森
		CASEELSE
			TCVAR:引力点 = 0
		ENDSELECT
	ENDIF
	;水木曜日に2分の1の確率で玩耍に行く
	SIF YOUBI_MATCH(DAY, "水木") && INRANGE(TIME, 720, 1020) && CFLAG:今日の運勢 % 2 == 0
		TCVAR:引力点 = P213鈴奈庵
	;特定の人物が特定の場所にいるとそこへ引っ張られる
		SIF CFLAG:[[白蓮]]:現在位置 == P103本堂 && !CFLAG:[[白蓮]]:诶嘿嘿 && SHIRAHU([[白蓮]])
			TCVAR:引力点 = P103本堂
	;土日に10分の1の確率で特定の人物にくっついてまわる
	SIF YOUBI_MATCH(DAY, "土日") && CFLAG:今日の運勢 % 10 == 0 && !CFLAG:[[覚]]:诶嘿嘿 && SHIRAHU([[覚]])
		TCVAR:引力点 = CFLAG:[[覚]]:現在位置
[SKIPEND]

;-------------------------------------------------
;名前を教えるイベント（関数）
;納茲琳口上からお借りしました
;-------------------------------------------------
@NAME_SET_K64
PRINTL 请输入姓名
IF NAME:MASTER != "你"
	LOCALS = %CALLNAME:MASTER%
ELSE
	LOCALS = %NAME:MASTER%
ENDIF
PRINTBUTTON @"[自称%LOCALS%]", @"%LOCALS%"
PRINTL
;名前を入力するループ
$INPUT_LOOP_ONAMAE
INPUTS
; 行頭行尾の空白文字削除
LOCALS = %RESULTS%
REPLACE LOCALS, "\(\^\\s\+\|\\s\+\$)", ""
;10文字以上は受け付けない
IF STRLENS(LOCALS) > 10
	CLEARLINE 1
	REUSELASTLINE 名字太长了
	GOTO INPUT_LOOP_ONAMAE
;空白は受け付けない
ELSEIF RESULTS == ""
	PRINTL 请输入姓名
	GOTO INPUT_LOOP_ONAMAE
ELSE
	PRINTFORML 就决定是%RESULTS%了吗？
	PRINTL [0] 是的
	PRINTL [1] 不
	;入力した名前を確定するループ
	$INPUT_LOOP_KAKUTEI_1
	INPUT
	IF RESULT == 0
		;你の名前を%MASTERNAME:64%に格納
		MASTERNAME:64 = %RESULTS%
		PRINTFORML
	ELSEIF RESULT == 1
		PRINTL 请输入姓名
		GOTO INPUT_LOOP_ONAMAE
	ELSE
		PRINTL 请输入姓名
		GOTO INPUT_LOOP_ONAMAE
	ENDIF
ENDIF

path: ERB/口上・メッセージ関連/個人口上/【64】勇儀汉化已过字典/M_KOJO_K64_イベント.ERB