path: ERB/口上・メッセージ関連/個人口上/【25】藍/M_KOJO_K25_派生コマンド.ERB


repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【25】藍/M_KOJO_K25_自慰系(あなた)コマンド.ERB

license: unknown


code:
eraTheWorld proto4.575用 八雲藍口上【別人加筆版】ver0.15

-----------------------------------------------
	はじめに
この口上は【eraTheWorld proto4.13用 八雲藍口上】に加筆修正を行った、eraTW用八雲藍口上別人加筆版です
元口上の作者様が改変加筆修正しても構わない、と書かれていたので書かせていただきました
ホントはもっと書き込んでから公開するつもりだったんですが、後ろに引けなくする意味も込めて

自身が書いた部分の権利は一切を放棄し、元口上作者様のライセンスに準拠します。

-----------------------------------------------
	改変したところ
・身体接觸分岐の改変
前回更新したとき会話指令と合わせて改変するべきだったんですがど忘れしていました(アホ)
会話指令と同じような感じに分岐

-----------------------------------------------
	修正したところ
・季節会話が連続で出るのを制御
体感ですが季節会話が連続で出る気がしたのでTCVARにて制御
連続で出ないようにしました

-----------------------------------------------
	加筆したところ
・添い寝指令
恋慕時だけ限定で出ます(それ以外の時はこれから書きます)

-----------------------------------------------
	課題とか予定とか
・未記入部分の加筆(今やってるのは避孕套装备とか)

-----------------------------------------------
	お世話になった方
・元口上作者様
土台を作ってくださった方。元口上作者様がいなければそもそもできませんでした。感謝と尊敬を。

・小鈴、クラピ口上作者様
小鈴ちゃん口上を見ることで一部の問題を解決できました。ありがとうございます。

-----------------------------------------------
	連絡とか
たぶんいつもeratohoの本スレにいるよ！

-----------------------------------------------
	更新履歴
2018/3/10 ver0.15公開
2018/3/9  ver0.1公開

path: ERB/口上・メッセージ関連/個人口上/【25】藍/更新履歴兼readme【別人加筆版】.txt


code:
;-------------------------------------------------
;eraTW4.860用 TWの八雲紫口上
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。

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

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

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

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

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

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

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

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

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

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

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

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

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

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K26
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
	;システム上周回すると紫側の記憶はリセットされるけど稍微だけ何かしら残ってたり残ってなかったりする感じ。
	;なので周回時には矛盾した発言をしている。前週時に恋慕をつけてると好きかもしれないわの意味が変わってくる形。
	;それはそれはとても残酷な話ですわ。
	IF FLAG:周回数 > 1 && DAY:0 >= 8
		PRINTFORMW 「真是的……终于找到%CALLNAME:MASTER%了」
		PRINTFORMW 突然被背后的空间裂缝中露出上半身的女性叫住了。
		PRINTFORMW 紫色的导师服加上金色长发，戴着白手套的妖艳美女——
		PRINTFORMW 「迟到了一个多星期，我很难过……」
		PRINTFORMW 她一边这么说着，一边用手触摸着%CALLNAME:MASTER%的脸颊，凝视着脸。
		PRINTFORMW 「多么的既漂亮又阴森的眼睛啊，我可能喜欢%CALLNAME:MASTER%哦。」
		PRINTFORMW 「嘛，打招呼就到此为止，%CALLNAME:MASTER%到底是为什么来了呢？说服我吗？」
		PRINTFORMW 「呵呵，開玩笑啊，那我也是很忙的，下次再见吧。」
		PRINTFORMW 那样说的她，身体不知不觉地探进空间的裂缝，不知道去哪里了。
	ELSEIF FLAG:周回数 > 1
		PRINTFORMW 「喂——%CALLNAME:MASTER%」
		PRINTFORMW 不知道从哪里传来了声音，有个女性从背后的空间裂缝中露出上身。
		PRINTFORMW 紫色的导师服加上金色长发，戴着白手套的妖艳美女——
		PRINTFORMW 「好久不见，有多久没见了？」
		PRINTFORMW 她一边这么说着，一边用手触摸着%CALLNAME:MASTER%的脸颊，凝视着脸。
		PRINTFORMW 「多么的既漂亮又阴森的眼睛啊，我可能喜欢%CALLNAME:MASTER%哦。」
		PRINTFORMW 「嘛，打招呼就到此为止，%CALLNAME:MASTER%到底是为什么来了呢？说服我吗？」
		PRINTFORMW 「呵呵，開玩笑啊，那我也是很忙的，下次再见吧。」
		PRINTFORMW 那样说的她，身体不知不觉地探进空间的裂缝，不知道去哪里了。
	ELSEIF DAY:0 >= 8
		PRINTFORMW 「真是的……终于找到%CALLNAME:MASTER%了」
		PRINTFORMW 突然被背后的空间裂缝中露出上半身的女性叫住了。
		PRINTFORMW 紫色的导师服加上金色长发，戴着白手套的妖艳美女——
		PRINTFORMW 「一个多星期没看到你的脸，真是太可悲了……」
		PRINTFORMW 「那个，还没打招呼呢，我是八云紫，这个世界的管理员。」
		PRINTFORMW 她一边这么说着，一边用手触摸着%CALLNAME:MASTER%的脸颊，凝视着脸。
		PRINTFORMW 「多么的既漂亮又阴森的眼睛啊，我可能喜欢%CALLNAME:MASTER%哦。」
		PRINTFORMW 「嘛，打招呼就到此为止，%CALLNAME:MASTER%到底是为什么来了呢？说服我吗？」
		PRINTFORMW 「呵呵，開玩笑啊，那我也是很忙的，下次再见吧。」
		PRINTFORMW 这样说的她，不知不觉间向空间的裂缝中探进身体，正要离開，好像又想起了什么似的，回头看了看。
		PRINTFORMW 「啊，对了，我忘了说一句话了。」
		PRINTFORMW
		PRINTFORMW 「欢迎来到幻想乡，好好享受吧。」
		PRINTFORMW
	ELSEIF DAY:0 >= 2
		PRINTFORMW 「喂，那边的你」
		PRINTFORMW 突然被背后的空间裂缝中露出上半身的女性叫住了。
		PRINTFORMW 紫色的导师服加上金色长发，戴着白手套的妖艳美女——
		PRINTFORMW 「真是的，第一天不来和我见个面，你胆量真大啊，%CALLNAME:MASTER%」
		PRINTFORMW 「哎呀，对不起，我还没跟你打招呼呢，我是八云紫，我是这个世界的管理员。」
		PRINTFORMW 她一边这么说着，一边用手触摸着%CALLNAME:MASTER%的脸颊，凝视着脸。
		PRINTFORMW 「多么的既漂亮又阴森的眼睛啊，我可能喜欢%CALLNAME:MASTER%哦。」
		PRINTFORMW 「嘛，打招呼就到此为止，%CALLNAME:MASTER%到底是为什么来了呢？说服我吗？」
		PRINTFORMW 「呵呵，開玩笑啊，那我也是很忙的，下次再见吧。」
		PRINTFORMW 这样说的她，不知不觉间向空间的裂缝中探进身体，正要离開，好像又想起了什么似的，回头看了看。
		PRINTFORMW 「啊，对了，我忘了说一句话了。」
		PRINTFORMW
		PRINTFORMW 「欢迎来到幻想乡，好好享受吧。」
		PRINTFORMW
	ELSE
		PRINTFORMW 「喂，那边的你」
		PRINTFORMW 突然被背后的空间裂缝中露出上半身的女性叫住了。
		PRINTFORMW 紫色的导师服加上金色长发，戴着白手套的妖艳美女——
		PRINTFORMW 「叫%CALLNAME:MASTER%，真是个好名字啊。那么，从今天開始来到了幻想乡」
		PRINTFORMW 「哎呀，对不起，我还没跟你打招呼呢，我是八云紫，我是这个世界的管理员。」
		PRINTFORMW 她一边这么说着，一边用手触摸着%CALLNAME:MASTER%的脸颊，凝视着脸。
		PRINTFORMW 「多么的既漂亮又阴森的眼睛啊，我可能喜欢%CALLNAME:MASTER%哦。」
		PRINTFORMW 「嘛，打招呼就到此为止，%CALLNAME:MASTER%到底是为什么来了呢？说服我吗？」
		PRINTFORMW 「呵呵，開玩笑啊，那我也是很忙的，下次再见吧。」
		PRINTFORMW 这样说的她，不知不觉间向空间的裂缝中探进身体，正要离開，好像又想起了什么似的，回头看了看。
		PRINTFORMW 「啊，对了，我忘了说一句话了。」
		PRINTFORMW
		PRINTFORMW 「欢迎来到幻想乡，好好享受吧。」
		PRINTFORMW
	ENDIF
	RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K26_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
;地の文
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
IF LOCAL
	PRINTFORMW 「%CALLNAME:MASTER%、」
	PRINTFORMW 像往常一样突然被紫色的人叫住时，她悄悄地向%CALLNAME:MASTER%的脸伸出了手。
	PRINTFORMW 「什么时候看都觉得好恶心啊，%CALLNAME:MASTER%的眼睛」
	PRINTFORMW 一边这么说着，她吻了%CALLNAME:MASTER%的嘴唇。
	PRINTFORMW 「嗯……一直以来的会礼啊，%CALLNAME:MASTER%总会让我開心」
	PRINTFORMW 她这样说着，消失在间隙中。
	PRINTFORMW
	PRINTFORMW （也许做了蠢事……）
	PRINTFORMW 一边这样想着，一边抚摸着不知何时泛红的自己的脸颊，她踏上了归途。
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K26_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に接受かどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		;『硝子の中の幻想郷』
		;初回
		IF FIRSTTIME(1026)
			PRINTFORMW 「%CALLNAME:MASTER%、」
			PRINTFORMW 紫一反常态用破碎的语调搭话。
			PRINTFORMW 「不用那么紧张……我不会把你抓起来吃掉哟？」
			PRINTFORMW 「但，是啊，被抓住的人可能是我吧。」
			PRINTFORMW 「是患上了恋爱的病吧？更残酷的说法就是不治之症、精神病」
			PRINTFORMW 「虽然很怀念疗养院，但不凑巧是在这个幻想乡呢。」
			PRINTFORMW 「朋友都已经死了，事到如今还谈恋爱，可能会被人笑话——」
			PRINTFORMW 紫这么说着，把手伸向了%CALLNAME:MASTER%的脸
			PRINTFORMW
			PRINTFORMW 「——%CALLNAME:MASTER%，我喜欢你」
			PRINTFORMW
			PRINTFORMW 「所以，能和我交往吗？」
			PRINTFORMW 贤者的表情虚幻无常，一会儿认真的样子，一会儿好像要哭倒似的。
			PRINTFORMW 「和%CALLNAME:MASTER%在一起的时间很開心」
			PRINTFORMW 「和%CALLNAME:MASTER%在一起真的很開心」
			PRINTFORMW 「但是，一想到某一天总要到来，就觉得很悲伤。」
			PRINTFORMW 「就算一切都是玻璃中的幻想」
			PRINTFORMW 「但、现在喜欢%CALLNAME:MASTER%的事没有变」
			PRINTFORMW 「能和我成为恋人吗？」
			PRINTFORMW 低着头的少女颤抖着那样诉说了。
		;二回目の告白
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%、」
			PRINTFORMW 紫悲伤地编织着语言。
			PRINTFORMW 「这样的我，你能接受吗？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;『胡蝶の夢』
		;そもそも荘子の言う所の胡蝶の夢は夢の中で蝶になっていること自体になんら意味はなく、蝶は蝶で荘子は荘子として励めばいいという所、つまりどちらが夢でどちらが現実かというのは文字街道の問題外とかなんとか。
		PRINTFORMW 「…谢谢你」
		PRINTFORMW 她一边这样说着，一边转身——
		PRINTFORMW 在这个有限的世界里，为什么要追求永恒的爱呢
		PRINTFORMW 自然地珍爱他人，这也许确实是生物的本能。
		PRINTFORMW 但是，能享受那个过程，是恋爱之路的乐趣吗？
		PRINTFORMW 或者说这一切都如同那邯郸枕，都是虚幻。也许一切都是没有价值的，也许一切都是有价值的。
		PRINTFORMW 「今后，让我们一起享受这个有趣又可笑的世界吧。」
		PRINTFORMW 「因为现在还在变化，无论是高兴还是悲伤，这些到底都是非常幸福的事情。」
		PRINTFORMW 不管未来会怎样，我都会喜欢%CALLNAME:MASTER%的。
		PRINTFORMW ——用尽全力的笑容绞尽脑汁说出了这样的话。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		PRINTFORMW 结果还是独自一人的幻想乡吗……
		PRINTFORMW
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_SPEVENT_K26_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		IF CFLAG:318 == 1
			PRINTFORMW 紫消失了。
		ELSEIF TALENT:恋人
			PRINTFORMW 「如果能永远和%CALLNAME:MASTER%在一起的话……」
			PRINTFORMW 紫依依不舍地离開了。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「喂，就这样——」
			PRINTFORMW 「果然没什么，再见」
		ELSEIF TALENT:思慕
			PRINTFORMW 「能否再见面呢？」
		ELSE
			PRINTFORMW 「那么，下次有机会的话。」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K26_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;仕事中、今日会ってない。
	IF CFLAG:行動 == 5 && !TCVAR:26:今天有否见面
		PRINTFORMW 「现在正在工作，不要打扰我。」
	;今日会ってない。
	ELSEIF !TCVAR:26:今天有否见面
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;MASTERが入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
			;正月、バレンタイン、萬聖節、聖誕節の場合
			IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
				CALL SPECIALDAY_EVENT_K26
			ELSEIF CFLAG:318 == 1
				PRINTFORMW 「…我对你没兴趣，赶紧离開吧！」
			;屋外かつ満月
			ELSEIF NAME_MOON(DAY:3) == "十五夜 -中秋的名月- " && OPENPLACE(CFLAG:MASTER:現在位置) >= 2
				PRINTFORMW 「哎呀？%CALLNAME:MASTER%」
				PRINTFORMW 「你在干什么？」
				PRINTFORMW 「——月色真美啊，所以在看。」
			ELSEIF TALENT:恋人
				IF RAND:3 == 0
					PRINTFORMW 「哎呀？%CALLNAME:MASTER%、今天要做什么呢」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、找到了呢、今天要去哪里呢？」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%，你是来见我了吗？」
					PRINTFORMW 紫微微挥着手向%CALLNAME:MASTER%打招呼。
					PRINTFORMW 「我的眼睛什么開阔的地方都能看到，%CALLNAME:MASTER%%UNICODE(0x2665) *1%」
				ENDIF
			ELSEIF TALENT:恋慕
				IF RAND:3 == 0
					PRINTFORMW 「很高兴见到你、%CALLNAME:MASTER%」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、很高兴又见到你了」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%，还好吗？」
					PRINTFORMW 紫一发现%CALLNAME:MASTER%就元气地打招呼。
					PRINTFORMW 「我很好，有什么想做的事吗？」
				ENDIF
			ELSEIF TALENT:思慕
				IF RAND:3 == 0
					PRINTFORMW 「你在干什么呢、%CALLNAME:MASTER%」
					PRINTFORMW 「要找东西的话有其他专家哦」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、怎么了？」
				ELSE
					PRINTFORMW 「啊啦？不算少见的有趣家伙、有什么事儿吗？」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「哎呀，%CALLNAME:MASTER%，你看上去五体满意呢。」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、你好吗？」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%、巧遇呢」
					PRINTFORMW 「是偶然？还是必然？」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 2
			;正月、バレンタイン、萬聖節、聖誕節の場合
			IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
				CALL SPECIALDAY_EVENT_K26
			ELSEIF CFLAG:318 == 1
				PRINTFORMW 「…我对你没兴趣，赶紧离開吧！」
			;屋外かつ満月
			ELSEIF NAME_MOON(DAY:3) == "十五夜 -中秋的名月- " && OPENPLACE(CFLAG:MASTER:現在位置) >= 2
				PRINTFORMW 「哎呀？%CALLNAME:MASTER%，月色真美啊」
			ELSEIF TALENT:恋人
				IF RAND:3 == 0
					PRINTFORMW 「你在干什么呢、%CALLNAME:MASTER%」
					PRINTFORMW 「离群而寂寞啊」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、今天有何贵干？」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%、来了呀」
					PRINTFORMW 紫微微挥着手向%CALLNAME:MASTER%打招呼。
					PRINTFORMW 「%CALLNAME:MASTER%的居所是開阔的%UNICODE(0x2665) *1%」
				ENDIF
			ELSEIF TALENT:恋慕
				IF RAND:3 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、你在这做什么呢？」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「我无处不在、%CALLNAME:MASTER%却只是在这里」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%」
					PRINTFORMW 不知不觉来到身边的紫和%CALLNAME:MASTER%说话了。
					PRINTFORMW 「喂，%CALLNAME:MASTER%你看见了什么？」
				ENDIF
			ELSEIF TALENT:思慕
				IF RAND:3 == 0
					PRINTFORMW 「啊啦？巧遇呢、%CALLNAME:MASTER%」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、遇到坏妖怪了吗？」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%，你在干什么呢？」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「看起来挺精神的啊」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「来这里是有什么事儿吗？」
				ELSE
					PRINTFORMW 「哎呀，%CALLNAME:MASTER%，好像无病无灾呢」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;風呂のやつって浴場で遭遇と違うのかわからん
		;-------------------------------------------------
		;TARGETが風呂に入ってきて一緒に入る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 3
			IF TALENT:恋人
				PRINTFORMW 「一起进去吧」
				PRINTFORMW 「…我们就像是夫妇一样呢」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「啊啦？是先到的客人吗？」
				PRINTFORMW 紫这么说着走进了浴场。
				PRINTFORMW 「也不错呢、我们又不是陌生人」
			ELSEIF TALENT:思慕
				PRINTFORMW 「啊啦啊啦？知道我要进来所以抢先一步吗？」
				PRINTFORMW 「我很受欢迎呢」
			ELSE
				PRINTFORMW 「别在意、一起进去吧」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて出て行った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 4
			IF TALENT:恋人
				PRINTFORMW 「对不起、打扰了」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「不想打扰到先来的客人啊、下次再来吧」
			ELSEIF TALENT:思慕
				PRINTFORMW 「…失礼了」
			ELSE
				PRINTFORMW 「啊啦？是福利吗？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 5
			IF TALENT:恋人
				PRINTFORMW 「这可不是混浴的机会♪」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「作为一个努力工作的妖怪、有时候我想一个人放松一下♪」
			ELSEIF TALENT:思慕
				PRINTFORMW 「…抱歉、我想一个人洗」
			ELSE
				PRINTFORMW 「一般来说女士优先哦？对不起了呢」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;外出先で遭遇した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 6
			;正月、バレンタイン、萬聖節、聖誕節の場合
			IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
				CALL SPECIALDAY_EVENT_K26
			ELSEIF CFLAG:318 == 1
				PRINTFORMW 「…我对你没兴趣，赶紧离開吧！」
			;屋外かつ満月
			ELSEIF NAME_MOON(DAY:3) == "十五夜 -中秋的名月- " && OPENPLACE(CFLAG:MASTER:現在位置) >= 2
				PRINTFORMW 「哎呀？%CALLNAME:MASTER%」
				PRINTFORMW 「你在干什么？」
				PRINTFORMW 「——月色真美啊，所以在看。」
			ELSEIF TALENT:恋人
				IF RAND:3 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、有时间的话陪陪我怎么样？」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、找到了呢、今天要去哪里呢？」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%，你是来见我了吗？」
					PRINTFORMW 紫微微挥着手向%CALLNAME:MASTER%打招呼。
					PRINTFORMW 「我的眼睛什么開阔的地方都能看到，%CALLNAME:MASTER%%UNICODE(0x2665) *1%」
				ENDIF
			ELSEIF TALENT:恋慕
				IF RAND:3 == 0
					PRINTFORMW 「你在干什么呢、%CALLNAME:MASTER%」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、很高兴又见到你了」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%，还好吗？」
					PRINTFORMW 紫一发现%CALLNAME:MASTER%就元气地打招呼。
					PRINTFORMW 「我很好，有什么想做的事吗？」
				ENDIF
			ELSEIF TALENT:思慕
				IF RAND:3 == 0
					PRINTFORMW 「很高兴见到你、%CALLNAME:MASTER%」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%，在这种地方干什么？」
				ELSE
					PRINTFORMW 「哇！」
					PRINTFORMW 紫笑着叫出声。
					PRINTFORMW 「只是想给你个惊喜、别被吓到哦」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「哎呀，%CALLNAME:MASTER%，你看上去五体满意呢。」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、你好吗？」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%、巧遇呢」
					PRINTFORMW 「是偶然？还是必然？」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色と约会中に遭遇した
		;ARG:1に约会的对象
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 7
			;憤怒
			IF CFLAG:318 == 1
				PRINTFORMW 「……啊啊，我生气了」
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 1
			;憤怒 恋慕時 约会的对象が霊夢
				PRINTFORMW 「……是和灵梦约会，猜中了吗？」
			;憤怒 恋慕時 约会的对象が妖夢
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 23
				PRINTFORMW 「……妖梦的品味也很差」
			;憤怒 恋慕時 约会的对象が橙
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 24
				PRINTFORMW 「……萝莉控」
			;憤怒 恋慕時 约会的对象が藍
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 25
				PRINTFORMW 「……蓝，从什么时候開始品味就变得那么差了呢？」
			;憤怒 恋慕時 约会的对象が天子
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 34
				PRINTFORMW 「……真是很差的品味呢」
			;憤怒 恋慕時 约会的对象が華扇
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 43
				PRINTFORMW 「……不是这边吗？」
			;憤怒 恋慕時 约会的对象が幽幽子
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 66
				PRINTFORMW 「……幽幽子，作为朋友的忠告，还是放弃比较好」
			;憤怒 恋慕時 约会的对象が隠岐奈
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 124
				PRINTFORMW 「……是想要被埋在外护城河的吗？」
			ELSEIF TALENT:恋慕 && ARG:1 == 1
			;恋慕時 约会的对象が霊夢
				PRINTFORMW 「哎呀？灵梦比我要好吗？」
			;恋慕時 约会的对象が妖夢
			ELSEIF TALENT:恋慕 && ARG:1 == 23
				PRINTFORMW 「妖梦也算是认识男人了吧」
			;恋慕時 约会的对象が橙
			ELSEIF TALENT:恋慕 && ARG:1 == 24
				PRINTFORMW 「哼哼，我竟然会嫉妒橙呢。」
			;恋慕時 约会的对象が藍
			ELSEIF TALENT:恋慕 && ARG:1 == 25
				PRINTFORMW 「蓝，你也不会落空啊。」
			;恋慕時 约会的对象が天子
			ELSEIF TALENT:恋慕 && ARG:1 == 34
				PRINTFORMW 「还是一如既往的令人不快……就这么想这样夺走我的东西吗…！」
			;恋慕時 约会的对象が華扇
			ELSEIF TALENT:恋慕 && ARG:1 == 43
				PRINTFORMW 「就算是仙人也能感受到色欲吗？」
			;恋慕時 约会的对象が幽幽子
			ELSEIF TALENT:恋慕 && ARG:1 == 66
				PRINTFORMW 「幽幽子，是好朋友，也是竞争对手。」
			;恋慕時 约会的对象が隠岐奈
			ELSEIF TALENT:恋慕 && ARG:1 == 124
				PRINTFORMW 「彼此都有好兴趣呢……」
			ELSEIF TALENT:恋人
				PRINTFORMW 「被色欲涂抹也没关系，但也不要忘记我哦。」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「…没错，不是我吧」
			ELSEIF TALENT:思慕
				PRINTFORMW 「让妨碍者退散比较好吗？」
			ELSE
				PRINTFORMW 「哎呀？打扰了吗？」
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;特別な日イベント用関数
;==================================================
;-------------------------------------------------
@SPECIALDAY_EVENT_K26
;-------------------------------------------------
	;謹賀新年
	IF DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1
		IF TALENT:恋人
			PRINTFORMW 「新年快乐，%CALLNAME:MASTER%」
			PRINTFORMW 紫那样说了新年的寒暄。
			PRINTFORMW 「又是一年，请多关照♪」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「新年快乐，%CALLNAME:MASTER%」
			PRINTFORMW 紫做了新年的寒暄。
			PRINTFORMW 「呵呵，祝你度过愉快的一年。」
		ELSEIF TALENT:思慕
			PRINTFORMW 「新年快乐！」
			PRINTFORMW 紫做了新年的寒暄。
			PRINTFORMW 「今年的抱负是什么？」
		ELSE
			PRINTFORMW 「新年快乐！今年也请多多指教」
		ENDIF
	;情人節
	ELSEIF DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%、」
			PRINTFORMW 紫怯生生地向%CALLNAME:MASTER%搭话
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%，这个给你」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%，是送礼哟」
		ELSEIF CFLAG:2 >= 1000
			PRINTFORMW 「%CALLNAME:MASTER%，把手悄悄伸出来」
		ENDIF
		SELECTCASE CFLAG:好感度
		CASE 1000 TO 3000
			PRINTFORMW 「是的，义理巧克力」
			PRINTFORMW 紫给了巧克力。
			PRINTFORMW 「虽然现在没有特别的，但这是平时的礼品。」
		CASE 3001 TO 5000
			PRINTFORMW 紫把巧克力交给了%CALLNAME:MASTER%。
			PRINTFORMW 「弄到手也不算白费功夫，感谢吧？」
			PRINTFORMW 有点害羞的她匆匆忙忙地走了出去。
		CASE IS > 5000
			IF EXP:愛情経験 >= 100
				PRINTFORMW 「这是手工制作的。」
				PRINTFORMW 紫一边这样说着，一边把巧克力交给了你。
				PRINTFORMW 「一定……大概、绝对会做得很好吃……请吃吧」
			ELSE
				PRINTFORMW 「是，巧克力」
				PRINTFORMW 紫一边这样说着，一边把巧克力交给了你。
				PRINTFORMW 「因为是外面世界的东西，所以还挺贵的？」
			ENDIF
		ENDSELECT
	;萬聖節
	ELSEIF DAY:2 == 3 && DAY:3 == 30
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%，Trick or Treat♪」
			PRINTFORMW 紫跨过间隙向%CALLNAME:MASTER%搭话。
			PRINTFORMW 「…不给我点心我可要恶作剧了」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「Trick Or Treat♪」
			PRINTFORMW 紫一边说着一边搭话。
			PRINTFORMW 「%CALLNAME:MASTER%，你要糖果还是恶作剧？」
		ELSEIF TALENT:思慕
			PRINTFORMW 「Trick Or Treat♪」
			PRINTFORMW 紫一边把手搭在%CALLNAME:MASTER%的肩膀上一边嘟哝着。
			PRINTFORMW 「%CALLNAME:MASTER%总是在恶作剧，给我点什么吧」
		ELSE
			PRINTFORMW 「Trick Or Treat♪」
			PRINTFORMW 紫威胁说。
			PRINTFORMW 「…虽然这里真的有妖怪，但也许没有什么恶作剧呢」
		ENDIF
	;聖誕節
	ELSEIF DAY:2 == 4 && DAY:3 == 25
		IF TALENT:恋人
			PRINTFORMW %CALLNAME:MASTER%、圣诞节快乐%UNICODE(0x2665) *1%
			PRINTFORMW 紫開心地向%CALLNAME:MASTER%搭话。
			PRINTFORMW 「喂……今天这一天、能在一起吗？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 《%CALLNAME:MASTER%、圣诞节快乐♪》
			PRINTFORMW 紫这样说着跟你搭话。
			PRINTFORMW 「…方便的话约会吗？对，是圣诞节约会哦」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%、圣诞节快乐」
			PRINTFORMW 紫一边说着一边搭话。
			PRINTFORMW 「有空的话、我陪你吧，因为是圣诞节嘛。」
		ELSE
			PRINTFORMW 「圣诞节快乐，%CALLNAME:MASTER%」
			PRINTFORMW 紫这样说着跟你搭话。
			PRINTFORMW 「…看来没法收到礼物啊」
		ENDIF
	ENDIF
;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K26_2(ARG,ARG:1)
CALL MESSAGE_GOODMONING(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;非同棲かつ相手が先に起きてる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;TARGET私室にMASTERが入っている（恋慕時陪睡中就寝時のみ？
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		IF TALENT:恋人
			PRINTFORMW 「啊、%CALLNAME:MASTER%、早上好%UNICODE(0x2665) *1%」
			PRINTFORMW 紫開心地向%CALLNAME:MASTER%道早安。
			PRINTFORMW 「多少睡得好一些了吗？真可爱♪」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%、起床了呢」
			PRINTFORMW 紫道着早安。
			PRINTFORMW 「就这样看着你的睡脸真不错呢」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%、早上好♪」
			PRINTFORMW 紫道着早安。
			PRINTFORMW 「已经是中午了哦？时间感迟钝了可就麻烦了呢」
		ELSE
			PRINTFORMW 「接下来让我裸着穿上围裙去做饭比较好是吗？」
			PRINTFORMW 紫这么说着咯咯地笑出了声。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「啊、%CALLNAME:MASTER%、早上好%UNICODE(0x2665) *1%」
			PRINTFORMW 紫開心地向%CALLNAME:MASTER%道早安。
			PRINTFORMW 「多少睡得好一些了吗？真可爱♪」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%、起床了呢」
			PRINTFORMW 紫道着早安。
			PRINTFORMW 「就这样看着你的睡脸真不错呢」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%、早上好♪」
			PRINTFORMW 紫道着早安。
			PRINTFORMW 「已经是中午了哦？时间感迟钝了可就麻烦了呢」
		ELSE
			PRINTFORMW 「接下来让我裸着穿上围裙去做饭比较好是吗？」
			PRINTFORMW 紫这么说着咯咯地笑出了声。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORMW 「%UNICODE(0x2665) *1%」
			PRINTFORMW 紫幸福地睡着。
			PRINTFORMW 「和往常一样呢――」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「咕…呜…」
			PRINTFORMW 紫正睡着。
			PRINTFORMW 「一直待在这里会有问题吗？这不是我的本意啊…」
		ELSEIF TALENT:思慕
			PRINTFORMW 「再来点…」
			PRINTFORMW 紫睡得很香。
		ELSE
			PRINTFORMW 「……」
			PRINTFORMW 紫无声地睡着。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERが起きていて、相手が起きてきた
	;添い寝時TARGET起床はこちら（TARGET衰弱or陪睡中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;非同棲
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		IF TALENT:恋人
			PRINTFORMW 「呼啊～、啊啦？我睡过头了吗？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「呼啊～%CALLNAME:MASTER%、早上好♪」
		ELSEIF TALENT:思慕
			PRINTFORMW 「呼啊～%CALLNAME:MASTER%、早上好」
		ELSE
			PRINTFORMW 「呼啊～、啊啦？起得很早呢」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	;PRINTFORMW 「啊呀，早上好，%CALLNAME:MASTER%」
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に返回（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;恶作剧中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内角色がMAIN_MAPで衰弱状態になった場合か、待客室で相手が衰弱した場合に発生
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで回来了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色とのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;前のターンから一緒的房間にいる状態で相手が寝る（待客室含む（
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
	;其他
	PRINTFORMW 「那么，晚安。」
ENDIF
RETURN 1

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

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;霊夢が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;留琴が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他（角色指定無
	PRINTFORMW 「唔…感觉怪怪的、该怎么办啊♪」
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORMW 「明明有我的间隙，为什么还要带着这种东西走路呢？」
		PRINTFORMW 「难道是有这种兴趣吗？」
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;诶嘿嘿==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを推倒た（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%」
			PRINTFORMW 紫一边念着%CALLNAME:MASTER%的名字，一边推倒了%CALLNAME:MASTER%。
			PRINTFORMW 「喜欢」
			PRINTFORMW 紫一边这么说着，一边脱下%CALLNAME:MASTER%的衣服，让皮肤紧贴起来。
			PRINTFORMW 「喂，相融吧，身心合而为一。」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%……」
			PRINTFORMW 紫一边浮起笑容一边贴上了%CALLNAME:MASTER%。
			PRINTFORMW 「我呢……不行吗…？」
			PRINTFORMW 一边这么说，一边对%CALLNAME:MASTER%的脖子如同品尝甜点般舔舐着。
		ELSE
			PRINTFORMW 「…喂……」
			PRINTFORMW 紫说着就抱住了%CALLNAME:MASTER%
			PRINTFORMW 「…没有想过会被坏妖怪吃掉吗？」
			PRINTFORMW 紫一边温柔地爱抚%CALLNAME:MASTER%一边以情欲诱惑着。
		ENDIF
		TCVAR:26:発情 = 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;抜け出した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;摆脱失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;随便状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW 「都是让我喜欢的你的不好」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORMW 「还……不行……」
			RETURN 1
		ENDIF
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;工作開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF (DAY:2 == 4 && DAY:3 == 30)
			IF RAND:3 == 0
				PRINTFORMW 「啊…现在很忙」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「不能只把工作交给蓝」
			ELSE
				PRINTFORMW 「我到底在干什么呢？」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF (DAY:2 == 4 && DAY:3 == 30)
			IF RAND:3 == 0
				PRINTFORMW 「我居然在做这样的事情，不合理啊。」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「阶层错综复杂啊，简直就像是把意大利面塞进看不到里面的箱子里一样。」
			ELSE
				PRINTFORMW 「必须排除异物」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;工作結束
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF (DAY:2 == 4 && DAY:3 == 30)
			IF RAND:3 == 0
				PRINTFORMW 「哈哈，结束了，回去睡觉吧。」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「很疲惫啊，虽然没到三途川。」
			ELSE
				PRINTFORMW 「需要修改呢。」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（推倒指令に統合？
	;MASTERが推倒た（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「…嗯……%UNICODE(0x2665) *1%」
			PRINTFORMW 「更加……想要连接在一起……」
			PRINTFORMW 「一直一直一直……」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「…明明想要更多地感受…%CALLNAME:MASTER%的温暖……」
			PRINTFORMW 紫依依不舍地离開了身边。
		ELSEIF TALENT:思慕
			PRINTFORMW 「…再稍微……不，没什么」
		ELSE
			PRINTFORMW 「…任何事情都会有结束的时候啊」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
	;-------------------------------------------------
	;事後描写
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;精液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			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_K26_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_K26_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;胖次紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;無知持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
		;舐めとり
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚肛門射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
		;ソレ以外
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精口服避孕薬無
		IF ARG:1 == 1
		;非処女膣内射精口服避孕薬あり
		ELSEIF ARG:1 == 2
		;処女膣内射精
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K26_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K26_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「哼哼，名副其实的妖怪神社」
		PRINTFORMW 「但是，我很幸福。」
		PRINTFORMW 紫色用空虚的眼睛看着这边。
		PRINTFORMW 「…而且，这个神社的作用什么的……」
		PRINTFORMW 「因为是那样吧？我们的爱巢虽然没点情趣」
		PRINTFORMW 她一边说着一边拿起%CALLNAME:MASTER%的手
		PRINTFORMW 「但这就是这里的作用，幕布降下，舞台也只不过是舞台而已。」
		PRINTFORMW 像舞蹈一样将手搭在%CALLNAME:MASTER%的脖子上
		PRINTFORMW 「那么、代替了演员的你呢？」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「嘛，灵梦也不会这么放弃的吧。」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K26_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:318 == 1
			PRINTFORMW 「……」
			PRINTFORMW 紫不知不觉地消失了。
		ELSEIF TALENT:恋人
			PRINTFORMW 「那么，就在这附近分開吧。」
			PRINTFORMW 「…明天、也、一定」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「我还有空，那样的话…」
		ELSEIF TALENT:思慕
			PRINTFORMW 「真不巧，已经是末班车的时间了。」
		ELSE
			PRINTFORMW 紫不知什么时候消失了。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:318 == 1
			PRINTFORMW 「……」
			PRINTFORMW 紫不知不觉地消失了。
		ELSEIF TALENT:恋人
			PRINTFORMW 「那么，今天玩得很開心。」
			PRINTFORMW 「…下次再继续吧，我期待着」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「下次也这么開心就好了。」
		ELSEIF TALENT:思慕
			PRINTFORMW 「太晚了会被蓝骂的，对不起。」
		ELSE
			PRINTFORMW 紫不知什么时候消失了。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF CFLAG:318 == 1
			PRINTFORMW 「……」
			PRINTFORMW 紫不知不觉地消失了。
		ELSEIF TALENT:恋人
			PRINTFORMW 「特地送行什么的，很開心」
			PRINTFORMW 「…就是这种地方，喜欢%UNICODE(0x2665) *1%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「还特地从玄关处返还的意思呢。」
		ELSEIF TALENT:思慕
			PRINTFORMW 「就这附近吧，再见。」
		ELSE
			PRINTFORMW 「我不想被别人看到我进入的间隙……」
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K26_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K26_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;通常自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同室時自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;中だし精液自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無知持ち（自慰経験(調教自慰経験は差し引き)による分岐あり
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		LOCAL:2 = EXP:自慰経験 - EXP:調教自慰経験
		;無知消去イベントあり（表示は一度だけ
		IF LOCAL:1 >= 25
		;地の文分岐。書きたい場合は[SKIPSTART][SKIPEND]を削除してください
		[SKIPSTART]
		ELSEIF LOCAL:1 >= 20
		ELSEIF LOCAL:1 >= 15
		ELSEIF LOCAL:1 >= 10
		ELSEIF LOCAL:1 >= 5
		[SKIPEND]
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質あり自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;-------------------------------------------------
		;Ｃ敏感orＣ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｖ敏感orＶ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ａ敏感orＡ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｂ敏感orＢ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部位指定無し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			PRINTFORML
			RETURN 1
		ENDIF
		;其他
		;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;尻穴膣腔同時
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;膣腔のみ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;其他
		;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;我慢
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K26_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
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
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K26_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K26_25(ARG,ARG:1)
;口上主はLOCAL
;ARG:1	何人目の兒童か
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K26_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

;==================================================
;相手から约会のお誘い
;==================================================
@M_KOJO_EVENT_K26_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「喂，%CALLNAME:MASTER%，要不要约个会？」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「%CALLNAME:MASTER%，要去玩吗？」
			ELSEIF TALENT:思慕
				PRINTFORMW 「%CALLNAME:MASTER%，现在有空吗？」
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%，可以陪我玩吗？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「要是今晚过得開心就好了，%CALLNAME:MASTER%」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「呵呵，不要被误认为有什么异变就好。」
			ELSEIF TALENT:思慕
				PRINTFORMW 「对灵梦保密哦？会被退治的」
			ELSE
				PRINTFORMW 「来吧，在幻视之夜里彷徨吧」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「呵呵，那等下次再有机会吧。」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「哎呀，真遗憾啊」
			ELSEIF TALENT:思慕
				PRINTFORMW 「哎呀呀，说服的方法，我去请教蓝吧」
			ELSE
				PRINTFORMW 「真可惜，被甩了。」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「这样的好机会、不来我都房间吗？」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「也许能看到有趣的东西哦、不进来吗？」
			ELSEIF TALENT:思慕
				PRINTFORMW 「要来家庭访问吗？」
			ELSE
				PRINTFORMW 「不进来喝点茶吗？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「今天一整天都能和%CALLNAME:MASTER%一起度过呢♪」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「呋呋、不许后悔哦？」
			ELSEIF TALENT:思慕
				PRINTFORMW 「%CALLNAME:MASTER%、不知道有什么好怕的」
			ELSE
				PRINTFORMW 「那么，就通过这个间隙——」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORMW 「真可惜、但你什么时候来都可以哦」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「啊啦？真可惜」
			ELSEIF TALENT:思慕
				PRINTFORMW 「错过了难得的机会呢」
			ELSE
				PRINTFORMW 「嘛、很明智」
			ENDIF
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K26_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
				PRINTFORMW 「啊啦？兴奋了吗？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;变成只穿内衣的样子
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
				PRINTFORMW 「大概不会是男人喜欢的内衣…」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
				PRINTFORMW 「这种play会让你更兴奋吗？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;胖次ちょうだい
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE ARG:1
				;-------------------------------------------------
				CASE 0
				;交換です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「我也想要%CALLNAME:MASTER%的、作为供奉神明祭祀物似乎很有趣」
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「要用这个自慰吗？或许会让人更兴奋哦」
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「嘛…这倒是可以…」
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「欸——讨厌的变态」
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;憤怒口上
;==================================================
@M_KOJO_EVENT_K26_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの胆量で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「哼、你以为我不会生气吗？」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;泣かせてしまった　[膽怯]持ち
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;疲惫
		PRINTFORMW 「唔…不可以…%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;満足して解放
		PRINTFORMW 「呼…舒服多了…%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;満足したところを被逆推た
		PRINTFORMW 「嘛…美妙绝伦…%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;壊れるまでしてあげる
		PRINTFORMW 「别再想跑掉了…%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;一日の終了時(AFTERTRAニーの前)、面識がなければ呼び出されない
;==================================================
@M_KOJO_EVENT_K26_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

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

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

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

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

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

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

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

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

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

path: ERB/口上・メッセージ関連/個人口上/【26】紫/M_KOJO_K26_イベント.ERB


path: ERB/口上・メッセージ関連/個人口上/【26】紫/M_KOJO_K26_カウンター.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;逆肛交系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;90,被愛撫肛門
;==================================================
@M_KOJO_MESSAGE_COM_K26_90
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_90_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_90_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「对菊花抚慰什么的……。」
		PRINTFORMW 「不太习惯……。」
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「对菊花抚慰什么的……。」
		PRINTFORMW 「你喜欢就好了……。」
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW 「对菊花抚慰什么的……。」
		PRINTFORMW 「你喜欢就好了……。」
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW 「对菊花抚慰什么的……。」
		PRINTFORMW 「恩，算了……。」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;91,被舐肛門
;==================================================
@M_KOJO_MESSAGE_COM_K26_91
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_91_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_91_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「虽说是第一次。」
		PRINTFORMW 「居然这样，这样真狡猾。」
		PRINTFORMW 「给我记住了。」
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「我喜欢这种强势的,很羞耻吧？」
		PRINTFORMW 「喂、不要乱动。这样真狡猾。」
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW 「我为什么会这样………」
		PRINTFORMW 「唔，让我做这种事………」
		PRINTFORMW 「给我记住了。」
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW 「居然这样，这样真狡猾。」
		PRINTFORMW 「给我记住了。」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;92,被Ａ正常位
;==================================================
@M_KOJO_MESSAGE_COM_K26_92
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_92_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_92_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「虽然我喜欢强势的,但这里……」
		PRINTFORMW 「尻穴……算了，也不错啦。」
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「人体的境界，身后的世界……」
		PRINTFORMW 「你也是好事的家伙呢，算了，来吧……」
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW 「居然让我做这种事情……」
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW 「人体的境界，你怎么偏偏选了这个啊……」
		PRINTFORMW 「你也是好事的家伙呢，算了，来吧……」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;93,被Ａ後背位
;==================================================
@M_KOJO_MESSAGE_COM_K26_93
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_93_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_93_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「原来就是这种感觉啊……」
		PRINTFORMW 「第一次感觉到的……这种感觉。」
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「糟糕糟糕，这样下去会上瘾啊……」
		PRINTFORMW 「对你也是，对这个部分也是。」
		PRINTFORMW 「对对，……尻穴」
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW 「……」
		PRINTFORMW 「对你也是，对这个部分也是。」
		PRINTFORMW 「让人无语。」
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW 「你喜欢么这个。」
		PRINTFORMW 「对对，……尻穴」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;94,被Ａ騎乗位
;==================================================
@M_KOJO_MESSAGE_COM_K26_94
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_94_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_94_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「真是的又不是马……」
		PRINTFORMW 「不过，总归有第一次啦……」
		RETURN 1
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW 「这种感觉，到底是什么呢……」
		RETURN 1
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW 「糟糕糟糕，这样下去会上瘾啊……」
		PRINTFORMW 「这种刺激的感觉。」
		PRINTFORMW 「对对，……尻穴」
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW 「……」
		PRINTFORMW 「让人不爽。」
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW 「你喜欢么这个体位。」
		PRINTFORMW 「对对，……尻穴，以这样的姿态呵呵。」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;※※※※※※※※※※※※※※※※※※※※※※※※※
;助手による指令、及びレズプレイ
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;120,強制舐陰
;==================================================
@M_KOJO_MESSAGE_COM_K26_120
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_120_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_120_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「唔咕、呃啊，这……这味道……」
		PRINTFORMW 「你……居然……」
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「呵呵，就让我悠加丽式的给你好好品尝下吧……」
		PRINTFORMW 「真是不错的味道啊……」
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW 「唔……这个味道是……」
		PRINTFORMW 「你居然敢……」
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW 「唔咕、呃啊，这……这味道……」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;121,貝あわせ
;==================================================
@M_KOJO_MESSAGE_COM_K26_121
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_121_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_121_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「哈……像这样把女阴贴在一起，真是……」
		PRINTFORMW 「还是第一次啊……」
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「像这样把女阴贴在一起，然后摩擦」
		PRINTFORMW 「更多更多，让你的紫小姐感到開心吧……」
		PRINTFORMW 「哈哈哈……」
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW 「居然把那玩意贴上来……」
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW 「哈……像这样把女阴贴在一起，真是……」
		PRINTFORMW 「你啊……」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;123,给对方足交
;==================================================
@M_KOJO_MESSAGE_COM_K26_123
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_123_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_123_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「呵呵，采蘑菇~采蘑菇~的小姑娘……」
		PRINTFORMW 「用脚丫来采蘑菇，诶呀~……」
		PRINTFORMW 「你刚才说什么，不是小姑娘？这次就当没听到好了……」
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW 「呵呵，采蘑菇~采蘑菇~的小姑娘……」
		PRINTFORMW 「用脚丫来采蘑菇，诶呀~……」
		PRINTFORMW 「你刚才说什么，不是小姑娘？可不能这么说哦……」
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW 「呵呵，采蘑菇~采蘑菇~的小姑娘……」
		PRINTFORMW 「用脚丫来采蘑菇，诶呀~……」
		PRINTFORMW 「有点滑……」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;124,给对方手淫
;==================================================
@M_KOJO_MESSAGE_COM_K26_124
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_124_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_124_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「用手来做么，无妨啦……」
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「用手来做么，无妨啦……」
		PRINTFORMW 「如果你喜欢的话，其实还有更好的哦……」
		PRINTFORMW 「恩，手就好了么……」
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW 「用手来做么，无妨啦……」
		PRINTFORMW 「如果你喜欢的话，其实还有更好的哦……」
		PRINTFORMW 「恩，手就好了么……手就手吧。」
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW 「用手来做么，唉……」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;125,被愛撫
;==================================================
@M_KOJO_MESSAGE_COM_K26_125
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_125_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_125_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;126,互揉胸部
;==================================================
@M_KOJO_MESSAGE_COM_K26_126
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_126_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_126_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「呵呵……想体验欧派这样贴着的感觉？」
		PRINTFORMW 「怎么样，不错吧？」
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「呵呵……欧派这样贴着的感觉很棒吧？」
		PRINTFORMW 「这样浑厚的感觉，别处可是找不到的哦？」
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW 「呵呵……欧派这样贴着的感觉很棒吧？」
		PRINTFORMW 「这样浑厚的感觉，别处可是找不到的哦？」
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW 「……想体验欧派这样贴着的感觉？好吧。」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;=================================================
;特殊指令
;=================================================
;-------------------------------------------------
;180,潤滑液
;-------------------------------------------------
@M_KOJO_MESSAGE_COM_K26_180
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_180_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_180_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「啊、好厲害、这黏糊糊的感觉……」
		PRINTFORMW 「还是第一次玩这样的……」
		RETURN 1
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW 「啊、好厲害、这黏糊糊的感觉……」
		PRINTFORMW 「感觉要上瘾了呢……」
		RETURN 1
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW 「啊、好厲害、这黏糊糊的感觉……」
		PRINTFORMW 「感觉要上瘾了呢……」
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW 「啊、好厲害、这黏糊糊的感觉……」
		PRINTFORMW 「还不错呢……」
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW 「这黏糊糊的感觉……」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;181,媚薬,
;==================================================
@M_KOJO_MESSAGE_COM_K26_181
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_181_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_181_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「原来你不自信到要用这种东西么……哎呀，算了，也无妨」
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「现在还需要这个么……哎呀，算了，也无妨」
		PRINTFORMW 「就当是调剂好了。」
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW 「现在还需要这个么……哎呀，算了，也无妨」
		PRINTFORMW 「只要你喜欢的话。」
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW 「又要用这个了么……哎呀，算了，也无妨」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;182,利尿剤,
;==================================================
@M_KOJO_MESSAGE_COM_K26_182
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_182_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_182_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「等……你居然……在做什么啊……」
		PRINTFORMW 「用这种东西的后果你知道么……」
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「用这种东西，真是的，唉，如果不是你……」
		PRINTFORMW 「本来有点讨厌呢，但是你的话……罢了。」
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW 「用这种东西，真是的，唉，如果不是你……」
		PRINTFORMW 「算了，既然是你就这样吧。」
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW 「等……你居然……又拿这个……」
		PRINTFORMW 「用这种东西的后果你知道么……」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;183,攝像機,
;==================================================
@M_KOJO_MESSAGE_COM_K26_183
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_183_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_183_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORML 紫看到相机有些惊讶的样子
		PRINTFORMW 「呵呵…要拍下来么，妾身华丽的身姿。」
		RETURN 1
	ENDIF
	;基本セット
	;開始
	IF TEQUIP:视频拍摄
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 紫在相机面前搔首弄姿，尽情展示着自己的样子
			PRINTFORMW 「呵呵…要拍下来么，妾身华丽的身姿。」
			PRINTFORMW 「记得拍的美丽一些哦。」
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORML 紫在相机面前搔首弄姿，尽情展示着自己的样子
			PRINTFORMW 「呵呵…要拍下来么，妾身华丽的身姿。」
			PRINTFORMW 「记得拍的美丽一些哦。如果是你的话没问题哦」
			RETURN 1
		;それ以外
		ELSE
			PRINTFORML 紫看到相机有些惊讶的样子
			PRINTFORMW 「呵呵…要拍下来么，妾身华丽的身姿。」
			RETURN 1
		ENDIF
	;終了
	ELSE
		PRINTFORMW 「…要拍下来么，妾身华丽的身姿。」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;187,浴室PLAY
;==================================================
@M_KOJO_MESSAGE_COM_K26_187
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_187_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_187_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORML 要洗干净彼此么，紫似乎这样理解
		PRINTFORML 但知道你的意图后，她就恍然大悟
		PRINTFORMW 「原来如此，是想做那种事情……」
		RETURN 1
	ENDIF
	;基本セット
	;開始
	IF TEQUIP:浴室PLAY
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 浴室中，紫已经准备好了
			PRINTFORML 见到你边伸手迎接
			PRINTFORMW 「鸳鸯戏水，指的就是这样吧……」
			PRINTFORMW 「可是你想戏弄的不是这池中的水，是我吧……」
			PRINTFORMW 「我当然是说男女情爱之事那种戏弄了。」
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORML 浴室中，紫已经准备好了
			PRINTFORML 见到你边伸手迎接
			PRINTFORMW 「鸳鸯戏水，指的就是这样吧……」
			PRINTFORMW 「可是你想戏弄的不是这池中的水，是我吧……」
			PRINTFORMW 「我可是随便你戏弄哦。」
			RETURN 1
		;それ以外
		ELSE
			PRINTFORML 浴室中，紫已经准备好了
			PRINTFORML 两人抱在了一起。
			PRINTFORMW 「鸳鸯戏水，指的就是这样吧……」
			PRINTFORMW 「你很喜欢么……」
			RETURN 1
		ENDIF
	;終了
	ELSE
		PRINTFORML 浴室中，紫已经准备好了
		PRINTFORML 两人抱在了一起。
		PRINTFORMW 「鸳鸯戏水，指的就是这样吧……」
		PRINTFORMW 「你很喜欢么……」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;188,淋浴
;==================================================
@M_KOJO_MESSAGE_COM_K26_188
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_188_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_188_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORML 浴室中，紫拿起了喷头
		PRINTFORMW 「淋浴么……」
		RETURN 1
	ENDIF
	;基本セット
	;開始
	IF TEQUIP:淋浴
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 浴室中，紫拿起了喷头
			PRINTFORMW 「淋浴么……我来给你好好冲洗一下吧。」
			PRINTFORML 彼此冲洗了身体，紫似乎很享受这样。
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORML 浴室中，紫拿起了喷头
			PRINTFORMW 「淋浴么……我来给你好好冲洗一下吧。」
			PRINTFORML 彼此冲洗了身体，紫似乎很享受这样。
			RETURN 1
		;それ以外
		ELSE
			PRINTFORML 浴室中，紫拿起了喷头
			PRINTFORMW 「淋浴么……」
			PRINTFORML 彼此冲洗了身体。
			RETURN 1
		ENDIF
	;終了
	ELSE
		PRINTFORML 浴室中，紫拿起了喷头
		PRINTFORMW 「淋浴么……」
		PRINTFORML 彼此冲洗了身体。
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;189,新妻PLAY
;==================================================
@M_KOJO_MESSAGE_COM_K26_189
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_189_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_189_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORML 紫，有些惊讶。
		PRINTFORMW 「女孩子啦，都会想当一次新娘子了。」
		RETURN 1
	ENDIF
	;基本セット
	;開始
	IF TEQUIP:新妻PLAY
		;恋慕
		IF TALENT:恋慕
			PRINTFORML 紫，呵呵的笑着。
			PRINTFORMW 「怎么样，我漂亮么。」
			PRINTFORMW 「还需要问什么，先洗澡还是先吃饭么。」
			PRINTFORMW 「不过已经不是第一次了，就不能叫新妻了，呵呵。」
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORML 紫在恭候着你。
			PRINTFORMW 「怎么样，我漂亮么。」
			PRINTFORMW 「还需要问什么，先洗澡还是先吃饭么。」
			PRINTFORMW 「让你满意就好。」
			RETURN 1
		;それ以外
		ELSE
			PRINTFORML 紫在恭候着你。
			PRINTFORMW 「怎么样，我漂亮么。」
			PRINTFORMW 「还需要问什么，先洗澡还是先吃饭么。」
			RETURN 1
		ENDIF
	;終了
	ELSE
		PRINTFORML 紫在恭候着你。
		PRINTFORMW 「怎么样，我漂亮么。」
		PRINTFORMW 「还需要问什么，先洗澡还是先吃饭么。」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;190,新妻（になる）プレイ
;==================================================
@M_KOJO_MESSAGE_COM_K26_190
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K26_190_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K26_190_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;開始
	IF TEQUIP:圍裙
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 1
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;終了
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;SOURCEやNOWEXを使ってSELECTCOMに依存しない口上があってもいいんじゃない
@M_KOJO_MESSAGE_COM_K26_00
;性交処女喪失をRETURN 100して
;IF RESULT == 100 でまとめるとか
;苦痛や快楽のSOURCEをトリガーとして汎用あえぎ口上を作るとか
;いろいろ利用方法は考えられますが随意やってください

;-------------------------------------------
;調教後の文本
;TFLAG:8 (1=TARGETがお掃除 2=ASSIがお掃除 3=TARGETとASSIがお掃除)
;-------------------------------------------
@M_KOJO_MESSAGE_PALAMCNG_C_K26
CALL PALAM_MESSAGE_C
;処女喪失
IF TCVAR:破瓜
	;正真正銘処女喪失
	IF TCVAR:破瓜 == 1
	;再生処女喪失
	ELSEIF TCVAR:破瓜 == 2
	;無自覚非処女喪失
	ELSEIF TCVAR:破瓜 == -1
	ENDIF
ENDIF

;Ａ処女喪失
IF TCVAR:Ａ破瓜
	;正真正銘Ａ処女喪失
	IF TCVAR:Ａ破瓜 == 1
	;無自覚Ａ処女喪失
	ELSEIF TCVAR:Ａ破瓜 == -1
	ENDIF
ENDIF

;口交で射精後のお掃除
IF (TCVAR:MASTER:112 == 1 || TCVAR:MASTER:112 == 2) && SELECTCOM == 81
	PRINTFORMW
ENDIF

path: ERB/口上・メッセージ関連/個人口上/【26】紫/M_KOJO_K26_コマンド.ERB