code:
;-------------------------------------------------
;各種打招呼
;-------------------------------------------------
@KOJO_GREETING_K55, 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  "朝接吻", "朝の新妻PLAY", "朝添い寝"
		SELECTCASE RAND:3
		CASE 0
			CALL PRINT_STR, @" 「嗯、早上好……_HH_」_W"
		CASE 1
			PRINTFORML 「嗯呢……啊、醒了吗？」
			IF TEXTS("曜日") == "日"
				PRINTFORMW 「差不多该吃早饭了吧？」
			ELSE
				PRINTFORMW 「快要到上学的时间了、再不起来可不行」
				CALL PRINT_STRW, @" 「……诶、再睡一会？ 真没办法……_HH_」"
			ENDIF
		CASEELSE
			PRINTFORML 「嗯、早上好、%CNAME("二人称")%。」
		ENDSELECT
	CASE "朝騎乗位", "朝Ａ騎乗位","朝乳交", "朝口交", "朝足交", "朝舐陰"
		PRINTFORMW 「%CNAME("二人称")%啊、起来～」
		CALL PRINT_STRW, @" 「%TEXTR("む～っ、下の体はもう起きてるのにぃ_HH_/朝一番_HH_いっぱい出してね_HH_/えへへ、起きないからぁ……_HH_朝から独り占め_HH_")%」"
	CASE "朝六九式"
		PRINTFORMW 「%CNAME("二人称")%、起来了？」
		CALL PRINT_STRW, @" 「%TEXTR("下面的那位已经起来的说……_HH_/恋人的早上_HH_好好品尝哦_HH_")%」"
	CASE "朝逆正常位"
		CALL PRINT_STRW,@"「%CNAME("二人称")%、哦哇 哟…_HH_」"
		CALL PRINT_STRW,@"「%CNAME("二人称")%%TEXTR("に朝出し_HH_きもちよかったぁ……_HH_/のナカ_HH_朝から独り占めしちゃった_HH_/の寝顔がえっちすぎたから、朝えっち_HH_しちゃった_HH_")%」"
	ENDSELECT

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

	IF COND("体育")
		PRINTFORMW 「今天有体育课哦。%CNAME("二人称")%、体操服什么的没有忘记吧？」
	ELSE
		SELECTCASE RAND:3
		CASE 0
			PRINTFORMW 「今天有什么计划吗吗？」
		CASE 1
			PRINTFORMW 「稍等哦、我去沏茶」
		CASEELSE
			PRINTFORMW 「早上好。有好好睡吗？」
			PRINTFORMW %CNAME("二人称")%温柔的微笑着。
		ENDSELECT
	ENDIF
CASE "一番乗り"
	SELECTCASE RAND:3
	CASE 0
		PRINTFORMW 「あ、%CNAME("二人称")%」
		PRINTFORMW 「今天%CNAME("一人称")%是第一呢」
	CASE 1
		PRINTFORMW 「太好了第一个到！」
		PRINTFORMW 「……今天干什么好呢～♪」
	CASEELSE
		PRINTFORMW 「……好像其他人都没到呢」
	ENDSELECT
CASE "ただいま"
	PRINTFORML 「我回来了」
CASE "既に入室"
	;家で出迎えてくれる時
	IF COND("夜") && TALENT:相思相愛
		PRINTFORMW 「欢迎回来～」
		CALL PRINT_STRW, @" 「先吃饭吗？先洗澡吗？……还是说……_HH_」"
		CALL PRINT_STRW, @" 「没什么没什么、保~密_HH_」"
	ELSEIF COND("夜")
		PRINTFORMW 「欢迎回来～」
	ELSE
		PRINTFORMW 「啊、等着你呢」
	ENDIF
CASE "入室打招呼"
	SELECTCASE CSTR:PREV_DAILYCOM
	CASE "甜言蜜语"
		PRINTFORMW (欸、难道说打扰你了？)
	CASE "打招呼舐陰", "打招呼口交"
		PRINTFORMW 「等、你们在干什么啊……？」
	CASEELSE
		PRINTFORMW 「打扰了」
	ENDSELECT
;部屋にいる他の人から打招呼を返される打招呼。WAITの使用は一回が望ましい
CASE "簡易入室打招呼"
	;遅れた時のセリフ（既に部員の４分の３が集合済）
	IF CHARA_NUM("入室打招呼時の室内人数") >= CHARANUM*3/4 && RAND:3 == 0
		PRINTFORMW 「打扰了」
		PRINTFORMW 「……啊阿、大家都到齐了啊」
	ELSE
		SELECTCASE RAND:3
		CASE 0
			PRINTFORMW 「呐、…今天干什么？」
		CASE 1
			PRINTFORMW %CALLNAME:TARGET%轻轻的点頭。
		CASEELSE
			PRINTFORMW 「你好。」
		ENDSELECT
	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 『你好、%CNAME(CALLNAME_ACTOR)%。』
	;相手が現れるのが遅かった（既に部員の４分の３が集合済）
	ELSEIF CHARA_NUM("入室打招呼時の室内人数") >= CHARANUM*3/4 && RAND:3 == 0
		SELECTCASE RAND:3
		CASE 0
			PRINTFORMW 『大家差不多都到齐了哦。』
		CASE 1
			PRINTFORMW 『%CNAME(CALLNAME_ACTOR)%、你好。』
		CASEELSE
			PRINTFORMW 『你好。』
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
		CASE 0
			PRINTFORMW 『你好。』
		CASE 1
			PRINTFORMW %CALLNAME:TARGET%轻轻的点頭。
		CASEELSE
			PRINTFORMW 『%CNAME(CALLNAME_ACTOR)%、你好。』
		ENDSELECT
	ENDIF

CASE "居間に現れた"
	;一度居間から別の場所に行って、居間に帰って来た時
	IF CMOVE("居間")
		PRINTFORMW 「我回来了～」
	ELSE
		PRINTFORMW
	ENDIF
CASE "抜け出された"
		PRINTFORMW
CASE "便当"
	IF TALENT:相思相愛 && RAND:100 >= 95
		PRINTFORML 「今天啊、居然！！」
		CALL PRINT_STRL, @" 「做了妻便当哦_HH_」"
		CALL PRINT_STRL, @" 「快快、来品尝_HH_」"
	ELSE
		PRINTFORML 「今日は、%TEXTR("海苔弁当/漢堡肉弁当/飯団の詰め合わせ/鮭の塩焼き弁当/")%を作ってきたよ～」
	ENDIF

	SELECTCASE RAND:4
	CASE 0
		PRINTFORML 「甜点是%TEXTR("梨/猕猴桃/橘子/苹果/酸奶")%哦。」
	CASE 1
		PRINTFORML 「%CNAME("一人称")%的自信作。」
		PRINTFORML 「怎么样、好吃吗？」
	CASE 2
		PRINTFORML %CALLNAME:TARGET%便当的一部分送到了%CALLNAME:MASTER%的嘴边。
		CALL PRINT_STRW, @" 「哈、然有些含羞……、来～啊_HH_」"
	CASEELSE
		PRINTFORML 「%CNAME("二称")%、吃饱了吗？」
	ENDSELECT
ENDSELECT

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

SELECTCASE ARGS
;初回のセリフ
CASE "初回台詞"
	PRINTFORML 「从今天開始加入社团的都築希」
	PRINTFORML 「请多多関照」
CASE "浑身是汗"
	IF TALENT:恋慕
		PRINTFORML 「运动果然很舒畅啊！」
		CALL PRINT_STRL, @" 「……啊……味、想闻啊_HH_」"
		CALL PRINT_STRL, @" 「会再给你闻、等一会哦_HH_」"
	ELSE
		PRINTFORML 「运动真舒服呢」
		PRINTFORML 「总是闻体味话、那个……很羞耻啊」
	ENDIF
CASE "刚睡醒"
	PRINTFORML 「哇、啊唔……早上好……」
CASE "Cosplay中"
	PRINTFORML 「这个、怎么样？」
	PRINTFORML 「%CNAME("一人称")%合适吗……？」
;沉眠著
CASE "睡眠"
	;梦话
	CALL KOJO_SLEEP_K55
	;梦话用の汎用地の文呼出
	CALL DAILY_MESSAGE, "梦话"
ENDSELECT

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

;前回指令対応台詞
SELECTCASE CONDS("直前行動")
CASE "愛の告白"
	CALL PRINT_STRL, @"「恋人……啊_HH_」"
CASE "告白保留"
	PRINTFORML %CALLNAME:TARGET%好不太高兴……
CASE "约会的约定"
	PRINTFORML
;これは悪魔や天使や驱魔人のみ
CASE "契約成立"

;你にお願いされて、自分の力で巨根になってあげた(悪魔と天使のみ)
CASE "巨根化契約成立"
	PRINTFORML
CASE "短小化契約成立"
	PRINTFORML
CASE "摆脱"
	CALL PRINT_STR, @" 「……_HH_」_L"
CASE "主人公的房間に連れ込まれた"
	PRINTFORML 「打扰了」
CASE "自室に招待"
	PRINTFORML 「%CNAME("一人称")%在房间做什～？」
CASE "自室に訪問された"
	;指导者を伴っている場合
	IF FIND_COND("現在存在", "助手")
		PRINTFORML
	ELSE
		PRINTFORML
	ENDIF
CASE "指导者部屋訪問"
	PRINTFORML
;自宅移動の後に你に連れられて居間に回来了場合など。優先度は低いです
CASE "帰還"
	PRINTFORML 「我回来了～」
CASE "オナバレ"
	;この辺は初期の合意(口上側で用意した合意の方)がある場合と無い場合で分岐
	;あったら誘ってくる、なくてもちょっと恥ずかしがるぐらい
	PRINTFORML 「……！？等等、%CNAME("二人称")%…… 看哪里呢……？」
	PRINTFORML %CALLNAME:TARGET%满脸赤红、努力避開你的视线。
	PRINTFORML 無自覚と是え、目のやり場に困らせていたのはどちらだか…とは思ったが、それは言わないことにしておこう。
CASE "露脐装超短裙胖次チラ"
	PRINTFORML 「！？ 真是的、别样死死盯着看啊……」
CASE "低腰臀圍"
	PRINTFORML
CASE "掀起裙子"
	PRINTFORML 「……真是的」
	PRINTFORML 「只有%CNAME("二人称")%哦……能允许做这种事情……」
CASE "检查内褲"
	IF COND("合意：检查内褲") && CHARA_NUM("室内の邪魔者") == 1
		PRINTFORML 「%CNAME("二人称")%、在其他人面前这样做可不行哦……？」
	ELSEIF TALENT:恋慕 && CHARA_NUM("室内の邪魔者") == 0
		CALL PRINT_STRL, @" 「%CNAME("二人称")%看我内裤、都习惯了啊……_HH_」"
		CALL PRINT_STRL,@" 「……要每天都给你胖次的自拍照片吗……_HH_」"
	ELSE
		PRINTFORML 「%CNAME("二人称")%、喜欢%CNAME("一人称")%的胖次呐」
		PRINTFORML 「欸？『%CALLNAME:TARGET%的胖次怎么都看不腻』吗？」
		CALL PRINT_STRL, @"「……%CNAME("二人称")%、变态_HH_」"
	ENDIF
CASE "检查阴部"
	;人が居るとき分岐させる(つもり)
	IF COND("合意：检查阴部") && CHARA_NUM("室内の邪魔者") == 1
		PRINTFORML 「%CNAME("二人称")%～……えっちじゃないのにこういうことは、いけないことだと思うんだけどなー……」
	ELSEIF TALENT:恋慕 && CHARA_NUM("室内の邪魔者") == 0
		CALL PRINT_STRL, @" 「啊……_HH_ 这里、喜欢看吗～？」"
		CALL PRINT_STRL, @" 「每次都在努力看我、保养也有价值呢～_HH_」"
	ELSE
		PRINTFORML 「%CNAME("二人称")%、这么想看的话H的时候再看就是了……」
		PRINTFORML 「欸？『H之外场合才好』吗？」
		PRINTFORML 「……%CNAME("二人称")%是变态」
	ENDIF
CASE "拜托処理性欲"
	PRINTFORML 「……真拿你没办法」
CASE "进行性処理"
	PRINTFORML 「会很麻烦哦、这样也可以吗？」
CASE "清洁口交"
	PRINTFORML
CASE "買東西"
	;買ってきた道具などで分岐
	;IF COND("巨大振動棒購入")

	;	CALL SET_DEVENT, "巨大振動棒感想"
	;ELSE
		;単純にいっぱい買ったかどうかで分岐
		SELECTCASE COND("買上品数")
		CASE IS >= 4
			PRINTFORML 「今天买了很多呢～」
		CASEELSE
			PRINTFORML 「购物的时候在约我一起吧」
		ENDSELECT
	;ENDIF
CASE "隐秘摄影失敗"
	PRINTFORML 「……欸、在干什么呢……？」
CASE "变成裸体"
	;他に人がいる
	IF CHARA_NUM("室内の邪魔者")
		PRINTFORML 「……再怎么说这里裸体也太引人注目了」
	;まさかの野外
	ELSEIF PLACE("野外")
		PRINTFORML 「呜呜、在外面裸体……」
	;そのうち書きたいです。ちょっと思いつかない。
	;不在個室
	ELSEIF PLACE("個室") == 0
		PRINTFORML 「就算在室内……好羞耻啊」
	;個室で二人きり
	ELSE
		CALL PRINT_STRL, @"「……_HH_」"
		CALL PRINT_STRL, @"「……来做嘛……_HH_」"
	ENDIF

CASE "Ｈ目的で呼び出された"
	IF PLACE("情人旅館")
		IF TALENT:相思相愛 && RAND:2
			CALL PRINT_STRL, @"「……_HH_」"
			CALL PRINT_STRL, @"「……呐、做吧……_HH_」"
		ELSE
			CALL PRINT_STRL, @"「……_HH_」"
			CALL PRINT_STRL, @"「……H……_HH_」"
		ENDIF
	ELSE
		IF TALENT:相思相愛 && RAND:2
			CALL PRINT_STRL, @"「……_HH_」"
			CALL PRINT_STRL, @"「……呐、做吧……_HH_」"
		ELSE
			CALL PRINT_STRL, @"「……_HH_」"
			CALL PRINT_STRL, @"「……H……_HH_」"
		ENDIF
	ENDIF
ENDSELECT
;何か発言してたらここまで
SIF LINECOUNT > MEMO_LINECOUNT
	RETURN 1

;標語の反応。書いたらコメントアウトを外してください
;各分岐を細かく埋めずに、上の分岐を消して望みの学生服に着替えてやったぞ発言をここに書くのも良いと思います
IF CFLAG:標語実践
	IF STRCOUNT(SAVESTR:標語, "注意口渴")
		PRINTFORML 「嗓子干了果然很难受」
		PRINTFORML 「社团里有没有运动饮料……」
		PRINTFORML 「啊、果汁类型的不行？」
	ELSEIF STRCOUNT(SAVESTR:標語, "体操服")
		SELECTCASE SAVESTR:標語
		CASE "体操服はやっぱり紧身短褲","体操服はやっぱり运动衫","体操服はやっぱり运动短褲"
			PRINTFORML 「换了衣服、和平常不一样有些……」
		CASE "体操服はやっぱり布鲁马"
			PRINTFORML 「果然体操服要穿运动裤啊」
			PRINTFORML 「勒紧的感觉非常喜欢」
		CASEELSE

		ENDSELECT
	ELSEIF STRCOUNT(SAVESTR:標語, "学生服")
		SELECTCASE SAVESTR:標語
		CASE "学生服は露脐装超短裙に限る","学生服は超短迷你に限る"
			PRINTFORML 「换了衣服、和平常不一样有些……」
		CASEELSE

		ENDSELECT
	ENDIF
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 「苹果也喜欢 苹果派很好吃的」
	CALL SET_DEVENT, "質問２"
ELSEIF DEVENT("質問３") == 0 && TALENT:相思相愛
	PRINTFORML 「不喜欢的东西……虫子之类的。为什么会有人喜欢呢……」
	CALL SET_DEVENT, "質問３"
ELSEIF CFLAG:日常事件回数 >= 25 && DEVENT("質問４") == 0 && ABL:信頼 >= 5
	PRINTFORML 「I字平衡？啊嗯嗯嗯嗯……Y字的话勉强可以哦……」
	PRINTFORML 「……拍照的时候再穿给你看、这样……行吗？」
	CALL SET_DEVENT, "質問４"
ENDIF

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

;他の人といちゃついた後にpartner変更
IF COND("いちゃいちゃ") == 0 && FIND_COND("Ｈ的いちゃつき中")
	PRINTFORML 虽然不会说什么、但是感受到了请去别的地方的眼神……
ENDIF

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

;以下は随机台詞など

;時間帯と場所と関係で変化有些
IF COND("夜")
	IF RAND:4 == 0
		PRINTFORML 注意到目光望向那里、%CALLNAME:TARGET%看向这里微笑着。
		PRINTFORML 「……%CNAME("二人称")%、怎么了？」
	ELSEIF RAND:3 == 0
		PRINTFORML %CALLNAME:TARGET%坐在沙发上看书。
		PRINTFORML 看上去、%CALLNAME:TARGET%正在读%TEXTR("杂志/漫画本/食谱")%的样子……。
	ELSEIF RAND:2 == 0
		PRINTFORML %CALLNAME:TARGET%陷在沙发里看着参考书。
		PRINTFORML 看上去、%CALLNAME:TARGET%再读%TEXTR("現代文/数学/英語/听力/科学/物理/地理/世界史/音楽/体育/美術")%的参考书……。
	ELSE
		PRINTFORML %CALLNAME:TARGET%带着頭戴式耳机玩着%TEXTR("手机/Switc○")%。
	ENDIF
ENDIF

;-------------------------------------------------
;梦话。随意むにゃむにゃ言わせてください
;-------------------------------------------------
@KOJO_SLEEP_K55
;上から順に発言頻度が高いようにする(== 0の付け忘れではない)
IF RAND:3
	IF RAND:3 == 0
		PRINTFORML 「zzz…………」
	ELSEIF RAND:2 == 0
		PRINTFORML 「すぅ……すぅ……」
	ELSE
		PRINTFORML 「嗯……这个……不可以……？」
	ENDIF
ELSEIF RAND:4
	IF RAND:4 == 0
		PRINTFORML 「%CNAME("二人称", "かな")%……嗯、喵喵……」
	ELSEIF RAND:3 == 0
		PRINTFORML 「もー……%CNAME("二人称", "かな")%手……呼呼……♪」
	ELSEIF RAND:2 == 0
		CALL PRINT_STRL, @"「%CNAME("二人称", "かな")%哈……色狼_HH_……像女孩子一样……_HH_」"
	ELSE
		PRINTFORML 「あと……もうちょっと……」
	ENDIF
ENDIF

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

SELECTCASE ARGS
;通話などでの呼出なので括弧は「」ではなく『』推奨
CASE "Ｈ目的で呼び出された"
	;台詞を書いたらRETURN 0 を消してください
	;RETURN 0
	IF PLACE("情人旅館")
		IF TALENT:相思相愛 && RAND:2
			PRINTFORMW 『欸、请容我拒绝』
			PRINTFORMW 『……』
			PRINTFORMW 『什么的……骗你的啦 ……现在就过来』
		ELSE
			PRINTFORMW 『欸、现在吗？』
			PRINTFORMW 『……真拿你没办法』
		ENDIF
	ELSE
		IF TALENT:相思相愛 && RAND:2
			PRINTFORMW 『……真是没办法』
			PRINTFORMW 『%CNAME("一人称")%来之前、乖乖的……待着哦？』
		ELSE
			PRINTFORMW 『啊哇、干劲十足啊』
			PRINTFORMW 『那就再老地方见面吧～』
		ENDIF
	ENDIF
CASE "学園での日常"
	SIF CFLAG:好感度 >= 1750 && CEVENT("調教開始：屈服刻印ＬＶ２") == 1 && CEVENT("My wish is...") == 0
		CALL K55_LONG, "My wish is..."
	IF TALENT:相思相愛 && CFLAG:好感度 >= 3000 && CEVENT("エンディング閲覧済み") == 0
	SIF CFLAG:想イノ行方 <= 4 && TALENT:禁断的知識 >= 3
		CALL K55_LONG, "Farewell to Love"
	SIF CFLAG:想イノ行方 <= 19 && CFLAG:想イノ行方 > 4
		CALL K55_LONG, "I love you, my dear."
	SIF CFLAG:想イノ行方 >= 20
		CALL K55_LONG, "Eternal bond"
	ENDIF
CASE "お仕事"

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

	;地の文の前の台詞がある場合はここに書く
	SELECTCASE SAVESTR:現在位置
	CASE "阵雨"
		IF RAND:2 == 0
			PRINTFORML 「突然下大雨……」
			PRINTFORML 「谢、谢谢你、%CNAME("二人称")%」
			PRINTFORML (其实有带折叠伞……呢)
		ELSE
			PRINTFORML 「%CNAME("二人称")%、对不起！没有带伞却下了大雨……」
			PRINTFORML 「……诶？　可以一起吗？得救了～～～～～！」
		ENDIF
	ENDSELECT

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

	SELECTCASE SAVESTR:归途の行動
	CASE "相合傘"
		PRINTFORMW 「相合伞什么的一直很向往的～」
		PRINTFORMW 「能这样就像梦一样」
	CASE "内衣選び", "泳装選び"
		PRINTFORMW 「想选个新的、选什么呢？」
	;特定行動でのセリフ。DAILY_MESSAGE, "归途"の地の文を参考に随意場合分けしてください。
	CASE "打情骂俏"
		PRINTFORMW 「今天发生了这样的事情」
		PRINTFORMW %CALLNAME:TARGET%温柔笑着……
	CASE  "站着读书", "買食物", "物色游戏"
		PRINTFORMW
	CASE "检查新刊"
		PRINTFORMW
	CASE "繞道"
		PRINTFORMW
	CASE "直帰"
		PRINTFORMW
	CASE "圣诞节"
		PRINTFORMW
	CASEELSE
		PRINTFORMW
	ENDSELECT

;归途イベントの後になんとなく情人旅館に行こっかとなった際のセリフです
CASE "放課後Ｈ的邀请"
	PRINTFORMW 「接下来……那个、要过来吗？」
;お浴室に一緒に入ろうと誘われた場合
CASE "一緒にお浴室"
	PRINTFORML 「%CNAME("二人称")%、一起去浴室吗？」
		CALL PRINT_SELECT, "一起去/之后再去"
		IF RESULT == 0
			PRINTFORMW 「可以吗？谢谢！」
			TFLAG:床イン = 1
		ELSE
			PRINTFORMW 「也有这样的时候……对吧。」
		ENDIF
CASE "休憩"
	;台詞を書いたらRETURN 0を消してください
	IF PLACE("自宅")
		IF COND("夜")
			;欲求不満の限界
			IF BASE:欲求不満 >= 100
				PRINTFORMW
				CALL PRINT_SELECT, "推倒在床上！/晚安"
				IF RESULT == 0
					PRINTFORMW 「唔呼呼……♪」
					TFLAG:床イン = 1
				ELSE
					PRINTFORMW 「也有这种时候呢。」
				ENDIF
			ELSE
				IF TEXTS("季節") == "冬"
					IF RAND:3 == 0
						PRINTFORMW
					ELSEIF RAND:2 == 0
						PRINTFORMW 「呜呜、不想从暖炉里出来……」
						PRINTFORMW 「……%CNAME("二人称")%送我回房间就好了……」
					ELSE
						PRINTFORMW 「……欸、%CNAME("二人称")%起来了？」
						PRINTFORMW 「……难道睡着了？」
						PRINTFORMW 「那难的的%CNAME("一人称")%在我边上睡吧……♪」
					ENDIF
				ELSEIF TEXTS("季節") == "夏"
					IF RAND:3 == 0
						PRINTFORMW 「明明開着空调还那么热……」
						PRINTFORMW 「从冰箱拿点冰过来」
						PRINTFORMW 「……啊、%CNAME("二人称")%要吃什么吗？」
					ELSEIF RAND:2 == 0
						PRINTFORMW 「每年都会想夏天炎热的天气真是很讨厌……」
					ELSE
						PRINTFORMW 「夏天就算不运动也要补充水分哦」
						PRINTFORMW 「放着不管小心中暑哦」
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「……欸欸」
						PRINTFORMW 「%CNAME("二人称")%一起这样度过的日子、能一直持续就好了」
					ELSEIF RAND:2 == 0
						PRINTFORMW
					ELSE
						IF TEXTS("季節") == "春"
							PRINTFORMW
						ELSE
							PRINTFORMW
						ENDIF
					ENDIF
				ENDIF
			ENDIF
		;周日昼
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「啊、%CNAME("二人")%又要睡了吗？」
				IF CFLAG:前回Ｈ日 == DAY - 1 || FIND_COND("夜袭相手") == 0
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSEIF RAND:2 == 0
				PRINTFORMW 「哈……、%CNAME("一人称")%来一起睡午觉吗……」
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	;ここは実質昼のみ
	ELSEIF PLACE("部室")
		IF RAND:3 == 0
			;前日の夜に床インしていた、または夜袭にきた場合
			IF CFLAG:前回Ｈ日 == DAY - 1 || FIND_COND("夜袭相手") == 0
				PRINTFORMW 「%CNAME("二人称")%、辛苦了……」
				PRINTFORMW 「唔啊、……昨晚得太晚了吗……」
			ELSE
				PRINTFORMW 「%CNAME("二人称")%、觉得没什么精神……」
				PRINTFORMW 「昨天熬夜了吗？」
			ENDIF
		ELSEIF RAND:2
			IF TEXTS("季節") == "夏"
				PRINTFORMW
			ELSEIF TEXTS("季節") == "冬"
				PRINTFORMW
			ELSE
				PRINTFORMW 「%CNAME("二人称")%、在这种地方睡觉会感冒的」
				PRINTFORMW 「%CNAME("二人称")%？……拿点能盖着的东西来吧……」
			ENDIF
		ELSE
			PRINTFORMW
		ENDIF
	;場所移動後
	ELSE
		PRINTFORMW 「……诶、那个、%CNAME("二人称")%？」
		PRINTFORMW 「都到这里了……只睡觉吗？」
		PRINTFORMW 「……坏心眼」
	ENDIF

CASE "清洁口交：お誘い"

CASE "清洁口交：射精後"

CASE "清洁口交：断った"

;NOWEXを分岐に用いることが出来る。また、TFLAG:地の文スキップで地の文を飛ばせる
CASE "性処理：前"
	;口上を書いた場合はRETURN 0を消してください
	RETURN 0
	;避孕套を使う場合
	IF TEQUIP:PLAYER:避孕套
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
CASE "性処理：後"
	;口上を書いた場合はRETURN 0を消してください
	RETURN 0
	;避孕套を使う場合
	IF TEQUIP:PLAYER:避孕套
		PRINTFORMW
	ELSE
		PRINTFORMW
	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 「……今天很主动呢、%CNAME("二人称")%」
		ELSEIF COND("易出汗", MASTER) && ABL:0 <= 5
			PRINTFORMW 「真是的～……满身都是汗别抱过来呀～」
			IF COND("易出汗") && TALENT:相思相愛
				PRINTFORMW 「%CNAME("一人称")%和我一呢」
				PRINTFORMW %CALLNAME:TARGET%温柔的笑着%CALLNAME:MASTER%抱了过来
				PRINTFORMW 好热……
			ELSE
				PRINTFORMW 「是、拿你没办法。来、别动。给你擦擦汗」
			ENDIF
		ELSE
			;你に先に打招呼をされた
			IF CFLAG:打招呼した == 0
				PRINTFORMW 「%GREETING%嗯！」
				PRINTFORMW 「……%CNAME("二人称")%和我打招呼了呢」
			ELSE
				PRINTFORMW 「%GREETING%嗯」
				PRINTFORMW %CALLNAME:TARGET%、笑嘻嘻的从后面抱了上来。
			ENDIF
		ENDIF
	CASE "打招呼接吻"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「嗯、嗯嗯…………%GREETING%」
			PRINTFORMW 「真是的……不知道是開心还是害羞……」
			PRINTFORMW %CALLNAME:TARGET%满脸通红、向%CALLNAME:MASTER%的脸颊上回亲了一下。
		ELSE
			;你に先に打招呼をされた
			IF CFLAG:打招呼した == 0
				PRINTFORMW 「是的、%GREETING%」
				PRINTFORMW 「…………」
				PRINTFORMW 「……再来一次、可以……吧？」
				PRINTFORMW %CALLNAME:TARGET%は我慢できなくなったのか、%CALLNAME:MASTER%の唇を奪ってきた……
			ELSE
				PRINTFORMW 「%GREETING%♪」
				PRINTFORMW %CALLNAME:TARGET%、笑嘻嘻的再次打招呼。
			ENDIF
		ENDIF
	CASE "打招呼口交", "打招呼舐陰"
		IF TALENT:淫核 || TALENT:淫乱 || TALENT:恋慕
			;初めて
			IF DEVENT(STR:日常イベント名) == 0
				PRINTFORMW 「%CNAME("二人称")%真的是没节操啊……♪」
				PRINTFORMW 「打招呼～とか言い的同时、本当は%CNAME("一人称")%のえっちなココを舐めたいだけなんじゃない？」
				PRINTFORMW %CALLNAME:TARGET%は%CALLNAME:MASTER%露出小恶魔般的笑容……
			ELSE
				PRINTFORMW 「%CNAME("二人称")%真的是没节操啊……♪」
				PRINTFORMW 「打招呼～とか言い的同时、本当は%CNAME("一人称")%のえっちなココを舐めたいだけなんじゃない？」
				PRINTFORMW %CALLNAME:TARGET%は%CALLNAME:MASTER%露出小恶魔般的笑容……
			ENDIF
		;初めて
		ELSEIF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「%CNAME("二人称")%……那个、再怎么说把这个当作打招呼不太好吧？」
			PRINTFORMW 「其他的人也会进来的哦？」
			PRINTFORMW %CALLNAME:TARGET%忘记打招呼向%CALLNAME:MASTER%轻声说到。
		ELSE
			PRINTFORMW 「%CNAME("二人称")%真是无节操啊……」
			PRINTFORMW 「被别人看到的话、打算怎么办？」
			PRINTFORMW %CALLNAME:TARGET%并没有抵抗、但不是很感兴趣的样子。
		ENDIF
	CASEELSE
	;你に先に打招呼をされた
	IF CFLAG:打招呼した == 0
		IF RAND:3 == 0 && TALENT:恋慕
			PRINTFORMW 「%CNAME("二人称")%、%GREETING%♪」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「%GREETING%。」
		ELSE
			PRINTFORMW 「%GREETING%！」
		ENDIF
	ELSE
		IF TALENT:恋慕
			PRINTFORMW 「%GREETING%、%CNAME("二人称")%♪」
		ELSE
			PRINTFORMW 「%CNAME("二人称")%、%GREETING%」
		ENDIF
	ENDIF
ENDSELECT
CASE "叫醒"
	PRINTFORMW 「嗯嗯……嗯、欸……早上了……？」
;酔った際に眠くなって自分的房間に返回際のセリフ
CASE "眠い"
	PRINTFORMW 「哇……嗯、有点了……先、会房间了哦。」
;全裸終了の際のセリフ
CASE "服を着た"
	PRINTFORMW
;暑かったり躁动难忍してたり酔っぱらってたりで内衣姿变成了際のセリフ
CASE "薄着变成了"
	PRINTFORMW 「呜呜呜、好热……」
;易出汗状態の際に裙の中に扇風機の風を当てた際のセリフ。[粗野]or[開朗]or[小悪魔]限定
CASE "股間に扇風機"
	PRINTFORMW
CASE "Talk"
	SELECTCASE STR:日常イベント名
	CASE "夸奖", "夸奖点心"
		PRINTFORML 「就算夸我、也不会有好处哦？」
		PRINTFORML ……虽嘴上这样说、%CALLNAME:TARGET%表现得很開心。
	CASE "甜言蜜语"
		IF TALENT:恋慕
			CALL PRINT_STR, @" 「……開心。%CNAME("一人称")%も……_HH_」_W"
		ELSEIF CALCF("甜言蜜语成功")
			PRINTFORMW 「%CNAME("二人称")%、这种话在别人面前对%CNAME("一人称")%说啊……」
			PRINTFORMW 「但是……很開心。谢谢你、%CNAME("二人称", "かな")%」
		ELSE
			PRINTFORMW 「%CNAME("二人称")%、这种话在别人面前对%CNAME("一人称")%说啊……」
		ENDIF
	CASEELSE
		IF RAND:3 == 0
			PRINTFORMW 「呐呐、メンゴスティーニ的新刊看了吗？（可能是教材）」
			PRINTFORMW 「『%TEXTR("周刊 钢之伪娘/周刊 初心者也能做的可爱刺绣/周刊 歴史美術品/周刊 世界海军收藏手册")%』！」
			PRINTFORMW 「这周的%TEXTR("非常有趣啊～～/很充实的内容/好想推荐给别人啊")%！」
		ELSEIF RAND:2
			PRINTFORMW 好像正在看书。
			PRINTFORMW 书的标题是『%TEXTR("周刊 今天開始做伪娘/初心者也能做到的化妆/ポ流行茶品鉴/Challenged Vivid")%』的书。
		ELSE
			PRINTFORMW 「今天放学、要去哪里？」
			PRINTFORMW 「%TEXTR("去甜品店寻找新品甜点/去内衣店挑选新内衣/去书店买杂志/不要绕道直接回家")%吧……」
		ENDIF
	ENDSELECT

CASE "拭汗"
	PRINTFORMW 「嗯、好。没関系。」
	PRINTFORMW ……汗を拭き取られている最中の%CALLNAME:TARGET%がどことなく色っぽくて、つい視線を向けてしまった。
CASE "淋浴独り言"
		IF COND("躁动难忍") && ABL:自慰中毒 >= 3 && COND("欲求不満") >= 2
			CALL PRINT_STRW, @"「哈啊…_HH_ 嗯、啊阿_HH_」"
			CALL PRINT_STRW, @"「好舒、舒服……_HH_」"
			CALL PRINT_STRW, @"「嗯_HH_ 哈啊……、啊……啊啊_HH_」"
			BASE:欲求不満 = 0
	ELSE
		PRINTFORMW 「嗯~呼嗯~嗯哼~♪」
	ENDIF
CASE "淋浴"
	;実は内衣を漁ったのに気づかれています
	IF COND("淋浴：内衣漁りバレ")
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
CASE "淋浴後换装"
	;初めて
	IF DEVENT(STR:日常イベント名) == 0
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF

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

;睡眠中の悪戯
CASE "趁睡袭击"
	;梦话
	CALL KOJO_SLEEP_K55
	WAIT
CASE "互动"
	SELECTCASE STR:日常イベント名
	CASE "露出胖次"
		IF CHOSE_DEVENT(STR:日常イベント名) == 0
			CALL EMOTION_PLUS, "△/害羞"
			PRINTFORMW 「……うわぁっ！？ な、何してるのぉ……？」
			PRINTFORMW %CALLNAME:TARGET%に露出胖次と頬を赤くして隠すように、と言ってきた……
		ELSEIF TALENT:恋慕
			CALL EMOTION_PLUS, "害羞/对话框爱心/微笑２"
			CALL PRINT_STRW, @"「……その気だよって取っても良いんだね_HH_」"
		ELSEIF CFLAG:好感度 >= 1500
			CALL EMOTION_PLUS, "害羞"
			CALL PRINT_STRW, @" 「……%CNAME("二人称")%のえっち……_／／／_」"
		ELSE
			CALL EMOTION_PLUS, "△/害羞"
			CALL PRINT_STRW, @"「……もー……_／／／_」"
		ENDIF
	CASE "托一托胸部"
		PRINTFORMW
	CASE "按摩"
		PRINTFORMW
	CASE "接吻"
		IF CSTR:PREV_DAILYCOM == STR:日常イベント名
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	CASE "膝枕"
		PRINTFORMW
	CASE "泡茶"
		PRINTFORMW
	;CALL SET_CEVENT, "飲酒拒否"でお酒を飲まないようにできる。
	;このフラグはCALL DEL_CEVENT, "飲酒拒否"で消すことができる
	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
	CASE "摸頭"
		PRINTFORMW
	CASEELSE
		PRINTFORMW
	ENDSELECT
CASE "整理睡姿"
	;梦话
	CALL KOJO_SLEEP_K55
	WAIT
CASE "卖个破绽"
	SELECTCASE STR:日常イベント名
	CASE "邀请一起入浴"
		PRINTFORMW
	CASE "Ｈ的邀请"
		PRINTFORMW
	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
			PRINTFORMW 「……呜呜……诶、什么都没做哦？」
		ENDIF
	;廁所に行く際の台詞
	ELSE
		PRINTFORMW 「等、我稍微去摘一下花……！」
	ENDIF
CASE "廁所詮索"
	PRINTFORMW
;これは你と角色が両方男性の際に限り起きます
CASE "連れション"
	PRINTFORMW
;これは你と角色が両方男性でない際に限り起きます
CASE "廁所で井戸端会議"
	PRINTFORMW
;你に廁所を覗かれた！
CASE "廁所ハプニング"
	PRINTFORMW 「等、%CNAME("二人称")%！？」
;廁所ハプニングから派生するＨイベント
CASE "廁所Ｈ"
	SELECTCASE STR:日常イベント名
	CASE "廁所イベント：見せつけくぱぁ"
		PRINTFORMW
	CASE "廁所イベント：相互自慰"
		PRINTFORMW 「在这里做、要看着 哦……♪」
	CASE "廁所イベント：口交"
		CALL PRINT_STR, @"「变大了……_HH_」_W"
		CALL PRINT_STR, @"「在这里做吧……_HH_」_W"
	CASE "廁所イベント：Ｖ性交"
		CALL PRINT_STR, @"「躁动停不下来……_HH_」_W"
		CALL PRINT_STR, @"「在这里、H吧……_HH_」_W"
	CASE "廁所イベント：Ａ性交"
		CALL PRINT_STR, @"「躁动停不下来……_HH_」_W"
		CALL PRINT_STR, @"「在这里用后面、H吧……_HH_」_W"
	ENDSELECT
CASE "检查阴部"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K55
		WAIT
	ELSEIF COND("合意：检查阴部") == 0
		PRINTFORMW 「嗯、那里不可以……」
		PRINTFORMW %CALLNAME:TARGET%はやや声を荒げて止めてきた…
	ELSE
		IF RAND:2
			PRINTFORMW 「……就一会会哦？」
			PRINTFORMW 把他带到死角、仔细的欣赏了……
		ELSE
			PRINTFORML 「欸、那个……」
			PRINTFORMW 「%CNAME("一人称")%的看了也不会有趣、哦？」
		ENDIF
	ENDIF
CASE "检查菊穴"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K55
		WAIT
	ELSE
		PRINTFORMW
	ENDIF
CASE "检查内褲"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K55
		WAIT
	ELSEIF COND("合意：检查内褲") == 0
		PRINTFORMW 「欸、你在说什么……？」
		PRINTFORMW %CALLNAME:TARGET%带着呆呆的表情。
	ELSE
		PRINTFORMW 「……请不要死死的盯着我哦？」
	ENDIF
CASE "撫摸股間"
	PRINTFORMW
CASE "检查布鲁马", "股間観察"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K55
		WAIT
	;じっくり観察
	ELSEIF CFLAG:股間確認済
		PRINTFORMW (额呜呜、被%CNAME("二人称")%看到了……)
	ELSE
		PRINTFORMW 「……不要一直看啊？」
		PRINTFORMW 这样说着%CALLNAME:TARGET%的脸被染成绯红……
	ENDIF

CASE "掀起裙子"
	SELECTCASE STR:日常イベント名
	CASE "撩起裙子"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「%CNAME("二人称")%……这么想看裙底吗？」
		;胖次チラ直後
		ELSEIF COND("胖次チラ直後")
			PRINTFORMW
		ELSE
			PRINTFORMW (被%CNAME("二人称")%看到了……)
		ENDIF
	;掀起裙子
	CASEELSE
		;刚睡醒の胡乱な状態を襲う
		IF CFLAG:刚睡醒
			PRINTFORMW 「哇……唔……%CNAME("二人称")%…… ……！？」
		;睡眠中の悪戯
		ELSEIF CFLAG:睡眠
			;梦话
			CALL KOJO_SLEEP_K55
			WAIT
		;初めて
		ELSEIF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「欸、想看裙子里面……？」
			PRINTFORMW 「就、就看一下下哦？」
		;胖次チラ直後
		ELSEIF COND("胖次チラ直後")
			PRINTFORMW
		ELSE
			IF COND("打招呼前")
				PRINTFORMW 「欸、看到裙子里面了所以想更仔细看看……！？」
				PRINTFORMW 「就、就看一下下哦？」
			ELSE
				;胖次沒穿
				IF EQUIP:胖次 == 0
					PRINTFORMW 「……对不起%CNAME("二人称")%！现在不行！！」
					PRINTFORMW 「我是后辈呀！拜托了！！」
					PRINTFORMW ……被气势逼人的%CALLNAME:TARGET%压倒了。
				ELSE
					PRINTFORMW 「……！？ 欸！？ 现、现在不行！！」
				ENDIF
			ENDIF
		ENDIF
	ENDSELECT
CASE "胖次ドーピング"
	;初回
	IF DEVENT(ARGS) == 0
		;自分の胖次
		IF COND("胖次ドーピング")
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ELSE
		PRINTFORMW
	ENDIF
CASE "Ｈ的約定"
;この角色自身が前回赤点で、それどころではない（学生以外は、この分岐には来ません）
	IF COND("成績：赤点")
		PRINTFORMW 「虽然很想答应你……%CNAME("一人称")%的成绩实在是……」
		PRINTFORMW 「……和%CNAME("一人称")%一起学习吗？」
		TFLAG:取引拒否 = 1
	;以下はご褒美を给事にＯＫして给
	ELSE
		;前回既に你が良い点を取っている場合には”学年上位”を要求します
		IF COND("成績：優秀", MASTER)
			PRINTFORMW 「那个、%CNAME("二人称")%の的成绩……」
			PRINTFORMW 「要约定的话目标年纪前排啊至少」
		;そうでない場合には平均点を結構上回る程度でＯＫです
		ELSE
			PRINTFORMW 「那、%CNAME("二人称")%取得平均点以上的话……吧」
			PRINTFORMW 「頑張ってね」
		ENDIF
	ENDIF
CASE "邀请学习"
	IF RAND:100 >= 90 || TALENT:恋慕
		PRINTFORMW 「像这样学习、其实很憧憬的」
	ELSEIF RAND:100 >= 60 && RAND:100 <= 90
		PRINTFORMW 「哈啊、稍微休息一下吧？」
		PRINTFORMW 「……最近总是做你那边的事情、我这边就有些……」
	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 "口交"
				CALL PRINT_STRW, @"「用嘴来做就可以吧……_HH_」"
		CASE "乳交"
				CALL PRINT_STRW, @"「想用胸部来做吗？可以哦_HH_」"
		CASE "Ｖ性交"
				PRINTFORMW 「……这、在这里做吧……？」
				CALL PRINT_STRW, @"「……那个……拿出真本事的话、就原谅你……_HH_」"
		CASE "Ａ性交"
				CALL PRINT_STRW, @"「……用后面好一点呢_BH_」"
				CALL PRINT_STRW, @"「好不容易要做、一起变的舒服吧_HH_」"
		CASE "尿道性交", "乳頭奸"
				CALL PRINT_STRW, @"「……一般不是在看不见的地方处理吗……_BH_ _BH_」"
				CALL PRINT_STRW, @"「……变态_BH__BH_」"
		ENDSELECT
	;何かしながらで良いならして给よって場合。何をしながらなのかは SAVESTR:夢中 で参照できる。
	ELSEIF COND("进行性処理")
		SELECTCASE STR:PLAY内容
		CASE "手淫", "Ｖ性交", "Ａ性交",  "尿道性交"
			PRINTFORMW 「欸、……明明在%SAVESTR:夢中%刚到好舒服的时候」
			PRINTFORMW 「这样也可以的话……」
			PRINTFORMW 打扰集中注意力的状态、%CALLNAME:TARGET%稍微有点生气。
		ENDSELECT
	ENDIF
CASE "拜托処理性欲"
	SELECTCASE NAMES("性処理")
		CASE "口交", "乳交"
			CALL PRINT_STRW, @"「舒畅了吗_HH_」"
			CALL PRINT_STRW, @"「会再让你舒服哦_HH__HH_」"
		CASE "Ｖ性交", "Ａ性交"
			CALL PRINT_STRW, @"「……哈呼……_WH_」"
			CALL PRINT_STRW, @"「……再来邀请我哦_WH_」"
		CASE "尿道性交", "乳頭奸"
			CALL PRINT_STRW, @"「……变态老师、很舒服吗？」"
			CALL PRINT_STRW, @"「为什么……_BH_ _BH_ 真坏心眼」"
			CALL PRINT_STRW, @"「……但是变态_BH__BH_ 这样想是真的哦」"
	ENDSELECT
CASE "进行性処理"
	SELECTCASE NAMES("性処理")
		CASE "手淫", "Ｖ性交", "Ａ性交",  "尿道性交"
			PRINTFORMW 虽然性处理结束了、但是好像得罪%CALLNAME:TARGET%了一样、现在不太好搭话。
			PRINTFORMW 以后要注意点比较好。
	ENDSELECT

;TFLAG:指令中止 = 1 とすることで口上側から性欲解消を拒否できる
;STR:PLAY要望 が本来したいPLAY。STR:PLAY内容 が你がやりたいと言って交渉中のPLAY
;ここの中で STR:PLAY内容 を変更する事で提案を蹴る事も出来る。什麼也不做場合は你の提案が通る
CASE "性欲解消を申し出た際の反応"
	SELECTCASE STR:PLAY要望
	CASE "舐陰"
		CALL PRINT_STRW, @"「那个、……女性的那里、想……舔舔啊_HH_」"
	CASE "舐陰莖"
			CALL PRINT_STRW, @"「下面、想被舔啊……_BH_」"
	CASE "Ｖ性交"
		;避孕套没有の生性交を希望
		IF COND("女性主導生性交")
			CALL PRINT_STRW, @"「今天、想无套的啪啪啪啪呀……_BH_」"
		ELSE
			CALL PRINT_STRW, @"「今天、想无套的做的说……_BH_」"
		ENDIF
	CASE "Ａ性交"
			CALL PRINT_STRW, @"「今天、想无套用后面做啊……_BH_」"
	CASE "Ｖ性交する"
			PRINTFORMW 「啊、那个……这个对%CNAME("一人称")%来说非常羞耻」
		IF TALENT:相思相愛 && RAND:2
			PRINTFORMW 「%CNAME("二人称")%、%CNAME("一人称")%的小宝宝……那个……」
			PRINTFORMW 「想、生小宝宝啊」
			PRINTFORMW (啊阿……说出来了……)
		ELSE
			PRINTFORMW 「%CNAME("二人称")%不用套套来%TEXTR("做爱/性交")%就好了啊……」
			PRINTFORMW 「……是梦对吧？」
		ENDIF
	ENDSELECT
CASE "性欲解消の内容変更を頼んだ際の反応"
	SELECTCASE STR:PLAY内容
	CASE "舐陰", "舐陰莖"
		CALL PRINT_STRW, @"「为我侍奉吗？」"
		CALL PRINT_STRW, @"「那次去你那边吧_BH_」"
	CASE "Ｖ性交"
		;今日は避孕套没有の生性交がＯＫな日
		IF COND("女性主導生性交")
			CALL PRINT_STRW, @"「欸！？ _HH__HH__HH_ 做也可以吗！？」"
			CALL PRINT_STRW, @"「谢谢你……_HH__HH_」"
		ELSE
			CALL PRINT_STRW, @"「……诶！？ 无套也可以吗！？」"
			CALL PRINT_STRW, @"「谢谢你_HH_」"
		ENDIF
	CASE "Ａ性交"
			CALL PRINT_STRW, @"「用后面做吗？」"
			CALL PRINT_STRW, @"「可以_HH_ 我也想用后面做_HH_」"
	CASE "尿道性交"
		TFLAG:指令中止 = 1
		PRINTFORMW 「欸、那个……有一点……」
	CASE "Ｖ性交する"
		PRINTFORMW 「欸、欸、欸欸欸！？」
		PRINTFORMW 「啊、等等、这是……」
		IF TALENT:相思相愛 && RAND:100 >= 80
			PRINTFORMW 「……这份心意、我会好好珍惜的」
			PRINTFORMW 「%CNAME("二人称")%不用套套来%TEXTR("做爱/性交")%就好了啊……」
			PRINTFORMW 「……要对我负责哦」
		ELSE
			PRINTFORMW 「%CNAME("二人称")%、%CNAME("一人称")%的孩子……那个……」
			PRINTFORMW 「妊娠……可能会怀孕哦？」
			TFLAG:指令中止 = 1
		ENDIF
	ENDSELECT
;性欲解消PLAY後の台詞
CASE "帮忙消除性欲"
	SELECTCASE NAMES("性処理")
	CASE "舐陰"

	CASE "舐陰莖"

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

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

	CASE "Ａ性交"

			ENDSELECT
		ENDIF
	ENDSELECT

CASE "お昼ご飯のお誘い"
	PRINTFORMW ……看起来是SNS的来信。
	PRINTFORMW 『是紬希哟』
	IF TALENT:恋慕
		PRINTFORMW 『%CNAME("二称")%、今天中午一起吃午饭吗？』
		PRINTFORMW 『……不快点过来就生气了哦』
		PRINTFORMW どこでそんな言い方を覚えたのだろう。彼……いや、彼女は積極的にこういうことを言う領帯プではないし。
		IF FIND_COND("助手", "弗理希艾尔", "麦莉爱娜", "南実")
			PRINTFORMW ……那么、到%CALLNAME:ASSI%那里吧。
		ELSE
			PRINTFORMW ……那么、到同班同学那里吧。
		ENDIF
	ELSEIF CEVENT("初お昼") == 0
		PRINTFORMW 『如果%CNAME("二人称")%可以的话、一起吃午饭吧？』
		PRINTFORMW 看来是%CALLNAME:TARGET%的样子。
		PRINTFORMW ……虽然在社团外见到也不是不開心、那么怎么办好呢……
	ELSE
		PRINTFORMW 『如果%CNAME("二人称")%可以的话、来一起吃午饭吧？』
		PRINTFORMW 虽然很平淡、邀请别人吃午饭也就是这样。
		PRINTFORMW ……总而言之、%CALLNAME:TARGET%有着出众的外貌和性格(暗地里的)人气很高。
		PRINTFORMW 要是把她(他)、连同社团活动之外的时间也独占……的话。这样想的人也不是没有。
		PRINTFORMW 那么、怎么办好……
	ENDIF
;実際に二人昼食をとっている時です
CASE "一緒にお昼ご飯"
	IF CEVENT("初お昼") == 0
			PRINTFORMW 「午饭、吃什么已经决定好了吗？」
			PRINTFORMW 「记得日替菜单%TEXTR("炸鸡块/盐烤青花鱼/照烧鸡肉/汉堡牛肉饼")%的样子」
			PRINTFORMW 「%CNAME("一人称")%？%CNAME("一人称")%啊……照烧汉堡肉午餐套餐和凯撒沙拉。」
			SIF FIND_COND("百合香")
			PRINTFORMW 看着熟练点餐的%CALLNAME:TARGET%、是不是和百合香一样很少自己做便当呢……
			PRINTFORMW 印象中会吃女子力很高的料理……出乎意料的%CALLNAME:TARGET%吃的是热量很高的料理……
			PRINTFORML
			PRINTFORMW 「……一脸出乎意料的表情呢」
			PRINTFORMW 『我印象中是会吃一些女子力更高的料理啊』
			PRINTFORMW ……结果得到了出乎意料的答案。
			PRINTFORMW 「……不说社团活动、……不好好吃东西的话体力、会跟不上吧？」
			PRINTFORMW 「还要学习、所以想着要多吃一点……」
			PRINTFORMW ……怎么说呢……像是%CALLNAME:TARGET%会说的、朴素的理由呢……
			CALL SET_CEVENT, "初お昼"
	ELSEIF TALENT:恋慕
		PRINTFORMW 「今日の日替わり定食は%TEXTR("唐油炸/鯖の塩焼き/鳥の照り焼き/漢堡肉")%定食か～」
		IF RAND:3 == 0 && CEVENT("初お昼") == 1
			PRINTFORMW 「%CNAME("一人称")%？ %CNAME("一人称")%有考虑营养平衡吗？」
			PRINTFORMW 「欸、……吃饭前没有说吗？」
			PRINTFORMW 「今天是%TEXTR("照烧汉堡肉午餐/盐烤时令鱼/姜汁烤肉/混合油炸")%定食、一起吃吧？」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「说起来、%CNAME("二人称")%吃炸鸡的时候会加柠檬吗？」
			PRINTFORMW 「%CNAME("一人称")%吃炸鸡的时候会加柠檬吗？还是看心情！」
		ELSE
			PRINTFORMW 「%CNAME("一人称")%想好好吃的时候？」
			PRINTFORMW 「%CNAME("一人称")%想好好吃的时候会选注重热量的套餐吧」
			PRINTFORMW 「……脸上写着与女子力无缘的表情呢」
			PRINTFORMW 「今天是%TEXTR("炸鸡块/耐力饮料/饺子/鸡肉牛排/韭菜雞肝")%套餐、一起吃吗？」
		ENDIF
	ELSE
			IF RAND:2
				PRINTFORMW 「记得日替菜单%TEXTR("炸鸡块/盐烤青花鱼/照烧鸡肉/汉堡牛肉饼")%的样子」
				PRINTFORMW 「每日套餐和常规套餐都是可以的吧。」
			ELSE
				PRINTFORMW 「欸、%CNAME("一人称")%和我吃的一样吗？」
				PRINTFORMW 「那就选%TEXTR("照烧马汉堡套餐/时令鱼盐烤/生姜烧/混合油炸食品")%套餐吧。」
		ENDIF
	ENDIF
ENDSELECT

;-------------------------------------------------
;自撮りにメッセージを添えます　一言くらい
;加筆の際には RETURN 0 を消去し、MAIL_BODY を埋めて使ってください
;地の文も必要であれば適宜変更してください
;-------------------------------------------------
@SELFY_MAIL_K55, ARGS
#DIMS MAIL_BODY
MAIL_BODY =
;メッセージ本文
SELECTCASE ARGS
CASE "ヌード自撮り"
	IF RAND:5 == 0 && TALENT:恋慕 && CEVENT("エンディング閲覧済み")
		MAIL_BODY = %CNAME("一人称")%羞耻的地方、好好的看着哦……♪
	ELSEIF RAND:4 == 0 && TALENT:恋慕
		MAIL_BODY = %CNAME("一人称")%的原本的样子、看着哦
	ELSEIF RAND:3 == 0 && CEVENT("My wish is...") > 0
		MAIL_BODY = 如果拍到皮肤上有在意的地方要告诉我哦
	ELSEIF RAND:2 == 0
		MAIL_BODY =如果你能够喜欢就好了……
	ELSE
		MAIL_BODY = 可以的话、那个……当作晚上的配菜吧
	ENDIF
CASE "阴部自撮り", "阴茎自撮り"
	IF RAND:4 == 0 && CEVENT("My wish is...")
		MAIL_BODY = 如果是其他人的话或许会生气呢♪
	ELSEIF RAND:3 == 0 && TALENT:恋慕
		MAIL_BODY = %CNAME("一人称")%羞耻的部位、不留余地的看吧……♪
	ELSEIF RAND:2 == 0
		MAIL_BODY = 虽然很害羞、那个、要拍的……好看哦……♪
	ELSE
		MAIL_BODY = 这样的、会喜欢吗……吧
	ENDIF
CASE "今年の泳装自撮り"
	IF RAND:5 == 0 && TALENT:恋慕
		MAIL_BODY = 泳装、拍的可爱点就好了
	ELSEIF RAND:4 && CEVENT("My wish is...")
		MAIL_BODY = 可以的话、当作晚上的配菜吧
	ELSEIF RAND:3
		MAIL_BODY = 今年的泳衣想摆这种姿势呢
	ELSEIF RAND:2
		MAIL_BODY = 拍了今年的泳装照、怎么样？
	ELSE
		MAIL_BODY = 今年穿这个很開心♪
	ENDIF
CASE "学校指定の泳装自撮り"
	IF RAND:4 == 0 && CEVENT("My wish is...")
		MAIL_BODY = 泳装的身体曲线什么的、好好看着哦♪
	ELSEIF RAND:3 == 0
		MAIL_BODY = 学校的泳衣、适合我吗？
	ELSEIF RAND:2 == 0
		MAIL_BODY = 拍了学校泳衣哦。会心动吗？
	ELSE
		MAIL_BODY = 这样拍的话、又不一样呢
	ENDIF
CASE "体操服自撮り"
	IF RAND:4 == 0 && CEVENT("My wish is...")
		MAIL_BODY = 下面的勒痕什么的、看着哦……♪
	ELSEIF RAND:3 == 0
		MAIL_BODY = 体操服、适合我吗？
	ELSEIF RAND:2 == 0
		MAIL_BODY = 拍了学校的体操服。怎么样？
	ELSE
		MAIL_BODY = 这样拍的话、又不一样呢
	ENDIF
CASE "胸罩自撮り" ,"胖次自撮り"
	IF RAND:5 == 0 && TALENT:恋慕
		MAIL_BODY = 拍的可爱会很開心的
	ELSEIF RAND:4 == 0 && CEVENT("My wish is...")
		MAIL_BODY = 可以的话、当作晚上的配菜吧
	ELSEIF RAND:3 == 0
		MAIL_BODY = 肉的勒痕什么的、看到了吗……♪
	ELSEIF RAND:2 == 0
		MAIL_BODY = 这个内衣、适合我吗？
	ELSE
		MAIL_BODY = 这样拍的话、感觉又不一样呢
	ENDIF
CASEELSE
	IF RAND:3 == 0
		MAIL_BODY = 拍的可爱点就好了
	ELSEIF RAND:2
		MAIL_BODY = 之后告诉我感想哦！
	ELSE
		MAIL_BODY = 这个、合适吗
	ENDIF
ENDSELECT

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

SELECTCASE ARGS
;你を週末约会に誘った
CASE "约会のお誘い"
	PRINTFORMW 「这么突然对不起。这周末……有时间吗？」
	PRINTFORMW 「那个……%CNAME("二人称")%想出去玩啊……什么的」
CASE "约会のお誘い：結果"
	;约会決定！
	;自発的に约会の做便当给よ！って場合はCALL SET_CEVENT, "约会の便当"としてください。
	IF COND("约会的约定")
		PRINTFORMW 「谢谢你！我会好好期待的！」
	;你に保留されてしまった
	ELSE
		PRINTFORMW 「是呢、%CNAME("二人称")%也有自己的安排呢」
		PRINTFORMW 「不行的话下一次、一定要邀请我哦」
	ENDIF
;你から週末约会に誘われた
;自発的に约会の做便当给よ！って場合はCALL SET_CEVENT, "约会の便当"としてください。
CASE "约会に誘われた"
	PRINTFORMW 「谢谢你！我会好好期待的！」
;你から约会当日にいきなり誘われた
;自発的に约会の做便当给よ！って場合はCALL SET_CEVENT, "约会の便当"としてください。
CASE "邀请去约会"
	;同居していない相手を誘った時
	IF COND("同居中") == 0
		PRINTFORMW 「欸、可以吗！？」
		PRINTFORMW 「我回去的、要在哪里集合呢」
	ELSE
		PRINTFORMW 「欸、可以吗！？」
		PRINTFORMW 「那、我们一起去吧！」
	ENDIF

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

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

;地の文が用意されているので、轻轻地１行程度の反応で良いと思います
CASE "约会本番"
	SELECTCASE SAVESTR:约会
	CASE "去买泳衣"
		PRINTFORMW 「今年的泳装、选什么样的好呢？」
	CASE "散歩"
		PRINTFORMW 「散步约会真好啊。平常不会走的路、好期待」
	CASE "尋訪美食"
	IF TALENT:恋慕 >= 1
		PRINTFORMW 「发福……有的时候、也不错呢♪」
	ELSE
		PRINTFORMW 「边走边吃的话、选什么呢……？」
	ENDIF
	CASE "逛街"
		PRINTFORMW 「我不怎么逛街、好多东西看不过来了」
	CASE "去水族馆"
		PRINTFORMW 「水族館！想看海豚表演啊！」
	CASE "去游乐园"
		PRINTFORMW 「游乐园比起观览车我更喜欢旋转木马啊」
	CASE "去电影院"
		PRINTFORMW 「今天看什么电影？」
	CASE "去图书馆"
		PRINTFORMW 「读书！不错呢。赶紧去找一本吧！」
	CASE "赏花"
		PRINTFORMW 「赏花！不错啊～！」
		PRINTFORMW 「和大家一起也不错不过两个也很開心呢」
	CASE "去游泳"
		PRINTFORMW 「要去游泳吗？期待～！」
	CASE "爬山"
		PRINTFORMW 「登山一日游？好呀～！」
	CASE "赏红叶"
		PRINTFORMW 「赏红叶！感觉风会很舒服！」
	CASE "滑雪"
		PRINTFORMW 「我不太会滑……要牵着我哦」
	CASEELSE
		PRINTFORMW 「嗯、走吧～！！」
	ENDSELECT

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

CASE "手をつなぐ"
	IF TALENT:相思相愛 && CEVENT("エンディング閲覧済み")
		CALL PRINT_STRW, @"「……哈……_HH_」"
	ELSEIF TALENT:恋慕 == 0 && CFLAG:6500 >= 10
		CALL PRINT_STRW, @"「啊阿……_HH_」"
	ELSE
		PRINTFORMW 「……只有这一次哦」
	ENDIF
CASE "手をつながない"
	IF TALENT:相思相愛 && CEVENT("エンディング閲覧済み")
		CALL PRINT_STRW, @"「……不牵手、这样也可以……_HH_」"
	ELSEIF TALENT:恋慕 == 0 && CFLAG:6500 <= 10
		PRINTFORMW 「……这样、真不错啊」
	ELSE

	ENDIF
;泳装を買いに行った時です
CASE "泳装選び開始"
	;Micro比基尼とかもＯＫ
	IF TALENT:恋慕 && CEVENT("My wish is...") && COND("Ｈ的泳装選択可能") && RAND:2
		CALL PRINT_STRW, @"「……色色的款式、也可以选哦……_HH_」"
	ELSEIF RAND:2
		PRINTFORMW 「选什么样的泳装呢？」
	ELSE
		PRINTFORMW 「今年要选最好的哦」
	ENDIF
;泳装を買いに行って、結果的に選んだ泳装に対するセリフです
;もしも去年も泳装を選んでいたなら、CSTR:今年の泳装 に記録されているので比較する事が出来る
CASE "泳装決定"
	SELECTCASE SWIM(STR:選んだ泳装, "種類")
	CASE "Micro比基尼"
		PRINTFORMW 「有些在意布料的面积……」
	SIF TALENT:男性
		PRINTFORMW 「……本来比基尼布料就很少了、微型的可能……有点」
	CASE "比基尼"
		PRINTFORMW 「感觉很不错呢。经典款式」
		PRINTFORMW 「只是、每年都会在一赘肉什么的……」
	SIF TALENT:男性
		PRINTFORMW 「比微型比基尼要好一些……疏忽大意的话会出大问题」
	CASE "競泳泳装"
		PRINTFORMW 「因为贴身很紧所以身体曲线也容易展示出来呢」
		PRINTFORMW 「校外没什么穿的机会蛮新鲜的」
	IF TALENT:男性
		PRINTFORMW 「欸等等、这个下面会不会太明显了？」
		CALL PRINT_STR, @"「赘肉确实看不出来了但这种还是希望能放过我啊 _／／／_」"
	ENDIF
	CASE "高開衩連衣裙"
		PRINTFORMW 「嗯、呜嗯~……%CNAME("二人称")%这种可能不太喜欢……的样子」
	CASE "連体泳装"
		PRINTFORMW 「这种类型最可爱的真好啊」
		PRINTFORMW 「要穿的话可能会选这个」
	SIF TALENT:男性
		CALL PRINT_STR, @"「那个、那里也能好好遮住……喜欢 _HH_」"
	;其他はだいたいエロ泳装です
	CASEELSE
		PRINTFORMW 「这是……诶、泳装……？」
		PRINTFORMW 「是泳衣吧？」
		SIF CEVENT("My wish is...") && COND("Ｈ的泳装選択可能")
		PRINTFORMW 「虽然我说可以让%CNAME("一人称")%来选……」
	ENDSELECT

;泳池などで泳装姿に着替え、待ち合わせ場所に集合した時です
CASE "泳装に着替えた"
	;どの泳装に着替えたか？
	SELECTCASE SWIM(CSTR:今年の泳装, "種類")
	CASE "比基尼", "連体泳装", "競泳泳装"
		PRINTFORMW 「久等了」
		PRINTFORMW 「怎么用、合适我吗？」
	CASE "Micro比基尼"
		PRINTFORMW 「……换好了」
		SIF TALENT:男性
		PRINTFORMW 「重要的地方隐隐约约露出来其实不想穿的……」
	;其他はだいたいエロ泳装です
	CASEELSE
		PRINTFORMW 「这基本上只是绳子啊」
		SIF TALENT:男性
		PRINTFORMW 「%CNAME("二人称")%的下面完全看得到啊……笨蛋……」
	ENDSELECT

;草丛口交です。地の文が用意されているので、轻轻地１行程度の反応でも良いと思います
CASE "到暗处去……", "请求偷偷手交"
SIF TALENT:恋慕 && CEVENT("My wish is...")
	CALL PRINT_STRW, @"「……想放弃了？_BH_」"
CASE "接吻"
SIF TALENT:恋慕 && CEVENT("My wish is...")
	CALL PRINT_STRW, @"「咿呀_BH_ ……真是的……_HH__HH_」"
CASE "摸屁股"
SIF TALENT:恋慕 && CEVENT("My wish is...")
	CALL PRINT_STRW, @"「咿呀_BH_ ……要放弃了吗？ _BH_」"
;你が草丛口交や接吻や性騷擾をしない紳士な場合はここに来ます
CASE "下次去哪里呢？询问", "专心看电影"

	;地の文を自己書きたい場合にはコメントアウトを外してください
	;TFLAG:地の文スキップ = 1
;帰り際のセリフです。不动声色地エッチに邀请のもいいでしょう
CASE "帰り際"
	IF TALENT:相思相愛 && CEVENT("エンディング閲覧済み")
		PRINTFORMW 「今天、真開心啊。」
		PRINTFORMW 「……%CNAME("二人称")%……旅店、要去吗？」
	ELSEIF TALENT:恋慕 && CEVENT("調教開始：恋慕") == 1
		PRINTFORMW 「今天、真開心啊。」
		PRINTFORMW 「……之后、还有空时间吗？」
	ELSE
		PRINTFORMW 「今天、真開心啊。」
		PRINTFORMW 「……%CNAME("二人称")%、下次在约会吧。」
	ENDIF
CASE "约会終了"
	;エッチをする場合
	;ここで告白された場合相思相愛でない限り阴蒂アフラグ代わりの提案が付く
	IF TFLAG:床イン
		IF TALENT:相思相愛
			PRINTFORMW 「接下来做什么好呢」
			PRINTFORMW 「……和%CNAME("二人称")%的约会期间、一直心跳不已」
		ELSEIF TALENT:恋慕 && CEVENT("調教開始：恋慕") == 1
			PRINTFORMW 「有些事情要说、耽误些时间……没问题吗？」
			CALL PRINT_SELECT, "話を聞く/話を聞かない"
			IF RESULT == 0
				CALL SET_CEVENT, "约会後に告白された：紬希"
				TALENT:相思相愛 = 1
				TALENT:MASTER:相思相愛 = 1
				CALL SET_GOUI, "危険日生性交"
				PRINTFORMW 「可以吗？……谢谢！」
				PRINTFORMW
				PRINTFORMW ・ ・ ・
				PRINTFORMW
				IF TALENT:恋慕 && CEVENT("調教開始：恋慕") == 1 && CFLAG:想イノ行方 >= 5
					PRINTFORMW %CALLNAME:TARGET%带着羞涩的笑容、从后面、紧紧的抱了上了。。
					PRINTFORML
					PRINTFORMW 「一直在想、这样就好了、那样就好了」
					PRINTFORMW 「但是%CNAME("一人称")%和我都是男性、这样是不行的……我知道的但是……」
					PRINTFORMW 「……%CNAME("一人称")%也、非常高兴」
					PRINTFORMW 「但是…… 心理准备……没那么、简单就做好」
					PRINTFORMW 相思相爱、就是指这样吧。这份感情现在才被从新认识到。
					PRINTFORMW 不知如何是好的%CALLNAME:TARGET%脸颊上留下的泪水、也就是说……
					PRINTFORMW
					PRINTFORMW 「……%CNAME("二人称","かな")%、我爱你……」
					PRINTFORMW 这么说着、%CALLNAME:TARGET%自己献上了长长的深吻久久不理。
					CFLAG:想イノ行方 += 20

				ELSEIF TALENT:恋慕 && CFLAG:想イノ行方 < 4 && CEVENT("調教開始：恋慕") == 1
					PRINTFORMW %CALLNAME:TARGET%浮现苦笑、从后面、紧紧的抱了上了。。
					PRINTFORML
					PRINTFORMW 「虽然、事到如今。……真的喜欢上我了呢」
					PRINTFORMW 「……%CNAME("一人称")%、啊」
					PRINTFORMW 「呐、喜欢%CNAME("二人称")%、还是%CNAME("一人称")%？」
					PRINTFORMW 「喜欢那边、都会很高清。……果然还是想问一下」
					PRINTFORML
					;運命の決断
						PRINTFORMW 喜欢紬希的、哪一种性别呢？
						CALL PRINT_STRW, @"黄色_※这里的选择、可能会影响之后的剧情"
						CALL PRINT_SELECT, "作为男生喜欢/紬希就是紬希/作为女生喜欢/喜欢的是身体所以无所谓"
						IF RESULT == 0
								CALL PRINT_STRW, @"黄色「是吧、果然……是、这样呢」"
								CALL PRINT_STRW, @"「……但是……有点開心、_HH_」"
								CFLAG:想イノ行方 += 5
							ELSEIF RESULT == 1
								CALL PRINT_STRW, @"「笨蛋……_HH_」"
								CALL PRINT_STRW, @"「……最喜欢你、了……_HH_"
								CALL PRINT_STRW, @"「……%CNAME("一人称")%也好、%CNAME("二人称")%也好都最喜欢、了……_HH_」"
								CFLAG:想イノ行方 += 15
							ELSEIF RESULT == 2
								CALL PRINT_STRW, @"「……谢谢你_HH_」"
								CALL PRINT_STRW, @"「……果然%CNAME("一人称")%最喜欢这样的%CNAME("二人称")%、我知道的_HH_」"
								CFLAG:想イノ行方 += 10
							ELSE
								CALL PRINT_STRW, @"赤_「是吗、……%CNAME("一人称")%现在是这样的呢……」"
								CFLAG:想イノ行方 -= 100000
						ENDIF
		ELSE
			PRINTFORMW 「约会刚结束、接下来要做的对吧、那就别想那么多了」
			PRINTFORMW 「要比以往更疼爱我哦」
		ENDIF
	ENDIF
ENDIF
ENDIF
ENDSELECT
;-------:
;Sandbox:
;-------:
;いわゆる砂場的なあれこれをするやつですよ、ってところです
;本体パッチ取り込み前のデータとかが入ってたりします。要注意。

path: ERB/EVENT_K/55 紬希/EVENT_K55_DAILY.ERB


code:
;-------------------------------------------------
;口上で使う乱数やテ接吻トを詰め込むための場所
;-------------------------------------------------
;乃々君口上の同関数をお借りしています 感謝

;精液や阴茎などについて随机で異なる名称をしゃべるようになる関数
;そのつど書くのも若干面倒なので追加
@ADANA55, 指定
#FUNCTIONS
#DIMS 名称
#DIMS 指定

SELECTCASE 指定
CASE "精液"
	名称 = %TEXTR("精液/精液/おちんぽみるく")%
CASE "阴茎"
	名称 = %TEXTR("おちんちん/おちんぽ/ちんぽ/ちんちん/陰茎")%
CASE "ヴァギナ"
	名称 = %TEXTR("膣/おまんこ/下のお口")%
CASE "阴蒂"
	名称 = %TEXTR("阴蒂/阴蒂/お豆")%
CASE "肛門"
	名称 = %TEXTR("お尻/お尻まんこ/お菊門")%
CASE "胸"
	名称 = %TEXTR("乳頭/胸部")%
CASE "尿道"
	名称 = %TEXTR("おしっこの穴/尿道")%
ENDSELECT

RETURNF 名称

license: unknown


code:
;長い個別イベやらなんやらを格納する場所
@K55_LONG, ARGS, ARG

SIF ARG == 0
	ARG = TARGET

SELECTCASE ARGS
CASE "My wish is..."
;好感度1750イベント
	PRINTFORMW ………………………………………………………………………………………………
	PRINTFORML
	CALL PRINT_STRW, @"黄色_ - 紬希 シナリオイベント [My wish is...] -"
	PRINTFORML
	PRINTFORMW ………………………………………………………………………………………………
	SIF CEVENT("My wish is...") == 0
	CALL SET_CEVENT, "My wish is..."
	PRINTFORMW 紬希加入后过了一段时间的事情。
	PRINTFORMW ……どうしても聞いて欲しい話がある、というので、部活前に房顶に誘われて行ってみると……
	CALL EMOTION_PLUS, "困扰眉/笑顔", ARG
	PRINTFORMW 「突然把你喊出来对不起」
	PRINTFORMW 脸上带着苦笑紬希在房顶等着。
	CALL EMOTION_PLUS, "制服/笑顔", MASTER
	PRINTFORMW 『叫我出来是没问题啦』
	CALL EMOTION_PLUS, "害羞", ARG
	PRINTFORMW 「然后……那个、有重要的事情要说」
	PRINTFORMW 带着羞涩笑容的紬希脸颊上、非常的……羞红。
	CALL EMOTION_PLUS, "制服/笑顔", MASTER
	PRINTFORMW 『……事情、是？』
	CALL EMOTION_PLUS, "害羞", ARG
	PRINTFORMW 「那个、呐」
	PRINTFORMW 先的决心的缓缓、表达出自己的思念。
	PRINTFORMW 「……%CNAME("一人称")%……嗯嗯、我啊……其实、想变成女孩子」
	PRINTFORMW 「……从小学開始、就一直想。……直到如今、也是这样想的」
	PRINTL
	PRINTL
	PRINTL
	PRINTL
	PRINTW …………………
	;運命の決断
	PRINTFORMW 紬希的TS愿望、接受吗？

	SIF CEVENT("エンディング閲覧済み") == 1
	CALL PRINT_STRW, @"黄色_※这里的选择、可能会影响后面的剧情"

	CALL PRINT_SELECT, "接受TS愿望/TS是什么不清楚、但想在他身边/紬希再说什么啊？"
		IF RESULT == 0
			CALL EMOTION_PLUS, "害羞", ARG
				CALL PRINT_STRW, @"「……太好了_HH_」"
				CALL PRINT_STRW, @"粉紅_……果然%CNAME("一人称")%是最喜欢%CNAME("二人称")%啊、我是知道的……_HH_"
				SIF CEVENT("エンディング閲覧済み") == 0
				CFLAG:想イノ行方 += 5
		ELSEIF RESULT == 1
			CALL EMOTION_PLUS, "笑顔", ARG,
				CALL PRINT_STRW, @"「是吗……_HH_」"
				CALL PRINT_STRW, @"「……嗯嗯、对不起啊……_HH_」"
				CALL PRINT_STRW, @"黄色_「……事到如今？的感觉啊、不过接受的话就好了_HH_」"
				SIF CEVENT("エンディング閲覧済み") == 0
				CFLAG:想イノ行方 += 2
		ELSE
			CALL EMOTION_PLUS, "困扰眉/笑顔", ARG
				CALL PRINT_STRW, @"赤_「确实啊……」"
				CALL PRINT_STRW, @"「是啊、10年前的事情……要你能记住、确实太任性了」"
				CALL PRINT_STRW, @"「……对不起、%CNAME("二人称")%」"
				SIF CEVENT("エンディング閲覧済み") == 0
				CFLAG:想イノ行方 -= 3
		ENDIF
CASE "I love you, my dear."
	PRINTFORMW ………………………………………………………………………………………………
	PRINTFORML
	CALL PRINT_STRW, @"黄色_ - 紬希 シナリオイベント [I love you, my dear.] -"
	PRINTFORML
	PRINTFORMW ………………………………………………………………………………………………
	PRINTFORMW ………………………………………………………………………………………………
	PRINTFORMW ………………………………………………………………………………………………
	PRINTFORMW
	IF CEVENT("约会後に告白された：紬希") == 0
		PRINTFORMW ……向紬希告白后、过了数日。
	ELSE
		PRINTFORMW ……被紬希告白后、过了数日。
	ENDIF
	PRINTFORMW
	PRINTFORMW ……在那之后我们、
	PRINTFORMW
	PRINTFORMW …………………………………………………………………………………
	PRINTFORMW ………………………………………………………………………………
	PRINTFORMW ……………………………………………………………………………
	PRINTFORMW …………………………………………………………………………
	PRINTFORMW ………………………………………………………………………
	PRINTFORMW ……………………………………………………………………
	PRINTFORMW …………………………………………………………………
	PRINTFORMW ………………………………………………………………
	PRINTFORMW ……………………………………………………………
	PRINTFORMW …………………………………………………………
	PRINTFORMW ………………………………………………………
	PRINTFORMW ……………………………………………………
	PRINTFORMW …………………………………………………
	PRINTFORMW ………………………………………………
	PRINTFORMW ……………………………………………
	PRINTFORMW …………………………………………
	PRINTFORMW ………………………………………
	PRINTFORMW ……………………………………
	PRINTFORMW …………………………………
	PRINTFORMW ………………………………
	PRINTFORMW ……………………………
	PRINTFORMW …………………………
	PRINTFORMW ………………………
	PRINTFORMW ……………………
	PRINTFORMW …………………
	PRINTFORMW ………………
	PRINTFORMW ……………
	PRINTFORMW …………
	PRINTFORMW ………
	PRINTFORMW ……
	PRINTFORMW …

		IF CEVENT("エンディング閲覧済み") == 0 && CEVENT("I love you, my dear.") == 0 || CFLAG:6501 ==  1
			PRINTFORMW - 系统消息 -
			PRINTFORML
			SETCOLOR DEF_COLOR("黄色")
			PRINTFORMW %CALLNAME:TARGET%之间的相遇、在社团活动和各种地方经历各种事情之后、
			PRINTFORMW %CALLNAME:TARGET%的愿望实现了。
			PRINTFORMW 紬希将作为[女性]来生活(再也不会回到男性。)
			PRINTFORMW 另外、根据本人是希望[具現]也不能使用。
			RESETCOLOR

			CALL CHANGE_SEX, TARGET

			TALENT:貧乳 = 0
			TALENT:処女 = 1
			TALENT:巨乳 = 1
			TALENT:性器年齢 = 0
			CSTR:称号 = 純情TS美少女
			DITEMTYPE:ARG:200 = 1

			CALL SET_3SIZE, TARGET

			PRINTFORMW
			PRINTFORMW ………………………………………………………………………………………………
			PRINTFORMW ……………………………………………………………………………………………
			PRINTFORMW …………………………………………………………………………………………
			PRINTFORMW …………………………………………………………………………………………
			PRINTFORMW ………………………………………………………………………………………
			PRINTFORMW ……………………………………………………………………………………
			PRINTFORMW …………………………………………………………………………………
			PRINTFORMW ………………………………………………………………………………
			PRINTFORMW ……………………………………………………………………………
			PRINTFORMW …………………………………………………………………………
			PRINTFORMW ………………………………………………………………………
			PRINTFORMW ……………………………………………………………………
			PRINTFORMW …………………………………………………………………
			PRINTFORMW ………………………………………………………………
			PRINTFORMW ……………………………………………………………
			PRINTFORMW …………………………………………………………
			PRINTFORMW ………………………………………………………
			PRINTFORMW ……………………………………………………
			PRINTFORMW …………………………………………………
			PRINTFORMW ………………………………………………
			PRINTFORMW ……………………………………………
			PRINTFORMW …………………………………………
			PRINTFORMW ………………………………………
			PRINTFORMW ……………………………………
			PRINTFORMW …………………………………
			PRINTFORMW ………………………………
			PRINTFORMW ……………………………
			PRINTFORMW …………………………
			PRINTFORMW ………………………
			PRINTFORMW ……………………
			PRINTFORMW …………………
			PRINTFORMW ………………
			PRINTFORMW ……………
			PRINTFORMW …………
			PRINTFORMW ………
			PRINTFORMW ……
			PRINTFORMW …
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW Thank you for playing!!
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW ………………………………………………………………………………………………
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW
			PRINTFORMW 如果、对这样的结局不满意的话。
			PRINTFORMW 接吻后的选则、说明了所有分歧。
			PRINTFORMW
			PRINTFORMW 想看紬希其他的结局的话、请务必游玩其他路线。
			CALL SET_CEVENT, "エンディング閲覧済み"
		ENDIF
	PRINTFORMW - era悪魔女仆 都築紬希 [NormalEND] Fin -
CASE "Farewell to Love"
	PRINTFORMW ………………………………………………………………………………………………
	PRINTFORML
	CALL PRINT_STRW, @"黄色_ - 紬希 シナリオイベント [Farewell to Love] -"
	PRINTFORML
	PRINTFORMW ………………………………………………………………………………………………
	PRINTFORMW ………………………………………………………………………………………………
	PRINTFORMW ………………………………………………………………………………………………
	PRINTFORMW
	IF CEVENT("约会後に告白された：紬希") == 0
		PRINTFORMW ……向紬希告白后、过了数日。
	ELSE
		PRINTFORMW ……被紬希告白后、过了数日。
	ENDIF
	PRINTFORML
	PRINTFORMW 数天之后、联络不到紬希了。
	PRINTFORMW 在学虽然会见面、%CALLNAME:TARGET%但态度总觉得有些冷漠。
	PRINTFORM ……不止如此……
	IF FINDCHARA(NO, 1)
		PRINTFORMW 根据弗理希艾尔的调查……
	ELSE
		PRINTFORM %CALLNAME:TARGET%的朋友也证明说……
	ENDIF
	PRINTFORMW 有看到他利用身材和美貌……和女性走在一起什么的。
	PRINTFORML
	PRINTFORMW 保持这个样子、%CALLNAME:TARGET%不能放任不管。
	PRINTFORMW 现在社团的秘密是由大家之间的関系保护的、如果有一个人的関系变差的话……
	PRINTFORMW 最坏的情况%CALLNAME:TARGET%会死也说不定。
	PRINTFORML
	PRINTFORMW 而且、再怎么说也是发誓在一起的人。
	PRINTFORMW 如果他遇到危险、却不去挽回他真的能作为朋友吗……
	PRINTFORML
	PRINTFORMW 在不能联络到他的情况下进行了调查得知了、
	PRINTFORMW %CALLNAME:TARGET%把学校附近的爱情旅店作为据点活动。
	PRINTFORMW 不快点的话……。
	PRINTFORML
	PRINTFORMW 利用认知阻碍的能力、冲进紬希在的房间……
	PRINTFORMW 「啊哇、要去了啊？」
	PRINTFORMW 「以前就很H啊、%CNAME("二人称")%啊……」
	PRINTFORMW 「没这回事……一直是这么敏感」
	PRINTFORML
	PRINTFORMW %CALLNAME:TARGET%的身边。
	PRINTFORMW %TEXTR("不曾接触男性的可爱少女/穿着女仆装装饰泳衣的数名少女/身体年轻水嫩的女性/看上去是蕾丝的两位女性/穿着cosplay衣物的数名少女/年轻的带着结婚戒指的女性/和紬希容貌一样诱人的女性/紬希妈妈一样年龄差的女性")%瘫软着%TEXTR("秘所里/尻穴里/身体各处")%溢满精液。
	PRINTFORMW 「欸、这是什么情况、啊？」
	PRINTFORMW 「讨厌啊、没做什么复杂的事情哦。」
	PRINTFORML
	PRINTFORMW 「……在旅馆登记、好好争去对方同意才做的哦」
	PRINTFORMW 「不会像%CNAME("二人称")%一样做很过分的事情哦？」
	PRINTFORML
	CALL PRINT_STRW, @"赤_ 「……这样就、%CNAME("二人称")%不会在见我了吧」"
	CALL PRINT_STRW, @"灰色_ 「变成这样%CNAME("一人称")%君不会接受的吧」"
	CALL PRINT_STRW, @"灰色_ 「……其实最喜欢你了哦。永别了、%CNAME("二人称")%……」"
	CALL PRINT_STRW, @"灰色_ 「对不起……」"
	PRINTFORML
	PRINTFORMW 这肯定、那里出了问题。
	PRINTFORMW 是可怕的梦吧。
	PRINTFORMW 明明那么、洁身自爱的%CALLNAME:TARGET%。
	PRINTFORML
	PRINTFORMW 变成这样、再怎么想也。
	CALL PRINT_STRW, @"赤_ 「……这样就、%CNAME("二人称")%不会在见我了吧」"
	PRINTFORML
	PRINTFORMW 脑中不断回响着那句话。
	PRINTFORMW ……到底该怎么样才好。
	PRINTFORMW %CALLNAME:TARGET%的事情、真正意义上了解的话―――
	PRINTFORMW …………
	PRINTFORMW ………
	PRINTFORMW ……
	PRINTFORMW …
	PRINTFORMW

	IF CEVENT("エンディング閲覧済み") == 0 && CEVENT("Farewell to Love") == 0 || CFLAG:6501 == 1
		PRINTFORMW - 系统消息 -
		PRINTFORML
		SETCOLOR DEF_COLOR("黄色")
		PRINTFORMW %CALLNAME:TARGET%之间的相遇、在社团活动和各种地方经历各种事情之后、
		PRINTFORMW 终于%CALLNAME:TARGET%的愿望实现了。
		PRINTFORMW 今后%CALLNAME:TARGET%将作为[男性]生活(再也不会回到女性。)
		PRINTFORMW 而且、你和%CALLNAME:TARGET%不再是恋人了。
		RESETCOLOR
		TALENT:相思相愛 = 0
		TALENT:清楚 = 0
		TALENT:坦率 = 0
		TALENT:温柔 = 0
		TALENT:伪娘 = 0
		TALENT:包茎 = 0
		TALENT:男性 = 1
		TALENT:阴茎 = 2
		TALENT:好色 = 1
		TALENT:肤色 = 1
		TALENT:不在乎貞操 = 1
		CSTR:関係 = 同班同学
		CSTR:称号 = 元幼馴带污迹的
		PRINTFORMW
		PRINTFORMW ………………………………………………………………………………………………
		PRINTFORMW ……………………………………………………………………………………………
		PRINTFORMW …………………………………………………………………………………………
		PRINTFORMW …………………………………………………………………………………………
		PRINTFORMW ………………………………………………………………………………………
		PRINTFORMW ……………………………………………………………………………………
		PRINTFORMW …………………………………………………………………………………
		PRINTFORMW ………………………………………………………………………………
		PRINTFORMW ……………………………………………………………………………
		PRINTFORMW …………………………………………………………………………
		PRINTFORMW ………………………………………………………………………
		PRINTFORMW ……………………………………………………………………
		PRINTFORMW …………………………………………………………………
		PRINTFORMW ………………………………………………………………
		PRINTFORMW ……………………………………………………………
		PRINTFORMW …………………………………………………………
		PRINTFORMW ………………………………………………………
		PRINTFORMW ……………………………………………………
		PRINTFORMW …………………………………………………
		PRINTFORMW ………………………………………………
		PRINTFORMW ……………………………………………
		PRINTFORMW …………………………………………
		PRINTFORMW ………………………………………
		PRINTFORMW ……………………………………
		PRINTFORMW …………………………………
		PRINTFORMW ………………………………
		PRINTFORMW ……………………………
		PRINTFORMW …………………………
		PRINTFORMW ………………………
		PRINTFORMW ……………………
		PRINTFORMW …………………
		PRINTFORMW ………………
		PRINTFORMW ……………
		PRINTFORMW …………
		PRINTFORMW ………
		PRINTFORMW ……
		PRINTFORMW …
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW Thank you for playing!!
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW ………………………………………………………………………………………………
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW 如果、对这样的结局不满意的话。
		PRINTFORMW 接吻后的选则、说明了所有分歧。
		PRINTFORMW
		PRINTFORMW 想看紬希其他的结局的话、请务必游玩其他路线。
		CALL SET_CEVENT, "エンディング閲覧済み"
	ENDIF
	PRINTFORMW - era悪魔女仆 都築紬希 [BadEND] Fin -
CASE "Eternal bond"
	PRINTFORMW ………………………………………………………………………………………………
	PRINTFORML
	CALL PRINT_STRW, @"黄色_ - 紬希 シナリオイベント [Eternal bond] -"
	PRINTFORML
	PRINTFORMW ………………………………………………………………………………………………
	PRINTFORMW ………………………………………………………………………………………………
	PRINTFORMW ………………………………………………………………………………………………
	PRINTFORMW

	IF CEVENT("约会後に告白された：紬希") == 0
		PRINTFORMW ……向紬希告白后、过了数日。
	ELSE
		PRINTFORMW ……被紬希告白后、过了数日。
	ENDIF

	IF CEVENT("エンディング閲覧済み") == 0 && CEVENT("Eternal bond") == 0 || CFLAG:6501 == 1
		PRINTFORMW - 系统消息 -
		PRINTFORML
		SETCOLOR DEF_COLOR("黄色")
		PRINTFORMW %CALLNAME:TARGET%之间的相遇、在社团活动和各种地方经历各种事情之后、
		PRINTFORMW %CALLNAME:TARGET%的愿望实现了。
		PRINTFORMW 紬希将作为[女性]来生活(再也不会回到男性。)
		RESETCOLOR

		CALL CHANGE_SEX, TARGET

		TALENT:貧乳 = 0
		TALENT:処女 = 1
		TALENT:巨乳 = 1
		TALENT:性器年齢 = 2
		CSTR:称号 = 純情TS美少女

		CALL SET_3SIZE, TARGET

		PRINTFORMW
		PRINTFORMW ………………………………………………………………………………………………
		PRINTFORMW ……………………………………………………………………………………………
		PRINTFORMW …………………………………………………………………………………………
		PRINTFORMW …………………………………………………………………………………………
		PRINTFORMW ………………………………………………………………………………………
		PRINTFORMW ……………………………………………………………………………………
		PRINTFORMW …………………………………………………………………………………
		PRINTFORMW ………………………………………………………………………………
		PRINTFORMW ……………………………………………………………………………
		PRINTFORMW …………………………………………………………………………
		PRINTFORMW ………………………………………………………………………
		PRINTFORMW ……………………………………………………………………
		PRINTFORMW …………………………………………………………………
		PRINTFORMW ………………………………………………………………
		PRINTFORMW ……………………………………………………………
		PRINTFORMW …………………………………………………………
		PRINTFORMW ………………………………………………………
		PRINTFORMW ……………………………………………………
		PRINTFORMW …………………………………………………
		PRINTFORMW ………………………………………………
		PRINTFORMW ……………………………………………
		PRINTFORMW …………………………………………
		PRINTFORMW ………………………………………
		PRINTFORMW ……………………………………
		PRINTFORMW …………………………………
		PRINTFORMW ………………………………
		PRINTFORMW ……………………………
		PRINTFORMW …………………………
		PRINTFORMW ………………………
		PRINTFORMW ……………………
		PRINTFORMW …………………
		PRINTFORMW ………………
		PRINTFORMW ……………
		PRINTFORMW …………
		PRINTFORMW ………
		PRINTFORMW ……
		PRINTFORMW …
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW Thank you for playing!!
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW ………………………………………………………………………………………………
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW 如果、对这样的结局不满意的话。
		PRINTFORMW 接吻后的选则、说明了所有分歧。
		PRINTFORMW
		PRINTFORMW 想看紬希其他的结局的话、请务必游玩其他路线。
		CALL SET_CEVENT, "エンディング閲覧済み"
	ENDIF

	PRINTFORMW - era悪魔女仆 都築紬希 [TrueEND] Fin -
ENDSELECT

path: ERB/EVENT_K/55 紬希/EVENT_K55_LONG.ERB


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

@KOJO_WISH_K55, ARGS
#DIM MEMO_LINECOUNT

MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
CASE "取引開始"
	;自分を相手にＨしてる最中にお願いされた
	IF COND("Ｈ最中の取引")
		;しかも挿入中！
		IF INSERT("挿入相手") == MASTER
			PRINTFORMW 「欸……灵魂的交易？！」
			CALL PRINT_STRW, "「等等_HH_等等_HH_」"
		ELSE
			PRINTFORMW 「忘记拿东西了吗？」
			CALL PRINT_STRW, "「准备好变得舒服吧……_HH_」"
		ENDIF
	ELSEIF TALENT:恋慕 && YURI_COND(MASTER) >= 1 && TEXTS("日期対応イベント") == "情人節" && CDAYEV("情人節") == 0
		IF TALENT:相思相愛
			PRINTFORMW 「啊、稍微等一下」
			PRINTFORMW 「有想要给你的东西！」
			PRINTFORML
			PRINTFORMW 「……今天、是情人节嘛……对吧。」
			PRINTFORMW 「能和%CNAME("二人称")%的口味就好了……」
		ELSE
			PRINTFORMW 「啊……啊欸欸啊、拜托我吗？」
			PRINTFORMW 「倒是没有関系、今天可是情人节哦。」
			PRINTFORMW 「%CNAME("二人称")%啊、有收到巧克力吗？」
			CALL PRINT_SELECT, "收到了/没收到"
			IF RESULT == 0
				PRINTFORMW 「……是吗」
				PRINTFORMW 「什么啊、这出乎意料的反应。……会寂寞吗？」
				PRINTFORMW 「啊哇、開玩笑的。给、情人节巧克力」
				CALL PRINT_STRW, @"「%CNAME("二人称")%更加……喜欢的话就好了_HH_」"
			ELSE
					PRINTFORMW 「每年的惯例呢」
				PRINT 「但是……你是唯一的
				IF TALENT:相思相愛
					PRINT 恋人
				ELSE
					PRINT 異性
				ENDIF
				CALL PRINT_STRW, @"想让你品尝………啊_HH_」"
				CALL PRINT_STRW, @"「我用了变得美味的魔法、所以肯定会好吃的_HH_」"
			ENDIF
		ENDIF
		PRINTL
		CALL PRINT_STRW, @"黄色_%CALLNAME:TARGET%から本命巧克力を貰いました！"
		CALL SET_CDAYEV, "情人節"
	ELSEIF TALENT:恋慕 && TEXTS("日期対応イベント") == "白色情人節" && CDAYEV("情人節") && CDAYEV("白色情人節")== 0
		PRINTFORMW 「欸、情人节的回礼？」
		PRINTFORMW 「谢谢！我会好好品尝的！！」
		PRINTFORML
		CALL PRINT_STRW, @"黄色_%CALLNAME:TARGET%情人节回礼了。"
		CALL SET_CDAYEV, "白色情人節"
	ELSE
		PRINTFORMW 「如果是力所能及的话」
	ENDIF
CASE "愛の告白"
	;必ず恋慕取ったあとに、恋慕えっちしないとここにはたどり着けない
	IF TALENT:相思相愛 && CEVENT("調教開始：恋慕") && FLAG:二人きり
		IF CFLAG:想イノ行方 >= 5
			PRINTFORMW %CALLNAME:MASTER%传达了爱意、
			PRINTFORMW %CALLNAME:TARGET%脸上带着笑容羞涩的看向一旁的天空。
			PRINTFORML
			PRINTFORMW 「一直在想、这样就好了、那样就好了」
			PRINTFORMW 「但是%CNAME("一人称")%和我都是男性、这样是不行的……我知道的但是……」
			PRINTFORMW 「……%CNAME("一人称")%也、非常高兴」
			PRINTFORMW 「但是…… 心理准备……没那么、简单就做好」
			PRINTFORMW 相思相爱、就是指这样吧。这份感情现在才被从新认识到。
			PRINTFORMW 不知如何是好的%CALLNAME:TARGET%脸颊上留下的泪水、也就是说……
			PRINTFORMW
			PRINTFORMW 「……%CNAME("二人称","かな")%、我爱你……」
			PRINTFORMW 这么说着、%CALLNAME:TARGET%自己献上了长长的深吻久久不理。
			CFLAG:想イノ行方 += 20
		ELSE
			PRINTFORMW %CALLNAME:MASTER%传达了爱意、
			PRINTFORMW %CALLNAME:TARGET%像是放弃一般的苦笑着……
			PRINTFORML
			PRINTFORMW 「虽然、事到如今。……真的喜欢上我了呢」
			PRINTFORMW 「……%CNAME("一人称")%、啊」
			PRINTFORMW 「呐、喜欢%CNAME("二人称")%、还是%CNAME("一人称")%？」
			PRINTFORMW 「喜欢那边、都会很高清。……果然还是想问一下」
			PRINTFORML
			;運命の決断
			PRINTFORMW 喜欢紬希的、哪一种性别呢？
			CALL PRINT_STRW, @"黄色_※这里的选择、可能会影响之后的剧情"
			CALL PRINT_SELECT, "作为男生喜欢/紬希就是紬希/作为女生喜欢/喜欢的是身体所以无所谓"
			IF RESULT == 0
				CALL PRINT_STRW, @"黄色「是吧、果然……是、这样呢」"
				CALL PRINT_STRW, @"「……但是……有点開心、_HH_」"
				CFLAG:想イノ行方 += 5
			ELSEIF RESULT == 1
				CALL PRINT_STRW, @"「笨蛋……_HH_」"
				CALL PRINT_STRW, @"「……最喜欢你、了……_HH_"
				CALL PRINT_STRW, @"「……%CNAME("一人称")%也好、%CNAME("二人称")%也好都最喜欢、了……_HH_」"
				CFLAG:想イノ行方 += 15
			ELSEIF RESULT == 2
				CALL PRINT_STRW, @"「……谢谢你_HH_」"
				CALL PRINT_STRW, @"「……果然%CNAME("一人称")%最喜欢这样的%CNAME("二人称")%、我知道的_HH_」"
				CFLAG:想イノ行方 += 10
			ELSE
				CALL PRINT_STRW, @"赤_「是吗、……%CNAME("一人称")%现在是这样的呢……」"
				CFLAG:想イノ行方 -= 100000
			ENDIF
		ENDIF
	ELSEIF TALENT:恋慕 && CEVENT("調教開始：恋慕") && FLAG:二人きり == 0
		PRINTFORMW 「那个、什么」
		PRINTFORMW 「考虑一下时间和场合啊……」
		TALENT:相思相愛 = 0
		CFLAG:心情差 = 1
		CALL SET_DEVENT, "告白保留"
	;断る
	ELSE
		SIF TALENT:男性 && TALENT:MASTER:男性
			PRINTFORMW 「欸？ %CNAME("一人称")%们、都是男性哦？」
		PRINTFORML 「%CNAME("二人称")%……我并不讨厌也想在你身边但是」
		PRINTFORMW 「但我觉得现在还太早了……」
	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

;TFLAG:値上げ交渉 に数字を入れておくと、断られた際もその値上乗せで服を脱掉展開に出来る
;TFLAG:取引拒否 = 1 とすると本来取引できるかに関わらず、取引しなくなる
CASE "全裸交易"
	;ＯＫ！
	IF TFLAG:取引承諾

	;断られる
	ELSE
		;これを指定しておくと、実行値が足りない際にこの額上乗せで応じてくれるようになる
		;TFLAG:値上げ交渉 = 2000
	ENDIF
CASE "全裸"
	;値上げ交渉した("全裸交易"で設定した場合のみ)
	IF TFLAG:値上げ交渉

	;取引初成功
	ELSEIF COND("合意：全裸化") == 0

	ELSE

	ENDIF
	;汎用地の文
	CALL EVENT_DATUI, "裸体"
CASE "全裸拒否"
	;取引を拒否した際("全裸交易"で設定した場合のみ)
	IF TFLAG:取引拒否

	;二人きりなら脱いでくれるけど状況が悪い
	ELSEIF COND("合意：全裸化") && (CHARA_NUM("室内の邪魔者") || PLACE("個室") == 0)

	ELSE

	ENDIF

;TFLAG:取引拒否 = 1 とすると本来取引できるかに関わらず、取引しなくなる
CASE "事后避孕药取引"

CASE "事后避孕药"
	;代金をまけてくれた場合
	IF TFLAG:値切った
		;所持金が足りなかった場合です
		;現状、ここに来るのは恋慕无の時のみ
	;拝み倒したら代金を払わなくても許してくれた場合
	ELSEIF TFLAG:取引価格 == 0
		;現状、ここに来るのは恋慕有の時のみ
	ELSE
		;普通にお金を払った場合
		;口上无でも自然な感じです
		;ですが恋慕のときなどは、なにか一言あってもいいかもですね
	ENDIF

CASE "事后避孕药拒否"
	;これはCASE "事后避孕药取引"内でTFLAG:取引拒否 = 1 となる分岐を作った場合のみ
	IF TFLAG:取引拒否

	;拝み倒して失敗した場合
	ELSEIF TFLAG:取引価格 == 0
		;轻轻地地の文が表示されます。口上有无どちらでも大丈夫そうです。
	;其他、你が薬代を不支付場合
	ELSE
		;恋慕状態で、それなりに妊娠の恐惧がある場合
		IF ( COND("受精確認") || COND("胎内の精液量") ) && TALENT:恋慕
			;お金がないか、不支付を選んだ場合です。
			;それなら避妊できなくて妊娠しちゃっても仕方ないね…(爱心)って感じのやつです。
			;地の文が表示されるので何も書かないほうが良いかもしれません。
		;不支付、を選んだ場合
		ELSEIF MONEY >= TFLAG:取引価格
			;口上无でも自然な感じです
		;お金が足りなかった場合
		ELSE
			;不支付を選んだ場合も、お金が足りないときはここへ来ます。
		ENDIF
	ENDIF
CASE "同居拒否"

CASE "同居希望"

CASE "同居頻度的相談"

CASE "便当拒否"

CASE "做便当"
	;便当のお願い２回目以降
	IF COND("合意：便当")

	;以下は初めて作ってもらうよう变成了とき
	ELSE
		IF COND("同居中")

		ELSE

		ENDIF
	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 "魂が足りない"

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
ENDSELECT

;以下は汎用台詞(すでに喋っている場合には下には行かない)
SIF LINECOUNT > MEMO_LINECOUNT
	RETURN 1

;汎用拒否
IF STRCOUNT(ARGS, "拒否")
	PRINTFORMW 「嗯嗯、对不起……」
;汎用取引（特に記述することがないならスキップ）
ELSEIF STRCOUNT(ARGS, "取引")

;汎用ＯＫ
ELSE
	PRINTFORMW 「可以哦」
ENDIF

;-------------------------------------------------
;购物での台詞
;-------------------------------------------------
@KOJO_SHOP_K55, 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/55 紬希/EVENT_K55_SHOP.ERB