code:
;-------------------------------------------------
;各種打招呼
;注意！ここのセリフは基本的に颜绘が付きます！！
;颜绘に変化を付けたい場合にはセリフの前でEMOTION_PLUSを用いる事で変えられます。
;例）恥じらった顔にさせたい場合には CALL EMOTION_PLUS, "害羞", TARGET
;-------------------------------------------------
@KOJO_GREETING_K66, ARGS
#DIM MEMO_LINECOUNT
;イベント発生中の角色
#DIM ACTOR
;イベント発生中の角色の默认のCALLNAME
#DIMS CALLNAME_ACTOR

MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
CASE "朝拘束"

;朝のＨイベントでのセリフ。下の"打招呼"だけ書いてあれば十分だと思います
;ここでCALL SETFLAG, "地の文スキップ"すると地の文、経験表示、本来なら続いて表示される下のCASE "打招呼"の台詞、を全てすっ飛ばせます(上級者向け)
;詳しくは@EVENT_NEWDAYの注釈などを見てください
CASE "朝袭"
	SELECTCASE CSTR:朝袭
	CASE "朝逆正常位"

	CASE "朝舐陰"

	CASE "朝足交"

	CASE "朝の新妻PLAY"

	CASE "朝乳交"

	CASE "朝騎乗位"

	CASE "朝Ａ騎乗位"

	CASE "朝接吻"

	CASE "朝添い寝"

	CASE "朝口交", "朝六九式"

	ENDSELECT
;朝のＨイベント終了後にする打招呼
CASE "打招呼"
	SELECTCASE CSTR:朝袭
	CASE "朝口交"
		;[IF_DEBUG]
		;	PRINTFORMW KOJO_GREETING_K66, %ARGS%, %CSTR:朝袭%
		;[ENDIF]
	CASE "朝騎乗位"
		;[IF_DEBUG]
		;	PRINTFORMW KOJO_GREETING_K66, %ARGS%, %CSTR:朝袭%
		;[ENDIF]
	ENDSELECT

	;何か発言してたらここまで
	SIF LINECOUNT > MEMO_LINECOUNT
		RETURN 1

	IF COND("体育")
		PRINTFORMW
	ELSE
		;[IF_DEBUG]
		;	PRINTFORMW KOJO_GREETING_K66, %ARGS%
		;[ENDIF]
	ENDIF
CASE "登校"
	IF DAYEV("試験当日")

	ELSEIF DAYEV("試験返却日")

	ELSEIF COND("朝袭相手")

	ELSEIF COND("体育")

	ELSEIF COND("水泳")

	ELSE

	ENDIF
;この角色と一緒に部室に入った際に誰も他にいない場合
CASE "一番乗り"
	STR:1 = 「む……今日は……%CNAME("一人称")%が……最初、か……」#F重置/斜眉/無口系
	IF TALENT:恋慕
		STR:2 = きょろきょろと落ち着かない様に視線をうろうろさせる%CALLNAME:TARGET%にどうしたのかと聞くと#F重置/斜眼４/飘忽/困扰眉/紅潮２/頬手
		STR:3 = 「な、何でもない……ただ……%CNAME("二人称")%と……二人きり……なんだな……と、思った……だけ……」#F重置/困扰眉/小口２/紅潮２/对话框汗２/頬手
	ELSE
		STR:2 = 「何時も……思う、のだが……」#F重置/半目/困扰眉/小口２
		STR:3 = 「部外者が……学び舎に……入るのは……良いの……だろう、か……？」#F重置/闭眼２/困扰眉/へ字３
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
CASE "ただいま"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			STR:1 = 「ん……ただいま、%CALLNAME:MASTER%……」#F重置/斜眉/微笑３
			IF RAND:3 ==  0
				STR:2 = 「ふふっ……♪」#F重置/笑颜４/斜眉/微笑３
				STR:3 = 「何でもない……ただ……少し、嬉しく……思った……だけ……」#F重置/半目/斜眉/微笑３
			ENDIF
		ELSE
			STR:1 = 「戻った……」#F重置/半目/困扰眉/小口２
		ENDIF
	ELSE
		STR:1 = 「戻った……」#F重置/闭眼２/小口２
		IF RAND:10 == 0
			STR:2 = 「今日は……仕事があった……」#F重置/半目/困扰眉/小口２
			STR:3 = 「はふ……疲惫……」#F重置/闭眼２/困扰眉/小口２/叹气
		ELSE
			STR:2 = 「少し……散步に……出ていた……だけ……」#F重置/半目/小口２
		ENDIF
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
CASE "既に入室"
	;家で出迎えてくれる時
	IF COND("夜")
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				STR:1 = 「おかえり、%CALLNAME:MASTER%……」#F重置/半目/斜眉/微笑３
				IF FLAG:二人きり && RAND:3 == 0
					STR:2 = 「帰って……くるのが……少し、待ち遠しかった……」#F重置/笑颜４/斜眉/微笑３/紅潮/頬手
				ENDIF
			ELSE
				STR:1 = 「あ、ああ……おかえり……%CNAME("二人称")%……」#F重置/困扰眉/小口２
			ENDIF
		ELSE
			STR:1 = 「ん……%CNAME("二人称")%、か……」#F重置/半目/斜眉/無口系
		ENDIF
	ELSE
		IF TALENT:恋慕 && CEVENT("満ちた月")
			IF FLAG:二人きり
				STR:1 = 「ぁ、いらっしゃい……%CALLNAME:MASTER%……横、どう……？」#F重置/半目/斜眉/微笑３/布
				STR:2 = そう言って%CALLNAME:TARGET%が手招きするから彼女の横に座った。
				STR:3 = _暗灰色_「ふふっ……♪Corculum……♪」#F重置/笑颜４/斜眉/微笑３/紅潮
				;かー！二人きりで人目がないからって「愛しい人」とか言って卑しい女ばい！
			ELSE
				STR:1 = 「ん……先に……寛がせて……貰っている、ぞ……」#F重置/笑颜４/斜眉/微笑３
			ENDIF
		ELSE
			STR:1 = 「%CNAME("二人称")%か……先に……寛がせて……貰っている、ぞ……」#F重置/闭眼２/小口２
		ENDIF
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET

CASE "入室打招呼"
	IF CFLAG:呼び出された
		IF TALENT:恋慕 && CEVENT("満ちた月")
			STR:1 = 「ん……%CNAME("二人称")%……%CNAME("一人称")%に……何用……？」#F重置/半目/斜眉/微笑３
		ELSE
			STR:1 = 「%CNAME("二人称")%……%CNAME("一人称")%に……何用……？」#F重置/半目/困扰眉/小口２
		ENDIF
	;你が現在的partnerにＨ的悪戯をしている最中に入室した（partnerへの呼びかけはCNAME("partner")で出来る）
	ELSEIF COND("Ｈ的いちゃつき中", MASTER)
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				IF PLACE("部室")
					STR:1 = 「%CNAME("二人称")%……学び舎、では……程々に……」#F重置/闭眼２/困扰眉/小口２
					STR:2 = 呆れた顔をしながら%CALLNAME:TARGET%に注意をされた……
				ELSE
					STR:1 = 「………」#F重置/半目/对话框・・・
					STR:2 = 部屋に入って来た%CALLNAME:TARGET%が白けた瞳で見つめてくる……
					IF RAND:3 == 0
						STR:3 = と、思ったら街道すがりに脛を蹴られた……#F重置/半目/嘟嘴
					ENDIF
				ENDIF
			ELSE
				STR:1 = 「%CNAME("一人称")%……いや……何でもない……」#F重置/半目/困扰眉/小口２
				STR:2 = 何かを言おうとして止めた後に%CALLNAME:TARGET%はソファーに腰かけた……#F重置/陰/困扰眉/無口系
			ENDIF
		ELSE
			STR:1 = 「%CNAME("二人称")%が……どこで……催そうが……良い、けれど……」
			STR:2 = 「人目は……気にした方が……良い……」
		ENDIF
	ELSE
		STR:1 = 「失礼、する……」#F重置/闭眼２/小口２
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
;部屋にいる他の人から打招呼を返される打招呼。WAITの使用は一回が望ましい
CASE "簡易入室打招呼"
	;遅れた時のセリフ（既に部員の４分の３が集合済）
	IF CHARA_NUM("入室打招呼時の室内人数") >= CHARANUM*3/4 && RAND:3 == 0
		STR:1 = 「む……遅れた……よう、だな……すまない……」#F重置/闭眼２/困扰眉/小口２
	ELSEIF CFLAG:呼び出された
		STR:1 = 「ん……こんにちは、だ……%CNAME("二人称")%、%CNAME("一人称")%に……何用……？」#F重置/半目/小口２
	ELSE
		STR:1 = 「ん……失礼、する……」#F重置/闭眼２/小口２
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
;簡易入室打招呼に対する返し。WAITの使用は一回が望ましい
;誰が入室してきた人はCOND("入室打招呼中")がONなのでFIND_COND("入室打招呼中")で検索可能
;また、入ってきた人数はCHARA_NUM("入室打招呼中")で調べられる
CASE "打招呼返し"
	;打招呼してきた人の中から一人選ぶ
	ACTOR = FIND_COND("入室打招呼中")
	;選ばれた角色の默认のCALLNAME。この角色への呼びかけはCNAME(CALLNAME_ACTOR) で出来る
	CALLNAME_ACTOR = %CSVCALLNAME(NO:ACTOR)%

	;ここでは括弧に『』を使う

	;打招呼してきた人に老师が混じっている
	IF FIND_COND("教員", "入室打招呼中")
		STR:1 = 『%CSVCALLNAME(NO:ACTOR)%教諭……こんにちは、だ……』#F重置/半目/小口２
	;相手が現れるのが遅かった（既に部員の４分の３が集合済）
	ELSEIF CHARA_NUM("入室打招呼時の室内人数") >= CHARANUM*3/4 && RAND:3 == 0
		STR:1 = 『%CSVCALLNAME(NO:ACTOR)%殿……こんにちは、だ……』#F重置/半目/小口２
	ELSE
		STR:1 = 『%CSVCALLNAME(NO:ACTOR)%殿……こんにちは、だ……』#F重置/半目/小口２
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET

CASE "居間に現れた"
	IF CFLAG:呼び出された
		IF TALENT:恋慕 && CEVENT("満ちた月")
			STR:1 = 「ん……%CNAME("二人称")%……%CNAME("一人称")%に……何用……？」#F重置/半目/斜眉/微笑３
		ELSE
			STR:1 = 「%CNAME("二人称")%……%CNAME("一人称")%に……何用……？」#F重置/半目/困扰眉/小口２
		ENDIF
	;一度居間から別の場所に行って、居間に帰って来た時
	ELSEIF CMOVE("居間")

		STR:1 = 「戻った……」#F重置/闭眼２/小口２
	ELSE
		STR:1 = 「ん……」#F重置/闭眼２/無口系
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET

CASE "抜け出された"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			STR:1 = 「Te velle me eligere...」#F重置/半目/困扰眉/嘟嘴３
		ELSE
			STR:1 = 「いって、らっしゃい……」#F重置/陰/困扰眉/小口２
		ENDIF
	ELSE
		STR:1 = 「はぁ……盛ん……」#F重置/闭眼２/困扰眉/小口２
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET

CASE "便当"
	IF TALENT:恋慕
		STR:1 = 「ん……%CNAME("二人称")%……頼まれていた……便当……」#F重置/半目/斜眉/微笑３
	ELSE
		STR:1 = 「ん……%CNAME("二人称")%……頼まれていた……モノ……」#F重置/闭眼２/無口系
	ENDIF
	STR:2 = そう言って%CALLNAME:TARGET%が便当を%CALLNAME:MASTER%に差し出す。
	IF DEVENT("共に吃飯を") == 0
		IF TALENT:恋慕
			STR:3 = 「その……一緒に……どう……？」#F重置/斜眼４飘忽/困扰眉/小口２/紅潮/頬手
			STR:4 = もう一つ便当箱を取り出して、期待するような瞳で見てくる%CALLNAME:TARGET%に良いぞと答えると。#F重置/半目/困扰眉/無口系/紅潮/頬手
			CALL DIALOGUE_FRAME_NAMEW, TARGET
			STR:1 = 「ぁ……ふふっ……有がとう……」#F重置/笑颜４/斜眉/微笑３/对话框開心
			STR:2 = 露出笑容開心地する%CALLNAME:TARGET%を横に座らせ、一緒にお昼ご飯を食べた……
		ELSE
			STR:3 = 「では……失礼、する……」#F重置/闭眼２/小口２
			STR:4 = すっと立ち去ろうとする%CALLNAME:TARGET%を引き留めて一緒に食べないか？と提案してみると。#F重置/無口系
			CALL DIALOGUE_FRAME_NAMEW, TARGET
			STR:1 = 「む……%CNAME("一人称")%も……か……？」#F重置/半目/小口２/对话框？
			STR:2 = %CALLNAME:MASTER%の提案に彼女は少し考える様な素振りをした後に#F重置/闭眼２/無口系/对话框・・・/托下巴
			STR:3 = 「すまない……実は……先に……済ませた……」#F重置/半目/困扰眉/小口２
			STR:4 = 先に済ましていたのは仕方がない、言っていなかった自分が悪いと%CALLNAME:MASTER%は言い。#F重置/闭眼２/困扰眉/無口系
			STR:5 = なら、お昼が終わるまで少し話さないかと改めて提案し直した。
			STR:6 = 「ふむ……%CNAME("二人称")%が……望むの、であれば……そうしよう……」#F重置/半目/小口２
			STR:7 = それから暫く%CALLNAME:TARGET%と会話しながら彼女の作ってくれた便当を楽しんだ……#F重置/闭眼２/無口系
		ENDIF
		CALL SET_DEVENT, "共に吃飯を"
	ELSE
		IF TALENT:恋慕
			IF RAND:5 == 0
				STR:3 = 「今日も……一緒に……食べて……良い……？」#F重置/半目/斜眉/微笑３
				STR:4 = 用意していた自分の弁当を飘忽と見せ、怯生生地聞いてくる%CALLNAME:TARGET%の姿に
				STR:5 = 「？」#F重置/笑颜４/斜眉/微笑３/对话框？
				STR:6 = 一瞬、幼子を見る目变成了がぐっと堪えて、一緒に食べようかと返した。
			ELSE
				STR:3 = 「今日も……一緒に……食べる……？」#F重置/半目/斜眉/微笑３
				STR:4 = 飘忽と自分用の便当を見せて、%CALLNAME:TARGET%が聞いてくるので一緒に食べようかと返して一緒に昼食を始めた。#F重置/笑颜４/斜眉/微笑３
			ENDIF
			CALL DIALOGUE_FRAME_NAMEW, TARGET
			IF RAND:3 == 0
				STR:1 = 「今日、のは……旬の……食材を、使ってみた……の、だけれど……どう……？」#F重置/半目/斜眉/小口２/对话框？
				STR:2 = ふむ、%CALLNAME:TARGET%の言葉に釣られて普段より味わって食べてみる。#F重置/半目/斜眉/無口系
				STR:3 = ……確かに今の季節以外で食べるよりも美味しさが違く感じる。#F重置/半目/斜眉/微笑３
				STR:4 = 「ふふっ……目利きも……頑張ったから……少し、自信作……」#F重置/笑颜４/斜眉/小口２
				STR:5 = 胸を張り、少し得意げな顔をする%CALLNAME:TARGET%に微笑ましいモノを感じ的同时、彼女との昼食を楽しんだ……#F重置/半目/斜眉/微笑３
			ELSEIF RAND:2 == 0
				STR:1 = 「ぁ……口の端に……%TEXTR(@"おかず/ご飯")%、着いてる……ん……取れた……」#F重置/半目/斜眉/微笑３
				STR:2 = そう言って%CALLNAME:TARGET%が口の端を拭ってくれた。
				STR:3 = 「美味しそう、に……食べて、くれるのは……嬉しい、けれど……注意、しないと……ダメ……」#F重置/笑颜４/困扰眉/微笑３/頬手
				STR:4 = 圆圈で幼子の様な扱いだが、これはこれで良いなと思う%CALLNAME:MASTER%だった。
			ELSE
				STR:1 = 「今日の……便当は……どう……？」#F重置/斜眉/小口２/对话框？
				STR:2 = 味の感想を聞いてきた%CALLNAME:TARGET%に箸の進みで察してほしいと返すと
				STR:3 = 「ん……%CALLNAME:MASTER%の……舌に、合って……良かった……」#F重置/笑颜４/斜眉/微笑３
				STR:4 = 「美味しく、なかったら……言って、ね……？練習、するから……」#F重置/半目/左笑颜４/斜眉/小口２/頬手
				STR:5 = 果たして、彼女のご飯が美味しくないと言う日は来るのだろうか？#F重置/笑颜４/斜眉/微笑３/頬手
				STR:6 = 何て思いながら%CALLNAME:TARGET%との昼食を楽しんだ……
			ENDIF
		ELSE
			STR:3 = 「ん……では……食べよう……か……」
			STR:4 = そう言って自分用に用意した、便当を広げ%CALLNAME:MASTER%の隣に座って一緒に昼食を始めた……
			CALL DIALOGUE_FRAME_NAMEW, TARGET
			IF RAND:3 == 0
				STR:1 = 「今日は……%TEXTR(@"肉/野菜/おかず")%を……很多に……した……」#F重置/闭眼２/小口２
				STR:2 = 言われて見てみると確かに前より比率が少し寄っているのが分かった。#F重置/闭眼２/無口系
				STR:3 = 「この間……%CNAME("二人称")%の……箸が……よく、進んでいた……から……」#F重置/半目/小口２
				STR:4 = 細かな心遣いだが実際にされると少し嬉しいモノだ……
			ELSEIF RAND:2 == 0
				STR:1 = 「%CNAME("二人称")%……口の端に……着いてる……ん……取れた……」#F重置/半目/無口系
				STR:2 = そう言って%CALLNAME:TARGET%が口の端を拭ってくれた。
				STR:3 = 「そうして……食べるのは……善いけれど……少しは……気を、付けよ……」#F重置/闭眼２/斜眉/小口２
				STR:4 = 少しだけ呆れた様な顔をしながらも口調は穏やかだった……
			ELSE
				STR:1 = 「今日、のは……%CNAME("二人称")%の口に……合って、いるか……？」#F重置/半目/斜眉/小口２/对话框？
				STR:2 = %CALLNAME:TARGET%の便当を食べていると、味はどうだと聞かれたので美味しいと返すと。
				STR:3 = 「そう、か……%CNAME("二人称")%の口に……合って、いるなら……良い……」#F重置/闭眼２/斜眉/小口２
				STR:4 = 少しだけ開心地、僅かに口角を上げて%CALLNAME:TARGET%が微笑む……#F重置/闭眼２/斜眉/微笑３
			ENDIF
		ENDIF
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
;同じ部屋にいる他の人がＨを開始した際のセリフです
CASE "他の人がＨ開始"

ENDSELECT

;-------------------------------------------------
;メイン画面での台詞。いわゆる一言イベント強化版
;ちなみに画面随机属性しても同じセリフを喋ります
;選択肢に挟まれた場所で出力するのでWAITの使用は禁止
;动画ーションの関係上、１ターンに何度も呼ばれたりするのでフラグ操作をする場合には
;IF CFLAG:KOJO_DAILY済 == 0
;で分岐させるのが良いでしょう
;-------------------------------------------------
@KOJO_DAILY_K66, ARGS
#DIM MEMO_LINECOUNT
MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
;初回のセリフ
CASE "初回台詞"
	PRINTFORML 「ん……%CNAME("二人称")%……これから……よろしく……」
CASE "浑身是汗"
	CALL EMOTEFACE, "重置/半目/左闭眼２/蹙眉/無口系/对话框乱/頬汗"
	IF RAND:2 == 0
		PRINTFORML 「やはり……この国の……夏は……蒸し、暑い……」
	ELSE
		PRINTFORML 「火口部に……比べれば……涼しい、が……比べる、べき……モノでは……ない、な……」
	ENDIF
CASE "刚睡醒"
	IF CHOSE_DEVENT("睡眠姦Ｖ中出し") || CHOSE_DEVENT("睡眠姦口交") || CHOSE_DEVENT("睡眠姦ティッシュ処理")
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				CALL EMOTEFACE, "重置/半目/困扰眉/無口系/对话框・・・"
				PRINTFORML 「むぅ……するなら……起こして……欲しかった……」
			ELSE
				CALL EMOTEFACE, "重置/半目/困扰眉/無口系/对话框・・・"
				PRINTFORML 「その……いや……なんでも……ない……」
			ENDIF
		ELSE
			CALL EMOTEFACE, "重置/斜眼４/对话框・・・"
			PRINTFORML 「豐腴を……していた……%CNAME("一人称")%が……悪い、とは言え……」
			PRINTFORML 「些か……趣味が……悪い、ぞ……%CNAME("二人称")%……」
		ENDIF
	ELSE
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				CALL EMOTEFACE, "重置/半目/斜眉/微笑３/对话框開心"
				PRINTFORML 「ぁ……%CALLNAME:MASTER%……」
				PRINTFORML 「ふふっ……目覚めに……%CALLNAME:MASTER%の顔を……見れて……良かった……」
			ELSE
				CALL EMOTEFACE, "重置/闭眼２/困扰眉/無口系/对话框困倦"
				PRINTFORML 「ぁ……す、すまない……少し……眠っていた……すまない……」
			ENDIF
		ELSE
			CALL EMOTEFACE, "重置/斜眼４/左闭眼２/無口系/对话框困倦"
			PRINTFORML 「ん……ああ……%CNAME("二人称")%か……夢に、現を……抜かして、いた……すまない……」
		ENDIF
	ENDIF
CASE "Cosplay中"
	PRINTFORML
CASE "点心の感想"
	;今日の点心を用意したのは自分
	IF COND("点心当番")
		PRINTFORML
	;今日の点心は誰かの亲手自制
	ELSEIF COND("亲手自制点心")
		;今日の点心当番の人の亲手自制を初めて食べた
		IF DEVENT(@"%TEXTS("点心当番")%の亲手自制") == 0
			;点心当番が[料理擅長]
			IF COND("点心の作り手が料理擅長")
				PRINTFORML
			ELSE
				PRINTFORML
			ENDIF
		ELSE
			PRINTFORML
		ENDIF
	;点心が亲手自制でない
	ELSE
		PRINTFORML
	ENDIF
;沉眠著
CASE "睡眠"
	;梦话
	CALL KOJO_SLEEP_K66
	;梦话用の汎用地の文呼出
	CALL DAILY_MESSAGE, "梦话"
ENDSELECT

;何か発言してたらここまで
SIF LINECOUNT > MEMO_LINECOUNT
	RETURN 1

;前回指令対応台詞
SELECTCASE CONDS("直前行動")
CASE "愛の告白"
	CALL EMOTEFACE, "重置/"
	PRINTFORML 「%CNAME("二人称")%……いや、%CALLNAME:MASTER%……これからも……よろしく……」
CASE "约会的约定"
	PRINTFORML
;これは悪魔や天使や驱魔人のみ
CASE "契約成立"
	PRINTFORML
;你にお願いされて、自分の力で巨根になってあげた(悪魔と天使のみ)
CASE "巨根化契約成立"
	PRINTFORML
CASE "短小化契約成立"
	PRINTFORML
CASE "摆脱"
	SELECTCASE SAVESTR:現在位置
		CASE "做爱房"
			IF TALENT:恋慕
				CALL EMOTEFACE, "重置/半目/斜眉/微笑３"
				PRINTFORML 「ん……人目が……ある、所で……する、より……」
				PRINTFORML 「こうして……二人きりで……する、方が……%CNAME("一人称")%は……好き……」
			ELSE
				CALL EMOTEFACE, "重置/斜眼４/对话框・・・"
				PRINTFORML 「学院に……こう言った……場所を……用意……する、か……」
				PRINTFORML 「その努力と……行動力を……もう少し……違う所に……活かせ……」
			ENDIF
		CASE "保健室", "体育倉庫", "更衣室"
			IF TALENT:恋慕
				CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
				PRINTFORML 「ぅ、うぅん……誰かが……来るかも、しれない……のは……」
				PRINTFORML 「少し……苦手……」
			ELSE
				CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
				PRINTFORML 「%CNAME("一人称")%は……気にせぬ、が……」
				PRINTFORML 「%CNAME("二人称")%は……見られて……見られる……かも、しれないで……」
				PRINTFORML 「興奮、する……性質なの、か……？」
			ENDIF
		CASE "情人旅館"
			IF TALENT:恋慕
				IF CEVENT("満ちた月")
					CALL EMOTEFACE, "重置/半目/斜眉/無口系/对话框？"
					PRINTFORML 「%CNAME("一人称")%的房間でも……%CALLNAME:MASTER%的房間でも……変わらない、けれど……」
					PRINTFORML 「気分を……変えたく……なったの、かな……？」
				ELSE
					CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
					PRINTFORML 「………………」
					PRINTFORML 情人旅館へと抜け出した%CALLNAME:TARGET%だが、どこか落ち着かない様子だ……
				ENDIF
			ELSE
				CALL EMOTEFACE, "重置/闭眼２/微笑３"
				PRINTFORML 「この国の……連れ込み宿は……質が、良い……」
				PRINTFORML 「寝具が……悪い、など……無いから……」
			ENDIF
		CASEELSE
	ENDSELECT
;你と一緒に、主人公的房間に移動した
CASE "主人公的房間に連れ込まれた"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			CALL EMOTEFACE, "重置/"
			PRINTFORML 「ん……語らいでも……睦言でも……」
			PRINTFORML 「%CALLNAME:MASTER%の……好きな事を……しよ……？」
		ELSE
			CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
			PRINTFORML 「………………」
			PRINTFORML %CALLNAME:MASTER%的房間へ連れ込まれた%CALLNAME:TARGET%だが、どこか落ち着かない様子だ……
		ENDIF
	ELSE
		CALL EMOTEFACE, "重置/半目/無口系"
		PRINTFORML 「%CNAME("二人称")%……%CNAME("一人称")%を……連れ込んで……何用……？」
	ENDIF
;你と一緒に、partner的房間に移動した
CASE "自室に招待"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			IF RAND:3 == 0
				CALL EMOTEFACE, "重置/半目/斜眉/微笑３"
				PRINTFORML 「ん……着いた、よ……」
			ELSEIF RAND:2 == 0
				CALL EMOTEFACE, "重置/笑颜４/斜眉/微笑３/頬手"
				PRINTFORML 「ん……ようこそ、%CNAME("一人称")%の……部屋へ……」
				PRINTFORML 「何て……家の主は……%CALLNAME:MASTER%だけれど……ね……」
			ELSE
				CALL EMOTEFACE, "重置/笑颜４/斜眉/会話口２"
				PRINTFORML 「物は……少ない、けれど……」
				PRINTFORML 「寛いで……欲しい、な……」
			ENDIF
		ELSE
			CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
			PRINTFORML 「………………」
		ENDIF
	ELSE
		CALL EMOTEFACE, "重置/半目/斜眉/無口系"
		IF RAND:3 == 0
			PRINTFORML 「ん……着いたぞ……%CNAME("二人称")%……」
		ELSEIF RAND:2 == 0
			PRINTFORML 「部屋の主は……%CNAME("一人称")%だが……」
			PRINTFORML 「家の主は……%CNAME("二人称")%、だ……」
		ELSE
			PRINTFORML 「気を……遣う事、なく……寛ぐと……良い……」
		ENDIF
	ENDIF
;partnerが既に居る部屋に、你が移動した
CASE "自室に訪問された"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			CALL EMOTEFACE, "重置/半目/斜眉/微笑３"
			PRINTFORML 「ぁ……いらっしゃい……%CALLNAME:MASTER%……」
			IF FIND_COND("現在存在", "助手")
				PRINTFORML 「ん……汝れ、も……いらっしゃい……」
			ELSE
				PRINTFORML 「ゆっくり、寛いで……いって……」
			ENDIF
		ELSE
			CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
			PRINTFORML 「ぁ……ああ……いらっしゃい……%CNAME("二人称")%……」
		ENDIF
	ELSE
		CALL EMOTEFACE, "重置/半目/斜眉/無口系"
		;指导者を伴っている場合
		IF FIND_COND("現在存在", "助手")
			PRINTFORML 「む……%CNAME("二人称")%、と……汝れ……か……」
			PRINTFORML 「二人、して……%CNAME("一人称")%に……何用……？」
		ELSE
			PRINTFORML 「ん……%CNAME("二人称")%、か……」
			PRINTFORML 「%CNAME("一人称")%に……何用……？」
		ENDIF
	ENDIF
CASE "指导者部屋訪問"
	PRINTFORML 「失礼、する……」
;自宅移動の後に你に連れられて居間に回来了場合など。優先度は低いです
CASE "帰還"
	PRINTFORML 「失礼、する……戻った、ぞ……」
CASE "オナバレ"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			CALL EMOTEFACE, "重置/＞＜/困扰眉/小口２/紅潮２"
			CALL PRINT_STRL, @"「ぅ、うぅ……_／／／_%CNAME("一人称")%を……見ないで……_／／／_」"
		ELSE
			CALL EMOTEFACE, "重置/闭眼２/困扰眉/小口２"
			PRINTFORML 「っ……すま、ない……見苦しい……モノを……見せてしまって……すまない……」
		ENDIF
	ELSE
		CALL EMOTEFACE, "重置/半目/困扰眉/へ字３"
		PRINTFORML 「ぁ……その、見苦しい……モノを……見せた、な……すまない……」
	ENDIF
CASE "露脐装超短裙胖次チラ", "低腰臀圍"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			CALL EMOTEFACE, "重置/半目/困扰眉/小口２/紅潮２"
			CALL PRINT_STRL, @"「ぅ……_／／／_あんまり……見ないで……_／／／_」"
		ELSE
			CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
			PRINTFORML 「………………」
		ENDIF
	ELSE
		CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
		PRINTFORML 「これを……履いた……%CNAME("一人称")%が、言うのは……可笑しい、が……」
		PRINTFORML 「この……衣服は……あまり……合理的……では……ない、と……思う……」
	ENDIF
CASE "掀起裙子"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			CALL EMOTEFACE, "重置/半目/困扰眉/小口２/紅潮２"
			CALL PRINT_STRL, @"「…………_／／／_」"
			IF FLAG:二人きり
				CALL EMOTEFACE, "重置/斜眼４飘忽/困扰眉/小口２/紅潮２/頬手"
				CALL PRINT_STRL, @"「そ、その……_／／／_%CNAME("一人称")%の……内衣は……どう、だった……？」"
			ELSE
				CALL PRINT_STRL, @"「ぁ、あの……_／／／_少し……控えて……欲しい……」"
			ENDIF
		ELSE
			CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
			PRINTFORML 「………………」
		ENDIF
	ELSE
		CALL EMOTEFACE, "重置/半目/困扰眉/無口系/叹气"
		PRINTFORML 「哈……」
	ENDIF
CASE "撫摸股間"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			IF CFLAG:静寂を騒然に && DEVENT("静寂を騒然に") == 0
				IF CFLAG:静寂を騒然に >= 4
					CALL EMOTEFACE, "#F重置/＞＜/蹙眉/小口２/紅潮２/頬汗"
					CALL PRINT_STRL, @"「%TEXTR(@"/ぁ/ぃ/ゃ")%っ……_HH_%TEXTR(@"ひぅ/はぅ/ぃひ")%っ……_HH_」"
				ELSE
					CALL EMOTEFACE, "重置/闭眼２/蹙眉/小口２"
					PRINTFORML 「%TEXTR(@"/ん/ぁ/ぃ/ゃ")%っ……%TEXTR(@"んぅ/ふ、ぅ/は、ぁ/ひぅ")%……」
				ENDIF
			ELSE
				CALL EMOTEFACE, "重置/半目/困扰眉/小口２/紅潮２"
				CALL PRINT_STRL, @"「そ、その……_／／／_少し……控えて……欲しい……_／／／_」"
				IF DEVENT("静寂を騒然に")
					CALL EMOTEFACE, "重置/＞＜/困扰眉/へ字２/紅潮２"
					CALL PRINT_STRL, @"「ぇ、えっと……褥、なら……良い、から……_／／／_ぅう……_／／／_」"
				ENDIF
			ENDIF
		ELSE
			CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
			PRINTFORML 「………………」
		ENDIF
	ELSE
		CALL EMOTEFACE, "重置/斜眼４/無口系/对话框・・・"
		PRINTFORML 「%CNAME("二人称")%……%TEXTR(@"性騷擾/痴漢")%は……程々に……」
	ENDIF
CASE "检查内褲"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			;IF FLAG:二人きり
			;	CALL EMOTEFACE, "重置/＞＜/困扰眉/へ字２/紅潮２"
			;	CALL PRINT_STRL, @"「ぅ、うぅ……_／／／_」"
			;ELSE
				CALL EMOTEFACE, "重置/斜眼４飘忽/困扰眉/小口２/紅潮２/頬手"
				CALL PRINT_STRL, @"「%CALLNAME:MASTER%の……その……内衣に……掛ける……情念は……_／／／_」"
				CALL PRINT_STRL, @"「どこ、から……来る……の……？_／／／_」"
			;ENDIF
		ELSE
			CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
			PRINTFORML 「………………」
		ENDIF
	ELSE
		CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
		PRINTFORML 「しかし……%CNAME("二人称")%の……その……内衣に……掛ける……」
		PRINTFORML 「情念は……一体……何なのだ……？」
	ENDIF
CASE "检查阴部"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			IF FLAG:二人きり
				CALL EMOTEFACE, "重置/＞＜/困扰眉/へ字２/紅潮２"
				CALL PRINT_STRL, @"「ぅ、うぅ……_／／／_」"
			ELSE
				CALL EMOTEFACE, "重置/斜眼４飘忽/困扰眉/小口２/紅潮２/頬手"
				CALL PRINT_STRL, @"「%CALLNAME:MASTER%が……見るの……好きなの……分かってる、けれど……_／／／_」"
				CALL PRINT_STRL, @"「その……_／／／_少し……控えて……欲しい……_／／／_」"
				CALL PRINT_STRL, @"「人前、だから……_／／／_」"
			ENDIF
		ELSE
			CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
			PRINTFORML 「………………」
		ENDIF
	ELSE
		CALL EMOTEFACE, "重置/斜眼４/無口系/对话框・・・"
		PRINTFORML 「ただ……%CNAME("二人称")%……節度と……害羞を……少しは……持て……」
	ENDIF
CASE "拜托処理性欲"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			CALL EMOTEFACE, "重置/半目/斜眉/微笑３/紅潮２"
			IF RAND:2 == 0
				PRINTFORML 「%TEXTR(@"んふ/はふ")%……いっぱい……出た……ね……」
			ELSE
				PRINTFORML 「気持ち、良かった……？」
				PRINTFORML 「ん……なら……良かった……」
			ENDIF
		ELSE
			CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
			PRINTFORML 「………………」
		ENDIF
	ELSE
		CALL EMOTEFACE, "重置/闭眼２/斜眉/無口系"
		PRINTFORML 「ん……終わりだ……」
	ENDIF
CASE "进行性処理"
	CALL EMOTEFACE, "重置/半目/斜眉/無口系"
	PRINTFORML 「ん……終わったか……」
CASE "帮忙消除性欲"
	PRINTFORML
CASE "清洁口交"
	PRINTFORML 「ん……終わったぞ……」
	IF TALENT:恋慕 && RAND:3 == 0
		CALL EMOTEFACE, "重置/斜眼４/蹙眉/へ字３/紅潮２"
		PRINTFORML 「何処で……催して……致すのは……%CNAME("二人称")%の……勝手だが……」
		PRINTFORML 「少しは……節度を……覚えよ……」
	ENDIF
CASE "買東西"
	;買ってきた道具などで分岐
	;IF COND("巨大振動棒購入")

	;	CALL SET_DEVENT, "巨大振動棒感想"
	;ELSE
		;単純にいっぱい買ったかどうかで分岐
		SELECTCASE COND("買上品数")
		CASE IS >= 4

		CASEELSE

		ENDSELECT
	;ENDIF
CASE "隐秘摄影失敗"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			CALL EMOTEFACE, "重置/斜眼４飘忽/斜眉/小口２/紅潮２/頬手"
			PRINTFORML 「ん……そんな……隠れて……撮らなく、ても……良いのに……」
			PRINTFORML 「え……？自然な……姿が……欲しかった……？」
			CALL PRINT_STRL, @"「そ、そう……_／／／_」"
		ELSE
			CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
			PRINTFORML 「………………」
		ENDIF
	ELSE
		CALL EMOTEFACE, "重置/半目/無口系"
		PRINTFORML 「隙を……突く、なら……もう少し……擅長にする、と……良い……」
	ENDIF
CASE "变成裸体"
	IF TALENT:恋慕 && CEVENT("満ちた月") == 0
		CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
		PRINTFORML 「………………」
	;他に人がいる
	ELSEIF CHARA_NUM("室内の邪魔者")
		IF TALENT:恋慕
			CALL EMOTEFACE, "重置/半目/困扰眉/小口２/紅潮"
			PRINTFORML 「その……恥ずかしくは、ない……けれど……」
			PRINTFORML 「こう言う、のは……二人きりの……時に……して、ほしい……な……」
		ELSE
			CALL EMOTEFACE, "重置/斜眼４/無口系/对话框・・・"
			PRINTFORML 「今更……他者の前で……身を、晒す事に……害羞は……ない、が……」
			PRINTFORML 「恥ずべきは……%CNAME("二人称")%の方……だと、%CNAME("一人称")%は……思う……」
		ENDIF
	;まさかの野外
	ELSEIF PLACE("野外")
		IF TALENT:恋慕
			CALL EMOTEFACE, "重置/半目/困扰眉/小口２/紅潮"
			PRINTFORML 「%CNAME("一人称")%は……大丈夫、だけれど……」
			PRINTFORML 「%CALLNAME:MASTER%が……通報、されると……困る、と……思う……よ……？」
		ELSE
			CALL EMOTEFACE, "重置/斜眼４/無口系/对话框・・・"
			PRINTFORML 「%CNAME("一人称")%が……思うに……通報をされて……困るのは……」
			PRINTFORML 「%CNAME("二人称")%の方……だと、思う……」
		ENDIF
	;不在個室
	ELSEIF PLACE("個室") == 0
		IF TALENT:恋慕
			CALL EMOTEFACE, "重置/半目/困扰眉/小口２/紅潮"
			PRINTFORML 「次に……来る……人が……見たら……驚く、と……思うの、だけど……」
			PRINTFORML 「%CALLNAME:MASTER%は……どう、するの……？」
		ELSE
			CALL EMOTEFACE, "重置/斜眼４/無口系/对话框・・・"
			PRINTFORML 「%CNAME("一人称")%は……気にせぬ、が……来客が、来た……場合……」
			PRINTFORML 「困窮、する……のは……%CNAME("二人称")%だと……思う……」
		ENDIF
	;個室で二人きり
	ELSE
		IF TALENT:恋慕
			CALL EMOTEFACE, "重置/半目/斜眉/微笑３/紅潮"
			PRINTFORML 「ん……脱いだ、よ……？」
		ELSE
			CALL EMOTEFACE, "重置/闭眼２/無口系"
			PRINTFORML 「ん……脱いだ、ぞ……」
		ENDIF
	ENDIF
CASE "Ｈ目的で呼び出された"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			CALL EMOTEFACE, "重置/笑颜４/斜眉/微笑３"
			PRINTFORML 「ん……来たよ……これから……どう、するの……？」
			PRINTFORML 「語らいでも……睦言でも……%CNAME("一人称")%は……良いよ……」
		ELSE
			CALL EMOTEFACE, "重置/半目/困扰眉/無口系"
			PRINTFORML 「………………」
		ENDIF
	ELSE
		CALL EMOTEFACE, "重置/半目/無口系"
		PRINTFORML 「寝具の……状態は……ん……悪くない……」
		PRINTFORML 「身体を……痛める……要素は……無さそう……だな……」
	ENDIF
ENDSELECT

;何か発言してたらここまで
SIF LINECOUNT > MEMO_LINECOUNT
	RETURN 1

;標語の反応。書いたらコメントアウトを外してください
IF CFLAG:標語実践
	IF STRCOUNT(SAVESTR:標語, "注意口渴")
		;IF DEVENT("標語茶") == 0
		;	PRINTFORML
		;	CALL SET_DEVENT, "標語茶"
		;ENDIF
	ELSEIF STRCOUNT(SAVESTR:標語, "体操服")
		SELECTCASE SAVESTR:標語
		CASE "体操服はやっぱり布鲁马"
			;IF DEVENT("標語布鲁马") == 0
			;	PRINTFORML
			;	CALL SET_DEVENT, "標語布鲁马"
			;ENDIF
		CASE "体操服はやっぱり运动短褲"

		CASE "体操服はやっぱり紧身短褲"

		CASE "体操服はやっぱり运动衫"
		;各分岐を細かく埋めずに、上の分岐を消して望みの体操服に着替えてやったぞ発言をここに書くのも良いと思います
		CASEELSE

		ENDSELECT
	ELSEIF STRCOUNT(SAVESTR:標語, "学生服")
		SELECTCASE SAVESTR:標語
		CASE "学生服は露脐装超短裙に限る"
			;IF DEVENT("標語露脐装超短裙") == 0
			;	PRINTFORML
			;	CALL SET_DEVENT, "標語露脐装超短裙"
			;ENDIF
		CASE "学生服は超短迷你に限る"
		;各分岐を細かく埋めずに、上の分岐を消して望みの学生服に着替えてやったぞ発言をここに書くのも良いと思います
		CASEELSE

		ENDSELECT
	ENDIF
ENDIF

;何か発言してたらここまで
SIF LINECOUNT > MEMO_LINECOUNT
	RETURN 1

;何か発言してたらここまで
SIF LINECOUNT > MEMO_LINECOUNT
	RETURN 1

;他の人といちゃついた後にpartner変更
IF COND("いちゃいちゃ") == 0 && FIND_COND("Ｈ的いちゃつき中")
	PRINTFORML 「そちらの……相手は……良い、のか……？」
ENDIF

;何か発言してたらここまで
SIF LINECOUNT > MEMO_LINECOUNT
	RETURN 1

;以下は随机台詞など

;時間帯と場所と関係で変化有些
IF FLAG:二人きり && RAND:3 == 0
	;二人きりでの何かする前のセリフ
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			CALL EMOTEFACE, "重置/闭眼２/微笑３/对话框・・・"
			PRINTFORML 「……………♪」
			PRINTFORML 瞳を閉じ、%NAMES("ソファ")%に腰かけて静かに佇んでいる……
		ELSE
			CALL EMOTEFACE, "重置/半目/困扰眉/無口系/对话框・・・"
			PRINTFORML 「…………」
		ENDIF
	ELSE
		CALL EMOTEFACE, "重置/闭眼２/無口系/对话框・・・"
		PRINTFORML 「…………」
		PRINTFORML 瞳を閉じ、%NAMES("ソファ")%に腰かけて静かに佇んでいる……
	ENDIF
ELSEIF STATE("酔酒") && RAND:3 == 0
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			IF RAND:2 == 0
				CALL EMOTEFACE, "重置/闭眼２/斜眉/無口系/紅潮２"
				PRINTFORML 「%CNAME("一人称")%は……お酒……あんまり……強く、ない……」
			ELSE
				CALL EMOTEFACE, "重置/闭眼２/斜眉/微笑３/紅潮２"
				PRINTFORML 「%CNAME("一人称")%が……舐める、だけで……酔酒が……回りそうな……お酒を……」
				PRINTFORML 「昔……お酒を……茶と……言う……人が……居た……」
				PRINTFORML 「善き……人、だった……」
				;猩々の仏師殿
			ENDIF
		ELSE
			CALL EMOTEFACE, "重置/闭眼２/無口系/紅潮２"
			PRINTFORML 「……………………」
		ENDIF
	ELSE
		IF RAND:2 == 0
			CALL EMOTEFACE, "重置/闭眼２/無口系/紅潮２"
			PRINTFORML 「%CNAME("一人称")%は……それ程……酒に……強く、ない……」
		ELSE
			CALL EMOTEFACE, "重置/闭眼２/無口系/紅潮２"
			PRINTFORML 「真実は……酒に……在り、と……言う、けれど……」
			PRINTFORML 「酩酊し……口が……滑り、やすい……だけ……」
		ENDIF
	ENDIF
ELSEIF COND("夜")
	IF RAND:3 == 0
		IF COND("春")
			CALL EMOTEFACE, "重置/半目/斜眉/無口系"
			PRINTFORML 「桜……見に、行こうかな……」
		ELSEIF COND("夏")
			CALL EMOTEFACE, "重置/闭眼２/微笑３"
			PRINTFORML 「クーラー……文明の機器……素晴らしい……」
		ELSEIF COND("秋")
			CALL EMOTEFACE, "重置/半目/斜眉/無口系"
			PRINTFORML 「紅葉……見に、行こうかな……」
		ELSEIF COND("冬")
			CALL EMOTEFACE, "重置/半目/斜眉/無口系"
			PRINTFORML 「あの世界は……未だ、残って……いるだろうか……」
		ENDIF
	ELSEIF RAND:2 == 0
		CALL EMOTEFACE, "重置/斜眉/微笑３"
		PRINTFORML 「…………」
		PRINTFORML 外の月を見て少しだけ微笑を浮かべている……
	ELSE
		CALL EMOTEFACE, "重置/半目/斜眉/本"
		PRINTFORML 「…………」
		PRINTFORML ぺらり、ぺらりと本を静かに読んでいる……
	ENDIF
ELSE
	CALL EMOTEFACE, "重置/半目/斜眉/本"
	PRINTFORML 「…………」
	PRINTFORML ぺらり、ぺらりと本を静かに読んでいる……
ENDIF

;-------------------------------------------------
;梦话。随意むにゃむにゃ言わせてください
;-------------------------------------------------
@KOJO_SLEEP_K66
;上から順に発言頻度が高いようにする(== 0の付け忘れではない)
IF RAND:3
	CALL EMOTEFACE, "重置/闭眼２/小口２/蹙眉/对话框睡眠"
	PRINTFORML 「Cur...me...maledicit...quasi..."monstrum...naturam"...?」
	;どうして、私を「生まれつきの化け物だ」なんて罵るの？
ELSEIF RAND:2
	CALL EMOTEFACE, "重置/闭眼２/小口２/蹙眉/对话框睡眠"
	PRINTFORML 「%CNAME("一人称", "かな")%は……%CNAME("一人称", "かな")%は……」
ELSE
	CALL EMOTEFACE, "重置/闭眼２/無口系/对话框睡眠"
	PRINTFORML 「すぅ……すぅ……」
ENDIF

;-------------------------------------------------
;メイン画面で選択肢として独立している日常イベントでのセリフ。WAIT使って大丈夫です
;こっちはあくまで選択肢で選ばれた場合に限るのに注意。
;ARGSの各CASEでの分岐において、ARGSの文字列後半に ：地の文前 を追加する事で地の文前に喋らせることもできる。
;また、そこでTFLAG:地の文スキップ = 1 とすると、本来出て来る地の文を飛ばすこともできる
;CASE "掀起裙子"の地の文の前に喋らせたりスキップさせたい場合にはCASE "掀起裙子：地の文前"を用意すればよい
;例）CASE "掀起裙子：地の文前"
;		PRINTW 試しにスキップ
;		TFLAG:地の文スキップ = 1
;-------------------------------------------------
@KOJO_DAILYCOM_K66, ARGS
;打招呼
#DIMS GREETING
#DIM MEMO_LINECOUNT
MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
;通話などでの呼出なので括弧は「」ではなく『』推奨。TFLAG:地の文スキップ = 1とすると地の文をスキップ出来ます
CASE "Ｈ目的で呼び出された"
	;台詞を書いたらRETURN 0 を消してください
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			STR:1 = 『ん……そちらに……向かえば……良いの……？』#F重置/半目/斜眉/微笑３/对话框圓圈
		ELSE
			STR:1 = 『分かっ、た……そこへ……向かう……』#F重置/半目/困扰眉/無口系/对话框圓圈
		ENDIF
	ELSE
		STR:1 = 『了承、した……そこへ……向かう……』#F重置/闭眼２/無口系/对话框圓圈
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
CASE "学園での日常"

CASE "お仕事"

CASE "归途"
	;SAVESTR:現在位置 と SAVESTR:归途の行動 を決定する
	CALL SETFLAG, "遭遇地点"

	;地の文の前の台詞がある場合はここに書く
	SELECTCASE SAVESTR:現在位置
	CASE "阵雨"
		IF TALENT:恋慕
			STR:1 = 「ぁ……雨……」#F重置/飘忽/斜眉/小口２
		ELSE
			STR:1 = 「降ってきた……か……」#F重置/半目
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	ENDSELECT

	;地の文を出す
	CALL DAILY_MESSAGE, "归途"

	SELECTCASE SAVESTR:归途の行動
	CASE "相合傘"
		IF TALENT:恋慕
			STR:1 = 「ぁ……有がとう……雨に、湿的る……のは……」#F重置/半目/斜眉/会話口２
			STR:2 = 「慣れている……けれど……寒いのは……寒いから……助かる……」#F重置/半目/斜眉/微笑３
		ELSE
			STR:1 = 「ん……すまない……雨に、湿的る……のは……」#F重置/会話口２
			STR:2 = 「慣れている……とは、言え……寒いは……寒い……助かる……」#F重置/半目/斜眉/微笑３
		ENDIF
		STR:3 = シトシトと降る雨の中%CALLNAME:TARGET%と肩を寄せあい家に帰宅した……
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	CASE "内衣選び", "泳装選び"
		TFLAG:地の文スキップ = 1
		PRINTFORMW %CALLNAME:TARGET%との归途に、%TEXTR(@"内衣店/ファッションビルの泳装売り場")%の前を街道、視線がそちらに行く。
		IF TALENT:恋慕
			STR:1 = 「ん……？%CALLNAME:MASTER%……どうかしたの……ぁ……」#F重置/斜眉/小口２
			STR:2 = %CALLNAME:MASTER%の視線の先に気が付いたのか%CALLNAME:TARGET%が声を漏らす。
			STR:3 = 「………実は、新しいのを……買おうと、思っているの……だけれど」#F重置/斜眼４飘忽/困扰眉/小口２/頬手
			STR:4 = 「%CALLNAME:MASTER%の……意見が……欲しい、の……良い、かな……？」#F重置/半目/困扰眉/小口２/紅潮２/頬手
			STR:5 = 折角の%CALLNAME:TARGET%の誘いだ。乗るとしようか……
		ELSE
			STR:1 = 「ん……%CNAME("二人称")%……どうかしたか……？」#F重置/斜眉/無口系/对话框？
			STR:2 = いや、何でもない。と、%CALLNAME:MASTER%は返して就这様帰宅した……
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	;特定行動でのセリフ。DAILY_MESSAGE, "归途"の地の文を参考に随意場合分けしてください。
	CASE "打情骂俏", "站着读书", "買食物", "物色游戏", "检查新刊", "繞道"
		IF TALENT:恋慕
			STR:1 = 「こうして……%CALLNAME:MASTER%と……归途を……楽しむ、のも……良い、けれど……」#F重置/半目/斜眉/小口２
			STR:2 = 「そろそろ……良い……時間、だから……お家に……帰ろ……？」#F重置/半目/斜眉/微笑３
			STR:3 = 時計を見ると確かにそろそろ良い時間で、帰った方が良いなと思い、手を引く彼女と家路を辿った……
		ELSE
			STR:1 = 「%CNAME("二人称")%……道草を……食べるのは……程々に……」#F重置/闭眼２/斜眉/会話口２
			STR:2 = 叱られてしまった……
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	CASE "直帰"
		IF TALENT:恋慕
			STR:1 = 「ねぇ……%CALLNAME:MASTER%……今日は……どうだった……？」#F重置/半目/斜眉/小口２/对话框？
		ELSE
			STR:1 = 「%CNAME("二人称")%……今日は……どうだった……？」#F重置/斜眉/無口系/对话框？
		ENDIF
		STR:2 = %CALLNAME:TARGET%が今日はどうだったかを聞いてきたので轻轻地語ると。#F重置/闭眼２/斜眉/無口系
		IF TALENT:恋慕
			STR:3 = 「ふむ……ほう……ふふっ……」#F重置/笑颜４/斜眉/微笑３/托下巴
		ELSE
			STR:3 = 「ふむ……ほう……そうか……」#F重置/闭眼２/斜眉/微笑３/托下巴
		ENDIF
		STR:4 = 思ったより、受けたのか彼女の顔が綻んでいた……
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	CASE "圣诞节前夕"
		IF TALENT:恋慕
			STR:1 = 「そう、言えば……そろそろ……あの、大工の息子の……祭り……」#F重置/半目/斜眉/小口２/对话框・・・
			STR:2 = 圣诞节を告げる店や装飾を見て%CALLNAME:TARGET%が呟く。#F重置/半目/斜眉/無口系
			STR:3 = 「大工の息子の……生まれ月は……秋だった……はず……だけれど……」#F重置/半目/斜眉/小口２
			STR:4 = 「逆算すると……うん……」#F重置/闭眼２/困扰眉/無口系/頬手
			STR:5 = %CALLNAME:TARGET%に言われて十月十日で逆算すると確かに秋だった。
			STR:6 = 生誕祭と言うか性誕祭だな……#F重置/斜眼４飘忽/困扰眉/無口系/紅潮２/頬手
		ELSE
			STR:1 = 「しかし……そうか……そろそろ……あの、大工の息子の……祭りか……」#F重置/半目/無口系/对话框・・・
			STR:2 = 圣诞节を告げる店や装飾を見て%CALLNAME:TARGET%が呟く。
			STR:3 = 「それに、しても……何時も、思うのだが……」#F重置/闭眼２/小口２
			STR:4 = 「大工の息子の……生まれ月は……秋だった……はず……」#F重置/闭眼２/困扰眉/小口２/对话框？/托下巴
			STR:5 = 「まぁ……どうでも……良い、か……」#F重置/半目/左闭眼２/会話口２
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	CASEELSE
		PRINTFORMW
	ENDSELECT

;归途イベントの後になんとなく情人旅館に行こっかとなった際のセリフです
;STR:Ｈする場所 で場所を情人旅館以外にする事も出来ます。（例 STR:Ｈする場所 = 部室
CASE "放課後Ｈ的邀请"

;お浴室に一緒に入ろうと誘われた場合。TFLAG:床イン = 1とすることで強制的にエロにも行ける
;浴室でスタートする場合には、代わりにTFLAG:お浴室でＨ = 1として下さい
CASE "一緒にお浴室"
	IF RAND:5 == 0
		PRINTFORMW 「ん……？背中を……流して……くれる、の……？」
		PRINTFORMW 「じゃあ……お願い……自己……やるより……綺麗に……なるから……」
	ELSEIF RAND:4 == 0
		PRINTFORMW 「背中を……流して……欲しい……？」
		PRINTFORMW 「ん……良い、よ……」
	ELSEIF RAND:3 == 0
		CALL PRINT_STRW, @"「その……%CALLNAME:MASTER%……見過ぎ……_／／／_」"
	ELSEIF RAND:2 == 0
		PRINTFORMW 「ぁ……すまない……石鹸を……取って、くれないか……？」
	ELSE
		PRINTFORMW 「はふ……湯治は……やはり、良いモノ……」
	ENDIF

;[999]選択後の台詞。TFLAG:床イン = 1とすることで強制的にエロにも行ける
;浴室でスタートする場合には、代わりにTFLAG:お浴室でＨ = 1として下さい
CASE "休憩"
	;台詞を書いたらRETURN 0を消してください
	IF PLACE("自宅")
		IF COND("夜")
			;お浴室
			IF PLACE("居間")
				IF TALENT:恋慕
					IF CEVENT("満ちた月")
						STR:1 = 「湯治に……ん……いってらっしゃい……」#F重置/半目/斜眉/会話口２
						STR:2 = 「ゆっくり……浸かって……一日の……疲れを……癒して……」#F重置/闭眼２/斜眉/小口２
						STR:3 = 「また……明日も……頑張って、ね……」#F重置/笑颜４/斜眉/微笑３
					ELSE
						STR:1 = 「ぁ、ああ……いって、らっしゃい……」#F重置/半目/困扰眉/小口２
					ENDIF
				ELSE
					STR:1 = 「%CNAME("二人称")%……湯治に……向かうのか……？」#F重置/斜眉/無口系/对话框？
					STR:2 = 「しっかり……温まって……一日の……疲れを……癒すと……良い……」#F重置/半目/斜眉/微笑３
				ENDIF
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSE
				IF TALENT:恋慕
					IF CEVENT("満ちた月")
						STR:1 = 「ん……休息、%CALLNAME:MASTER%……」#F重置/半目/斜眉/会話口２
						STR:2 = 「良き……目覚めを……」#F重置/半目/斜眉/微笑３
					ELSE
						STR:1 = 「ぁ……おや、すみ……」#F重置/半目/困扰眉/小口２
					ENDIF
				ELSE
					STR:1 = 「ん……%CNAME("二人称")%……寝るのか……」#F重置/半目/斜眉/無口系
					STR:2 = 「では……休息、だ……」#F重置/半目/斜眉/小口２
					STR:3 = 「良き……目覚めを……」#F重置/半目/斜眉/微笑３
				ENDIF
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ENDIF
		ELSE
			IF TALENT:恋慕
				IF CEVENT("満ちた月")
					STR:1 = 「ん……休憩、する……？」#F重置/半目/斜眉/会話口２/对话框？
					STR:2 = 「お疲れ、様……ゆっくり、お休み……」#F重置/半目/斜眉/微笑３
				ELSE
					STR:1 = 「………………」#F重置/半目/困扰眉/無口系
				ENDIF
			ELSE
				STR:1 = 「休憩、か……%CNAME("二人称")%……？」#F重置/斜眉/無口系/对话框？
				STR:2 = 「ふむ……では、ゆるりと……休むが……良い……」#F重置/闭眼２/斜眉/小口２
			ENDIF
			CALL DIALOGUE_FRAME_NAMEW, TARGET
		ENDIF
	;ここは実質昼のみ
	ELSEIF PLACE("部室")
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				STR:1 = 「ん……次の……講義に……備えて……休む……？」#F重置/半目/斜眉/小口２/对话框？
				IF RAND:3 == 0
					STR:2 = 休むのかどうかを聞いてきた%CALLNAME:TARGET%にその街道だと返すと
					STR:3 = 「良かったら……%CNAME("一人称")%の……膝を、枕に……する？」#F重置/斜眼４飘忽/困扰眉/小口２/紅潮２/頬手
					STR:4 = 膝枕はどうかと彼女の提案に少し逡巡した後に、頼むと返すと#F重置/困扰眉/無口系２/紅潮２/頬手
					STR:5 = 「ん……では……どうぞ……？」#F重置/半目/斜眉/微笑３
					STR:6 = 柔らかな%CALLNAME:TARGET%の太ももを枕に午後の講義まで休憩した……#F重置/笑颜４/斜眉/微笑３
				ELSE
					STR:2 = 「お疲れ、様……午後も……頑張って、ね……」#F重置/半目/斜眉/微笑３
				ENDIF
			ELSE
				STR:1 = 「………………」#F重置/半目/困扰眉/無口系
			ENDIF
		ELSE
			STR:1 = 「ん……次の……講義に……備えて……休む、か……？」#F重置/斜眉/無口系
			STR:2 = 「うむ……実に……学徒らしく、て……良い、事……だ……」#F重置/闭眼２/斜眉/微笑３
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	;場所移動後
	ELSE
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				STR:1 = 「ん……疲れてた、の……？」#F重置/斜眉/小口２
				STR:2 = 「じゃあ……ゆっくり、休んで……ね……」#F重置/半目/斜眉/微笑３
			ELSE
				STR:1 = 「えっと……その……お疲れ、様……」#F重置/半目/困扰眉/無口系
			ENDIF
		ELSE
			STR:1 = 「そうか……分かった……しかし、%CNAME("二人称")%……」#F重置/闭眼２/斜眉/無口系
			STR:2 = 「時間の……浪費は……程々に、な……？」#F重置/半目/通常眉/小口２
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	ENDIF

CASE "清洁口交：お誘い"

CASE "清洁口交：射精後"

CASE "清洁口交：断った"

CASE "清洁口交よりＶ性処理"

CASE "清洁口交よりＡ性処理"

;NOWEXを分岐に用いることが出来る。また、TFLAG:地の文スキップで地の文を飛ばせる
CASE "性処理：前"
	;口上を書いた場合はRETURN 0を消してください
	RETURN 0

	;場所で分岐させる？
	SELECTCASE SAVESTR:現在位置
	;MASTERの性別に対応した廁所に呼び出される
	CASE "男子廁所"
	CASE "女子廁所"
	;体育のある日限定
	CASE "体育倉庫"
	;体育か水泳のある日限定
	CASE "更衣室"
	;房顶or人迹罕至的教学楼后侧or部室
	CASEELSE
	ENDSELECT

	;何か発言してたらここまで
	SIF LINECOUNT > MEMO_LINECOUNT
		RETURN 1

	;PLAYで分岐させる？
	SELECTCASE NAMES("性処理")
	CASE "手淫"
	CASE "口交"
	CASE "乳交"
	CASE "Ｖ性交"
	CASE "Ａ性交"
	CASE "尿道挿入"
	CASE "乳頭奸"
	CASE "奉仕舐陰"
	ENDSELECT

	;何か発言してたらここまで
	SIF LINECOUNT > MEMO_LINECOUNT
		RETURN 1

	;避孕套を使う場合
	IF TEQUIP:PLAYER:避孕套
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
CASE "性処理：後"
	;口上を書いた場合はRETURN 0を消してください
	RETURN 0

	;PLAYで分岐させる？
	SELECTCASE NAMES("性処理")
	CASE "手淫"
	CASE "口交"
	CASE "乳交"
	CASE "Ｖ性交"
	CASE "Ａ性交"
	CASE "尿道挿入"
	CASE "乳頭奸"
	CASE "奉仕舐陰"
	ENDSELECT

	;何か発言してたらここまで
	SIF LINECOUNT > MEMO_LINECOUNT
		RETURN 1

	;避孕套を使う場合
	IF TEQUIP:PLAYER:避孕套
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;ここには特殊な条件での角色独自のイベントを書く。別に無くても構わない
;発生領帯ミングは日常イベント選択後の好感度を得た直後
CASE "特殊事件"
	;眠ってる時でも来るので書くことないならRETURN 0してください
	SIF CFLAG:睡眠
		RETURN 0
;場所を変えた際のセリフ。通常は没有で構いません。SAVESTR:現在位置 や @PLACE(ARGS)で場所を条件分けして使ってください
CASE "場所を変える"

;この角色が点心当番で、その時間帯で部室に最初からいる時のセリフ
CASE "点心を用意した"
	SELECTCASE TEXTS("点心")
	;CASE "ゆでエビ"
	;	STR:1 =
	;	CALL DIALOGUE_FRAME_NAMEW, TARGET
	CASE "おはぎ"
		IF RAND:2 == 0
			STR:1 = 「今日は……おはぎ……」#F重置/微笑３/斜眉
			STR:2 = 「おはぎは……良い……」#F重置/会話口/斜眉
			STR:3 = 「とても、良い……菓子……」#F重置/笑颜４/微笑３/斜眉
		ELSE
			STR:1 = 「おはぎ……市販品も……良い、けれど……」#F重置/笑颜４/会話口/斜眉
			STR:2 = 「米や……餡を……自己選んで……作るのも……とても、良い……」#F重置/笑颜４/微笑３/斜眉/托下巴
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	CASE "柿"
		STR:1 = 「秋の味覚……柿……」#F重置/闭眼２/小口２
		STR:2 = 「しかし……心臓を柿と言い張るのは……%CNAME("一人称")%には理解出来なかった……」#F重置/闭眼２/へ字３/困扰眉
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	CASE "赤い糖", "青い糖", "黄い糖", "緑い糖", "黑色糖"
		STR:1 = %CALLNAME:TARGET%が個包から糖を取り出し口に含む。#F重置/闭眼２/嘟嘴/斜眉
		STR:2 = その姿を繁々と看了过来と#F重置/嘟嘴/斜眉
		STR:3 = 「%CNAME("二人称")%……糖は必要……？」#F重置/小口２/斜眉/对话框？
		STR:4 = %CALLNAME:MASTER%の視線に気が付いたのか木製のコースターにいくつか乗せ渡してきた。#F重置/斜眉
		IF CEVENT("糖初回") == 0
			STR:5 = その一つを取り、口に含むと硬くなく柔らかく舐めるより噛んだ方が良さそうだった。#F重置/微笑３
			CALL DIALOGUE_FRAME_NAMEW, TARGET
			STR:1 = 「これは……その昔、御霊を降ろすのに……使われた糖の模造品……」#F重置/闭眼２/小口２
			STR:2 = ほほう。#F重置/闭眼２/無口系
			STR:3 = 「当世風に……味をつけて糖として……楽しめる様に……した……」#F重置/闭眼２/小口２
			STR:4 = その言い方だと本物は糖として楽しめない言い方だな？#F重置/闭眼２/無口系
			CALL DIALOGUE_FRAME_NAMEW, TARGET
			STR:1 = 「本物は……口に含むと身体が軋み、痛む……」#F重置/闭眼２/小口２
			STR:2 = 何それ怖い。#F重置/闭眼２/無口系
			STR:3 = 「外より御霊……アニマを取り入れて……伝承を再現、する……道具だった……」#F重置/闭眼２/小口２
			STR:4 = 伝承を再現するとは一体何なのだろうか……？#F重置/闭眼２/無口系
			CALL DIALOGUE_FRAME_NAMEW, TARGET
			STR:1 = 「有些体に言えば……身体の強化……」#F重置/半目/小口２
			STR:2 = ……つまりはドーピング道具だったのか。#F重置/半目/無口系
			STR:3 = 「ん……その街道……」#F重置/半目/微笑３
			STR:4 = 「外部より自分のではない力を取り込むから……身体が拒絶する……」#F重置/半目/小口２
			STR:5 = 不穏なワードが聞こえてきたぞ？？？#F重置/半目/無口系
			STR:6 = 「その疼痛を……誤魔化す為に、噛み締め易い硬さにしていると……聞いた……」#F重置/闭眼２/小口２
			STR:7 = そう語る%CALLNAME:TARGET%の話を聞き的同时、そんな道具も今ではただのチューイングキャンディだなと思いながら楽しんだ………#F重置/闭眼２/嘟嘴
			CALL SET_CEVENT, "糖初回"
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	ENDSELECT
;これは昼か夜
CASE "打招呼"
	;你に先に打招呼をされた
	IF CFLAG:打招呼した == 0
		IF COND("夜")
			STR:1 = 「%CNAME("二人称")%……良い夜、だな……」#F重置/半目/微笑３/斜眉
			CALL DIALOGUE_FRAME_NAMEW, TARGET
		ELSEIF COND("昼")
			STR:1 = 「%CNAME("二人称")%……今日も息災か……？」#F重置/小口２/斜眉/对话框？
			CALL DIALOGUE_FRAME_NAMEW, TARGET
		ELSE
			STR:1 = 「%CNAME("二人称")%……今日は、早いな……」#F重置/小口２/斜眉
			CALL DIALOGUE_FRAME_NAMEW, TARGET
		ENDIF
	ELSE
		IF COND("夜")
			STR:1 = 「ん……%CNAME("二人称")%か……今日は……良き一日だった、か……？」#F重置/小口２/斜眉/对话框？
			CALL DIALOGUE_FRAME_NAMEW, TARGET
		ELSEIF COND("昼")
			STR:1 = 「ん……%CNAME("二人称")%……学徒らしく……酱と……勉学には励め……」#F重置/半目/左闭眼２/小口２
			CALL DIALOGUE_FRAME_NAMEW, TARGET
		ELSE
			STR:1 = 「ん……%CNAME("二人称")%……今日は、良き一日……であると……良い、な……」#F重置/半目/微笑３/斜眉
			CALL DIALOGUE_FRAME_NAMEW, TARGET
		ENDIF
	ENDIF
CASE "叫醒"
	STR:1 = 「はっ……！ああ……%CNAME("二人称")%、か……」#F重置/斜眉/小口２/对话框！
	STR:2 = 「手間を……掛けさせた、な……すまない……」#F重置/半目/困扰眉/小口２
	CALL DIALOGUE_FRAME_NAMEW, TARGET
;酔った際に眠くなって自分的房間に返回際のセリフ
CASE "眠い"
	STR:1 = 「…………」#F重置/半目/斜眉/無口系/对话框困倦
	STR:2 = 「…………」#F重置/闭眼２/斜眉/無口系/对话框・・・
	STR:3 = 「すぅ…………すぅ…………」#F重置/闭眼２/斜眉/無口系/对话框睡眠
	STR:4 = 「はっ…………！」#F重置/斜眉/無口系/对话框！
	STR:5 = 「すまない……離席させて……要……」#F重置/半目/左闭眼２/困扰眉/小口２/对话框困倦/頬手
	CALL DIALOGUE_FRAME_NAMEW, TARGET
;全裸終了の際のセリフ
CASE "服を着た"
	PRINTFORMW
;暑かったり躁动难忍してたり酔っぱらってたりで内衣姿变成了際のセリフ
CASE "薄着变成了"
	PRINTFORMW
;易出汗状態の際に裙の中に扇風機の風を当てた際のセリフ。[粗野]or[開朗]or[小悪魔]限定
CASE "股間に扇風機"
	PRINTFORMW
CASE "Talk：地の文前"
	SELECTCASE STR:日常イベント名
	CASE "夸奖"
		IF CFLAG:勉強した == 0 || (TALENT:恋慕 && CEVENT("満ちた月") && CFLAG:性処理済 == 0) || (CEVENT("満ちぬ月") && CEVENT("満ちた月") == 0)
			CALL MESSAGE_DAILY1
			PRINTL
			IF CEVENT("満ちた月") == 0 && CEVENT("満ちぬ月")
				STR:1 = 「%CNAME("一人称")%は……%CNAME("二人称")%に……褒められる、様な……モノ、では……ない……」#F重置/半目/蹙眉/小口２
				STR:2 = 「ない、のだ……」#F重置/闭眼２/蹙眉/へ字３
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSEIF TALENT:恋慕 && (CFLAG:勉強した == 0 || CFLAG:性処理済 == 0)
				STR:1 = 「%CNAME("二人称")%……？%CNAME("一人称")%は……今日は……未だ……褒められる……事は……して、いない……」#F重置/半目/困扰眉/無口系
				STR:2 = 「だから……酱とした……時に……その、言葉を……聞きたい……」#F重置/半目/困扰眉/小口２
				STR:3 = 「%CALLNAME:MASTER%の……言葉を……安く、したくないの……」#F重置/半目/斜眉/微笑３
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSEIF CFLAG:勉強した == 0
				STR:1 = 「%CNAME("二人称")%……何故、%CNAME("一人称")%を夸奖……？」#F重置/蹙眉/小口２
				STR:2 = 「理由なき賞賛は……甘言、あるいは侮り……」#F重置/闭眼２/蹙眉/小口２
				STR:3 = 「故に、理由ある時に……その言を口にして……」#F重置/闭眼２/蹙眉/へ字３
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ENDIF
			STR:日常イベント名 =
		ENDIF
	CASE "甜言蜜语"
		IF TALENT:恋慕 == 0 || (TALENT:恋慕 && CEVENT("満ちた月") == 0)
			CALL MESSAGE_DAILY1
			PRINTL
			IF TALENT:恋慕
				STR:1 = 「やめて、くれ……」#F重置/半目/蹙眉/小口２
				STR:2 = 「今は……その言葉を……流す事すら……苦しい……」#F重置/闭眼２/蹙眉/小口２
				STR:3 = 「お願い、だから……言わないで……」#F重置/半目/蹙眉/小口２
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSE
				IF RAND:2 == 0
					STR:1 = 「%CNAME("一人称")%は……根本的に……他者が苦手、だ……」#F重置/半目/蹙眉/小口２
					STR:2 = 「故に、%CNAME("二人称")%……%CNAME("一人称")%に……その様な、言葉は……困る……」#F重置/闭眼２/蹙眉/へ字３
					CALL DIALOGUE_FRAME_NAMEW, TARGET
				ELSE
					STR:1 = 「%CNAME("二人称")%……相手を間違えている……」#F重置/闭眼２/蹙眉/小口２
					STR:2 = 「その様な言葉は……他のモノに……取って置け……」#F重置/闭眼２/蹙眉/会話口２
					CALL DIALOGUE_FRAME_NAMEW, TARGET
				ENDIF
			ENDIF
			STR:日常イベント名 =
		ENDIF
	ENDSELECT
CASE "Talk"
	SELECTCASE STR:日常イベント名
	;これはCSTR:点心 に亲手自制属性のものが設定されている時のみ
	CASE "夸奖点心"

	CASE "夸奖"
		IF CFLAG:性処理済 && TALENT:恋慕
			TFLAG:地の文スキップ = 1
			PRINTFORMW %CALLNAME:MASTER%は性処理をしてくれた、%CALLNAME:TARGET%を褒めた。
			STR:1 = 「っ……_／／／_確かに……そう、だけれど……_／／／_」#F重置/斜眼３飘忽/困扰眉/小口２/紅潮２
			STR:2 = 頑張って性処理をしてくれた相手を褒めなくて何時夸奖と言うのかな？？？#F重置/半目/困扰眉/無口系/紅潮２
			STR:3 = 「ぅ、うぅ……_／／／_」#F重置/＞＜/困扰眉/へ字２/紅潮２
			CALL DIALOGUE_FRAME_NAMEW, TARGET
		ELSEIF CFLAG:勉強した
			STR:1 = 「む……そう……%CNAME("二人称")%の役に立ったなら良い……」#F重置/斜眉
			STR:2 = 「うん、理由ある賞賛は……やはり、悪くない……」#F重置/斜眉/微笑３
			CALL DIALOGUE_FRAME_NAMEW, TARGET
		ENDIF
	CASE "甜言蜜语"
		IF TALENT:恋慕
			IF RAND:2 == 0
				STR:1 = 「%CNAME("一人称")%も……%CALLNAME:MASTER%の事を……」#F重置/半目/困扰眉/小口２/紅潮２
				STR:2 = 自分の事を？何かな？言葉に出してくれないと伝わらないな？ハリーハリー#F重置/困扰眉/無口系/紅潮２/对话框惊讶
				STR:3 = 「ぅ、うぅ……_／／／_坏心眼……しないで……_／／／_」#F重置/＞＜/困扰眉/へ字２/紅潮２
			ELSE
				STR:1 = 「うっ……あ……_／／／_」#F重置/斜眼３飘忽/困扰眉/小口２/紅潮２/唇边手
				STR:2 = 「%CNAME("二人称")%……あまり……%CNAME("一人称")%を……揶揄わないで……くれ……」#F重置/半目/困扰眉/小口２/紅潮２/唇边手
				STR:3 = 「へ……？本気で……言っている……？だとしたら、もっと……手下留情を……」#F重置/闭眼２/困扰眉/小口２/紅潮２/唇边手
			ENDIF
			CALL DIALOGUE_FRAME_NAMEW, TARGET
		ENDIF
	CASEELSE
		IF TALENT:恋慕 && CEVENT("満ちた月") && DEVENT("口調について") == 0
			STR:1 = %CALLNAME:TARGET%と話していて、少し疑問に思った事があったので彼女に聞く事にした。
			STR:2 = 「ん……？%CNAME("一人称")%に……聞きたい、事……？」#F重置/斜眉/無口系/对话框？
			STR:3 = 「%CNAME("一人称")%に……答え、られる……事なら……良い、よ……」#F重置/半目/斜眉/微笑３
			STR:4 = そう、気になっていたのはその口調だ。何か前はもっと険呑と言うか堅苦しかった様な。#F重置/斜眼４飘忽/斜眉/無口系/頬手
			STR:5 = 今は、何か……正直幼い感じが凄くする。#F重置/〇〇/困扰眉/無口系/对话框惊讶/頬手
			CALL DIALOGUE_FRAME_NAMEW, TARGET
			STR:1 = 「………………」#F重置/＞＜/憤怒眉/嘟嘴
			STR:2 = あの……質問に答えてくれませんか。口調年齢、幼女の%CALLNAME:TARGET%桑。#F重置/〇〇/困扰眉/無口系/对话框惊讶
			STR:3 = 「………………」#F重置/＞＜/憤怒眉/へ字２
			STR:4 = 「………………」#F重置/＞＜/憤怒眉/へ字３
			STR:5 = 「………………はぁ」#F重置/闭眼２/斜眉/小口２/叹气
			STR:6 = 少しの無言の後に叹气吐いた%CALLNAME:TARGET%が口を開いて話し始める。
			CALL DIALOGUE_FRAME_NAMEW, TARGET
			STR:1 = 「正直、に……言うと……気を……張って、いた……から……」#F重置/闭眼２/小口２
			STR:2 = 「%CNAME("一人称")%は……何時か、言った……街道に……他者が……苦手……」#F重置/闭眼２/困扰眉/小口２
			STR:3 = 「それは……%CNAME("一人称")%の……これまでが……悪意に……満ちた……モノ……だった……から……」#F重置/闭眼２/蹙眉/小口２
			STR:4 = 「だから……少しでも……他者を……近づけない、為に……あんな……口調……だった……」#F重置/半目/困扰眉/小口２
			STR:5 = 「それも……%CALLNAME:MASTER%の……前じゃ……意味、なかった……けれど……」#F重置/闭眼２/斜眉/会話口２
			CALL DIALOGUE_FRAME_NAMEW, TARGET
			STR:1 = 「拒んでも……甜、言葉を……囁いて……来る、し……」#F重置/闭眼２/斜眉/小口２
			STR:2 = 「無遠慮に……心の、隙を……突いて……距離を……詰めて……来る、し……」#F重置/闭眼２/斜眉/会話口２
			STR:3 = 「ああ……本当に……%CALLNAME:MASTER%は……」#F重置/陰/斜眉/小口２
			STR:4 = 「Corculum...」#F重置/半目/斜眉/微笑３
			;いとしい人
			STR:5 = 囁くように%CALLNAME:TARGET%が呟く。………ところで、何て意味？
			STR:6 = 「教え、ない……内緒……秘密……」#F重置/笑颜４/斜眉/微笑３
			CALL DIALOGUE_FRAME_NAMEW, TARGET
			PRINTFORMW 結局、先ほどの言葉について%CALLNAME:TARGET%は答えなかったけれど。
			PRINTFORMW 知りたい事は知れたので、今回はこれで良いだろう。
			PRINTFORMW またいつか、先ほどの言葉について尋ねて取り留めないやり取りをしよう……
			CALL SET_DEVENT, "口調について"
		ELSEIF CEVENT("満ちた月") == 0 && CEVENT("満ちぬ月")
			IF RAND:3 == 0
				STR:1 = 「%CNAME("二人称")%は……その……」#F重置/半目/困扰眉/小口２
				STR:2 = 主动言葉を語る事が少なくなった、%CALLNAME:TARGET%が珍しく何かを話そうとしたが
				STR:3 = 「いや……何でもない……」#F重置/闭眼２/困扰眉/無口系
				STR:4 = 結局それが何だったのか分からなかった……
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSEIF RAND:2 == 0
				STR:1 = 「……………」#F重置/陰/蹙眉/無口系
				STR:2 = 話の途中でだんまりとしてしまった%CALLNAME:TARGET%にどうしたのかと聞くと
				STR:3 = 「ぁっ……す、すまない……%CNAME("一人称")%が……悪かった……すまない……」#F重置/困扰眉/小口２
				STR:4 = %CALLNAME:TARGET%を咎めるつもりは全くなかったのだが謝られ続けた……
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSE
				STR:1 = 「そうか……そうだったか……」#F重置/半目/蹙眉/小口２
				STR:2 = %CALLNAME:MASTER%の話を聞く%CALLNAME:TARGET%だが、#F重置/半目/蹙眉/無口系
				STR:3 = その返事はどこか生返事で他の事を考えているようだった……
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ENDIF
		ELSEIF TALENT:恋慕 && RAND:2 == 0
			IF RAND:6 == 0 && COND("夜")
				STR:1 = 「%CNAME("二人称")%……少し……一緒に……月を……見ない……？」#F重置/半目/困扰眉/小口２
				STR:2 = 「その……%CALLNAME:MASTER%と……同じモノを……見たく……なった、の……」#F重置/斜眼４飘忽/困扰眉/小口２/紅潮２/頬手
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSEIF RAND:5 == 0
				STR:1 = 「ふふっ……%CNAME("二人称")%の話は……面白色、ね……」#F重置/笑颜４/斜眉/微笑３/对话框開心
			ELSEIF RAND:4 == 0
				STR:1 = 「%CNAME("二人称")%は……不思議……」#F重置/半目/斜眉/小口２
				STR:2 = 「うん……良い、意味で……だよ……」#F重置/笑颜４/斜眉/会話口２
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSEIF RAND:3 == 0
				STR:1 = 「%TEXTR(@"Te Amo/Semper Amemus/%TEXTR(@"Ex animo/In aeternum/Seculo seculorum/Ab imo pectore")% te amo/Si vales valeo/Corculum")%」#F重置/闭眼２/斜眉/小口２/紅潮２
				STR:2 = ……どう言う意味なんだ？#F重置/笑颜４/斜眉/微笑３/紅潮２
				STR:3 = 「ふふっ……%TEXTR(@"教え、ない/内緒/秘密")%……」#F重置/半目/斜眉/微笑３/紅潮２
				CALL DIALOGUE_FRAME_NAMEW, TARGET
				;人には甜言蜜语言うなって言うくせに主动は言うダブスタ
			ELSEIF RAND:2 == 0
				STR:1 = 「%CNAME("二人称")%……もしも、もしもだ……」#F重置/困扰眉/小口２
				STR:2 = 「周りの……誰もが……%CNAME("二人称")%を……置いて行ったなら……」#F重置/半目/困扰眉/小口２
				STR:3 = 「%CNAME("一人称")%と……一緒に……旅を……しないか……？」#F重置/半目/困扰眉/会話口２
				STR:4 = 「%CNAME("二人称")%も……%CNAME("一人称")%も……死なずだ……だから……連れ合いが……居ても……良いと……思う……」#F重置/半目/困扰眉/小口２
				STR:5 = 「いや……違う……%CNAME("一人称")%が……%CALLNAME:MASTER%と……共に……居たい……だけ、だ……」#F重置/闭眼２/困扰眉/無口系
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSE
				STR:1 = 「%CNAME("一人称")%は……%CNAME("一人称")%自身が……嫌いだ……」#F重置/半目/蹙眉/小口２
				STR:2 = 「どうして、死なずなのか……どうして、あの時……約束を破ったのか……」#F重置/陰/蹙眉/会話口２
				STR:3 = 「違ったら……%CNAME("一人称")%は……あんな目で……見られなかった……と、思うと……」#F重置/陰/蹙眉/へ字２
				STR:4 = 「ああ……けれど、けれど……」#F重置/闭眼２/蹙眉/小口２
				STR:5 = 「それでも……%CNAME("二人称")%と……逢えた事は……嬉しく、思っている……」#F重置/半目/斜眉/微笑３
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ENDIF
		ELSE
			IF RAND:9 == 0 && DEVENT("改めて")
				IF DEVENT("月明ノ道導") == 0
					STR:1 = 「%CNAME("二人称")%と……初めて相見えた時に……握っていた剣は……」#F重置/闭眼２/小口２
					STR:2 = 「理を纏わせ……防ぎ得ぬ刃を創る……%CNAME("一人称")%だけの剣……」#F重置/半目/斜眉/会話口２
					STR:3 = 「その光を見て……知り合いが……月明かりの様と言った……」#F重置/半目/斜眉/微笑３
					CALL DIALOGUE_FRAME_NAMEW, TARGET
					CALL SET_DEVENT, "月明ノ道導"
				ELSE
					IF RAND:2 == 0 && DEVENT("メンシス")
						STR:1 = 「組合、に……ついて……？」#F重置/無口系/对话框？
						IF DEVENT("組合概要") == 0
							STR:2 = 「ただの……悪魔を狩るモノ、の……集まり……」#F重置/闭眼２/小口２
							STR:3 = 「そう言う事を……聞いてる……のではない……？」#F重置/困扰眉/無口系/对话框？
							STR:4 = 「むぅ……、……メンシス、とは……月を意とする言葉」#F重置/半目/小口２
							STR:5 = 「この場合は……月とは……%CNAME("一人称")%を指す……」#F重置/闭眼２/小口２
							STR:6 = 「%CNAME("一人称")%を長とした……組合……」#F重置/闭眼２/困扰眉/小口２
							STR:7 = 「何時の間にか……出来ていた……」#F重置/闭眼２/困扰眉/無口系/对话框乱
							CALL SET_DEVENT, "組合概要"
						ELSEIF RAND:3 == 0 && DEVENT("警句")
							STR:2 = 「前に、語った……警句の……成果、か……分からない……けれど……」#F重置/半目/小口２
							STR:3 = 「組合の……モノは……生存に……特化した……モノが……多い……」#F重置/闭眼２/小口２
							STR:4 = 「仕事の……協力者としては……信が置ける、けれど……」#F重置/闭眼２/会話口２
							STR:5 = 「誰も……彼も……灰汁が很强……」#F重置/闭眼２/困扰眉/無口系/对话框乱
						ELSEIF RAND:2 == 0
							STR:2 = 「集まり……と、言っても……特に……決まり事は……ない……」#F重置/小口２
							STR:3 = 「ただ……警句は……ある……。勝手に……立ち動作著……モノの……言葉……」#F重置/会話口２
							STR:4 = 「血を恐惧よ……狩りに徹せよ……死に玉座无……」#F重置/闭眼２/小口２
							STR:5 = 「意は……闘争に飲まれるな……生存せよ……と、言うモノ……」#F重置/半目/左闭眼２/小口２
							CALL SET_DEVENT, "警句"
						ELSE
							STR:2 = 「%CNAME("一人称")%を含めて……変わった人物が……多い……」#F重置/闭眼２/困扰眉/小口２
							STR:3 = 「前に、語った……知り合いも……そう、だけれど……」#F重置/闭眼２/困扰眉/会話口２
							STR:4 = 「頭を……金格子で囲った……学徒崩れや……」#F重置/闭眼２/困扰眉/小口２
							STR:5 = 「太陽を礼賛する……金筒を被ったモノや……」#F重置/闭眼２/困扰眉/会話口２
							STR:6 = 「変なのが……多い……」#F重置/闭眼２/困扰眉/無口系/对话框乱
						ENDIF
						CALL DIALOGUE_FRAME_NAMEW, TARGET
					ELSE
						STR:1 = 「知り合い、に……ついて……？」#F重置/無口系/对话框？
						IF RAND:3 == 0 && DEVENT("使徒")
							STR:2 = 「使徒な、だけあって……伝承再現術式は……かなりの繰り手だった……」#F重置/闭眼２/小口２
							STR:3 = 「死なずの%CNAME("一人称")%と……同じ、立ち回りをして……未だ生きている……」#F重置/闭眼２/会話口２
							STR:4 = 「そう言う、意味だと……信の置ける相手……」#F重置/闭眼２/斜眉/微笑３
						ELSEIF RAND:2 == 0
							STR:2 = 「昔は……敬虔な……使徒だった、らしい……」#F重置/闭眼２/小口２
							STR:3 = 「普段は……清貧で……清廉で……慎ましやかで……悪い、人物では……なかった……」#F重置/闭眼２/会話口２
							STR:4 = 「ただ……%CNAME("一人称")%を見る目は……苦手……」#F重置/闭眼２/小口２/蹙眉
							STR:5 = 「%CNAME("一人称")%は……大工の子息では……ない……」#F重置/闭眼２/無口系/蹙眉/对话框乱
							CALL SET_DEVENT, "使徒"
						ELSE
							STR:2 = 「所属している……狩人の、組合……メンシス……の一員……」#F重置/闭眼２/小口２
							STR:3 = 「少し……いや、かなり変わった……人物……」#F重置/闭眼２/蹙眉/小口２
							STR:4 = 「……いくら、術で……傷を治せる……とは言え……傷付く事を恐惧ず……」#F重置/半目/蹙眉/小口２
							STR:5 = 「回転するノコギリを押し付ける……やり方は……理解、出来なかった……」#F重置/闭眼２/蹙眉/無口系/对话框乱
							CALL SET_DEVENT, "メンシス"
						ENDIF
						CALL DIALOGUE_FRAME_NAMEW, TARGET
						;亡霊
					ENDIF
				ENDIF
			ELSEIF RAND:8 == 0 && DEVENT("改めて")
				STR:1 = 「仕事について……？語れる範囲でなら……」#F重置/無口系/对话框？
				STR:2 = 「依頼主は多種多様……人も居れば、悪魔も居る……」#F重置/闭眼２/小口２
				STR:3 = 「そう……悪魔もだ……」#F重置/半目/小口２
				STR:4 = 「契約と言う、手続きをし……それに則り……魂を得るモノからすると……」#F重置/闭眼２/小口
				STR:5 = 「力任せに……魂を奪うモノは……自己的仕事に支障をきたす……」#F重置/闭眼２/小口２
				STR:6 = 「故に……そう言った総意で……雇われる事もある……」#F重置/闭眼２/小口
				STR:7 = 「無論……偽りの依頼で……誘き寄せられた、事も……あった……」#F重置/半目/小口２
				STR:8 = 「しかし……結末は語る値没有……」#F重置/半目/無口系
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSEIF RAND:7 == 0
				STR:1 = 「今一度、%CNAME("一人称")%の事を知りたい……？」#F重置/無口系/对话框？
				STR:2 = 「ふむ……なれば語ろう……%CNAME("一人称")%は%CALLNAME:TARGET%……悪魔を狩る事をしている………」#F重置/闭眼２/小口２
				STR:3 = 「%CNAME("二人称")%と同じレスレクター……復活者……人で在りながら……人外の存在……」#F重置/半目/小口２
				IF TALENT:恋慕
					STR:3 = 「そして……%CNAME("二人称")%の親しき同胞……これからも……宜しく……」#F重置/半目/斜眉/微笑３
				ELSE
					STR:3 = 「現在は……%CNAME("二人称")%と契約し、%CNAME("二人称")%の刃をしている……」#F重置/闭眼２/小口２
				ENDIF
				CALL DIALOGUE_FRAME_NAMEW, TARGET
				CALL SET_DEVENT, "改めて"
			ELSEIF RAND:6 == 0 && STRCOUNT(TEXTS("点心") , "い糖")
				IF TEXTS("点心") == "赤い糖" && DEVENT("赤い糖") == 0
					STR:1 = 「赤い……草莓味の糖は力を引き出す……モノだった……」#F重置/闭眼２/小口２
					STR:2 = 力……つまりは筋肉……！#F重置/闭眼２/無口系２
					STR:3 = 「そう……最も分かり易い効果……%CNAME("一人称")%も良く使っていた……」#F重置/闭眼２/会話口２
					CALL DIALOGUE_FRAME_NAMEW, TARGET
					CALL SET_DEVENT, "赤い糖"
				ELSEIF TEXTS("点心") == "青い糖" && DEVENT("青い糖") == 0
					STR:1 = 「青い……ソーダ味の糖は皮膚が硬くなる……モノだった……」#F重置/闭眼２/小口２
					STR:2 = ふむふむ、つまりは防御力が上がると言う事か。#F重置/闭眼２/嘟嘴
					STR:3 = 「ん……ただ、%CNAME("一人称")%は死なずだった故に……使う事が少なかった……」#F重置/闭眼２/会話口２
					STR:4 = 皮膚が硬くなる……閃いた！ちんちんも……#F重置/闭眼２/無口系２
					STR:5 = 「%CNAME("一人称")%には生えてないから……知らぬ……」#F重置/闭眼２/困扰眉/小口２
					CALL DIALOGUE_FRAME_NAMEW, TARGET
					CALL SET_DEVENT, "青い糖"
				ELSEIF TEXTS("点心") == "黄い糖" && DEVENT("黄い糖") == 0
					STR:1 = 「黄い……餡餅ン味の糖は体幹を上げる……モノだった……」#F重置/闭眼２/小口２
					STR:2 = ……今一理解出来ない効果だ。#F重置/闭眼２/無口系２
					STR:3 = 「つまりは……衝撃に対して強くなり……怯み難くなる効果……」#F重置/闭眼２/会話口２
					STR:4 = なるほど、格闘游戏の超市アーマー。#F重置/闭眼２/嘟嘴
					STR:5 = 「ただ……此れだけ……何故か……効果が無い……粗悪品が多かった……」#F重置/闭眼２/会話口２
					STR:6 = つまり……#F重置/闭眼２/無口系２
					STR:7 = 「いざ頼ろうと……口に含んでも……ただの糖だった事があった……」#F重置/闭眼２/困扰眉/小口２
					CALL DIALOGUE_FRAME_NAMEW, TARGET
					CALL SET_DEVENT, "黄い糖"
				ELSEIF TEXTS("点心") == "緑い糖" && DEVENT("緑い糖") == 0
					STR:1 = 「緑い……甜瓜味の糖は气息を馴染ませ……他者に気付かれ難くなる……モノだった……」#F重置/闭眼２/小口２
					STR:2 = それは果たして身体能力関係あるのだろうか？？？#F重置/闭眼２/無口系２
					STR:3 = 「伝承を再現、と……最初に言った……」#F重置/半目/小口２
					STR:4 = それは兎も角としてこの糖にはその効果は……#F重置/無口系
					STR:5 = 「無い……これはただの甜瓜味の糖……」#F重置/闭眼２/会話口２
					STR:6 = そうか……そうか………覗きに使えると思ったのに……#F重置/半目/無口系
					STR:7 = 「%CNAME("二人称")%………」#F重置/半目/小口２/困扰眉
					STR:8 = 呆れた様な彼女の視線が突き刺さる………#F重置/半目/困扰眉/無口系
					CALL DIALOGUE_FRAME_NAMEW, TARGET
					CALL SET_DEVENT, "緑い糖"
				ELSEIF TEXTS("点心") == "黑色糖" && DEVENT("黑色糖") == 0
					STR:1 = 「黑色……ウメ味の糖は精神を狂化し、限界以上に力を引き出す……モノだった……」#F重置/闭眼２/小口２
					STR:2 = 狂化とか限界以上などまた物々しい言葉が……#F重置/闭眼２/嘟嘴
					STR:3 = 「平時に出せる以上の力が出る……けれど……精神に恐惧を無くしてしまう……」#F重置/闭眼２/小口２
					STR:4 = 恐惧が無くなるのは良い事なのでは無いのだろうか？#F重置/無口系
					CALL DIALOGUE_FRAME_NAMEW, TARGET
					STR:1 = 「恐惧とは安全弁……それが無くなると……」#F重置/小口２
					STR:2 = 「そう、有些体に言えば足を滑らせて転けるだけで死ぬ……」#F重置/半目/小口２
					STR:3 = えっ#F重置/半目/無口系
					STR:4 = 「転ける恐怖や……受け身を取る……と言う選択肢を……捨ててしまい……結果、頭蓋を砕き……死ぬ……」#F重置/闭眼２/小口２
					STR:5 = なるほど……#F重置/闭眼２/無口系２
					STR:6 = 「%CNAME("一人称")%は……死なず、だから……その場で、決着を着けなければならぬ時に……使った……」#F重置/闭眼２/小口２
					CALL DIALOGUE_FRAME_NAMEW, TARGET
					CALL SET_DEVENT, "黑色糖"
				ELSE
					STR:1 = 「硬い糖を……口の中で、舐めて転がすのも……嫌いでは無い、が……」#F重置/闭眼２/小口２
					STR:2 = 「やはり……柔らかな糖を……噛みしめる方が……%CNAME("一人称")%は、好き……」#F重置/闭眼２/微笑３
					CALL DIALOGUE_FRAME_NAMEW, TARGET
				ENDIF
			ELSEIF RAND:5 == 0
				STR:1 = 「仮面に……良い思い出は……余り、無い……」#F重置/半目/小口２/困扰眉
				STR:2 = 「昔……不気味な仮面を身に着けた……騎士団に……追われた事がある……」#F重置/闭眼２/困扰眉/小口２
				STR:3 = 「鍛え抜かれた強靭な体幹で……竦まず……執拗な迄に……背後を取り……」#F重置/闭眼２/蹙眉/小口２
				STR:4 = 「致命的な一撃を狙う……厄介な……モノ共だった……」#F重置/闭眼２/へ字３/蹙眉
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSEIF RAND:4 == 0
				STR:1 = 「昔……刺客に不意を打たれ……殺された事がある……」#F重置/半目/小口２
				STR:2 = 「そのモノは……知らぬ顔だったけれど……」#F重置/闭眼２/小口２
				STR:3 = 「相手は%CNAME("一人称")%に……恨みでもあったのか……糞団子を投げつけられた……」#F重置/闭眼２/困扰眉/小口２
				;不死人の礼儀
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSEIF RAND:3 == 0
				STR:1 = 「幻想は……現実によって貶められる……」#F重置/闭眼２/小口２
				STR:2 = 「故に、秘匿され……神秘となる……」#F重置/半目/小口２
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSEIF RAND:2
				STR:1 = 「蒙を啓く事は、何も良き事ばかりでも無い……」#F重置/半目/小口２
				STR:2 = 「知らぬが良き真実は空にある宙の星程ある……」#F重置/闭眼２/蹙眉/小口２
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ELSE
				STR:1 = 「世俗に疎い%CNAME("一人称")%と……話していて……飽きぬのか……？」#F重置/困扰眉/小口２/对话框？
				IF TALENT:恋慕
					STR:2 = 「%CNAME("二人称")%には……飽きさせたく……ない、から……な……」#F重置/困扰眉/無口系
				ENDIF
				CALL DIALOGUE_FRAME_NAMEW, TARGET
			ENDIF
		ENDIF
	ENDSELECT
;TFLAG:取引拒否 = 1とすることで、你のたわごとを却下できます
CASE "Ｈ的約定"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			STR:1 = 「ん……学院の……試験で……良い点が、取れたら……ご褒美が、欲しい……？」#F重置/斜眉/無口系/对话框？
			IF COND("成績：赤点", MASTER)
				STR:2 = 「確か……前回……宜しくない、点数だった……けれど……頑張れる……？」#F重置/半目/斜眉/小口２
				STR:3 = 「ん……頑張れる、なら……良い、よ……」#F重置/半目/斜眉/微笑３
				STR:4 = 「ご褒美、関係なく……%CALLNAME:MASTER%が……良い点、取れると……良い、ね……」#F重置/笑颜４/斜眉/会話口２
			ELSEIF COND("成績：優秀", MASTER)
				STR:2 = 「確か……前回は……良い点……だっけ……うん……」#F重置/闭眼２/斜眉/小口２/托下巴
				STR:3 = 「%CALLNAME:MASTER%には……努力を……忘れて……欲しく、ない……から……点数を……上げさせて、要……けれど……」#F重置/闭眼２/斜眉/会話口２/托下巴
				STR:4 = 「頑張って、ね……」#F重置/笑颜４/斜眉/微笑３
			ELSE
				STR:2 = 「ん……それで……%CALLNAME:MASTER%の……干劲が……出る、なら……」#F重置/闭眼２/小口２
				STR:3 = 「良い、よ……頑張って、ね……」#F重置/半目/斜眉/微笑３
			ENDIF
		ELSE
		TFLAG:取引拒否 = 1
			STR:1 = 「ぁ……すま、ない……もう少し……考えを……纏め、たいから……」#F重置/半目/困扰眉/小口２
			STR:2 = 「%CNAME("二人称")%と……約定は……結べ、そうに……ない……」#F重置/闭眼２/困扰眉/無口系
			STR:3 = 「ただ……試験の……事は……応援、している……」#F重置/半目/困扰眉/小口２
		ENDIF
	ELSE
		STR:1 = 「む……？学院の……試験で……良い点が、取れたら……褒美が、欲しい……？」#F重置/斜眉/無口系/对话框？
		STR:2 = 「そう、言う……物事は……普通……親御に……強請るモノ、だが……」#F重置/闭眼２/小口２/托下巴
		IF COND("成績：赤点", MASTER)
			STR:3 = 「そも……%CNAME("二人称")%は……前回……宜しくない、点数だった……筈……」#F重置/闭眼２/困扰眉/小口２/托下巴
			STR:4 = 「まぁ……それが……%CNAME("二人称")%の、干劲に……繋がるなら……良いか……」#F重置/闭眼２/困扰眉/無口系/托下巴
			STR:5 = 「前途多難、だろうが……気張れよ……%CNAME("二人称")%……」#F重置/半目/困扰眉/微笑３/托下巴
		ELSEIF COND("成績：優秀", MASTER)
			STR:3 = 「真面目な……学徒には……褒美が……あるべき、か……」#F重置/闭眼２/斜眉/小口２/托下巴
			STR:4 = 「少々……評価値を……上げさせて……要が……」#F重置/闭眼２/斜眉/会話口２/托下巴
			STR:5 = 「褒美の……事は……忘れて、学べよ……%CNAME("二人称")%……」#F重置/半目/斜眉/微笑３
		ELSE
			STR:3 = 「しかし、それで……%CNAME("二人称")%が……干劲に……なるなら……良いか……」#F重置/闭眼２/小口２/托下巴
			STR:4 = 「%CNAME("一人称")%何ぞが……褒美に、なるか……分からぬが……励めよ……%CNAME("二人称")%……」#F重置/半目/微笑３/托下巴
		ENDIF
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
CASE "拭汗"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			IF RAND:3 == 0
				STR:1 = 「ぁ……ふふっ……有がとう……%CALLNAME:MASTER%……」#F重置/半目/斜眉/会話口２/紅潮２/頬汗
			ELSEIF RAND:2 == 0
				STR:1 = 「その……えっと……臭って……ない……よね……？」#F重置/斜眼４飘忽/困扰眉/小口２/紅潮２/頬手/頬汗
			ELSE
				STR:1 = 「ん……%CNAME("一人称")%は……汗を……気に、しない……から……忘れがちに……なってる、から……有がとう……」#F重置/半目/斜眉/微笑３/紅潮２/頬汗
			ENDIF
		ELSE
			STR:1 = 「見苦しい……モノを……見せたな……すまない……」#F重置/半目/困扰眉/無口系/頬汗
		ENDIF
	ELSE
		IF RAND:3 == 0
			STR:1 = 「すまない……%CNAME("一人称")%は……汗を……気に、しない……性質ゆえ……気が、回らなかった……」#F重置/闭眼２/困扰眉/無口系/頬汗
		ELSEIF RAND:2 == 0
			STR:1 = 「む……%TEXTR(@"すまない/手間を……掛けさせた、な")%……%CNAME("二人称")%……」#F重置/半目/困扰眉/無口系/頬汗
		ELSE
			STR:1 = 「見苦しい……モノを……見せたな……すまない……」#F重置/半目/困扰眉/無口系/頬汗
		ENDIF
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
CASE "淋浴独り言"
	;PRINTFORMW
CASE "淋浴"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			STR:1 = 「ぁ……誰か、居ると……思って、いた……けれど……%CALLNAME:MASTER%、だったんだ……」#F重置/斜眉/小口２/紅潮２
			IF COND("淋浴：内衣漁りバレ")
				STR:2 = 「その……漁った、のなら……もう少し……擅長く、隠して……_／／／_」#F重置/斜眼４飘忽/困扰眉/無口系/紅潮２/頬手
			ENDIF
		ELSE
			STR:1 = 「ぁ……その……少し、淋浴……借りてた……」#F重置/困扰眉/無口系/紅潮２
		ENDIF
	ELSE
		STR:1 = 「む……%CNAME("二人称")%か……少し、借りていたぞ……」#F重置/斜眉/無口系/紅潮２
		;実は内衣を漁ったのに気づかれています
		IF COND("淋浴：内衣漁りバレ")
			STR:2 = 「それは……さて置き……漁ったなら……もう少し……擅長く、隠せ……」#F重置/闭眼２/困扰眉/へ字３/紅潮２
		ENDIF
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
CASE "淋浴後换装"
	;初めて
	IF DEVENT(STR:日常イベント名) == 0
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF

CASE "淋浴後换装失敗"
	;初めて
	IF DEVENT(STR:日常イベント名) == 0
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF

;睡眠中の悪戯
CASE "趁睡袭击"
	;梦话
	CALL KOJO_SLEEP_K66
	WAIT
CASE "互动"
	SELECTCASE STR:日常イベント名
	CASE "一起学习"
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				STR:1 = 「%CNAME("一人称")%は……学徒では……ない、けれど……学ぶ、事は……好き、だから……」#F重置/斜眉/小口２
				STR:2 = 「うん……一緒に……勉強、したい……な……」#F重置/笑颜４/斜眉/会話口２
			ELSE
				STR:1 = 「え……あ、ああ……勉学、か……」#F重置/困扰眉/小口２
				STR:2 = 「………………」#F重置/闭眼２/困扰眉/無口系
				STR:3 = 「うん……少し、付き合おう……」#F重置/半目/困扰眉/小口２
			ENDIF
		ELSE
			STR:1 = 「%CNAME("一人称")%は……学徒では、ないが……」#F重置/闭眼２/斜眉/小口２
			STR:2 = 「知らぬ事を……学ぶのは……嫌いでは……ない……」#F重置/闭眼２/斜眉/微笑３
			STR:3 = 「では……共に……学ぼうか……」#F重置/斜眉/会話口２
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
		CFLAG:勉強した = 1
	CASE "托一托胸部"
		;你の性騷擾詳細はSTR:PLAY内容で分岐させることができる。
		SELECTCASE STR:PLAY内容
		CASE "乳环"
			PRINTFORMW
		CASE "陥没乳頭", "乳頭"
			PRINTFORMW
		CASE "巨乳輪"
			PRINTFORMW
		;其他は胸部を揉んだり
		CASEELSE
			PRINTFORMW
		ENDSELECT
	CASE "按摩"
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				STR:1 = 「ん……？マッサージ……して、くれる……の……？」
				STR:2 = 「あんまり……凝って、ない……けれど……」
				STR:3 = 「折角の……%CALLNAME:MASTER%の……厚意、だから……して、ほしい……な……」
				CALL DIALOGUE_FRAME_NAMEW, TARGET
				STR:1 = 「ん……%TEXTR(@"ふっ/ぁっ")%……%TEXTR(@"は、ふぅ/ん、ぅん")%……」
				IF DEVENT(STR:日常イベント名) == 0
					STR:2 = 「はふ……擅長、だね……マッサージ、するの……」
					STR:3 = 「ん……有がとう……気持ち、良かった……よ……」
				ELSE
					STR:2 = 「相変わらず……マッサージ……擅長、だね……」
					STR:3 = 「%TEXTR(@"んふ/はふ/ふぅ")%……気持ち、良かった……よ……」
					STR:4 = 「有がとう……%CALLNAME:MASTER%……」
				ENDIF
			ELSE
				TFLAG:地の文スキップ = 1
				PRINTFORMW %CALLNAME:TARGET%にマッサージをしようか？と提案してみると
				STR:1 = 「ぁっ……すまない……何の、話だ……？」
				STR:2 = 「マッサージ、か……」
				STR:3 = 「%CNAME("二人称")%には……悪い、けれど……少し、断らせて……要……」
				STR:4 = 「すまない……」
				PRINTFORMW 断られてしまった……
			ENDIF
		ELSE
			STR:1 = 「ん……？マッサージ、か……」#F重置/斜眉/無口系
			STR:2 = 「ふむ……%CNAME("一人称")%は……然程、凝っては……居ないが……」#F重置/闭眼２/斜眉/へ字３/托下巴/对话框・・・
			STR:3 = 「厚意に……甘えると……しよう……」#F重置/斜眉/会話口２
			CALL DIALOGUE_FRAME_NAMEW, TARGET
			STR:1 = 「ん……%TEXTR(@"ふっ/ぁっ")%……%TEXTR(@"は、ふぅ/ん、ぅん")%……」#F重置/闭眼２/斜眉/小口２
			IF DEVENT(STR:日常イベント名) == 0
				STR:2 = 「んふ……%CNAME("二人称")%……中々……擅長、だな……」#F重置/半目/斜眉/小口２
				STR:3 = 「恐らく……気紛れ……だろうが……良かったよ……」#F重置/半目/斜眉/微笑３
			ELSE
				STR:2 = 「%CNAME("二人称")%の腕、なら……按摩師に……なれそう、だな……」#F重置/半目/斜眉/小口２
				STR:3 = 「ふぅ……有がとう、な……%CNAME("二人称")%……」#F重置/半目/斜眉/微笑３
			ENDIF
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	CASE "接吻"
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				IF DEVENT(STR:日常イベント名) == 0
					STR:1 = 「んっ……？！」#F重置/〇〇/斜眉/無口系２/对话框惊讶
					STR:2 = 「接吻……したい、なら……一言……欲しかった、な……？」#F重置/半目/左笑颜４/困扰眉/会話口２/頬手
				ELSE
					STR:1 = 「んっ……%TEXTR(@"ちゅっ/ちゅぅ/ちゅる")%……」#F重置/闭眼２/斜眉/無口系２
					STR:2 = 「%TEXTR(@"ぷは/はふ/んふ")%……%CALLNAME:MASTER%との、接吻……嫌いじゃ……ない、けれど……」#F重置/闭眼２/斜眉/小口２
					STR:3 = 「一言、欲しい……な……？」#F重置/笑颜４/困扰眉/微笑３/頬手
				ENDIF
			ELSE
				STR:1 = 「んっ……！？」#F重置/斜眉/無口系２/对话框惊讶
				STR:2 = 「%CNAME("二人称")%……その……すまない……やめて、欲しい……」#F重置/闭眼２/困扰眉/小口２
			ENDIF
		ELSE
			IF DEVENT(STR:日常イベント名) == 0
				STR:1 = 「んっ……！？」#F重置/〇〇/斜眉/無口系２/对话框惊讶
				STR:2 = 「ぷは……唐突、だな……%CNAME("二人称")%……」#F重置/半目/斜眉/△
				STR:3 = 「まぁ……%CNAME("一人称")%は……気に、せぬが……」#F重置/闭眼２/斜眉/小口２
			ELSE
				STR:1 = 「んっ……」#F重置/闭眼２/斜眉/無口系２
				STR:2 = 「はぁ……%CNAME("二人称")%……するなら……一言……ほしい……」#F重置/半目/斜眉/小口２
			ENDIF
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	CASE "膝枕"
		PRINTFORMW
	CASE "泡茶"
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				STR:1 = 「ん……ああ……茶、有がとう……」#F重置/半目/斜眉/微笑３/茶
				STR:2 = %CALLNAME:MASTER%から差し出された茶を受け取り慢慢地ちびちびと飲んでいる……#F重置/闭眼２/斜眉/微笑３/茶
			ELSE
				STR:1 = 「ぁ、ああ……茶か……すまない……助かる……」#F重置/半目/困扰眉/小口２/茶
				STR:2 = %CALLNAME:MASTER%から差し出された茶を受け取り慢慢地ちびちびと飲んでいる……#F重置/闭眼２/斜眉/無口系/茶
			ENDIF
		ELSE
			STR:1 = 「ん……茶か……すまない、な……助かる……」#F重置/斜眉/小口２/茶
			STR:2 = %CALLNAME:MASTER%から差し出された茶を受け取り慢慢地ちびちびと飲んでいる……#F重置/闭眼２/斜眉/無口系/茶
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	;CALL SET_CEVENT, "飲酒拒否"でお酒を飲まないようにできる。
	;このフラグはCALL DEL_CEVENT, "飲酒拒否"で消すことができる
	CASE "勸酒"
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				STR:1 = 「%CNAME("一人称")%は……お酒……あまり、強くない……けれど……」#F重置/斜眉/小口２
				STR:2 = 「%CALLNAME:MASTER%が……注いで、くれる……と、言うなら……飲ませて……要……」#F重置/半目/斜眉/微笑３
				STR:3 = 「%TEXTR(@"んく……んく……/こくり……こくり……")%%TEXTR(@"はふ/はぁ/ふぅ")%……」#F重置/闭眼２/斜眉/小口２
			ELSE
				STR:1 = 「すまない……今は……酒は……飲む、気分に……なれない……」#F重置/半目/困扰眉/小口２
				STR:2 = 「%CNAME("二人称")%の……厚意を……無下に、するのは……悪い……と、思っている……すまない……」#F重置/闭眼２/困扰眉/無口系
				IF CEVENT("飲酒拒否") == 0
					CALL SET_CEVENT, "飲酒拒否"
				ENDIF
			ENDIF
		ELSE
			STR:1 = 「酒……酒か……」#F重置/半目/困扰眉/小口２
			STR:2 = 「%CNAME("一人称")%は……あまり、強くないが……」#F重置/闭眼２/困扰眉/会話口２
			STR:3 = 「うむ……%CNAME("二人称")%の……厚意だ……頂こう……」#F重置/半目/斜眉/微笑３
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	CASE "摸頭"
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				IF DEVENT(STR:日常イベント名) == 0 || RAND:2 == 0
					STR:1 = 「ん……？%CALLNAME:MASTER%……どうした、の……？」#F重置/斜眉/無口系/对话框？
					STR:2 = 聞いてくる%CALLNAME:TARGET%に、何となく頭を撫でたくなっただけだ。と返すと
					STR:3 = 「ん……じゃあ……大人しく……撫でられる……」
					STR:4 = 瞳を閉じて、%CALLNAME:MASTER%に撫でられるがままにする%CALLNAME:TARGET%だった……
				ELSE
					IF RAND:3 == 0
						STR:1 = 「ねぇ……%CALLNAME:MASTER%は……%CNAME("一人称")%の……頭を……撫でて……楽しい……？」
						STR:2 = 頭を撫でていると%CALLNAME:TARGET%がそう聞いてきたので%TEXTR(@"悪くない/そこそこ")%と答えると。
						STR:3 = 「ん……なら……良かった……」#F重置/笑颜４/斜眉/会話口２
						STR:4 = 柔らかく微笑み%CALLNAME:MASTER%の撫でる手に任憑擺佈%CALLNAME:TARGET%だった……
					ELSEIF RAND:2 == 0
						STR:1 = 「んふ……少し……くすぐったい……」#F重置/笑颜４/困扰眉/微笑３
						STR:2 = むず痒そうな顔をしながらも%CALLNAME:MASTER%に撫で続けられる%CALLNAME:TARGET%だった……
					ELSE
						STR:1 = 「もしかして……兒童、扱い……されてる……？」#F重置/斜眉/小口２/对话框？
						STR:2 = 「…………………………」#F重置/闭眼２/斜眉/無口系/对话框・・・
						STR:3 = 「%CALLNAME:MASTER%だったら……良い、かな……」#F重置/笑颜４/斜眉/小口２
						STR:4 = 良いのかと思いながらも%CALLNAME:TARGET%の頭を撫で続ける%CALLNAME:MASTER%だった……#F重置/笑颜４/斜眉/微笑３
					ENDIF
				ENDIF
			ELSE
				IF RAND:2 == 0
					STR:1 = 「ぁ……、…………」#F重置/半目/困扰眉/小口２
				ELSE
					STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
				ENDIF
				STR:2 = 何かを言いたげな、表情をしているが結局何も言う事なく撫でられる%CALLNAME:TARGET%だった……
			ENDIF
		ELSE
			IF DEVENT(STR:日常イベント名) == 0 || RAND:2 == 0
				STR:1 = 「んん……？」#F重置/困扰眉/無口系/对话框？
				STR:2 = 「%CNAME("二人称")%……何故……%CNAME("一人称")%を……撫でる……？」#F重置/半目/困扰眉/小口２/对话框？２
				STR:3 = 「まぁ……%CNAME("二人称")%の……する事だ……気に、するだけ……無駄、か……」#F重置/闭眼２/斜眉/無口系２
				STR:4 = 何か酷い事を言われてる気がしたが、スルーして%CALLNAME:TARGET%の頭を撫で続けた……
			ELSE
				IF RAND:3 == 0
					STR:1 = 「%CNAME("二人称")%……%CNAME("一人称")%を……撫でて……楽しい、のか……？」#F重置/斜眉/小口２/对话框？
					STR:2 = %CALLNAME:TARGET%の疑問に対してそこそこと答えると。#F重置/斜眉/無口系
					STR:3 = 「そうか……まぁ……%CNAME("二人称")%が……そうなら……良いか……」#F重置/闭眼２/斜眉/小口２
					STR:4 = 特に抵抗ことなく%CALLNAME:MASTER%に撫で続けられる%CALLNAME:TARGET%だった……#F重置/闭眼２/斜眉/無口系
				ELSEIF RAND:2 == 0
					STR:1 = 「%CNAME("二人称")%……少し……くすぐったい……」#F重置/半目/困扰眉/小口２
					STR:2 = むず痒い顔をしながらも%CALLNAME:MASTER%の手を払う事なく、撫でられ続ける%CALLNAME:TARGET%だった……#F重置/半目/困扰眉/無口系
				ELSE
					STR:1 = 「もしや……兒童、扱い……されている……？」#F重置/斜眉/小口２/对话框？
					STR:2 = 「…………………………」#F重置/闭眼２/斜眉/無口系/对话框・・・
					STR:3 = 「まぁ……良いか……」#F重置/闭眼２/斜眉/小口２
					STR:4 = 良いのかと思いながらも%CALLNAME:TARGET%の頭を撫で続ける%CALLNAME:MASTER%だった……#F重置/闭眼２/斜眉/無口系
				ENDIF
			ENDIF
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	;胸元にチップを差し込まれます。兔女郎制服限定
	CASE "给小费"
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				IF DEVENT("偏った知識") == 0
					STR:1 = 「昔……旅の、途中で……そう言った……お店で……働いた、事が……ある、けれど……」#F重置/半目/斜眉/小口２
					STR:2 = 「どうして……胸元に……入れる、の……かな……？%CALLNAME:MASTER%は……どうして……した、の……？」#F重置/半目/斜眉/無口系/对话框？
					STR:3 = %CALLNAME:TARGET%の疑問に、したり顔でロマンだからだと答えると。
					STR:4 = 「うぅん……%CALLNAME:MASTER%が……そう、言う……なら……そう、なの……かな……？」#F重置/半目/斜眉/小口２/对话框？
					STR:5 = ｿｳｲｳｺﾄﾀﾞﾖｰ
				ELSE
					IF TALENT:貧乳
						STR:1 = 「ところで……%CNAME("一人称")%の……貧しい、胸……だと……服に……落ちる、の……だけれど……」#F重置/半目/困扰眉/小口２
						STR:2 = 服の内側に落ちたチップを拾う姿もまたロマンだ……#F重置/半目/困扰眉/無口系
						STR:3 = 「なる、ほど……」#F重置/半目/困扰眉/無口系/托下巴
					ELSE
						STR:1 = 「うぅん……やっぱり……%CNAME("一人称")%には……理解、できない……ロマン……」#F重置/闭眼２/困扰眉/無口系
					ENDIF
				ENDIF
			ELSE
				STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
			ENDIF
		ELSE
			STR:1 = 「昔……旅の、途上で……そう言った……店で……働いた、事が……あるが……」#F重置/半目/小口２
			STR:2 = 「何故……胸元に……入れる、の……だろうか……？」#F重置/半目/左闭眼２/困扰眉/無口系/对话框？/托下巴
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	;送禮貰った感想です。何を貰ったか含め、好きに書いてください
	CASE "送一份小礼物"
		PRINTFORMW
	CASE "送一份普通的礼物"
		PRINTFORMW
	CASE "送一份高价的礼物"
		PRINTFORMW
	CASEELSE
		PRINTFORMW
	ENDSELECT

CASE "撫摸頭髮"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			STR:1 = 「殆ど……手入れを……して、いない……髪、だけれど……」#F重置/斜眉/小口２
			STR:2 = 「触って、いて……楽しい……？」#F重置/半目/斜眉/無口系/对话框？
			STR:3 = さらさらで手櫛していて割と楽しい
			STR:4 = 「ん……なら……良かった……」#F重置/斜眼４飘忽/斜眉/小口２/紅潮２/頬手
		ELSE
			STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
		ENDIF
	ELSE
		STR:1 = 「手入れ、なぞ……殆ど……して、いない……髪だが……」#F重置/斜眉/小口２
		STR:2 = 「触って……楽しい、モノ……なのか……？」#F重置/半目/困扰眉/無口系/对话框？
		STR:3 = キョトンとした表情の%CALLNAME:TARGET%が見つめてくる……
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
;"坐在旁邊", "從後面抱住", "把手放在大腿上"は恋慕限定指令です
CASE "坐在旁邊"
	IF CEVENT("満ちた月")
		IF RAND:3 == 0
			STR:1 = 「ん……？%CALLNAME:MASTER%……何か、用……？」#F重置/半目/斜眉/無口系/对话框？
		ELSEIF RAND:2 == 0
			STR:1 = 「ふふっ……少し……近い、よ……？」#F重置/半目/斜眉/微笑３
		ELSE
			STR:1 = 「うぅん……%CALLNAME:MASTER%には……悪い、けれど……この距離は……少し、落ち着かない……かな……」#F重置/斜眼４飘忽/困扰眉/小口２/紅潮２
		ENDIF
	ELSE
		STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
CASE "從後面抱住"
	IF CEVENT("満ちた月")
		IF CSTR:PREV_DAILYCOM == STR:日常イベント名
			IF RAND:2 == 0
				STR:1 = 「ん……どうした、の……？」#F重置/半目/斜眉/小口２/对话框？
			ELSE
				STR:1 = 「ふふっ……Corculum...♪」#F重置/笑颜４/斜眉/微笑３
			ENDIF
		ELSE
			STR:1 = 「…………！？」#F重置/困扰眉/無口系/对话框惊讶
			STR:2 = 「ぁ……%CALLNAME:MASTER%……だった、んだ……少し、驚いた……」#F重置/闭眼２/斜眉/小口２
		ENDIF
	ELSE
		STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
CASE "把手放在大腿上"
	IF CEVENT("満ちた月")
		IF CSTR:PREV_DAILYCOM == STR:日常イベント名
			IF FLAG:二人きり
				STR:1 = 「ん……%TEXTR(@"んふ/はふ")%……%TEXTR(@"んぅ/ぅん")%……」
			ELSE
				STR:1 = 「%CNAME("二人称")%は……もう少し……慎みを……覚えた、方が……良い、ぞ……」#F重置/半目/困扰眉/小口２/对话框乱
				STR:2 = _暗灰色_「むぅ……そう、言うのは……二人きりの……時に……して、欲しい……_／／／_暗灰色_」#F重置/半目/困扰眉/嘟嘴/紅潮２/对话框乱/頬手
			ENDIF
		ELSE
			IF FLAG:二人きり
				STR:1 = 「ん……どう、した……の……？」
			ELSE
				STR:1 = 「%CNAME("二人称")%……今更、だが……性騷擾、だぞ……」#F重置/闭眼２/斜眉/小口２
				STR:2 = _暗灰色_「それに……そう、言うのは……二人きりの……時に……して、欲しい……_／／／_暗灰色_」#F重置/半目/困扰眉/小口２/紅潮２/对话框乱/頬手
			ENDIF
		ENDIF
	ELSE
		STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET

;この中でTFLAG:取引拒否 = 1とすると母乳を分けてあげません
CASE "哺乳"

CASE "整理睡姿"
	;梦话
	CALL KOJO_SLEEP_K66
	WAIT
CASE "被拒绝了学习的邀请"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			STR:1 = 「ん……分かった……」
			STR:2 = 「でも……勉強、大事……だよ……？」
			STR:3 = 「時間、見て……やって、ね……？」
		ELSE
			STR:1 = 「分かった……」#F重置/半目/困扰眉/無口系
		ENDIF
	ELSE
		STR:1 = 「まぁ……玩遊戲のも……若人の……務めだ……」#F重置/闭眼２/斜眉/会話口２
		STR:2 = 「しかし、玩耍だけに……時間を、割くなよ……%CNAME("二人称")%……」#F重置/半目/斜眉/小口２
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
CASE "勉強前に胖次要求"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			STR:1 = 「…………………_／／／_」#F重置/半目/困扰眉/へ字３/紅潮２/对话框・・・
			STR:2 = 「それで……干劲が……出るなら……良いよ……？」#F重置/斜眼４飘忽/困扰眉/小口２/紅潮２
		ELSE
			STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
		ENDIF
	ELSE
		STR:1 = 「………………」#F重置/半目/困扰眉/へ字３/对话框・・・
		STR:2 = 「まぁ……良いか……%CNAME("二人称")%が、それで……干劲を……出すなら……」#F重置/闭眼２/困扰眉/無口系
		STR:3 = 物凄く呆れられながら叹气を吐かれた……#F重置/闭眼２/困扰眉/小口２/叹气
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
CASE "卖个破绽"
	SELECTCASE STR:日常イベント名
	CASE "邀请一起入浴"
		PRINTFORMW
	CASE "Ｈ的邀请"
		PRINTFORMW
	CASE "邀请学习"
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				STR:1 = 「うん……間違って、ない……合ってる、よ……」#F重置/半目/斜眉/微笑３
				IF CHOSE_DEVENT("勉強前に胖次要求")
					STR:2 = 「%TEXTR(@"はふ/ふぅ")%……勉強……お疲れ様……頑張った、ね……」#F重置/笑颜４/斜眉/微笑３
					STR:3 = 「けれど……少し、下……見すぎ、だよ……？」#F重置/斜眼４飘忽/困扰眉/小口２/紅潮２/頬手
				ELSEIF COND("成績：優秀", MASTER)
					STR:2 = 「酱と……毎日……頑張って……いる、から……間違い、殆ど……なかった、ね……」#F重置/半目/斜眉/会話口２
					STR:3 = 「偉い、ね……努力は……どう、言い……繕っても……辛い、モノ……だから……」#F重置/闭眼２/斜眉/小口２
					STR:4 = 「頑張れてる……%CALLNAME:MASTER%は……偉い、よ……」#F重置/笑颜４/斜眉/微笑３
				ELSEIF COND("成績：赤点", MASTER)
					STR:2 = 「間違い、多かった……けれど……最後は……合って……いた、ね……」#F重置/半目/斜眉/会話口２
					STR:3 = 「お疲れ、様……試験まで……頑張って……勉強……しよう、ね……？」#F重置/笑颜４/斜眉/会話口２
					STR:4 = 「%CNAME("一人称")%も……手伝う、から……」#F重置/半目/斜眉/微笑３
				ELSE
					STR:2 = 「ん……赤点は……回避、出来る……けれど……」#F重置/半目/斜眉/小口２
					STR:3 = 「%CALLNAME:MASTER%なら……もっと、上を……狙える、から……」#F重置/半目/斜眉/会話口２
					STR:4 = 「頑張ろう、ね……%CNAME("一人称")%も……手伝う、から……」#F重置/半目/斜眉/微笑３
				ENDIF
			ELSE
				STR:1 = 「ぅん……答案に……誤り、无……」#F重置/半目/無口系
				STR:2 = 「お疲れ様……だ……」#F重置/半目/小口２
			ENDIF
		ELSE
			STR:1 = 「ふむ……答案に……誤り、无……」#F重置/半目/無口系
			IF CHOSE_DEVENT("勉強前に胖次要求")
				STR:2 = 「さて……本来なら……最後に……総括した……事を……言うのだが……」#F重置/闭眼２/小口２
				STR:3 = 「%CNAME("二人称")%……先程から……視線が……下を見すぎだ……」#F重置/闭眼２/困扰眉/小口２/叹气
			ELSEIF COND("成績：優秀", MASTER)
				STR:2 = 「成績優秀、な……だけ……あって……殆ど……間違えなかった、な……」#F重置/半目/斜眉/小口２
				STR:3 = 「日々の……努力の……成果だ……誇れよ……%CNAME("二人称")%……」#F重置/半目/斜眉/微笑３
			ELSEIF COND("成績：赤点", MASTER)
				STR:2 = 「途中……間違えが、多かったが……最後は……合って、いたな……」#F重置/半目/斜眉/小口２
				STR:3 = 「試験まで……苦労、するかも……しれないが……励めよ……%CNAME("二人称")%……」#F重置/半目/斜眉/微笑３
			ELSE
				STR:2 = 「良くもなく……悪くもなく……赤点は……逃れる事は……出来るだろうが……」#F重置/半目/斜眉/小口２
				STR:3 = 「そこで……甘んじない様に……務めよ……%CNAME("二人称")%……」#F重置/半目/斜眉/微笑３
			ENDIF
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
		CFLAG:勉強した = 1
		CFLAG:MASTER:勉強時間 += 1 + RAND:2
	CASE "推倒"
		PRINTFORMW
	CASE "展示内褲"
		;複数人が並んで你に展示内褲ている場合
		IF FLAG:対複数
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	CASE "清洁口交"
		PRINTFORMW
	CASE "口淫"
		PRINTFORMW
	CASE "亲脸頬", "接吻"
		PRINTFORMW
	CASE "膝枕", "抱住", "把胸部压了上去", "摩擦股間"
		PRINTFORMW
	CASE "抚摸", "手淫"
		PRINTFORMW
	CASE "膝枕"
		PRINTFORMW
	CASE "沏茶"
		;CSTR:茶 を指定してある場合には、SAVESTR:茶 で何を用意したかが判定できる
		;例）PRINTFORMW 「よければ%SAVESTR:茶%どうぞ」
		PRINTFORMW
	;それ以外
	CASEELSE
		IF RAND:2
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDSELECT
;これは素質に[開朗]ないし[粗野]を持っている角色のみです
CASE "構って欲しい！"
	PRINTFORMW
CASE "廁所"
	;廁所で用を済ませた後の台詞
	IF BASE:尿意 == 0
		;主人も廁所で済ませてきた
		IF BASE:MASTER:尿意 == 0
			PRINTFORMW
		ELSE
			IF TALENT:恋慕
				IF CEVENT("満ちた月")
					STR:1 = 「ん……戻った、よ……」#F重置/半目/斜眉/会話口２
				ELSE
					STR:1 = 「戻った……」#F重置/半目/困扰眉/小口２
				ENDIF
			ELSE
				STR:1 = 「戻った……」#F重置/闭眼２/小口２
			ENDIF
			CALL DIALOGUE_FRAME_NAMEW, TARGET
		ENDIF
	;廁所に行く際の台詞
	ELSE
		IF TALENT:恋慕 && CEVENT("満ちた月")
			STR:1 = 「ちょっと……席を……取下、ね……」#F重置/半目/斜眉/小口２
			STR:2 = そう言って%CALLNAME:TARGET%はさっと席を外した……#F重置/半目/斜眉/無口系
		ELSE
			STR:1 = 「少し……席を、取下……」#F重置/闭眼２/小口２
			STR:2 = そう言って%CALLNAME:TARGET%はさっと席を外した……#F重置/闭眼２/へ字３
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	ENDIF
CASE "廁所詮索"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			STR:1 = 「………………_／／／_」#F重置/半目/困扰眉/無口系/紅潮２
			STR:2 = 「その、ね……？慎み、持って……欲しい、な……？」#F重置/斜眼４飘忽/困扰眉/小口２/紅潮２/頬手
			STR:3 = 叱られてしまった……
		ELSE
			STR:1 = 「………………」#F重置/半目/困扰眉
			STR:2 = 「その……いや……何でも、ない……」#F重置/闭眼２/困扰眉/小口２
		ENDIF
	ELSE
		STR:1 = 「………………」#F重置/半目/蹙眉
		STR:2 = 「%CNAME("二人称")%……慎みを……もう少し……持て……」#F重置/闭眼２/蹙眉/小口２
		STR:3 = 物凄く呆れられた……#F重置/闭眼２/蹙眉/無口系
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
;これは你と角色が両方男性の際に限り起きます
CASE "連れション"
	PRINTFORMW
;これは你と角色が両方男性でない際に限り起きます
CASE "廁所で井戸端会議"
	PRINTFORMW
;你に廁所を覗かれた！
CASE "廁所ハプニング"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			STR:1 = 「ぇ……？え……？？？ぁっ……」#F重置/困扰眉/小口２
			STR:2 = 混乱した様子を見せた%CALLNAME:TARGET%だったが、ドアの鍵の部分を見て全て察した表情をする。#F重置/闭眼２/困扰眉/無口系/紅潮２
			IF DEVENT("初ハプニング") == 0
				STR:3 = 「言い訳……させて……？」#F重置/半目/困扰眉/会話口２
				STR:4 = ………どうぞ#F重置/半目/困扰眉/無口系
				CALL DIALOGUE_FRAME_NAMEW, TARGET
				STR:1 = 「%CNAME("一人称")%は、ね……お家を……持たない、身の上……だった、の……」#F重置/笑颜４/困扰眉/小口２/紅潮２/对话框汗/托下巴
				STR:2 = 「それに……昔の……故郷の……お家、には……鍵、なかったの……」#F重置/笑颜４/困扰眉/小口２/紅潮２/对话框汗２/頬手
				STR:3 = 「だから……鍵の事、何て……意識の、外……だった、から……」#F重置/笑颜４/困扰眉/小口２/紅潮２/对话框汗３/唇边手
				STR:4 = つまりは、無自覚露出PLAYをしていたんだな？？？このむっつり桑め。#F重置/＞＜/困扰眉/へ字３/紅潮２/
				STR:5 = _爱心粉紅_「～～～～～～っ_／／／_」
				STR:6 = 羞恥に顔を真っ赤にする%CALLNAME:TARGET%を見ながらどうするかを考える%CALLNAME:MASTER%だった……
			ELSE
				STR:3 = %TEXTR(@"鍵に馴带污迹的なさすぎじゃないか？？？/これだけ忘れていると故意じゃないのか？？？/鍵、掛け忘れていますよ/誘っています？？？")%#F重置/＞＜/困扰眉/へ字２
				STR:4 = 「ぅ、うぅ……_／／／_」
			ENDIF
		ELSE
			STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
		ENDIF
	ELSE
		IF DEVENT("初ハプニング") == 0
			STR:1 = 「住まいを……同じと……している、のだから……」#F重置/闭眼２/蹙眉/小口２
			STR:2 = 「こう、言った……事も……起こりうる、か……」#F重置/闭眼２/蹙眉/会話口２
			CALL SET_DEVENT, "初ハプニング"
		ELSE
			STR:1 = 「%CNAME("二人称")%……少し……注意が……散漫すぎる、と……思うぞ……」#F重置/闭眼２/蹙眉/小口２
			STR:2 = 「いや、それは……施錠せぬ……%CNAME("一人称")%もか……」#F重置/闭眼２/蹙眉/会話口２
		ENDIF
		STR:3 = 「%CNAME("一人称")%は……気にせぬが……%CNAME("二人称")%は……少し、気を付けろ……」#F重置半目/蹙眉/小口２
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
;廁所ハプニングから派生するＨイベント
CASE "廁所Ｈ"
	SELECTCASE STR:日常イベント名
	CASE "廁所イベント：見せつけくぱぁ"
		PRINTFORMW
	CASE "廁所イベント：相互自慰"
		PRINTFORMW
	CASE "廁所イベント：口交"
		PRINTFORMW
	CASE "廁所イベント：Ｖ性交"
		PRINTFORMW
	CASE "廁所イベント：Ａ性交"
		PRINTFORMW
	ENDSELECT
CASE "检查阴部"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K66
		WAIT
	ELSEIF COND("合意：检查阴部") == 0
		IF TALENT:恋慕 && CEVENT("満ちた月")
			STR:1 = _灰色_「ぁの……せめて……一言……言って……_／／／_灰色_」#F重置/笑颜４/困扰眉/小口２/紅潮２
			STR:2 = _灰色_「無言で……無言で……%CNAME("一人称")%の、下を……ずらそうと、して……見ようと、しないで……_／／／_灰色_」#F重置/＞＜/困扰眉/△/紅潮２
			STR:3 = _灰色_「見ても……良い、から……せめて……一言……言って……欲しい……_／／／_灰色_」#F重置/＞＜/困扰眉/小口２/紅潮２
			IF COND("合意：检查阴部") == 0
				CSTR:合意 += "/检查阴部/"
				STR:4 = か細く羞恥に震えた声だが、確かに%CALLNAME:MASTER%は%CALLNAME:TARGET%から_イエロー_[检查阴部]_の合意をもぎ取った。#F重置/＞＜/困扰眉/へ字３/紅潮２
			ENDIF
		ELSE
			STR:1 = 「………………………………」#F重置/半目/蹙眉
			STR:2 = 「もう……多くは……言わぬから……」#F重置/闭眼２/蹙眉/小口２
			STR:3 = 「せめて……許可を……取ってからに……せよ……」#F重置/闭眼２/蹙眉/会話口２
			IF COND("合意：检查阴部") == 0
				CSTR:合意 += "/检查阴部/"
				STR:3 = 苦い顔をされ的同时、%CALLNAME:MASTER%は%CALLNAME:TARGET%から_イエロー_[检查阴部]_の合意を得た。#F重置/闭眼２/蹙眉/へ字３
			ENDIF
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	ELSE
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				STR:1 = 「ぅ、うぅ……_／／／_」#F重置/＞＜/困扰眉/無口系２/紅潮２
				STR:2 = 顔を真っ赤にする%CALLNAME:TARGET%をしり目に秘すべき箇所を细心的観察した……
			ELSE
				STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
			ENDIF
		ELSE
			STR:1 = 「好きに……せよ……%CNAME("一人称")%は……言葉を……翻さぬ……」#F重置/闭眼２/蹙眉/小口２
			STR:2 = 呆れた表情をしながら%CALLNAME:TARGET%は%CALLNAME:MASTER%に秘すべき箇所给展示出来……#F重置/闭眼２/蹙眉/へ字３
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	ENDIF
CASE "检查菊穴"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K66
		WAIT
	ELSE
		PRINTFORMW
	ENDIF
CASE "检查内褲"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K66
		WAIT
	ELSEIF COND("合意：检查内褲") == 0
		IF TALENT:恋慕 && CEVENT("満ちた月")
			STR:1 = 「待って……無言で……顔を……股に……近づけ……ない、で……」#F重置/困扰眉/小口２
			STR:2 = 「普通に……怖い、から……何を……したいか……言って……？」#F重置/笑颜４/困扰眉/小口２/頬手
			STR:3 = 胖次、ミ領帯。胖次、格子、サセロ。#F重置/笑颜４/困扰眉/無口系/頬手
			STR:4 = 「わ、分かった……から……無言で……顔を……近づける、のは……やめて、ね……？」#F重置/笑颜４/困扰眉/小口２/頬手
			STR:5 = _暗灰色_「%CALLNAME:MASTER%の……内衣に……掛ける……情熱は……どこ、から……来てるの……だろ……？」#F重置/闭眼２/困扰眉/無口系
			IF COND("合意：检查内褲") == 0
				CSTR:合意 += "/检查内褲/"
				STR:6 = 困惑されながらも、%CALLNAME:MASTER%は%CALLNAME:TARGET%から_イエロー_[检查内褲]_の合意を得た。
			ENDIF
		ELSE
			STR:1 = 「待て……%CNAME("二人称")%……無言で……顔を……股に……近づけるな……」#F重置/半目/憤怒眉/小口２/布
			STR:2 = 「怖気を……覚える……だから……せめて……一言……確認を取れ……」#F重置/半目/困扰眉/小口２
			STR:3 = 「見せぬ、とは……言って、いない……から……」#F重置/闭眼２/困扰眉/小口２
			STR:4 = 「はぁ……」#F重置/闭眼２/困扰眉/無口系/叹气
			IF COND("合意：检查内褲") == 0
				CSTR:合意 += "/检查内褲/"
				STR:5 = 叹气を吐かれながらも、%CALLNAME:MASTER%は%CALLNAME:TARGET%から_イエロー_[检查内褲]_の合意を得た。#F重置/闭眼２/困扰眉/無口系/叹气
			ENDIF
		ENDIF
	ELSE
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				STR:1 = 「ん……良い、よ……」#F重置/半目/斜眉/微笑３
				STR:2 = 「一言、酱と……言って、くれた……なら……」#F重置/半目/斜眉/小口２
				STR:3 = 「断ら、ない……よ……？」#F重置/笑颜４/困扰眉/微笑３/頬手
				STR:4 = そう言って見せてくれた%CALLNAME:TARGET%の胖次をじっくり観察した……
			ELSE
				STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
			ENDIF
		ELSE
			STR:1 = 「ん……好きに……見ると……良い……」#F重置/闭眼２/斜眉/小口２
			STR:2 = %CALLNAME:TARGET%に胖次を格子させてと、言うと轻轻地そう返された。#F重置/半目/斜眉/無口系
		ENDIF
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
;念のため分岐を作って有ますが多いので取捨選択してください
CASE "撫摸股間"
	;初めて
	IF DEVENT(ARGS) == 0
		IF TALENT:恋慕 && CEVENT("満ちた月")
			TFLAG:地の文スキップ = 1
			STR:1 = 「えっと……その手は……何、かな……？」#F重置/半目/困扰眉/無口系
			STR:2 = %CALLNAME:TARGET%の股間を撫でようとした手を先に見つけられたので正直に答えると
			STR:3 = 「褥の外で……触るのは……性騷擾、だから……やめた、方が……良い、よ……？」#F重置/笑颜４/困扰眉/小口２
			IF FLAG:二人きり == 0
				STR:4 = 「それに……人前……だから……控えた、方が……良い、と……思う……」#F重置/闭眼２/困扰眉/小口２
			ENDIF
		ELSE
			STR:1 = 「………………」#F重置/半目/蹙眉/無口系
			STR:2 = 「%CNAME("二人称")%……褥外で……そこを……触るのは……性騷擾だ……」#F重置/闭眼２/蹙眉/小口２
			IF FLAG:二人きり == 0
				STR:3 = 「それと……人前だ……少し……控えよ……」#F重置/闭眼２/蹙眉/小口２/对话框乱
			ENDIF
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	ELSE
		;IF CHECK_CLO("Ｖ露出")
		;	PRINTFORMW
		;;连褲襪越し
		;ELSEIF CHECK_CLO("连褲襪露出")
		;	PRINTFORMW
		;;布鲁马越し
		;ELSEIF CHECK_CLO("布鲁马露出")
		;	PRINTFORMW
		;;泳装越し(比基尼や競泳泳装や死库水など)
		;ELSEIF CHECK_CLO("泳装ボトム露出")
		;	PRINTFORMW
		;;胖次越し
		;ELSEIF CHECK_CLO("胖次露出")
		;	PRINTFORMW
		;;其他休闲褲やなんか布越し
		;ELSE
		;	PRINTFORMW
		;ENDIF
		IF FLAG:二人きり == 0
			IF CSTR:PREV_DAILYCOM == STR:日常イベント名
				IF TALENT:恋慕
					IF CEVENT("満ちた月")
						STR:1 = 「んっ……%TEXTR(@"んぅ/ふ、ぅ/は、ぁ/ひぅ")%……」#F重置/闭眼２/蹙眉/小口２
						STR:2 = %CALLNAME:TARGET%は%CALLNAME:MASTER%の愛撫に必死に声を抑えようとしてる。
						STR:3 = これ以上の反応が見たいなら二人きり变成了方が良さそうだ……
						CFLAG:静寂を騒然に = 1
					ELSE
						STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
					ENDIF
				ELSE
					STR:1 = 「………………」#F重置/半目/蹙眉/無口系
					STR:2 = %CALLNAME:TARGET%の無機質な視線が突き刺さっているが、%TEXTR(@"気にせず/意に介さず")%%CALLNAME:TARGET%の阴部を弄び続けた……
				ENDIF
			ELSE
				IF TALENT:恋慕
					IF CEVENT("満ちた月")
						STR:1 = 「人前、では……少し……やめて……欲しい、かな……？」
					ELSE
						STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
					ENDIF
				ELSE
					STR:1 = 「人前では……いや……言うだけ……無駄か……」#F重置/闭眼２/蹙眉/小口２
					STR:2 = 呆れた顔をしながらも、%CALLNAME:MASTER%が触る手を%CALLNAME:TARGET%は止めようとはしない……#F重置/闭眼２/蹙眉/無口系
				ENDIF
			ENDIF
		ELSE
			IF TALENT:恋慕 && DEVENT("静寂を騒然に")
				TFLAG:地の文スキップ = 1
				PRINTFORMW %CALLNAME:TARGET%の太ももの間にある秘すべき箇所に手を伸ばすと彼女に手首を掴まれた
				STR:1 = 「お願い、だから……これ以上……%CNAME("一人称")%を……苛めないで……」#F重置/半目/困扰眉/会話口２
				STR:2 = いやいやと首を横を振る彼女は本当に嫌そうで、仕方が無いから今回はやめておこうと思ったのだった……
			ELSEIF CSTR:PREV_DAILYCOM == STR:日常イベント名 && DEVENT("静寂を騒然に") == 0
				IF TALENT:恋慕
					IF CEVENT("満ちた月")
						IF CFLAG:静寂を騒然に == 8
							STR:1 = 「%TEXTR(@"/ぁ/ぃ/ゃ")%っ_HH_フ―ッ……_HH_フ―ッ……_HH_%TEXTR(@"ひぅ/ゃあ/ぃう/ぁあ")%っ_HH_」#F重置/涙目＞＜/蹙眉/哈欠小/紅潮２/頬汗
							STR:2 = 生かさず殺さずで、甜だけの快感に息も絶え絶えな%CALLNAME:TARGET%の姿にそろそろイかせて上げようかと思い、#F重置/涙目＞＜/蹙眉/へ字２/紅潮２/頬汗
							STR:3 = 焦れて熱の籠った%CALLNAME:TARGET%の%TEXTR(@"阴蒂/陰核/淫核/突起")%と%TEXTR(@"蜜壺/Gスポット/媚肉")%を同時に責める。#F重置/涙目＞＜/蹙眉/半開/紅潮２/頬汗
							STR:4 = 「%TEXTR(@"ぁっ_HH_ぁっ_HH_あっ_HH_/ぃっ_HH_ひっ_HH_/ゃっ_HH_ゃめっ_HH_やだっ_HH_ゃあっ_HH_")%_HH_」#F重置/涙目＞＜/蹙眉/哈欠小/紅潮２/頬汗
							STR:5 = 「――――――ﾍ/%UNICODE(0x2216)%%UNICODE(0x0780)%っ_HH_HH_HH_」#F重置/涙目＞＜/蹙眉/へ字２/紅潮２/对话框爱心大量/頬汗
							STR:6 = ビクビクンと身体を大きく震わせて透明な液体を尿道から噴き出して漸く%CALLNAME:TARGET%は絶頂出来た。#F重置/陰/蹙眉/小口/紅潮２/对话框爱心大量/頬汗
							STR:7 = 脱力する%CALLNAME:TARGET%の身体を支えてやり、荒れた彼女の呼吸が整うのを待った……
							CALL DIALOGUE_FRAME_NAMEW, TARGET
							PRINTFORMW …………
							PRINTFORMW ………
							PRINTFORMW ……
							PRINTFORMW …
							IF DEVENT("お叱り：股間撫で初回")
								STR:1 = 「少し……やりすぎ……」#F重置/半目/蹙眉/小口２
								STR:2 = 落ち着いた%CALLNAME:TARGET%が真っ先に言った言葉はお叱りの言葉だった。#F重置/闭眼２/蹙眉/無口系
								STR:3 = 「強く……止めなかった……%CNAME("一人称")%も……悪い、けれど……それでも……%CALLNAME:MASTER%が……悪い……」#F重置/闭眼２/蹙眉/小口２
								STR:4 = ごめんなさい。#F重置/闭眼２/蹙眉/無口系
								STR:5 = 「はぁ……、%CNAME("一人称")%にも……瑕疵は……ある、から……これ以上は……言わない、けれど……」#F重置/半目/蹙眉/小口２
								STR:6 = 「ああ、言うのは……褥の時……だけ……で……お願い……」#F重置/斜眼４/飘忽/蹙眉/小口２/紅潮２/頬手
								STR:7 = それはつまり床ではもっと苛めても―――#F重置/斜眼４/飘忽/蹙眉/無口系２/紅潮２/頬手
								STR:8 = 「%CNAME("二人称")%？？？」#F目陰/笑颜４/微笑３/对话框憤怒
								STR:9 = ごめんなさい。
								CALL SET_DEVENT, "お叱り：股間撫で初回"
							ELSE
								STR:1 = 「何か……言い遺す……言葉は……ある……？」#F目陰/笑颜４/微笑３/对话框憤怒
								STR:2 = 静かにぶち切れている%CALLNAME:TARGET%に、あの月明かりを纏う大剣を首に掛けられ的同时、そう問われたので。
								STR:3 = %TEXTR(@"可愛かったです。/エロかったです。/とても興奮しました。/何時もお世話になってます。/正直%CALLNAME:TARGET%も気持ち良かっただろう？")%と満面の笑みで返すと#F目陰/笑颜４/微笑３/对话框・・・
								STR:4 = 「%TEXTR(@"どうやら……%CNAME("二人称")%の首は……柱に……吊るすのが……正解の……様……/%CNAME("一人称")%の……介錯に……身を……任せ……給え……/さらばだ……%CNAME("二人称")%……死んだとて……治るとは……思わない……けれど……")%」#F目陰/半目/小口２
								STR:5 = ごめんなさい。#F目陰/半目/へ字３
								STR:6 = 「はぁ……%CNAME("二人称")%は……サディズムが……過ぎる、よ……」#F重置/闭眼２/困扰眉/小口２/叹气
								STR:7 = その後に、長いお小言を言われたが最終的に許してもらったのだった。#F重置/闭眼２/小口２/对话框憤怒
							ENDIF
							CALL SET_DEVENT, "静寂を騒然に"
						ELSEIF CFLAG:静寂を騒然に <= 7 && CFLAG:静寂を騒然に >= 4
							IF CFLAG:静寂を騒然に == 4
								STR:1 = 「%TEXTR(@"待て、%CNAME("二人称")%/%CNAME("二人称")%、これ以上は")%――」#F重置/困扰眉/哈欠小/紅潮２/頬汗
								STR:2 = 制止する%CALLNAME:TARGET%の言葉を遮る様に、ぷっくりと充血した%TEXTR(@"阴蒂/陰核/淫核/突起")%を少し強めに摘まむ。
								STR:3 = 「――ﾍ/%UNICODE(0x2216)%%UNICODE(0x0780)%っ_HH_フ―ッ……_HH_フ―ッ……_HH_」#F重置/＞＜/蹙眉/へ字２/紅潮２/对话框爱心大量/頬汗
								STR:4 = 突然の快感に轻轻地気を遣ったのか%CALLNAME:MASTER%の腕にしがみ付いて甘く荒れた吐息を零すだけ。#F重置/陰/蹙眉/小口/紅潮２/对话框爱心大量/頬汗
								STR:5 = さて、%CALLNAME:TARGET%から反論も制止もない模様なので続けて愛撫しようか……
							ELSE
								STR:1 = 「%TEXTR(@"/ぁ/ぃ/ゃ")%っ……_HH_%TEXTR(@"まって/ゆるし、て/やめ、て/ゃだ、やだっ")%……_HH_」#F重置/＞＜/蹙眉/哈欠小/紅潮２/頬汗
								IF RAND:2 == 0
									STR:2 = %TEXTR(@"阴蒂/陰核/淫核/突起")%だけでは%CALLNAME:TARGET%も飽きるだろうと膣内も弄って给事にした。
									STR:3 = だらだらと溢れる%TEXTR(@"愛液/蜜液")%がくちゅりと厭らしい音を立てて%CALLNAME:MASTER%の指を%CALLNAME:TARGET%の%TEXTR(@"蜜壺/膣肉/媚肉")%は柔らかく包んだ。#F重置/＞＜/蹙眉/へ字２/紅潮２/頬汗
									STR:4 = 「%TEXTR(@"ひぅ/はぅ/ぃひ")%っ……_HH_%TEXTR(@"カリカリ/抚摸")%ゃめっ……_HH_――ﾍ/%UNICODE(0x2216)%%UNICODE(0x0780)%っ_HH_HH_」#F重置/涙目＞＜/蹙眉/へ字２/紅潮２/頬汗
								ELSE
									STR:2 = 強く制止しないと続けられると察したのか%CALLNAME:TARGET%が懇願の声を上げるが
									STR:3 = それは%CALLNAME:MASTER%の嗜虐心を満たすだけの心地の良いメロディーにしか聞こえない。#F重置/＞＜/蹙眉/へ字２/紅潮２/頬汗
									STR:4 = 「%TEXTR(@"placet...ne...corruptor...saevus...mihi..._HH_/お、ねがい……%CNAME("一人称", "かな")%を……いじめ、ない……でぇ……_HH_")%」#F重置/涙目＞＜/蹙眉/哈欠小/紅潮２/頬汗
								ENDIF
								STR:5 = 何か、聞こえた気がしたが意味が伝わらなかったから気にしない事にした……#F重置/陰/蹙眉/小口/紅潮２/頬汗
							ENDIF
							CFLAG:静寂を騒然に += 1
						ELSEIF CFLAG:静寂を騒然に <= 3 &&  CFLAG:静寂を騒然に >= 1
							STR:1 = 「%TEXTR(@"/ん/ぁ/ぃ/ゃ")%っ……%TEXTR(@"んぅ/ふ、ぅ/は、ぁ/ひぅ")%……」#F重置/闭眼２/蹙眉/小口２
							STR:2 = 少しずつ充血してきたのか、陰核の硬さが増していき。
							STR:3 = 甜吐息と、湿った蜜液が零れ%CALLNAME:MASTER%の手を汚していく……
							CFLAG:静寂を騒然に += 1
						ELSE
							STR:1 = 「%TEXTR(@"ん/ぁ")%……%TEXTR(@"んぅ/ん、ふ")%……」#F重置/半目/無口系
							STR:2 = %CALLNAME:MASTER%の愛撫を接受%CALLNAME:TARGET%だが。
							STR:3 = 微かに反応しているのか、陰核が徐々に硬くなり始めている……
							CFLAG:静寂を騒然に += 1
						ENDIF
					ELSE
						STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
					ENDIF
				ELSE
					STR:1 = 「………………」#F重置/半目/無口系
					STR:2 = 無言で%CALLNAME:MASTER%の愛撫を接受%CALLNAME:TARGET%の瞳は無機質で虚空を映していた……
				ENDIF
			ELSEIF CHOSE_DEVENT(STR:日常イベント名)
				IF TALENT:恋慕
					IF CEVENT("満ちた月")
						STR:1 = 「ん……今は……うん……良い、よ……？」#F重置/半目/斜眉/小口２
						STR:2 = 「でも……褥の外……だから……そこそこに……ね……？」#F重置/笑颜４/困扰眉/小口２
						IF CEVENT("お叱り：股間撫で初回")
							STR:3 = 「それ、と……あんまり……_灰色_苛め、_暗灰色_ないで……_／／／_」#F重置/＞＜/困扰眉/へ字３/紅潮２
						ENDIF
					ELSE
						STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
					ENDIF
				ELSE
					STR:1 = 「はぁ……好きに……触ると……良い……」#F重置/半目/小口２
					STR:2 = 心底呆れた顔をしながらも%CALLNAME:TARGET%は脚を開き、%CALLNAME:MASTER%の手を拒まず受け入れた……
				ENDIF
			ELSE
				IF TALENT:恋慕
					IF CEVENT("満ちた月")
						STR:1 = 「ん……また……触りたく……なった、の……？」#F重置/半目/斜眉/小口２
						STR:2 = 「でも……褥の外……だから……そこそこに……ね……？」#F重置/笑颜４/困扰眉/小口２
						IF CEVENT("お叱り：股間撫で初回")
							STR:3 = 「それ、と……あんまり……_灰色_苛め、_暗灰色_ないで……_／／／_」#F重置/＞＜/困扰眉/へ字３/紅潮２
						ENDIF
					ELSE
						STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
					ENDIF
				ELSE
					STR:1 = 「まぁ……良い、か……%CNAME("二人称")%の……好きに……するが……良い……」#F重置/半目/小口２
					STR:2 = 諦めた様な、呆れた様な顔を%CALLNAME:TARGET%はするが、すっと脚を開き%CALLNAME:MASTER%が触りやすい様にした……
				ENDIF
			ENDIF
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	ENDIF
CASE "检查布鲁马", "股間観察"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K66
		WAIT
	;じっくり観察
	ELSEIF CFLAG:股間確認済
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				STR:1 = 「その……ね……？」#F重置/半目/困扰眉/小口２
				STR:2 = 「見すぎ、だよ……？」#F重置/斜眼４飘忽/困扰眉/小口２/紅潮２/頬手
			ELSE
				STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
			ENDIF
		ELSE
			STR:1 = 「%CNAME("二人称")%……その……なんだ……」#F重置/半目/困扰眉/小口２
			STR:2 = 「視線が……煩い……」#F重置/闭眼２/困扰眉/無口系
		ENDIF
	ELSE
		IF TALENT:恋慕
			IF CEVENT("満ちた月")
				STR:1 = 「ん……？どうした、の……？」#F重置/斜眉/無口系/对话框？
				STR:2 = %CALLNAME:MASTER%の視線に気が付いたのか%CALLNAME:TARGET%が聞いてくるが視線はとっさに戻せなかったので
				STR:3 = 「ぁ……うん……まぁ……%CALLNAME:MASTER%が……どこを……見る、かは……決めれない……けれど……」#F重置/半目/困扰眉/会話口２
				STR:4 = 「少しは……自重……した、方が……良い、よ……？」#F重置/笑颜４/困扰眉/会話口２/頬手
			ELSE
				STR:1 = 「…………………」#F重置/半目/困扰眉/無口系
			ENDIF
		ELSE
			STR:1 = 「どう、した……？%CNAME("二人称")%……？」#F重置/斜眉/無口系
			STR:2 = %CALLNAME:MASTER%の視線に気が付いたのか%CALLNAME:TARGET%が聞いてくるが視線はとっさに戻せなかったので
			STR:3 = 「…………。はぁ……まぁ……%CNAME("二人称")%が……どこを……見て、いようが……勝手だが……」#F重置/半目/困扰眉/会話口２
			STR:4 = 「少しは……自重……せよ……」#F重置/闭眼２/困扰眉/小口２
		ENDIF
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET

CASE "掀起裙子"
	;默认ルト衣装が裙じゃないので一時封鎖
	SELECTCASE STR:日常イベント名
	CASE "撩起裙子"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			;[IF_DEBUG]
			;	PRINTFORMW KOJO_DAILYCOM_K66, %ARGS%, %STR:日常イベント名%：初回
			;[ENDIF]
		;胖次チラ直後
		ELSEIF COND("胖次チラ直後")
			PRINTFORMW
		ELSE
			;[IF_DEBUG]
			;	PRINTFORMW KOJO_DAILYCOM_K66, %ARGS%, %STR:日常イベント名%
			;[ENDIF]
		ENDIF
	;掀起裙子
	CASEELSE
		;刚睡醒の胡乱な状態を襲う
		IF CFLAG:刚睡醒
			;[IF_DEBUG]
			;	PRINTFORMW KOJO_DAILYCOM_K66, %ARGS%：刚睡醒
			;[ENDIF]
		;睡眠中の悪戯
		ELSEIF CFLAG:睡眠
			;梦话
			CALL KOJO_SLEEP_K66
			WAIT
		;初めて
		ELSEIF DEVENT(STR:日常イベント名) == 0
			;[IF_DEBUG]
			;	PRINTFORMW KOJO_DAILYCOM_K66, %ARGS%：初回
			;[ENDIF]
		;胖次チラ直後
		ELSEIF COND("胖次チラ直後")
			PRINTFORMW
		ELSE
			IF COND("打招呼前")
				;[IF_DEBUG]
				;	PRINTFORMW KOJO_DAILYCOM_K66, %ARGS%：打招呼前
				;[ENDIF]
			ELSE
				;胖次沒穿
				IF EQUIP:胖次 == 0
					;[IF_DEBUG]
					;	PRINTFORMW KOJO_DAILYCOM_K66, %ARGS%：没穿内褲
					;[ENDIF]
				ELSE
					;[IF_DEBUG]
					;	PRINTFORMW KOJO_DAILYCOM_K66, %ARGS%
					;[ENDIF]
				ENDIF
			ENDIF
		ENDIF
	ENDSELECT
CASE "胖次ドーピング"
	;初回
	IF DEVENT(ARGS) == 0
		;自分の胖次
		IF COND("胖次ドーピング")
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ELSE
		PRINTFORMW
	ENDIF
CASE "裙下撮影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		PRINTFORMW
	CASEELSE
		PRINTFORMW
	ENDSELECT
CASE "股間撮影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		PRINTFORMW
	CASE "阴部のチラ見せ撮影"
		PRINTFORMW
	CASEELSE
		PRINTFORMW
	ENDSELECT
CASE "内褲摄影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		PRINTFORMW
	CASE "阴部のチラ見せ撮影"
		PRINTFORMW
	CASEELSE
		PRINTFORMW
	ENDSELECT
CASE "阴部摄影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		PRINTFORMW
	CASE "阴部の見せつけ撮影"
		PRINTFORMW
	CASEELSE
		PRINTFORMW
	ENDSELECT
CASE "性処理を頼んだ際の反応"
	;干劲がある場合
	IF COND("干劲性処理")
		SELECTCASE STR:PLAY内容
		CASE "口交"

		CASE "乳交"

		CASE "Ｖ性交"

		CASE "Ａ性交"

		CASE "尿道性交"

		CASE "乳頭奸"

		ENDSELECT
	;何かしながらで良いならして给よって場合。何をしながらなのかは SAVESTR:夢中 で参照できる。
	ELSEIF COND("进行性処理")
		SELECTCASE STR:PLAY内容
		CASE "手淫"

		CASE "Ｖ性交"

		CASE "Ａ性交"

		CASE "尿道性交"

		ENDSELECT
	ENDIF
CASE "ちん接吻を頼んだ際の反応"

CASE "見抜きを頼んだ際の反応"
	SELECTCASE STR:PLAY内容
	CASE "胖次見抜き"

	ENDSELECT
;これは見抜きされる(胖次を見せている)側の立場のセリフ。連れ見抜き参加者はPARTNER()で参照できる
CASE "連れ見抜き"
	;表情を変える場合はここで出来る
	;CALL EMOTION_PLUS, "害羞", TARGET
	;PARTNER()の使用例
	;PRINTFORMW 「……%CNAME(CALLNAME:PARTNER() )%にそういう目で見られると、ちょっと恥ずかしいですね」

;これは見抜きする(你に誘われて自家発電する)側の立場のセリフ。胖次を見せている角色はPARTNER()で参照できる
CASE "連れ見抜きに誘われた"
	;表情を変える場合はここで出来る
	;CALL EMOTION_PLUS, "夸奖", TARGET

CASE "性処理の内容変更を頼んだ際の反応"
	IF COND("干劲性処理")
		SELECTCASE STR:PLAY内容
		CASE "口交"

		CASE "乳交"

		CASE "Ｖ性交"

		CASE "Ａ性交"

		CASE "尿道性交"

		CASE "乳頭奸"

		ENDSELECT
	ELSEIF COND("进行性処理")
		SELECTCASE STR:PLAY内容
		CASE "手淫"

		CASE "Ｖ性交"

		CASE "Ａ性交"

		CASE "尿道性交"

		ENDSELECT
	ENDIF
CASE "拜托処理性欲"
	SELECTCASE NAMES("性処理")
	CASE "口交"

	CASE "乳交"

	CASE "Ｖ性交"

	CASE "Ａ性交"

	CASE "尿道性交"

	CASE "乳頭奸"

	ENDSELECT
CASE "进行性処理"
	SELECTCASE NAMES("性処理")
	;これは見抜きされる(胖次を見せている)側の立場のセリフ。連れ見抜き参加者がいる場合はPARTNER()で参照できる
	CASE "胖次見抜き"
		;連れ見抜きされた場合
		IF PARTNER()

		ELSE

		ENDIF
	CASE "手淫"

	CASE "Ｖ性交"

	CASE "Ａ性交"

	CASE "尿道性交"

	ENDSELECT
CASE "性処理後飲尿PLAY"

;TFLAG:指令中止 = 1 とすることで口上側から性欲解消を拒否できる
CASE "性欲解消を申し出た際の反応"
	SELECTCASE STR:PLAY要望
	CASE "舐陰"

	CASE "舐陰莖"

	CASE "口交"

	CASE "Ｖ性交"
		;避孕套没有の生性交を希望
		IF COND("女性主導生性交")

		ELSE

		ENDIF

	CASE "Ａ性交"

	CASE "尿道性交"

	ENDSELECT
;STR:PLAY要望 が本来したいPLAY。STR:PLAY内容 が你がやりたいと言って交渉中のPLAY
;ここの中で STR:PLAY内容 を変更する事で提案を蹴る事も出来る。什麼也不做場合は你の提案が通る
CASE "性欲解消の内容変更を頼んだ際の反応"
	SELECTCASE STR:PLAY内容
	CASE "舐陰"

	CASE "舐陰莖"

	CASE "Ｖ性交"
		;今日は避孕套没有の生性交がＯＫな日
		IF COND("女性主導生性交")

		ELSE

		ENDIF

	CASE "Ａ性交"

	CASE "尿道性交"

	ENDSELECT
;性欲解消PLAY後の台詞
CASE "帮忙消除性欲"
	SELECTCASE NAMES("性処理")
	CASE "舐陰"
		;絶頂後の放尿を你が口で受け止めた場合(この角色が[絶頂失禁体質]＆聖水経験＆高い尿意の時に、你に飲尿経験と受虐属性が有ると選択肢出現)
		IF COND("飲尿フラグ", PLAYER)

		ELSE

		ENDIF
	CASE "舐陰莖"

	CASE "口交"

	CASE "Ｖ性交", "Ａ性交", "尿道性交"
		;挿入行為の後に口交も続けて行った場合
		IF STR:PLAY要望 == "口交"

		ELSE
			SELECTCASE NAMES("性処理")
			CASE "Ｖ性交"

			CASE "Ａ性交"

			CASE "尿道性交"

			ENDSELECT
		ENDIF
	ENDSELECT
;主人公のスマホに一緒にお昼食べようよと邀请際に送る連絡文です
;ここで TFLAG:地の文スキップ = 0 とすると下の"お昼ご飯のお誘い"での地の文をカットできる
CASE "お昼ご飯のお誘い"
	STR:1 = 『%CNAME("二人称")%　お昼　どう　？』#F重置/对话框圓圈
	CALL DIALOGUE_FRAME_NAMEW, TARGET
;実際に二人昼食をとっている時です
CASE "一緒にお昼ご飯"
	IF TALENT:恋慕 && CEVENT("満ちた月")
		STR:1 = 「ん……それ、じゃあ……食べよ、か……」#F重置/半目/斜眉/微笑３
		STR:2 = %CALLNAME:TARGET%とお昼の時間を共に過ごした。#F重置/闭眼２/斜眉/微笑３
	ELSE
		STR:1 = 「さて……食べようか……」#F重置/闭眼２/会話口２
		STR:2 = %CALLNAME:TARGET%とお昼の時間を共に過ごした。#F重置/闭眼２/無口系
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
;部室で二人きりの時に坐在旁邊際のセリフです
CASE "二人きり：坐在旁邊"
;部室で二人きりの時にＨに邀请際のセリフです
CASE "Ｈに邀请"
CASE "二人きり：Ｈの誘いに胖次条件で回应"
CASE "二人きり：Ｈの誘いに回应"
CASE "二人きり：Ｈの誘いを断った"
ENDSELECT

;-------------------------------------------------
;自撮りにメッセージを添えます　一言くらい
;加筆の際には RETURN 0 を消去し、MAIL_BODY を埋めて使ってください
;地の文も必要であれば適宜変更してください
;-------------------------------------------------
@SELFY_MAIL_K66, ARGS
#DIMS MAIL_BODY

MAIL_BODY =
;メッセージ本文
SELECTCASE ARGS
CASE "ヌード自撮り"
	RETURN 0
	MAIL_BODY =
CASE "阴部自撮り", "阴茎自撮り"
	RETURN 0
	MAIL_BODY =
CASE "胸部自撮り"
	RETURN 0
	MAIL_BODY =
CASE "今年の泳装自撮り"
	RETURN 0
	MAIL_BODY =
CASE "学校指定の泳装自撮り"
	RETURN 0
	MAIL_BODY =
CASE "体操服自撮り"
	RETURN 0
	MAIL_BODY =
CASE "胸罩自撮り" ,"胖次自撮り"
	RETURN 0
	MAIL_BODY =
CASEELSE
	RETURN 0
	MAIL_BODY =
ENDSELECT

;地の文
PRINTFORMW 消息中附有「%MAIL_BODY%」的照片…

;-------------------------------------------------
;约会の際のセリフ
;システム側の地の文や反応を出力させたくない場合には TFLAG:地の文スキップ = 1 としてください
;约会回数は EXP:约会経験 が+1ずつされます。初回のセリフは IF EXP:约会経験 == 0 で分岐するのが良いでしょう
;素質で分岐させる場合にはTALENT:恋慕での分岐がおすすめです
;-------------------------------------------------
@KOJO_DATE_K66, ARGS

SELECTCASE ARGS
;你を週末约会に誘った
CASE "约会のお誘い"
	IF TALENT:恋慕 && CEVENT("満ちた月")
		STR:1 = 「今度の……休みに……少し、散步に……行かない……？」#F重置/半目/斜眉/小口２/对话框？
	ELSE
		STR:1 = 「%CNAME("二人称")%……今度の……休みに……少し……散步に……行かないか……？」#F重置/小口２
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
CASE "约会のお誘い：結果"
	;约会決定！
	;自発的に约会の做便当给よ！って場合はCALL SET_CEVENT, "约会の便当"としてください。
	IF COND("约会的约定")
		PRINTFORMW
	;你に保留されてしまった
	ELSE
		PRINTFORMW
	ENDIF
;你から週末约会に誘われた
;自発的に约会の做便当给よ！って場合はCALL SET_CEVENT, "约会の便当"としてください。
CASE "约会に誘われた"
	IF TALENT:恋慕 && CEVENT("満ちた月")
		STR:1 = 「ん……？なるほど……良い、よ……」#F重置/半目/斜眉/小口２
		STR:2 = 「一緒に……どこかに……行こう、ね……」#F重置/笑颜４/斜眉/微笑３
	ELSE
		STR:1 = 「ん……？ああ……散步か……良いぞ……」#F重置/半目/斜眉/小口２
		IF TALENT:恋慕
			STR:2 = _暗灰色_「それに……少し……気を……紛らわせたい……から……」#F重置/闭眼２/困扰眉/小口２
		ELSE
			STR:2 = 「特に……予定は……ないからな……」#F重置/闭眼２/斜眉/無口系
		ENDIF
	ENDIF
	CALL DIALOGUE_FRAME_NAMEW, TARGET
;你に便当を作ってきてと頼まれた
CASE "便当を頼まれた"

	;これのコメントアウトを取下と、便当を作ってあげません
	;CALL DEL_CEVENT, "约会の便当"
;你から约会当日にいきなり誘われた
;自発的に约会の做便当给よ！って場合はCALL SET_CEVENT, "约会の便当"としてください。
CASE "邀请去约会"
	;同居していない相手を誘った時
	IF COND("同居中") == 0
		IF TALENT:恋慕 && CEVENT("満ちた月")
			STR:1 = 「ん……？なるほど……良い、よ……」#F重置/半目/斜眉/小口２
			STR:2 = 「一緒に……どこかに……行こう、ね……」#F重置/笑颜４/斜眉/微笑３
		ELSE
			STR:1 = 「ん……？ああ……散步か……良いぞ……」#F重置/半目/斜眉/小口２
			IF TALENT:恋慕
				STR:2 = _暗灰色_「それに……少し……気を……紛らわせたい……から……」#F重置/闭眼２/困扰眉/小口２
			ELSE
				STR:2 = 「特に……予定は……ないからな……」#F重置/闭眼２/斜眉/無口系
			ENDIF
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	ELSE
		IF TALENT:恋慕 && CEVENT("満ちた月")
			STR:1 = 「ん……？なるほど……良い、よ……」#F重置/半目/斜眉/小口２
			STR:2 = 「一緒に……どこかに……行こう、ね……」#F重置/笑颜４/斜眉/微笑３
		ELSE
			STR:1 = 「ん……？ああ……散步か……良いぞ……」#F重置/半目/斜眉/小口２
			IF TALENT:恋慕
				STR:2 = _暗灰色_「それに……少し……気を……紛らわせたい……から……」#F重置/闭眼２/困扰眉/小口２
			ELSE
				STR:2 = 「特に……予定は……ないからな……」#F重置/闭眼２/斜眉/無口系
			ENDIF
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	ENDIF

;约会するにあたり、特殊な条件で着替えたりしたい時に使ってください。台詞没有で換装操作のみするのが推奨です
CASE "约会衣装に更衣"

;地の文はpartnerが遅れて現れる展開になっています
;地の文が用意されているので、轻轻地１行程度の反応で良いと思います
CASE "待ち合わせ"
	IF COND("同居中") == 0
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
	;地の文を自己書きたい場合にはコメントアウトを外してください
	;TFLAG:地の文スキップ = 1

;地の文が用意されているので、轻轻地１行程度の反応で良いと思います
CASE "约会本番"
	SELECTCASE SAVESTR:约会
	CASE "去买泳衣"
		PRINTFORMW
	CASE "散歩"
		PRINTFORMW
	CASE "尋訪美食"
		PRINTFORMW
	CASE "逛街"
		PRINTFORMW
	CASE "去水族馆"
		PRINTFORMW
	CASE "去游乐园"
		PRINTFORMW
	CASE "去电影院"
		PRINTFORMW
	CASE "去图书馆"
		PRINTFORMW
	CASE "赏花"
		PRINTFORMW
	CASE "去游泳"
		PRINTFORMW
	CASE "爬山"
		PRINTFORMW
	CASE "赏红叶"
		PRINTFORMW
	CASE "滑雪"
		PRINTFORMW
	CASEELSE
		PRINTFORMW
	ENDSELECT

	;地の文を自己書きたい場合にはコメントアウトを外してください
	;TFLAG:地の文スキップ = 1
CASE "约会中の買食物"
	SELECTCASE SAVESTR:约会
	CASE "去电影院"
		;何を買ったかはSTR:選択したもの で分岐可能
		SELECTCASE STR:選択したもの
		CASE "爆米花"
			PRINTFORMW
		CASE "吉事果"
			PRINTFORMW
		CASE "热狗"
			PRINTFORMW
		ENDSELECT
	ENDSELECT
CASE "手をつなぐ"
	PRINTFORMW
CASE "手をつながない"
	PRINTFORMW
;泳装を買いに行った時です
CASE "泳装選び開始"
	;Micro比基尼とかもＯＫ
	IF COND("Ｈ的泳装選択可能") && RAND:2
		PRINTFORMW
	ELSEIF RAND:2
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;泳装を買いに行って、結果的に選んだ泳装に対するセリフです
;もしも去年も泳装を選んでいたなら、CSTR:今年の泳装 に記録されているので比較する事が出来る
CASE "泳装決定"
	SELECTCASE SWIM(STR:選んだ泳装, "種類")
	CASE "Micro比基尼"
		PRINTFORMW
	CASE "比基尼"
		PRINTFORMW
	CASE "競泳泳装"
		PRINTFORMW
	CASE "高開衩連衣裙"
		PRINTFORMW
	CASE "連体泳装"
		PRINTFORMW
	;其他はだいたいエロ泳装です
	CASEELSE
		PRINTFORMW
	ENDSELECT

;泳池などで泳装姿に着替え、待ち合わせ場所に集合した時です
CASE "泳装に着替えた"
	;どの泳装に着替えたか？
	SELECTCASE SWIM(CSTR:今年の泳装, "種類")
	CASE "比基尼"
		PRINTFORMW
	CASE "Micro比基尼"
		PRINTFORMW
	CASE "連体泳装"
		PRINTFORMW
	CASE "競泳泳装"
		PRINTFORMW
	;其他はだいたいエロ泳装です
	CASEELSE
		PRINTFORMW
	ENDSELECT

;草丛口交です。地の文が用意されているので、轻轻地１行程度の反応でも良いと思います
CASE "到暗处去……"
	IF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
	;地の文を自己書きたい場合にはコメントアウトを外してください
	;TFLAG:地の文スキップ = 1

;映画館などで横並びに座った状態での手交です。地の文が用意されているので、轻轻地１行程度の反応でも良いと思います
CASE "请求偷偷手交"

CASE "接吻"

CASE "摸屁股"
	IF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;你が草丛口交や接吻や性騷擾をしない紳士な場合はここに来ます
CASE "下次去哪里呢？询问", "专心看电影"

	;地の文を自己書きたい場合にはコメントアウトを外してください
	;TFLAG:地の文スキップ = 1

;文化祭イベント
;ここでは"约会相手ではなく出し物をしている人"が喋ります。
;本来の约会相手はPARTNER()に角色番号が入ってます。呼びかける場合にはCNAME("partner")を使ってください
CASE "乐队演奏", "演劇", "占卜館", "恐怖屋敷", "烦悩相談室", "PaFuPaFu屋", "女仆咖啡厅", "執事咖啡厅", "西式料理店"

;帰り際のセリフです。不动声色地エッチに邀请のもいいでしょう
;STR:Ｈする場所 で場所を情人旅館以外にする事も出来ます。（例 STR:Ｈする場所 = 部室
CASE "帰り際"
	IF TALENT:恋慕 && CEVENT("満ちた月")
		STR:1 = 「そろそろ……良い、時間……だね……」#F重置/半目/斜眉/小口２
		STR:2 = 「%CALLNAME:MASTER%は……最後に……寄りたい……場所……ある……？」#F重置/斜眼４飘忽/困扰眉/小口２/紅潮２/頬手
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	ELSE
		STR:1 = 「さて……そろそろ……良い、時間だ……」#F重置/半目/斜眉/小口２
		IF TALENT:恋慕
			STR:2 = 「良い……気晴らしに……なった……有がとう……」#F重置/闭眼２/斜眉/無口系
		ELSE
			STR:2 = 「帰宅すると……しようか……」#F重置/闭眼２/斜眉/無口系
		ENDIF
		CALL DIALOGUE_FRAME_NAMEW, TARGET
	ENDIF
CASE "约会終了"
	;エッチをする場合
	IF TFLAG:床イン
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ELSE
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
ENDSELECT

;-------------------------------------------------
;時間経過などで表示される　机の上にメモが置いてある……　で表示されるテ接吻トに角色独自の物を追加できます
;特に無いなら書かなくて大丈夫です
;-------------------------------------------------
@TIPS_K66

;台詞を書いたら下のRETURN 0 を消してください
RETURN 0

SELECTCASE RAND:5
CASE 4
	PRINTFORMW 『』
CASE 3
	PRINTFORMW 『』
CASE 2
	PRINTFORMW 『』
CASE 1
	PRINTFORMW 『』
CASEELSE
	PRINTFORMW 『』
ENDSELECT


code:
;-------------------------------------------------
;ここに記述する事で各指令の選択肢を増やすことができる
;66は角色番号に置換してください
;-------------------------------------------------
;お願い・取引での選択肢を追加。番号は60～89を使ってよい
;ここで TFLAG:取引可能 = 1 とすると、Ｈの最中でもここの選択肢が出ます
@WISH_K66_ADDSELECT
IF CFLAG:夜型 == 1
	STR:選択肢 = %STR:選択肢% [60] %TEXT_LJ("部活に顔を出して欲しい", 16)% … %CALLNAME:TARGET%に部活に顔を出してもらいます/
ELSEIF CFLAG:夜型 == 0
	STR:選択肢 = %STR:選択肢% [61] %TEXT_LJ("部活に顔を出さなくて良い", 16)% … %CALLNAME:TARGET%に家で慢慢地してもらいます/
ENDIF

;お願い・取引で増やした選択肢の地の文と台詞
@KOJO_WISH_K66_ADDSELECT, ARGS
SELECTCASE ARGS
CASE "部活に顔を出して欲しい"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			PRINTFORMW 昼の部活に顔を出してくれるよう成为了。
			CFLAG:夜型 = 0
		ELSE
			PRINTFORMW 考えたい事があると拒否されました……
		ENDIF
	ELSE
		PRINTFORMW 昼の部活に顔を出してくれるよう成为了。
		CFLAG:夜型 = 0
	ENDIF
	;フラグを弄る場合はそれもここで行う
CASE "部活に顔を出さなくて良い"
	IF TALENT:恋慕
		IF CEVENT("満ちた月")
			PRINTFORMW 家でゆっくりする様成为了。
			CFLAG:夜型 = 1
		ENDIF
	ELSE
		PRINTFORMW 家でゆっくりする様成为了。
		CFLAG:夜型 = 1
	ENDIF
	;フラグを弄る場合はそれもここで行う
ENDSELECT

;-------------------------------------------------
;Talk指令の選択肢を追加
@DAILY1_K66_ADDSELECT
;STR:選択肢 += "追加選択肢その１/"
;STR:選択肢 += "追加選択肢之２/"

;Talk指令で増やした選択肢の地の文と台詞
@KOJO_DAILY1_K66_ADDSELECT, ARGS
SELECTCASE ARGS
CASE "追加選択肢その１"
	PRINTFORMW %CALLNAME:MASTER%は%ARGS%をした。
	PRINTL
	PRINTFORMW 「台詞」
	PRINTL
	PRINTFORMW %ARGS%を受けての%CALLNAME:TARGET%の反応
CASE "追加選択肢之２"
	PRINTFORMW %CALLNAME:MASTER%は%ARGS%をした。
	PRINTL
	PRINTFORMW 「台詞」
	PRINTL
	PRINTFORMW %ARGS%を受けての%CALLNAME:TARGET%の反応
ENDSELECT

;-------------------------------------------------
;互动指令の選択肢を追加
@DAILY2_K66_ADDSELECT
;STR:選択肢 += "追加選択肢その１/"
;STR:選択肢 += "追加選択肢之２/"

;睡眠時の互动指令の選択肢を追加
@DAILY2_SLEEP_K66_ADDSELECT
;STR:選択肢 += "睡眠時追加選択肢その１/"
;STR:選択肢 += "睡眠時追加選択肢之２/"

;互动指令で増やした選択肢の地の文と台詞
@KOJO_DAILY2_K66_ADDSELECT, ARGS
SELECTCASE ARGS
CASE "追加選択肢その１"
	PRINTFORMW %CALLNAME:MASTER%は%ARGS%をした。
	PRINTL
	PRINTFORMW 「台詞」
	PRINTL
	PRINTFORMW %ARGS%を受けての%CALLNAME:TARGET%の反応
CASE "追加選択肢之２"
	PRINTFORMW %CALLNAME:MASTER%は%ARGS%をした。
	PRINTL
	PRINTFORMW 「台詞」
	PRINTL
	PRINTFORMW %ARGS%を受けての%CALLNAME:TARGET%の反応
CASE "睡眠時追加選択肢その１"
	PRINTFORMW %CALLNAME:MASTER%は%ARGS%をした。
	PRINTL
	PRINTFORMW 「台詞」
	PRINTL
	PRINTFORMW %ARGS%を受けての%CALLNAME:TARGET%の反応
CASE "睡眠時追加選択肢之２"
	PRINTFORMW %CALLNAME:MASTER%は%ARGS%をした。
	PRINTL
	PRINTFORMW 「台詞」
	PRINTL
	PRINTFORMW %ARGS%を受けての%CALLNAME:TARGET%の反応
ENDSELECT

;-------------------------------------------------
;约会行き先の選択肢を追加。
@DATE_K66_ADDSELECT
;ここで増やした選択肢を選ぶと、それがSAVESTR:约会 に代入される仕組みです
;STR:選択肢 += "追加選択肢その１/"
;STR:選択肢 += "追加選択肢之２/"

;増やした行先での地の文と台詞。起きうるイベントのフラグもここで決める
@KOJO_DATE_K66_ADDSELECT
SELECTCASE SAVESTR:约会
CASE "追加選択肢その１"
	PRINTFORMW 「台詞」
	;地の文
	PRINTFORMW %SAVESTR:约会%での%CALLNAME:TARGET%の反応
	;地の文を用意していない場合には汎用のものを使う
	;CALL DAILY_MESSAGE, "约会本番"
	PRINTL
	;情緒BOUNSが高い場所でFLAG:情緒+60、普通ならFLAG:情緒+30、约会っぽくない場所だと修正无
	FLAG:情緒 += 30
	;それぞれ可能なもののコメントアウトを取下
	;TFLAG:约会中H可能 = 1
	;TFLAG:约会中牵手可能 = 1
	;TFLAG:偷瞄内衣可能 = 1
	;TFLAG:泳装约会 = 1
CASE "追加選択肢之２"
	PRINTFORMW 「台詞」
	;地の文
	PRINTFORMW %SAVESTR:约会%での%CALLNAME:TARGET%の反応
	;地の文を用意していない場合には汎用のものを使う
	;CALL DAILY_MESSAGE, "约会本番"
	PRINTL
	;情緒BOUNSが高い場所でFLAG:情緒+60、普通ならFLAG:情緒+30、约会っぽくない場所だと修正无
	FLAG:情緒 += 30
	;それぞれ可能なもののコメントアウトを取下
	;TFLAG:约会中H可能 = 1
	;TFLAG:约会中牵手可能 = 1
	;TFLAG:偷瞄内衣可能 = 1
	;TFLAG:泳装约会 = 1
ENDSELECT

;-------------------------------------------------
;場所を変える指令の選択肢を追加
@MOVE_K66_ADDSELECT
;STR:選択肢 += "追加選択肢その１/"
;STR:選択肢 += "追加選択肢之２/"

license: unknown