code:
;-------------------------------------------------
;各種打招呼
;-------------------------------------------------
@KOJO_GREETING_K27, ARGS
#DIM MEMO_LINECOUNT
;イベント発生中の角色
#DIM ACTOR
;イベント発生中の角色の默认のCALLNAME
#DIMS CALLNAME_ACTOR

MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
CASE "打招呼"
	SELECTCASE CSTR:朝袭
	CASE "朝口交", "朝六九式"

	ENDSELECT

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

	IF COND("体育")

	ELSE

	ENDIF
CASE "一番乗り"
	;昼のみ。一緒に部室に入るシチュエーション
	PRINTFORML 「太早了点吧……」
	PRINTFORMW 「どうする？　什麼也不做なら、随意してるよ」
	IF TALENT:恋慕 && RAND:2
		IF RAND:2
			PRINTFORMW 「それとも…あー…なんか、する？　別にいいけど…」
		ELSE
			PRINTFORMW 「ん…二人きり…か…」
		ENDIF
	ELSE
		IF COND("点心有")
			IF COND("点心当番")
				PRINTFORMW 「今日の点心当番は%CNAME("一人称")%だし、今のうちに用意しとくか…」
			ELSEIF COND("点心当番", MASTER)
				PRINTFORMW 「今日の点心当番は%CNAME("二人称")%か。準備よろしく」
			ELSE
				PRINTFORMW 「点心あるみたいだし、用意するよ」
			ENDIF
		ELSE
			PRINTFORMW 「とりあえず…荷物おこうか」
		ENDIF
	ENDIF

CASE "ただいま"
	;你より遅れて家に帰ってきた時

CASE "既に入室"
	;家で出迎えてくれる時
	IF COND("夜")
		IF TALENT:相思相愛
			PRINTFORMW 「欢迎回来。……%TEXTR("先吃饭？　先洗澡？　还是说先……忘了吧/有机会说欢迎回来、感觉挺不错的呢/你能回来、真是太好了喲")%」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「欢迎回来。先吃饭呢？　还是说先洗澡呢？　……后续没有喲。别人期待的眼神看我啦」
		ELSE
			PRINTFORMW 「请。累了就泡个澡吧。已经热好了。因为是寄居嘛」
		ENDIF
	ELSE
		;ほかにいない場合長くしゃべる
		IF CHARA_NUM("室内の邪魔者") == 0
			IF CFLAG:体育 || CFLAG:水泳
				PRINTFORMW 「是%CNAME("主人")%吗」
				PRINTFORMW 「如你所见、其他人还没来哦」
				IF TALENT:相思相愛
					PRINTFORMW 「就是说……那个、只有我们两个」
					PRINTFORMW 「要做些什么的话、趁现在作为%CNAME("二人称")%的恋人会感觉轻松些、哦……？」
				ENDIF
			ELSE
				;早く来た你が来るまでに茶が冷めるくらいの時間はここにいる
				PRINTFORMW 「嗯、是%CNAME("主人")%吗。我先休息过了哦」
				PRINTFORMW %CALLNAME:TARGET%面前杯子里的咖啡都凉了
				IF TALENT:恋慕
					PRINTFORMW 「%CNAME("二人称")%也喝吗？」
					;泡茶処理
					CALL SETFLAG_DAILY, "茶"
				ENDIF
			ENDIF
		ELSE
			IF TALENT:相思相愛
				IF RAND:2
					PRINTFORMW 「ん、待ってた。来てくれて嬉しいよ…」
				ELSE
					PRINTFORMW 「授業お疲れ様。よかったらここ座りなよ」
				ENDIF
			ELSEIF TALENT:恋慕
				PRINTFORMW 「来たんだ。\@ COND("点心当番") ? 点心でも食べる # 茶でも淹れようか \@？」
			ELSE
				IF RAND:2
					PRINTFORMW 「你好啊。……我在做什么？　只是看看外面而已喲」
				ELSE
					PRINTFORMW 「ああ…来たんだ」
				ENDIF
			ENDIF
		ENDIF
	ENDIF

;CASE "入室打招呼"

;部屋にいる他の人から打招呼を返される打招呼。WAITの使用は一回が望ましい
CASE "簡易入室打招呼", "入室打招呼"
	;遅れた時のセリフ（既に部員の４分の３が集合済）
	;体育とか水泳の日は服装でつじつまがあわなくなるので授業をサボった意図の口上を出さない
	;学校の外でだらけてたか学校の中でだらけてたかの差なんだけどね！
	IF CFLAG:体育 || CFLAG:水泳
		IF CHARA_NUM("入室打招呼時の室内人数") >= CHARANUM*3/4 && RAND:3 == 0
			PRINTFORMW 「抱歉、迟到了。差不多都到齐了么？　太懒散了呢……」
		ELSE
			PRINTFORMW 「抱歉、迟到了。打瞌睡了啊」
		ENDIF
	ELSE
		;座学のみの場合、サボってた意図の台詞を吐く
		IF CHARA_NUM("入室打招呼時の室内人数") >= CHARANUM*3/4 && RAND:3 == 0
			PRINTFORMW 「抱歉、迟到了。差不多都到齐了么？　或许是太远了吧……」
		ELSE
			;天気のステータスはないよね？
			PRINTFORMW 「抱歉、迟到了。因为天气很好、便在附近闲逛了」
		ENDIF
	ENDIF
;簡易入室打招呼に対する返し。WAITの使用は一回が望ましい
;誰が入室してきた人はCOND("入室打招呼中")がONなのでFIND_COND("入室打招呼中")で検索可能
;また、入ってきた人数はCHARA_NUM("入室打招呼中")で調べられる
CASE "打招呼返し"
	;打招呼してきた人の中から一人選ぶ
	ACTOR = FIND_COND("入室打招呼中")
	;選ばれた角色の默认のCALLNAME。この角色への呼びかけはCNAME(CALLNAME_ACTOR) で出来る
	CALLNAME_ACTOR = %CSVCALLNAME(NO:ACTOR)%

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

	;打招呼してきた人に点心当番が混じっている
	IF FIND_COND("点心当番", "入室打招呼中")
		PRINTFORMW 『こんにちわ。…点心、いただいてるよ。有がとう』

	;打招呼してきた人に老师が混じっている
	ELSEIF FIND_COND("教員", "入室打招呼中")
		PRINTFORMW 『こんにちわ、%CNAME(CALLNAME_ACTOR)%』

	;相手が現れるのが遅かった（既に部員の４分の３が集合済）
	ELSEIF CHARA_NUM("入室打招呼時の室内人数") >= CHARANUM*3/4 && RAND:3 == 0
		PRINTFORMW %CALLNAME:TARGET%打了声招呼为了不妨碍到大家、便往角落里走去
	ELSE
		PRINTFORMW %CALLNAME:TARGET%打了声招呼
	ENDIF

CASE "居間に現れた"
	;一度居間から別の場所に行って、居間に帰って来た時
	IF CMOVE("居間")

	ELSE

	ENDIF
CASE "抜け出された"
	;結局この部活って主人公がいないと何も活動できないよね
	;相思相愛の場合は他の相思相愛角色とだべって返回
	;それ以外だと多分、善后工作して真直ぐ返回
	IF TALENT:相思相愛
		PRINTFORMW 「再见哦、%CNAME("主人")%」
		PRINTFORMW %CALLNAME:TARGET%微笑地目送着
	ELSEIF TALENT:恋慕
		PRINTFORMW %CALLNAME:TARGET%目送%CALLNAME:MASTER%离開、叹了口气后開始收拾残局
	ELSE
		PRINTFORMW 「什么啊、你有事吗。那么就再见咯」
	ENDIF

CASE "便当"
	;背景事情についてちょっと喋るイベント。このイベントについては便当作成経験としても使える
	IF CEVENT("維吹の事情1") == 0
		CALL AFFAIRS_K27_1, TARGET
	ELSE
		IF RAND:6 == 0 && COND("種族：雪女")
			PRINTFORMW 「虽然我不善长应付火是事实、但是用在烹饪那种程度的话、没问题」
			PRINTFORMW 「倒不如说失火的话一瞬间就能灭火、不用担心喲」
			PRINTFORMW 「……但是、谢谢你的関心」
		ELSEIF RAND:5 == 0
			PRINTFORMW 今天的便当有很多陌生的蔬菜
			PRINTFORMW 「ああ、それ？　こないだ山で摘んできた野草」
			PRINTFORMW 「已经洗过啦、因为是能吃的家伙、不要紧的」
		ELSEIF RAND:4 == 0
			PRINTFORMW 「说到便当就是米饭呢」
			PRINTFORMW 「虽然面包也很好吃、但是那种只会买回来啦」
			PRINTFORMW 「ああ、でも世の中には自己焼く人もいるのかな……そこまではなぁ…」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「そういえばこうやって一緒に食べる相手って%CNAME("二人称")%くらいだな」
			PRINTFORMW 「%CNAME("一人称")%はクラスで浮いてるからさ…」
			PRINTFORMW 「是——是——、实在是个孤零零的家伙喲」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「给、请慢用」
			PRINTFORM 今天是
			IF TEXTS("季節") == "春"
				PRINTFORM 便当是以%TEXTR("汉堡肉/芦笋猪肉卷/照烧鲣鱼")%
			ELSEIF TEXTS("季節") == "夏"
				PRINTFORM 便当是以%TEXTR("炸鸡块/青菜炒肉/香酥炸鯵鱼块")%
			ELSEIF TEXTS("季節") == "秋"
				PRINTFORM 的便当是以%TEXTR("南瓜可乐饼/芜菁浇汁肉/蒲烧秋刀鱼")%
			ELSE
				PRINTFORM 便当是以%TEXTR("肉丸子/干炸莲藕/干烧虾仁")%
			ENDIF
			PRINTFORMW 作为主菜
			PRINTFORMW 「美味吗？　那太好了」
		ELSE
			PRINTFORMW 虽然本人评价很低、但%CALLNAME:TARGET%做的便当很好吃
			PRINTFORMW 「粗食淡饭。吃完了喝杯咖啡吧」
			PRINTFORMW 不知为何在用餐时、%CALLNAME:TARGET%很殷勤的招呼着
		ENDIF
	ENDIF

ENDSELECT

;-------------------------------------------------
;メイン画面での台詞。いわゆる一言イベント強化版
;ちなみに画面随机属性しても同じセリフを喋ります
;選択肢に挟まれた場所で出力するのでWAITの使用は禁止
;-------------------------------------------------
@KOJO_DAILY_K27, ARGS
#DIM MEMO_LINECOUNT
MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
;初回のセリフ
CASE "初回台詞"
	PRINTFORML 「今后我尽量会到这里来。有用得上的地方就打声招呼」
	PRINTFORML 「为了尽早转变为雪女、我不会吝惜协力的」
CASE "浑身是汗"
	PRINTFORML 「好热……。成为雪女的话、好像就會与炎热无缘、真的么」
CASE "刚睡醒"
	PRINTFORML 「……早上好」
	PRINTFORML %CALLNAME:TARGET%好像还在犯困、精神恍惚地样子
CASE "点心の感想"
	;今日の点心を用意したのは自分
	IF COND("点心当番")
		;自己作った点心
		IF COND("亲手自制点心")
			PRINTFORML %CALLNAME:TARGET%正在认真地读着标题为自分の作った%TEXTS("点心")%の出来が気になるのか
			PRINTFORML 少し落ち着かない様子で周囲の反応を伺っている
		ELSE
			;買ってきた場合は他の人の亲手自制ではない場合と同じ
			PRINTFORML 「あんまり食べると夕飯がきつくなるしこの辺にしとこう…」
			PRINTFORML %CALLNAME:TARGET%正在认真地读着标题为少し名残惜しそうに%TEXTS("点心")%を見ている…
		ENDIF
	;今日の点心は誰かの亲手自制
	ELSEIF COND("亲手自制点心")
		;今日の点心当番の人の亲手自制を初めて食べた
		IF DEVENT(@"%TEXTS("点心当番")%の亲手自制") == 0
			;点心当番が[料理擅長]
			IF COND("点心の作り手が料理擅長")
				PRINTFORML 「この%TEXTS("点心")%、亲手自制かな…」
				PRINTFORML 「うん、美味しい。%TEXTS("点心当番")%桑は良いセンスしてる」
			ELSE
				PRINTFORML 「この%TEXTS("点心")%は%TEXTS("点心当番")%桑の亲手自制か…」
				PRINTFORML 「ん……悪くないね……」
			ENDIF
		ELSE
			;亲手自制点心を作った相手と自分がどちらも同居中＝一緒に住んでる時1/2でコメント
			IF RAND:2 && COND("同居中") && COND("同居中", COND("点心当番の人"))
				PRINTFORML 「これ、家で%TEXTS("点心当番")%桑が作ってた奴か」
				IF COND("点心の作り手が料理擅長")
					PRINTFORML 「相変わらず美味しい…。今度作り方を教えてもらおうか」
				ELSE
					PRINTFORML 「ん、美味しい。頑張ってたもんな…」
				ENDIF
			;点心当番が[料理擅長]
			ELSEIF COND("点心の作り手が料理擅長")
				IF RAND:2
					PRINTFORML %CALLNAME:TARGET%正在认真地读着标题为無言で%TEXTS("点心")%を食べている
					PRINTFORML あまり表情は変わらないが、手を伸ばす頻度からして気に入っているようだ…
				ELSE
					PRINTFORML 「美味しい亲手自制お菓子で茶できるのってこの部活の魅力の一つだよな…」
					;ぶっ飛んだ精神の持ち主が多いのでいるかもしれない
					PRINTFORML 「流石にそれだけのために所属することはないと思うけど」
				ENDIF
			ELSE
				PRINTFORML 「%TEXTS("点心当番")%桑の%TEXTS("点心")%か…」
				PRINTFORML 「いただきます。…うん、前より美味しい。努力してるなー」
			ENDIF
		ENDIF
	;点心が亲手自制でない
	ELSE
		IF RAND:2
			PRINTFORML 「あっ、この%TEXTS("点心")%美味しい。今度%CNAME("一人称")%も買ってみようかな…」
			PRINTFORML %CALLNAME:TARGET%正在认真地读着标题为%TEXTR("スマホで包装から商品を検索している/メモ代わりに写真を撮っている")%…
		ELSE
			PRINTFORML 「あんまり食べると夕飯がきつくなるしこの辺にしとこう…」
			PRINTFORML %CALLNAME:TARGET%正在认真地读着标题为少し名残惜しそうに%TEXTS("点心")%を見ている…
		ENDIF
	ENDIF
;沉眠著
CASE "睡眠"
	;梦话
	CALL KOJO_SLEEP_K27
	;梦话用の汎用地の文呼出
	CALL DAILY_MESSAGE, "梦话"
ENDSELECT

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

;前回指令対応台詞
SELECTCASE CONDS("直前行動")
CASE "愛の告白"
	PRINTFORML 「めでたく恋人变成了わけだけど……」
	PRINTFORML 「他の女……とか男に手を出すな、とか言うつもりはないから安心して」
	PRINTFORML 「%CNAME("二人称")%を必要としてる人がいるのは分かってるし、有のままの%CNAME("二人称")%が好きだから」
	PRINTFORML 「その結果、%CNAME("二人称")%が相手に惚れても……まあ、構わないよ」
	PRINTFORML 「%CNAME("二人称")%が%CNAME("一人称")%を少しでも想ってくれるなら%CNAME("一人称")%はそれで十分満たされる」
	PRINTFORML 「我ながらちょろすぎるかな……？　ま、でもいいのさ、それで」
	PRINTFORML 「だって%CNAME("二人称")%は、どこにも行けないまま凍り付いて砕け散るだけだった%CNAME("一人称")%の手を取ってくれたんだから」
	PRINTFORML 「この後どんなことがあっても、例えお互いが心変わりしても、あの瞬間は真実で、永遠なんだ」
	PRINTFORML そういって%CALLNAME:TARGET%正在认真地读着标题为雪に咲いた花のように笑った
	CALL SET_DEVENT, "相思相愛初回"
CASE "契約成立"
	PRINTFORML
CASE "摆脱"
	PRINTFORML
CASE "主人公的房間に連れ込まれた"
	PRINTFORML
CASE "自室に招待"
	PRINTFORML
CASE "自室に訪問された"
	;指导者を伴っている場合
	IF FIND_COND("現在存在", "助手")
		PRINTFORML
	ELSE
		PRINTFORML
	ENDIF
CASE "指导者部屋訪問"
	PRINTFORML
;自宅移動の後に你に連れられて居間に回来了場合など。優先度は低いです
CASE "帰還"
	PRINTFORML
CASE "オナバレ"
	PRINTFORML
CASE "露脐装超短裙胖次チラ"
	PRINTFORML
CASE "低腰臀圍"
	PRINTFORML
CASE "掀起裙子"
	PRINTFORML
CASE "買東西"
	;買ってきた道具などで分岐
	;IF COND("巨大振動棒購入")

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

		CASEELSE

		ENDSELECT
	;ENDIF
CASE "隐秘摄影失敗"
	PRINTFORML 「你没有忽然偷拍吧……」
ENDSELECT

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

;標語の反応。書いたらコメントアウトを外してください
IF CFLAG:標語実践 && DEVENT("今週の標語") == 0
	IF STRCOUNT(SAVESTR:標語, "注意口渴")
		IF DEVENT("標語茶") == 0
			PRINTFORML 「"注意口渴"…？」
			PRINTFORML 「健全過ぎて逆に可疑が……深く考えるのは还是算了か」
			PRINTFORML 「所以、这个饮料、能喝吗？」
			CALL SET_DEVENT, "標語茶"
		ELSE
			;言及頻度を落とす
			PRINTFORML 「"注意口渴"ね…。まあ従っとくけど…」
		ENDIF
	ELSEIF STRCOUNT(SAVESTR:標語, "体操服") || STRCOUNT(SAVESTR:標語, "学生服")
		;SELECTCASE SAVESTR:標語
		;CASE "体操服はやっぱり布鲁马"
		;	IF DEVENT("標語布鲁马") == 0
		;		PRINTFORML
		;		CALL SET_DEVENT, "標語布鲁马"
		;	ENDIF
		;CASE "体操服はやっぱり运动短褲"

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

		;CASE "体操服はやっぱり运动衫"
		;各分岐を細かく埋めずに、上の分岐を消して望みの体操服に着替えてやったぞ発言をここに書くのも良いと思います
		;CASEELSE
		;ENDSELECT
		IF DEVENT("標語指定服") == 0
			;オープニングを受けた描写にしてみる
			PRINTFORML 「什么啊、这个标语……。啊啊、契約書上的『在指定制服的情况下要换装』就是这么回事吗？」
			PRINTFORML %CALLNAME:TARGET%经过一番沉思后、拿起了指定的衣服
			PRINTFORML 「呼~……会换的啦。因为签了名……」
			CALL SET_DEVENT, "標語指定服"
		ELSEIF CEVENT("ユニフォームのコメント") == 0
			PRINTFORML 「是是、这周的制服是这个啊」
			PRINTFORML 「我去换衣服。请稍等一下」
			IF STRCOUNT(SAVESTR:標語, "体操服")
				PRINTFORML 「大家一起在部室里穿体操服这样、有点超现实呐」
			ELSEIF CHECK_SKIRT("迷你")
				PRINTFORML 「裙子的长度、是不是太短了？　这样的话内衣就……那才是目的吗」
			ENDIF
		ENDIF

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

	;	ENDSELECT
	ENDIF
	;今週の標語に対するリアクションは週1
	CALL SET_DEVENT, "今週の標語"
ENDIF

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

;イベント台詞。書いたらコメントアウトを外してください
;CFLAG:日常事件回数が10増えるたびに一つ叫醒ぐらいで良いでしょう
IF CFLAG:日常事件回数 >= 5 && DEVENT("質問１") == 0
	PRINTFORML 「明明是同级生、为什么没有见过我？」
	PRINTFORML 「因为只有在心情好的时候才来呐……」
	CALL SET_DEVENT, "質問１"
ELSEIF CFLAG:日常事件回数 >= 15 && DEVENT("質問２") == 0
	PRINTFORML 「学校に来ない理由は嫌われてるから」
	PRINTFORML 「以前听说到、大家因为一看到%CNAME("一人称")%就会心神不宁呢」
	PRINTFORML 「让班里的同学不安也不好、便像这样尽量不来了」
	;感性正常的人类不愿意和在冬天等于死亡精灵的雪女有所関联
	;如果有什么异能的话、大致会在无意识下抵抗出来、[愚蠢]或者习惯了人外娘的人则完全感觉不到
	;如果是完全的雪女的话、可以掩盖气息、而作为不彻底的混杂物的維吹则在泄露着、这样的设定
	CALL SET_DEVENT, "質問２"
ELSEIF CFLAG:日常事件回数 >= 25 && DEVENT("質問３") == 0
	PRINTFORML 「现在才明白。大家讨厌%CNAME("一人称")%的原因」
	PRINTFORML 「因为%CNAME("一人称")%有一半是雪女、那是会让生命冻结的存在」
	PRINTFORML 「感性正常的人、大概是不想接近我的吧」
	PRINTFORML 「……虽说、偶尔也会有感觉迟钝的人呢」
	CALL SET_DEVENT, "質問３"
ELSEIF DEVENT("相思相愛初回") == 0 && TALENT:相思相愛
	PRINTFORML 「めでたく恋人变成了わけだけど……」
	PRINTFORML 「他の女……とか男に手を出すな、とか言うつもりはないから安心して」
	PRINTFORML 「%CNAME("二人称")%を必要としてる人がいるのは分かってるし、有のままの%CNAME("二人称")%が好きだから」
	PRINTFORML 「その結果、%CNAME("二人称")%が相手に惚れても……まあ、構わないよ」
	PRINTFORML 「%CNAME("二人称")%が%CNAME("一人称")%を少しでも想ってくれるなら%CNAME("一人称")%はそれで十分満たされる」
	PRINTFORML 「我ながらちょろすぎるかな……？　ま、でもいいのさ、それで」
	PRINTFORML 「だって%CNAME("二人称")%は、どこにも行けないまま凍り付いて砕け散るだけだった%CNAME("一人称")%の手を取ってくれたんだから」
	PRINTFORML 「この後どんなことがあっても、例えお互いが心変わりしても、あの瞬間は真実で、永遠なんだ」
	PRINTFORML そういって%CALLNAME:TARGET%正在认真地读着标题为雪に咲いた花のように笑った
	CALL SET_DEVENT, "相思相愛初回"

ELSEIF TEXTS("日期対応イベント") == "情人節" && CDAYEV("情人節") == 0
	IF TALENT:相思相愛
		PRINTFORML 「情人节快乐。这个是……、%CNAME("一人称")%的心意」
		PRINTFORML %CALLNAME:TARGET%胆怯地递过来的是、冰雕的蔷薇花
		PRINTFORML 「虽然在寒冷的季节不太合适、一想到要表现%CNAME("一人称")%心意的点心、果然是冰点心呢……」
		PRINTFORML 「……看起来不方便吃啊。那、让我喂你一口吧」
		PRINTFORML %CALLNAME:TARGET%掰下一片花瓣、送入%CALLNAME:MASTER%的嘴中
		PRINTFORML 冰的花瓣入口即化、甜丝丝的滋味扩散開来
		PRINTFORML 「会因为%CNAME("二人称")%的灵魂而融化掉。喜欢时就吃吧」
		PRINTFORML 「……若是觉得重的话、扔掉也可以啦……」
		;你或者拥有着你灵魂的部员不吃的话、永远不会融化
		;維吹本人对于这种作为心意交付出如此沉重的爱情表现也有些惊讶
	ELSEIF TALENT:恋慕
		PRINTFORML 「……嗯、给」
		PRINTFORML %CALLNAME:TARGET%突然递出了什么
		PRINTFORML 一个被精心包装的礼盒
		PRINTFORML 「巧克力。……因为是那种日子嘛」
		PRINTFORML 「姑且是、亲手做的。因为有品尝过、虽然感觉并不算难吃、但还是想听听你的感想」
		PRINTFORML 「那样的话、下次……」
		IF COND("種族：雪女")
			PRINTFORML 「没有下次吗。……对不起」
		ELSE
			PRINTFORML 「那个……迎合你的口味做吧」
		ENDIF
	ELSE
		PRINTFORML 「给、这个。因为是情人节嘛、送你巧克力喲」
		PRINTFORML %CALLNAME:TARGET%把包装好的礼盒递出来
		PRINTFORML 「平日谢礼的友情巧克力？　作为那种感谢的心意」
		PRINTFORML 「虽然是市面上卖的、但味道可以保证。那家店、我还挺中意的呢」
	ENDIF
	PRINTL
	CALL PRINT_STRL, @"黄色_从%CALLNAME:TARGET%那里收到了巧克力！"
	CALL SET_CDAYEV, "情人節"
ELSEIF TEXTS("日期対応イベント") == "情人節翌日" && CDAYEV("情人節翌日") == 0 && CDAYEV("情人節")
	IF TALENT:相思相愛
		PRINTFORML 「仔细一想、昨天那个做得太夸张了」
		PRINTFORML 「因为情人节赠礼什么的、除了%CNAME("二人称")%以外从没有过啦、欢喜过頭了……」
		PRINTFORML 「美味しかった？　なら……作ってよかった。来年も何か作るさ」
	ENDIF
	CALL SET_CDAYEV, "情人節翌日"
ENDIF

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

;他の人といちゃついた後にpartner変更
IF COND("いちゃいちゃ") == 0 && FIND_COND("Ｈ的いちゃつき中")
	IF TALENT:相思相愛
		IF RAND:3 == 0
			PRINTFORML 「好啦。欢迎回来、%CNAME("主人")%」
		ELSEIF RAND:2 == 0
			PRINTFORML 「谢谢你也这么関心我」
		ELSE
			PRINTFORML 「事后要好好复合喲？」
		ENDIF
	ELSEIF TALENT:恋慕
		PRINTFORML 「那边没関系吗？　%CNAME("二人称")%不在意的话、%CNAME("一人称")%也不介意的说……」
	ELSE
		IF RAND:2 == 0
			PRINTFORML 「真没节操啊。以后再吵闹、别把%CNAME("一人称")%也卷入进去哦？」
		ELSE
			PRINTFORML 「这次是这边吗。%CNAME("二人称")%也很辛苦呐」
		ENDIF
	ENDIF
ENDIF
;そもそも対象者がいないと喋らないのでこのくらいで
IF RAND:5 == 0
	CALL TaiTaChara_K27
ENDIF

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

;以下は随机台詞など

;時間帯と場所と関係で変化有些
IF STATE("酔酒")
	PRINTFORML
ELSEIF COND("夜")
	IF RAND:3 == 0 && CEVENT("覚醒2") && PLACE("野外") == 0
		PRINTFORML %CALLNAME:TARGET%的秀发染上了银色
		PRINTFORML 在手掌上结出几个小冰块、似乎在做能力训练
	ELSEIF RAND:2
		PRINTFORML 「明天几点去学校好呢」
		PRINTFORML 「干脆旷课吧……？」
	ELSE
		PRINTFORML 「月亮好美啊……」
		PRINTFORML 「……嗯？　不是什么奇怪的隐喻、月亮真的很漂亮啊」
	ENDIF
ELSE
	IF TALENT:TARGET:恋慕 && RAND:10 == 0
		PRINTFORML 感觉到视线而环顾四周、与%CALLNAME:TARGET%的目光撞在一起
		PRINTFORM %CALLNAME:TARGET%什么也没说、
		IF TALENT:TARGET:相思相愛
			PRINTFORML 温柔地微笑着
		ELSE
			PRINTFORML 尴尬地移開眸光
		ENDIF
	ELSE
		IF CFLAG:TARGET:便当 && RAND:6 == 0
			PRINTFORML %CALLNAME:TARGET%正在%TEXTR("看烹饪书/用手机检索着烹饪食谱")%、
			PRINTFORML 看起来、似乎是想增加便当的知识储备
		ELSEIF RAND:5 == 0
			PRINTFORML %CALLNAME:TARGET%在读一本旧笔记
			;ある程度の話術があると話してくれる
			IF TALENT:MASTER:甜言蜜语 > 3
				PRINTFORML 「这个是什么？　……父亲的日记」
				PRINTFORML 「上面写着在山上生活的方法、以及和母亲的相遇之类的」
			ELSE
				PRINTFORML 「这个是什么？　……某登山家的记录本」
			ENDIF
		ELSEIF RAND:4 == 0
			;心情好
			IF CFLAG:TARGET:夸奖
				PRINTFORML 「%TEXTR("♪～～/♪～♪～～/♪～～♪～～♪～～")%」
				PRINTFORML %CALLNAME:TARGET%心情愉快地一边哼着小曲、一边写东西
			ELSE
				PRINTFORML 「…………」
				PRINTFORML %CALLNAME:TARGET%默默地眺望着外面的景色
			ENDIF
		ELSEIF RAND:3 == 0
			PRINTFORML %CALLNAME:TARGET%读着一本封面为『怪談(Kwaidan)』的书
			PRINTFORML 「这些孩子们会怎么样呢？」
		ELSEIF RAND:2
			IF CEVENT("覚醒2") && TEXTS("季節") == "夏"
				PRINTFORML %CALLNAME:TARGET%の周りは夏でも涼しい
				PRINTFORML 「え……、何？　なんで近づいてくるの？」
			ELSEIF COND("種族：雪女") && TEXTS("季節") == "冬"
				PRINTFORML 冬の%CALLNAME:TARGET%の周りは当然寒い
				PRINTFORML 「暖かくもできるよ。冷気を操作して散らすか、吸収すればいい」
				IF TALENT:TARGET:恋慕
					PRINTFORML 「やって欲しいの？　別にいいけど……」
				ELSE
					PRINTFORML 「妖力の無駄遣いだからやらないけどね」
				ENDIF
			ELSE
				PRINTFORML 「これは終り。次はこっちか……」
				PRINTFORML %CALLNAME:TARGET%正在认真地读着标题为学校の課題をこ无ている
				PRINTFORML 授業をサボりがちな分、課題の量も多いらしい
			ENDIF
		ELSE
			PRINTFORML %CALLNAME:TARGET%正在认真地读着标题为%TEXTR("登山雑誌/『食べられる野草図鑑』/山をテーマにした写真集")%を眺めている
			PRINTFORML 「真想去野营啊……」
		ENDIF
	ENDIF
ENDIF

;-------------------------------------------------
;梦话。随意むにゃむにゃ言わせてください
;-------------------------------------------------
@KOJO_SLEEP_K27
;上から順に発言頻度が高いようにする(== 0の付け忘れではない)
IF RAND:4
	PRINTFORML 「呜嗯~……」
ELSEIF RAND:3
	PRINTFORML 「冷……」
ELSEIF RAND:2
	PRINTFORML 「……父亲……」
ELSE
	PRINTFORML 「……疼……、……不要……」
ENDIF

;-------------------------------------------------
;メイン画面で選択肢として独立している日常イベントでのセリフ。WAIT使って大丈夫です
;こっちはあくまで選択肢で選ばれた場合に限るのに注意。
;-------------------------------------------------
@KOJO_DAILYCOM_K27, ARGS
;打招呼
#DIMS GREETING

SELECTCASE ARGS
CASE "学園での日常"
	;ぼっちの日常なので大体侘しい
	;日常１と２、日常３と４が組になっている
	IF CEVENT("維吹の日常１") == 0
		PRINTFORMW %CALLNAME:TARGET%が教室に入ると中の喧騒が一瞬途絶え、それから少し低いトーンで再開する
		PRINTFORMW 盗み見るような視線とひそひそと交わされる囁きに、%CALLNAME:TARGET%正在认真地读着标题为内心で叹气をついた
		PRINTL
		PRINTFORML - %CALLNAME:TARGET% -
		PRINTFORMW 「（時間までどっかその辺散歩するか、部室でも行くかな……）」
		PRINTL
		PRINTFORMW 席を立とうとした矢先、教師が入ってきたのでとりあえずその時間の授業は受けることにするのだった……
		CALL SET_CEVENT, "維吹の日常１"
	ELSEIF TALENT:恋慕 && CEVENT("維吹の日常１")  && CEVENT("維吹の日常２") == 0 && TALENT:相思相愛 == 0
		PRINTFORMW 相変わらず教室に居場所がない%CALLNAME:TARGET%正在认真地读着标题为房顶から何とは无に階下を眺めている
		PRINTFORMW 渡り廊下に行き交う生徒の中に%CALLNAME:MASTER%を探している自分に気が付き、溜息をついた
		PRINTL
		PRINTFORML - %CALLNAME:TARGET% -
		PRINTFORMW 「（どうせそのうちお別れなのに何やってんだかな、%CNAME("一人称")%は……）」
		PRINTFORMW 「……。……それでも……」
		PRINTL
		PRINTFORMW 「会いたいなあ、%CNAME("主人")%に……」
		CALL SET_CEVENT, "維吹の日常２"
	ELSEIF CEVENT("維吹の日常３") == 0
		PRINTFORML - 学園からそう遠くない公園にて -
		PRINTL
		PRINTFORMW 気が乗らなかった%CALLNAME:TARGET%正在认真地读着标题为何をするでもなく公園を歩く
		PRINTFORMW 流れる雲を眺め、空気の气味を嗅ぎ、風に晃动的木々のざわめきや鳥のさえずりに耳を傾ける
		IF TEXTS("季節") == "春"
			PRINTFORM 木漏れ日の中で巣を作る蜘蛛を眺めているうちに
		ELSEIF TEXTS("季節") == "夏"
			PRINTFORM 夏の陽射しを反射して煌めく水路を見ているうちに
		ELSEIF TEXTS("季節") == "秋"
			PRINTFORM 舞い散る落ち葉と戯れているうちに
		ELSE
			PRINTFORM 肌を撫でる冬の冷たい空気に身を浸すうちに
		ENDIF
		PRINTFORMW 少し、気持ちが和らいだ
		PRINTL
		PRINTFORML - %CALLNAME:TARGET% -
		PRINTFORMW 「……そろそろ学校行こうかな」
		CALL SET_CEVENT, "維吹の日常３"
	ELSEIF TALENT:相思相愛 && CEVENT("維吹の日常４") == 0 && CEVENT("維吹の日常３")
		PRINTFORML - 学園からそう遠くない公園にて -
		PRINTL
		PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为何をするでもなく公園を歩く
		PRINTFORMW 流れる雲を眺め、空気の气味を嗅ぎ、風に晃动的木々のざわめきや鳥のさえずりに耳を傾ける
		PRINTFORMW すれ違う人に会釈し遊んでいる親子連れを見ているうちに、%CALLNAME:TARGET%正在认真地读着标题为自分の変化に気が付いた
		PRINTL
		PRINTFORML - %CALLNAME:TARGET% -
		PRINTFORMW 「ああ……なんだかいいな……」
		PRINTL
		PRINTFORMW 見えているものは以前と大して変わらないけれど、今の%CALLNAME:TARGET%にはそれらが輝いて見える
		PRINTL
		PRINTFORML - %CALLNAME:TARGET% -
		PRINTFORMW 「（絆されてるなあ……）」
		PRINTL
		PRINTFORMW 苦笑すると%CALLNAME:TARGET%正在认真地读着标题为学園へと足を向けた
		CALL SET_CEVENT, "維吹の日常４"
	ENDIF

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

	;イベント発生時は整合性を取るために"归途"の地の文は削る
	;初めて
	IF DEVENT(STR:日常イベント名) == 0
		;ぼっちの初体験なのでちょい特殊事件
		PRINTFORMW 「……いいよ。鞄持ちでもやればいいの？」
		PRINTFORMW 帰りに%CALLNAME:TARGET%を邀请と少し間が空いてそんな答えが返ってきた
		PRINTFORMW 「そういうのじゃなくて、ただ一緒に歩いて返回？」
		PRINTFORMW 「ふぅん…家帰っても何かあるわけじゃないからいいけど…」
		PRINTFORML 学校や部についての雑談しながら並んで歩いていると、
		PRINTFORMW %CALLNAME:TARGET%が思いついたように声をあげた
		PRINTFORMW 「あー……そういえば…こうやって誰かと一緒に返回のって初めてか…」
		PRINTFORMW 「何とも思ってなかったけど、やってみると悪くない気分だ。有がとうな」
		PRINTFORMW 夕日に染圆圈归途で、%CALLNAME:TARGET%正在认真地读着标题为そんな礼を言ってきたのだった…
		;現在位置と归途の行動を修正
		;（放課後Ｈになだれ込む場合のイベント内容と処理・地の文の整合性を保つため）
		SAVESTR:現在位置 = 直帰
		SAVESTR:归途の行動 = 直帰
	ELSEIF TALENT:恋慕 && CEVENT("維吹との归途２") == 0
		CALL FOR_HOME_K27_2
		;現在位置と归途の行動を修正
		;（放課後Ｈになだれ込む場合のイベント内容と処理・地の文の整合性を保つため）
		SAVESTR:現在位置 = 維吹との秘密の場所
		SAVESTR:归途の行動 = 繞道
		;このイベント後にこの場所に归途に来るようになる
		CSTR:TARGET:出現場所 += "/維吹との秘密の場所"
		CALL SET_CEVENT, "維吹との归途２"
	ELSE
		;こっから通常の归途
		;仕様メモ
		;行き先は以下から随机
		;直帰/神社(共通)/泳装屋(夏限定)/便利店/书店/甜甜圈店/游戏中心（MASTERの初期値）に加えてその角色の出現場所
		;上記より優先されるイベントとして、圣诞节シーズンはMASTERから誘って放課後约会可能（[信頼LV3]or[恋慕]or[屈服刻印LV1]が条件）
		;確率で阵雨（相合傘）が発生

		;地の文の前の台詞がある場合はここに書く
		SELECTCASE SAVESTR:現在位置
		CASE "阵雨"
			PRINTFORMW 「ん、%CNAME("二人称")%か。傘ないんだけど、%TEXTR("待ってればやむかな/走って帰ろうかな")%って…」
			PRINTFORMW 「入れてくれるの？　助かる。有がとう」
		ENDSELECT

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

		SELECTCASE SAVESTR:归途の行動
		CASE "相合傘"
			IF COND("種族：雪女")
				;例え夏でも雨に湿的た身体を冷やすのは良くない
				PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为少し出口て歩いているせいで身体が雨に湿的ている…
				IF TALENT:恋慕
					PRINTFORMW 「%CNAME("一人称")%がくっつくと寒いだろ？　風邪を引かせたら%TEXTR("悪い/他のみんなに怒られる")%」
					IF TALENT:相思相愛
						PRINTFORMW 「！？　あっ、いやっ%TEXTR("ちょっと…うぅ…バカ…/違ういやじゃなくて…嬉しいんだけど…")%」
						PRINTFORMW 抱到身边としばらく葛藤した後、%CALLNAME:MASTER%に身を委ねることにした
						PRINTFORMW 妖力でも使ったのか、言うほどには冷たくなかった…
					ELSE
						PRINTFORMW 「……分かった。じゃあお言葉に甘えてちょっとだけ…」
						PRINTFORMW 傘に入るように言うと%CALLNAME:TARGET%正在认真地读着标题为雨にぬれないギリギリの距離まで近づいてきた…
					ENDIF
				ELSE
					PRINTFORMW 「お構いなく。風邪ひくわけじゃないから」
					PRINTFORMW 何度か声をかけたが、素っ気なく断られた…
				ENDIF
			ELSE
				IF TALENT:恋慕
					PRINTFORMW 「そっち、湿的るよ。もうちょっと寄りなよ…」
				ELSE
					PRINTFORMW 「早くやむといいんだけどな…」
				ENDIF
			ENDIF
		CASE "圣诞节前夕"
			PRINTFORMW
		CASE "参拜"
			;自分が妊娠している
			IF TALENT:妊娠
				PRINTFORMW 「（この子が無事で元気に生まれますように…）」
				PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为熱心に参拜をしている…
			;出産間近の角色がいる
			ELSEIF CHARA_NUM("出産間近") > 0
				PRINTFORMW 「%CALLNAME:FIND_COND("出産間近")%桑\@ CHARA_NUM("出産間近") > 1 ? 達 # \@の出産予定日、もうすぐだろ？」
				PRINTFORMW 「余計なお世話かもしれないけど安産を祈願しとくよ…」
				PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为熱心に参拜をしている…
			;試験が近い
			ELSEIF TEXTS("日期対応イベント") == "周考"
				PRINTFORMW 「週末の試験が擅長くいくように神頼みでもしていく？」
				PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为形式街道参拜をしている…
			;通常
			ELSE
				PRINTFORMW 「神様に祈るようなことか…。ないわけじゃないけど…」
				PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为複雑そうな顔で参拜をしている…
			ENDIF
		CASE "採購"
			SELECTCASE SAVESTR:現在位置
			CASE "超市"
				IF CFLAG:便当
					IF RAND:3 == 0
						PRINTFORMW 「魚が安い…。これで一品作るか」
					ELSEIF RAND:2
						PRINTFORMW 「やっぱり季節の野菜は入れたいな…」
					ELSE
						PRINTFORMW 「今度の便当に入れてほしいものある？」
					ENDIF
					PRINTFORMW 便当について悩む%CALLNAME:TARGET%正在认真地读着标题为真剣そのものだ
				ELSEIF COND("同居中")
					IF RAND:3 == 0
						PRINTFORMW 「メモによるとじゃがいも、にんじん、たまねぎ…今夜はカレーかな？」
						PRINTFORMW シチューかもしれない
					ELSEIF RAND:2
						PRINTFORMW 「%CALLNAME:FINDCHARA(NO, 1)%桑から豆腐頼まれたけど、木綿と絹ごしどっちだ…？」
						PRINTFORMW 「さっきスマホで確認送ったんだけど既読つかないし、他から予想して買ってくか」
					ELSE
						PRINTFORMW 「晩ご飯は%CNAME("一人称")%のセレクトに任せるっていわれたんだけど、%CNAME("二人称")%は何がいい？」
						PRINTFORMW 「パッと思いつかないよな、こういうのって…」
					ENDIF
				ELSE
					IF RAND:2
						;一人で食べる吃飯は味気ないので味を気にしない
						PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为インスタント食品を無造作に買い込んでいる
						PRINTFORMW 「あれこれ悩む時間がもったいないし、味に大して違いないだろ？」
					ELSE
						PRINTFORMW 「携帯食料も買っておこうかな…」
						PRINTFORMW 何かと思ったが糖や巧克力、营养平衡的点心品のことのようだ…
					ENDIF
				ENDIF
			ENDSELECT
		CASE "泳装選び"
			PRINTFORMW 「着てほしいのがあったら考えないでもないから言ってみなよ」
			IF RAND:2
				PRINTFORMW 「へぇ、意外にまともなのを選んできたな。もっとこう…奇抜なのを選ぶかと」
				PRINTFORMW 「そりゃ%CNAME("二人称")%の普段の行いを振り返ればそういう想像をするだろ？」
			ELSE
				PRINTFORMW 「%TEXTR("これはただの紐だろ…/これ、ほとんど透けてるけど…/うわ、露骨なエロ泳装…/これ泳装の意味ある？")%」
				IF TALENT:恋慕
					PRINTFORMW 「こういうのが好きなのか？　う～ん…か、考えておく…」
				ELSE
					PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为呆れている…
				ENDIF
			ENDIF

		CASE "内衣選び"
			;衣装関係は约会と絡めてやるので暫定(多分ここには来ないけど)
			PRINTFORMW 「身に着けるものにはあんまり関心がないんだよな…」

		;特定行動でのセリフ。DAILY_MESSAGE, "归途"の地の文を参考に随意場合分けしてください。
		CASE "打情骂俏"
			SELECTCASE SAVESTR:現在位置
			CASE "内衣店", "内衣屋"
				;多分死に分岐なので泳装選びからコンパチ
				PRINTFORMW 「着てほしいのがあったら考えないでもないから言ってみなよ」
				IF RAND:2
					PRINTFORMW 「へぇ、意外にまともなのを選んできたな。もっとこう…奇抜なのを選ぶかと」
					PRINTFORMW 「そりゃ%CNAME("二人称")%の普段の行いを振り返ればそういう想像をするだろ？」
				ELSE
					PRINTFORMW 「%TEXTR("これはただの紐だろ…/これ、ほとんど透けてるけど…/うわ、露骨なエロ内衣…/これ内衣の意味ある？")%」
					IF TALENT:相思相愛
						;部員にも確実にみられるよね
						PRINTFORMW 「こういうのが好きなのか？　…%CNAME("二人称")%に見せるだけならいいんだけど…」
					ELSE
						PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为呆れている…
					ENDIF
				ENDIF
			CASE "游戏中心"
				IF TALENT:相思相愛
					;大頭贴
					PRINTFORMW 『撮影が始圆圈よ！　３！　２！』
					PRINTFORMW 大頭贴の撮影カウントダウンの中、液晶の中で%CALLNAME:TARGET%が%CALLNAME:MASTER%に顔を向ける
					PRINTFORMW 『１！』
					PRINTFORMW そして就这様頬に接吻た。%CALLNAME:TARGET%特有の冷たくて柔らかい感触
					PRINTFORMW シャッター音の後に視線を%CALLNAME:TARGET%に向けると既に画面を向いていたが、その耳は真っ赤になっていた…
				ELSE
					;協力型ガンシューティングをイメージ
					PRINTFORMW 協力型の游戏を一緒にPLAYした…
					PRINTFORMW 「よしもうちょっと…やった！　阴蒂アー！」
					PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为よほど嬉しかったのか、こちらに抱き着いてきた
					PRINTFORMW 「！　あっ、いやっ、ゴメン……」
				ENDIF
			ENDSELECT
		CASE "大頭贴"
			PRINTFORM 大頭贴に写った%CALLNAME:TARGET%正在认真地读着标题为
			IF TALENT:相思相愛
				IF RAND:2
					PRINTFORMW %CALLNAME:MASTER%に身を寄せて控えめに微笑んでいる…
				ELSE
					PRINTFORMW %CALLNAME:MASTER%と一緒に有点害臊的ポーズを取っている…
				ENDIF
			ELSEIF TALENT:恋慕
				PRINTFORMW ぎこちなく笑着いる…
			ELSE
				PRINTFORMW 無表情だ…
			ENDIF
		CASE "クレーン游戏","玩音游", "街机游戏",
			IF RAND:2
				PRINTFORMW 「%TEXTR("あっ！　あっ！/違うそっちじゃなくて！")%　…ダメかぁ…」
				PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为苦戦しながらもそれなりに楽しんでいるようだ…
			ELSE
				PRINTFORMW 「%CNAME("一人称")%は見てるから気にせずやってくれ。あんまり無駄遣いはできないし…」
				PRINTFORMW 「ん…擅長いな、%CNAME("主人")%。%CNAME("一人称")%じゃそんな風にできないぞ」
			ENDIF
		CASE "站着读书"
			PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为熱心に%TEXTR("旅行雑誌/アウトドア情報誌/漫画雑誌")%を読んでいる…
		CASE "買食物"
			IF RAND:2
				PRINTFORMW 「父桑に買食物は禁止されてたんだけど……。やってみるとちょっと、楽しいな」
				IF TALENT:相思相愛
					PRINTFORMW 「もちろん%CNAME("二人称")%と一緒だからっていうのも…あるけど」
				ELSEIF TALENT:恋慕
					PRINTFORMW 「%CNAME("二人称")%と一緒だからってのも…まあ、少しはあるんだろうけど」
				ELSEIF ABL:信頼 >= 3
					PRINTFORMW 「社团同伴と一緒だからってのもあるんだろうけど」
				ENDIF
			ELSE
				SELECTCASE SAVESTR:現在位置
				CASE "甜甜圈店", "菠萝包店"
					PRINTFORMW 「これ、今度山行く時、持って行こうかな…」
				CASEELSE
					PRINTFORMW 「手間がかかる食べ物は山に持って行けないからちょっと特別感ある…。ん、美味しい」
				ENDSELECT
			ENDIF
		CASE "物色游戏"
			IF RAND:3 == 0
				PRINTFORMW 「その対戦游戏買うの？　付き合ってもいいけど…%CNAME("一人称")%は弱いよ」
			ELSEIF RAND:2
				PRINTFORMW 「部活用ならボード游戏とかもいいんじゃないか？」
			ELSE
				PRINTFORMW 「この游戏有名だけどやったことはないな…」
			ENDIF

		CASE "检查新刊"
			IF RAND:3 == 0
				;携帯性と値段を考慮してハードカバーは買わない
				PRINTFORMW 「%TEXTR("これ、面白そうだな…/文庫出たんだ/続きが気になってた奴だ")%。買って行こう」
				;転々としてたので私物を長く持たない癖がある
				PRINTFORMW 「%CNAME("二人称")%も読む？　読み終わったら処分するから譲るけど」
			ELSEIF RAND:2
				;嫌な予感がするパターン
				PRINTFORMW 「あのシリーズの続編か…」
				PRINTFORMW 「綺麗に終わってたのに続編…」
			ELSE
				PRINTFORMW 「この作者、また新刊だしてる…」
				PRINTFORMW 「筆が早くて助かるけどうっかりすると置いていかれそう」
			ENDIF

		CASE "繞道"
			SELECTCASE SAVESTR:現在位置
			CASE "維吹との秘密の場所"
				IF RAND:2
					PRINTFORMW 「もうすっかり%TEXTS("季節")%だな…」
					IF TEXTS("季節") == "冬"
						PRINTFORMW %CALLNAME:TARGET%と二人、夜景を見ながら話した…
					ELSE
						PRINTFORMW %CALLNAME:TARGET%と二人、夕焼けを見ながら話した…
					ENDIF
				ELSE
					PRINTFORMW 会話が途切れ、隣を見ると%CALLNAME:TARGET%と目が合う
					PRINTFORMW しばらく見つめ合い、どちらからともなく唇を重ねた…
					EXP:MASTER:接吻経験 += 1
					EXP:接吻経験 += 1
					IF TALENT:恋慕 && TALENT:相思相愛 == 0
						;告白イベントを経ないと別れる前提なので自己嫌悪に陥る
						PRINTFORMW 「（はぁ…また雰囲気に流された…）」
					ENDIF
				ENDIF
			CASE "便利店"
				IF TEXTS("季節") == "夏"
					IF COND("種族：雪女")
						PRINTFORMW 「暑そうだね…。冰でも買ってく？」
					ELSE
						PRINTFORMW 「今天暑いね…。冰でも買ってく？」
					ENDIF
				ELSEIF TEXTS("季節") == "冬"
					PRINTFORMW 「寒いだろ？　温かい飲み物を買っていこう」
				ELSE
					PRINTFORMW 「夕食後の甜点でも買って帰ろうかな…」
				ENDIF
			CASE "游戏中心"
				PRINTFORMW 「あんまり時間ないからちょっとだけな」
			CASE "公園"
				IF RAND:2
					PRINTFORMW 「たまに学校サボってこの公園をふらついてるんだ」
					IF RAND:2
						PRINTFORMW 「……教室にいるよりは楽しいさ」
					ELSE
						PRINTFORMW 「咲いてる花とか水路の魚を見たり…結構楽しいよ」
					ENDIF
				ELSE
					IF RAND:2
						PRINTFORMW 「この花、咲いたんだ。今年は咲かないかと思ってた」
					ELSE
						PRINTFORMW 「この花は綺麗だけど根に弱い毒があるんだ」
					ENDIF
					PRINTFORMW %CALLNAME:TARGET%と一緒に公園内を見て回った
				ENDIF
			ENDSELECT

		CASE "直帰"
			IF TEXTS("日期対応イベント") == "周考"
				PRINTFORMW 「今週末は試験だっけ？」
				PRINTFORMW 「試験はサボると面倒の方が多いから酱と受けてるよ」
			ELSEIF RAND:4 == 0
				PRINTFORMW 「ん…？　%CNAME("主人")%、ちょっとこっち」
				PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为急に道を変えた
				PRINTFORMW 「多分だけど、あんまり良くない奴…妖怪とか悪魔とか…がいた」
				PRINTFORMW 「よほど運が悪くなければスルーしても大丈夫だけど念のため避けておこう」
			ELSEIF RAND:3 == 0
				PRINTFORMW 「今日の授業は……半分くらいは出たかな。頑張った」
				PRINTFORMW 「課題はこ无てるからこれでも多分大丈夫…」
			ELSEIF RAND:2
				PRINTFORMW 「夕焼けって綺麗で好きだな…」
				PRINTFORMW 「綺麗なものだけ眺めて生活したいけど…なかなかな…」
			ELSE
				IF TEXTS("季節") == "春"
					PRINTFORMW 「最近暖かくて眠くなる…ふぁ…」
					PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为哈欠をかみ殺した
				ELSEIF TEXTS("季節") == "夏"
					PRINTFORMW 「あの雲、夏って感じだな」
					PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为スマホで入道雲を撮っている…
				ELSEIF TEXTS("季節") == "秋"
					;清少納言『枕草子』より
					PRINTFORMW 「秋は、夕暮れ。夕日のさして、山の端いと近うなりたるに…」
					PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为何やら文学的な気分になっているらしい…
				ELSE
					PRINTFORMW 「冬の夕暮れって日が遠くなっていく感じだけどこれはこれで風情あるよな…」
					PRINTFORMW 夜を間近に控えた紫色の空を見ながら%CALLNAME:TARGET%正在认真地读着标题为遠い目をしている
				ENDIF
			ENDIF
		CASEELSE

		ENDSELECT

		;阵雨以外で「維吹の日常１」が発生ずみの場合、小イベント「維吹との归途１」
		IF SAVESTR:归途の行動 != "相合傘" && CEVENT("維吹との归途１") == 0 && CEVENT("維吹の日常１")
			PRINTFORML
			PRINTFORMW そうして二人放課後を楽しんでいると、こちらを好奇の目で見ている女生徒に気が付いた
			PRINTFORMW 「你はたしかうちのクラスの…那么、どうも…こんにちは」
			PRINTFORMW 隣の%CALLNAME:TARGET%が控えめに打招呼と、女生徒は弾けるようにして立ち去った
			PRINTFORMW 「名前は忘れたけど確か同じクラスの子だったと思う。……%CNAME("一人称")%には関わりたくないんだろ」
			PRINTFORMW 心底つまらなさそうに吐き捨てると%CALLNAME:TARGET%正在认真地读着标题为足早に歩き出し、%CALLNAME:MASTER%は慌てて追いかけるのだった
			CALL SET_CEVENT, "維吹との归途１"
		ENDIF
	ENDIF

;[999]選択後の台詞。TFLAG:床イン = 1とすることで強制的にエロにも行ける
CASE "休憩"
	IF PLACE("自宅")
		IF COND("夜")

		ELSE

		ENDIF
	;ここは実質昼のみ
	ELSEIF PLACE("部室")

	;場所移動後
	ELSE

	ENDIF
;ここには特殊な条件での角色独自のイベントを書く。別に無くても構わない
;発生領帯ミングは日常イベント選択後の好感度を得た直後
CASE "特殊事件"
	;眠ってる時でも来るので書くことないならRETURN 0してください
	SIF CFLAG:睡眠
		RETURN 0
;場所を変えた際のセリフ。通常は没有で構いません。SAVESTR:現在位置 や @PLACE(ARGS)で場所を条件分けして使ってください
CASE "場所を変える"
;これは昼か夜
CASE "打招呼"
	IF COND("夜")
		GREETING = 晚上好
	ELSEIF COND("昼")
		GREETING = 你好
	ELSE
		GREETING = おはよう
	ENDIF
	SELECTCASE STR:日常イベント名
	CASE "打招呼ハグ"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「%GREETING%」
			PRINTFORMW 「……とりあえず打招呼はしてみたけど、気軽に抱きつかない方がいいよ」
		ELSEIF COND("易出汗", MASTER)
			IF TALENT:恋慕 == 0
				PRINTFORMW 「あ～、まあ、その、%GREETING%」
				IF COND("種族：雪女")
					PRINTFORMW 「……いくら暑いからって冷却材代わりに使うのはどうなの？」
				ELSE
					PRINTFORMW 「せめて汗ぬぐってからにしなよ……。さすがにあまり気分がよくないし」
				ENDIF
				PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为紧缩眉頭
			ELSEIF TALENT:恋慕
				PRINTFORMW 「ん、%GREETING%」
				IF COND("種族：雪女")
					PRINTFORMW 「……気持ちいい？　ならよかった」
					IF RAND:2
						IF TALENT:相思相愛
							PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为笑着%CALLNAME:MASTER%の背に手を回した
						ELSE
							PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为怯生生地%CALLNAME:MASTER%の背に手を回した
						ENDIF
					ELSE
						PRINTFORMW 「ほら出口なよ、風邪ひくよ。拭いてやるからさ」
						PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为手帕で%CALLNAME:MASTER%の汗をぬぐっている
					ENDIF
				ELSE
					PRINTFORMW 「うわ、浑身是汗だな……」
					PRINTFORMW 「拭けってこと？　是是、%CNAME("主人")%は横着だな……」
				ENDIF
			ENDIF
		ELSE
			IF TALENT:恋慕
				IF RAND:3 == 0
					PRINTFORMW 「……ん、%GREETING%…いや、もう少し…」
					PRINTFORMW そう呟くので、%CALLNAME:TARGET%としばらく抱き合った…
				ELSEIF RAND:2
					PRINTFORMW 「ははっ、こういうのもちょっと慣れてきたな」
					PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为笑着抱き返してきた
				ELSE
					PRINTFORMW 「是是、今日もお会いできて嬉しいよっと」
					PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为笑着抱き返してきた
				ENDIF
			ELSE
				PRINTFORMW 「ああ、うん…どうも……。反応に困るな、これ…」
				PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为困惑しながら抱きつかれている
			ENDIF
		ENDIF
	CASE "打招呼接吻"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「……申し訳ないけどそういう欧米式打招呼には対応してない……」
			PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为しばらく硬直した後、そう絞り出した
		ELSE
			IF TALENT:相思相愛
				PRINTFORMW 「%GREETING%、……もう一回いい？」
				IF RAND:2
					PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为そう言って接吻を返してきた
				ELSE
					PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为目を閉じて%CALLNAME:MASTER%の接吻を待っている……
				ENDIF
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……%GREETING%、あまりそういう唐突で過度な身体接觸は……」
				PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为頬を染め、ごにょごにょと言葉を濁している
			ELSE
				PRINTFORMW 「%GREETING%……あいさつですることじゃないだろ、そういうことはさ」
				PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为呆れた目で%CALLNAME:MASTER%を見ている
			ENDIF
		ENDIF
	CASEELSE
		;你に先に打招呼をされた
		IF CFLAG:打招呼した == 0
			PRINTFORMW 「ああ、%GREETING%」
		ELSE
			PRINTFORMW 「%GREETING%、%CNAME("主人")%」
		ENDIF
	ENDSELECT
CASE "叫醒"
	PRINTFORMW
;酔った際に眠くなって自分的房間に返回際のセリフ
CASE "眠い"
	PRINTFORMW
CASE "Talk"
	SELECTCASE STR:日常イベント名
	CASE "夸奖点心"
		IF RAND:2
			PRINTFORMW 「大したもんじゃないけど……まあ、口にあったなら何よりだ」
		ELSE
			PRINTFORMW 「……ああ、そりゃよかった。作った甲斐があったよ」
		ENDIF
		;恋慕だとパターンが増える
		IF TALENT:恋慕 && RAND:2
			PRINTFORMW 「よかったらもう一つどう？　遠慮しなくていいよ」
			PRINTFORMW 「何なら食べさせてやっても……冗談だよ、口を開けるな」
			IF CHARA_NUM("室内の邪魔者") == 0
				PRINTFORMW 「ぅ…わかったよ。ほら、あ～ん……」
			ENDIF
		ELSE
			PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为素っ気なく答えたが、嬉しいのか口元がほころんでいる
		ENDIF

	CASE "夸奖"
		PRINTFORMW 「我不会受你吹捧的……虽然想这么说、但还是忍不住觉得挺高兴的呢」
	CASE "甜言蜜语"
		IF TALENT:相思相愛
			;二人きりのとき、たまに行動に出る
			;相思相愛まで進んだ状態は部員が増えてるだろうからレア口上の部類だろうか
			IF RAND:10 == 0 && CHARA_NUM("室内の邪魔者") == 0
				PRINTFORMW 「……。抱歉。有点、压抑不住感情」
				IF TEXTS("季節") == "冬"
					PRINTFORMW 犹豫地走到近前之后、%CALLNAME:TARGET%牵起%CALLNAME:MASTER%的手、摩擦着脸颊
					PRINTFORMW 脸颊明明凉凉地、却感觉很暖和、是那样奇妙的手感
				ELSE
					IF TALENT:MASTER:娇小
						;你が娇小だとちょっとニュアンスを変える
						PRINTFORMW 犹豫地走到近前之后、%CALLNAME:TARGET%抱住了%CALLNAME:MASTER%
					ELSE
						PRINTFORMW 犹豫地走到近前之后、%CALLNAME:TARGET%拥抱着%CALLNAME:MASTER%
					ENDIF
					PRINTFORM 冰凉的手感
					IF COND("易出汗", MASTER)
						PRINTFORM 以及香汗淋漓地身体
					ENDIF
					PRINTFORMW 让人很舒服……
				ENDIF
			ELSE
				PRINTFORMW 「%CNAME("一人称")%也最喜欢%CNAME("二人称")%了」
				PRINTFORMW %CALLNAME:TARGET%那么一说就小脸羞红到耳根、低下頭去
			ENDIF
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……谢、谢谢你。即便是奉承话也很開心、喲」
			PRINTFORMW %CALLNAME:TARGET%似乎有些不知所措、眸光四下徘徊着
		ELSEIF CALCF("甜言蜜语成功")
			PRINTFORMW 「别突然说这种话啦……」
			PRINTFORMW 侧身过去的%CALLNAME:TARGET%、白皙的脸颊上泛着朱红的羞意
		ELSE
			PRINTFORMW 「……那种奉承就不必了。只要灵魂就好」
			PRINTFORMW %CALLNAME:TARGET%冷淡地扭过脸去
		ENDIF
	CASEELSE
		IF RAND:5 == 0
			;オカルト関係のお話。たまに部員に関係する話になる
			;会話に参加させる場合は指导者として指定されていることを条件とする（傍にいるとして）
			PRINTFORMW 「在加入这个部为止、我也对舍弃人类身份的方法做了各种调查喲」
			IF RAND:4 == 0
				;調査方法
				PRINTFORMW 「书或者杂志之类的、读起来也会出现那种感觉的话。比如说这样的」
				PRINTFORMW 从包里取出数本奇怪的超自然杂志、展示给你看
				IF FIND_COND("現在不在", "杏珠")
					PRINTFORMW 「比如说这个怪谈、杏珠同学、虽然看上去挺喜欢的样子、不过你不会相信的是吧……？」
				ENDIF
			ELSEIF RAND:3 == 0
				;天使。ちなみにメタトロンがそうだって説
				;天使の話題だと悪魔や（堕）天使や聖人（玛丽と帕拉奇娜）誰とも関係あるのだが、誰にしたものか
				PRINTFORMW 「虽然不知道是真是假、传言以诺人变成了天使」
				PRINTFORMW 「如果是纯洁、正直、虔诚的人物的话、也许也会发生这样的事」
			ELSEIF RAND:2
				;吸血鬼
				PRINTFORMW 「被吸血鬼咬会变成吸血鬼、之类的」
				PRINTFORMW 「但是吸血鬼终究是依存于人类的、所以和%CNAME("一人称")%所追求的不一样啊」
				IF FIND_COND("現在存在", "織")
					PRINTFORMW 说到这、可能是注意到织的视线了吧、有些尴尬地挠了挠頭
				ENDIF
			ELSE
				;仙人
				PRINTFORMW 「可惜的是羽化登仙……想成为仙人的家伙吧」
				PRINTFORMW 「实际上最现实的方法无限相似于即身佛、所以放弃了」
				;他にも金丹来招待，飲むとか、黄金を固形のまま食べるとか。そこまで富豪じゃない
				IF FIND_COND("現在存在", "西西莉亚")
					PRINTFORMW 「考虑到理解错误的可能、没有像西西莉亚桑那样对%CNAME("二人称")%的内行师父是不行的啊」
				ENDIF
			ENDIF
		ELSEIF RAND:4 == 0
			PRINTFORMW 「这个说话方式？　以前開始就这样了喲」
			PRINTFORMW 「虽然父亲为此经常让我注意、但还是没能改掉」
			PRINTFORMW 「所以父亲也没能说出其他人的事情吧」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「逃课时的活动……有各种各样的呢」
			IF TALENT:恋慕
				PRINTFORMW 「去往山的方向、在河边散步……享受着独自一人的乐趣」
				IF TALENT:相思相愛
					PRINTFORMW 「下次、休息日也行啊……一起去好吗？」
				ELSE
					PRINTFORMW 「不接受吐槽说太颓废喲」
				ENDIF
			ELSE
				PRINTFORMW 「各种各样的就是……各种各样喲。不要侵犯隐私啦」
			ENDIF
		ELSEIF RAND:2
			;オープニングで言ってる街道、維吹は人外が何となく判別できる
			PRINTFORMW 「この前、部で見たことがない妖怪？をみかけたんだけど、この街多くない？」
			PRINTFORMW 「こっち越して来る前はこんなに頻繁に見なかった気がするんだけど……」
		ELSE
			PRINTFORMW 「灵魂增长是种什么样的感觉呢？」
			;大概对本人来说是很自然的事情、所以无法说明
		ENDIF
	ENDSELECT

CASE "拭汗"
	PRINTFORMW 「那个、谢谢你……」
CASE "淋浴独り言"
	IF TALENT:恋慕 && RAND:3 == 0
		PRINTFORML 「差不多该回来了吧……」
	ELSEIF COND("種族：雪女") && RAND:2 == 0
		PRINTFORML 「就算变成雪女、热水还是一如既往的舒服呢……」
		IF TALENT:恋慕 && TALENT:相思相愛 == 0
			PRINTFORML 「就这样作为人类生活下去的话……不行么」
		ENDIF
	ELSE
		;汎用。鼻歌を歌う
		IF TALENT:相思相愛
			PRINTFORML 「♪～♪～～♪～～～」
		ELSE
			IF RAND:2 == 0
				PRINTFORML 「♪～♪～～……愛されないくらい…なんだ…」
			ELSE
				;例の雪の女王の劇中歌
				PRINTFORML 「♪～♪～～……如果坚持下去就不会辛苦了喲哦♪~……」維吹哼着日语翻唱的《Let It Go》
			ENDIF
		ENDIF
	ENDIF
CASE "淋浴"
	;実は内衣を漁ったのに気づかれています
	IF COND("淋浴：内衣漁りバレ")
		;ここに来ることはないと思うけどとりあえず書いておく
		IF TALENT:相思相愛
			PRINTFORMW 「清爽了。……%CNAME("主人")%也要洗么？」
			PRINTFORMW 「话说……内衣稍微再色气点比较好吗？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……虽说%CNAME("一人称")%不会报警、但那种事我觉得还是节制些比较好喲……」
			PRINTFORMW 「什么、内衣颜色、什么的。别让我说啦」
		ELSE
			PRINTFORMW 「别钻空子啊、%CNAME("主人")%……」
			PRINTFORMW 「明明能看内衣包裹下的东西、难道还不满足吗？」
		ENDIF
	ELSE
		IF PLACE("自宅")
			PRINTFORMW 「洗白白了……。嗯、%CNAME("二人称")%吗、你来晚了呢」
			PRINTFORMW 「晚饭、吃什么？　要洗澡的话、可以等等你」
			IF TALENT:恋慕
				IF RAND:2
					PRINTFORMW 「哎呀、对了……欢迎回来、%CNAME("主人")%」
				ELSE
					PRINTFORMW 「需要我帮你洗吗？　……開玩笑啦？」
				ENDIF
			ENDIF
		;必然的に昼の部室
		ELSE
			;用意したのは間違いなく弗理希艾尔だろう
			PRINTFORMW 「%CNAME("主人")%吗。因为想转变下心情、让我借用了一下喲」
			PRINTFORMW 「能在学校的部室里使用淋浴什么的、弗理希艾尔小姐可真能干呐」
		ENDIF
	ENDIF

CASE "淋浴後换装"
;どんな服なのか分からないのでとりあえず無難な反応
;判定することは不可能ではないだろうがとりあえずは汎用台詞
;基本的に服に興味がないので極端でない限りつべこべ言わない予定
	;初めて
	IF DEVENT(STR:日常イベント名) == 0
		IF DEVENT("淋浴後换装失敗")
			;一度失敗している場合
			PRINTFORMW 「%CNAME("主人")%、如您所愿的换装了喲」
			PRINTFORMW 「如愿以偿的感想是？」
		ELSE
			PRINTFORMW 「%CNAME("主人")%、我发现多了件衣服、但是穿成这样真的好吗？」
			PRINTFORMW 「我虽然对着装没什么讲究、但还是试着穿上看看……啊啊、很高兴的样子呢……」
		ENDIF
	ELSE
		PRINTFORMW 「换好了、但是……这身装束、有那么好吗？」
	ENDIF

CASE "淋浴後换装失敗"
	;初めて
	IF DEVENT(STR:日常イベント名) == 0
		PRINTFORMW 「%CNAME("主人")%、我发现多了件陌生的衣服」
		PRINTFORMW 「想让我穿上？　……感兴趣的话再说」
	ELSE
		PRINTFORMW 「？　啊啊、衣服啊。唔～嗯、再说吧、再说」
	ENDIF

;睡眠中の悪戯
CASE "趁睡袭击"
	;梦话
	CALL KOJO_SLEEP_K27
	WAIT
CASE "互动"
	SELECTCASE STR:日常イベント名
	CASE "托一托胸部"
		;貧乳であることを気にして是ないが胸がないという自覚はある
		IF RAND:3 == 0
			IF CHARA_NUM("室内の邪魔者") > 0
				PRINTFORMW 「……」
				PRINTFORMW 也许是因为在意周围的目光、%CALLNAME:TARGET%显得慌慌张张的
			ELSE
				PRINTFORMW 「该不会是、做爱邀请？　什么啊、不是吗」
				IF TALENT:恋慕
					PRINTFORMW 「被摸太多会感觉怪怪的。不是那个意思的话就停手啦」
				ENDIF
			ENDIF
		ELSEIF RAND:2
			PRINTFORMW 「摸%CNAME("一人称")%的胸部会很愉快？　哼嗯、这样啊……」
		ELSE
			IF TALENT:貧乳
				PRINTFORMW 「……总觉得自己说有点那个、几乎没有的东西触摸起来感觉如何？」
			ELSE
				;勝手には増えないのでPLAYヤー側の操作の結果だろう
				PRINTFORMW 「因为多亏了%CNAME("二人称")%、胸部比以前增大了、可以摸摸看什么的、说不出来啦……」
			ENDIF
		ENDIF
		PRINTFORMW %CALLNAME:TARGET%一动不动地、看起来很害羞那样
	CASE "按摩"
		PRINTFORMW 「虽然没有那么需要、不过你乐意的话。……嗯、稍微有点痒」
		IF RAND:3 == 0
			PRINTFORMW 「……嗯？　停、住手！　别挠痒啦！」
			IF TALENT:相思相愛
				PRINTFORMW 「啊哈哈哈！　住手！　奉还给你！」
				PRINTFORMW ……两人玩闹了一阵子
			ELSE
				PRINTFORMW 「库、啊哈哈！　……说真的给我住手！」
				PRINTFORMW 被教训了……
			ENDIF
		ENDIF
	CASE "接吻"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「……诶？　什、吓！？　刚刚、接吻了？　为什么！？」
			PRINTFORMW 「突发事件有好有坏是吧。这肯定是坏事！」
		ELSE
			IF TALENT:相思相愛
				IF CFLAG:甜言蜜语
					PRINTFORMW %CALLNAME:TARGET%手臂环绕在%CALLNAME:MASTER%的脖子上、回应着接吻
					PRINTFORMW 「……嗯……啾……」
					PRINTFORMW 有点窒息起来了……
				ELSE
					PRINTFORMW 「没、没办法啊……。因为是%CNAME("二人称")%才特别允许……」
					PRINTFORMW 「……再来一下的话、可以喲……」
				ENDIF
			ELSEIF TALENT:恋慕
				IF CFLAG:甜言蜜语
					PRINTFORMW %CALLNAME:TARGET%满面羞红、轻轻地吻了回去
					PRINTFORMW 「就是那种气氛吧、此刻……」
				ELSE
					PRINTFORMW 「唔、啊唔……」
					PRINTFORMW 「虽然不讨厌……再稍微有情调一点更……」
				ENDIF
			ELSE
				PRINTFORMW 「所以说、突然做这种事什么的」
				PRINTFORMW 「……对心脏不好啦」
			ENDIF
		ENDIF
	CASE "膝枕"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「膝枕？　ああそれくらい別に…って%CNAME("一人称")%がされるの？」
			PRINTFORMW 「わかった。じゃあ、失礼して……これ、なんか面白色のか？」
			PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为困惑している…
		ELSE
			IF TALENT:相思相愛
				IF RAND:2 == 0
					PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为仰向けになるとじっと見上げてきた
					PRINTFORMW 「気にしないでくれ。見てるだけだから」
				ELSE
					PRINTFORMW 「昔はこれの何が楽しいんだと思ってたけど……今はちょっと分かる…」
					PRINTFORMW 膝の上の%CALLNAME:TARGET%の%TEXTR("頭/頬")%を撫でると安心したように脱力した
				ENDIF
			ELSEIF TALENT:恋慕
				IF RAND:2 == 0
					PRINTFORMW 「…重くない？」
				ELSE
					PRINTFORMW 「…冷たくない？」
				ENDIF
				PRINTFORMW そわそわと落ち着かない%CALLNAME:TARGET%の摸頭と、やがて大人しくなった…
			ELSE
				PRINTFORMW 「なんだか猫にでもなった気分だ」
				PRINTFORMW 「…猫だからって撫でられるのはちょっと…」
			ENDIF
		ENDIF
	CASE "泡茶"
		PRINTFORMW 「不好意思、特意为我」
		IF RAND:3 == 0
			PRINTFORMW 「嗯、有点烫手……」
			IF CEVENT("覚醒2")
				PRINTFORMW %CALLNAME:TARGET%呼的吹了口寒气、便安然地喝了起来
			ELSE
				PRINTFORMW %CALLNAME:TARGET%时而吹气、时而小口小口地喝着
			ENDIF
		ENDIF

	CASE "勸酒"
		PRINTFORMW
	;当然だが尾巴がある相手のみ
	CASE "抚摸尾巴"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW
		;連続実行
		ELSEIF CSTR:PREV_DAILYCOM == STR:日常イベント名
			PRINTFORMW
		;この時間で初実行
		ELSEIF CHOSE_DEVENT(STR:日常イベント名) == 0 && RAND:2
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	CASEELSE
		PRINTFORMW
	ENDSELECT
CASE "整理睡姿"
	;梦话
	CALL KOJO_SLEEP_K27
	WAIT
CASE "卖个破绽"
	SELECTCASE STR:日常イベント名
	CASE "邀请一起入浴"
		PRINTFORMW
	CASE "Ｈ的邀请", "展示内褲"
		PRINTFORMW
	CASE "推倒"
		PRINTFORMW
	CASE "清洁口交"
		PRINTFORMW
	CASE "口淫"
		PRINTFORMW
	CASE "亲脸頬", "接吻"
		PRINTFORMW 「……害羞了吗？」
	CASE "膝枕", "抱住", "把胸部压了上去", "摩擦股間"
		PRINTFORMW
	CASE "抚摸", "手淫"
		PRINTFORMW
	CASE "膝枕"
		IF BASE:MASTER:魂 < 100 && COND("種族：雪女")
			PRINTFORMW 「頼みがあるんだけど、膝枕させてくれないか？」
			PRINTFORMW %CALLNAME:MASTER%が回应と、%CALLNAME:TARGET%正在认真地读着标题为ただ黙って膝の上の%CALLNAME:MASTER%の%TEXTR("頭/髪")%を撫で始めた
			PRINTFORMW しばらくのどかな時間が過ぎた後、ぽつりと呟いた
			PRINTFORMW 「少し、魂の輝きが鈍い。%CNAME("主人")%、無理は良くないよ」
		ENDIF
	CASE "沏茶"
		;CSTR:茶 を指定してある場合には、SAVESTR:茶 で何を用意したかが判定できる
		;例）PRINTFORMW 「よければ%SAVESTR:茶%どうぞ」
		PRINTFORMW 「好像挺闲啊。要喝杯茶吗？」
		PRINTFORMW 「是、%SAVESTR:茶%。山でよく飲むからこれを淹れるのには自信がある」
	;それ以外
	CASEELSE
		IF RAND:2
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDSELECT
;これは素質に[開朗]ないし[粗野]を持っている角色のみです
CASE "構って欲しい！"
	PRINTFORMW
CASE "廁所"
	;廁所で用を済ませた後の台詞
	IF BASE:尿意 == 0
		;主人も廁所で済ませてきた
		;描写からすると主人が先に戻ってるから超知覚でもないと気付けないんじゃ……
		IF BASE:MASTER:尿意 == 0
			IF TALENT:恋慕
				PRINTFORMW 「久等了、%CNAME("主人")%」
			ENDIF
			PRINTFORMW %CALLNAME:TARGET%坐回原位
		ELSE
			IF TALENT:恋慕
				PRINTFORMW 「久等了、%CNAME("主人")%」
			ENDIF
			PRINTFORMW %CALLNAME:TARGET%坐回原位
		ENDIF
	;廁所に行く際の台詞
	ELSE
		IF TALENT:恋慕
			PRINTFORMW 「%CNAME("主人")%、我出去一下喲。马上回来……」
		ELSE
			PRINTFORMW %CALLNAME:TARGET%离開座位出去了
		ENDIF
	ENDIF
CASE "廁所詮索"
	PRINTFORMW 「做什么……去摘花了」
	PRINTFORMW %CALLNAME:TARGET%委婉地坦白了如厕之事
;これは你と角色が両方男性の際に限り起きます
CASE "連れション"
	PRINTFORMW
CASE "检查阴部"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K27
		WAIT
	ELSEIF COND("合意：检查阴部") == 0
		;拒否されたのに連続実行
		IF CSTR:PREV_DAILYCOM == STR:日常イベント名
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ELSE
		PRINTFORMW
	ENDIF
CASE "检查内褲"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K27
		WAIT
	ELSE
		;連続実行
		IF CSTR:PREV_DAILYCOM == STR:日常イベント名
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
CASE "撫摸股間"
	PRINTFORMW
CASE "检查布鲁马", "股間観察"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K27
		WAIT
	ELSEIF CFLAG:股間確認済 && RAND:2
		PRINTFORMW
	;心情好
	ELSEIF CFLAG:夸奖
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF

CASE "掀起裙子"
	SELECTCASE STR:日常イベント名
	CASE "撩起裙子"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW
		;胖次チラ直後
		ELSEIF COND("胖次チラ直後")
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;掀起裙子
	CASEELSE
		;刚睡醒の胡乱な状態を襲う
		IF CFLAG:刚睡醒
			PRINTFORMW
		;睡眠中の悪戯
		ELSEIF CFLAG:睡眠
			;梦话
			CALL KOJO_SLEEP_K27
			WAIT
		;初めて
		ELSEIF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW
		;胖次チラ直後
		ELSEIF COND("胖次チラ直後")
			PRINTFORMW
		ELSE
			IF COND("打招呼前")
				PRINTFORMW
			ELSE
				;胖次沒穿
				IF EQUIP:胖次 == 0
					PRINTFORMW
				ELSE
					PRINTFORMW
				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
	CASEELSE
		PRINTFORMW
	ENDSELECT
CASE "内褲摄影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		PRINTFORMW
	CASEELSE
		PRINTFORMW
	ENDSELECT
CASE "阴部摄影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		PRINTFORMW
	CASEELSE
		PRINTFORMW
	ENDSELECT

ENDSELECT

path: ERB/EVENT_K/27 維吹/EVENT_K27_DAILY.ERB


code:
;-------------------------------------------------
;取引画面と、购物の際の台詞を記述します
;-------------------------------------------------
;取引画面での台詞。悪魔以外は大部分が不要です
;-------------------------------------------------
@KOJO_WISH_K27, ARGS

SELECTCASE ARGS
CASE "取引開始"
	;自分を相手にＨしてる最中にお願いされた
	IF COND("Ｈ最中の取引")
		;しかも挿入中！
		IF INSERT("挿入相手") == MASTER

		ELSE

		ENDIF
	ELSE
		PRINTFORML 「有什么需要我做的吗？」
		PRINTFORML 「我会在力所能及的范围内协助你。但是力所不及的话、我拒绝」
	ENDIF
CASE "愛の告白"
	;告白成功！
	IF TALENT:相思相愛
		CALL PROPOSE_K27
	;失敗
	ELSE

	ENDIF
;胖次のお願いした時に相手が没穿内褲だった
CASE "没穿内褲"
	IF COND("合意：胖次交易")

	ELSE

	ENDIF
;胖次を要前の会話。
;ただし、悪魔の場合には魂を払っているので確実に渡すことになる
;ここで本来胖次を给かどうかなどを加味して分岐を設ける事も出来る。特に書かなくてもよい
;TFLAG:取引承諾 = 0とすると胖次拒否に行くようになり、TFLAG:取引承諾 = 1とすると判定無視で胖次を渡せるようになる
;TFLAG:取引価格 に数字を入れる事で好きな額を要求できるようになる。基準相場は$500です
;TFLAG:値上げ交渉 に数字を入れておくと、断られた際もその値上乗せで胖次を渡す展開に出来る
;TFLAG:取引拒否 = 1 とすると本来取引できるかに関わらず、取引しなくなる
CASE "胖次交易"
	;ＯＫ！
	IF TFLAG:取引承諾
		;日期と時間参照随机
		IF COND("合意：胖次交易") && RANDC(4) == 0
			PRINTFORMW
			TFLAG:取引価格 = 1000
		ELSE
			PRINTFORMW
		ENDIF
	;断られる
	ELSE
		;これを指定しておくと、実行値が足りない際にこの額上乗せで応じてくれるようになる
		TFLAG:値上げ交渉 = 500
	ENDIF
CASE "胖次"
	;値上げ交渉した
	IF TFLAG:値上げ交渉
		PRINTFORMW
	;相場より高い額を要求されるままに払った
	ELSEIF TFLAG:取引価格 > 500
		PRINTFORMW
	;値切って相場と変わらず$500払う。ここでTFLAG:取引承諾 = 0とすることで拒否するのもよいでしょう
	ELSEIF TFLAG:値切った
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
	;胖次を脱いで渡してくる汎用地の文
	CALL DAILY_MESSAGE, "脱下胖次交了出去"

CASE "胖次拒否"
	;取引を拒否した際
	IF TFLAG:取引拒否

	ELSE

	ENDIF
CASE "同居拒否"
	PRINTFORMW 「不用特意住在一起、也可以在学校见面的吧？」

CASE "同居希望"
	;実質「イベント名：K27_維吹の事情2」
	IF DEVENT(ARGS) == 0
		;初回
		CALL AFFAIRS_K27_2
	ELSE
		IF TALENT:相思相愛
			PRINTFORMW 「那样、是呢……。%CNAME("一人称")%也想在一起、不觉得打扰的话、我很乐意」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「正好可以预先练习在山上的共同生活吗……。之后去打扰喲」
		ELSE
			PRINTFORMW 「嗯、邀请我吗。还留有、用过的空房间？」
		ENDIF

	ENDIF

CASE "同居頻度的相談"

CASE "便当拒否"
	PRINTFORML 「我不要。去拜托弗理希艾尔小姐吧」
	PRINTFORMW 「说起来、%CNAME("一人称")%看起来像是会做饭的吗？」

CASE "做便当"
	;便当のお願い２回目以降
	IF COND("合意：便当")
		IF TALENT:相思相愛
			PRINTFORML 「可以喲。你想吃什么？」
			PRINTFORML 「什么都好的话、按%CNAME("二人称")%喜欢的口味、酌情来做吧」
			PRINTFORML 「没问题。对恋人的口味喜好、已经掌握住了」
		ELSE
			PRINTFORML 「又来吗。明明也不怎么美味、还挺喜欢啊」
			IF TALENT:恋慕
				PRINTFORML 「我接受了喲。如果你喜欢的话、%CNAME("一人称")%也有制作的意义了」
			ELSEIF CFLAG:TARGET:好感度 >= 1000
				PRINTFORML 「烦倒不烦。只是有点不好意思而已」
			ENDIF
		ENDIF
		IF COND("同居中")
			PRINTFORMW 「那让我、从明早開始使用厨房吧」
		ENDIF
	;以下は初めて作ってもらうよう变成了とき
	ELSE
		IF COND("同居中")
			PRINTFORML 「可以喲。毕竟我是吃闲饭的呢」
			PRINTFORML 「不过、对味道不要有所期待。许久没做了」
		ELSE
			PRINTFORML 「真是平白无故的奇怪请求啊、%CNAME("主人")%你」
			PRINTFORML 「……可以喲。但是许久没做了、不知道能不能做好」
		ENDIF
		PRINTFORMW 「有什么不能吃的东西吗？　过敏之类的啦」
	ENDIF

;COND("口服避孕薬派")かどうかで初回が"口服避孕薬を飲んで欲しい"or"口服避孕薬を止めて欲しい"に分かれます
CASE "口服避孕薬"
	;角色が口服避孕薬派なら、こっちだけ書いてください
	IF COND("口服避孕薬派")
		;口服避孕薬を服用してもらう
		IF CFLAG:口服避孕薬

		;口服避孕薬の服用を止めてもらう
		ELSE
			;初回
			IF DEVENT(ARGS) == 0

			ELSE

			ENDIF
		ENDIF
	;角色が口服避孕薬派でないなら、こっちだけ書いてください
	ELSE
		;口服避孕薬を服用してもらう
		IF CFLAG:口服避孕薬
			;初回
			IF DEVENT(ARGS) == 0

			ELSE

			ENDIF
		;口服避孕薬の服用を止めてもらう
		ELSE

		ENDIF
	ENDIF
;COND("口服避孕薬派")の人に口服避孕薬服用を止めてもらうお願いをしたけど聞き入れてもらえなかった場合
CASE "口服避孕薬中断拒否"

;COND("讨厌口服避孕薬")の人に口服避孕薬服用のお願いをしたけど聞き入れてもらえなかった場合
CASE "口服避孕薬服用拒否"

CASE "淫紋拒否"

;"淫紋贴纸直前"or"淫紋贴纸"の片方を書けば十分だと思います
CASE "淫紋贴纸直前"
	;初回
	IF DEVENT(ARGS) == 0

	ELSE

	ENDIF

CASE "淫紋贴纸"
	;初回
	IF DEVENT(ARGS) == 0

	ELSE

	ENDIF
;"淫紋直前"or"淫紋"の片方を書けば十分だと思います
CASE "淫紋直前"
	SELECTCASE MARK:淫紋
	CASE 2

	CASE 3

	CASE 4

	ENDSELECT
CASE "淫紋"
	SELECTCASE MARK:淫紋
	CASE 2

	CASE 3

	CASE 4

	ENDSELECT

CASE "拜托処理性欲"

CASE "性処理の一時中断"

CASE "性処理拒否"

;悪魔、淫魔、妖狐専用
CASE "给我看尾巴"

CASE "给我看尾巴拒否"

;改变髪型のは、長さが披肩以上の人のみ。未設定だと披肩扱いです
;髪型を弄る際に手伝ってくれる人がASSIになっています。お手伝い桑を指名したい場合にはその人をASSIにして下さい
CASE "改变髪型"

CASE "髪型変更の感想"
	;どの髪型变成了かで分岐可能
	SELECTCASE CONDS("髪型の種類")
	CASE CONDS("普段の髪型")
		PRINTFORMW
	CASE "齐刘海"
		PRINTFORMW
	CASE "直髪"
		PRINTFORMW
	CASE "卷髪"
		PRINTFORMW
	CASE "外八"
		PRINTFORMW
	CASE "双马尾"
		PRINTFORMW
	CASE "马尾辫"
		PRINTFORMW
	CASE "三股辫"
		PRINTFORMW
	CASE "编起来"
		PRINTFORMW
	CASE "団子頭"
		PRINTFORMW
	;其他
	CASEELSE
		PRINTFORMW
	ENDSELECT
CASE "改变髪型拒否"

;これは普段から连褲襪を履く人じゃないとあんまり見る機会ないと思う
CASE "连褲襪着替え"
	;台詞を書いたら下のRETURN 1を消してください
	RETURN 1
	;どれに履き替えてもらったか
	IF CHECK_OUTER("開放型连褲襪")
		PRINTFORMW
	ELSEIF CHECK_OUTER("渔网连褲襪")
		PRINTFORMW
	ELSEIF CHECK_OUTER("连褲襪")
		PRINTFORMW
	;生足
	ELSE
		PRINTFORMW
	ENDIF
CASE "连褲襪着替え拒否"

CASE "巨根化して"
	;これは"大きくなる前"のサイズなのに注意
	SELECTCASE CONDS("潜在的含む阴茎尺寸")
	CASE "短小"

	CASE "普通"

	CASE "巨根"

	CASE "馬根"

	;腕並以上
	CASEELSE

	ENDSELECT

CASE "巨根化して拒否"

CASE "短小化して"
	;これは"小さくなる前"のサイズなのに注意
	SELECTCASE CONDS("潜在的含む阴茎尺寸")
	CASE "普通"

	CASE "巨根"

	CASE "馬根"

	;腕並、規格外
	CASEELSE

	ENDSELECT

CASE "短小化して拒否"

;相思相愛　避妊の護符を取下
CASE "避妊解除可"
	;初回
	IF DEVENT(ARGS) == 0
		;そもそも子どもを産むこと自体に抵抗がある。恋人以外とか冗談じゃない
		PRINTFORMW お願いを聞いた後、しばらく悩んだ顔をしていた%CALLNAME:TARGET%だったが、やがて契約書を取り出した
		PRINTFORMW 「二つ、条件がある」
		PRINTFORMW 「一つはもしも妊娠して子どもができたら、その子のことは愛してやってくれ」
		PRINTFORMW 「もう一つはこの護符を解除してる間、%CNAME("一人称")%の膣を使えるのは%CNAME("二人称")%だけだ」
		PRINTFORMW 「%CNAME("一人称")%が妊娠したいのは%CNAME("二人称")%の子どもだけ」
		PRINTFORMW 「…もっと言えば%CNAME("一人称")%が抱かれたいのは%CNAME("二人称")%だけ。その…分かってくれるよな？」
		PRINTFORMW こちらを伺うように訊く%CALLNAME:TARGET%に頷いて見せると、安心したような顔で契約書を破り捨てた
		PRINTFORMW 「有がとう。%CNAME("一人称")%も覚悟を決めるよ」
	ELSE
		PRINTFORMW 「わかった。前に出した条件は忘れないでくれよ」
	ENDIF
	PRINTFORMW ＜%NAME:TARGET%失去了[避妊の護符]＞
	CALL SETFLAG, "身嗜み：Ｖ独占", TARGET
	;胎内精子で孕むの防止するためここで阴蒂ア
	BASE:胎内精液量 = 0
	BASE:胎内精子量 = 0
CASE "避妊解除拒否"
	;維吹は相思相愛まで解除しないので恋慕の場合の台詞を入れる
	IF TALENT:恋慕
		PRINTFORMW 「ごめん、%CNAME("二人称")%のお願いはなるべく叶えたいけど、それは無理」
		PRINTFORMW 「%CNAME("一人称")%は%CNAME("一人称")%みたいな奴をこれ以上増やしたくない」
	ELSE
		PRINTFORMW お願いを聞いた瞬間、%CALLNAME:TARGET%正在认真地读着标题为嫌悪感を露わにした
		PRINTFORMW 「その場合は契約違反だな。%CNAME("一人称")%はこの部を退部する」
		PRINTFORMW どうやら本気で言っているようだ
		PRINTFORMW 無理に護符の解除を迫ることはできないだろう
	ENDIF

;一度解除した避妊の護符の再装着をお願いした場合
CASE "避妊の護符"

;以下は悪魔専用
CASE "魂が足りない"

CASE "想要钱"

CASE "甜言蜜语"

CASE "謎之魅力"

CASE "射精量強化"
	;自分を相手にＨしてる最中にお願いされた
	IF COND("Ｈ最中の取引")
		;しかもＶ挿入中！
		IF INSERT("Ｖ挿入相手") == MASTER

		ELSE

		ENDIF
	ELSE

	ENDIF
CASE "巨根化"
	;これは"大きくなる前"のサイズなのに注意
	SELECTCASE CONDS("潜在的含む阴茎尺寸", PLAYER)
	CASE "短小"

	CASE "普通"

	CASE "巨根"

	CASE "馬根"

	;腕並以上
	CASEELSE

	ENDSELECT
CASE "短小化"
	;これは"小さくなる前"のサイズなのに注意
	SELECTCASE CONDS("潜在的含む阴茎尺寸", PLAYER)
	CASE "普通"

	CASE "巨根"

	CASE "馬根"

	;腕並、規格外
	CASEELSE

	ENDSELECT

;其他汎用
CASEELSE
	;汎用拒否
	IF STRCOUNT(ARGS, "拒否")
		PRINTFORMW
	;汎用取引（特に記述することがないならスキップ）
	ELSEIF STRCOUNT(ARGS, "取引")

	ELSE
		PRINTFORMW
	ENDIF
ENDSELECT

;-------------------------------------------------
;购物での台詞
;-------------------------------------------------
@KOJO_SHOP_K27, ARGS

SELECTCASE ARGS
CASE "一緒に出発"
	;初回
	IF SEVENT(ARGS) == 0

	;着替えてもらう
	ELSEIF CHECK_CLO("裸体") || CHECK_CLO("泳装姿") || CHECK_CLO("体操服姿") || CHECK_CLO("内衣姿")

	ELSE

	ENDIF
CASE "目送"

CASE "没収胖次出発"
	;初回
	IF SEVENT(ARGS) == 0

	;既に没穿内褲
	ELSEIF EQUIP:胖次 == 0

	ELSE

	ENDIF
CASE "保持现在的装扮出発"
	IF CHECK_CLO("泳装姿")

	ELSEIF CHECK_CLO("体操服姿")

	ELSEIF CHECK_CLO("内衣姿") || CHECK_CLO("裸体")

	ENDIF
CASE "会計交代"
	;初回
	IF SEVENT(ARGS) == 0 || SEVENT("商品購入") == 0

	ELSE

	ENDIF
CASE "商品購入"
	;今買った物
	SELECTCASE STR:購入道具
	;ギリギリ通常商品の範疇or你用
	CASE "撮影機材", "潤滑液", "媚薬", "飞机杯"

	CASE "避孕套"
		;この商品を初めて買わされた
		IF SEVENT(STR:購入道具) == 0

		ELSE

		ENDIF
	;えっちな商品
	CASEELSE

	ENDSELECT
CASE "店内待機"
	;とりあえず何か一個買った時or33％で喋る
	SIF COND("買上品数") != 1 && RAND:3
		RETURN 0
	;胖次没収中
	IF COND("買い物胖次没収中")

	ELSE

	ENDIF
CASE "购物終了"
	;胖次没収中
	IF COND("買い物胖次没収中")

	;なにも買わなかった
	ELSEIF COND("買上品数") == 0

	ELSEIF CHECK_CLO("泳装姿") || CHECK_CLO("体操服姿")

	ENDIF
ENDSELECT

path: ERB/EVENT_K/27 維吹/EVENT_K27_SHOP.ERB

license: unknown


code:
;-------------------------------------------------
;固有イベント記述
;ごちゃごちゃしてきたのでこちらに移す
;相思相愛取得イベントなどもこちら
;-------------------------------------------------
;調教終了後の雪女としての覚醒イベント
@AFTER_TRAIN_K27
IF BASE:魂 >= 100 && CEVENT("覚醒1") == 0
	PRINTFORML ・
	PRINTFORML ・
	PRINTFORML ・
	PRINTFORMW 回过神来、%CALLNAME:TARGET%的秀发已经完全变得乌黑了
	PRINTFORMW 以前、之所以混杂着银发是因为妖力泄露的缘故、弗理希艾尔曾经说过
	PRINTFORMW 看来已经可以控制住妖力了……
	PRINTFORMW 「……嗯？　怎么了？」
	CALL SET_CEVENT, "覚醒1"
ELSEIF BASE:魂 >= 400 && CEVENT("覚醒2") == 0
	PRINTFORML ・
	PRINTFORML ・
	PRINTFORML ・
	PRINTFORMW %CALLNAME:TARGET%的秀发往银色转变、向空中伸出双手
	PRINTFORMW 在手掌上浮现出零碎的冰块
	PRINTFORMW 「……稍微有点明白了」
	PRINTFORMW 「虽然现在只能稍微操纵部分气温、不过我想要是完全体的话、就能进行更大规模地操纵了」
	PRINTFORMW 「在盛夏可以掀起暴风雪的程度」
	PRINTFORMW %CALLNAME:TARGET%獲得了【建议：冷却器】
	CSTR:TARGET:建议 = 冷却器
	CALL SET_CEVENT, "覚醒2"
;精霊取得
ELSEIF BASE:魂 >= 700 && CEVENT("覚醒3") == 0
	PRINTFORML ・
	PRINTFORML ・
	PRINTFORML ・
	PRINTFORMW %CALLNAME:TARGET%の髪が銀色に変わる
	PRINTFORMW 「……有がとな、%CNAME("主人")%」
	PRINTFORMW 「今、なんていうか、自分の中の力がぴったり馴染んだ……」
	PRINTFORMW 「完全な雪女になれたんだと思う」
	PRINTFORMW そう言って微笑む%CALLNAME:TARGET%正在认真地读着标题为確かに先刻までと少し何かが変わっていた
	PRINTFORMW 「証明？　う～ん、そうだな。じゃあ、今から5分だけ雪を降らせるよ。あんまりやるとみんなに怒られそうだからな」
	IF PLACE("野外")
		PRINTFORMW そういうと、辺り一面に白色雪が舞い始めた
	ELSE
		PRINTFORMW そういうと、窓の外にちらちらと白色ものが舞い始めた
	ENDIF
	PRINTFORML
	PRINTFORMW こうして、%CALLNAME:TARGET%正在认真地读着标题为半妖半人から完全なる雪女へと変生した
	PRINTFORML
	PRINTFORMW 「これで契約満了。っていっても、すぐに是なくならないから安心してくれ」
	PRINTFORMW 「もう少し慣らしておきたいし。よければ部活にも顔を出すよ」
	PRINTFORMW 「十分慣らしたら%CNAME("一人称")%は母桑のところへ行く。そのときはサヨナラだな」
	PRINTFORMW 「なんだよ……。もしかして、寂しかったりする？」
	IF TALENT:恋慕
		PRINTFORMW 「ははーん、さては%CNAME("主人")%、%CNAME("一人称")%の身体に夢中だな？　なんて……」
	ELSE
		PRINTFORMW 「ははーん、さては%CNAME("主人")%、%CNAME("一人称")%に夢中だな？　なんて……」
	ENDIF
	PRINTFORMW 冗談めかして言った後、%CALLNAME:TARGET%正在认真地读着标题为急に黙り込む
	PRINTFORMW やがて自らが降らせた雪に目をやると訥々と語り始めた
	PRINTFORMW 「……%CNAME("一人称")%さ、%CNAME("二人称")%が好きだよ」
	IF TALENT:恋慕
		PRINTFORMW 「母桑からも、父桑からも見捨てられた%CNAME("一人称")%にはこれが愛なのかわからないけど」
		PRINTFORMW 「でも、きっとそうなんだと思う」
		PRINTFORMW 「他の部活のみんなも……種類は違うけど、うん、好きだ。世間からみたらおかしなこの時間を、大切に思ってる」
	ELSE
		PRINTFORMW 「他の部活のみんなもね。世間からみたらおかしなこの時間を、大切に思ってる」
	ENDIF
	PRINTFORMW 「でも……それは永遠には続かない。いつかみんな、どこかへ行く時が来る」
	PRINTFORMW 「そして部室の外に、%CNAME("一人称")%の居場所はないんだ」
	PRINTFORMW 「%CNAME("一人称")%はまた一人になんてなりたくない。おいて行かれたくない……」
	PRINTFORMW %CALLNAME:TARGET%の顔が%CALLNAME:MASTER%に向けられ、諦めの混じったような笑みが浮かぶ
	PRINTFORMW 「だから%CNAME("一人称")%は爬山。母桑と、ひょっとしたらいるかもしれない父桑のところへ」
	PRINTFORMW 「元々純粋な人类じゃないんだ。それが一番自然で、一番いいことだって、%CNAME("主人")%も思うだろ？」
	PRINTFORMW %CALLNAME:MASTER%が答えを返そうとすると、どこからともなく冷たい風が顔に吹き付ける
	PRINTFORMW 思わず一瞬目を閉じ、開いた時には%CALLNAME:TARGET%正在认真地读着标题为消えていた……
	PRINTFORML
	PRINTFORMW %CALLNAME%の種族が人类から雪女に変化しました
	CSTR:種族 = 雪女_精霊
	CALL SET_CEVENT, "覚醒3"

ENDIF

RETURN 1

;維吹との归途2
@FOR_HOME_K27_2
	PRINTFORMW 「そうだ。ちょっと繞道しないか？」
	PRINTFORMW 归途、%CALLNAME:TARGET%のそんな提案で%CALLNAME:MASTER%は見知らぬ道に足を踏み入れていた
	PRINTFORMW ほとんど獣道のような山道を街道、短カットのためという茂みをいくつか抜けるとやがて視界が開ける
	PRINTFORMW そこは山の中腹の崖のように突き出た場所で、向こうに街が見えた
	IF TEXTS("季節") == "冬"
		PRINTFORMW 「是到着～。お付き合い有がとう。ちょっと待ってて、灯りつけるから」
		PRINTFORMW どこかから取り出したランタン状のライトが樹に吊るされ、周囲を照らす
		PRINTFORMW 「そこ座って。それからこれもどうぞ」
		PRINTFORMW %CALLNAME:TARGET%が敷いたシートの上に座り、彼女の差し出してきた温かい飲み物とカイロを受け取る
	ELSE
		PRINTFORMW 「是到着～。お付き合い有がとう。そこ座って」
		PRINTFORMW %CALLNAME:TARGET%が敷いたシートの上に座り、彼女の差し出してきた飲み物を受け取る
	ENDIF
	PRINTFORMW 「……ここ、静かだしいい眺めだろ。学校サボって胸罩胸罩してる時に偶然見つけてさ」
	PRINTFORMW 隣に座った%CALLNAME:TARGET%の視線につられ、街を見る
	IF TEXTS("季節") == "冬"
		PRINTFORMW 様々な灯りに彩られた夜景は確かに一見の価値ある美しさだった
	ELSE
		PRINTFORMW 夕日に照らされ、赤く染まった街は確かに一見の価値のある美しさだった
	ENDIF
	PRINTFORMW 「なんとなく、%CNAME("二人称")%と一緒来了いなって思って…付き合ってもらった」
	PRINTFORMW 「よかったらまた来よう…。あっ他のみんなに教えるなよ。騒がしくなったら恨むぞ」
	CALL PRINT_SELECT, "自分是いのか/二人だけの秘密？"
	IF RESULT == 0
		;告白イベントの前後でちょっと対応が変わる
		IF TALENT:相思相愛
			PRINTFORMW 「いい。%CNAME("二人称")%は%CNAME("一人称")%の……特別だから」
			PRINTFORMW \@ TEXTS("季節") == "冬" ? 灯り # 夕日 \@に照らされる%CALLNAME:TARGET%の横顔が一層色づいた気がするが、それについて指摘はしないでおく
		ELSE
			PRINTFORMW 「いい。お世話になってる礼物。%CNAME("一人称")%がこの街から出口たら、その時は教えても構わない」
			PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为景色から目を離さず、気だるげにそう答えた
		ENDIF
	ELSE
		PRINTFORMW 「%CNAME("一人称")%が恥ずかしがるの分かっててそういう言い方してるだろ……」
		PRINTFORMW そういって%CALLNAME:TARGET%正在认真地读着标题为膝に顔を埋めてしまった
	ENDIF
	IF TEXTS("季節") == "冬"
		PRINTFORMW それからしばらく、夜景を見ながら二人身を寄せ合って過ごした…
	ELSE
		PRINTFORMW それから街の明かりが目立ち始めるまで、二人身を寄せ合って過ごした…
	ENDIF

RETURN 1

;維吹の事情
@AFFAIRS_K27_1, ARG
	PRINTFORMW 「抱歉、%CNAMET(ARG, "主人")%」
	PRINTFORMW 午休时、把约定的便当带到教室的%CALLNAME:ARG%、一副愁眉不展的表情
	PRINTFORMW 「既然接受了、本来打算做出稍微『像样』点的作品那样的做着、却……」
	PRINTFORMW 便当盒里有一半是买来的熟菜和冷冻食品
	PRINTFORMW 「隔太久了步骤都忘了……。来不及了就」
	PRINTFORMW 「但是给父亲做的时候从没这么失败过啊……」
	PRINTFORMW 「嗯？　啊啊、我父亲是登山家啊、想着至少趁在家的时候该做点便当」
	;このイベントの前に同居希望で起きるイベント（K27_維吹の事情2）を起こしている場合
	IF DEVENT("同居希望", ARG) == 1
		;父親が消えたことは便当と同居で起きるイベントを二つとも阴蒂アしないと言わない
		PRINTFORMW 「但是……、父亲有一天、上山却没再回来」
		PRINTFORMW 「是小学毕业前不久吧。那之后就没再做便当了」
		PRINTFORMW 「……抱歉。这不该在吃饭前说的吧」
		PRINTFORMW 接着在吃便当的时候、%CALLNAME:TARGET%有些不自然的喋喋不休……
	ELSE
		PRINTFORMW 「但是、在上中学的时候就放弃了。……瞧、叛逆父亲的家伙？」
		PRINTFORMW 「……并不觉得特别孤单喲」
		PRINTFORMW 那之后、和不知道为何沉默下来的%CALLNAME:TARGET%一起吃着便当
	ENDIF
	CALL SET_CEVENT, "維吹の事情1", ARG

RETURN 1

@AFFAIRS_K27_2
	PRINTFORMW 「……明白了。暂时先住在一起吧。今天、就拿行李去你家」
	PRINTFORMW 「家里的许可、么……。不需要啦、反正家里没人介意」
	IF CEVENT("維吹の事情1")
		PRINTFORMW 「父亲？　……没有和父亲住在一起」
	ENDIF
	;信頼5LVなり屈服刻印3LVなり恋慕なりついてるはずなので自分のことを話す
	PRINTFORMW 受到怀疑的目光、%CALLNAME:TARGET%勉强開了口
	IF CEVENT("維吹の事情1")
		;父親が消えたことは便当と同居で起きるイベントを二つとも阴蒂アしないと言わない
		PRINTFORMW 「上中学不久之前、父亲留下%CNAME("一人称")%到山上去了、再也没回来」
	ENDIF
	;父親が失踪してから三件目。これでも一番マシな家
	PRINTFORMW 「现在在远方亲戚家住。但是、彼此都不感兴趣、而且很多时候、亲戚那边也没多少人在家」
	PRINTFORMW 「所以不需要许可。这下理解了吗？」

RETURN 1

;愛の告白イベント
@PROPOSE_K27
	PRINTFORMW 「……ごめん。その言葉は、すごく嬉しい。でも、信じられない」
	PRINTFORMW 「母桑は私を連れて行ってくれなかった」
	PRINTFORMW 「父桑は私をおいて山へ……母桑のところへ行ってしまった」
	PRINTFORMW 「親戚も他の人たちも、%CNAME("一人称")%のことを気味悪がって遠ざけた」
	PRINTFORMW 「みんな%CNAME("一人称")%のことなんか要らなかった……」
	PRINTFORMW 「だから%CNAME("一人称")%は人类なんかやめようと思ったのに……」
	;こういう卑屈な自分の姿が維吹にとって否定したかったもので有、誰かに受け入れてほしかったものでもある
	PRINTFORMW 「それなのに、今更、%CNAME("主人")%が%CNAME("一人称")%を好き、なんて……」
	PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为行き場を失くした子どものように俯いている……
	PRINTFORMW 内面の不安定さを示すようにその髪は銀色に染まり、雪女の冷気が全身を覆い始めた
	PRINTFORMW 今、この状態の彼女に触れるのは危険かもしれないが…
	;退く選択肢？この指令を選んだ時点でそんなものはない
	CALL PRINT_SELECT, "抱上去/手を握る"
	IF RESULT == 0
		PRINTFORMW %CALLNAME:TARGET%を抱上去
		PRINTFORMW 氷のように冷たいその身体を、彼女を守るように全身で包み込んだ
		PRINTFORMW %CALLNAME:TARGET%を必要とする自分がここに存在することを伝えるために
		PRINTFORMW 「……%CNAME("一人称")%は%CNAME("二人称")%と一緒にいていいの？」
		PRINTFORMW 「魂の交易对象としてじゃなくて、ただの%CALLNAME:MASTER%と%CALLNAME:TARGET%として」
		PRINTFORMW 返事の代わりに凍えそうになる身体と両腕にわずかに力をこめた
		PRINTFORMW %CALLNAME:MASTER%の背中に%CALLNAME:TARGET%の腕が回される
	ELSE
		PRINTFORMW %CALLNAME:TARGET%の手を取る
		PRINTFORMW 初めて会ったその日のように、あの日以上に冷たくなったその手を両手で包み込んだ
		PRINTFORMW %CALLNAME:TARGET%を必要とする自分がここに存在することを伝えるために
		PRINTFORMW 「……%CNAME("一人称")%は%CNAME("二人称")%と一緒にいていいの？」
		PRINTFORMW 「魂の交易对象として、じゃなくて、ただの%CALLNAME:MASTER%と%CALLNAME:TARGET%として」
		PRINTFORMW 返事の代わりに凍えそうになる両手を少しだけ強く握った
		PRINTFORMW %CALLNAME:MASTER%の手が%CALLNAME:TARGET%の両手で包み込まれる
	ENDIF
	PRINTFORMW 「……有がとう。%CNAME("一人称")%も、%CNAME("二人称")%の側に少しでも長くいたい」
	PRINTFORMW その%CALLNAME:TARGET%の声とともに、二人を包む冷気は晴天ていった
	PRINTFORML
	;恋人という関係を考慮して操を立てるようになる
	PRINTFORMW 【%CALLNAME%は[贞操重视]獲得了】
	TALENT:贞操重视 = 1

RETURN

@K27_ENDING_01
	PRINTFORMW 「之前さ、母桑の使いって人が来たんだ」
	PRINTFORMW ある日の放課後、たまたま二人だけしかいない部室で、咖啡を飲んでいた%CALLNAME:TARGET%が話し始めた
	PRINTFORMW 「何かで%CNAME("一人称")%が雪女变成了のが分かったらしい。で、自分のところへ来いってさ」
	PRINTFORMW 「だから、今日でお別れ」
	CALL PRINT_SELECT, "「さびしい」/「さようなら」"
	IF RESULT == 0
		PRINTFORMW 「……そう、だね。%CNAME("一人称")%もさびしい」
	ELSE
		PRINTFORMW 「ふふ、あっさりしてるね。まあその方がお互い湿っぽくなくていいか」
	ENDIF
	PRINTFORMW ひんやりとした手が頬に触れる
	PRINTFORMW いつの間にか息がかかる距離に%CALLNAME:TARGET%の顔があった
	PRINTFORMW その髪は雪のような銀色に染まっている
	PRINTFORMW 雪女の吐息を吹きかけられた男が凍死していた、という怪談の一節を思い出す。
	PRINTFORMW 「…………」
	PRINTFORMW 就这様お互いに微動だにせず、どれくらいの時間が経っただろうか
	PRINTFORMW 「……その使いの人が言うには%CNAME("二人称")%が生きてるのは都合が悪いんだって」
	PRINTFORMW 「だから出来るなら殺しておけといわれたんだけど……やっぱり無理だね。むいてない」
	PRINTFORMW %CALLNAME:TARGET%正在认真地读着标题为苦笑しながら身体を離した
	PRINTFORMW 「母桑も父桑を殺せなかったらしいし、そういう甘ったれた血筋なのかなあ」
	PRINTFORMW 一つ伸びをすると背を向け、出口へと歩き出す。その髪色は戻っていた
	PRINTFORMW 「さようなら、%CNAME("一人称")%の初恋の人」
	PRINTFORMW 背中越しに言って、%CALLNAME:TARGET%正在认真地读着标题为出ていった
	PRINTFORMW それが%CALLNAME:MASTER%の見た、彼女の最後の姿だった
	PRINTFORML
	PRINTFORMW ─ Ending No.1 初恋は四月に降る雪のように ─
RETURN